Update to ncurses-6.0
Change-Id: I98ab2ea8a5e13cca9f8b7cf6277b9b14a4da4299
diff --git a/test/clip_printw.c b/test/clip_printw.c
new file mode 100644
index 0000000..d40bf01
--- /dev/null
+++ b/test/clip_printw.c
@@ -0,0 +1,383 @@
+/****************************************************************************
+ * Copyright (c) 2008-2012,2014 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: clip_printw.c,v 1.10 2014/08/02 23:13:29 tom Exp $
+ *
+ * demonstrate how to use printw without wrapping.
+ */
+
+#include <test.priv.h>
+
+#ifdef HAVE_VW_PRINTW
+
+#define SHOW(n) ((n) == ERR ? "ERR" : "OK")
+#define COLOR_DEFAULT (-1)
+
+typedef struct {
+ unsigned c;
+ unsigned v;
+ int status;
+ int pair;
+ attr_t attr;
+ int count;
+ int ch;
+ const char *c_msg;
+ const char *v_msg;
+ int y_val;
+ int x_val;
+ int y_beg, x_beg;
+ int y_max, x_max;
+} STATUS;
+
+static int
+clip_wprintw(WINDOW *win, NCURSES_CONST char *fmt,...)
+{
+ int y0, x0, y1, x1, width;
+ WINDOW *sub;
+ va_list ap;
+ int rc;
+
+ /*
+ * Allocate a single-line derived window extending from the current
+ * cursor position to the end of the current line in the given window.
+ * Disable scrolling in the derived window.
+ */
+ getyx(win, y0, x0);
+ width = getmaxx(win) - x0;
+ sub = derwin(win, 1, width, y0, x0);
+ scrollok(sub, FALSE);
+
+ /*
+ * Print the text.
+ */
+ va_start(ap, fmt);
+ rc = vw_printw(sub, fmt, ap);
+ va_end(ap);
+
+ getyx(sub, y1, x1);
+ delwin(sub);
+
+ wmove(win, y1 + y0, x1 + x0);
+
+ return rc;
+}
+
+static const char *
+color_params(unsigned state, int *pair)
+{
+ /* *INDENT-OFF* */
+ static struct {
+ int pair;
+ int fg, bg;
+ const char *msg;
+ } table[] = {
+ { 0, COLOR_DEFAULT, COLOR_DEFAULT, "default" },
+ { 1, COLOR_RED, COLOR_BLACK, "red/black" },
+ { 2, COLOR_WHITE, COLOR_BLUE, "white/blue" },
+ };
+ /* *INDENT-ON* */
+
+ static bool first = TRUE;
+ const char *result = 0;
+
+ if (has_colors()) {
+ if (first) {
+ unsigned n;
+
+ start_color();
+ for (n = 0; n < SIZEOF(table); ++n) {
+ init_pair((short) table[n].pair,
+ (short) table[n].fg,
+ (short) table[n].bg);
+ }
+ }
+ if (state < SIZEOF(table)) {
+ *pair = table[state].pair;
+ result = table[state].msg;
+ }
+ }
+ return result;
+}
+
+static const char *
+video_params(unsigned state, attr_t *attr)
+{
+ /* *INDENT-OFF* */
+ static struct {
+ attr_t attr;
+ const char *msg;
+ } table[] = {
+ { A_NORMAL, "normal" },
+ { A_BOLD, "bold" },
+ { A_REVERSE, "reverse" },
+ { A_UNDERLINE, "underline" },
+ { A_BLINK, "blink" },
+ };
+ /* *INDENT-ON* */
+
+ const char *result = 0;
+
+ if (state < SIZEOF(table)) {
+ *attr = table[state].attr;
+ result = table[state].msg;
+ }
+ return result;
+}
+
+/* fill the window with a test-pattern */
+static void
+fill_window(WINDOW *win)
+{
+ int y, x;
+ int y0 = -1, x0 = -1;
+
+ getyx(win, y, x);
+ wmove(win, 0, 0);
+ while (waddstr(win, "0123456789 abcdefghijklmnopqrstuvwxyz ") != ERR) {
+ int y1, x1;
+ getyx(win, y1, x1);
+ if (y1 == y0 && x1 == x0)
+ break;
+ x0 = x1;
+ y0 = y1;
+ }
+ wmove(win, y, x);
+}
+
+static void
+show_status(WINDOW *win, STATUS * sp)
+{
+ int y, x;
+
+ getyx(win, y, x);
+ wmove(win, 0, 0);
+ wprintw(win, "Count %d", sp->count);
+ if (sp->v_msg != 0)
+ wprintw(win, " Video %s", sp->v_msg);
+ if (sp->c_msg != 0)
+ wprintw(win, " Color %s", sp->c_msg);
+ wprintw(win, " (%d)", sp->status);
+ wclrtoeol(win);
+ wmove(win, y, x);
+}
+
+static void
+do_subwindow(WINDOW *win, STATUS * sp, void func(WINDOW *))
+{
+ WINDOW *win1 = newwin(sp->y_max - 2, sp->x_max - 2,
+ sp->y_beg + 1, sp->x_beg + 1);
+
+ if (win1 != 0 && sp->y_max > 4 && sp->x_max > 4) {
+ WINDOW *win2 = derwin(win1, sp->y_max - 4, sp->x_max - 4, 1, 1);
+
+ if (win2 != 0) {
+ box(win1, 0, 0);
+ wrefresh(win1);
+ func(win2);
+
+ delwin(win2);
+ } else {
+ beep();
+ }
+ delwin(win1);
+ touchwin(win);
+ } else {
+ if (win1)
+ delwin(win1);
+ beep();
+ }
+}
+
+static void
+init_status(WINDOW *win, STATUS * sp)
+{
+ memset(sp, 0, sizeof(*sp));
+ sp->c = 99;
+ sp->v = 99;
+ sp->ch = ' ';
+
+ keypad(win, TRUE);
+ fill_window(win);
+
+ getbegyx(win, sp->y_beg, sp->x_beg);
+ getmaxyx(win, sp->y_max, sp->x_max);
+}
+
+static void
+show_help(WINDOW *win)
+{
+ static const char *table[] =
+ {
+ "Basic commands:"
+ ,"Use h/j/k/l or arrow keys to move the cursor."
+ ,"Set the count parameter for clip_wprintw by entering digits 0-9."
+ ,""
+ ,"Other commands:"
+ ,"space toggles through the set of video attributes and colors."
+ ,"t touches (forces repaint) of the current line."
+ ,". calls clip_wprintw at the current position with the given count."
+ ,"= resets count to zero."
+ ,"? shows this help-window"
+ ,""
+ };
+
+ int y_max, x_max;
+ int row;
+
+ getmaxyx(win, y_max, x_max);
+ for (row = 0; row < (int) SIZEOF(table) && row < y_max; ++row) {
+ MvWPrintw(win, row, 0, "%.*s", x_max, table[row]);
+ }
+ while (wgetch(win) != 'q')
+ beep();
+}
+
+static void
+update_status(WINDOW *win, STATUS * sp)
+{
+ switch (sp->ch) {
+ case ' ': /* next test-iteration */
+ if (has_colors()) {
+ if ((sp->c_msg = color_params(++(sp->c), &(sp->pair))) == 0) {
+ sp->c_msg = color_params(sp->c = 0, &(sp->pair));
+ if ((sp->v_msg = video_params(++(sp->v), &(sp->attr))) == 0) {
+ sp->v_msg = video_params(sp->v = 0, &(sp->attr));
+ }
+ }
+ } else {
+ if ((sp->v_msg = video_params(++(sp->v), &(sp->attr))) == 0) {
+ sp->v_msg = video_params(sp->v = 0, &(sp->attr));
+ }
+ }
+ sp->count = 0;
+ show_status(win, sp);
+ break;
+ case KEY_LEFT:
+ case 'h':
+ if (sp->x_val > 0)
+ wmove(win, sp->y_val, --(sp->x_val));
+ break;
+ case KEY_DOWN:
+ case 'j':
+ if (sp->y_val < sp->y_max)
+ wmove(win, ++(sp->y_val), sp->x_val);
+ break;
+ case KEY_UP:
+ case 'k':
+ if (sp->y_val > 0)
+ wmove(win, --(sp->y_val), sp->x_val);
+ break;
+ case KEY_RIGHT:
+ case 'l':
+ if (sp->x_val < sp->x_max)
+ wmove(win, sp->y_val, ++(sp->x_val));
+ break;
+ case 't':
+ touchline(win, sp->y_val, 1);
+ break;
+ case '=':
+ sp->count = 0;
+ show_status(win, sp);
+ break;
+ case '?':
+ do_subwindow(win, sp, show_help);
+ break;
+ default:
+ if (isdigit(sp->ch)) {
+ sp->count = (sp->count * 10) + (sp->ch - '0');
+ show_status(win, sp);
+ } else {
+ beep();
+ }
+ break;
+ }
+}
+
+static void
+test_clipping(WINDOW *win)
+{
+ STATUS st;
+ char fmt[80];
+ char *buffer;
+ unsigned j, need;
+
+ init_status(win, &st);
+
+ do {
+ switch (st.ch) {
+ case '.': /* change from current position */
+ (void) wattrset(win, AttrArg(COLOR_PAIR(st.pair), st.attr));
+ if (st.count > 0) {
+ need = (unsigned) st.count + 1;
+ sprintf(fmt, "%%c%%%ds%%c", st.count);
+ } else {
+ need = (unsigned) getmaxx(win) - 1;
+ strcpy(fmt, "%c%s%c");
+ }
+ if ((buffer = typeMalloc(char, need + 1)) != 0) {
+ for (j = 0; j < need; ++j) {
+ buffer[j] = (char) ('A' + (j % 26));
+ }
+ buffer[need - 1] = '\0';
+ st.status = clip_wprintw(win, fmt, '[', buffer, ']');
+ free(buffer);
+ }
+ break;
+ case 'w':
+ do_subwindow(win, &st, test_clipping);
+ break;
+ case 'q':
+ return;
+ default:
+ update_status(win, &st);
+ break;
+ }
+ } while ((st.ch = wgetch(win)) != ERR);
+}
+
+int
+main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
+{
+ initscr();
+ cbreak();
+ noecho();
+
+ test_clipping(stdscr);
+ endwin();
+
+ ExitProgram(EXIT_SUCCESS);
+}
+
+#else
+int
+main(void)
+{
+ printf("This program requires the curses vw_printw function\n");
+ ExitProgram(EXIT_FAILURE);
+}
+#endif