tailbox.c revision 217309
1217309Snwhitehorn/* 2217309Snwhitehorn * $Id: tailbox.c,v 1.56 2010/04/28 20:52:20 tom Exp $ 3217309Snwhitehorn * 4217309Snwhitehorn * tailbox.c -- implements the tail box 5217309Snwhitehorn * 6217309Snwhitehorn * Copyright 2000-2009,2010 Thomas E. Dickey 7217309Snwhitehorn * 8217309Snwhitehorn * This program is free software; you can redistribute it and/or modify 9217309Snwhitehorn * it under the terms of the GNU Lesser General Public License, version 2.1 10217309Snwhitehorn * as published by the Free Software Foundation. 11217309Snwhitehorn * 12217309Snwhitehorn * This program is distributed in the hope that it will be useful, but 13217309Snwhitehorn * WITHOUT ANY WARRANTY; without even the implied warranty of 14217309Snwhitehorn * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 15217309Snwhitehorn * Lesser General Public License for more details. 16217309Snwhitehorn * 17217309Snwhitehorn * You should have received a copy of the GNU Lesser General Public 18217309Snwhitehorn * License along with this program; if not, write to 19217309Snwhitehorn * Free Software Foundation, Inc. 20217309Snwhitehorn * 51 Franklin St., Fifth Floor 21217309Snwhitehorn * Boston, MA 02110, USA. 22217309Snwhitehorn * 23217309Snwhitehorn * An earlier version of this program lists as authors 24217309Snwhitehorn * Pasquale De Marco (demarco_p@abramo.it) 25217309Snwhitehorn */ 26217309Snwhitehorn 27217309Snwhitehorn#include <dialog.h> 28217309Snwhitehorn#include <dlg_keys.h> 29217309Snwhitehorn 30217309Snwhitehorntypedef struct { 31217309Snwhitehorn DIALOG_CALLBACK obj; 32217309Snwhitehorn WINDOW *text; 33217309Snwhitehorn const char **buttons; 34217309Snwhitehorn int hscroll; 35217309Snwhitehorn int old_hscroll; 36217309Snwhitehorn char line[MAX_LEN + 1]; 37217309Snwhitehorn} MY_OBJ; 38217309Snwhitehorn 39217309Snwhitehorn/* 40217309Snwhitehorn * Return current line of text. 41217309Snwhitehorn */ 42217309Snwhitehornstatic char * 43217309Snwhitehornget_line(MY_OBJ * obj) 44217309Snwhitehorn{ 45217309Snwhitehorn FILE *fp = obj->obj.input; 46217309Snwhitehorn int col = -(obj->hscroll); 47217309Snwhitehorn int j, tmpint, ch; 48217309Snwhitehorn 49217309Snwhitehorn do { 50217309Snwhitehorn if (((ch = getc(fp)) == EOF) && !feof(fp)) 51217309Snwhitehorn dlg_exiterr("Error moving file pointer in get_line()."); 52217309Snwhitehorn else if (!feof(fp) && (ch != '\n')) { 53217309Snwhitehorn if ((ch == TAB) && (dialog_vars.tab_correct)) { 54217309Snwhitehorn tmpint = dialog_state.tab_len 55217309Snwhitehorn - ((col + obj->hscroll) % dialog_state.tab_len); 56217309Snwhitehorn for (j = 0; j < tmpint; j++) { 57217309Snwhitehorn if (col >= 0 && col < MAX_LEN) 58217309Snwhitehorn obj->line[col] = ' '; 59217309Snwhitehorn ++col; 60217309Snwhitehorn } 61217309Snwhitehorn } else { 62217309Snwhitehorn if (col >= 0) 63217309Snwhitehorn obj->line[col] = (char) ch; 64217309Snwhitehorn ++col; 65217309Snwhitehorn } 66217309Snwhitehorn if (col >= MAX_LEN) 67217309Snwhitehorn break; 68217309Snwhitehorn } 69217309Snwhitehorn } while (!feof(fp) && (ch != '\n')); 70217309Snwhitehorn 71217309Snwhitehorn if (col < 0) 72217309Snwhitehorn col = 0; 73217309Snwhitehorn obj->line[col] = '\0'; 74217309Snwhitehorn 75217309Snwhitehorn return obj->line; 76217309Snwhitehorn} 77217309Snwhitehorn 78217309Snwhitehorn/* 79217309Snwhitehorn * Print a new line of text. 80217309Snwhitehorn */ 81217309Snwhitehornstatic void 82217309Snwhitehornprint_line(MY_OBJ * obj, WINDOW *win, int row, int width) 83217309Snwhitehorn{ 84217309Snwhitehorn int i, y, x; 85217309Snwhitehorn char *line = get_line(obj); 86217309Snwhitehorn 87217309Snwhitehorn (void) wmove(win, row, 0); /* move cursor to correct line */ 88217309Snwhitehorn (void) waddch(win, ' '); 89217309Snwhitehorn#ifdef NCURSES_VERSION 90217309Snwhitehorn (void) waddnstr(win, line, MIN((int) strlen(line), width - 2)); 91217309Snwhitehorn#else 92217309Snwhitehorn line[MIN((int) strlen(line), width - 2)] = '\0'; 93217309Snwhitehorn waddstr(win, line); 94217309Snwhitehorn#endif 95217309Snwhitehorn 96217309Snwhitehorn getyx(win, y, x); 97217309Snwhitehorn /* Clear 'residue' of previous line */ 98217309Snwhitehorn for (i = 0; i < width - x; i++) 99217309Snwhitehorn (void) waddch(win, ' '); 100217309Snwhitehorn} 101217309Snwhitehorn 102217309Snwhitehorn/* 103217309Snwhitehorn * Go back 'target' lines in text file. BUFSIZ has to be in 'size_t' range. 104217309Snwhitehorn */ 105217309Snwhitehornstatic void 106217309Snwhitehornlast_lines(MY_OBJ * obj, int target) 107217309Snwhitehorn{ 108217309Snwhitehorn FILE *fp = obj->obj.input; 109217309Snwhitehorn long inx; 110217309Snwhitehorn int count = 0; 111217309Snwhitehorn char buf[BUFSIZ + 1]; 112217309Snwhitehorn long size_to_read; 113217309Snwhitehorn long offset = 0; 114217309Snwhitehorn long fpos = 0; 115217309Snwhitehorn 116217309Snwhitehorn if (fseek(fp, 0, SEEK_END) == -1 117217309Snwhitehorn || (fpos = ftell(fp)) < 0) 118217309Snwhitehorn dlg_exiterr("Error moving file pointer in last_lines()."); 119217309Snwhitehorn 120217309Snwhitehorn if (fpos != 0) { 121217309Snwhitehorn ++target; 122217309Snwhitehorn for (;;) { 123217309Snwhitehorn if (fpos >= BUFSIZ) { 124217309Snwhitehorn size_to_read = BUFSIZ; 125217309Snwhitehorn } else { 126217309Snwhitehorn size_to_read = fpos; 127217309Snwhitehorn } 128217309Snwhitehorn fpos = fpos - size_to_read; 129217309Snwhitehorn if (fseek(fp, fpos, SEEK_SET) == -1) 130217309Snwhitehorn dlg_exiterr("Error moving file pointer in last_lines()."); 131217309Snwhitehorn (void) fread(buf, (size_t) size_to_read, 1, fp); 132217309Snwhitehorn if (ferror(fp)) 133217309Snwhitehorn dlg_exiterr("Error reading file in last_lines()."); 134217309Snwhitehorn 135217309Snwhitehorn offset += size_to_read; 136217309Snwhitehorn for (inx = size_to_read - 1; inx >= 0; --inx) { 137217309Snwhitehorn if (buf[inx] == '\n') { 138217309Snwhitehorn if (++count > target) 139217309Snwhitehorn break; 140217309Snwhitehorn offset = inx + 1; 141217309Snwhitehorn } 142217309Snwhitehorn } 143217309Snwhitehorn 144217309Snwhitehorn if (count > target) { 145217309Snwhitehorn break; 146217309Snwhitehorn } else if (fpos == 0) { 147217309Snwhitehorn offset = 0; 148217309Snwhitehorn break; 149217309Snwhitehorn } 150217309Snwhitehorn } 151217309Snwhitehorn 152217309Snwhitehorn if (fseek(fp, fpos + offset, SEEK_SET) == -1) 153217309Snwhitehorn dlg_exiterr("Error moving file pointer in last_lines()."); 154217309Snwhitehorn } 155217309Snwhitehorn} 156217309Snwhitehorn 157217309Snwhitehorn/* 158217309Snwhitehorn * Print a new page of text. 159217309Snwhitehorn */ 160217309Snwhitehornstatic void 161217309Snwhitehornprint_page(MY_OBJ * obj, int height, int width) 162217309Snwhitehorn{ 163217309Snwhitehorn int i; 164217309Snwhitehorn 165217309Snwhitehorn for (i = 0; i < height; i++) { 166217309Snwhitehorn print_line(obj, obj->text, i, width); 167217309Snwhitehorn } 168217309Snwhitehorn (void) wnoutrefresh(obj->text); 169217309Snwhitehorn} 170217309Snwhitehorn 171217309Snwhitehornstatic void 172217309Snwhitehornprint_last_page(MY_OBJ * obj) 173217309Snwhitehorn{ 174217309Snwhitehorn int high = getmaxy(obj->obj.win) - (2 * MARGIN + (obj->obj.bg_task ? 1 : 3)); 175217309Snwhitehorn int wide = getmaxx(obj->text); 176217309Snwhitehorn 177217309Snwhitehorn last_lines(obj, high); 178217309Snwhitehorn print_page(obj, high, wide); 179217309Snwhitehorn} 180217309Snwhitehorn 181217309Snwhitehornstatic void 182217309Snwhitehornrepaint_text(MY_OBJ * obj) 183217309Snwhitehorn{ 184217309Snwhitehorn int cur_y, cur_x; 185217309Snwhitehorn 186217309Snwhitehorn getyx(obj->obj.win, cur_y, cur_x); 187217309Snwhitehorn obj->old_hscroll = obj->hscroll; 188217309Snwhitehorn print_last_page(obj); 189217309Snwhitehorn (void) wmove(obj->obj.win, cur_y, cur_x); /* Restore cursor position */ 190217309Snwhitehorn wrefresh(obj->obj.win); 191217309Snwhitehorn} 192217309Snwhitehorn 193217309Snwhitehornstatic bool 194217309Snwhitehornhandle_my_getc(DIALOG_CALLBACK * cb, int ch, int fkey, int *result) 195217309Snwhitehorn{ 196217309Snwhitehorn MY_OBJ *obj = (MY_OBJ *) cb; 197217309Snwhitehorn bool done = FALSE; 198217309Snwhitehorn 199217309Snwhitehorn if (!fkey && dlg_char_to_button(ch, obj->buttons) == 0) { 200217309Snwhitehorn ch = DLGK_ENTER; 201217309Snwhitehorn fkey = TRUE; 202217309Snwhitehorn } 203217309Snwhitehorn 204217309Snwhitehorn if (fkey) { 205217309Snwhitehorn switch (ch) { 206217309Snwhitehorn case DLGK_ENTER: 207217309Snwhitehorn *result = DLG_EXIT_OK; 208217309Snwhitehorn done = TRUE; 209217309Snwhitehorn break; 210217309Snwhitehorn case DLGK_BEGIN: /* Beginning of line */ 211217309Snwhitehorn obj->hscroll = 0; 212217309Snwhitehorn break; 213217309Snwhitehorn case DLGK_GRID_LEFT: /* Scroll left */ 214217309Snwhitehorn if (obj->hscroll > 0) { 215217309Snwhitehorn obj->hscroll -= 1; 216217309Snwhitehorn } 217217309Snwhitehorn break; 218217309Snwhitehorn case DLGK_GRID_RIGHT: /* Scroll right */ 219217309Snwhitehorn if (obj->hscroll < MAX_LEN) 220217309Snwhitehorn obj->hscroll += 1; 221217309Snwhitehorn break; 222217309Snwhitehorn default: 223217309Snwhitehorn beep(); 224217309Snwhitehorn break; 225217309Snwhitehorn } 226217309Snwhitehorn if ((obj->hscroll != obj->old_hscroll)) 227217309Snwhitehorn repaint_text(obj); 228217309Snwhitehorn } else { 229217309Snwhitehorn switch (ch) { 230217309Snwhitehorn case ERR: 231217309Snwhitehorn clearerr(cb->input); 232217309Snwhitehorn ch = getc(cb->input); 233217309Snwhitehorn (void) ungetc(ch, cb->input); 234217309Snwhitehorn if ((ch != EOF) || (obj->hscroll != obj->old_hscroll)) { 235217309Snwhitehorn repaint_text(obj); 236217309Snwhitehorn } 237217309Snwhitehorn break; 238217309Snwhitehorn case ESC: 239217309Snwhitehorn done = TRUE; 240217309Snwhitehorn *result = DLG_EXIT_ESC; 241217309Snwhitehorn break; 242217309Snwhitehorn default: 243217309Snwhitehorn beep(); 244217309Snwhitehorn break; 245217309Snwhitehorn } 246217309Snwhitehorn } 247217309Snwhitehorn 248217309Snwhitehorn return !done; 249217309Snwhitehorn} 250217309Snwhitehorn 251217309Snwhitehorn/* 252217309Snwhitehorn * Display text from a file in a dialog box, like in a "tail -f". 253217309Snwhitehorn */ 254217309Snwhitehornint 255217309Snwhitehorndialog_tailbox(const char *title, const char *file, int height, int width, int bg_task) 256217309Snwhitehorn{ 257217309Snwhitehorn /* *INDENT-OFF* */ 258217309Snwhitehorn static DLG_KEYS_BINDING binding[] = { 259217309Snwhitehorn ENTERKEY_BINDINGS, 260217309Snwhitehorn DLG_KEYS_DATA( DLGK_BEGIN, '0' ), 261217309Snwhitehorn DLG_KEYS_DATA( DLGK_BEGIN, KEY_BEG ), 262217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_LEFT, 'H' ), 263217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_LEFT, 'h' ), 264217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_LEFT, KEY_LEFT ), 265217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_RIGHT, 'L' ), 266217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_RIGHT, 'l' ), 267217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_RIGHT, KEY_RIGHT ), 268217309Snwhitehorn END_KEYS_BINDING 269217309Snwhitehorn }; 270217309Snwhitehorn /* *INDENT-ON* */ 271217309Snwhitehorn 272217309Snwhitehorn#ifdef KEY_RESIZE 273217309Snwhitehorn int old_height = height; 274217309Snwhitehorn int old_width = width; 275217309Snwhitehorn#endif 276217309Snwhitehorn int fkey; 277217309Snwhitehorn int x, y, result, thigh; 278217309Snwhitehorn WINDOW *dialog, *text; 279217309Snwhitehorn const char **buttons = 0; 280217309Snwhitehorn MY_OBJ *obj; 281217309Snwhitehorn FILE *fd; 282217309Snwhitehorn int min_width = 12; 283217309Snwhitehorn 284217309Snwhitehorn /* Open input file for reading */ 285217309Snwhitehorn if ((fd = fopen(file, "rb")) == NULL) 286217309Snwhitehorn dlg_exiterr("Can't open input file in dialog_tailbox()."); 287217309Snwhitehorn 288217309Snwhitehorn#ifdef KEY_RESIZE 289217309Snwhitehorn retry: 290217309Snwhitehorn#endif 291217309Snwhitehorn dlg_auto_sizefile(title, file, &height, &width, 2, min_width); 292217309Snwhitehorn dlg_print_size(height, width); 293217309Snwhitehorn dlg_ctl_size(height, width); 294217309Snwhitehorn 295217309Snwhitehorn x = dlg_box_x_ordinate(width); 296217309Snwhitehorn y = dlg_box_y_ordinate(height); 297217309Snwhitehorn thigh = height - ((2 * MARGIN) + (bg_task ? 0 : 2)); 298217309Snwhitehorn 299217309Snwhitehorn dialog = dlg_new_window(height, width, y, x); 300217309Snwhitehorn 301217309Snwhitehorn dlg_mouse_setbase(x, y); 302217309Snwhitehorn 303217309Snwhitehorn /* Create window for text region, used for scrolling text */ 304217309Snwhitehorn text = dlg_sub_window(dialog, 305217309Snwhitehorn thigh, 306217309Snwhitehorn width - (2 * MARGIN), 307217309Snwhitehorn y + MARGIN, 308217309Snwhitehorn x + MARGIN); 309217309Snwhitehorn 310217309Snwhitehorn dlg_draw_box(dialog, 0, 0, height, width, dialog_attr, border_attr); 311217309Snwhitehorn dlg_draw_bottom_box(dialog); 312217309Snwhitehorn dlg_draw_title(dialog, title); 313217309Snwhitehorn 314217309Snwhitehorn if (!bg_task) { 315217309Snwhitehorn buttons = dlg_exit_label(); 316217309Snwhitehorn dlg_button_layout(buttons, &min_width); 317217309Snwhitehorn dlg_draw_buttons(dialog, height - (2 * MARGIN), 0, buttons, FALSE, 318217309Snwhitehorn FALSE, width); 319217309Snwhitehorn } 320217309Snwhitehorn 321217309Snwhitehorn (void) wmove(dialog, thigh, (MARGIN + 1)); 322217309Snwhitehorn (void) wnoutrefresh(dialog); 323217309Snwhitehorn 324217309Snwhitehorn obj = dlg_calloc(MY_OBJ, 1); 325217309Snwhitehorn assert_ptr(obj, "dialog_tailbox"); 326217309Snwhitehorn 327217309Snwhitehorn obj->obj.input = fd; 328217309Snwhitehorn obj->obj.win = dialog; 329217309Snwhitehorn obj->obj.handle_getc = handle_my_getc; 330217309Snwhitehorn obj->obj.keep_bg = bg_task && dialog_vars.cant_kill; 331217309Snwhitehorn obj->obj.bg_task = bg_task; 332217309Snwhitehorn obj->text = text; 333217309Snwhitehorn obj->buttons = buttons; 334217309Snwhitehorn dlg_add_callback(&(obj->obj)); 335217309Snwhitehorn 336217309Snwhitehorn dlg_register_window(dialog, "tailbox", binding); 337217309Snwhitehorn dlg_register_buttons(dialog, "tailbox", buttons); 338217309Snwhitehorn 339217309Snwhitehorn /* Print last page of text */ 340217309Snwhitehorn dlg_attr_clear(text, thigh, getmaxx(text), dialog_attr); 341217309Snwhitehorn repaint_text(obj); 342217309Snwhitehorn 343217309Snwhitehorn if (bg_task) { 344217309Snwhitehorn result = DLG_EXIT_OK; 345217309Snwhitehorn } else { 346217309Snwhitehorn int ch; 347217309Snwhitehorn do { 348217309Snwhitehorn ch = dlg_getc(dialog, &fkey); 349217309Snwhitehorn#ifdef KEY_RESIZE 350217309Snwhitehorn if (fkey && ch == KEY_RESIZE) { 351217309Snwhitehorn /* reset data */ 352217309Snwhitehorn height = old_height; 353217309Snwhitehorn width = old_width; 354217309Snwhitehorn /* repaint */ 355217309Snwhitehorn dlg_clear(); 356217309Snwhitehorn dlg_del_window(dialog); 357217309Snwhitehorn refresh(); 358217309Snwhitehorn dlg_mouse_free_regions(); 359217309Snwhitehorn dlg_button_layout(buttons, &min_width); 360217309Snwhitehorn goto retry; 361217309Snwhitehorn } 362217309Snwhitehorn#endif 363217309Snwhitehorn } 364217309Snwhitehorn while (handle_my_getc(&(obj->obj), ch, fkey, &result)); 365217309Snwhitehorn } 366217309Snwhitehorn dlg_mouse_free_regions(); 367217309Snwhitehorn return result; 368217309Snwhitehorn} 369