ncursesw-morphos/test/chgat.c
Thomas E. Dickey dfaa1a3001 ncurses 5.7 - patch 20090718
+ fix a null-pointer check in _nc_format_slks() in lib_slk.c, from
  20070704 changes.
+ modify _nc_find_type_entry() to use hashing.
+ make CCHARW_MAX value configurable, noting that changing this would
  change the size of cchar_t, and would be ABI-incompatible.
+ modify test-programs, e.g,.  test/view.c, to address subtle
  differences between Tru64/Solaris and HPUX/AIX getcchar() return
  values.
+ modify length returned by getcchar() to count the trailing null
  which is documented in X/Open (cf: 20020427).
+ fixes for test programs to build/work on HPUX and AIX, etc.
2009-07-19 01:03:05 +00:00

376 lines
9.0 KiB
C

/****************************************************************************
* Copyright (c) 2006-2008,2009 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: chgat.c,v 1.9 2009/07/15 23:21:04 tom Exp $
*
* test-driver for chgat/wchgat/mvchgat/mvwchgat
*/
#include <test.priv.h>
#if HAVE_CHGAT
#define SHOW(n) ((n) == ERR ? "ERR" : "OK")
#define COLOR_DEFAULT (-1)
#if defined(NCURSES_VERSION_PATCH) && NCURSES_VERSION_PATCH < 20060715
#define touch_if_needed(win, row) touchline(win, row, 1)
#else
#define touch_if_needed(win, row) /* nothing */
#endif
typedef struct {
unsigned c;
unsigned v;
int pair;
unsigned 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 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(table[n].pair, table[n].fg, table[n].bg);
}
}
if (state < SIZEOF(table)) {
*pair = table[state].pair;
result = table[state].msg;
}
}
return result;
}
static const char *
video_params(unsigned state, unsigned *attr)
{
/* *INDENT-OFF* */
static struct {
unsigned 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);
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 {
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 chgat 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 *chgat at the current position with the given count."
,", calls *chgat at the window beginning with the given count."
,"= resets count to zero."
,"- negates count."
,"? 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 '-':
sp->count = -(sp->count);
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_wchgat(WINDOW *win)
{
STATUS st;
init_status(win, &st);
do {
switch (st.ch) {
case '.': /* change from current position */
wchgat(win, st.count, st.attr, st.pair, (void *) 0);
touch_if_needed(win, st.y_val);
break;
case ',': /* change from beginning of window */
mvwchgat(win, 0, 0, st.count, st.attr, st.pair, (void *) 0);
touch_if_needed(win, 0);
wmove(win, st.y_val, st.x_val);
break;
case 'w':
do_subwindow(win, &st, test_wchgat);
break;
case 'q':
return;
default:
update_status(win, &st);
break;
}
} while ((st.ch = wgetch(win)) != ERR);
}
static void
test_chgat(void)
{
STATUS st;
init_status(stdscr, &st);
do {
switch (st.ch) {
case '.': /* change from current position */
chgat(st.count, st.attr, st.pair, (void *) 0);
touch_if_needed(stdscr, st.y_val);
break;
case ',': /* change from beginning of window */
mvchgat(0, 0, st.count, st.attr, st.pair, (void *) 0);
touch_if_needed(stdscr, 0);
move(st.y_val, st.x_val);
break;
case 'w':
do_subwindow(stdscr, &st, test_wchgat);
break;
case 'q':
return;
default:
update_status(stdscr, &st);
break;
}
} while ((st.ch = getch()) != ERR);
}
int
main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
{
initscr();
cbreak();
noecho();
test_chgat();
endwin();
ExitProgram(EXIT_SUCCESS);
}
#else
int
main(void)
{
printf("This program requires the curses chgat function\n");
ExitProgram(EXIT_FAILURE);
}
#endif