480 lines
13 KiB
C
480 lines
13 KiB
C
/*
|
|
* dialog - Display simple dialog boxes from shell scripts
|
|
*
|
|
* AUTHOR: Savio Lam (lam836@cs.cuhk.hk)
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*
|
|
*
|
|
* HISTORY:
|
|
*
|
|
* 17/12/93 - Version 0.1 released.
|
|
*
|
|
* 19/12/93 - menu will now scroll if there are more items than can fit
|
|
* on the screen.
|
|
* - added 'checklist', a dialog box with a list of options that
|
|
* can be turned on or off. A list of options that are on is
|
|
* returned on exit.
|
|
*
|
|
* 20/12/93 - Version 0.15 released.
|
|
*
|
|
* 29/12/93 - Incorporated patch from Patrick J. Volkerding
|
|
* (volkerdi@mhd1.moorhead.msus.edu) that made these changes:
|
|
* - increased MAX_LEN to 2048
|
|
* - added 'infobox', equivalent to a message box without pausing
|
|
* - added option '--clear' that will clear the screen
|
|
* - Explicit line breaking when printing prompt text can be
|
|
* invoked by real newline '\n' besides the string "\n"
|
|
* - an optional parameter '--title <string>' can be used to
|
|
* specify a title string for the dialog box
|
|
*
|
|
* 03/01/94 - added 'textbox', a dialog box for displaying text from a file.
|
|
* - Version 0.2 released.
|
|
*
|
|
* 04/01/94 - some fixes and improvements for 'textbox':
|
|
* - fixed a bug that will cause a segmentation violation when a
|
|
* line is longer than MAX_LEN characters. Lines will now be
|
|
* truncated if they are longer than MAX_LEN characters.
|
|
* - removed wrefresh() from print_line(). This will increase
|
|
* efficiency of print_page() which calls print_line().
|
|
* - display current position in the form of percentage into file.
|
|
* - Version 0.21 released.
|
|
*
|
|
* 05/01/94 - some changes for faster screen update.
|
|
*
|
|
* 07/01/94 - much more flexible color settings. Can use all 16 colors
|
|
* (8 normal, 8 highlight) of the Linux console.
|
|
*
|
|
* 08/01/94 - added run-time configuration using configuration file.
|
|
*
|
|
* 09/01/94 - some minor bug fixes and cleanups for menubox, checklist and
|
|
* textbox.
|
|
*
|
|
* 11/01/94 - added a man page.
|
|
*
|
|
* 13/01/94 - some changes for easier porting to other Unix systems (tested
|
|
* on Ultrix, SunOS and HPUX)
|
|
* - Version 0.3 released.
|
|
*
|
|
* 08/06/94 - Patches by Stuart Herbert - S.Herbert@shef.ac.uk
|
|
* Fixed attr_clear and the textbox stuff to work with ncurses 1.8.5
|
|
* Fixed the wordwrap routine - it'll actually wrap properly now
|
|
* Added a more 3D look to everything - having your own rc file could
|
|
* prove 'interesting' to say the least :-)
|
|
* Added radiolist option
|
|
* - Version 0.4 released.
|
|
*/
|
|
|
|
#define __DIALOG_MAIN__
|
|
|
|
#include <dialog.h>
|
|
#include "dialog.priv.h"
|
|
#ifdef HAVE_NCURSES
|
|
#include "colors.h"
|
|
#endif
|
|
|
|
/*
|
|
* Do some initialization for dialog
|
|
*/
|
|
void init_dialog(void)
|
|
{
|
|
#if defined(LOCALE)
|
|
(void) setlocale(LC_ALL, "");
|
|
#endif
|
|
|
|
#ifdef HAVE_NCURSES
|
|
if (parse_rc() == -1) /* Read the configuration file */
|
|
exit(-1);
|
|
#endif
|
|
|
|
if (initscr() == NULL) { /* Init curses */
|
|
fprintf(stderr, "\nCurses initialization error.\n");
|
|
exit(-1);
|
|
}
|
|
keypad(stdscr, TRUE);
|
|
cbreak();
|
|
noecho();
|
|
|
|
#ifdef HAVE_NCURSES
|
|
if (use_colors || use_shadow) /* Set up colors */
|
|
color_setup();
|
|
#endif
|
|
|
|
/* Set screen to screen attribute */
|
|
dialog_clear_norefresh();
|
|
}
|
|
/* End of init_dialog() */
|
|
|
|
|
|
#ifdef HAVE_NCURSES
|
|
/*
|
|
* Setup for color display
|
|
*/
|
|
void color_setup(void)
|
|
{
|
|
int i;
|
|
|
|
if (has_colors()) { /* Terminal supports color? */
|
|
start_color();
|
|
|
|
/* Initialize color pairs */
|
|
for (i = 0; i < ATTRIBUTE_COUNT; i++)
|
|
init_pair(i+1, color_table[i][0], color_table[i][1]);
|
|
|
|
/* Setup color attributes */
|
|
for (i = 0; i < ATTRIBUTE_COUNT; i++)
|
|
attributes[i] = C_ATTR(color_table[i][2], i+1);
|
|
}
|
|
}
|
|
/* End of color_setup() */
|
|
#endif
|
|
|
|
|
|
/*
|
|
* Set window to attribute 'attr'
|
|
*/
|
|
void attr_clear(WINDOW *win, int height, int width, chtype attr)
|
|
{
|
|
int i, j;
|
|
|
|
wattrset(win, attr); /* Set window to attribute 'attr' */
|
|
for (i = 0; i < height; i++) {
|
|
wmove(win, i, 0);
|
|
for (j = 0; j < width; j++)
|
|
waddch(win, ' ');
|
|
}
|
|
}
|
|
/* End of attr_clear() */
|
|
|
|
|
|
/*
|
|
* Print a string of text in a window, automatically wrap around to the
|
|
* next line if the string is too long to fit on one line. Note that the
|
|
* string may contain "\n" to represent a newline character or the real
|
|
* newline '\n', but in that case, auto wrap around will be disabled.
|
|
*/
|
|
void print_autowrap(WINDOW *win, unsigned char *prompt, int height, int width, int maxwidth, int y, int x, int center, int rawmode)
|
|
{
|
|
int first = 1, cur_x, cur_y, i;
|
|
unsigned char tempstr[MAX_LEN+1], *word, *tempptr, *tempptr1;
|
|
chtype ostuff[132], attrs = 0, init_bottom = 0;
|
|
|
|
wsetscrreg(win, y, height);
|
|
getyx(win, cur_y, cur_x);
|
|
|
|
strcpy(tempstr, prompt);
|
|
if ((!rawmode && strstr(tempstr, "\\n") != NULL) ||
|
|
(strchr(tempstr, '\n') != NULL)) { /* Prompt contains "\n" or '\n' */
|
|
word = tempstr;
|
|
while (1) {
|
|
tempptr = rawmode ? NULL : strstr(word, "\\n");
|
|
tempptr1 = strchr(word, '\n');
|
|
if (tempptr == NULL && tempptr1 == NULL)
|
|
break;
|
|
else if (tempptr == NULL) { /* No more "\n" */
|
|
tempptr = tempptr1;
|
|
tempptr[0] = '\0';
|
|
}
|
|
else if (tempptr1 == NULL) { /* No more '\n' */
|
|
tempptr[0] = '\0';
|
|
tempptr++;
|
|
}
|
|
else { /* Prompt contains both "\n" and '\n' */
|
|
if (strlen(tempptr)-2 < strlen(tempptr1)-1) {
|
|
tempptr = tempptr1;
|
|
tempptr[0] = '\0';
|
|
}
|
|
else {
|
|
tempptr[0] = '\0';
|
|
tempptr++;
|
|
}
|
|
}
|
|
|
|
waddstr(win, word);
|
|
word = tempptr + 1;
|
|
if (++cur_y > height) {
|
|
cur_y--;
|
|
if (!init_bottom) {
|
|
for (i = 0; i < x; i++)
|
|
ostuff[i] = mvwinch(win, cur_y, i);
|
|
for (i = width; i < maxwidth; i++)
|
|
ostuff[i] = mvwinch(win, cur_y, i);
|
|
attrs = getattrs(win);
|
|
init_bottom = 1;
|
|
}
|
|
scrollok(win, TRUE);
|
|
scroll(win);
|
|
scrollok(win, FALSE);
|
|
wmove(win, cur_y, 0);
|
|
for (i = 0; i < x; i++) {
|
|
wattrset(win, ostuff[i]&A_ATTRIBUTES);
|
|
waddch(win, ostuff[i]);
|
|
}
|
|
wattrset(win, attrs);
|
|
for ( ; i < width; i++)
|
|
waddch(win, ' ');
|
|
for ( ; i < maxwidth; i++) {
|
|
wattrset(win, ostuff[i]&A_ATTRIBUTES);
|
|
waddch(win, ostuff[i]);
|
|
}
|
|
wattrset(win, attrs);
|
|
wrefresh(win);
|
|
}
|
|
wmove(win, cur_y, cur_x = x);
|
|
}
|
|
waddstr(win, word);
|
|
}
|
|
else if (center && strlen(tempstr) <= width-x*2) { /* If prompt is short */
|
|
wmove(win, cur_y, (width - strlen(tempstr)) / 2);
|
|
waddstr(win, tempstr);
|
|
}
|
|
else if (!center && strlen(tempstr) <= width-cur_x) { /* If prompt is short */
|
|
waddstr(win, tempstr);
|
|
}
|
|
else {
|
|
/* Print prompt word by word, wrap around if necessary */
|
|
while ((word = strtok(first ? tempstr : NULL, "\t\n ")) != NULL) {
|
|
int loop;
|
|
unsigned char sc;
|
|
|
|
if (first) /* First iteration */
|
|
first = 0;
|
|
do {
|
|
loop = 0;
|
|
if (cur_x+strlen(word) >= width+1) { /* wrap around to next line */
|
|
if (x+strlen(word) >= width+1) {
|
|
sc = word[width-cur_x-1];
|
|
word[width-cur_x-1] = '\0';
|
|
wmove(win, cur_y, cur_x);
|
|
waddstr(win, word);
|
|
word[width-cur_x-1] = sc;
|
|
word += width-cur_x-1;
|
|
getyx(win, cur_y, cur_x);
|
|
loop = 1;
|
|
}
|
|
cur_y++;
|
|
cur_x = x;
|
|
if (cur_y > height) {
|
|
cur_y--;
|
|
if (!init_bottom) {
|
|
for (i = 0; i < x; i++)
|
|
ostuff[i] = mvwinch(win, cur_y, i);
|
|
for (i = width; i < maxwidth; i++)
|
|
ostuff[i] = mvwinch(win, cur_y, i);
|
|
attrs = getattrs(win);
|
|
init_bottom = 1;
|
|
}
|
|
scrollok(win, TRUE);
|
|
scroll(win);
|
|
scrollok(win, FALSE);
|
|
wmove(win, cur_y, 0);
|
|
for (i = 0; i < x; i++) {
|
|
wattrset(win, ostuff[i]&A_ATTRIBUTES);
|
|
waddch(win, ostuff[i]);
|
|
}
|
|
wattrset(win, attrs);
|
|
for ( ; i < width; i++)
|
|
waddch(win, ' ');
|
|
for ( ; i < maxwidth; i++) {
|
|
wattrset(win, ostuff[i]&A_ATTRIBUTES);
|
|
waddch(win, ostuff[i]);
|
|
}
|
|
wattrset(win, attrs);
|
|
wrefresh(win);
|
|
}
|
|
}
|
|
}
|
|
while(loop);
|
|
wmove(win, cur_y, cur_x);
|
|
waddstr(win, word);
|
|
getyx(win, cur_y, cur_x);
|
|
cur_x++;
|
|
}
|
|
}
|
|
}
|
|
/* End of print_autowrap() */
|
|
|
|
|
|
/*
|
|
* Print a button
|
|
*/
|
|
void print_button(WINDOW *win, unsigned char *label, int y, int x, int selected)
|
|
{
|
|
int i, temp;
|
|
|
|
wmove(win, y, x);
|
|
wattrset(win, selected ? button_active_attr : button_inactive_attr);
|
|
waddstr(win, "<");
|
|
temp = strspn(label, " ");
|
|
label += temp;
|
|
wattrset(win, selected ? button_label_active_attr : button_label_inactive_attr);
|
|
for (i = 0; i < temp; i++)
|
|
waddch(win, ' ');
|
|
wattrset(win, selected ? button_key_active_attr : button_key_inactive_attr);
|
|
waddch(win, label[0]);
|
|
wattrset(win, selected ? button_label_active_attr : button_label_inactive_attr);
|
|
waddstr(win, label+1);
|
|
wattrset(win, selected ? button_active_attr : button_inactive_attr);
|
|
waddstr(win, ">");
|
|
wmove(win, y, x+temp+1);
|
|
}
|
|
/* End of print_button() */
|
|
|
|
|
|
/*
|
|
* Draw a rectangular box with line drawing characters
|
|
*/
|
|
void draw_box(WINDOW *win, int y, int x, int height, int width, chtype box, chtype border)
|
|
{
|
|
int i, j;
|
|
|
|
wattrset(win, 0);
|
|
for (i = 0; i < height; i++) {
|
|
wmove(win, y + i, x);
|
|
for (j = 0; j < width; j++)
|
|
if (!i && !j)
|
|
waddch(win, border | ACS_ULCORNER);
|
|
else if (i == height-1 && !j)
|
|
waddch(win, border | ACS_LLCORNER);
|
|
else if (!i && j == width-1)
|
|
waddch(win, box | ACS_URCORNER);
|
|
else if (i == height-1 && j == width-1)
|
|
waddch(win, box | ACS_LRCORNER);
|
|
else if (!i)
|
|
waddch(win, border | ACS_HLINE);
|
|
else if (i == height-1)
|
|
waddch(win, box | ACS_HLINE);
|
|
else if (!j)
|
|
waddch(win, border | ACS_VLINE);
|
|
else if (j == width-1)
|
|
waddch(win, box | ACS_VLINE);
|
|
else
|
|
waddch(win, box | ' ');
|
|
}
|
|
}
|
|
/* End of draw_box() */
|
|
|
|
|
|
#ifdef HAVE_NCURSES
|
|
/*
|
|
* Draw shadows along the right and bottom edge to give a more 3D look
|
|
* to the boxes
|
|
*/
|
|
void draw_shadow(WINDOW *win, int y, int x, int height, int width)
|
|
{
|
|
int i,sx,sy;
|
|
|
|
if (has_colors()) { /* Whether terminal supports color? */
|
|
getbegyx(win,sy,sx);
|
|
/* small touch */
|
|
wattrset(win, A_INVIS);
|
|
wmove(win, y + height, x + 2);
|
|
for (i = 0; i < width; i++)
|
|
waddch(win, ' ');
|
|
/* end touch */
|
|
wattrset(win, shadow_attr);
|
|
wmove(win, y + height, x + 2);
|
|
for (i = 0; i < width; i++)
|
|
waddch(win, mvwinch(newscr, sy+y+height, sx+x+2+i) & A_CHARTEXT);
|
|
for (i = y + 1; i < y + height + 1; i++) {
|
|
/* small touch */
|
|
wattrset(win, A_INVIS);
|
|
wmove(win, i, x + width);
|
|
waddstr(win, " ");
|
|
/* end touch */
|
|
wattrset(win, shadow_attr);
|
|
wmove(win, i, x + width);
|
|
waddch(win, mvwinch(newscr, sy+i, sx+x+width) & A_CHARTEXT);
|
|
waddch(win, mvwinch(newscr, sy+i, sx+x+width+1) & A_CHARTEXT);
|
|
}
|
|
wnoutrefresh(win);
|
|
}
|
|
}
|
|
/* End of draw_shadow() */
|
|
#endif
|
|
|
|
void dialog_clear_norefresh(void)
|
|
{
|
|
erase();
|
|
bkgd(screen_attr|ACS_CKBOARD);
|
|
wnoutrefresh(stdscr);
|
|
}
|
|
|
|
void dialog_clear(void)
|
|
{
|
|
dialog_clear_norefresh();
|
|
doupdate();
|
|
}
|
|
|
|
void dialog_update(void)
|
|
{
|
|
refresh();
|
|
}
|
|
|
|
void end_dialog(void)
|
|
{
|
|
endwin();
|
|
}
|
|
|
|
int strwidth(const char *p)
|
|
{
|
|
int i = 0, len, incr;
|
|
const char *start, *s, *s1, *s2;
|
|
|
|
for (start = s = p; ; start = (s += incr)) {
|
|
s1 = strchr(s, '\n');
|
|
s2 = strstr(s, "\\n");
|
|
if (s2 == NULL)
|
|
s = s1;
|
|
else if (s1 == NULL)
|
|
s = s2;
|
|
else
|
|
s = MIN(s1, s2);
|
|
if (s == NULL)
|
|
break;
|
|
incr = 1 + (s == s2);
|
|
len = s - start;
|
|
if (len > i)
|
|
i = len;
|
|
}
|
|
len = strlen(start);
|
|
if (len > i)
|
|
i = len;
|
|
return i;
|
|
}
|
|
|
|
int strheight(const char *p)
|
|
{
|
|
int i = 1, incr;
|
|
const char *s, *s1, *s2;
|
|
|
|
for (s = p; ; s += incr) {
|
|
s1 = strchr(s, '\n');
|
|
s2 = strstr(s, "\\n");
|
|
if (s2 == NULL)
|
|
s = s1;
|
|
else if (s1 == NULL)
|
|
s = s2;
|
|
else
|
|
s = MIN(s1, s2);
|
|
if (s == NULL)
|
|
break;
|
|
incr = 1 + (s == s2);
|
|
i++;
|
|
}
|
|
return i;
|
|
}
|
|
|