1 /*
2  *  checklist.c -- implements the checklist box
3  *
4  *  ORIGINAL AUTHOR: Savio Lam (lam836@cs.cuhk.hk)
5  *     Stuart Herbert - S.Herbert@sheffield.ac.uk: radiolist extension
6  *     Alessandro Rubini - rubini@ipvvis.unipv.it: merged the two
7  *  MODIFIED FOR LINUX KERNEL CONFIG BY: William Roadcap (roadcap@cfw.com)
8  *
9  *  This program is free software; you can redistribute it and/or
10  *  modify it under the terms of the GNU General Public License
11  *  as published by the Free Software Foundation; either version 2
12  *  of the License, or (at your option) any later version.
13  *
14  *  This program is distributed in the hope that it will be useful,
15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *  GNU General Public License for more details.
18  *
19  *  You should have received a copy of the GNU General Public License
20  *  along with this program; if not, write to the Free Software
21  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  */
23 
24 #include "dialog.h"
25 
26 static int list_width, check_x, item_x;
27 
28 /*
29  * Print list item
30  */
31 static void print_item(WINDOW * win, int choice, int selected)
32 {
33 	int i;
34 
35 	/* Clear 'residue' of last item */
36 	wattrset(win, dlg.menubox.atr);
37 	wmove(win, choice, 0);
38 	for (i = 0; i < list_width; i++)
39 		waddch(win, ' ');
40 
41 	wmove(win, choice, check_x);
42 	wattrset(win, selected ? dlg.check_selected.atr
43 		 : dlg.check.atr);
44 	if (!item_is_tag(':'))
45 		wprintw(win, "(%c)", item_is_tag('X') ? 'X' : ' ');
46 
47 	wattrset(win, selected ? dlg.tag_selected.atr : dlg.tag.atr);
48 	mvwaddch(win, choice, item_x, item_str()[0]);
49 	wattrset(win, selected ? dlg.item_selected.atr : dlg.item.atr);
50 	waddstr(win, (char *)item_str() + 1);
51 	if (selected) {
52 		wmove(win, choice, check_x + 1);
53 		wrefresh(win);
54 	}
55 }
56 
57 /*
58  * Print the scroll indicators.
59  */
60 static void print_arrows(WINDOW * win, int choice, int item_no, int scroll,
61 	     int y, int x, int height)
62 {
63 	wmove(win, y, x);
64 
65 	if (scroll > 0) {
66 		wattrset(win, dlg.uarrow.atr);
67 		waddch(win, ACS_UARROW);
68 		waddstr(win, "(-)");
69 	} else {
70 		wattrset(win, dlg.menubox.atr);
71 		waddch(win, ACS_HLINE);
72 		waddch(win, ACS_HLINE);
73 		waddch(win, ACS_HLINE);
74 		waddch(win, ACS_HLINE);
75 	}
76 
77 	y = y + height + 1;
78 	wmove(win, y, x);
79 
80 	if ((height < item_no) && (scroll + choice < item_no - 1)) {
81 		wattrset(win, dlg.darrow.atr);
82 		waddch(win, ACS_DARROW);
83 		waddstr(win, "(+)");
84 	} else {
85 		wattrset(win, dlg.menubox_border.atr);
86 		waddch(win, ACS_HLINE);
87 		waddch(win, ACS_HLINE);
88 		waddch(win, ACS_HLINE);
89 		waddch(win, ACS_HLINE);
90 	}
91 }
92 
93 /*
94  *  Display the termination buttons
95  */
96 static void print_buttons(WINDOW * dialog, int height, int width, int selected)
97 {
98 	int x = width / 2 - 11;
99 	int y = height - 2;
100 
101 	print_button(dialog, gettext("Select"), y, x, selected == 0);
102 	print_button(dialog, gettext(" Help "), y, x + 14, selected == 1);
103 
104 	wmove(dialog, y, x + 1 + 14 * selected);
105 	wrefresh(dialog);
106 }
107 
108 /*
109  * Display a dialog box with a list of options that can be turned on or off
110  * in the style of radiolist (only one option turned on at a time).
111  */
112 int dialog_checklist(const char *title, const char *prompt, int height,
113 		     int width, int list_height)
114 {
115 	int i, x, y, box_x, box_y;
116 	int key = 0, button = 0, choice = 0, scroll = 0, max_choice;
117 	WINDOW *dialog, *list;
118 
119 	/* which item to highlight */
120 	item_foreach() {
121 		if (item_is_tag('X'))
122 			choice = item_n();
123 		if (item_is_selected()) {
124 			choice = item_n();
125 			break;
126 		}
127 	}
128 
129 do_resize:
130 	if (getmaxy(stdscr) < (height + 6))
131 		return -ERRDISPLAYTOOSMALL;
132 	if (getmaxx(stdscr) < (width + 6))
133 		return -ERRDISPLAYTOOSMALL;
134 
135 	max_choice = MIN(list_height, item_count());
136 
137 	/* center dialog box on screen */
138 	x = (COLS - width) / 2;
139 	y = (LINES - height) / 2;
140 
141 	draw_shadow(stdscr, y, x, height, width);
142 
143 	dialog = newwin(height, width, y, x);
144 	keypad(dialog, TRUE);
145 
146 	draw_box(dialog, 0, 0, height, width,
147 		 dlg.dialog.atr, dlg.border.atr);
148 	wattrset(dialog, dlg.border.atr);
149 	mvwaddch(dialog, height - 3, 0, ACS_LTEE);
150 	for (i = 0; i < width - 2; i++)
151 		waddch(dialog, ACS_HLINE);
152 	wattrset(dialog, dlg.dialog.atr);
153 	waddch(dialog, ACS_RTEE);
154 
155 	print_title(dialog, title, width);
156 
157 	wattrset(dialog, dlg.dialog.atr);
158 	print_autowrap(dialog, prompt, width - 2, 1, 3);
159 
160 	list_width = width - 6;
161 	box_y = height - list_height - 5;
162 	box_x = (width - list_width) / 2 - 1;
163 
164 	/* create new window for the list */
165 	list = subwin(dialog, list_height, list_width, y + box_y + 1,
166 	              x + box_x + 1);
167 
168 	keypad(list, TRUE);
169 
170 	/* draw a box around the list items */
171 	draw_box(dialog, box_y, box_x, list_height + 2, list_width + 2,
172 	         dlg.menubox_border.atr, dlg.menubox.atr);
173 
174 	/* Find length of longest item in order to center checklist */
175 	check_x = 0;
176 	item_foreach()
177 		check_x = MAX(check_x, strlen(item_str()) + 4);
178 
179 	check_x = (list_width - check_x) / 2;
180 	item_x = check_x + 4;
181 
182 	if (choice >= list_height) {
183 		scroll = choice - list_height + 1;
184 		choice -= scroll;
185 	}
186 
187 	/* Print the list */
188 	for (i = 0; i < max_choice; i++) {
189 		item_set(scroll + i);
190 		print_item(list, i, i == choice);
191 	}
192 
193 	print_arrows(dialog, choice, item_count(), scroll,
194 		     box_y, box_x + check_x + 5, list_height);
195 
196 	print_buttons(dialog, height, width, 0);
197 
198 	wnoutrefresh(dialog);
199 	wnoutrefresh(list);
200 	doupdate();
201 
202 	while (key != KEY_ESC) {
203 		key = wgetch(dialog);
204 
205 		for (i = 0; i < max_choice; i++) {
206 			item_set(i + scroll);
207 			if (toupper(key) == toupper(item_str()[0]))
208 				break;
209 		}
210 
211 		if (i < max_choice || key == KEY_UP || key == KEY_DOWN ||
212 		    key == '+' || key == '-') {
213 			if (key == KEY_UP || key == '-') {
214 				if (!choice) {
215 					if (!scroll)
216 						continue;
217 					/* Scroll list down */
218 					if (list_height > 1) {
219 						/* De-highlight current first item */
220 						item_set(scroll);
221 						print_item(list, 0, FALSE);
222 						scrollok(list, TRUE);
223 						wscrl(list, -1);
224 						scrollok(list, FALSE);
225 					}
226 					scroll--;
227 					item_set(scroll);
228 					print_item(list, 0, TRUE);
229 					print_arrows(dialog, choice, item_count(),
230 						     scroll, box_y, box_x + check_x + 5, list_height);
231 
232 					wnoutrefresh(dialog);
233 					wrefresh(list);
234 
235 					continue;	/* wait for another key press */
236 				} else
237 					i = choice - 1;
238 			} else if (key == KEY_DOWN || key == '+') {
239 				if (choice == max_choice - 1) {
240 					if (scroll + choice >= item_count() - 1)
241 						continue;
242 					/* Scroll list up */
243 					if (list_height > 1) {
244 						/* De-highlight current last item before scrolling up */
245 						item_set(scroll + max_choice - 1);
246 						print_item(list,
247 							    max_choice - 1,
248 							    FALSE);
249 						scrollok(list, TRUE);
250 						wscrl(list, 1);
251 						scrollok(list, FALSE);
252 					}
253 					scroll++;
254 					item_set(scroll + max_choice - 1);
255 					print_item(list, max_choice - 1, TRUE);
256 
257 					print_arrows(dialog, choice, item_count(),
258 						     scroll, box_y, box_x + check_x + 5, list_height);
259 
260 					wnoutrefresh(dialog);
261 					wrefresh(list);
262 
263 					continue;	/* wait for another key press */
264 				} else
265 					i = choice + 1;
266 			}
267 			if (i != choice) {
268 				/* De-highlight current item */
269 				item_set(scroll + choice);
270 				print_item(list, choice, FALSE);
271 				/* Highlight new item */
272 				choice = i;
273 				item_set(scroll + choice);
274 				print_item(list, choice, TRUE);
275 				wnoutrefresh(dialog);
276 				wrefresh(list);
277 			}
278 			continue;	/* wait for another key press */
279 		}
280 		switch (key) {
281 		case 'H':
282 		case 'h':
283 		case '?':
284 			button = 1;
285 			/* fall-through */
286 		case 'S':
287 		case 's':
288 		case ' ':
289 		case '\n':
290 			item_foreach()
291 				item_set_selected(0);
292 			item_set(scroll + choice);
293 			item_set_selected(1);
294 			delwin(list);
295 			delwin(dialog);
296 			return button;
297 		case TAB:
298 		case KEY_LEFT:
299 		case KEY_RIGHT:
300 			button = ((key == KEY_LEFT ? --button : ++button) < 0)
301 			    ? 1 : (button > 1 ? 0 : button);
302 
303 			print_buttons(dialog, height, width, button);
304 			wrefresh(dialog);
305 			break;
306 		case 'X':
307 		case 'x':
308 			key = KEY_ESC;
309 			break;
310 		case KEY_ESC:
311 			key = on_key_esc(dialog);
312 			break;
313 		case KEY_RESIZE:
314 			delwin(list);
315 			delwin(dialog);
316 			on_key_resize();
317 			goto do_resize;
318 		}
319 
320 		/* Now, update everything... */
321 		doupdate();
322 	}
323 	delwin(list);
324 	delwin(dialog);
325 	return key;		/* ESC pressed */
326 }
327