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
dialog_mixedform(const char * title,const char * cprompt,int height,int width,int form_height,int item_no,char ** items)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