1145 lines
26 KiB
C
1145 lines
26 KiB
C
/*
|
|
* This is a test program for PDCurses. Originally by
|
|
* John Burnell <johnb@kea.am.dsir.govt.nz>
|
|
*
|
|
* wrs(5/28/93) -- modified to be consistent (perform identically)
|
|
* with either PDCurses or under Unix System V, R4
|
|
*
|
|
* $Id: testcurs.c,v 1.85 2008/07/14 12:35:23 wmcbrine Exp $
|
|
*/
|
|
|
|
#ifndef _XOPEN_SOURCE_EXTENDED
|
|
# define _XOPEN_SOURCE_EXTENDED 1
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
#include <curses.h>
|
|
|
|
#ifdef WACS_S1
|
|
# define HAVE_WIDE 1
|
|
#else
|
|
# define HAVE_WIDE 0
|
|
#endif
|
|
|
|
#include <locale.h>
|
|
|
|
#if HAVE_WIDE
|
|
# include <wchar.h>
|
|
#endif
|
|
|
|
#if defined(PDCURSES) && !defined(XCURSES)
|
|
# define HAVE_RESIZE 1
|
|
#else
|
|
# define HAVE_RESIZE 0
|
|
#endif
|
|
|
|
#ifdef A_COLOR
|
|
# define HAVE_COLOR 1
|
|
#else
|
|
# define HAVE_COLOR 0
|
|
#endif
|
|
|
|
/* Set to non-zero if you want to test the PDCurses clipboard */
|
|
|
|
#define HAVE_CLIPBOARD 0
|
|
|
|
void inputTest(WINDOW *);
|
|
void scrollTest(WINDOW *);
|
|
void introTest(WINDOW *);
|
|
int initTest(WINDOW **, int, char **);
|
|
void outputTest(WINDOW *);
|
|
void padTest(WINDOW *);
|
|
void acsTest(WINDOW *);
|
|
|
|
#if HAVE_COLOR
|
|
void colorTest(WINDOW *);
|
|
#endif
|
|
|
|
#if HAVE_RESIZE
|
|
void resizeTest(WINDOW *);
|
|
#endif
|
|
|
|
#if HAVE_CLIPBOARD
|
|
void clipboardTest(WINDOW *);
|
|
#endif
|
|
|
|
#if HAVE_WIDE
|
|
void wideTest(WINDOW *);
|
|
#endif
|
|
|
|
void display_menu(int, int);
|
|
|
|
struct commands
|
|
{
|
|
const char *text;
|
|
void (*function)(WINDOW *);
|
|
};
|
|
|
|
typedef struct commands COMMAND;
|
|
|
|
#define MAX_OPTIONS (6 + HAVE_COLOR + HAVE_RESIZE + HAVE_CLIPBOARD + HAVE_WIDE)
|
|
|
|
COMMAND command[MAX_OPTIONS] =
|
|
{
|
|
{"Intro Test", introTest},
|
|
{"Pad Test", padTest},
|
|
#if HAVE_RESIZE
|
|
{"Resize Test", resizeTest},
|
|
#endif
|
|
{"Scroll Test", scrollTest},
|
|
{"Input Test", inputTest},
|
|
{"Output Test", outputTest},
|
|
{"ACS Test", acsTest},
|
|
#if HAVE_COLOR
|
|
{"Color Test", colorTest},
|
|
#endif
|
|
#if HAVE_CLIPBOARD
|
|
{"Clipboard Test", clipboardTest},
|
|
#endif
|
|
#if HAVE_WIDE
|
|
{"Wide Input", wideTest}
|
|
#endif
|
|
};
|
|
|
|
int width, height;
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
WINDOW *win;
|
|
int key, old_option = -1, new_option = 0;
|
|
bool quit = FALSE;
|
|
|
|
setlocale(LC_ALL, "");
|
|
|
|
if (initTest(&win, argc, argv))
|
|
return 1;
|
|
|
|
#ifdef A_COLOR
|
|
if (has_colors())
|
|
{
|
|
init_pair(1, COLOR_WHITE, COLOR_BLUE);
|
|
wbkgd(win, COLOR_PAIR(1));
|
|
}
|
|
else
|
|
#endif
|
|
wbkgd(win, A_REVERSE);
|
|
|
|
erase();
|
|
display_menu(old_option, new_option);
|
|
|
|
while (1)
|
|
{
|
|
noecho();
|
|
keypad(stdscr, TRUE);
|
|
raw();
|
|
|
|
key = getch();
|
|
|
|
switch(key)
|
|
{
|
|
case 10:
|
|
case 13:
|
|
case KEY_ENTER:
|
|
old_option = -1;
|
|
erase();
|
|
refresh();
|
|
(*command[new_option].function)(win);
|
|
erase();
|
|
display_menu(old_option, new_option);
|
|
break;
|
|
|
|
case KEY_PPAGE:
|
|
case KEY_HOME:
|
|
old_option = new_option;
|
|
new_option = 0;
|
|
display_menu(old_option, new_option);
|
|
break;
|
|
|
|
case KEY_NPAGE:
|
|
case KEY_END:
|
|
old_option = new_option;
|
|
new_option = MAX_OPTIONS - 1;
|
|
display_menu(old_option, new_option);
|
|
break;
|
|
|
|
case KEY_UP:
|
|
old_option = new_option;
|
|
new_option = (new_option == 0) ?
|
|
new_option : new_option - 1;
|
|
display_menu(old_option, new_option);
|
|
break;
|
|
|
|
case KEY_DOWN:
|
|
old_option = new_option;
|
|
new_option = (new_option == MAX_OPTIONS - 1) ?
|
|
new_option : new_option + 1;
|
|
display_menu(old_option, new_option);
|
|
break;
|
|
#ifdef KEY_RESIZE
|
|
case KEY_RESIZE:
|
|
# ifdef PDCURSES
|
|
resize_term(0, 0);
|
|
# endif
|
|
old_option = -1;
|
|
erase();
|
|
display_menu(old_option, new_option);
|
|
break;
|
|
#endif
|
|
case 'Q':
|
|
case 'q':
|
|
quit = TRUE;
|
|
}
|
|
|
|
if (quit == TRUE)
|
|
break;
|
|
}
|
|
|
|
delwin(win);
|
|
endwin();
|
|
|
|
return 0;
|
|
}
|
|
|
|
void Continue(WINDOW *win)
|
|
{
|
|
mvwaddstr(win, 10, 1, " Press any key to continue");
|
|
wrefresh(win);
|
|
raw();
|
|
wgetch(win);
|
|
}
|
|
|
|
void Continue2(void)
|
|
{
|
|
move(LINES - 1, 1);
|
|
clrtoeol();
|
|
mvaddstr(LINES - 2, 1, " Press any key to continue");
|
|
refresh();
|
|
raw();
|
|
getch();
|
|
}
|
|
|
|
int initTest(WINDOW **win, int argc, char *argv[])
|
|
{
|
|
#ifdef XCURSES
|
|
Xinitscr(argc, argv);
|
|
#else
|
|
initscr();
|
|
#endif
|
|
#ifdef A_COLOR
|
|
if (has_colors())
|
|
start_color();
|
|
#endif
|
|
/* Create a drawing window */
|
|
|
|
width = 60;
|
|
height = 13;
|
|
|
|
*win = newwin(height, width, (LINES - height) / 2, (COLS - width) / 2);
|
|
|
|
if (*win == NULL)
|
|
{
|
|
endwin();
|
|
return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void introTest(WINDOW *win)
|
|
{
|
|
werase(win);
|
|
wmove(win, height / 2 - 5, width / 2);
|
|
wvline(win, ACS_VLINE, 10);
|
|
wmove(win, height / 2, width / 2 - 10);
|
|
whline(win, ACS_HLINE, 20);
|
|
Continue(win);
|
|
|
|
beep();
|
|
werase(win);
|
|
|
|
box(win, ACS_VLINE, ACS_HLINE);
|
|
wrefresh(win);
|
|
|
|
cbreak();
|
|
mvwaddstr(win, 1, 1,
|
|
"You should have a rectangle in the middle of the screen");
|
|
mvwaddstr(win, 2, 1, "You should have heard a beep");
|
|
Continue(win);
|
|
|
|
flash();
|
|
mvwaddstr(win, 3, 1, "You should have seen a flash");
|
|
Continue(win);
|
|
}
|
|
|
|
void scrollTest(WINDOW *win)
|
|
{
|
|
int i, OldY;
|
|
#ifndef PDCURSES
|
|
int OldX;
|
|
#endif
|
|
werase(win);
|
|
mvwaddstr(win, height - 2, 1, "The window will now scroll slowly");
|
|
box(win, ACS_VLINE, ACS_HLINE);
|
|
wrefresh(win);
|
|
scrollok(win, TRUE);
|
|
napms(500);
|
|
|
|
for (i = 1; i <= height; i++)
|
|
{
|
|
napms(150);
|
|
scroll(win);
|
|
wrefresh(win);
|
|
};
|
|
|
|
#ifdef PDCURSES
|
|
OldY = getmaxy(win);
|
|
#else
|
|
getmaxyx(win, OldY, OldX);
|
|
#endif
|
|
mvwaddstr(win, 6, 1, "The top of the window will scroll");
|
|
wmove(win, 1, 1);
|
|
wsetscrreg(win, 0, 4);
|
|
box(win, ACS_VLINE, ACS_HLINE);
|
|
wrefresh(win);
|
|
|
|
for (i = 1; i <= 5; i++)
|
|
{
|
|
napms(500);
|
|
scroll(win);
|
|
wrefresh(win);
|
|
}
|
|
|
|
mvwaddstr(win, 3, 1, "The bottom of the window will scroll");
|
|
wmove(win, 8, 1);
|
|
wsetscrreg(win, 5, --OldY);
|
|
box(win, ACS_VLINE, ACS_HLINE);
|
|
wrefresh(win);
|
|
|
|
for (i = 5; i <= OldY; i++)
|
|
{
|
|
napms(300);
|
|
wscrl(win, -1);
|
|
wrefresh(win);
|
|
}
|
|
|
|
wsetscrreg(win, 0, OldY);
|
|
}
|
|
|
|
void inputTest(WINDOW *win)
|
|
{
|
|
int w, h, bx, by, sw, sh, i, c, num = 0;
|
|
char buffer[80];
|
|
WINDOW *subWin;
|
|
static const char spinner[4] = "/-\\|";
|
|
int spinner_count = 0;
|
|
|
|
wclear(win);
|
|
|
|
getmaxyx(win, h, w);
|
|
getbegyx(win, by, bx);
|
|
|
|
sw = w / 3;
|
|
sh = h / 3;
|
|
|
|
if ((subWin = subwin(win, sh, sw, by + h - sh - 2, bx + w - sw - 2))
|
|
== NULL)
|
|
return;
|
|
|
|
#ifdef A_COLOR
|
|
if (has_colors())
|
|
{
|
|
init_pair(2, COLOR_WHITE, COLOR_RED);
|
|
wbkgd(subWin, COLOR_PAIR(2) | A_BOLD);
|
|
}
|
|
else
|
|
#endif
|
|
wbkgd(subWin, A_BOLD);
|
|
|
|
box(subWin, ACS_VLINE, ACS_HLINE);
|
|
wrefresh(win);
|
|
|
|
nocbreak();
|
|
|
|
wclear (win);
|
|
mvwaddstr(win, 1, 1,
|
|
"Press keys (or mouse buttons) to show their names");
|
|
mvwaddstr(win, 2, 1, "Press spacebar to finish");
|
|
wrefresh(win);
|
|
|
|
keypad(win, TRUE);
|
|
raw();
|
|
noecho();
|
|
|
|
wtimeout(win, 200);
|
|
|
|
#ifdef PDCURSES
|
|
mouse_set(ALL_MOUSE_EVENTS);
|
|
PDC_save_key_modifiers(TRUE);
|
|
PDC_return_key_modifiers(TRUE);
|
|
#endif
|
|
curs_set(0); /* turn cursor off */
|
|
|
|
while (1)
|
|
{
|
|
while (1)
|
|
{
|
|
c = wgetch(win);
|
|
|
|
if (c == ERR)
|
|
{
|
|
spinner_count++;
|
|
if (spinner_count == 4)
|
|
spinner_count = 0;
|
|
mvwaddch(win, 3, 3, spinner[spinner_count]);
|
|
wrefresh(win);
|
|
}
|
|
else
|
|
break;
|
|
}
|
|
#ifdef PDCURSES
|
|
wmove(win, 4, 18);
|
|
wclrtoeol(win);
|
|
#endif
|
|
mvwaddstr(win, 3, 5, "Key Pressed: ");
|
|
wclrtoeol(win);
|
|
|
|
if (c >= KEY_MIN)
|
|
wprintw(win, "%s", keyname(c));
|
|
else if (isprint(c))
|
|
wprintw(win, "%c", c);
|
|
else
|
|
wprintw(win, "%s", unctrl(c));
|
|
#ifdef PDCURSES
|
|
if (c == KEY_MOUSE)
|
|
{
|
|
int button = 0;
|
|
request_mouse_pos();
|
|
|
|
if (BUTTON_CHANGED(1))
|
|
button = 1;
|
|
else if (BUTTON_CHANGED(2))
|
|
button = 2;
|
|
else if (BUTTON_CHANGED(3))
|
|
button = 3;
|
|
|
|
if (button && (BUTTON_STATUS(button) &
|
|
BUTTON_MODIFIER_MASK))
|
|
{
|
|
waddstr(win, " Modifier(s):");
|
|
|
|
if (BUTTON_STATUS(button) & BUTTON_SHIFT)
|
|
waddstr(win, " SHIFT");
|
|
|
|
if (BUTTON_STATUS(button) & BUTTON_CONTROL)
|
|
waddstr(win, " CONTROL");
|
|
|
|
if (BUTTON_STATUS(button) & BUTTON_ALT)
|
|
waddstr(win, " ALT");
|
|
}
|
|
|
|
wmove(win, 4, 18);
|
|
wclrtoeol(win);
|
|
wprintw(win, "Button %d: ", button);
|
|
|
|
if (MOUSE_MOVED)
|
|
waddstr(win, "moved: ");
|
|
else if (MOUSE_WHEEL_UP)
|
|
waddstr(win, "wheel up: ");
|
|
else if (MOUSE_WHEEL_DOWN)
|
|
waddstr(win, "wheel dn: ");
|
|
else if ((BUTTON_STATUS(button) &
|
|
BUTTON_ACTION_MASK) == BUTTON_PRESSED)
|
|
waddstr(win, "pressed: ");
|
|
else if ((BUTTON_STATUS(button) &
|
|
BUTTON_ACTION_MASK) == BUTTON_CLICKED)
|
|
waddstr(win, "clicked: ");
|
|
else if ((BUTTON_STATUS(button) &
|
|
BUTTON_ACTION_MASK) == BUTTON_DOUBLE_CLICKED)
|
|
waddstr(win, "double: ");
|
|
else
|
|
waddstr(win, "released: ");
|
|
|
|
wprintw(win, "Position: Y: %d X: %d", MOUSE_Y_POS, MOUSE_X_POS);
|
|
}
|
|
else if (PDC_get_key_modifiers())
|
|
{
|
|
waddstr(win, " Modifier(s):");
|
|
if (PDC_get_key_modifiers() & PDC_KEY_MODIFIER_SHIFT)
|
|
waddstr(win, " SHIFT");
|
|
|
|
if (PDC_get_key_modifiers() & PDC_KEY_MODIFIER_CONTROL)
|
|
waddstr(win, " CONTROL");
|
|
|
|
if (PDC_get_key_modifiers() & PDC_KEY_MODIFIER_ALT)
|
|
waddstr(win, " ALT");
|
|
|
|
if (PDC_get_key_modifiers() & PDC_KEY_MODIFIER_NUMLOCK)
|
|
waddstr(win, " NUMLOCK");
|
|
}
|
|
#endif
|
|
wrefresh(win);
|
|
|
|
if (c == ' ')
|
|
break;
|
|
}
|
|
|
|
wtimeout(win, -1); /* turn off timeout() */
|
|
curs_set(1); /* turn cursor back on */
|
|
|
|
#ifdef PDCURSES
|
|
mouse_set(0L);
|
|
PDC_save_key_modifiers(FALSE);
|
|
PDC_return_key_modifiers(FALSE);
|
|
#endif
|
|
wclear(win);
|
|
mvwaddstr(win, 2, 1, "Press some keys for 5 seconds");
|
|
mvwaddstr(win, 1, 1, "Pressing ^C should do nothing");
|
|
wrefresh(win);
|
|
|
|
werase(subWin);
|
|
box(subWin, ACS_VLINE, ACS_HLINE);
|
|
|
|
for (i = 0; i < 5; i++)
|
|
{
|
|
mvwprintw(subWin, 1, 1, "Time = %d", i);
|
|
wrefresh(subWin);
|
|
napms(1000);
|
|
flushinp();
|
|
}
|
|
|
|
delwin(subWin);
|
|
werase(win);
|
|
flash();
|
|
wrefresh(win);
|
|
napms(500);
|
|
flushinp();
|
|
|
|
mvwaddstr(win, 2, 1, "Press a key, followed by ENTER");
|
|
wmove(win, 9, 10);
|
|
wrefresh(win);
|
|
echo();
|
|
|
|
keypad(win, TRUE);
|
|
raw();
|
|
wgetnstr(win, buffer, 3);
|
|
flushinp();
|
|
|
|
wmove(win, 9, 10);
|
|
wdelch(win);
|
|
mvwaddstr(win, 4, 1, "The character should now have been deleted");
|
|
Continue(win);
|
|
|
|
refresh();
|
|
wclear(win);
|
|
echo();
|
|
buffer[0] = '\0';
|
|
mvwaddstr(win, 3, 2, "The window should have moved");
|
|
mvwaddstr(win, 4, 2,
|
|
"This text should have appeared without you pressing a key");
|
|
mvwaddstr(win, 6, 2, "Enter a number then a string seperated by space");
|
|
mvwin(win, 2, 1);
|
|
wrefresh(win);
|
|
mvwscanw(win, 7, 6, "%d %s", &num, buffer);
|
|
mvwprintw(win, 8, 6, "String: %s Number: %d", buffer, num);
|
|
Continue(win);
|
|
|
|
refresh();
|
|
wclear(win);
|
|
echo();
|
|
mvwaddstr(win, 3, 2, "Enter a 5 character string: ");
|
|
wgetnstr(win, buffer, 5);
|
|
mvwprintw(win, 4, 2, "String: %s", buffer);
|
|
Continue(win);
|
|
}
|
|
|
|
void outputTest(WINDOW *win)
|
|
{
|
|
WINDOW *win1;
|
|
char Buffer[80];
|
|
chtype ch;
|
|
int by, bx;
|
|
|
|
nl();
|
|
wclear(win);
|
|
mvwaddstr(win, 1, 1, "You should now have a screen in the upper "
|
|
"left corner, and this text should have wrapped");
|
|
waddstr(win,"\nThis text should be down\n");
|
|
waddstr(win, "and broken into two here ^");
|
|
Continue(win);
|
|
|
|
wclear(win);
|
|
wattron(win, A_BOLD);
|
|
mvwaddstr(win, 1, 1, "A new window will appear with this text in it");
|
|
mvwaddstr(win, 8, 1, "Press any key to continue");
|
|
wrefresh(win);
|
|
wgetch(win);
|
|
|
|
getbegyx(win, by, bx);
|
|
|
|
if (LINES < 24 || COLS < 75)
|
|
{
|
|
mvwaddstr(win, 5, 1, "Some tests have been skipped as they require a");
|
|
mvwaddstr(win, 6, 1, "display of at least 24 LINES by 75 COLUMNS");
|
|
Continue(win);
|
|
}
|
|
else
|
|
{
|
|
win1 = newwin(10, 50, 14, 25);
|
|
|
|
if (win1 == NULL)
|
|
{
|
|
endwin();
|
|
return;
|
|
}
|
|
|
|
#ifdef A_COLOR
|
|
if (has_colors())
|
|
{
|
|
init_pair(3, COLOR_BLUE, COLOR_WHITE);
|
|
wbkgd(win1, COLOR_PAIR(3));
|
|
}
|
|
else
|
|
#endif
|
|
wbkgd(win1, A_NORMAL);
|
|
|
|
wclear(win1);
|
|
mvwaddstr(win1, 5, 1, "This text should appear; using overlay option");
|
|
copywin(win, win1, 0, 0, 0, 0, 9, 49, TRUE);
|
|
box(win1, ACS_VLINE, ACS_HLINE);
|
|
wmove(win1, 8, 26);
|
|
wrefresh(win1);
|
|
wgetch(win1);
|
|
|
|
wclear(win1);
|
|
|
|
wattron(win1, A_BLINK);
|
|
mvwaddstr(win1, 4, 1,
|
|
"This blinking text should appear in only the second window");
|
|
wattroff(win1, A_BLINK);
|
|
|
|
mvwin(win1, by, bx);
|
|
overlay(win, win1);
|
|
mvwin(win1, 14, 25);
|
|
wmove(win1, 8, 26);
|
|
wrefresh(win1);
|
|
wgetch(win1);
|
|
|
|
delwin(win1);
|
|
}
|
|
|
|
clear();
|
|
wclear(win);
|
|
wrefresh(win);
|
|
mvwaddstr(win, 6, 2, "This line shouldn't appear");
|
|
mvwaddstr(win, 4, 2, "Only half of the next line is visible");
|
|
mvwaddstr(win, 5, 2, "Only half of the next line is visible");
|
|
wmove(win, 6, 1);
|
|
wclrtobot(win);
|
|
wmove(win, 5, 20);
|
|
wclrtoeol(win);
|
|
mvwaddstr(win, 8, 2, "This line also shouldn't appear");
|
|
wmove(win, 8, 1);
|
|
winsdelln(win, -1);
|
|
Continue(win);
|
|
|
|
wmove(win, 5, 9);
|
|
ch = winch(win);
|
|
|
|
wclear(win);
|
|
wmove(win, 6, 2);
|
|
waddstr(win, "The next char should be l: ");
|
|
winsch(win, ch);
|
|
Continue(win);
|
|
|
|
mvwinsstr(win, 6, 2, "A1B2C3D4E5");
|
|
Continue(win);
|
|
|
|
wmove(win, 5, 1);
|
|
winsdelln(win, 1);
|
|
mvwaddstr(win, 5, 2, "The lines below should have moved down");
|
|
Continue(win);
|
|
|
|
wclear(win);
|
|
wmove(win, 2, 2);
|
|
wprintw(win, "This is a formatted string in a window: %d %s\n",
|
|
42, "is it");
|
|
mvwaddstr(win, 10, 1, "Enter a string: ");
|
|
wrefresh(win);
|
|
echo();
|
|
wscanw(win, "%s", Buffer);
|
|
|
|
printw("This is a formatted string in stdscr: %d %s\n", 42, "is it");
|
|
mvaddstr(10, 1, "Enter a string: ");
|
|
scanw("%s", Buffer);
|
|
|
|
wclear(win);
|
|
curs_set(2);
|
|
mvwaddstr(win, 1, 1, "The cursor should be in high-visibility mode");
|
|
Continue(win);
|
|
|
|
wclear(win);
|
|
curs_set(0);
|
|
mvwaddstr(win, 1, 1, "The cursor should have disappeared");
|
|
Continue(win);
|
|
|
|
wclear(win);
|
|
curs_set(1);
|
|
mvwaddstr(win, 1, 1, "The cursor should be normal");
|
|
Continue(win);
|
|
|
|
#ifdef A_COLOR
|
|
if (has_colors())
|
|
{
|
|
wclear(win);
|
|
mvwaddstr(win, 1, 1, "Colors should change after you press a key");
|
|
Continue(win);
|
|
|
|
init_pair(1, COLOR_RED, COLOR_WHITE);
|
|
wrefresh(win);
|
|
}
|
|
#endif
|
|
werase(win);
|
|
mvwaddstr(win, 1, 1, "Information About Your Terminal");
|
|
mvwaddstr(win, 3, 1, termname());
|
|
mvwaddstr(win, 4, 1, longname());
|
|
|
|
if (termattrs() & A_BLINK)
|
|
mvwaddstr(win, 5, 1, "This terminal claims to support blinking.");
|
|
else
|
|
mvwaddstr(win, 5, 1, "This terminal does NOT support blinking.");
|
|
|
|
mvwaddnstr(win, 7, 5, "Have a nice day!ok", 16);
|
|
wrefresh(win);
|
|
|
|
mvwinnstr(win, 7, 5, Buffer, 18);
|
|
mvaddstr(LINES - 2, 10, Buffer);
|
|
refresh();
|
|
Continue(win);
|
|
}
|
|
|
|
#if HAVE_RESIZE
|
|
void resizeTest(WINDOW *dummy)
|
|
{
|
|
WINDOW *win1;
|
|
int nwidth = 135, nheight = 52;
|
|
int owidth = COLS, oheight = LINES;
|
|
|
|
savetty();
|
|
|
|
resize_term(nheight, nwidth);
|
|
|
|
clear();
|
|
refresh();
|
|
|
|
win1 = newwin(10, 50, 14, 25);
|
|
|
|
if (win1 == NULL)
|
|
{
|
|
endwin();
|
|
return;
|
|
}
|
|
|
|
#ifdef A_COLOR
|
|
if (has_colors())
|
|
{
|
|
init_pair(3, COLOR_BLUE, COLOR_WHITE);
|
|
wattrset(win1, COLOR_PAIR(3));
|
|
}
|
|
|
|
wclear(win1);
|
|
#endif
|
|
mvwaddstr(win1, 0, 0, "The screen may now be resized");
|
|
mvwprintw(win1, 1, 4, "Given size: %d by %d", nwidth, nheight);
|
|
mvwprintw(win1, 2, 4, "Actual size: %d by %d", COLS, LINES);
|
|
Continue(win1);
|
|
|
|
wclear(win1);
|
|
resetty();
|
|
|
|
mvwaddstr(win1, 0, 0, "The screen should now be reset");
|
|
mvwprintw(win1, 1, 6, "Old size: %d by %d", owidth, oheight);
|
|
mvwprintw(win1, 2, 6, "Size now: %d by %d", COLS, LINES);
|
|
Continue(win1);
|
|
|
|
delwin(win1);
|
|
|
|
clear();
|
|
refresh();
|
|
}
|
|
#endif /* HAVE_RESIZE */
|
|
|
|
void padTest(WINDOW *dummy)
|
|
{
|
|
WINDOW *pad, *spad;
|
|
|
|
pad = newpad(50, 100);
|
|
wattron(pad, A_REVERSE);
|
|
mvwaddstr(pad, 5, 2, "This is a new pad");
|
|
wattrset(pad, 0);
|
|
mvwaddstr(pad, 8, 0,
|
|
"The end of this line should be truncated here:except now");
|
|
mvwaddstr(pad, 11, 1, "This line should not appear.It will now");
|
|
wmove(pad, 10, 1);
|
|
wclrtoeol(pad);
|
|
mvwaddstr(pad, 10, 1, " Press any key to continue");
|
|
prefresh(pad, 0, 0, 0, 0, 10, 45);
|
|
keypad(pad, TRUE);
|
|
raw();
|
|
wgetch(pad);
|
|
|
|
spad = subpad(pad, 12, 25, 7, 52);
|
|
mvwaddstr(spad, 2, 2, "This is a new subpad");
|
|
box(spad, 0, 0);
|
|
prefresh(pad, 0, 0, 0, 0, 15, 75);
|
|
keypad(pad, TRUE);
|
|
raw();
|
|
wgetch(pad);
|
|
|
|
mvwaddstr(pad, 35, 2, "This is displayed at line 35 in the pad");
|
|
mvwaddstr(pad, 40, 1, " Press any key to continue");
|
|
prefresh(pad, 30, 0, 0, 0, 10, 45);
|
|
keypad(pad, TRUE);
|
|
raw();
|
|
wgetch(pad);
|
|
|
|
delwin(pad);
|
|
}
|
|
|
|
#if HAVE_CLIPBOARD
|
|
void clipboardTest(WINDOW *win)
|
|
{
|
|
static const char *text =
|
|
"This string placed in clipboard by PDCurses test program, testcurs.";
|
|
char *ptr = NULL;
|
|
long i, length = 0;
|
|
|
|
mvaddstr(1, 1,
|
|
"This test will display the contents of the system clipboard");
|
|
|
|
Continue2();
|
|
|
|
scrollok(stdscr, TRUE);
|
|
i = PDC_getclipboard(&ptr, &length);
|
|
|
|
switch(i)
|
|
{
|
|
case PDC_CLIP_ACCESS_ERROR:
|
|
mvaddstr(3, 1, "There was an error accessing the clipboard");
|
|
refresh();
|
|
break;
|
|
|
|
case PDC_CLIP_MEMORY_ERROR:
|
|
mvaddstr(3, 1,
|
|
"Unable to allocate memory for clipboard contents");
|
|
break;
|
|
|
|
case PDC_CLIP_EMPTY:
|
|
mvaddstr(3, 1, "There was no text in the clipboard");
|
|
break;
|
|
|
|
default:
|
|
wsetscrreg(stdscr, 0, LINES - 1);
|
|
clear();
|
|
mvaddstr(1, 1, "Clipboard contents...");
|
|
mvprintw(2, 1, "%s\n", ptr);
|
|
}
|
|
|
|
Continue2();
|
|
|
|
clear();
|
|
mvaddstr(1, 1,
|
|
"This test will place the following string in the system clipboard:");
|
|
mvaddstr(2, 1, text);
|
|
|
|
i = PDC_setclipboard(text, strlen(text));
|
|
|
|
switch(i)
|
|
{
|
|
case PDC_CLIP_ACCESS_ERROR:
|
|
mvaddstr(3, 1, "There was an error accessing the clipboard");
|
|
break;
|
|
|
|
case PDC_CLIP_MEMORY_ERROR:
|
|
mvaddstr(3, 1, "Unable to allocate memory for clipboard contents");
|
|
break;
|
|
|
|
default:
|
|
mvaddstr(3, 1, "The string was placed in the clipboard successfully");
|
|
}
|
|
|
|
Continue2();
|
|
}
|
|
#endif /* HAVE_CLIPBOARD */
|
|
|
|
void acsTest(WINDOW *win)
|
|
{
|
|
#ifdef ACS_S3
|
|
# define ACSNUM 32
|
|
#else
|
|
# define ACSNUM 25
|
|
#endif
|
|
static const char *acs_names[] =
|
|
{
|
|
"ACS_ULCORNER", "ACS_URCORNER", "ACS_LLCORNER", "ACS_LRCORNER",
|
|
"ACS_LTEE", "ACS_RTEE", "ACS_TTEE", "ACS_BTEE", "ACS_HLINE",
|
|
"ACS_VLINE", "ACS_PLUS",
|
|
|
|
"ACS_S1", "ACS_S9", "ACS_DIAMOND", "ACS_CKBOARD", "ACS_DEGREE",
|
|
"ACS_PLMINUS", "ACS_BULLET",
|
|
|
|
"ACS_LARROW", "ACS_RARROW", "ACS_UARROW", "ACS_DARROW",
|
|
"ACS_BOARD", "ACS_LANTERN", "ACS_BLOCK"
|
|
#ifdef ACS_S3
|
|
, "ACS_S3", "ACS_S7", "ACS_LEQUAL", "ACS_GEQUAL",
|
|
"ACS_PI", "ACS_NEQUAL", "ACS_STERLING"
|
|
#endif
|
|
};
|
|
|
|
chtype acs_values[ACSNUM];
|
|
|
|
#if HAVE_WIDE
|
|
cchar_t *wacs_values[] =
|
|
{
|
|
WACS_ULCORNER, WACS_URCORNER, WACS_LLCORNER, WACS_LRCORNER,
|
|
WACS_LTEE, WACS_RTEE, WACS_TTEE, WACS_BTEE, WACS_HLINE,
|
|
WACS_VLINE, WACS_PLUS,
|
|
|
|
WACS_S1, WACS_S9, WACS_DIAMOND, WACS_CKBOARD, WACS_DEGREE,
|
|
WACS_PLMINUS, WACS_BULLET,
|
|
|
|
WACS_LARROW, WACS_RARROW, WACS_UARROW, WACS_DARROW, WACS_BOARD,
|
|
WACS_LANTERN, WACS_BLOCK
|
|
# ifdef WACS_S3
|
|
, WACS_S3, WACS_S7, WACS_LEQUAL, WACS_GEQUAL, WACS_PI,
|
|
WACS_NEQUAL, WACS_STERLING
|
|
# endif
|
|
};
|
|
|
|
static const wchar_t russian[] = {0x0420, 0x0443, 0x0441, 0x0441,
|
|
0x043a, 0x0438, 0x0439, L' ', 0x044f, 0x0437, 0x044b, 0x043a, 0};
|
|
|
|
static const wchar_t greek[] = {0x0395, 0x03bb, 0x03bb, 0x03b7,
|
|
0x03bd, 0x03b9, 0x03ba, 0x03ac, 0};
|
|
|
|
static const wchar_t georgian[] = {0x10e5, 0x10d0, 0x10e0, 0x10d7,
|
|
0x10e3, 0x10da, 0x10d8, L' ', 0x10d4, 0x10dc, 0x10d0, 0};
|
|
#endif
|
|
|
|
int i, tmarg = (LINES - 22) / 2;
|
|
|
|
attrset(A_BOLD);
|
|
mvaddstr(tmarg, (COLS - 23) / 2, "Alternate Character Set");
|
|
attrset(A_NORMAL);
|
|
|
|
tmarg += 3;
|
|
|
|
#define A(b,c) acs_values[b] = ACS_##c
|
|
|
|
A(0,ULCORNER); A(1,URCORNER); A(2,LLCORNER); A(3,LRCORNER);
|
|
A(4,LTEE); A(5,RTEE); A(6,TTEE); A(7,BTEE);
|
|
A(8,HLINE); A(9,VLINE); A(10,PLUS); A(11,S1);
|
|
A(12,S9); A(13,DIAMOND); A(14,CKBOARD); A(15,DEGREE);
|
|
|
|
A(16,PLMINUS); A(17,BULLET); A(18,LARROW); A(19,RARROW);
|
|
A(20,UARROW); A(21,DARROW); A(22,BOARD); A(23,LANTERN);
|
|
A(24,BLOCK);
|
|
#ifdef ACS_S3
|
|
A(25,S3); A(26,S7); A(27,LEQUAL); A(28,GEQUAL);
|
|
A(29,PI); A(30,NEQUAL); A(31,STERLING);
|
|
#endif
|
|
|
|
#undef A
|
|
|
|
for (i = 0; i < ACSNUM; i++)
|
|
{
|
|
move((i % 8) * 2 + tmarg, (i / 8) * (COLS / 4) + (COLS / 8 - 7));
|
|
addch(acs_values[i]);
|
|
printw(" %s", acs_names[i]);
|
|
}
|
|
|
|
mvaddstr(tmarg + 18, 3, "Press any key to continue");
|
|
getch();
|
|
|
|
#if HAVE_WIDE
|
|
clear();
|
|
|
|
attrset(A_BOLD);
|
|
mvaddstr(tmarg - 3, (COLS - 28) / 2, "Wide Alternate Character Set");
|
|
attrset(A_NORMAL);
|
|
|
|
for (i = 0; i < ACSNUM; i++)
|
|
{
|
|
move((i % 8) * 2 + tmarg, (i / 8) * (COLS / 4) + (COLS / 8 - 7));
|
|
add_wch(wacs_values[i]);
|
|
printw(" W%s", acs_names[i]);
|
|
}
|
|
|
|
/* Spanish, Russian, Greek, Georgian */
|
|
|
|
mvaddwstr(tmarg + 16, COLS / 8 - 5, L"Espa\xf1ol");
|
|
mvaddwstr(tmarg + 16, 3 * (COLS / 8) - 5, russian);
|
|
mvaddwstr(tmarg + 16, 5 * (COLS / 8) - 5, greek);
|
|
mvaddwstr(tmarg + 16, 7 * (COLS / 8) - 5, georgian);
|
|
|
|
mvaddstr(tmarg + 18, 3, "Press any key to continue");
|
|
getch();
|
|
#endif
|
|
}
|
|
|
|
#if HAVE_COLOR
|
|
void colorTest(WINDOW *win)
|
|
{
|
|
static const short colors[] =
|
|
{
|
|
COLOR_BLACK, COLOR_RED, COLOR_GREEN, COLOR_BLUE,
|
|
COLOR_CYAN, COLOR_MAGENTA, COLOR_YELLOW, COLOR_WHITE
|
|
};
|
|
|
|
static const char *colornames[] =
|
|
{
|
|
"COLOR_BLACK", "COLOR_RED", "COLOR_GREEN", "COLOR_BLUE",
|
|
"COLOR_CYAN", "COLOR_MAGENTA", "COLOR_YELLOW", "COLOR_WHITE"
|
|
};
|
|
|
|
chtype fill = ACS_BLOCK;
|
|
|
|
int i, j, tmarg, col1, col2, col3;
|
|
|
|
if (!has_colors())
|
|
return;
|
|
|
|
tmarg = (LINES - 19) / 2;
|
|
col1 = (COLS - 60) / 2;
|
|
col2 = col1 + 20;
|
|
col3 = col2 + 20;
|
|
|
|
attrset(A_BOLD);
|
|
mvaddstr(tmarg, (COLS - 22) / 2, "Color Attribute Macros");
|
|
attrset(A_NORMAL);
|
|
|
|
mvaddstr(tmarg + 3, col2 + 4, "A_NORMAL");
|
|
mvaddstr(tmarg + 3, col3 + 5, "A_BOLD");
|
|
|
|
for (i = 0; i < 8; i++)
|
|
{
|
|
init_pair(i + 4, colors[i], COLOR_BLACK);
|
|
|
|
mvaddstr(tmarg + i + 5, col1, colornames[i]);
|
|
|
|
for (j = 0; j < 16; j++)
|
|
{
|
|
mvaddch(tmarg + i + 5, col2 + j, fill | COLOR_PAIR(i + 4));
|
|
mvaddch(tmarg + i + 5, col3 + j, fill | COLOR_PAIR(i + 4) | A_BOLD);
|
|
}
|
|
}
|
|
|
|
mvprintw(tmarg + 15, col1, "COLORS = %d", COLORS);
|
|
mvprintw(tmarg + 16, col1, "COLOR_PAIRS = %d", COLOR_PAIRS);
|
|
|
|
mvaddstr(tmarg + 19, 3, "Press any key to continue");
|
|
getch();
|
|
|
|
if (can_change_color())
|
|
{
|
|
struct
|
|
{
|
|
short red, green, blue;
|
|
} orgcolors[16];
|
|
|
|
int MAXCOL = (COLORS >= 16) ? 16 : 8;
|
|
|
|
if (MAXCOL < 8)
|
|
return;
|
|
|
|
for (i = 0; i < MAXCOL; i++)
|
|
color_content(i, &(orgcolors[i].red),
|
|
&(orgcolors[i].green),
|
|
&(orgcolors[i].blue));
|
|
|
|
attrset(A_BOLD);
|
|
mvaddstr(tmarg, (COLS - 22) / 2, " init_color() Example ");
|
|
attrset(A_NORMAL);
|
|
|
|
refresh();
|
|
|
|
for (i = 0; i < 8; i++)
|
|
{
|
|
init_color(colors[i], i * 125, 0, i * 125);
|
|
|
|
if (MAXCOL == 16)
|
|
init_color(colors[i] + 8, 0, i * 125, 0);
|
|
}
|
|
|
|
mvaddstr(tmarg + 19, 3, "Press any key to continue");
|
|
getch();
|
|
|
|
for (i = 0; i < MAXCOL; i++)
|
|
init_color(i, orgcolors[i].red,
|
|
orgcolors[i].green,
|
|
orgcolors[i].blue);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
#if HAVE_WIDE
|
|
void wideTest(WINDOW *win)
|
|
{
|
|
wchar_t tmp[513];
|
|
size_t i;
|
|
|
|
attrset(A_BOLD);
|
|
mvaddstr(1, (COLS - 25) / 2, "Wide Character Input Test");
|
|
attrset(A_NORMAL);
|
|
|
|
mvaddstr(4, 1, "Enter a string: ");
|
|
|
|
echo();
|
|
|
|
get_wstr((wint_t *)tmp);
|
|
addstr("\n\n String:\n\n ");
|
|
addwstr(tmp);
|
|
addstr("\n\n\n Hex:\n\n ");
|
|
|
|
for (i = 0; i < wcslen(tmp); i++)
|
|
{
|
|
printw("%04x ", tmp[i]);
|
|
addnwstr(tmp + i, 1);
|
|
addstr(" ");
|
|
}
|
|
|
|
noecho();
|
|
|
|
Continue2();
|
|
}
|
|
#endif
|
|
|
|
void display_menu(int old_option, int new_option)
|
|
{
|
|
int lmarg = (COLS - 14) / 2,
|
|
tmarg = (LINES - (MAX_OPTIONS + 2)) / 2;
|
|
|
|
if (old_option == -1)
|
|
{
|
|
int i;
|
|
|
|
attrset(A_BOLD);
|
|
mvaddstr(tmarg - 3, lmarg - 5, "PDCurses Test Program");
|
|
attrset(A_NORMAL);
|
|
|
|
for (i = 0; i < MAX_OPTIONS; i++)
|
|
mvaddstr(tmarg + i, lmarg, command[i].text);
|
|
}
|
|
else
|
|
mvaddstr(tmarg + old_option, lmarg, command[old_option].text);
|
|
|
|
attrset(A_REVERSE);
|
|
mvaddstr(tmarg + new_option, lmarg, command[new_option].text);
|
|
attrset(A_NORMAL);
|
|
|
|
mvaddstr(tmarg + MAX_OPTIONS + 2, lmarg - 23,
|
|
"Use Up and Down Arrows to select - Enter to run - Q to quit");
|
|
refresh();
|
|
}
|