1 /* 2 * $Id: mixedform.c,v 1.14 2022/04/03 22:38:16 tom Exp $ 3 * 4 * mixedform.c -- implements the mixed form (i.e, typed pairs label/editbox) 5 * 6 * Copyright 2007-2018,2022 Thomas E. Dickey 7 * 8 * This program is free software; you can redistribute it and/or modify 9 * it under the terms of the GNU Lesser General Public License, version 2.1 10 * as published by the Free Software Foundation. 11 * 12 * This program is distributed in the hope that it will be useful, but 13 * WITHOUT ANY WARRANTY; without even the implied warranty of 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 15 * Lesser General Public License for more details. 16 * 17 * You should have received a copy of the GNU Lesser General Public 18 * License along with this program; if not, write to 19 * Free Software Foundation, Inc. 20 * 51 Franklin St., Fifth Floor 21 * Boston, MA 02110, USA. 22 * 23 * This is inspired by a patch from Kiran Cherupally 24 * (but different interface design). 25 */ 26 27 #include <dlg_internals.h> 28 29 #define LLEN(n) ((n) * MIXEDFORM_TAGS) 30 31 #define ItemName(i) items[LLEN(i) + 0] 32 #define ItemNameY(i) items[LLEN(i) + 1] 33 #define ItemNameX(i) items[LLEN(i) + 2] 34 #define ItemText(i) items[LLEN(i) + 3] 35 #define ItemTextY(i) items[LLEN(i) + 4] 36 #define ItemTextX(i) items[LLEN(i) + 5] 37 #define ItemTextFLen(i) items[LLEN(i) + 6] 38 #define ItemTextILen(i) items[LLEN(i) + 7] 39 #define ItemTypep(i) items[LLEN(i) + 8] 40 #define ItemHelp(i) (dialog_vars.item_help ? items[LLEN(i) + 9] : dlg_strempty()) 41 42 int 43 dialog_mixedform(const char *title, 44 const char *cprompt, 45 int height, 46 int width, 47 int form_height, 48 int item_no, 49 char **items) 50 { 51 int result; 52 int choice = 0; 53 int i; 54 DIALOG_FORMITEM *listitems; 55 DIALOG_VARS save_vars; 56 bool show_status = FALSE; 57 char *help_result; 58 59 dlg_save_vars(&save_vars); 60 dialog_vars.separate_output = TRUE; 61 62 listitems = dlg_calloc(DIALOG_FORMITEM, (size_t) item_no + 1); 63 assert_ptr(listitems, "dialog_mixedform"); 64 65 for (i = 0; i < item_no; ++i) { 66 listitems[i].type = dialog_vars.formitem_type; 67 listitems[i].name = ItemName(i); 68 listitems[i].name_len = (int) strlen(ItemName(i)); 69 listitems[i].name_y = dlg_ordinate(ItemNameY(i)); 70 listitems[i].name_x = dlg_ordinate(ItemNameX(i)); 71 listitems[i].text = ItemText(i); 72 listitems[i].text_len = (int) strlen(ItemText(i)); 73 listitems[i].text_y = dlg_ordinate(ItemTextY(i)); 74 listitems[i].text_x = dlg_ordinate(ItemTextX(i)); 75 listitems[i].text_flen = atoi(ItemTextFLen(i)); 76 listitems[i].text_ilen = atoi(ItemTextILen(i)); 77 listitems[i].help = (dialog_vars.item_help ? ItemHelp(i) : 78 dlg_strempty()); 79 listitems[i].type = (unsigned) atoi(ItemTypep(i)); 80 } 81 82 result = dlg_form(title, 83 cprompt, 84 height, 85 width, 86 form_height, 87 item_no, 88 listitems, 89 &choice); 90 91 switch (result) { 92 case DLG_EXIT_OK: /* FALLTHRU */ 93 case DLG_EXIT_EXTRA: 94 show_status = TRUE; 95 break; 96 case DLG_EXIT_HELP: 97 dlg_add_help_formitem(&result, &help_result, &listitems[choice]); 98 show_status = dialog_vars.help_status; 99 dlg_add_string(help_result); 100 if (show_status) 101 dlg_add_separator(); 102 break; 103 } 104 if (show_status) { 105 for (i = 0; i < item_no; i++) { 106 if (listitems[i].text_flen > 0) { 107 dlg_add_string(listitems[i].text); 108 dlg_add_separator(); 109 } 110 } 111 dlg_add_last_key(-1); 112 } 113 114 dlg_free_formitems(listitems); 115 dlg_restore_vars(&save_vars); 116 117 return result; 118 } 119