1217309Snwhitehorn/* 2251843Sbapt * $Id: tailbox.c,v 1.68 2012/11/18 15:48:52 tom Exp $ 3217309Snwhitehorn * 4220749Snwhitehorn * tailbox.c -- implements the tail box 5217309Snwhitehorn * 6251843Sbapt * Copyright 2000-2011,2012 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> 29220749Snwhitehorn#include <sys/stat.h> 30217309Snwhitehorn 31217309Snwhitehorntypedef struct { 32217309Snwhitehorn DIALOG_CALLBACK obj; 33217309Snwhitehorn WINDOW *text; 34217309Snwhitehorn const char **buttons; 35217309Snwhitehorn int hscroll; 36217309Snwhitehorn int old_hscroll; 37251843Sbapt char line[MAX_LEN + 2]; 38220749Snwhitehorn off_t last_pos; 39217309Snwhitehorn} MY_OBJ; 40217309Snwhitehorn 41217309Snwhitehorn/* 42217309Snwhitehorn * Return current line of text. 43217309Snwhitehorn */ 44217309Snwhitehornstatic char * 45217309Snwhitehornget_line(MY_OBJ * obj) 46217309Snwhitehorn{ 47217309Snwhitehorn FILE *fp = obj->obj.input; 48217309Snwhitehorn int col = -(obj->hscroll); 49217309Snwhitehorn int j, tmpint, ch; 50217309Snwhitehorn 51217309Snwhitehorn do { 52217309Snwhitehorn if (((ch = getc(fp)) == EOF) && !feof(fp)) 53217309Snwhitehorn dlg_exiterr("Error moving file pointer in get_line()."); 54217309Snwhitehorn else if (!feof(fp) && (ch != '\n')) { 55217309Snwhitehorn if ((ch == TAB) && (dialog_vars.tab_correct)) { 56217309Snwhitehorn tmpint = dialog_state.tab_len 57217309Snwhitehorn - ((col + obj->hscroll) % dialog_state.tab_len); 58217309Snwhitehorn for (j = 0; j < tmpint; j++) { 59217309Snwhitehorn if (col >= 0 && col < MAX_LEN) 60217309Snwhitehorn obj->line[col] = ' '; 61217309Snwhitehorn ++col; 62217309Snwhitehorn } 63217309Snwhitehorn } else { 64217309Snwhitehorn if (col >= 0) 65217309Snwhitehorn obj->line[col] = (char) ch; 66217309Snwhitehorn ++col; 67217309Snwhitehorn } 68217309Snwhitehorn if (col >= MAX_LEN) 69217309Snwhitehorn break; 70217309Snwhitehorn } 71217309Snwhitehorn } while (!feof(fp) && (ch != '\n')); 72217309Snwhitehorn 73217309Snwhitehorn if (col < 0) 74217309Snwhitehorn col = 0; 75217309Snwhitehorn obj->line[col] = '\0'; 76217309Snwhitehorn 77217309Snwhitehorn return obj->line; 78217309Snwhitehorn} 79217309Snwhitehorn 80217309Snwhitehorn/* 81217309Snwhitehorn * Print a new line of text. 82217309Snwhitehorn */ 83217309Snwhitehornstatic void 84217309Snwhitehornprint_line(MY_OBJ * obj, WINDOW *win, int row, int width) 85217309Snwhitehorn{ 86217309Snwhitehorn int i, y, x; 87217309Snwhitehorn char *line = get_line(obj); 88217309Snwhitehorn 89217309Snwhitehorn (void) wmove(win, row, 0); /* move cursor to correct line */ 90217309Snwhitehorn (void) waddch(win, ' '); 91217309Snwhitehorn#ifdef NCURSES_VERSION 92217309Snwhitehorn (void) waddnstr(win, line, MIN((int) strlen(line), width - 2)); 93217309Snwhitehorn#else 94217309Snwhitehorn line[MIN((int) strlen(line), width - 2)] = '\0'; 95217309Snwhitehorn waddstr(win, line); 96217309Snwhitehorn#endif 97217309Snwhitehorn 98217309Snwhitehorn getyx(win, y, x); 99251843Sbapt (void) y; 100217309Snwhitehorn /* Clear 'residue' of previous line */ 101217309Snwhitehorn for (i = 0; i < width - x; i++) 102217309Snwhitehorn (void) waddch(win, ' '); 103217309Snwhitehorn} 104217309Snwhitehorn 105217309Snwhitehorn/* 106217309Snwhitehorn * Go back 'target' lines in text file. BUFSIZ has to be in 'size_t' range. 107217309Snwhitehorn */ 108217309Snwhitehornstatic void 109217309Snwhitehornlast_lines(MY_OBJ * obj, int target) 110217309Snwhitehorn{ 111217309Snwhitehorn FILE *fp = obj->obj.input; 112220749Snwhitehorn size_t inx; 113217309Snwhitehorn int count = 0; 114217309Snwhitehorn char buf[BUFSIZ + 1]; 115220749Snwhitehorn size_t size_to_read; 116220749Snwhitehorn size_t size_as_read; 117217309Snwhitehorn long offset = 0; 118217309Snwhitehorn long fpos = 0; 119217309Snwhitehorn 120220749Snwhitehorn if (fseek(fp, 0L, SEEK_END) == -1 121217309Snwhitehorn || (fpos = ftell(fp)) < 0) 122217309Snwhitehorn dlg_exiterr("Error moving file pointer in last_lines()."); 123217309Snwhitehorn 124217309Snwhitehorn if (fpos != 0) { 125217309Snwhitehorn ++target; 126217309Snwhitehorn for (;;) { 127217309Snwhitehorn if (fpos >= BUFSIZ) { 128217309Snwhitehorn size_to_read = BUFSIZ; 129217309Snwhitehorn } else { 130220749Snwhitehorn size_to_read = (size_t) fpos; 131217309Snwhitehorn } 132220749Snwhitehorn fpos = fpos - (long) size_to_read; 133217309Snwhitehorn if (fseek(fp, fpos, SEEK_SET) == -1) 134217309Snwhitehorn dlg_exiterr("Error moving file pointer in last_lines()."); 135220749Snwhitehorn size_as_read = fread(buf, sizeof(char), size_to_read, fp); 136217309Snwhitehorn if (ferror(fp)) 137217309Snwhitehorn dlg_exiterr("Error reading file in last_lines()."); 138217309Snwhitehorn 139220749Snwhitehorn if (size_as_read == 0) { 140220749Snwhitehorn fpos = 0; 141220749Snwhitehorn offset = 0; 142220749Snwhitehorn break; 143220749Snwhitehorn } 144220749Snwhitehorn 145220749Snwhitehorn offset += (long) size_as_read; 146220749Snwhitehorn for (inx = size_as_read - 1; inx != 0; --inx) { 147217309Snwhitehorn if (buf[inx] == '\n') { 148217309Snwhitehorn if (++count > target) 149217309Snwhitehorn break; 150220749Snwhitehorn offset = (long) (inx + 1); 151217309Snwhitehorn } 152217309Snwhitehorn } 153217309Snwhitehorn 154217309Snwhitehorn if (count > target) { 155217309Snwhitehorn break; 156217309Snwhitehorn } else if (fpos == 0) { 157217309Snwhitehorn offset = 0; 158217309Snwhitehorn break; 159217309Snwhitehorn } 160217309Snwhitehorn } 161217309Snwhitehorn 162217309Snwhitehorn if (fseek(fp, fpos + offset, SEEK_SET) == -1) 163217309Snwhitehorn dlg_exiterr("Error moving file pointer in last_lines()."); 164217309Snwhitehorn } 165217309Snwhitehorn} 166217309Snwhitehorn 167217309Snwhitehorn/* 168217309Snwhitehorn * Print a new page of text. 169217309Snwhitehorn */ 170217309Snwhitehornstatic void 171217309Snwhitehornprint_page(MY_OBJ * obj, int height, int width) 172217309Snwhitehorn{ 173217309Snwhitehorn int i; 174217309Snwhitehorn 175217309Snwhitehorn for (i = 0; i < height; i++) { 176217309Snwhitehorn print_line(obj, obj->text, i, width); 177217309Snwhitehorn } 178217309Snwhitehorn (void) wnoutrefresh(obj->text); 179217309Snwhitehorn} 180217309Snwhitehorn 181217309Snwhitehornstatic void 182217309Snwhitehornprint_last_page(MY_OBJ * obj) 183217309Snwhitehorn{ 184217309Snwhitehorn int high = getmaxy(obj->obj.win) - (2 * MARGIN + (obj->obj.bg_task ? 1 : 3)); 185217309Snwhitehorn int wide = getmaxx(obj->text); 186217309Snwhitehorn 187217309Snwhitehorn last_lines(obj, high); 188217309Snwhitehorn print_page(obj, high, wide); 189217309Snwhitehorn} 190217309Snwhitehorn 191217309Snwhitehornstatic void 192217309Snwhitehornrepaint_text(MY_OBJ * obj) 193217309Snwhitehorn{ 194220749Snwhitehorn FILE *fp = obj->obj.input; 195217309Snwhitehorn int cur_y, cur_x; 196217309Snwhitehorn 197217309Snwhitehorn getyx(obj->obj.win, cur_y, cur_x); 198217309Snwhitehorn obj->old_hscroll = obj->hscroll; 199220749Snwhitehorn 200217309Snwhitehorn print_last_page(obj); 201220749Snwhitehorn obj->last_pos = ftell(fp); 202220749Snwhitehorn 203217309Snwhitehorn (void) wmove(obj->obj.win, cur_y, cur_x); /* Restore cursor position */ 204217309Snwhitehorn wrefresh(obj->obj.win); 205217309Snwhitehorn} 206217309Snwhitehorn 207217309Snwhitehornstatic bool 208220749Snwhitehornhandle_input(DIALOG_CALLBACK * cb) 209220749Snwhitehorn{ 210220749Snwhitehorn MY_OBJ *obj = (MY_OBJ *) cb; 211220749Snwhitehorn FILE *fp = obj->obj.input; 212220749Snwhitehorn struct stat sb; 213220749Snwhitehorn 214220749Snwhitehorn if (fstat(fileno(fp), &sb) == 0 215220749Snwhitehorn && sb.st_size != obj->last_pos) { 216220749Snwhitehorn repaint_text(obj); 217220749Snwhitehorn } 218220749Snwhitehorn 219220749Snwhitehorn return TRUE; 220220749Snwhitehorn} 221220749Snwhitehorn 222220749Snwhitehornstatic bool 223217309Snwhitehornhandle_my_getc(DIALOG_CALLBACK * cb, int ch, int fkey, int *result) 224217309Snwhitehorn{ 225217309Snwhitehorn MY_OBJ *obj = (MY_OBJ *) cb; 226217309Snwhitehorn bool done = FALSE; 227217309Snwhitehorn 228217309Snwhitehorn if (!fkey && dlg_char_to_button(ch, obj->buttons) == 0) { 229217309Snwhitehorn ch = DLGK_ENTER; 230217309Snwhitehorn fkey = TRUE; 231217309Snwhitehorn } 232217309Snwhitehorn 233217309Snwhitehorn if (fkey) { 234217309Snwhitehorn switch (ch) { 235217309Snwhitehorn case DLGK_ENTER: 236217309Snwhitehorn *result = DLG_EXIT_OK; 237217309Snwhitehorn done = TRUE; 238217309Snwhitehorn break; 239217309Snwhitehorn case DLGK_BEGIN: /* Beginning of line */ 240217309Snwhitehorn obj->hscroll = 0; 241217309Snwhitehorn break; 242217309Snwhitehorn case DLGK_GRID_LEFT: /* Scroll left */ 243217309Snwhitehorn if (obj->hscroll > 0) { 244217309Snwhitehorn obj->hscroll -= 1; 245217309Snwhitehorn } 246217309Snwhitehorn break; 247217309Snwhitehorn case DLGK_GRID_RIGHT: /* Scroll right */ 248217309Snwhitehorn if (obj->hscroll < MAX_LEN) 249217309Snwhitehorn obj->hscroll += 1; 250217309Snwhitehorn break; 251217309Snwhitehorn default: 252217309Snwhitehorn beep(); 253217309Snwhitehorn break; 254217309Snwhitehorn } 255217309Snwhitehorn if ((obj->hscroll != obj->old_hscroll)) 256217309Snwhitehorn repaint_text(obj); 257217309Snwhitehorn } else { 258217309Snwhitehorn switch (ch) { 259217309Snwhitehorn case ERR: 260217309Snwhitehorn clearerr(cb->input); 261217309Snwhitehorn ch = getc(cb->input); 262217309Snwhitehorn (void) ungetc(ch, cb->input); 263220749Snwhitehorn if (ch != EOF) { 264220749Snwhitehorn handle_input(cb); 265217309Snwhitehorn } 266217309Snwhitehorn break; 267217309Snwhitehorn case ESC: 268217309Snwhitehorn done = TRUE; 269217309Snwhitehorn *result = DLG_EXIT_ESC; 270217309Snwhitehorn break; 271217309Snwhitehorn default: 272217309Snwhitehorn beep(); 273217309Snwhitehorn break; 274217309Snwhitehorn } 275217309Snwhitehorn } 276217309Snwhitehorn 277217309Snwhitehorn return !done; 278217309Snwhitehorn} 279217309Snwhitehorn 280217309Snwhitehorn/* 281217309Snwhitehorn * Display text from a file in a dialog box, like in a "tail -f". 282217309Snwhitehorn */ 283217309Snwhitehornint 284217309Snwhitehorndialog_tailbox(const char *title, const char *file, int height, int width, int bg_task) 285217309Snwhitehorn{ 286217309Snwhitehorn /* *INDENT-OFF* */ 287217309Snwhitehorn static DLG_KEYS_BINDING binding[] = { 288224014Snwhitehorn HELPKEY_BINDINGS, 289217309Snwhitehorn ENTERKEY_BINDINGS, 290217309Snwhitehorn DLG_KEYS_DATA( DLGK_BEGIN, '0' ), 291217309Snwhitehorn DLG_KEYS_DATA( DLGK_BEGIN, KEY_BEG ), 292217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_LEFT, 'H' ), 293217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_LEFT, 'h' ), 294217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_LEFT, KEY_LEFT ), 295217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_RIGHT, 'L' ), 296217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_RIGHT, 'l' ), 297217309Snwhitehorn DLG_KEYS_DATA( DLGK_GRID_RIGHT, KEY_RIGHT ), 298217309Snwhitehorn END_KEYS_BINDING 299217309Snwhitehorn }; 300217309Snwhitehorn /* *INDENT-ON* */ 301217309Snwhitehorn 302217309Snwhitehorn#ifdef KEY_RESIZE 303217309Snwhitehorn int old_height = height; 304217309Snwhitehorn int old_width = width; 305217309Snwhitehorn#endif 306217309Snwhitehorn int fkey; 307217309Snwhitehorn int x, y, result, thigh; 308217309Snwhitehorn WINDOW *dialog, *text; 309217309Snwhitehorn const char **buttons = 0; 310217309Snwhitehorn MY_OBJ *obj; 311217309Snwhitehorn FILE *fd; 312217309Snwhitehorn int min_width = 12; 313217309Snwhitehorn 314217309Snwhitehorn /* Open input file for reading */ 315217309Snwhitehorn if ((fd = fopen(file, "rb")) == NULL) 316217309Snwhitehorn dlg_exiterr("Can't open input file in dialog_tailbox()."); 317217309Snwhitehorn 318217309Snwhitehorn#ifdef KEY_RESIZE 319217309Snwhitehorn retry: 320217309Snwhitehorn#endif 321217309Snwhitehorn dlg_auto_sizefile(title, file, &height, &width, 2, min_width); 322217309Snwhitehorn dlg_print_size(height, width); 323217309Snwhitehorn dlg_ctl_size(height, width); 324217309Snwhitehorn 325217309Snwhitehorn x = dlg_box_x_ordinate(width); 326217309Snwhitehorn y = dlg_box_y_ordinate(height); 327217309Snwhitehorn thigh = height - ((2 * MARGIN) + (bg_task ? 0 : 2)); 328217309Snwhitehorn 329217309Snwhitehorn dialog = dlg_new_window(height, width, y, x); 330217309Snwhitehorn 331217309Snwhitehorn dlg_mouse_setbase(x, y); 332217309Snwhitehorn 333217309Snwhitehorn /* Create window for text region, used for scrolling text */ 334217309Snwhitehorn text = dlg_sub_window(dialog, 335217309Snwhitehorn thigh, 336217309Snwhitehorn width - (2 * MARGIN), 337217309Snwhitehorn y + MARGIN, 338217309Snwhitehorn x + MARGIN); 339217309Snwhitehorn 340251843Sbapt dlg_draw_box2(dialog, 0, 0, height, width, dialog_attr, border_attr, border2_attr); 341251843Sbapt dlg_draw_bottom_box2(dialog, border_attr, border2_attr, dialog_attr); 342217309Snwhitehorn dlg_draw_title(dialog, title); 343224014Snwhitehorn dlg_draw_helpline(dialog, FALSE); 344217309Snwhitehorn 345217309Snwhitehorn if (!bg_task) { 346217309Snwhitehorn buttons = dlg_exit_label(); 347217309Snwhitehorn dlg_button_layout(buttons, &min_width); 348217309Snwhitehorn dlg_draw_buttons(dialog, height - (2 * MARGIN), 0, buttons, FALSE, 349217309Snwhitehorn FALSE, width); 350217309Snwhitehorn } 351217309Snwhitehorn 352217309Snwhitehorn (void) wmove(dialog, thigh, (MARGIN + 1)); 353217309Snwhitehorn (void) wnoutrefresh(dialog); 354217309Snwhitehorn 355217309Snwhitehorn obj = dlg_calloc(MY_OBJ, 1); 356217309Snwhitehorn assert_ptr(obj, "dialog_tailbox"); 357217309Snwhitehorn 358217309Snwhitehorn obj->obj.input = fd; 359217309Snwhitehorn obj->obj.win = dialog; 360217309Snwhitehorn obj->obj.handle_getc = handle_my_getc; 361220749Snwhitehorn obj->obj.handle_input = bg_task ? handle_input : 0; 362217309Snwhitehorn obj->obj.keep_bg = bg_task && dialog_vars.cant_kill; 363217309Snwhitehorn obj->obj.bg_task = bg_task; 364217309Snwhitehorn obj->text = text; 365217309Snwhitehorn obj->buttons = buttons; 366217309Snwhitehorn dlg_add_callback(&(obj->obj)); 367217309Snwhitehorn 368217309Snwhitehorn dlg_register_window(dialog, "tailbox", binding); 369217309Snwhitehorn dlg_register_buttons(dialog, "tailbox", buttons); 370217309Snwhitehorn 371217309Snwhitehorn /* Print last page of text */ 372217309Snwhitehorn dlg_attr_clear(text, thigh, getmaxx(text), dialog_attr); 373217309Snwhitehorn repaint_text(obj); 374217309Snwhitehorn 375251843Sbapt dlg_trace_win(dialog); 376217309Snwhitehorn if (bg_task) { 377217309Snwhitehorn result = DLG_EXIT_OK; 378217309Snwhitehorn } else { 379217309Snwhitehorn int ch; 380217309Snwhitehorn do { 381217309Snwhitehorn ch = dlg_getc(dialog, &fkey); 382217309Snwhitehorn#ifdef KEY_RESIZE 383217309Snwhitehorn if (fkey && ch == KEY_RESIZE) { 384217309Snwhitehorn /* reset data */ 385217309Snwhitehorn height = old_height; 386217309Snwhitehorn width = old_width; 387217309Snwhitehorn /* repaint */ 388217309Snwhitehorn dlg_clear(); 389217309Snwhitehorn dlg_del_window(dialog); 390217309Snwhitehorn refresh(); 391217309Snwhitehorn dlg_mouse_free_regions(); 392217309Snwhitehorn dlg_button_layout(buttons, &min_width); 393217309Snwhitehorn goto retry; 394217309Snwhitehorn } 395217309Snwhitehorn#endif 396217309Snwhitehorn } 397217309Snwhitehorn while (handle_my_getc(&(obj->obj), ch, fkey, &result)); 398217309Snwhitehorn } 399217309Snwhitehorn dlg_mouse_free_regions(); 400217309Snwhitehorn return result; 401217309Snwhitehorn} 402