summaryrefslogtreecommitdiff
path: root/test/edit_field.c
diff options
context:
space:
mode:
Diffstat (limited to 'test/edit_field.c')
-rw-r--r--test/edit_field.c465
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