mirror of
https://github.com/Aigor44/ncursesw-morphos.git
synced 2024-12-21 07:39:06 +08:00
52aa842907
+ compiler warning fixes for test programs. + various build-fixes for test-programs with pdcurses. + updated configure checks for X packages in test/configure from xterm #267 changes. + add configure check to gnatmake, to accommodate cygwin.
283 lines
7.4 KiB
C
283 lines
7.4 KiB
C
/****************************************************************************
|
|
* Copyright (c) 2002-2007,2008 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: demo_defkey.c,v 1.20 2010/11/14 00:59:35 tom Exp $
|
|
*
|
|
* Demonstrate the define_key() function.
|
|
* Thomas Dickey - 2002/11/23
|
|
*/
|
|
|
|
#include <test.priv.h>
|
|
|
|
#if defined(NCURSES_VERSION) && NCURSES_EXT_FUNCS
|
|
|
|
#define MY_LOGFILE "demo_defkey.log"
|
|
|
|
/*
|
|
* Log the most recently-written line to our logfile
|
|
*/
|
|
static void
|
|
log_last_line(WINDOW *win)
|
|
{
|
|
FILE *fp;
|
|
int y, x, n;
|
|
char temp[256];
|
|
|
|
if ((fp = fopen(MY_LOGFILE, "a")) != 0) {
|
|
int need = sizeof(temp) - 1;
|
|
if (need > COLS)
|
|
need = COLS;
|
|
getyx(win, y, x);
|
|
wmove(win, y - 1, 0);
|
|
n = winnstr(win, temp, need);
|
|
while (n-- > 0) {
|
|
if (isspace(UChar(temp[n])))
|
|
temp[n] = '\0';
|
|
else
|
|
break;
|
|
}
|
|
wmove(win, y, x);
|
|
fprintf(fp, "%s\n", temp);
|
|
fclose(fp);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Convert a character to visible form.
|
|
*/
|
|
static char *
|
|
visichar(int ch)
|
|
{
|
|
static char temp[10];
|
|
|
|
ch = UChar(ch);
|
|
assert(ch >= 0 && ch < 256);
|
|
if (ch == '\\') {
|
|
strcpy(temp, "\\\\");
|
|
} else if (ch == '\033') {
|
|
strcpy(temp, "\\E");
|
|
} else if (ch < ' ') {
|
|
sprintf(temp, "\\%03o", ch);
|
|
} else if (ch >= 127) {
|
|
sprintf(temp, "\\%03o", ch);
|
|
} else {
|
|
sprintf(temp, "%c", ch);
|
|
}
|
|
return temp;
|
|
}
|
|
|
|
/*
|
|
* Convert a string to visible form.
|
|
*/
|
|
static char *
|
|
visible(const char *string)
|
|
{
|
|
char *result = 0;
|
|
size_t need = 1;
|
|
int pass;
|
|
int n;
|
|
|
|
if (string != 0 && *string != '\0') {
|
|
for (pass = 0; pass < 2; ++pass) {
|
|
for (n = 0; string[n] != '\0'; ++n) {
|
|
char temp[80];
|
|
strcpy(temp, visichar(string[n]));
|
|
if (pass)
|
|
strcat(result, temp);
|
|
else
|
|
need += strlen(temp);
|
|
}
|
|
if (!pass)
|
|
result = typeCalloc(char, need);
|
|
}
|
|
} else {
|
|
result = typeCalloc(char, 1);
|
|
}
|
|
return result;
|
|
}
|
|
|
|
static void
|
|
really_define_key(WINDOW *win, const char *new_string, int code)
|
|
{
|
|
int rc;
|
|
const char *code_name = keyname(code);
|
|
char *old_string;
|
|
char *vis_string = 0;
|
|
char temp[80];
|
|
|
|
if (code_name == 0) {
|
|
sprintf(temp, "Keycode %d", code);
|
|
code_name = temp;
|
|
}
|
|
|
|
if ((old_string = keybound(code, 0)) != 0) {
|
|
wprintw(win, "%s is %s\n",
|
|
code_name,
|
|
vis_string = visible(old_string));
|
|
} else {
|
|
wprintw(win, "%s is not bound\n",
|
|
code_name);
|
|
}
|
|
log_last_line(win);
|
|
|
|
if (vis_string != 0) {
|
|
free(vis_string);
|
|
vis_string = 0;
|
|
}
|
|
|
|
vis_string = visible(new_string);
|
|
if ((rc = key_defined(new_string)) > 0) {
|
|
wprintw(win, "%s was bound to %s\n", vis_string, keyname(rc));
|
|
log_last_line(win);
|
|
} else if (new_string != 0 && rc < 0) {
|
|
wprintw(win, "%s conflicts with longer strings\n", vis_string);
|
|
log_last_line(win);
|
|
}
|
|
rc = define_key(new_string, code);
|
|
if (rc == ERR) {
|
|
wprintw(win, "%s unchanged\n", code_name);
|
|
log_last_line(win);
|
|
} else if (new_string != 0) {
|
|
wprintw(win, "%s is now bound to %s\n",
|
|
vis_string,
|
|
code_name);
|
|
log_last_line(win);
|
|
} else if (old_string != 0) {
|
|
wprintw(win, "%s deleted\n", code_name);
|
|
log_last_line(win);
|
|
}
|
|
if (vis_string != 0)
|
|
free(vis_string);
|
|
if (old_string != 0)
|
|
free(old_string);
|
|
}
|
|
|
|
static void
|
|
duplicate(WINDOW *win, NCURSES_CONST char *name, int code)
|
|
{
|
|
char *value = tigetstr(name);
|
|
|
|
if (value != 0) {
|
|
const char *prefix = 0;
|
|
char temp[BUFSIZ];
|
|
|
|
if (!strncmp(value, "\033[", 2)) {
|
|
prefix = "\033O";
|
|
} else if (!strncmp(value, "\033O", 2)) {
|
|
prefix = "\033[";
|
|
}
|
|
if (prefix != 0) {
|
|
sprintf(temp, "%s%s", prefix, value + 2);
|
|
really_define_key(win, temp, code);
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
redefine(WINDOW *win, char *string, int code)
|
|
{
|
|
really_define_key(win, string, code);
|
|
}
|
|
|
|
static void
|
|
remove_definition(WINDOW *win, int code)
|
|
{
|
|
really_define_key(win, 0, code);
|
|
}
|
|
|
|
int
|
|
main(int argc GCC_UNUSED, char *argv[]GCC_UNUSED)
|
|
{
|
|
char *fkeys[12];
|
|
int n;
|
|
int ch;
|
|
WINDOW *win;
|
|
|
|
unlink(MY_LOGFILE);
|
|
|
|
initscr();
|
|
(void) cbreak(); /* take input chars one at a time, no wait for \n */
|
|
(void) noecho(); /* don't echo input */
|
|
|
|
printw("This demo is best on xterm: it reverses the definitions for f1-f12,\n");
|
|
printw("adds duplicate definitions for cursor application and normal modes,\n");
|
|
printw("and removes any definitions for the mini keypad. Type any of those:\n");
|
|
refresh();
|
|
|
|
win = newwin(LINES - 3, COLS, 3, 0);
|
|
scrollok(win, TRUE);
|
|
keypad(win, TRUE);
|
|
wmove(win, 0, 0);
|
|
|
|
/* we do the define_key() calls after keypad(), since the first call to
|
|
* keypad() initializes the corresponding data.
|
|
*/
|
|
for (n = 0; n < 12; ++n) {
|
|
char name[10];
|
|
sprintf(name, "kf%d", n + 1);
|
|
fkeys[n] = tigetstr(name);
|
|
}
|
|
for (n = 0; n < 12; ++n) {
|
|
redefine(win, fkeys[11 - n], KEY_F(n + 1));
|
|
}
|
|
|
|
duplicate(win, "kcub1", KEY_LEFT);
|
|
duplicate(win, "kcuu1", KEY_UP);
|
|
duplicate(win, "kcud1", KEY_DOWN);
|
|
duplicate(win, "kcuf1", KEY_RIGHT);
|
|
|
|
remove_definition(win, KEY_A1);
|
|
remove_definition(win, KEY_A3);
|
|
remove_definition(win, KEY_B2);
|
|
remove_definition(win, KEY_C1);
|
|
remove_definition(win, KEY_C3);
|
|
|
|
really_define_key(win, "\033O", 1023);
|
|
|
|
while ((ch = wgetch(win)) != ERR) {
|
|
const char *name = keyname(ch);
|
|
wprintw(win, "Keycode %d, name %s\n",
|
|
ch,
|
|
name != 0 ? name : "<null>");
|
|
log_last_line(win);
|
|
wclrtoeol(win);
|
|
if (ch == 'q')
|
|
break;
|
|
}
|
|
endwin();
|
|
ExitProgram(EXIT_FAILURE);
|
|
}
|
|
#else
|
|
int
|
|
main(void)
|
|
{
|
|
printf("This program requires the ncurses library\n");
|
|
ExitProgram(EXIT_FAILURE);
|
|
}
|
|
#endif
|