diff options
Diffstat (limited to 'Build/source/utils/dialog/dialog-1.1-20080819/formbox.c')
| -rw-r--r-- | Build/source/utils/dialog/dialog-1.1-20080819/formbox.c | 886 |
1 files changed, 886 insertions, 0 deletions
diff --git a/Build/source/utils/dialog/dialog-1.1-20080819/formbox.c b/Build/source/utils/dialog/dialog-1.1-20080819/formbox.c new file mode 100644 index 00000000000..e3fa3a97da4 --- /dev/null +++ b/Build/source/utils/dialog/dialog-1.1-20080819/formbox.c @@ -0,0 +1,886 @@ +/* + * $Id: formbox.c,v 1.66 2008/06/21 12:12:05 tom Exp $ + * + * formbox.c -- implements the form (i.e, some pairs label/editbox) + * + * Copyright 2003-2007,2008 Thomas E. Dickey + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU Lesser General Public License, version 2.1 + * as published by the Free Software Foundation. + * + * This program is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this program; if not, write to + * Free Software Foundation, Inc. + * 51 Franklin St., Fifth Floor + * Boston, MA 02110, USA. + * + * This is adapted from source contributed by + * Valery Reznic (valery_reznic@users.sourceforge.net) + */ + +#include <dialog.h> +#include <dlg_keys.h> + +#define LLEN(n) ((n) * FORMBOX_TAGS) + +#define ItemName(i) items[LLEN(i) + 0] +#define ItemNameY(i) items[LLEN(i) + 1] +#define ItemNameX(i) items[LLEN(i) + 2] +#define ItemText(i) items[LLEN(i) + 3] +#define ItemTextY(i) items[LLEN(i) + 4] +#define ItemTextX(i) items[LLEN(i) + 5] +#define ItemTextFLen(i) items[LLEN(i) + 6] +#define ItemTextILen(i) items[LLEN(i) + 7] +#define ItemHelp(i) (dialog_vars.item_help ? items[LLEN(i) + 8] : dlg_strempty()) + +static bool +is_readonly(DIALOG_FORMITEM * item) +{ + return ((item->type & 2) != 0) || (item->text_flen <= 0); +} + +static bool +is_hidden(DIALOG_FORMITEM * item) +{ + return ((item->type & 1) != 0); +} + +static bool +in_window(WINDOW *win, int scrollamt, int y) +{ + return (y >= scrollamt && y - scrollamt < getmaxy(win)); +} + +static bool +ok_move(WINDOW *win, int scrollamt, int y, int x) +{ + return in_window(win, scrollamt, y) + && (wmove(win, y - scrollamt, x) != ERR); +} + +static void +move_past(WINDOW *win, int y, int x) +{ + if (wmove(win, y, x) == ERR) + wmove(win, y, getmaxx(win) - 1); +} + +/* + * Print form item + */ +static int +print_item(WINDOW *win, DIALOG_FORMITEM * item, int scrollamt, bool choice) +{ + int count = 0; + int len; + + if (ok_move(win, scrollamt, item->name_y, item->name_x)) { + len = item->name_len; + len = MIN(len, getmaxx(win) - item->name_x); + if (len > 0) { + dlg_show_string(win, + item->name, + 0, + menubox_attr, + item->name_y - scrollamt, + item->name_x, + len, + FALSE, + FALSE); + move_past(win, item->name_y - scrollamt, item->name_x + len); + count = 1; + } + } + if (item->text_len && ok_move(win, scrollamt, item->text_y, item->text_x)) { + chtype this_item_attribute; + + len = item->text_len; + len = MIN(len, getmaxx(win) - item->text_x); + + if (!is_readonly(item)) { + this_item_attribute = choice + ? form_active_text_attr + : form_text_attr; + } else { + this_item_attribute = form_item_readonly_attr; + } + + if (len > 0) { + dlg_show_string(win, + item->text, + 0, + this_item_attribute, + item->text_y - scrollamt, + item->text_x, + len, + is_hidden(item), + FALSE); + move_past(win, item->text_y - scrollamt, item->text_x + len); + count = 1; + } + } + return count; +} + +/* + * Print the entire form. + */ +static void +print_form(WINDOW *win, DIALOG_FORMITEM * item, int total, int scrollamt, int choice) +{ + int n; + int count = 0; + + for (n = 0; n < total; ++n) { + count += print_item(win, item + n, scrollamt, n == choice); + } + if (count) { + wbkgdset(win, menubox_attr | ' '); + wclrtobot(win); + (void) wnoutrefresh(win); + } +} + +static int +set_choice(DIALOG_FORMITEM item[], int choice, int item_no, bool * noneditable) +{ + int result = -1; + int i; + + *noneditable = FALSE; + if (!is_readonly(&item[choice])) { + result = choice; + } else { + for (i = 0; i < item_no; i++) { + if (!is_readonly(&(item[i]))) { + result = i; + break; + } + } + if (result < 0) { + *noneditable = TRUE; + result = 0; + } + } + return result; +} + +/* + * Find the last y-value in the form. + */ +static int +form_limit(DIALOG_FORMITEM item[]) +{ + int n; + int limit = 0; + for (n = 0; item[n].name != 0; ++n) { + if (limit < item[n].name_y) + limit = item[n].name_y; + if (limit < item[n].text_y) + limit = item[n].text_y; + } + return limit; +} + +/* + * Tab to the next field. + */ +static bool +tab_next(WINDOW *win, + DIALOG_FORMITEM item[], + int item_no, + int stepsize, + int *choice, + int *scrollamt) +{ + int old_choice = *choice; + int old_scroll = *scrollamt; + bool wrapped = FALSE; + + do { + do { + *choice += stepsize; + if (*choice < 0) { + *choice = item_no - 1; + wrapped = TRUE; + } else if (*choice >= item_no) { + *choice = 0; + wrapped = TRUE; + } + } while ((*choice != old_choice) && is_readonly(&(item[*choice]))); + + if (item[*choice].text_flen > 0) { + int lo = MIN(item[*choice].name_y, item[*choice].text_y); + int hi = MAX(item[*choice].name_y, item[*choice].text_y); + + if (old_choice == *choice) + break; + print_item(win, item + old_choice, *scrollamt, FALSE); + + if (*scrollamt < lo + 1 - getmaxy(win)) + *scrollamt = lo + 1 - getmaxy(win); + if (*scrollamt > hi) + *scrollamt = hi; + /* + * If we have to scroll to show a wrap-around, it does get + * confusing. Just give up rather than scroll. Tab'ing to the + * next field in a multi-column form is a different matter. Scroll + * for that. + */ + if (*scrollamt != old_scroll) { + if (wrapped) { + beep(); + *scrollamt = old_scroll; + *choice = old_choice; + } else { + scrollok(win, TRUE); + wscrl(win, *scrollamt - old_scroll); + scrollok(win, FALSE); + } + } + break; + } + } while (*choice != old_choice); + + return (old_choice != *choice) || (old_scroll != *scrollamt); +} + +/* + * Scroll to the next page, putting the choice at the first editable field + * in that page. Note that fields are not necessarily in top-to-bottom order, + * nor is there necessarily a field on each row of the window. + */ +static bool +scroll_next(WINDOW *win, DIALOG_FORMITEM item[], int stepsize, int *choice, int *scrollamt) +{ + int old_choice = *choice; + int old_scroll = *scrollamt; + int old_row = MIN(item[old_choice].text_y, item[old_choice].name_y); + int target = old_scroll + stepsize; + int n; + + if (stepsize < 0) { + if (old_row != old_scroll) + target = old_scroll; + else + target = old_scroll + stepsize; + if (target < 0) + target = 0; + } else { + int limit = form_limit(item); + if (target > limit) + target = limit; + } + + for (n = 0; item[n].name != 0; ++n) { + if (item[n].text_flen > 0) { + int new_row = MIN(item[n].text_y, item[n].name_y); + if (abs(new_row - target) < abs(old_row - target)) { + old_row = new_row; + *choice = n; + } + } + } + + if (old_choice != *choice) + print_item(win, item + old_choice, *scrollamt, FALSE); + + *scrollamt = *choice; + if (*scrollamt != old_scroll) { + scrollok(win, TRUE); + wscrl(win, *scrollamt - old_scroll); + scrollok(win, FALSE); + } + return (old_choice != *choice) || (old_scroll != *scrollamt); +} + +/* + * Do a sanity check on the field length, and return the "right" value. + */ +static int +real_length(DIALOG_FORMITEM * item) +{ + return (item->text_flen > 0 + ? item->text_flen + : (item->text_flen < 0 + ? -item->text_flen + : item->text_len)); +} + +/* + * Compute the form size, setup field buffers. + */ +static void +make_FORM_ELTs(DIALOG_FORMITEM * item, + int item_no, + int *min_height, + int *min_width) +{ + int i; + int min_w = 0; + int min_h = 0; + + for (i = 0; i < item_no; ++i) { + int real_len = real_length(item + i); + + /* + * Special value '0' for text_flen: no input allowed + * Special value '0' for text_ilen: 'be the same as text_flen' + */ + if (item[i].text_ilen == 0) + item[i].text_ilen = real_len; + + min_h = MAX(min_h, item[i].name_y + 1); + min_h = MAX(min_h, item[i].text_y + 1); + min_w = MAX(min_w, item[i].name_x + 1 + item[i].name_len); + min_w = MAX(min_w, item[i].text_x + 1 + real_len); + + item[i].text_len = real_length(item + i); + + /* + * We do not know the actual length of .text, so we allocate it here + * to ensure it is big enough. + */ + if (item[i].text_flen > 0) { + int max_len = dlg_max_input(MAX(item[i].text_ilen + 1, MAX_LEN)); + char *old_text = item[i].text; + + item[i].text = dlg_malloc(char, max_len + 1); + assert_ptr(item[i].text, "make_FORM_ELTs"); + + sprintf(item[i].text, "%.*s", item[i].text_ilen, old_text); + + if (item[i].text_free) { + item[i].text_free = FALSE; + free(old_text); + } + item[i].text_free = TRUE; + } + } + + *min_height = min_h; + *min_width = min_w; +} + +int +dlg_default_formitem(DIALOG_FORMITEM * items) +{ + int result = 0; + + if (dialog_vars.default_item != 0) { + int count = 0; + while (items->name != 0) { + if (!strcmp(dialog_vars.default_item, items->name)) { + result = count; + break; + } + ++items; + count++; + } + } + return result; +} + +#define sTEXT -1 + +static int +next_valid_buttonindex(int state, int extra, bool non_editable) +{ + state = dlg_next_ok_buttonindex(state, extra); + while (non_editable && state == sTEXT) + state = dlg_next_ok_buttonindex(state, sTEXT); + return state; +} + +static int +prev_valid_buttonindex(int state, int extra, bool non_editable) +{ + state = dlg_prev_ok_buttonindex(state, extra); + while (non_editable && state == sTEXT) + state = dlg_prev_ok_buttonindex(state, sTEXT); + return state; +} + +/* + * Display a form for fulfill a number of fields + */ +int +dlg_form(const char *title, + const char *cprompt, + int height, + int width, + int form_height, + int item_no, + DIALOG_FORMITEM * items, + int *current_item) +{ + /* *INDENT-OFF* */ + static DLG_KEYS_BINDING binding[] = { + INPUTSTR_BINDINGS, + ENTERKEY_BINDINGS, + DLG_KEYS_DATA( DLGK_FIELD_NEXT, TAB ), + DLG_KEYS_DATA( DLGK_FIELD_PREV, KEY_BTAB ), + DLG_KEYS_DATA( DLGK_ITEM_NEXT, CHR_NEXT ), + DLG_KEYS_DATA( DLGK_ITEM_NEXT, KEY_DOWN ), + DLG_KEYS_DATA( DLGK_ITEM_NEXT, KEY_NEXT ), + DLG_KEYS_DATA( DLGK_ITEM_PREV, CHR_PREVIOUS ), + DLG_KEYS_DATA( DLGK_ITEM_PREV, KEY_PREVIOUS ), + DLG_KEYS_DATA( DLGK_ITEM_PREV, KEY_UP ), + DLG_KEYS_DATA( DLGK_PAGE_NEXT, KEY_NPAGE ), + DLG_KEYS_DATA( DLGK_PAGE_PREV, KEY_PPAGE ), + END_KEYS_BINDING + }; + /* *INDENT-ON* */ + +#ifdef KEY_RESIZE + int old_height = height; + int old_width = width; +#endif + + int form_width; + int first = TRUE; + int chr_offset = 0; + int state = dialog_vars.defaultno ? dlg_defaultno_button() : sTEXT; + int x, y, cur_x, cur_y, box_x, box_y; + int code; + int key = 0; + int fkey; + int choice = dlg_default_formitem(items); + int new_choice, new_scroll; + int scrollamt = 0; + int result = DLG_EXIT_UNKNOWN; + int min_width = 0, min_height = 0; + bool was_autosize = (height == 0 || width == 0); + bool show_buttons = FALSE; + bool scroll_changed = FALSE; + bool field_changed = FALSE; + bool non_editable = FALSE; + WINDOW *dialog, *form; + char *prompt = dlg_strclone(cprompt); + const char **buttons = dlg_ok_labels(); + DIALOG_FORMITEM *current; + + make_FORM_ELTs(items, item_no, &min_height, &min_width); + dlg_does_output(); + dlg_tab_correct_str(prompt); + +#ifdef KEY_RESIZE + retry: +#endif + + dlg_auto_size(title, prompt, &height, &width, + 1 + 3 * MARGIN, + MAX(26, 2 + min_width)); + + if (form_height == 0) + form_height = min_height; + + if (was_autosize) { + form_height = MIN(SLINES - height, form_height); + height += form_height; + } else { + int thigh = 0; + int twide = 0; + dlg_auto_size(title, prompt, &thigh, &twide, 0, width); + thigh = SLINES - (height - (thigh + 1 + 3 * MARGIN)); + form_height = MIN(thigh, form_height); + } + + dlg_print_size(height, width); + dlg_ctl_size(height, width); + + x = dlg_box_x_ordinate(width); + y = dlg_box_y_ordinate(height); + + dialog = dlg_new_window(height, width, y, x); + dlg_register_window(dialog, "formbox", binding); + dlg_register_buttons(dialog, "formbox", buttons); + + dlg_mouse_setbase(x, y); + + dlg_draw_box(dialog, 0, 0, height, width, dialog_attr, border_attr); + dlg_draw_bottom_box(dialog); + dlg_draw_title(dialog, title); + + wattrset(dialog, dialog_attr); + dlg_print_autowrap(dialog, prompt, height, width); + + form_width = width - 6; + getyx(dialog, cur_y, cur_x); + box_y = cur_y + 1; + box_x = (width - form_width) / 2 - 1; + + /* create new window for the form */ + form = dlg_sub_window(dialog, form_height, form_width, y + box_y + 1, + x + box_x + 1); + + /* draw a box around the form items */ + dlg_draw_box(dialog, box_y, box_x, form_height + 2, form_width + 2, + menubox_border_attr, menubox_attr); + + /* register the new window, along with its borders */ + dlg_mouse_mkbigregion(getbegy(form) - getbegy(dialog), + getbegx(form) - getbegx(dialog), + getmaxy(form), + getmaxx(form), + KEY_MAX, 1, 1, 3 /* by cells */ ); + + show_buttons = TRUE; + scroll_changed = TRUE; + + choice = set_choice(items, choice, item_no, &non_editable); + current = &items[choice]; + if (non_editable) + state = next_valid_buttonindex(state, sTEXT, non_editable); + + while (result == DLG_EXIT_UNKNOWN) { + int edit = FALSE; + + if (scroll_changed) { + print_form(form, items, item_no, scrollamt, choice); + dlg_draw_arrows(dialog, scrollamt, + scrollamt + form_height < item_no, + box_x + 1, + box_y, + box_y + form_height + 1); + scroll_changed = FALSE; + } + + if (show_buttons) { + dlg_item_help(""); + dlg_draw_buttons(dialog, height - 2, 0, buttons, + ((state < 0) + ? 1000 /* no such button, not highlighted */ + : state), + FALSE, width); + show_buttons = FALSE; + } + + if (field_changed || state == sTEXT) { + if (field_changed) + chr_offset = 0; + current = &items[choice]; + dialog_vars.max_input = current->text_ilen; + dlg_item_help(current->help); + dlg_show_string(form, current->text, chr_offset, + form_active_text_attr, + current->text_y - scrollamt, + current->text_x, + current->text_len, + is_hidden(current), first); + field_changed = FALSE; + } + + key = dlg_mouse_wgetch(dialog, &fkey); + if (dlg_result_key(key, fkey, &result)) + break; + + /* handle non-functionkeys */ + if (!fkey) { + if (state != sTEXT) { + code = dlg_char_to_button(key, buttons); + if (code >= 0) { + dlg_del_window(dialog); + result = dlg_ok_buttoncode(code); + continue; + } + if (key == ' ') { + fkey = TRUE; + key = DLGK_ENTER; + } + } + } + + /* handle functionkeys */ + if (fkey) { + bool do_scroll = FALSE; + bool do_tab = FALSE; + int move_by = 0; + + switch (key) { + case DLGK_MOUSE(KEY_PPAGE): + case DLGK_PAGE_PREV: + do_scroll = TRUE; + move_by = -form_height; + break; + + case DLGK_MOUSE(KEY_NPAGE): + case DLGK_PAGE_NEXT: + do_scroll = TRUE; + move_by = form_height; + break; + + case DLGK_ENTER: + dlg_del_window(dialog); + result = (state >= 0) ? dlg_ok_buttoncode(state) : DLG_EXIT_OK; + continue; + + case DLGK_GRID_LEFT: + if (state == sTEXT) + break; + /* FALLTHRU */ + case DLGK_ITEM_PREV: + if (state == sTEXT) { + do_tab = TRUE; + move_by = -1; + break; + } else { + state = prev_valid_buttonindex(state, 0, non_editable); + show_buttons = TRUE; + continue; + } + + case DLGK_FIELD_PREV: + state = prev_valid_buttonindex(state, sTEXT, non_editable); + show_buttons = TRUE; + continue; + + case DLGK_FIELD_NEXT: + state = next_valid_buttonindex(state, sTEXT, non_editable); + show_buttons = TRUE; + continue; + + case DLGK_GRID_RIGHT: + if (state == sTEXT) + break; + /* FALLTHRU */ + + case DLGK_ITEM_NEXT: + if (state == sTEXT) { + do_tab = TRUE; + move_by = 1; + break; + } else { + state = next_valid_buttonindex(state, 0, non_editable); + show_buttons = TRUE; + continue; + } + +#ifdef KEY_RESIZE + case KEY_RESIZE: + /* reset data */ + height = old_height; + width = old_width; + /* repaint */ + dlg_clear(); + dlg_del_window(dialog); + refresh(); + dlg_mouse_free_regions(); + goto retry; +#endif + default: +#if USE_MOUSE + if (is_DLGK_MOUSE(key)) { + if (key >= DLGK_MOUSE(KEY_MAX)) { + int cell = key - DLGK_MOUSE(KEY_MAX); + int row = (cell / getmaxx(form)) + scrollamt; + int col = (cell % getmaxx(form)); + int n; + + for (n = 0; n < item_no; ++n) { + if (items[n].name_y == row + && items[n].name_x <= col + && (items[n].name_x + items[n].name_len > col + || (items[n].name_y == items[n].text_y + && items[n].text_x > col))) { + if (!is_readonly(&(items[n]))) { + field_changed = TRUE; + break; + } + } + if (items[n].text_y == row + && items[n].text_x <= col + && items[n].text_x + items[n].text_ilen > col) { + if (!is_readonly(&(items[n]))) { + field_changed = TRUE; + break; + } + } + } + if (field_changed) { + print_item(form, items + choice, scrollamt, FALSE); + choice = n; + continue; + } + beep(); + } else if ((code = dlg_ok_buttoncode(key - M_EVENT)) >= 0) { + result = code; + } + continue; + } +#endif + break; + } + + new_scroll = scrollamt; + new_choice = choice; + if (do_scroll) { + if (scroll_next(form, items, move_by, &new_choice, &new_scroll)) { + if (choice != new_choice) { + choice = new_choice; + field_changed = TRUE; + } + if (scrollamt != new_scroll) { + scrollamt = new_scroll; + scroll_changed = TRUE; + } + } + continue; + } + if (do_tab) { + if (tab_next(form, items, item_no, move_by, &new_choice, &new_scroll)) { + if (choice != new_choice) { + choice = new_choice; + field_changed = TRUE; + } + if (scrollamt != new_scroll) { + scrollamt = new_scroll; + scroll_changed = TRUE; + } + } + continue; + } + } + + if (state == sTEXT) { /* Input box selected */ + if (!is_readonly(current)) + edit = dlg_edit_string(current->text, &chr_offset, key, + fkey, first); + if (edit) { + dlg_show_string(form, current->text, chr_offset, + form_active_text_attr, + current->text_y - scrollamt, + current->text_x, + current->text_len, + is_hidden(current), first); + continue; + } + } + + } + + dlg_mouse_free_regions(); + dlg_del_window(dialog); + free(prompt); + + *current_item = choice; + return result; +} + +/* + * Free memory owned by a list of DIALOG_FORMITEM's. + */ +void +dlg_free_formitems(DIALOG_FORMITEM * items) +{ + int n; + for (n = 0; items[n].name != 0; ++n) { + if (items[n].name_free) + free(items[n].name); + if (items[n].text_free) + free(items[n].text); + if (items[n].help_free && items[n].help != dlg_strempty()) + free(items[n].help); + } + free(items); +} + +/* + * The script accepts values beginning at 1, while curses starts at 0. + */ +int +dlg_ordinate(const char *s) +{ + int result = atoi(s); + if (result > 0) + --result; + else + result = 0; + return result; +} + +int +dialog_form(const char *title, + const char *cprompt, + int height, + int width, + int form_height, + int item_no, + char **items) +{ + int result; + int choice; + int i; + DIALOG_FORMITEM *listitems; + DIALOG_VARS save_vars; + bool show_status = FALSE; + + dlg_save_vars(&save_vars); + dialog_vars.separate_output = TRUE; + + listitems = dlg_calloc(DIALOG_FORMITEM, item_no + 1); + assert_ptr(listitems, "dialog_form"); + + for (i = 0; i < item_no; ++i) { + listitems[i].type = dialog_vars.formitem_type; + listitems[i].name = ItemName(i); + listitems[i].name_len = strlen(ItemName(i)); + listitems[i].name_y = dlg_ordinate(ItemNameY(i)); + listitems[i].name_x = dlg_ordinate(ItemNameX(i)); + listitems[i].text = ItemText(i); + listitems[i].text_len = strlen(ItemText(i)); + listitems[i].text_y = dlg_ordinate(ItemTextY(i)); + listitems[i].text_x = dlg_ordinate(ItemTextX(i)); + listitems[i].text_flen = atoi(ItemTextFLen(i)); + listitems[i].text_ilen = atoi(ItemTextILen(i)); + listitems[i].help = (dialog_vars.item_help) ? ItemHelp(i) : + dlg_strempty(); + } + + result = dlg_form(title, + cprompt, + height, + width, + form_height, + item_no, + listitems, + &choice); + + switch (result) { + case DLG_EXIT_OK: /* FALLTHRU */ + case DLG_EXIT_EXTRA: + show_status = TRUE; + break; + case DLG_EXIT_HELP: + dlg_add_result("HELP "); + show_status = dialog_vars.help_status; + if (USE_ITEM_HELP(listitems[choice].help)) { + dlg_add_string(listitems[choice].help); + result = DLG_EXIT_ITEM_HELP; + } else { + dlg_add_string(listitems[choice].name); + } + if (show_status) + dlg_add_separator(); + break; + } + if (show_status) { + for (i = 0; i < item_no; i++) { + if (listitems[i].text_flen > 0) { + dlg_add_string(listitems[i].text); + dlg_add_separator(); + } + } + } + + dlg_free_formitems(listitems); + dlg_restore_vars(&save_vars); + + return result; +} |