ncurses/test/demo_defkey.c - nest-cam/4320010/ncurses - Git at Google

 /****************************************************************************
  * Copyright (c) 2002-2012,2013 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.22 2013/09/28 22:02:17 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];
 		strncpy(temp, visichar(string[n]), sizeof(temp) - 2);
 		if (pass)
 		    strcat(result, temp);
 		else
 		    need += strlen(temp);
 	    }
 	    if (!pass)
 		result = typeCalloc(char, need);
 	}
     } else {
 	result = typeCalloc(char, (size_t) 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[", (size_t) 2)) {
 	    prefix = "\033O";
 	} else if (!strncmp(value, "\033O", (size_t) 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
	/****************************************************************************
	* Copyright (c) 2002-2012,2013 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.22 2013/09/28 22:02:17 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];
	strncpy(temp, visichar(string[n]), sizeof(temp) - 2);
	if (pass)
	strcat(result, temp);
	else
	need += strlen(temp);
	}
	if (!pass)
	result = typeCalloc(char, need);
	}
	} else {
	result = typeCalloc(char, (size_t) 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[", (size_t) 2)) {
	prefix = "\033O";
	} else if (!strncmp(value, "\033O", (size_t) 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