1/*
2 *  $Id: mixedgauge.c,v 1.24 2011/06/27 08:16:38 tom Exp $
3 *
4 *  mixedgauge.c -- implements the mixedgauge dialog
5 *
6 *  Copyright 2007-2010,2011	Thomas E. Dickey
7 *
8 *  This program is free software; you can redistribute it and/or modify
9 *  it under the terms of the GNU Lesser General Public License, version 2.1
10 *  as published by the Free Software Foundation.
11 *
12 *  This program is distributed in the hope that it will be useful, but
13 *  WITHOUT ANY WARRANTY; without even the implied warranty of
14 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15 *  Lesser General Public License for more details.
16 *
17 *  You should have received a copy of the GNU Lesser General Public
18 *  License along with this program; if not, write to
19 *	Free Software Foundation, Inc.
20 *	51 Franklin St., Fifth Floor
21 *	Boston, MA 02110, USA.
22 *
23 *  This is inspired by a patch from Kiran Cherupally
24 *  (but different interface design).
25 */
26
27#include <dialog.h>
28
29#define LLEN(n) ((n) * MIXEDGAUGE_TAGS)
30#define ItemData(i)    &items[LLEN(i)]
31#define ItemName(i)    items[LLEN(i)]
32#define ItemText(i)    items[LLEN(i) + 1]
33
34#define MIN_HIGH (4)
35#define MIN_WIDE (10 + 2 * (2 + MARGIN))
36
37typedef struct {
38    WINDOW *dialog;
39    WINDOW *caption;
40    const char *title;
41    char *prompt;
42    int height, old_height, min_height;
43    int width, old_width, min_width;
44    int len_name, len_text;
45    int item_no;
46    DIALOG_LISTITEM *list;
47} DIALOG_MIXEDGAUGE;
48
49static const char *
50status_string(char *given, char **freeMe)
51{
52    const char *result;
53
54    *freeMe = 0;
55    if (isdigit(UCH(*given))) {
56	switch (*given) {
57	case '0':
58	    result = _("Succeeded");
59	    break;
60	case '1':
61	    result = _("Failed");
62	    break;
63	case '2':
64	    result = _("Passed");
65	    break;
66	case '3':
67	    result = _("Completed");
68	    break;
69	case '4':
70	    result = _("Checked");
71	    break;
72	case '5':
73	    result = _("Done");
74	    break;
75	case '6':
76	    result = _("Skipped");
77	    break;
78	case '7':
79	    result = _("In Progress");
80	    break;
81	case '8':
82	    result = "";
83	    break;
84	case '9':
85	    result = _("N/A");
86	    break;
87	default:
88	    result = "?";
89	    break;
90	}
91    } else if (*given == '-') {
92	size_t need = strlen(++given);
93	char *temp = dlg_malloc(char, need);
94	*freeMe = temp;
95	sprintf(temp, "%3s%%", given);
96	result = temp;
97    } else if (!isspace(UCH(*given))) {
98	result = given;
99    } else {
100	result = 0;
101    }
102    return result;
103}
104
105/* This function displays status messages */
106static void
107myprint_status(DIALOG_MIXEDGAUGE * dlg)
108{
109    WINDOW *win = dlg->dialog;
110    int limit_y = dlg->height;
111    int limit_x = dlg->width;
112
113    int y = MARGIN;
114    int item;
115    int cells = dlg->len_text - 2;
116    int rm = limit_x;		/* right margin */
117    int lm = limit_x - dlg->len_text - 1;
118    int bm = limit_y;		/* bottom margin */
119    int last_y = 0, last_x = 0;
120    int j, xxx;
121    float percent;
122    const char *status = "";
123    char *freeMe = 0;
124
125    if (win) {
126	rm -= (2 * MARGIN);
127	bm -= (2 * MARGIN);
128    }
129    if (win != 0)
130	getyx(win, last_y, last_x);
131    for (item = 0; item < dlg->item_no; ++item) {
132	chtype attr = A_NORMAL;
133
134	y = item + MARGIN + 1;
135	if (y > bm)
136	    break;
137
138	status = status_string(dlg->list[item].text, &freeMe);
139	if (status == 0 || *status == 0)
140	    continue;
141
142	(void) wmove(win, y, 2 * MARGIN);
143	dlg_print_text(win, dlg->list[item].name, lm, &attr);
144
145	(void) wmove(win, y, lm);
146	(void) waddch(win, '[');
147	(void) wmove(win, y, lm + (cells - (int) strlen(status)) / 2);
148	if (freeMe) {
149	    (void) wmove(win, y, lm + 1);
150	    wattrset(win, title_attr);
151	    for (j = 0; j < cells; j++)
152		(void) waddch(win, ' ');
153
154	    (void) wmove(win, y, lm + (cells - (int) strlen(status)) / 2);
155	    (void) waddstr(win, status);
156
157	    if ((title_attr & A_REVERSE) != 0) {
158		wattroff(win, A_REVERSE);
159	    } else {
160		wattrset(win, A_REVERSE);
161	    }
162	    (void) wmove(win, y, lm + 1);
163
164	    if (sscanf(status, "%f%%", &percent) != 1)
165		percent = 0.0;
166	    xxx = (int) ((cells * (percent + 0.5)) / 100.0);
167	    for (j = 0; j < xxx; j++) {
168		chtype ch1 = winch(win);
169		if (title_attr & A_REVERSE) {
170		    ch1 &= ~A_REVERSE;
171		}
172		(void) waddch(win, ch1);
173	    }
174	    free(freeMe);
175
176	} else {
177	    (void) wmove(win, y, lm + (cells - (int) strlen(status)) / 2);
178	    (void) waddstr(win, status);
179	}
180	(void) wmove(win, y, limit_x - 3);
181	(void) waddch(win, ']');
182	(void) wnoutrefresh(win);
183    }
184}
185
186static void
187mydraw_mixed_box(WINDOW *win, int y, int x, int height, int width,
188		 chtype boxchar, chtype borderchar)
189{
190    dlg_draw_box(win, y, x, height, width, boxchar, borderchar);
191    {
192	chtype attr = A_NORMAL;
193	const char *message = _("Overall Progress");
194	chtype save2 = dlg_get_attrs(win);
195	wattrset(win, title_attr);
196	(void) wmove(win, y, x + 2);
197	dlg_print_text(win, message, width, &attr);
198	wattrset(win, save2);
199    }
200}
201
202static char *
203clean_copy(const char *string)
204{
205    char *result = dlg_strclone(string);
206
207    dlg_trim_string(result);
208    dlg_tab_correct_str(result);
209    return result;
210}
211
212/*
213 * Update mixed-gauge dialog (may be from pipe, may be via direct calls).
214 */
215static void
216dlg_update_mixedgauge(DIALOG_MIXEDGAUGE * dlg, int percent)
217{
218    int i, x;
219
220    /*
221     * Clear the area for the progress bar by filling it with spaces
222     * in the title-attribute, and write the percentage with that
223     * attribute.
224     */
225    (void) wmove(dlg->dialog, dlg->height - 3, 4);
226    wattrset(dlg->dialog, gauge_attr);
227
228    for (i = 0; i < (dlg->width - 2 * (3 + MARGIN)); i++)
229	(void) waddch(dlg->dialog, ' ');
230
231    (void) wmove(dlg->dialog, dlg->height - 3, (dlg->width / 2) - 2);
232    (void) wprintw(dlg->dialog, "%3d%%", percent);
233
234    /*
235     * Now draw a bar in reverse, relative to the background.
236     * The window attribute was useful for painting the background,
237     * but requires some tweaks to reverse it.
238     */
239    x = (percent * (dlg->width - 2 * (3 + MARGIN))) / 100;
240    if ((title_attr & A_REVERSE) != 0) {
241	wattroff(dlg->dialog, A_REVERSE);
242    } else {
243	wattrset(dlg->dialog, A_REVERSE);
244    }
245    (void) wmove(dlg->dialog, dlg->height - 3, 4);
246    for (i = 0; i < x; i++) {
247	chtype ch = winch(dlg->dialog);
248	if (title_attr & A_REVERSE) {
249	    ch &= ~A_REVERSE;
250	}
251	(void) waddch(dlg->dialog, ch);
252    }
253    myprint_status(dlg);
254}
255
256/*
257 * Setup dialog.
258 */
259static void
260dlg_begin_mixedgauge(DIALOG_MIXEDGAUGE * dlg,
261		     int *began,
262		     const char *aTitle,
263		     const char *aPrompt,
264		     int aHeight,
265		     int aWidth,
266		     int aItemNo,
267		     char **items)
268{
269    int n, y, x;
270
271    if (!*began) {
272	curs_set(0);
273
274	memset(dlg, 0, sizeof(*dlg));
275	dlg->title = aTitle;
276	dlg->prompt = clean_copy(aPrompt);
277	dlg->height = dlg->old_height = aHeight;
278	dlg->width = dlg->old_width = aWidth;
279	dlg->item_no = aItemNo;
280
281	dlg->list = dlg_calloc(DIALOG_LISTITEM, (size_t) aItemNo);
282	assert_ptr(dlg->list, "dialog_mixedgauge");
283
284	dlg->len_name = 0;
285	dlg->len_text = 15;
286
287	for (n = 0; n < aItemNo; ++n) {
288	    int thisWidth = (int) strlen(ItemName(n));
289	    if (dlg->len_name < thisWidth)
290		dlg->len_name = thisWidth;
291	    dlg->list[n].name = ItemName(n);
292	    dlg->list[n].text = ItemText(n);
293	}
294
295	dlg->min_height = MIN_HIGH + aItemNo;
296	dlg->min_width = MIN_WIDE + dlg->len_name + GUTTER + dlg->len_text;
297
298	if (dlg->prompt != 0 && *(dlg->prompt) != 0)
299	    dlg->min_height += (2 * MARGIN);
300#ifdef KEY_RESIZE
301	nodelay(stdscr, TRUE);
302#endif
303    }
304#ifdef KEY_RESIZE
305    else {
306	dlg_del_window(dlg->dialog);
307	dlg->height = dlg->old_height;
308	dlg->width = dlg->old_width;
309    }
310#endif
311
312    dlg_auto_size(dlg->title, dlg->prompt,
313		  &(dlg->height),
314		  &(dlg->width),
315		  dlg->min_height,
316		  dlg->min_width);
317    dlg_print_size(dlg->height, dlg->width);
318    dlg_ctl_size(dlg->height, dlg->width);
319
320    /* center dialog box on screen */
321    x = dlg_box_x_ordinate(dlg->width);
322    y = dlg_box_y_ordinate(dlg->height);
323
324    dlg->dialog = dlg_new_window(dlg->height, dlg->width, y, x);
325
326    (void) werase(dlg->dialog);
327    dlg_draw_box(dlg->dialog,
328		 0, 0,
329		 dlg->height,
330		 dlg->width,
331		 dialog_attr, border_attr);
332
333    dlg_draw_title(dlg->dialog, dlg->title);
334    dlg_draw_helpline(dlg->dialog, FALSE);
335
336    if ((dlg->prompt != 0 && *(dlg->prompt) != 0)
337	&& wmove(dlg->dialog, dlg->item_no, 0) != ERR) {
338	dlg->caption = dlg_sub_window(dlg->dialog,
339				      dlg->height - dlg->item_no - (2 * MARGIN),
340				      dlg->width,
341				      y + dlg->item_no + (2 * MARGIN),
342				      x);
343	wattrset(dlg->caption, dialog_attr);
344	dlg_print_autowrap(dlg->caption, dlg->prompt, dlg->height, dlg->width);
345    }
346
347    mydraw_mixed_box(dlg->dialog,
348		     dlg->height - 4,
349		     2 + MARGIN,
350		     2 + MARGIN,
351		     dlg->width - 2 * (2 + MARGIN),
352		     dialog_attr,
353		     border_attr);
354
355    *began += 1;
356}
357
358/*
359 * Discard the mixed-gauge dialog.
360 */
361static int
362dlg_finish_mixedgauge(DIALOG_MIXEDGAUGE * dlg, int status)
363{
364    (void) wrefresh(dlg->dialog);
365#ifdef KEY_RESIZE
366    nodelay(stdscr, FALSE);
367#endif
368    curs_set(1);
369    dlg_del_window(dlg->dialog);
370    return status;
371}
372
373/*
374 * Setup dialog, read mixed-gauge data from pipe.
375 */
376int
377dialog_mixedgauge(const char *title,
378		  const char *cprompt,
379		  int height,
380		  int width,
381		  int percent,
382		  int item_no,
383		  char **items)
384{
385    DIALOG_MIXEDGAUGE dlg;
386    int began = 0;
387
388    dlg_begin_mixedgauge(&dlg, &began, title, cprompt, height,
389			 width, item_no, items);
390
391    dlg_update_mixedgauge(&dlg, percent);
392
393    return dlg_finish_mixedgauge(&dlg, DLG_EXIT_OK);
394}
395