diff options
Diffstat (limited to 'test/edit_field.c')
-rw-r--r-- | test/edit_field.c | 465 |
1 files changed, 0 insertions, 465 deletions
diff --git a/test/edit_field.c b/test/edit_field.c deleted file mode 100644 index 8a664e8ca9a47..0000000000000 --- a/test/edit_field.c +++ /dev/null @@ -1,465 +0,0 @@ -/**************************************************************************** - * Copyright (c) 2003-2008,2011 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: edit_field.c,v 1.17 2011/01/15 18:15:11 tom Exp $ - * - * A wrapper for form_driver() which keeps track of the user's editing changes - * for each field, and makes the result available as a null-terminated string - * in field_buffer(field,1). - * - * Thomas Dickey - 2003/4/26. - */ - -#include <test.priv.h> - -#if USE_LIBFORM - -#include <edit_field.h> - -static struct { - int code; - int result; - const char *help; -} commands[] = { - - { - CTRL('A'), REQ_NEXT_CHOICE, "" - }, - { - CTRL('B'), REQ_PREV_WORD, "go to previous word" - }, - { - CTRL('C'), REQ_CLR_EOL, "clear to end of line" - }, - { - CTRL('D'), REQ_DOWN_FIELD, "move downward to field" - }, - { - CTRL('E'), REQ_END_FIELD, "go to end of field" - }, - { - CTRL('F'), REQ_NEXT_PAGE, "go to next page" - }, - { - CTRL('G'), REQ_DEL_WORD, "delete current word" - }, - { - CTRL('H'), REQ_DEL_PREV, "delete previous character" - }, - { - CTRL('I'), REQ_INS_CHAR, "insert character" - }, - { - CTRL('K'), REQ_CLR_EOF, "clear to end of field" - }, - { - CTRL('L'), REQ_LEFT_FIELD, "go to field to left" - }, - { - CTRL('M'), REQ_NEW_LINE, "insert/overlay new line" - }, - { - CTRL('N'), REQ_NEXT_FIELD, "go to next field" - }, - { - CTRL('O'), REQ_INS_LINE, "insert blank line at cursor" - }, - { - CTRL('P'), REQ_PREV_FIELD, "go to previous field" - }, - { - CTRL('Q'), MY_QUIT, "exit form" - }, - { - CTRL('R'), REQ_RIGHT_FIELD, "go to field to right" - }, - { - CTRL('S'), REQ_BEG_FIELD, "go to beginning of field" - }, - { - CTRL('T'), MY_EDT_MODE, "toggle O_EDIT mode, clear field status", - }, - { - CTRL('U'), REQ_UP_FIELD, "move upward to field" - }, - { - CTRL('V'), REQ_DEL_CHAR, "delete character" - }, - { - CTRL('W'), REQ_NEXT_WORD, "go to next word" - }, - { - CTRL('X'), REQ_CLR_FIELD, "clear field" - }, - { - CTRL('Y'), REQ_DEL_LINE, "delete line" - }, - { - CTRL('Z'), REQ_PREV_CHOICE, "" - }, - { - CTRL('['), MY_QUIT, "exit form" - }, - { - CTRL(']'), MY_INS_MODE, "toggle REQ_INS_MODE/REQ_OVL_MODE", - }, - { - KEY_F(1), MY_HELP, "show this screen", - }, - { - KEY_BACKSPACE, REQ_DEL_PREV, "delete previous character" - }, - { - KEY_DOWN, REQ_DOWN_CHAR, "move down 1 character" - }, - { - KEY_END, REQ_LAST_FIELD, "go to last field" - }, - { - KEY_HOME, REQ_FIRST_FIELD, "go to first field" - }, - { - KEY_LEFT, REQ_LEFT_CHAR, "move left 1 character" - }, - { - KEY_LL, REQ_LAST_FIELD, "go to last field" - }, - { - KEY_NEXT, REQ_NEXT_FIELD, "go to next field" - }, - { - KEY_NPAGE, REQ_NEXT_PAGE, "go to next page" - }, - { - KEY_PPAGE, REQ_PREV_PAGE, "go to previous page" - }, - { - KEY_PREVIOUS, REQ_PREV_FIELD, "go to previous field" - }, - { - KEY_RIGHT, REQ_RIGHT_CHAR, "move right 1 character" - }, - { - KEY_UP, REQ_UP_CHAR, "move up 1 character" - } -}; - -static WINDOW *old_window; - -static void -begin_popup(void) -{ - doupdate(); - old_window = dupwin(curscr); -} - -static void -end_popup(void) -{ - touchwin(old_window); - wnoutrefresh(old_window); - doupdate(); - delwin(old_window); -} - -/* - * Display a temporary window listing the keystroke-commands we recognize. - */ -void -help_edit_field(void) -{ - int x0 = 4; - int y0 = 2; - int y1 = 0; - int y2 = 0; - int wide = COLS - ((x0 + 1) * 2); - int high = LINES - ((y0 + 1) * 2); - WINDOW *help = newwin(high, wide, y0, x0); - WINDOW *data = newpad(2 + SIZEOF(commands), wide - 4); - unsigned n; - int ch = ERR; - - begin_popup(); - - keypad(help, TRUE); - keypad(data, TRUE); - waddstr(data, "Defined form edit/traversal keys:\n"); - for (n = 0; n < SIZEOF(commands); ++n) { - const char *name; -#ifdef NCURSES_VERSION - if ((name = form_request_name(commands[n].result)) == 0) -#endif - name = commands[n].help; - wprintw(data, "%s -- %s\n", - keyname(commands[n].code), - name != 0 ? name : commands[n].help); - } - waddstr(data, "Arrow keys move within a field as you would expect."); - y2 = getcury(data); - - do { - switch (ch) { - case KEY_HOME: - y1 = 0; - break; - case KEY_END: - y1 = y2; - break; - case KEY_PREVIOUS: - case KEY_PPAGE: - if (y1 > 0) { - y1 -= high / 2; - if (y1 < 0) - y1 = 0; - } else { - beep(); - } - break; - case KEY_NEXT: - case KEY_NPAGE: - if (y1 < y2) { - y1 += high / 2; - if (y1 >= y2) - y1 = y2; - } else { - beep(); - } - break; - case CTRL('P'): - case KEY_UP: - if (y1 > 0) - --y1; - else - beep(); - break; - case CTRL('N'): - case KEY_DOWN: - if (y1 < y2) - ++y1; - else - beep(); - break; - default: - beep(); - break; - case ERR: - break; - } - werase(help); - box(help, 0, 0); - wnoutrefresh(help); - pnoutrefresh(data, y1, 0, y0 + 1, x0 + 1, high, wide); - doupdate(); - } while ((ch = wgetch(data)) != ERR && ch != QUIT && ch != ESCAPE); - werase(help); - wrefresh(help); - delwin(help); - delwin(data); - - end_popup(); -} - -static int -offset_in_field(FORM * form) -{ - FIELD *field = current_field(form); - int currow, curcol; - - form_getyx(form, currow, curcol); - return curcol + currow * field->dcols; -} - -static void -inactive_field(FIELD * f) -{ - FieldAttrs *ptr = (FieldAttrs *) field_userptr(f); - set_field_back(f, ptr->background); -} - -int -edit_field(FORM * form, int *result) -{ - int ch = wgetch(form_win(form)); - int status; - FIELD *before; - unsigned n; - char lengths[80]; - int length; - char *buffer; - int before_row; - int before_col; - int before_off = offset_in_field(form); - - form_getyx(form, before_row, before_col); - before = current_field(form); - set_field_back(before, A_NORMAL); - if (ch <= KEY_MAX) { - set_field_back(before, A_REVERSE); - } else if (ch <= MAX_FORM_COMMAND) { - inactive_field(before); - } - - *result = ch; - for (n = 0; n < SIZEOF(commands); ++n) { - if (commands[n].code == ch) { - *result = commands[n].result; - break; - } - } - - status = form_driver(form, *result); - - if (status == E_OK) { - bool modified = TRUE; - - length = 0; - if ((buffer = field_buffer(before, 1)) != 0) - length = atoi(buffer); - if (length < before_off) - length = before_off; - switch (*result) { - case REQ_CLR_EOF: - length = before_off; - break; - case REQ_CLR_EOL: - if (before_row + 1 == before->rows) - length = before_off; - break; - case REQ_CLR_FIELD: - length = 0; - break; - case REQ_DEL_CHAR: - if (length > before_off) - --length; - break; - case REQ_DEL_PREV: - if (length > 0) { - if (before_col > 0) { - --length; - } else if (before_row > 0) { - length -= before->cols + before_col; - } - } - break; - case REQ_NEW_LINE: - length += before->cols; - break; -#if 0 - /* FIXME: finish these */ - case REQ_DEL_LINE: /* delete line */ - case REQ_DEL_WORD: /* delete word at cursor */ - case REQ_INS_CHAR: /* insert blank char at cursor */ - case REQ_INS_LINE: /* insert blank line at cursor */ - case REQ_INS_MODE: /* begin insert mode */ - case REQ_OVL_MODE: /* begin overlay mode */ -#endif - /* ignore all of the motion commands */ - case REQ_SCR_BCHAR: /* FALLTHRU */ - case REQ_SCR_BHPAGE: /* FALLTHRU */ - case REQ_SCR_BLINE: /* FALLTHRU */ - case REQ_SCR_BPAGE: /* FALLTHRU */ - case REQ_SCR_FCHAR: /* FALLTHRU */ - case REQ_SCR_FHPAGE: /* FALLTHRU */ - case REQ_SCR_FLINE: /* FALLTHRU */ - case REQ_SCR_FPAGE: /* FALLTHRU */ - case REQ_SCR_HBHALF: /* FALLTHRU */ - case REQ_SCR_HBLINE: /* FALLTHRU */ - case REQ_SCR_HFHALF: /* FALLTHRU */ - case REQ_SCR_HFLINE: /* FALLTHRU */ - case REQ_BEG_FIELD: /* FALLTHRU */ - case REQ_BEG_LINE: /* FALLTHRU */ - case REQ_DOWN_CHAR: /* FALLTHRU */ - case REQ_DOWN_FIELD: /* FALLTHRU */ - case REQ_END_FIELD: /* FALLTHRU */ - case REQ_END_LINE: /* FALLTHRU */ - case REQ_FIRST_FIELD: /* FALLTHRU */ - case REQ_FIRST_PAGE: /* FALLTHRU */ - case REQ_LAST_FIELD: /* FALLTHRU */ - case REQ_LAST_PAGE: /* FALLTHRU */ - case REQ_LEFT_CHAR: /* FALLTHRU */ - case REQ_LEFT_FIELD: /* FALLTHRU */ - case REQ_NEXT_CHAR: /* FALLTHRU */ - case REQ_NEXT_CHOICE: /* FALLTHRU */ - case REQ_NEXT_FIELD: /* FALLTHRU */ - case REQ_NEXT_LINE: /* FALLTHRU */ - case REQ_NEXT_PAGE: /* FALLTHRU */ - case REQ_NEXT_WORD: /* FALLTHRU */ - case REQ_PREV_CHAR: /* FALLTHRU */ - case REQ_PREV_CHOICE: /* FALLTHRU */ - case REQ_PREV_FIELD: /* FALLTHRU */ - case REQ_PREV_LINE: /* FALLTHRU */ - case REQ_PREV_PAGE: /* FALLTHRU */ - case REQ_PREV_WORD: /* FALLTHRU */ - case REQ_RIGHT_CHAR: /* FALLTHRU */ - case REQ_RIGHT_FIELD: /* FALLTHRU */ - case REQ_SFIRST_FIELD: /* FALLTHRU */ - case REQ_SLAST_FIELD: /* FALLTHRU */ - case REQ_SNEXT_FIELD: /* FALLTHRU */ - case REQ_SPREV_FIELD: /* FALLTHRU */ - case REQ_UP_CHAR: /* FALLTHRU */ - case REQ_UP_FIELD: /* FALLTHRU */ - case REQ_VALIDATION: /* FALLTHRU */ - modified = FALSE; - break; - - default: - modified = FALSE; - if (ch >= MIN_FORM_COMMAND) { - beep(); - } else if (isprint(ch)) { - modified = TRUE; - } - break; - } - - /* - * If we do not force a re-validation, then field_buffer 0 will - * be lagging by one character. - */ - if (modified && form_driver(form, REQ_VALIDATION) == E_OK && *result - < MIN_FORM_COMMAND) - ++length; - - sprintf(lengths, "%d", length); - set_field_buffer(before, 1, lengths); - } - - if (current_field(form) != before) - inactive_field(before); - return status; -} -#else - -extern void no_edit_field(void); - -void -no_edit_field(void) -{ -} - -#endif |