2 * $Id: inputbox.c,v 1.91 2020/03/27 20:25:40 tom Exp $
4 * inputbox.c -- implements the input box
6 * Copyright 2000-2019,2020 Thomas E. Dickey
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.
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.
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.
23 * An earlier version of this program lists as authors:
24 * Savio Lam (lam836@cs.cuhk.hk)
27 #include <dlg_internals.h>
32 #define NAVIGATE_BINDINGS \
33 DLG_KEYS_DATA( DLGK_FIELD_NEXT, KEY_DOWN ), \
34 DLG_KEYS_DATA( DLGK_FIELD_NEXT, KEY_RIGHT ), \
35 DLG_KEYS_DATA( DLGK_FIELD_NEXT, TAB ), \
36 DLG_KEYS_DATA( DLGK_FIELD_PREV, KEY_BTAB ), \
37 DLG_KEYS_DATA( DLGK_FIELD_PREV, KEY_LEFT ), \
38 DLG_KEYS_DATA( DLGK_FIELD_PREV, KEY_UP )
41 * Display a dialog box for entering a string
44 dialog_inputbox(const char *title
, const char *cprompt
, int height
, int width
,
45 const char *init
, const int password
)
48 static DLG_KEYS_BINDING binding
[] = {
55 static DLG_KEYS_BINDING binding2
[] = {
60 /* no TOGGLEKEY_BINDINGS, since that includes space... */
66 int old_height
= height
;
67 int old_width
= width
;
70 int x
, y
, box_y
, box_x
, box_width
;
75 int result
= DLG_EXIT_UNKNOWN
;
82 char *prompt
= dlg_strclone(cprompt
);
83 const char **buttons
= dlg_ok_labels();
87 DLG_TRACE(("# inputbox args:\n"));
88 DLG_TRACE2S("title", title
);
89 DLG_TRACE2S("message", cprompt
);
90 DLG_TRACE2N("height", height
);
91 DLG_TRACE2N("width", width
);
92 DLG_TRACE2S("init", init
);
93 DLG_TRACE2N("password", password
);
95 dlg_tab_correct_str(prompt
);
97 /* Set up the initial value */
98 input
= dlg_set_result(init
);
105 state
= dialog_vars
.default_button
>= 0 ? dlg_default_button() : sTEXT
;
106 first
= (state
== sTEXT
);
110 dlg_auto_size(title
, prompt
, &height
, &width
, 5,
111 MIN(MAX(dlg_count_columns(init
) + 7, 26),
112 SCOLS
- (dialog_vars
.begin_set
?
113 dialog_vars
.begin_x
: 0)));
114 chr_offset
= (int) strlen(init
);
116 dlg_auto_size(title
, prompt
, &height
, &width
, 5, 26);
118 dlg_button_layout(buttons
, &width
);
119 dlg_print_size(height
, width
);
120 dlg_ctl_size(height
, width
);
122 xorg
= dlg_box_x_ordinate(width
);
123 yorg
= dlg_box_y_ordinate(height
);
125 dialog
= dlg_new_window(height
, width
, yorg
, xorg
);
126 dlg_register_window(dialog
, "inputbox", binding
);
127 dlg_register_buttons(dialog
, "inputbox", buttons
);
129 dlg_mouse_setbase(xorg
, yorg
);
131 dlg_draw_box2(dialog
, 0, 0, height
, width
, dialog_attr
, border_attr
, border2_attr
);
132 dlg_draw_bottom_box2(dialog
, border_attr
, border2_attr
, dialog_attr
);
133 dlg_draw_title(dialog
, title
);
135 dlg_attrset(dialog
, dialog_attr
);
136 dlg_draw_helpline(dialog
, FALSE
);
137 dlg_print_autowrap(dialog
, prompt
, height
, width
);
139 /* Draw the input field box */
140 box_width
= width
- 6;
144 box_x
= (width
- box_width
) / 2;
145 dlg_mouse_mkregion(y
+ 1, box_x
- 1, 3, box_width
+ 2, 'i');
146 dlg_draw_box(dialog
, y
+ 1, box_x
- 1, 3, box_width
+ 2,
147 border_attr
, border2_attr
);
149 /* Make a window for the input-field, to associate bindings */
150 editor
= dlg_sub_window(dialog
, 1, box_width
, yorg
+ box_y
, xorg
+ box_x
);
151 dlg_register_window(editor
, "inputbox2", binding2
);
153 if (*input
!= '\0') {
154 dlg_show_string(editor
, input
, chr_offset
, inputbox_attr
,
155 0, 0, box_width
, (bool) (password
!= 0), first
);
160 while (result
== DLG_EXIT_UNKNOWN
) {
162 * The last field drawn determines where the cursor is shown:
165 show_buttons
= FALSE
;
166 col_offset
= dlg_edit_offset(input
, chr_offset
, box_width
);
167 (void) wmove(dialog
, box_y
, box_x
+ col_offset
);
168 dlg_draw_buttons(dialog
, height
- 2, 0, buttons
, state
, FALSE
, width
);
172 if (*input
!= '\0' && !edited
) {
173 dlg_show_string(editor
, input
, chr_offset
, inputbox_attr
,
174 0, 0, box_width
, (bool) (password
!= 0), first
);
175 wmove(editor
, 0, chr_offset
);
179 key
= dlg_mouse_wgetch((state
== sTEXT
) ? editor
: dialog
, &fkey
);
180 if (dlg_result_key(key
, fkey
, &result
)) {
181 if (!dlg_button_key(result
, &code
, &key
, &fkey
))
187 * Handle mouse clicks first, since we want to know if this is a button,
188 * or something that dlg_edit_string() should handle.
191 && is_DLGK_MOUSE(key
)
192 && (code
= dlg_ok_buttoncode(key
- M_EVENT
)) >= 0) {
197 if (state
== sTEXT
) { /* Input box selected */
198 int edit
= dlg_edit_string(input
, &chr_offset
, key
, fkey
, first
);
201 dlg_show_string(editor
, input
, chr_offset
, inputbox_attr
,
202 0, 0, box_width
, (bool) (password
!= 0), first
);
214 /* handle non-functionkeys */
215 if (!fkey
&& (code
= dlg_char_to_button(key
, buttons
)) >= 0) {
216 dlg_del_window(dialog
);
217 result
= dlg_ok_buttoncode(code
);
221 /* handle functionkeys */
224 case DLGK_MOUSE('i'): /* mouse enter events */
227 case DLGK_FIELD_PREV
:
229 state
= dlg_prev_ok_buttonindex(state
, sTEXT
);
231 case DLGK_FIELD_NEXT
:
233 state
= dlg_next_ok_buttonindex(state
, sTEXT
);
237 dlg_del_window(dialog
);
238 result
= (state
>= 0) ? dlg_enter_buttoncode(state
) : DLG_EXIT_OK
;
242 dlg_will_resize(dialog
);
247 _dlg_resize_cleanup(dialog
);
254 } else if (key
> 0) {
260 dlg_unregister_window(editor
);
261 dlg_del_window(dialog
);
262 dlg_mouse_free_regions();