diff options
Diffstat (limited to 'gnu/lib/libodialog/kernel.c')
| -rw-r--r-- | gnu/lib/libodialog/kernel.c | 536 |
1 files changed, 0 insertions, 536 deletions
diff --git a/gnu/lib/libodialog/kernel.c b/gnu/lib/libodialog/kernel.c deleted file mode 100644 index 9ed5eac..0000000 --- a/gnu/lib/libodialog/kernel.c +++ /dev/null @@ -1,536 +0,0 @@ -/* - * 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. - */ - -#include <sys/cdefs.h> -__FBSDID("$FreeBSD$"); - -#define __DIALOG_MAIN__ - -#include <dialog.h> -#include <err.h> -#include "dialog.priv.h" -#ifdef HAVE_NCURSES -#include "colors.h" -#endif - -/* These are two "secret" globals that can be fiddled to make a dialog - * come up someplace other than a "centered" calculation for X,Y - */ -int DialogX, DialogY; - -/* This "secret" global allows you to change the behavior of an input field */ -int DialogInputAttrs; - -/* - * Do some initialization for dialog - */ -void init_dialog(void) -{ - - if (issetugid()) { - errx(1, "libdialog is unsafe to use in setugid applications"); - } - -#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(); - DialogX = DialogY = 0; -} -/* 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 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); - - strncpy(tempstr, prompt, MAX_LEN); - tempstr[MAX_LEN] = '\0'; - 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 { - char *p = tempstr; - - /* Print prompt word by word, wrap around if necessary */ - while ((word = strsep(&p, "\t\n ")) != NULL) { - int loop; - unsigned char sc; - - if (*word == '\0') - continue; - 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, selected ? "[" : " "); - temp = strspn(label, " "); - label += temp; - 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_active_attr : button_inactive_attr); - waddstr(win, label+1); - waddstr(win, selected ? "]" : " "); - 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; - chtype attrs; - - if (has_colors()) { /* Whether terminal supports color? */ - getbegyx(win,sy,sx); - attrs = getattrs(win); - if (y+height < getmaxy(win)) { - /* small touch */ - wattrset(win, A_INVIS); - wmove(win, y + height, x + 2); - for (i = 0; i < width; i++) - if (i+x+2 < getmaxx(win)) - waddch(win, ' '); - /* end touch */ - wattrset(win, shadow_attr); - wmove(win, y + height, x + 2); - for (i = 0; i < width; i++) - if (i+x+2 < getmaxx(win)) - waddch(win, mvwinch(newscr, sy+y+height, sx+x+2+i) & A_CHARTEXT); - } - if (x+width < getmaxx(win)) { - for (i = y + 1; i < y + height + 1; i++) { - if (i < getmaxy(win)) { - /* small touch */ - wattrset(win, A_INVIS); - wmove(win, i, x + width); - waddch(win, ' '); - if (x+width+1 < getmaxx(win)) - waddch(win, ' '); - /* end touch */ - wattrset(win, shadow_attr); - wmove(win, i, x + width); - waddch(win, mvwinch(newscr, sy+i, sx+x+width) & A_CHARTEXT); - if (x+width+1 < getmaxx(win)) - waddch(win, mvwinch(newscr, sy+i, sx+x+width+1) & A_CHARTEXT); - } - } - } - wattrset(win, attrs); - wnoutrefresh(win); - } -} -/* End of draw_shadow() */ -#endif - -void dialog_clear_norefresh(void) -{ - attr_clear(stdscr, LINES, COLS, screen_attr); - touchwin(stdscr); - 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; -} - -void print_arrows(WINDOW *dialog, int scroll, int menu_height, int item_no, - int box_x, int box_y, int tag_x, int cur_x, int cur_y) -{ - wmove(dialog, box_y, box_x + tag_x + 1); - wattrset(dialog, scroll ? uarrow_attr : menubox_attr); - waddch(dialog, scroll ? ACS_UARROW : ACS_HLINE); - wmove(dialog, box_y, box_x + tag_x + 2); - waddch(dialog, scroll ? '(' : ACS_HLINE); - wmove(dialog, box_y, box_x + tag_x + 3); - waddch(dialog, scroll ? '-' : ACS_HLINE); - wmove(dialog, box_y, box_x + tag_x + 4); - waddch(dialog, scroll ? ')' : ACS_HLINE); - wmove(dialog, box_y + menu_height + 1, box_x + tag_x + 1); - wattrset(dialog, scroll+menu_height < item_no ? darrow_attr : menubox_border_attr); - waddch(dialog, scroll+menu_height < item_no ? ACS_DARROW : ACS_HLINE); - wmove(dialog, box_y + menu_height + 1, box_x + tag_x + 2); - waddch(dialog, scroll+menu_height < item_no ? '(' : ACS_HLINE); - wmove(dialog, box_y + menu_height + 1, box_x + tag_x + 3); - waddch(dialog, scroll+menu_height < item_no ? '+' : ACS_HLINE); - wmove(dialog, box_y + menu_height + 1, box_x + tag_x + 4); - waddch(dialog, scroll+menu_height < item_no ? ')' : ACS_HLINE); - wmove(dialog, cur_y, cur_x); /* Restore cursor position */ -} - |
