| /**************************************************************************** |
| * Copyright 2019,2020 Thomas E. Dickey * |
| * Copyright 2007-2010,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 * |
| * "Software"), to deal in the Software without restriction, including * |
| * without limitation the rights to use, copy, modify, merge, publish, * |
| * distribute, distribute with modifications, sublicense, and/or sell * |
| * copies of the Software, and to permit persons to whom the Software is * |
| * furnished to do so, subject to the following conditions: * |
| * * |
| * The above copyright notice and this permission notice shall be included * |
| * in all copies or substantial portions of the Software. * |
| * * |
| * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * |
| * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * |
| * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * |
| * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * |
| * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * |
| * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * |
| * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * |
| * * |
| * Except as contained in this notice, the name(s) of the above copyright * |
| * holders shall not be used in advertising or otherwise to promote the * |
| * sale, use or other dealings in this Software without prior written * |
| * authorization. * |
| ****************************************************************************/ |
| /* |
| * $Id: inch_wide.c,v 1.11 2020/02/02 23:34:34 tom Exp $ |
| */ |
| /* |
| int in_wch(cchar_t *wcval); |
| int mvin_wch(int y, int x, cchar_t *wcval); |
| int mvwin_wch(WINDOW *win, int y, int x, cchar_t *wcval); |
| int win_wch(WINDOW *win, cchar_t *wcval); |
| int in_wchstr(cchar_t *wchstr); |
| int in_wchnstr(cchar_t *wchstr, int n); |
| int win_wchstr(WINDOW *win, cchar_t *wchstr); |
| int win_wchnstr(WINDOW *win, cchar_t *wchstr, int n); |
| int mvin_wchstr(int y, int x, cchar_t *wchstr); |
| int mvin_wchnstr(int y, int x, cchar_t *wchstr, int n); |
| int mvwin_wchstr(WINDOW *win, int y, int x, cchar_t *wchstr); |
| int mvwin_wchnstr(WINDOW *win, int y, int x, cchar_t *wchstr, int n); |
| */ |
| |
| #include <test.priv.h> |
| #include <popup_msg.h> |
| |
| #if USE_WIDEC_SUPPORT |
| |
| #define BASE_Y 7 |
| #define MAX_COLS 1024 |
| |
| static bool |
| Quit(int ch) |
| { |
| return (ch == ERR || ch == 'q' || ch == QUIT || ch == ESCAPE); |
| } |
| |
| static int |
| test_inchs(int level, char **argv, WINDOW *chrwin, WINDOW *strwin) |
| { |
| static const char *help[] = |
| { |
| "Test input from screen using inch(), etc., in a moveable viewport.", |
| "", |
| "Commands:", |
| " ESC/^Q - quit", |
| " h,j,k,l (and arrow-keys) - move viewport", |
| " w - recur to new window", |
| " for next input file", |
| 0 |
| }; |
| |
| WINDOW *txtbox = 0; |
| WINDOW *txtwin = 0; |
| FILE *fp; |
| int j; |
| int txt_x = 0, txt_y = 0; |
| int base_y; |
| cchar_t ch; |
| cchar_t text[MAX_COLS]; |
| |
| if (argv[level] == 0) { |
| beep(); |
| return FALSE; |
| } |
| |
| if (level > 1) { |
| txtbox = newwin(LINES - BASE_Y, COLS - level, BASE_Y, level); |
| box(txtbox, 0, 0); |
| wnoutrefresh(txtbox); |
| |
| txtwin = derwin(txtbox, |
| getmaxy(txtbox) - 2, |
| getmaxx(txtbox) - 2, |
| 1, 1); |
| base_y = 0; |
| } else { |
| txtwin = stdscr; |
| base_y = BASE_Y; |
| } |
| |
| keypad(txtwin, TRUE); /* enable keyboard mapping */ |
| (void) cbreak(); /* take input chars one at a time, no wait for \n */ |
| (void) noecho(); /* don't echo input */ |
| |
| txt_y = base_y; |
| txt_x = 0; |
| wmove(txtwin, txt_y, txt_x); |
| |
| if ((fp = fopen(argv[level], "r")) != 0) { |
| while ((j = fgetc(fp)) != EOF) { |
| if (waddch(txtwin, UChar(j)) != OK) { |
| break; |
| } |
| } |
| fclose(fp); |
| } else { |
| wprintw(txtwin, "Cannot open:\n%s", argv[1]); |
| } |
| |
| while (!Quit(j = mvwgetch(txtwin, txt_y, txt_x))) { |
| int limit; |
| |
| switch (j) { |
| case KEY_DOWN: |
| case 'j': |
| if (txt_y < getmaxy(txtwin) - 1) |
| txt_y++; |
| else |
| beep(); |
| break; |
| case KEY_UP: |
| case 'k': |
| if (txt_y > base_y) |
| txt_y--; |
| else |
| beep(); |
| break; |
| case KEY_LEFT: |
| case 'h': |
| if (txt_x > 0) |
| txt_x--; |
| else |
| beep(); |
| break; |
| case KEY_RIGHT: |
| case 'l': |
| if (txt_x < getmaxx(txtwin) - 1) |
| txt_x++; |
| else |
| beep(); |
| break; |
| case 'w': |
| test_inchs(level + 1, argv, chrwin, strwin); |
| if (txtbox != 0) { |
| touchwin(txtbox); |
| wnoutrefresh(txtbox); |
| } else { |
| touchwin(txtwin); |
| wnoutrefresh(txtwin); |
| } |
| break; |
| case HELP_KEY_1: |
| popup_msg(txtwin, help); |
| break; |
| default: |
| beep(); |
| break; |
| } |
| |
| MvWPrintw(chrwin, 0, 0, "char:"); |
| wclrtoeol(chrwin); |
| |
| if (txtwin != stdscr) { |
| wmove(txtwin, txt_y, txt_x); |
| if (win_wch(txtwin, &ch) != ERR) { |
| if (wadd_wch(chrwin, &ch) != ERR) { |
| for (j = txt_x + 1; j < getmaxx(txtwin); ++j) { |
| if (mvwin_wch(txtwin, txt_y, j, &ch) != ERR) { |
| if (wadd_wch(chrwin, &ch) == ERR) { |
| break; |
| } |
| } else { |
| break; |
| } |
| } |
| } |
| } |
| } else { |
| move(txt_y, txt_x); |
| if (in_wch(&ch) != ERR) { |
| if (wadd_wch(chrwin, &ch) != ERR) { |
| for (j = txt_x + 1; j < getmaxx(txtwin); ++j) { |
| if (mvin_wch(txt_y, j, &ch) != ERR) { |
| if (wadd_wch(chrwin, &ch) == ERR) { |
| break; |
| } |
| } else { |
| break; |
| } |
| } |
| } |
| } |
| } |
| wnoutrefresh(chrwin); |
| |
| MvWPrintw(strwin, 0, 0, "text:"); |
| wclrtobot(strwin); |
| |
| limit = getmaxx(strwin) - 5; |
| |
| if (txtwin != stdscr) { |
| wmove(txtwin, txt_y, txt_x); |
| if (win_wchstr(txtwin, text) != ERR) { |
| (void) mvwadd_wchstr(strwin, 0, 5, text); |
| } |
| |
| wmove(txtwin, txt_y, txt_x); |
| if (win_wchnstr(txtwin, text, limit) != ERR) { |
| (void) mvwadd_wchstr(strwin, 1, 5, text); |
| } |
| |
| if (mvwin_wchstr(txtwin, txt_y, txt_x, text) != ERR) { |
| (void) mvwadd_wchstr(strwin, 2, 5, text); |
| } |
| |
| if (mvwin_wchnstr(txtwin, txt_y, txt_x, text, limit) != ERR) { |
| (void) mvwadd_wchstr(strwin, 3, 5, text); |
| } |
| } else { |
| move(txt_y, txt_x); |
| if (in_wchstr(text) != ERR) { |
| (void) mvwadd_wchstr(strwin, 0, 5, text); |
| } |
| |
| move(txt_y, txt_x); |
| if (in_wchnstr(text, limit) != ERR) { |
| (void) mvwadd_wchstr(strwin, 1, 5, text); |
| } |
| |
| if (mvin_wchstr(txt_y, txt_x, text) != ERR) { |
| (void) mvwadd_wchstr(strwin, 2, 5, text); |
| } |
| |
| if (mvin_wchnstr(txt_y, txt_x, text, limit) != ERR) { |
| (void) mvwadd_wchstr(strwin, 3, 5, text); |
| } |
| } |
| |
| wnoutrefresh(strwin); |
| } |
| if (level > 1) { |
| delwin(txtwin); |
| delwin(txtbox); |
| } |
| return TRUE; |
| } |
| |
| int |
| main(int argc, char *argv[]) |
| { |
| WINDOW *chrbox; |
| WINDOW *chrwin; |
| WINDOW *strwin; |
| |
| setlocale(LC_ALL, ""); |
| |
| if (argc < 2) { |
| fprintf(stderr, "usage: %s file1 [file2 [...]]\n", argv[0]); |
| return EXIT_FAILURE; |
| } |
| |
| initscr(); |
| |
| chrbox = derwin(stdscr, BASE_Y, COLS, 0, 0); |
| box(chrbox, 0, 0); |
| wnoutrefresh(chrbox); |
| |
| chrwin = derwin(chrbox, 1, COLS - 2, 1, 1); |
| strwin = derwin(chrbox, 4, COLS - 2, 2, 1); |
| |
| test_inchs(1, argv, chrwin, strwin); |
| |
| endwin(); |
| ExitProgram(EXIT_SUCCESS); |
| } |
| #else |
| int |
| main(void) |
| { |
| printf("This program requires the wide-ncurses library\n"); |
| ExitProgram(EXIT_FAILURE); |
| } |
| #endif |
