contrib/dialog/progressbox.c

   1 /*
   2  *  $Id: progressbox.c,v 1.24 2014/01/12 20:53:44 tom Exp $
   3  *
   4  *  progressbox.c -- implements the progress box
   5  *
   6  *  Copyright 2005              Valery Reznic
   7  *  Copyright 2006-2012,2014    Thomas E. Dickey
   8  *
   9  *  This program is free software; you can redistribute it and/or modify
  10  *  it under the terms of the GNU Lesser General Public License as
  11  *  published by the Free Software Foundation; either version 2.1 of the
  12  *  License, or (at your option) any later version.
  13  *
  14  *  This program is distributed in the hope that it will be useful, but
  15  *  WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  *  Lesser General Public License for more details.
  18  *
  19  *  You should have received a copy of the GNU Lesser General Public
  20  *  License along with this program; if not, write to
  21  *      Free Software Foundation, Inc.
  22  *      51 Franklin St., Fifth Floor
  23  *      Boston, MA 02110, USA.
  24  */
  25
  26 #include <dialog.h>
  27 #include <dlg_keys.h>
  28
  29 #define MIN_HIGH (4)
  30 #define MIN_WIDE (10 + 2 * (2 + MARGIN))
  31
  32 typedef struct {
  33     DIALOG_CALLBACK obj;
  34     WINDOW *text;
  35     char line[MAX_LEN + 1];
  36     int is_eof;
  37 } MY_OBJ;
  38
  39 /*
  40  * Return current line of text.
  41  */
  42 static char *
  43 get_line(MY_OBJ * obj)
  44 {
  45     FILE *fp = obj->obj.input;
  46     int col = 0;
  47     int j, tmpint, ch;
  48
  49     for (;;) {
  50         if ((ch = getc(fp)) == EOF) {
  51             obj->is_eof = 1;
  52             if (col) {
  53                 break;
  54             } else {
  55                 return NULL;
  56             }
  57         }
  58         if (ch == '\n')
  59             break;
  60         if (ch == '\r')
  61             break;
  62         if (col >= MAX_LEN)
  63             continue;
  64         if ((ch == TAB) && (dialog_vars.tab_correct)) {
  65             tmpint = dialog_state.tab_len
  66                 - (col % dialog_state.tab_len);
  67             for (j = 0; j < tmpint; j++) {
  68                 if (col < MAX_LEN) {
  69                     obj->line[col] = ' ';
  70                     ++col;
  71                 } else {
  72                     break;
  73                 }
  74             }
  75         } else {
  76             obj->line[col] = (char) ch;
  77             ++col;
  78         }
  79     }
  80
  81     obj->line[col] = '\0';
  82
  83     return obj->line;
  84 }
  85
  86 /*
  87  * Print a new line of text.
  88  */
  89 static void
  90 print_line(MY_OBJ * obj, WINDOW *win, int row, int width)
  91 {
  92     int i, y, x;
  93     char *line = obj->line;
  94
  95     (void) wmove(win, row, 0);  /* move cursor to correct line */
  96     (void) waddch(win, ' ');
  97 #ifdef NCURSES_VERSION
  98     (void) waddnstr(win, line, MIN((int) strlen(line), width - 2));
  99 #else
 100     line[MIN((int) strlen(line), width - 2)] = '\0';
 101     waddstr(win, line);
 102 #endif
 103
 104     getyx(win, y, x);
 105     (void) y;
 106     /* Clear 'residue' of previous line */
 107     for (i = 0; i < width - x; i++)
 108         (void) waddch(win, ' ');
 109 }
 110
 111 static int
 112 pause_for_ok(WINDOW *dialog, int height, int width)
 113 {
 114     /* *INDENT-OFF* */
 115     static DLG_KEYS_BINDING binding[] = {
 116         HELPKEY_BINDINGS,
 117         ENTERKEY_BINDINGS,
 118         TRAVERSE_BINDINGS,
 119         END_KEYS_BINDING
 120     };
 121     /* *INDENT-ON* */
 122
 123     int button;
 124     int key = 0, fkey;
 125     int result = DLG_EXIT_UNKNOWN;
 126     const char **buttons = dlg_ok_label();
 127     int check;
 128     int save_nocancel = dialog_vars.nocancel;
 129     bool redraw = TRUE;
 130
 131     dialog_vars.nocancel = TRUE;
 132     button = dlg_default_button();
 133
 134     dlg_register_window(dialog, "progressbox", binding);
 135     dlg_register_buttons(dialog, "progressbox", buttons);
 136
 137     dlg_draw_bottom_box2(dialog, border_attr, border2_attr, dialog_attr);
 138     mouse_mkbutton(height - 2, width / 2 - 4, 6, '\n');
 139
 140     while (result == DLG_EXIT_UNKNOWN) {
 141         if (redraw) {
 142             redraw = FALSE;
 143             if (button < 0)
 144                 button = 0;
 145             dlg_draw_buttons(dialog,
 146                              height - 2, 0,
 147                              buttons, button,
 148                              FALSE, width);
 149         }
 150
 151         key = dlg_mouse_wgetch(dialog, &fkey);
 152         if (dlg_result_key(key, fkey, &result))
 153             break;
 154
 155         if (!fkey && (check = dlg_char_to_button(key, buttons)) >= 0) {
 156             result = dlg_ok_buttoncode(check);
 157             break;
 158         }
 159
 160         if (fkey) {
 161             switch (key) {
 162             case DLGK_FIELD_NEXT:
 163                 button = dlg_next_button(buttons, button);
 164                 redraw = TRUE;
 165                 break;
 166             case DLGK_FIELD_PREV:
 167                 button = dlg_prev_button(buttons, button);
 168                 redraw = TRUE;
 169                 break;
 170             case DLGK_ENTER:
 171                 result = dlg_ok_buttoncode(button);
 172                 break;
 173             default:
 174                 if (is_DLGK_MOUSE(key)) {
 175                     result = dlg_ok_buttoncode(key - M_EVENT);
 176                     if (result < 0)
 177                         result = DLG_EXIT_OK;
 178                 } else {
 179                     beep();
 180                 }
 181                 break;
 182             }
 183
 184         } else {
 185             beep();
 186         }
 187     }
 188     dlg_unregister_window(dialog);
 189
 190     dialog_vars.nocancel = save_nocancel;
 191     return result;
 192 }
 193
 194 int
 195 dlg_progressbox(const char *title,
 196                 const char *cprompt,
 197                 int height,
 198                 int width,
 199                 int pauseopt,
 200                 FILE *fp)
 201 {
 202     int i;
 203     int x, y, thigh;
 204     WINDOW *dialog, *text;
 205     MY_OBJ *obj;
 206     char *prompt = dlg_strclone(cprompt);
 207     int result;
 208
 209     dlg_tab_correct_str(prompt);
 210     dlg_auto_size(title, prompt, &height, &width, MIN_HIGH, MIN_WIDE);
 211     dlg_print_size(height, width);
 212     dlg_ctl_size(height, width);
 213
 214     x = dlg_box_x_ordinate(width);
 215     y = dlg_box_y_ordinate(height);
 216     thigh = height - (2 * MARGIN);
 217
 218     dialog = dlg_new_window(height, width, y, x);
 219
 220     dlg_draw_box2(dialog, 0, 0, height, width, dialog_attr, border_attr, border2_attr);
 221     dlg_draw_title(dialog, title);
 222     dlg_draw_helpline(dialog, FALSE);
 223
 224     if (*prompt != '\0') {
 225         int y2, x2;
 226
 227         (void) wattrset(dialog, dialog_attr);
 228         dlg_print_autowrap(dialog, prompt, height, width);
 229         getyx(dialog, y2, x2);
 230         (void) x2;
 231         ++y2;
 232         wmove(dialog, y2, MARGIN);
 233         for (i = 0; i < getmaxx(dialog) - 2 * MARGIN; i++)
 234             (void) waddch(dialog, dlg_boxchar(ACS_HLINE));
 235         y += y2;
 236         thigh -= y2;
 237     }
 238
 239     /* Create window for text region, used for scrolling text */
 240     text = dlg_sub_window(dialog,
 241                           thigh,
 242                           width - (2 * MARGIN),
 243                           y + MARGIN,
 244                           x + MARGIN);
 245
 246     (void) wrefresh(dialog);
 247
 248     (void) wmove(dialog, thigh, (MARGIN + 1));
 249     (void) wnoutrefresh(dialog);
 250
 251     obj = dlg_calloc(MY_OBJ, 1);
 252     assert_ptr(obj, "dlg_progressbox");
 253
 254     obj->obj.input = fp;
 255     obj->obj.win = dialog;
 256     obj->text = text;
 257
 258     dlg_attr_clear(text, thigh, getmaxx(text), dialog_attr);
 259     for (i = 0; get_line(obj); i++) {
 260         if (i < thigh) {
 261             print_line(obj, text, i, width - (2 * MARGIN));
 262         } else {
 263             scrollok(text, TRUE);
 264             scroll(text);
 265             scrollok(text, FALSE);
 266             print_line(obj, text, thigh - 1, width - (2 * MARGIN));
 267         }
 268         (void) wrefresh(text);
 269         dlg_trace_win(dialog);
 270         if (obj->is_eof)
 271             break;
 272     }
 273
 274     if (pauseopt) {
 275         int need = 1 + MARGIN;
 276         int base = thigh - need;
 277         if (i >= base) {
 278             i -= base;
 279             if (i > need)
 280                 i = need;
 281             if (i > 0) {
 282                 scrollok(text, TRUE);
 283             }
 284             wscrl(text, i);
 285         }
 286         (void) wrefresh(text);
 287         result = pause_for_ok(dialog, height, width);
 288     } else {
 289         wrefresh(dialog);
 290         result = DLG_EXIT_OK;
 291     }
 292
 293     dlg_del_window(dialog);
 294     free(prompt);
 295     free(obj);
 296
 297     return result;
 298 }
 299
 300 /*
 301  * Display text from a stdin in a scrolling window.
 302  */
 303 int
 304 dialog_progressbox(const char *title, const char *cprompt, int height, int width)
 305 {
 306     int result;
 307     result = dlg_progressbox(title,
 308                              cprompt,
 309                              height,
 310                              width,
 311                              FALSE,
 312                              dialog_state.pipe_input);
 313     dialog_state.pipe_input = 0;
 314     return result;
 315 }