/****************************************************************************
- * Copyright (c) 2007 Free Software Foundation, Inc. *
+ * Copyright 2019-2020,2022 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 *
* authorization. *
****************************************************************************/
/*
- * $Id: inch_wide.c,v 1.3 2007/02/11 00:32:58 tom Exp $
+ * $Id: inch_wide.c,v 1.13 2022/12/10 23:55:34 tom Exp $
*/
/*
int in_wch(cchar_t *wcval);
*/
#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 == QUIT || ch == ESCAPE);
+ return (ch == ERR || ch == 'q' || ch == QUIT || ch == ESCAPE);
}
-int
-main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
+static int
+test_inchs(int level, char **argv, WINDOW *chrwin, WINDOW *strwin)
{
- WINDOW *txtbox;
- WINDOW *txtwin;
- WINDOW *chrbox;
- 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 limit;
+ int base_y;
cchar_t ch;
cchar_t text[MAX_COLS];
- setlocale(LC_ALL, "");
-
- if (argc != 2) {
- fprintf(stderr, "usage: %s file\n", argv[0]);
- return EXIT_FAILURE;
+ if (argv[level] == 0) {
+ beep();
+ return FALSE;
}
- initscr();
+ if (level > 1) {
+ txtbox = newwin(LINES - BASE_Y, COLS - level, BASE_Y, level);
+ box(txtbox, 0, 0);
+ wnoutrefresh(txtbox);
- chrbox = newwin(7, 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);
-
- txtbox = newwin(LINES - 7, COLS, 7, 0);
- box(txtbox, 0, 0);
- wnoutrefresh(txtbox);
-
- txtwin = derwin(txtbox,
- getmaxy(txtbox) - 2,
- getmaxx(txtbox) - 2,
- 1, 1);
+ 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 */
- if ((fp = fopen(argv[1], "r")) != 0) {
+ 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, j) != OK) {
+ if (waddch(txtwin, UChar(j)) != OK) {
break;
}
}
+ fclose(fp);
} else {
wprintw(txtwin, "Cannot open:\n%s", argv[1]);
}
- fclose(fp);
+
while (!Quit(j = mvwgetch(txtwin, txt_y, txt_x))) {
+ int limit;
+
switch (j) {
case KEY_DOWN:
case 'j':
break;
case KEY_UP:
case 'k':
- if (txt_y > 0)
+ if (txt_y > base_y)
txt_y--;
else
beep();
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;
}
- wmove(txtwin, txt_y, txt_x);
-
- mvwprintw(chrwin, 0, 0, "char:");
+ MvWPrintw(chrwin, 0, 0, "char:");
wclrtoeol(chrwin);
- 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) {
+
+ 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;
}
- } else {
- break;
}
}
}
}
wnoutrefresh(chrwin);
- mvwprintw(strwin, 0, 0, "text:");
+ MvWPrintw(strwin, 0, 0, "text:");
wclrtobot(strwin);
limit = getmaxx(strwin) - 5;
- wmove(txtwin, txt_y, txt_x);
- if (win_wchstr(txtwin, text) != ERR) {
- mvwadd_wchstr(strwin, 0, 5, text);
- }
+ 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) {
- mvwadd_wchstr(strwin, 1, 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) {
- mvwadd_wchstr(strwin, 2, 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) {
- mvwadd_wchstr(strwin, 3, 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;
+}
+
+static void
+usage(int ok)
+{
+ static const char *msg[] =
+ {
+ "Usage: inch_wide [options] [file1 [...]]"
+ ,""
+ ,USAGE_COMMON
+ };
+ size_t n;
+
+ for (n = 0; n < SIZEOF(msg); n++)
+ fprintf(stderr, "%s\n", msg[n]);
+
+ ExitProgram(ok ? EXIT_SUCCESS : EXIT_FAILURE);
+}
+/* *INDENT-OFF* */
+VERSION_COMMON()
+/* *INDENT-ON* */
+
+int
+main(int argc, char *argv[])
+{
+ WINDOW *chrbox;
+ WINDOW *chrwin;
+ WINDOW *strwin;
+ int ch;
- /* FIXME: want stdscr tests also, but must be separate program */
+ while ((ch = getopt(argc, argv, OPTS_COMMON)) != -1) {
+ switch (ch) {
+ case OPTS_VERSION:
+ show_version(argv);
+ ExitProgram(EXIT_SUCCESS);
+ default:
+ usage(ch == OPTS_USAGE);
+ /* NOTREACHED */
+ }
}
+
+ setlocale(LC_ALL, "");
+
+ if (optind + 1 > argc)
+ usage(FALSE);
+
+ 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(optind, argv, chrwin, strwin);
+
endwin();
- return EXIT_SUCCESS;
+ ExitProgram(EXIT_SUCCESS);
}
#else
int