--- /dev/null
+/****************************************************************************
+ * Copyright (c) 2007 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: inchs.c,v 1.4 2007/02/11 00:27:12 tom Exp $
+ */
+/*
+ chtype inch(void);
+ chtype winch(WINDOW *win);
+ chtype mvinch(int y, int x);
+ chtype mvwinch(WINDOW *win, int y, int x);
+ int inchstr(chtype *chstr);
+ int inchnstr(chtype *chstr, int n);
+ int winchstr(WINDOW *win, chtype *chstr);
+ int winchnstr(WINDOW *win, chtype *chstr, int n);
+ int mvinchstr(int y, int x, chtype *chstr);
+ int mvinchnstr(int y, int x, chtype *chstr, int n);
+ int mvwinchstr(WINDOW *win, int y, int x, chtype *chstr);
+ int mvwinchnstr(WINDOW *win, int y, int x, chtype *chstr, int n);
+*/
+
+#include <test.priv.h>
+
+#define MAX_COLS 1024
+
+static bool
+Quit(int ch)
+{
+ return (ch == ERR || ch == QUIT || ch == ESCAPE);
+}
+
+int
+main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
+{
+ WINDOW *txtbox;
+ WINDOW *txtwin;
+ WINDOW *chrbox;
+ WINDOW *chrwin;
+ WINDOW *strwin;
+ FILE *fp;
+ int ch, j;
+ int txt_x = 0, txt_y = 0;
+ int limit;
+ chtype text[MAX_COLS];
+
+ setlocale(LC_ALL, "");
+
+ if (argc != 2) {
+ fprintf(stderr, "usage: %s file\n", argv[0]);
+ return EXIT_FAILURE;
+ }
+
+ initscr();
+
+ 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);
+
+ 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) {
+ while ((ch = fgetc(fp)) != EOF) {
+ if (waddch(txtwin, ch) != OK) {
+ break;
+ }
+ }
+ } else {
+ wprintw(txtwin, "Cannot open:\n%s", argv[1]);
+ }
+ fclose(fp);
+ while (!Quit(ch = mvwgetch(txtwin, txt_y, txt_x))) {
+ switch (ch) {
+ case KEY_DOWN:
+ case 'j':
+ if (txt_y < getmaxy(txtwin) - 1)
+ txt_y++;
+ else
+ beep();
+ break;
+ case KEY_UP:
+ case 'k':
+ if (txt_y > 0)
+ 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;
+ }
+
+ wmove(txtwin, txt_y, txt_x);
+
+ mvwprintw(chrwin, 0, 0, "char:");
+ wclrtoeol(chrwin);
+ if ((ch = winch(txtwin)) != ERR) {
+ if (waddch(chrwin, (chtype) ch) != ERR) {
+ for (j = txt_x + 1; j < getmaxx(txtwin); ++j) {
+ if ((ch = mvwinch(txtwin, txt_y, j)) != ERR) {
+ if (waddch(chrwin, (chtype) ch) == ERR) {
+ break;
+ }
+ } else {
+ break;
+ }
+ }
+ }
+ }
+ wnoutrefresh(chrwin);
+
+ mvwprintw(strwin, 0, 0, "text:");
+ wclrtobot(strwin);
+
+ limit = getmaxx(strwin) - 5;
+
+ wmove(txtwin, txt_y, txt_x);
+ if (winchstr(txtwin, text) != ERR) {
+ mvwaddchstr(strwin, 0, 5, text);
+ }
+
+ wmove(txtwin, txt_y, txt_x);
+ if (winchnstr(txtwin, text, limit) != ERR) {
+ mvwaddchstr(strwin, 1, 5, text);
+ }
+
+ if (mvwinchstr(txtwin, txt_y, txt_x, text) != ERR) {
+ mvwaddchstr(strwin, 2, 5, text);
+ }
+
+ if (mvwinchnstr(txtwin, txt_y, txt_x, text, limit) != ERR) {
+ mvwaddchstr(strwin, 3, 5, text);
+ }
+
+ wnoutrefresh(strwin);
+
+ /* FIXME: want stdscr tests also, but must be separate program */
+ }
+ endwin();
+ return EXIT_SUCCESS;
+}