1 /*
2  *  textbox.c -- implements the text box
3  *
4  *  ORIGINAL AUTHOR: Savio Lam ([email protected])
5  *  MODIFIED FOR LINUX KERNEL CONFIG BY: William Roadcap ([email protected])
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 static void back_lines(int n);
25 static void print_page(WINDOW * win, int height, int width);
26 static void print_line(WINDOW * win, int row, int width);
27 static char *get_line(void);
28 static void print_position(WINDOW * win);
29 
30 static int hscroll;
31 static int begin_reached, end_reached, page_length;
32 static const char *buf;
33 static const char *page;
34 
35 /*
36  * refresh window content
37  */
38 static void refresh_text_box(WINDOW *dialog, WINDOW *box, int boxh, int boxw,
39 							  int cur_y, int cur_x)
40 {
41 	print_page(box, boxh, boxw);
42 	print_position(dialog);
43 	wmove(dialog, cur_y, cur_x);	/* Restore cursor position */
44 	wrefresh(dialog);
45 }
46 
47 
48 /*
49  * Display text from a file in a dialog box.
50  *
51  * keys is a null-terminated array
52  */
53 int dialog_textbox(const char *title, const char *tbuf, int initial_height,
54 		   int initial_width, int *keys, int *_vscroll, int *_hscroll)
55 {
56 	int i, x, y, cur_x, cur_y, key = 0;
57 	int height, width, boxh, boxw;
58 	WINDOW *dialog, *box;
59 	bool done = false;
60 
61 	begin_reached = 1;
62 	end_reached = 0;
63 	page_length = 0;
64 	hscroll = 0;
65 	buf = tbuf;
66 	page = buf;	/* page is pointer to start of page to be displayed */
67 
68 	if (_vscroll && *_vscroll) {
69 		begin_reached = 0;
70 
71 		for (i = 0; i < *_vscroll; i++)
72 			get_line();
73 	}
74 	if (_hscroll)
75 		hscroll = *_hscroll;
76 
77 do_resize:
78 	getmaxyx(stdscr, height, width);
79 	if (height < 8 || width < 8)
80 		return -ERRDISPLAYTOOSMALL;
81 	if (initial_height != 0)
82 		height = initial_height;
83 	else
84 		if (height > 4)
85 			height -= 4;
86 		else
87 			height = 0;
88 	if (initial_width != 0)
89 		width = initial_width;
90 	else
91 		if (width > 5)
92 			width -= 5;
93 		else
94 			width = 0;
95 
96 	/* center dialog box on screen */
97 	x = (COLS - width) / 2;
98 	y = (LINES - height) / 2;
99 
100 	draw_shadow(stdscr, y, x, height, width);
101 
102 	dialog = newwin(height, width, y, x);
103 	keypad(dialog, TRUE);
104 
105 	/* Create window for box region, used for scrolling text */
106 	boxh = height - 4;
107 	boxw = width - 2;
108 	box = subwin(dialog, boxh, boxw, y + 1, x + 1);
109 	wattrset(box, dlg.dialog.atr);
110 	wbkgdset(box, dlg.dialog.atr & A_COLOR);
111 
112 	keypad(box, TRUE);
113 
114 	/* register the new window, along with its borders */
115 	draw_box(dialog, 0, 0, height, width,
116 		 dlg.dialog.atr, dlg.border.atr);
117 
118 	wattrset(dialog, dlg.border.atr);
119 	mvwaddch(dialog, height - 3, 0, ACS_LTEE);
120 	for (i = 0; i < width - 2; i++)
121 		waddch(dialog, ACS_HLINE);
122 	wattrset(dialog, dlg.dialog.atr);
123 	wbkgdset(dialog, dlg.dialog.atr & A_COLOR);
124 	waddch(dialog, ACS_RTEE);
125 
126 	print_title(dialog, title, width);
127 
128 	print_button(dialog, gettext(" Exit "), height - 2, width / 2 - 4, TRUE);
129 	wnoutrefresh(dialog);
130 	getyx(dialog, cur_y, cur_x);	/* Save cursor position */
131 
132 	/* Print first page of text */
133 	attr_clear(box, boxh, boxw, dlg.dialog.atr);
134 	refresh_text_box(dialog, box, boxh, boxw, cur_y, cur_x);
135 
136 	while (!done) {
137 		key = wgetch(dialog);
138 		switch (key) {
139 		case 'E':	/* Exit */
140 		case 'e':
141 		case 'X':
142 		case 'x':
143 		case 'q':
144 		case '\n':
145 			done = true;
146 			break;
147 		case 'g':	/* First page */
148 		case KEY_HOME:
149 			if (!begin_reached) {
150 				begin_reached = 1;
151 				page = buf;
152 				refresh_text_box(dialog, box, boxh, boxw,
153 						 cur_y, cur_x);
154 			}
155 			break;
156 		case 'G':	/* Last page */
157 		case KEY_END:
158 
159 			end_reached = 1;
160 			/* point to last char in buf */
161 			page = buf + strlen(buf);
162 			back_lines(boxh);
163 			refresh_text_box(dialog, box, boxh, boxw,
164 					 cur_y, cur_x);
165 			break;
166 		case 'K':	/* Previous line */
167 		case 'k':
168 		case KEY_UP:
169 			if (begin_reached)
170 				break;
171 
172 			back_lines(page_length + 1);
173 			refresh_text_box(dialog, box, boxh, boxw, cur_y,
174 					 cur_x);
175 			break;
176 		case 'B':	/* Previous page */
177 		case 'b':
178 		case 'u':
179 		case KEY_PPAGE:
180 			if (begin_reached)
181 				break;
182 			back_lines(page_length + boxh);
183 			refresh_text_box(dialog, box, boxh, boxw,
184 					 cur_y, cur_x);
185 			break;
186 		case 'J':	/* Next line */
187 		case 'j':
188 		case KEY_DOWN:
189 			if (end_reached)
190 				break;
191 
192 			back_lines(page_length - 1);
193 			refresh_text_box(dialog, box, boxh, boxw, cur_y,
194 					 cur_x);
195 			break;
196 		case KEY_NPAGE:	/* Next page */
197 		case ' ':
198 		case 'd':
199 			if (end_reached)
200 				break;
201 
202 			begin_reached = 0;
203 			refresh_text_box(dialog, box, boxh, boxw,
204 					 cur_y, cur_x);
205 			break;
206 		case '0':	/* Beginning of line */
207 		case 'H':	/* Scroll left */
208 		case 'h':
209 		case KEY_LEFT:
210 			if (hscroll <= 0)
211 				break;
212 
213 			if (key == '0')
214 				hscroll = 0;
215 			else
216 				hscroll--;
217 			/* Reprint current page to scroll horizontally */
218 			back_lines(page_length);
219 			refresh_text_box(dialog, box, boxh, boxw,
220 					 cur_y, cur_x);
221 			break;
222 		case 'L':	/* Scroll right */
223 		case 'l':
224 		case KEY_RIGHT:
225 			if (hscroll >= MAX_LEN)
226 				break;
227 			hscroll++;
228 			/* Reprint current page to scroll horizontally */
229 			back_lines(page_length);
230 			refresh_text_box(dialog, box, boxh, boxw,
231 					 cur_y, cur_x);
232 			break;
233 		case KEY_ESC:
234 			if (on_key_esc(dialog) == KEY_ESC)
235 				done = true;
236 			break;
237 		case KEY_RESIZE:
238 			back_lines(height);
239 			delwin(box);
240 			delwin(dialog);
241 			on_key_resize();
242 			goto do_resize;
243 		default:
244 			for (i = 0; keys[i]; i++) {
245 				if (key == keys[i]) {
246 					done = true;
247 					break;
248 				}
249 			}
250 		}
251 	}
252 	delwin(box);
253 	delwin(dialog);
254 	if (_vscroll) {
255 		const char *s;
256 
257 		s = buf;
258 		*_vscroll = 0;
259 		back_lines(page_length);
260 		while (s < page && (s = strchr(s, '\n'))) {
261 			(*_vscroll)++;
262 			s++;
263 		}
264 	}
265 	if (_hscroll)
266 		*_hscroll = hscroll;
267 	return key;
268 }
269 
270 /*
271  * Go back 'n' lines in text. Called by dialog_textbox().
272  * 'page' will be updated to point to the desired line in 'buf'.
273  */
274 static void back_lines(int n)
275 {
276 	int i;
277 
278 	begin_reached = 0;
279 	/* Go back 'n' lines */
280 	for (i = 0; i < n; i++) {
281 		if (*page == '\0') {
282 			if (end_reached) {
283 				end_reached = 0;
284 				continue;
285 			}
286 		}
287 		if (page == buf) {
288 			begin_reached = 1;
289 			return;
290 		}
291 		page--;
292 		do {
293 			if (page == buf) {
294 				begin_reached = 1;
295 				return;
296 			}
297 			page--;
298 		} while (*page != '\n');
299 		page++;
300 	}
301 }
302 
303 /*
304  * Print a new page of text. Called by dialog_textbox().
305  */
306 static void print_page(WINDOW * win, int height, int width)
307 {
308 	int i, passed_end = 0;
309 
310 	page_length = 0;
311 	for (i = 0; i < height; i++) {
312 		print_line(win, i, width);
313 		if (!passed_end)
314 			page_length++;
315 		if (end_reached && !passed_end)
316 			passed_end = 1;
317 	}
318 	wnoutrefresh(win);
319 }
320 
321 /*
322  * Print a new line of text. Called by dialog_textbox() and print_page().
323  */
324 static void print_line(WINDOW * win, int row, int width)
325 {
326 	char *line;
327 
328 	line = get_line();
329 	line += MIN(strlen(line), hscroll);	/* Scroll horizontally */
330 	wmove(win, row, 0);	/* move cursor to correct line */
331 	waddch(win, ' ');
332 	waddnstr(win, line, MIN(strlen(line), width - 2));
333 
334 	/* Clear 'residue' of previous line */
335 #if OLD_NCURSES
336 	{
337 		int x = getcurx(win);
338 		int i;
339 		for (i = 0; i < width - x; i++)
340 			waddch(win, ' ');
341 	}
342 #else
343 	wclrtoeol(win);
344 #endif
345 }
346 
347 /*
348  * Return current line of text. Called by dialog_textbox() and print_line().
349  * 'page' should point to start of current line before calling, and will be
350  * updated to point to start of next line.
351  */
352 static char *get_line(void)
353 {
354 	int i = 0;
355 	static char line[MAX_LEN + 1];
356 
357 	end_reached = 0;
358 	while (*page != '\n') {
359 		if (*page == '\0') {
360 			end_reached = 1;
361 			break;
362 		} else if (i < MAX_LEN)
363 			line[i++] = *(page++);
364 		else {
365 			/* Truncate lines longer than MAX_LEN characters */
366 			if (i == MAX_LEN)
367 				line[i++] = '\0';
368 			page++;
369 		}
370 	}
371 	if (i <= MAX_LEN)
372 		line[i] = '\0';
373 	if (!end_reached)
374 		page++;		/* move past '\n' */
375 
376 	return line;
377 }
378 
379 /*
380  * Print current position
381  */
382 static void print_position(WINDOW * win)
383 {
384 	int percent;
385 
386 	wattrset(win, dlg.position_indicator.atr);
387 	wbkgdset(win, dlg.position_indicator.atr & A_COLOR);
388 	percent = (page - buf) * 100 / strlen(buf);
389 	wmove(win, getmaxy(win) - 3, getmaxx(win) - 9);
390 	wprintw(win, "(%3d%%)", percent);
391 }
392