X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=test%2Fsavescreen.c;h=e48800dbabd13b93471a0bbcc5d16f51f5d729a5;hp=49992c68dfa5abb0bb99f9e6698c138e9942ee36;hb=5d8dbcdd9423bf9821db414fd9ec792ccf1f1027;hpb=027ae42953e3186daed8f3882da73de48291b606 diff --git a/test/savescreen.c b/test/savescreen.c old mode 100755 new mode 100644 index 49992c68..e48800db --- a/test/savescreen.c +++ b/test/savescreen.c @@ -1,5 +1,5 @@ /**************************************************************************** - * Copyright (c) 2006 Free Software Foundation, Inc. * + * Copyright (c) 2007-2015,2017 Free Software Foundation, Inc. * * * * Permission is hereby granted, free of charge, to any person obtaining a * * copy of this software and associated documentation files (the * @@ -26,23 +26,472 @@ * authorization. * ****************************************************************************/ /* - * $Id: savescreen.c,v 1.2 2006/04/01 19:08:03 tom Exp $ + * $Id: savescreen.c,v 1.34 2017/09/04 15:01:45 tom Exp $ * * Demonstrate save/restore functions from the curses library. - * Thomas Dickey - 2006/2/11 + * Thomas Dickey - 2007/7/14 */ -/* -scr_dump - -scr_init - -scr_restore - -scr_set - -*/ #include +#include + +#if HAVE_SCR_DUMP + +#include +#include + +#if TIME_WITH_SYS_TIME +# include +# include +#else +# if HAVE_SYS_TIME_H +# include +# else +# include +# endif +#endif + +#if defined(__hpux) +#define MyMarker 'X' +#else +#define MyMarker ACS_DIAMOND +#endif + +static bool use_init = FALSE; +static bool keep_dumps = FALSE; + +#if USE_WIDEC_SUPPORT +/* In HPUX curses, cchar_t is opaque; other implementations are not */ +static wchar_t +BaseChar(cchar_t data) +{ + wchar_t my_wchar[sizeof(cchar_t)]; + attr_t my_attr; + short my_pair; + getcchar(&data, my_wchar, &my_attr, &my_pair, NULL); + return my_wchar[0]; +} +#endif + +static int +fexists(const char *name) +{ + struct stat sb; + return (stat(name, &sb) == 0 && (sb.st_mode & S_IFMT) == S_IFREG); +} + +static void +setup_next(void) +{ + curs_set(1); + reset_shell_mode(); +} + +static void +cleanup(char *files[]) +{ + int n; + + if (!keep_dumps) { + for (n = 0; files[n] != 0; ++n) { + unlink(files[n]); + } + } +} + +static int +load_screen(char *filename) +{ + int result; + + if (use_init) { + if ((result = scr_init(filename)) != ERR) + result = scr_restore(filename); + } else { + result = scr_set(filename); + } + return result; +} + +/* + * scr_restore() or scr_set() operates on curscr. If we read a character using + * getch() that will refresh stdscr, wiping out the result. To avoid that, + * copy the data back from curscr to stdscr. + */ +static void +after_load(void) +{ + overwrite(curscr, stdscr); + doupdate(); +} + +static void +show_what(int which, int last) +{ + int y, x, n; + time_t now; + char *mytime; + + getyx(stdscr, y, x); + + move(0, 0); + printw("Saved %d of %d (? for help)", which, last + 1); + + now = time((time_t *) 0); + mytime = ctime(&now); + for (n = (int) strlen(mytime) - 1; n >= 0; --n) { + if (isspace(UChar(mytime[n]))) { + mytime[n] = '\0'; + } else { + break; + } + } + mvprintw(0, (COLS - n - 2), " %s", mytime); + + move(y, x); + + refresh(); +} + +static int +get_command(int which, int last) +{ + int ch; + + timeout(50); + + do { + show_what(which, last); + ch = getch(); + } while (ch == ERR); + + return ch; +} + +static void +editor_help(void) +{ + static const char *msgs[] = + { + "You are now in the screen-editor, which allows you to make some", + "lines on the screen, as well as save copies of the screen to a", + "temporary file", + "", + "Keys:", + " q quit", + " n run the screen-loader to show the saved screens", + " dump a screen", + "", + " a toggle between '#' and graphic symbol for drawing", + " c change color drawn by line to next in palette", + " h,j,k,l or arrows to move around the screen, drawing", + 0 + }; + popup_msg(stdscr, msgs); +} + +static void +replay_help(void) +{ + static const char *msgs[] = + { + "You are now in the screen-loader, which allows you to view", + "the dumped/restored screens.", + "", + "Keys:", + " q quit", + " load the next screen", + " load the previous screen", + 0 + }; + popup_msg(stdscr, msgs); +} + +static void +usage(void) +{ + static const char *msg[] = + { + "Usage: savescreen [-r] files", + "", + "Options:", + " -f file fill/initialize screen using text from this file", + " -i use scr_init/scr_restore rather than scr_set", + " -k keep the restored dump-files rather than removing them", + " -r replay the screen-dump files" + }; + unsigned n; + for (n = 0; n < SIZEOF(msg); ++n) { + fprintf(stderr, "%s\n", msg[n]); + } + ExitProgram(EXIT_FAILURE); +} + +int +main(int argc, char *argv[]) +{ + int ch; + int which = 0; + int last; + bool replaying = FALSE; + bool done = FALSE; + char **files; + char *fill_by = 0; +#if USE_WIDEC_SUPPORT + cchar_t mycc; + int myxx; +#endif + + setlocale(LC_ALL, ""); + + while ((ch = getopt(argc, argv, "f:ikr")) != -1) { + switch (ch) { + case 'f': + fill_by = optarg; + break; + case 'i': + use_init = TRUE; + break; + case 'k': + keep_dumps = TRUE; + break; + case 'r': + replaying = TRUE; + break; + default: + usage(); + break; + } + } + + files = argv + optind; + last = argc - optind - 1; + + if (replaying) { + while (last >= 0 && !fexists(files[last])) + --last; + } + + initscr(); + cbreak(); + noecho(); + keypad(stdscr, TRUE); + curs_set(0); + if (has_colors()) { + short pair; + short color; + + start_color(); + /* + * Assume pairs is the square of colors, and assign pairs going down + * so that there is minimal conflict with the background color (which + * counts up). The intent is just to show how color pair values are + * saved and restored. + */ + for (pair = 0; pair < COLOR_PAIRS; ++pair) { + color = (short) (pair % (COLORS - 1)); + init_pair(pair, (short) (COLOR_WHITE - color), color); + } + } + + if (fill_by != 0) { + FILE *fp = fopen(fill_by, "r"); + if (fp != 0) { + bool filled = FALSE; + move(1, 0); + while ((ch = fgetc(fp)) != EOF) { + if (addch(UChar(ch)) == ERR) { + filled = TRUE; + break; + } + } + fclose(fp); + if (!filled) { + while (addch(' ') != ERR) { + ; + } + } + move(0, 0); + } else { + exit_curses(); + fprintf(stderr, "Cannot open \"%s\"\n", fill_by); + ExitProgram(EXIT_FAILURE); + } + } + + if (replaying) { + + /* + * Use the last file as the initial/current screen. + */ + if (last < 0) { + exit_curses(); + printf("No screen-dumps given\n"); + ExitProgram(EXIT_FAILURE); + } + + which = last; + if (load_screen(files[which]) == ERR) { + exit_curses(); + printf("Cannot load screen-dump %s\n", files[which]); + ExitProgram(EXIT_FAILURE); + } + after_load(); + + while (!done && (ch = getch()) != ERR) { + switch (ch) { + case 'n': + /* + * If we got a "next" here, skip to the final screen before + * moving to the next process. + */ + setup_next(); + which = last; + done = TRUE; + break; + case 'q': + cleanup(files); + done = TRUE; + break; + case KEY_BACKSPACE: + case '\b': + if (--which < 0) + which = last; + break; + case ' ': + if (++which > last) + which = 0; + break; + case HELP_KEY_1: + replay_help(); + break; + default: + beep(); + continue; + } + + if (ch == 'q') { + ; + } else if (scr_restore(files[which]) == ERR) { + endwin(); + printf("Cannot load screen-dump %s\n", files[which]); + cleanup(files); + ExitProgram(EXIT_FAILURE); + } else { + wrefresh(curscr); + } + } + endwin(); + } else { + int y = 0; + int x = 0; + int color = 0; + int altchars = 0; + + while (!done) { + switch (get_command(which, last)) { + case 'n': + setup_next(); + done = TRUE; + break; + case 'q': + cleanup(files); + done = TRUE; + break; + case ' ': + if (files[which] != 0) { + show_what(which + 1, last); + if (scr_dump(files[which]) == ERR) { + endwin(); + printf("Cannot write screen-dump %s\n", files[which]); + cleanup(files); + done = TRUE; + break; + } + ++which; + if (has_colors()) { + int cx, cy; + short pair = (short) (which % COLOR_PAIRS); + /* + * Change the background color, to make it more + * obvious. But that changes the existing text-color. + * Copy the old values from the currently displayed + * screen. + */ + bkgd((chtype) COLOR_PAIR(pair)); + for (cy = 1; cy < LINES; ++cy) { + for (cx = 0; cx < COLS; ++cx) { + wmove(curscr, cy, cx); + wmove(stdscr, cy, cx); +#if USE_WIDEC_SUPPORT + if (win_wch(curscr, &mycc) != ERR) { + myxx = wcwidth(BaseChar(mycc)); + if (myxx > 0) { + wadd_wchnstr(stdscr, &mycc, 1); + cx += (myxx - 1); + } + } +#else + waddch(stdscr, winch(curscr)); +#endif + } + } + } + } else { + beep(); + } + break; + case KEY_LEFT: + case 'h': + if (--x < 0) + x = COLS - 1; + break; + case KEY_DOWN: + case 'j': + if (++y >= LINES) + y = 1; + break; + case KEY_UP: + case 'k': + if (--y < 1) + y = LINES - 1; + break; + case KEY_RIGHT: + case 'l': + if (++x >= COLS) + x = 0; + break; + case 'a': + altchars = !altchars; + break; + case 'c': + color = (color + 1) % COLORS; + break; + case HELP_KEY_1: + editor_help(); + break; + default: + beep(); + continue; + } + if (!done) { + attr_t attr = (A_REVERSE | (attr_t) COLOR_PAIR(color * COLORS)); + chtype ch2 = (altchars ? MyMarker : '#'); + move(y, x); + AddCh(ch2 | attr); + move(y, x); + } + } + endwin(); + } + ExitProgram(EXIT_SUCCESS); +} +#else int main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED) { - printf("Not implemented - demo for screen save/restore\n"); - return EXIT_SUCCESS; + printf("This program requires the screen-dump functions\n"); + ExitProgram(EXIT_FAILURE); } +#endif