WIP FPC-III support
[linux/fpc-iii.git] / scripts / kconfig / lxdialog / inputbox.c
blob1dcfb288ee63630e7e73be6fe28f1fd1a3bc5857
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * inputbox.c -- implements the input box
5 * ORIGINAL AUTHOR: Savio Lam (lam836@cs.cuhk.hk)
6 * MODIFIED FOR LINUX KERNEL CONFIG BY: William Roadcap (roadcap@cfw.com)
7 */
9 #include "dialog.h"
11 char dialog_input_result[MAX_LEN + 1];
14 * Print the termination buttons
16 static void print_buttons(WINDOW * dialog, int height, int width, int selected)
18 int x = width / 2 - 11;
19 int y = height - 2;
21 print_button(dialog, " Ok ", y, x, selected == 0);
22 print_button(dialog, " Help ", y, x + 14, selected == 1);
24 wmove(dialog, y, x + 1 + 14 * selected);
25 wrefresh(dialog);
29 * Display a dialog box for inputing a string
31 int dialog_inputbox(const char *title, const char *prompt, int height, int width,
32 const char *init)
34 int i, x, y, box_y, box_x, box_width;
35 int input_x = 0, key = 0, button = -1;
36 int show_x, len, pos;
37 char *instr = dialog_input_result;
38 WINDOW *dialog;
40 if (!init)
41 instr[0] = '\0';
42 else
43 strcpy(instr, init);
45 do_resize:
46 if (getmaxy(stdscr) <= (height - INPUTBOX_HEIGTH_MIN))
47 return -ERRDISPLAYTOOSMALL;
48 if (getmaxx(stdscr) <= (width - INPUTBOX_WIDTH_MIN))
49 return -ERRDISPLAYTOOSMALL;
51 /* center dialog box on screen */
52 x = (getmaxx(stdscr) - width) / 2;
53 y = (getmaxy(stdscr) - height) / 2;
55 draw_shadow(stdscr, y, x, height, width);
57 dialog = newwin(height, width, y, x);
58 keypad(dialog, TRUE);
60 draw_box(dialog, 0, 0, height, width,
61 dlg.dialog.atr, dlg.border.atr);
62 wattrset(dialog, dlg.border.atr);
63 mvwaddch(dialog, height - 3, 0, ACS_LTEE);
64 for (i = 0; i < width - 2; i++)
65 waddch(dialog, ACS_HLINE);
66 wattrset(dialog, dlg.dialog.atr);
67 waddch(dialog, ACS_RTEE);
69 print_title(dialog, title, width);
71 wattrset(dialog, dlg.dialog.atr);
72 print_autowrap(dialog, prompt, width - 2, 1, 3);
74 /* Draw the input field box */
75 box_width = width - 6;
76 getyx(dialog, y, x);
77 box_y = y + 2;
78 box_x = (width - box_width) / 2;
79 draw_box(dialog, y + 1, box_x - 1, 3, box_width + 2,
80 dlg.dialog.atr, dlg.border.atr);
82 print_buttons(dialog, height, width, 0);
84 /* Set up the initial value */
85 wmove(dialog, box_y, box_x);
86 wattrset(dialog, dlg.inputbox.atr);
88 len = strlen(instr);
89 pos = len;
91 if (len >= box_width) {
92 show_x = len - box_width + 1;
93 input_x = box_width - 1;
94 for (i = 0; i < box_width - 1; i++)
95 waddch(dialog, instr[show_x + i]);
96 } else {
97 show_x = 0;
98 input_x = len;
99 waddstr(dialog, instr);
102 wmove(dialog, box_y, box_x + input_x);
104 wrefresh(dialog);
106 while (key != KEY_ESC) {
107 key = wgetch(dialog);
109 if (button == -1) { /* Input box selected */
110 switch (key) {
111 case TAB:
112 case KEY_UP:
113 case KEY_DOWN:
114 break;
115 case KEY_BACKSPACE:
116 case 8: /* ^H */
117 case 127: /* ^? */
118 if (pos) {
119 wattrset(dialog, dlg.inputbox.atr);
120 if (input_x == 0) {
121 show_x--;
122 } else
123 input_x--;
125 if (pos < len) {
126 for (i = pos - 1; i < len; i++) {
127 instr[i] = instr[i+1];
131 pos--;
132 len--;
133 instr[len] = '\0';
134 wmove(dialog, box_y, box_x);
135 for (i = 0; i < box_width; i++) {
136 if (!instr[show_x + i]) {
137 waddch(dialog, ' ');
138 break;
140 waddch(dialog, instr[show_x + i]);
142 wmove(dialog, box_y, input_x + box_x);
143 wrefresh(dialog);
145 continue;
146 case KEY_LEFT:
147 if (pos > 0) {
148 if (input_x > 0) {
149 wmove(dialog, box_y, --input_x + box_x);
150 } else if (input_x == 0) {
151 show_x--;
152 wmove(dialog, box_y, box_x);
153 for (i = 0; i < box_width; i++) {
154 if (!instr[show_x + i]) {
155 waddch(dialog, ' ');
156 break;
158 waddch(dialog, instr[show_x + i]);
160 wmove(dialog, box_y, box_x);
162 pos--;
164 continue;
165 case KEY_RIGHT:
166 if (pos < len) {
167 if (input_x < box_width - 1) {
168 wmove(dialog, box_y, ++input_x + box_x);
169 } else if (input_x == box_width - 1) {
170 show_x++;
171 wmove(dialog, box_y, box_x);
172 for (i = 0; i < box_width; i++) {
173 if (!instr[show_x + i]) {
174 waddch(dialog, ' ');
175 break;
177 waddch(dialog, instr[show_x + i]);
179 wmove(dialog, box_y, input_x + box_x);
181 pos++;
183 continue;
184 default:
185 if (key < 0x100 && isprint(key)) {
186 if (len < MAX_LEN) {
187 wattrset(dialog, dlg.inputbox.atr);
188 if (pos < len) {
189 for (i = len; i > pos; i--)
190 instr[i] = instr[i-1];
191 instr[pos] = key;
192 } else {
193 instr[len] = key;
195 pos++;
196 len++;
197 instr[len] = '\0';
199 if (input_x == box_width - 1) {
200 show_x++;
201 } else {
202 input_x++;
205 wmove(dialog, box_y, box_x);
206 for (i = 0; i < box_width; i++) {
207 if (!instr[show_x + i]) {
208 waddch(dialog, ' ');
209 break;
211 waddch(dialog, instr[show_x + i]);
213 wmove(dialog, box_y, input_x + box_x);
214 wrefresh(dialog);
215 } else
216 flash(); /* Alarm user about overflow */
217 continue;
221 switch (key) {
222 case 'O':
223 case 'o':
224 delwin(dialog);
225 return 0;
226 case 'H':
227 case 'h':
228 delwin(dialog);
229 return 1;
230 case KEY_UP:
231 case KEY_LEFT:
232 switch (button) {
233 case -1:
234 button = 1; /* Indicates "Help" button is selected */
235 print_buttons(dialog, height, width, 1);
236 break;
237 case 0:
238 button = -1; /* Indicates input box is selected */
239 print_buttons(dialog, height, width, 0);
240 wmove(dialog, box_y, box_x + input_x);
241 wrefresh(dialog);
242 break;
243 case 1:
244 button = 0; /* Indicates "OK" button is selected */
245 print_buttons(dialog, height, width, 0);
246 break;
248 break;
249 case TAB:
250 case KEY_DOWN:
251 case KEY_RIGHT:
252 switch (button) {
253 case -1:
254 button = 0; /* Indicates "OK" button is selected */
255 print_buttons(dialog, height, width, 0);
256 break;
257 case 0:
258 button = 1; /* Indicates "Help" button is selected */
259 print_buttons(dialog, height, width, 1);
260 break;
261 case 1:
262 button = -1; /* Indicates input box is selected */
263 print_buttons(dialog, height, width, 0);
264 wmove(dialog, box_y, box_x + input_x);
265 wrefresh(dialog);
266 break;
268 break;
269 case ' ':
270 case '\n':
271 delwin(dialog);
272 return (button == -1 ? 0 : button);
273 case 'X':
274 case 'x':
275 key = KEY_ESC;
276 break;
277 case KEY_ESC:
278 key = on_key_esc(dialog);
279 break;
280 case KEY_RESIZE:
281 delwin(dialog);
282 on_key_resize();
283 goto do_resize;
287 delwin(dialog);
288 return KEY_ESC; /* ESC pressed */