1 /*
2  *  util.c
3  *
4  *  ORIGINAL AUTHOR: Savio Lam (lam836@cs.cuhk.hk)
5  *  MODIFIED FOR LINUX KERNEL CONFIG BY: William Roadcap (roadcap@cfw.com)
6  *
7  *  This program is free software; you can redistribute it and/or
8  *  modify it under the terms of the GNU General Public License
9  *  as published by the Free Software Foundation; either version 2
10  *  of the License, or (at your option) any later version.
11  *
12  *  This program is distributed in the hope that it will be useful,
13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *  GNU General Public License for more details.
16  *
17  *  You should have received a copy of the GNU General Public License
18  *  along with this program; if not, write to the Free Software
19  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20  */
21 
22 #include "dialog.h"
23 
24 
25 /* use colors by default? */
26 bool use_colors = 1;
27 
28 const char *backtitle = NULL;
29 
30 const char *dialog_result;
31 
32 /*
33  * Attribute values, default is for mono display
34  */
35 chtype attributes[] =
36 {
37     A_NORMAL,			/* screen_attr */
38     A_NORMAL,			/* shadow_attr */
39     A_NORMAL,			/* dialog_attr */
40     A_BOLD,			/* title_attr */
41     A_NORMAL,			/* border_attr */
42     A_REVERSE,			/* button_active_attr */
43     A_DIM,			/* button_inactive_attr */
44     A_REVERSE,			/* button_key_active_attr */
45     A_BOLD,			/* button_key_inactive_attr */
46     A_REVERSE,			/* button_label_active_attr */
47     A_NORMAL,			/* button_label_inactive_attr */
48     A_NORMAL,			/* inputbox_attr */
49     A_NORMAL,			/* inputbox_border_attr */
50     A_NORMAL,			/* searchbox_attr */
51     A_BOLD,			/* searchbox_title_attr */
52     A_NORMAL,			/* searchbox_border_attr */
53     A_BOLD,			/* position_indicator_attr */
54     A_NORMAL,			/* menubox_attr */
55     A_NORMAL,			/* menubox_border_attr */
56     A_NORMAL,			/* item_attr */
57     A_REVERSE,			/* item_selected_attr */
58     A_BOLD,			/* tag_attr */
59     A_REVERSE,			/* tag_selected_attr */
60     A_BOLD,			/* tag_key_attr */
61     A_REVERSE,			/* tag_key_selected_attr */
62     A_BOLD,			/* check_attr */
63     A_REVERSE,			/* check_selected_attr */
64     A_BOLD,			/* uarrow_attr */
65     A_BOLD			/* darrow_attr */
66 };
67 
68 
69 #include "colors.h"
70 
71 /*
72  * Table of color values
73  */
74 int color_table[][3] =
75 {
76     {SCREEN_FG, SCREEN_BG, SCREEN_HL},
77     {SHADOW_FG, SHADOW_BG, SHADOW_HL},
78     {DIALOG_FG, DIALOG_BG, DIALOG_HL},
79     {TITLE_FG, TITLE_BG, TITLE_HL},
80     {BORDER_FG, BORDER_BG, BORDER_HL},
81     {BUTTON_ACTIVE_FG, BUTTON_ACTIVE_BG, BUTTON_ACTIVE_HL},
82     {BUTTON_INACTIVE_FG, BUTTON_INACTIVE_BG, BUTTON_INACTIVE_HL},
83     {BUTTON_KEY_ACTIVE_FG, BUTTON_KEY_ACTIVE_BG, BUTTON_KEY_ACTIVE_HL},
84     {BUTTON_KEY_INACTIVE_FG, BUTTON_KEY_INACTIVE_BG, BUTTON_KEY_INACTIVE_HL},
85     {BUTTON_LABEL_ACTIVE_FG, BUTTON_LABEL_ACTIVE_BG, BUTTON_LABEL_ACTIVE_HL},
86     {BUTTON_LABEL_INACTIVE_FG, BUTTON_LABEL_INACTIVE_BG,
87      BUTTON_LABEL_INACTIVE_HL},
88     {INPUTBOX_FG, INPUTBOX_BG, INPUTBOX_HL},
89     {INPUTBOX_BORDER_FG, INPUTBOX_BORDER_BG, INPUTBOX_BORDER_HL},
90     {SEARCHBOX_FG, SEARCHBOX_BG, SEARCHBOX_HL},
91     {SEARCHBOX_TITLE_FG, SEARCHBOX_TITLE_BG, SEARCHBOX_TITLE_HL},
92     {SEARCHBOX_BORDER_FG, SEARCHBOX_BORDER_BG, SEARCHBOX_BORDER_HL},
93     {POSITION_INDICATOR_FG, POSITION_INDICATOR_BG, POSITION_INDICATOR_HL},
94     {MENUBOX_FG, MENUBOX_BG, MENUBOX_HL},
95     {MENUBOX_BORDER_FG, MENUBOX_BORDER_BG, MENUBOX_BORDER_HL},
96     {ITEM_FG, ITEM_BG, ITEM_HL},
97     {ITEM_SELECTED_FG, ITEM_SELECTED_BG, ITEM_SELECTED_HL},
98     {TAG_FG, TAG_BG, TAG_HL},
99     {TAG_SELECTED_FG, TAG_SELECTED_BG, TAG_SELECTED_HL},
100     {TAG_KEY_FG, TAG_KEY_BG, TAG_KEY_HL},
101     {TAG_KEY_SELECTED_FG, TAG_KEY_SELECTED_BG, TAG_KEY_SELECTED_HL},
102     {CHECK_FG, CHECK_BG, CHECK_HL},
103     {CHECK_SELECTED_FG, CHECK_SELECTED_BG, CHECK_SELECTED_HL},
104     {UARROW_FG, UARROW_BG, UARROW_HL},
105     {DARROW_FG, DARROW_BG, DARROW_HL},
106 };				/* color_table */
107 
108 /*
109  * Set window to attribute 'attr'
110  */
111 void
attr_clear(WINDOW * win,int height,int width,chtype attr)112 attr_clear (WINDOW * win, int height, int width, chtype attr)
113 {
114     int i, j;
115 
116     wattrset (win, attr);
117     for (i = 0; i < height; i++) {
118 	wmove (win, i, 0);
119 	for (j = 0; j < width; j++)
120 	    waddch (win, ' ');
121     }
122     touchwin (win);
123 }
124 
dialog_clear(void)125 void dialog_clear (void)
126 {
127     attr_clear (stdscr, LINES, COLS, screen_attr);
128     /* Display background title if it exists ... - SLH */
129     if (backtitle != NULL) {
130         int i;
131 
132         wattrset (stdscr, screen_attr);
133         mvwaddstr (stdscr, 0, 1, (char *)backtitle);
134         wmove (stdscr, 1, 1);
135         for (i = 1; i < COLS - 1; i++)
136             waddch (stdscr, ACS_HLINE);
137     }
138     wnoutrefresh (stdscr);
139 }
140 
141 /*
142  * Do some initialization for dialog
143  */
144 void
init_dialog(void)145 init_dialog (void)
146 {
147     initscr ();			/* Init curses */
148     keypad (stdscr, TRUE);
149     cbreak ();
150     noecho ();
151 
152 
153     if (use_colors)	/* Set up colors */
154 	color_setup ();
155 
156 
157     dialog_clear ();
158 }
159 
160 /*
161  * Setup for color display
162  */
163 void
color_setup(void)164 color_setup (void)
165 {
166     int i;
167 
168     if (has_colors ()) {	/* Terminal supports color? */
169 	start_color ();
170 
171 	/* Initialize color pairs */
172 	for (i = 0; i < ATTRIBUTE_COUNT; i++)
173 	    init_pair (i + 1, color_table[i][0], color_table[i][1]);
174 
175 	/* Setup color attributes */
176 	for (i = 0; i < ATTRIBUTE_COUNT; i++)
177 	    attributes[i] = C_ATTR (color_table[i][2], i + 1);
178     }
179 }
180 
181 /*
182  * End using dialog functions.
183  */
184 void
end_dialog(void)185 end_dialog (void)
186 {
187     endwin ();
188 }
189 
190 
191 /*
192  * Print a string of text in a window, automatically wrap around to the
193  * next line if the string is too long to fit on one line. Newline
194  * characters '\n' are replaced by spaces.  We start on a new line
195  * if there is no room for at least 4 nonblanks following a double-space.
196  */
197 void
print_autowrap(WINDOW * win,const char * prompt,int width,int y,int x)198 print_autowrap (WINDOW * win, const char *prompt, int width, int y, int x)
199 {
200     int newl, cur_x, cur_y;
201     int i, prompt_len, room, wlen;
202     char tempstr[MAX_LEN + 1], *word, *sp, *sp2;
203 
204     strcpy (tempstr, prompt);
205 
206     prompt_len = strlen(tempstr);
207 
208     /*
209      * Remove newlines
210      */
211     for(i=0; i<prompt_len; i++) {
212 	if(tempstr[i] == '\n') tempstr[i] = ' ';
213     }
214 
215     if (prompt_len <= width - x * 2) {	/* If prompt is short */
216 	wmove (win, y, (width - prompt_len) / 2);
217 	waddstr (win, tempstr);
218     } else {
219 	cur_x = x;
220 	cur_y = y;
221 	newl = 1;
222 	word = tempstr;
223 	while (word && *word) {
224 	    sp = index(word, ' ');
225 	    if (sp)
226 	        *sp++ = 0;
227 
228 	    /* Wrap to next line if either the word does not fit,
229 	       or it is the first word of a new sentence, and it is
230 	       short, and the next word does not fit. */
231 	    room = width - cur_x;
232 	    wlen = strlen(word);
233 	    if (wlen > room ||
234 	       (newl && wlen < 4 && sp && wlen+1+strlen(sp) > room
235 		     && (!(sp2 = index(sp, ' ')) || wlen+1+(sp2-sp) > room))) {
236 		cur_y++;
237 		cur_x = x;
238 	    }
239 	    wmove (win, cur_y, cur_x);
240 	    waddstr (win, word);
241 	    getyx (win, cur_y, cur_x);
242 	    cur_x++;
243 	    if (sp && *sp == ' ') {
244 	        cur_x++;	/* double space */
245 		while (*++sp == ' ');
246 		newl = 1;
247 	    } else
248 	        newl = 0;
249 	    word = sp;
250 	}
251     }
252 }
253 
254 /*
255  * Print a button
256  */
257 void
print_button(WINDOW * win,const char * label,int y,int x,int selected)258 print_button (WINDOW * win, const char *label, int y, int x, int selected)
259 {
260     int i, temp;
261 
262     wmove (win, y, x);
263     wattrset (win, selected ? button_active_attr : button_inactive_attr);
264     waddstr (win, "<");
265     temp = strspn (label, " ");
266     label += temp;
267     wattrset (win, selected ? button_label_active_attr
268 	      : button_label_inactive_attr);
269     for (i = 0; i < temp; i++)
270 	waddch (win, ' ');
271     wattrset (win, selected ? button_key_active_attr
272 	      : button_key_inactive_attr);
273     waddch (win, label[0]);
274     wattrset (win, selected ? button_label_active_attr
275 	      : button_label_inactive_attr);
276     waddstr (win, (char *)label + 1);
277     wattrset (win, selected ? button_active_attr : button_inactive_attr);
278     waddstr (win, ">");
279     wmove (win, y, x + temp + 1);
280 }
281 
282 /*
283  * Draw a rectangular box with line drawing characters
284  */
285 void
draw_box(WINDOW * win,int y,int x,int height,int width,chtype box,chtype border)286 draw_box (WINDOW * win, int y, int x, int height, int width,
287 	  chtype box, chtype border)
288 {
289     int i, j;
290 
291     wattrset (win, 0);
292     for (i = 0; i < height; i++) {
293 	wmove (win, y + i, x);
294 	for (j = 0; j < width; j++)
295 	    if (!i && !j)
296 		waddch (win, border | ACS_ULCORNER);
297 	    else if (i == height - 1 && !j)
298 		waddch (win, border | ACS_LLCORNER);
299 	    else if (!i && j == width - 1)
300 		waddch (win, box | ACS_URCORNER);
301 	    else if (i == height - 1 && j == width - 1)
302 		waddch (win, box | ACS_LRCORNER);
303 	    else if (!i)
304 		waddch (win, border | ACS_HLINE);
305 	    else if (i == height - 1)
306 		waddch (win, box | ACS_HLINE);
307 	    else if (!j)
308 		waddch (win, border | ACS_VLINE);
309 	    else if (j == width - 1)
310 		waddch (win, box | ACS_VLINE);
311 	    else
312 		waddch (win, box | ' ');
313     }
314 }
315 
316 /*
317  * Draw shadows along the right and bottom edge to give a more 3D look
318  * to the boxes
319  */
320 void
draw_shadow(WINDOW * win,int y,int x,int height,int width)321 draw_shadow (WINDOW * win, int y, int x, int height, int width)
322 {
323     int i;
324 
325     if (has_colors ()) {	/* Whether terminal supports color? */
326 	wattrset (win, shadow_attr);
327 	wmove (win, y + height, x + 2);
328 	for (i = 0; i < width; i++)
329 	    waddch (win, winch (win) & A_CHARTEXT);
330 	for (i = y + 1; i < y + height + 1; i++) {
331 	    wmove (win, i, x + width);
332 	    waddch (win, winch (win) & A_CHARTEXT);
333 	    waddch (win, winch (win) & A_CHARTEXT);
334 	}
335 	wnoutrefresh (win);
336     }
337 }
338 
339 /*
340  *  Return the position of the first alphabetic character in a string.
341  */
342 int
first_alpha(const char * string,const char * exempt)343 first_alpha(const char *string, const char *exempt)
344 {
345 	int i, in_paren=0, c;
346 
347 	for (i = 0; i < strlen(string); i++) {
348 		c = tolower(string[i]);
349 
350 		if (strchr("<[(", c)) ++in_paren;
351 		if (strchr(">])", c)) --in_paren;
352 
353 		if ((! in_paren) && isalpha(c) &&
354 		     strchr(exempt, c) == 0)
355 			return i;
356 	}
357 
358 	return 0;
359 }
360