1 /* 2 * $Id: timebox.c,v 1.69 2020/11/23 09:04:00 tom Exp $ 3 * 4 * timebox.c -- implements the timebox dialog 5 * 6 * Copyright 2001-2019,2020 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 24 #include <dlg_internals.h> 25 #include <dlg_keys.h> 26 27 #include <time.h> 28 29 #define ONE_HIGH 1 30 #define ONE_WIDE 2 31 #define BTN_HIGH 2 32 33 #define MIN_HIGH (ONE_HIGH + BTN_HIGH + (4 * MARGIN)) 34 #define MIN_WIDE ((3 * (ONE_WIDE + 2 * MARGIN)) + 2 + (2 * MARGIN)) 35 36 typedef enum { 37 sHR = -3 38 ,sMN = -2 39 ,sSC = -1 40 } STATES; 41 42 struct _box; 43 44 typedef struct _box { 45 WINDOW *parent; 46 WINDOW *window; 47 int x; 48 int y; 49 int width; 50 int height; 51 int period; 52 int value; 53 } BOX; 54 55 static int 56 next_or_previous(int key) 57 { 58 int result = 0; 59 60 switch (key) { 61 case DLGK_ITEM_PREV: 62 result = -1; 63 break; 64 case DLGK_ITEM_NEXT: 65 result = 1; 66 break; 67 default: 68 beep(); 69 break; 70 } 71 return result; 72 } 73 /* 74 * Draw the hour-of-month selection box 75 */ 76 static int 77 draw_cell(BOX * data) 78 { 79 werase(data->window); 80 dlg_draw_box(data->parent, 81 data->y - MARGIN, data->x - MARGIN, 82 data->height + (2 * MARGIN), data->width + (2 * MARGIN), 83 menubox_border_attr, menubox_border2_attr); 84 85 dlg_attrset(data->window, item_attr); 86 wprintw(data->window, "%02d", data->value); 87 return 0; 88 } 89 90 static int 91 init_object(BOX * data, 92 WINDOW *parent, 93 int x, int y, 94 int width, int height, 95 int period, int value, 96 int code) 97 { 98 (void) code; 99 100 data->parent = parent; 101 data->x = x; 102 data->y = y; 103 data->width = width; 104 data->height = height; 105 data->period = period; 106 data->value = value % period; 107 108 data->window = dlg_der_window(data->parent, 109 data->height, data->width, 110 data->y, data->x); 111 if (data->window == 0) 112 return -1; 113 114 dlg_mouse_setbase(getbegx(parent), getbegy(parent)); 115 dlg_mouse_mkregion(y, x, height, width, code); 116 117 return 0; 118 } 119 120 static int 121 CleanupResult(int code, WINDOW *dialog, char *prompt, DIALOG_VARS * save_vars) 122 { 123 dlg_del_window(dialog); 124 dlg_mouse_free_regions(); 125 free(prompt); 126 dlg_restore_vars(save_vars); 127 128 return code; 129 } 130 131 #define DrawObject(data) draw_cell(data) 132 133 /* 134 * Display a dialog box for entering a date 135 */ 136 int 137 dialog_timebox(const char *title, 138 const char *subtitle, 139 int height, 140 int width, 141 int hour, 142 int minute, 143 int second) 144 { 145 /* *INDENT-OFF* */ 146 static DLG_KEYS_BINDING binding[] = { 147 DLG_KEYS_DATA( DLGK_DELETE_RIGHT,KEY_DC ), 148 HELPKEY_BINDINGS, 149 ENTERKEY_BINDINGS, 150 TOGGLEKEY_BINDINGS, 151 DLG_KEYS_DATA( DLGK_FIELD_FIRST,KEY_HOME ), 152 DLG_KEYS_DATA( DLGK_FIELD_LAST, KEY_END ), 153 DLG_KEYS_DATA( DLGK_FIELD_LAST, KEY_LL ), 154 DLG_KEYS_DATA( DLGK_FIELD_NEXT, CHR_NEXT ), 155 DLG_KEYS_DATA( DLGK_FIELD_NEXT, KEY_RIGHT ), 156 DLG_KEYS_DATA( DLGK_FIELD_NEXT, TAB ), 157 DLG_KEYS_DATA( DLGK_FIELD_PREV, CHR_BACKSPACE ), 158 DLG_KEYS_DATA( DLGK_FIELD_PREV, CHR_PREVIOUS ), 159 DLG_KEYS_DATA( DLGK_FIELD_PREV, KEY_BTAB ), 160 DLG_KEYS_DATA( DLGK_FIELD_PREV, KEY_LEFT ), 161 DLG_KEYS_DATA( DLGK_ITEM_NEXT, '+'), 162 DLG_KEYS_DATA( DLGK_ITEM_NEXT, KEY_DOWN), 163 DLG_KEYS_DATA( DLGK_ITEM_NEXT, KEY_NEXT), 164 DLG_KEYS_DATA( DLGK_ITEM_NEXT, KEY_NPAGE), 165 DLG_KEYS_DATA( DLGK_ITEM_PREV, '-' ), 166 DLG_KEYS_DATA( DLGK_ITEM_PREV, KEY_PPAGE ), 167 DLG_KEYS_DATA( DLGK_ITEM_PREV, KEY_PREVIOUS ), 168 DLG_KEYS_DATA( DLGK_ITEM_PREV, KEY_UP ), 169 END_KEYS_BINDING 170 }; 171 /* *INDENT-ON* */ 172 173 #ifdef KEY_RESIZE 174 int old_height = height; 175 int old_width = width; 176 #endif 177 BOX hr_box, mn_box, sc_box; 178 int key, fkey; 179 int button; 180 int result = DLG_EXIT_UNKNOWN; 181 WINDOW *dialog; 182 time_t now_time; 183 struct tm current; 184 int state = dlg_default_button(); 185 const char **buttons = dlg_ok_labels(); 186 char *prompt; 187 char buffer[MAX_LEN]; 188 DIALOG_VARS save_vars; 189 190 DLG_TRACE(("# timebox args:\n")); 191 DLG_TRACE2S("title", title); 192 DLG_TRACE2S("message", subtitle); 193 DLG_TRACE2N("height", height); 194 DLG_TRACE2N("width", width); 195 DLG_TRACE2N("hour", hour); 196 DLG_TRACE2N("minute", minute); 197 DLG_TRACE2N("second", second); 198 199 now_time = time((time_t *) 0); 200 current = *localtime(&now_time); 201 202 dlg_save_vars(&save_vars); 203 dialog_vars.separate_output = TRUE; 204 205 dlg_does_output(); 206 207 #ifdef KEY_RESIZE 208 retry: 209 #endif 210 211 prompt = dlg_strclone(subtitle); 212 dlg_auto_size(title, prompt, &height, &width, MIN_HIGH, MIN_WIDE); 213 214 dlg_button_layout(buttons, &width); 215 dlg_print_size(height, width); 216 dlg_ctl_size(height, width); 217 218 dialog = dlg_new_window(height, width, 219 dlg_box_y_ordinate(height), 220 dlg_box_x_ordinate(width)); 221 222 if (hour >= 24 || minute >= 60 || second >= 60) { 223 return CleanupResult(DLG_EXIT_ERROR, dialog, prompt, &save_vars); 224 } 225 226 dlg_register_window(dialog, "timebox", binding); 227 dlg_register_buttons(dialog, "timebox", buttons); 228 229 dlg_draw_box2(dialog, 0, 0, height, width, dialog_attr, border_attr, border2_attr); 230 dlg_draw_bottom_box2(dialog, border_attr, border2_attr, dialog_attr); 231 dlg_draw_title(dialog, title); 232 dlg_draw_helpline(dialog, FALSE); 233 234 dlg_attrset(dialog, dialog_attr); 235 dlg_print_autowrap(dialog, prompt, height, width); 236 237 /* compute positions of hour, month and year boxes */ 238 memset(&hr_box, 0, sizeof(hr_box)); 239 memset(&mn_box, 0, sizeof(mn_box)); 240 memset(&sc_box, 0, sizeof(sc_box)); 241 242 if (init_object(&hr_box, 243 dialog, 244 (width - MIN_WIDE + 1) / 2 + MARGIN, 245 (height - MIN_HIGH + MARGIN), 246 ONE_WIDE, 247 ONE_HIGH, 248 24, 249 hour >= 0 ? hour : current.tm_hour, 250 'H') < 0 251 || DrawObject(&hr_box) < 0) { 252 return CleanupResult(DLG_EXIT_ERROR, dialog, prompt, &save_vars); 253 } 254 255 mvwprintw(dialog, hr_box.y, hr_box.x + ONE_WIDE + MARGIN, ":"); 256 if (init_object(&mn_box, 257 dialog, 258 hr_box.x + (ONE_WIDE + 2 * MARGIN + 1), 259 hr_box.y, 260 hr_box.width, 261 hr_box.height, 262 60, 263 minute >= 0 ? minute : current.tm_min, 264 'M') < 0 265 || DrawObject(&mn_box) < 0) { 266 return CleanupResult(DLG_EXIT_ERROR, dialog, prompt, &save_vars); 267 } 268 269 mvwprintw(dialog, mn_box.y, mn_box.x + ONE_WIDE + MARGIN, ":"); 270 if (init_object(&sc_box, 271 dialog, 272 mn_box.x + (ONE_WIDE + 2 * MARGIN + 1), 273 mn_box.y, 274 mn_box.width, 275 mn_box.height, 276 60, 277 second >= 0 ? second : current.tm_sec, 278 'S') < 0 279 || DrawObject(&sc_box) < 0) { 280 return CleanupResult(DLG_EXIT_ERROR, dialog, prompt, &save_vars); 281 } 282 283 dlg_trace_win(dialog); 284 while (result == DLG_EXIT_UNKNOWN) { 285 BOX *obj = (state == sHR ? &hr_box 286 : (state == sMN ? &mn_box : 287 (state == sSC ? &sc_box : 0))); 288 int key2; 289 290 button = (state < 0) ? 0 : state; 291 dlg_draw_buttons(dialog, height - 2, 0, buttons, button, FALSE, width); 292 if (obj != 0) 293 dlg_set_focus(dialog, obj->window); 294 295 key = dlg_mouse_wgetch(dialog, &fkey); 296 if (dlg_result_key(key, fkey, &result)) { 297 if (!dlg_button_key(result, &button, &key, &fkey)) 298 break; 299 } 300 301 if ((key2 = dlg_char_to_button(key, buttons)) >= 0) { 302 result = key2; 303 } else { 304 /* handle function-keys */ 305 if (fkey) { 306 switch (key) { 307 case DLGK_MOUSE('H'): 308 state = sHR; 309 break; 310 case DLGK_MOUSE('M'): 311 state = sMN; 312 break; 313 case DLGK_MOUSE('S'): 314 state = sSC; 315 break; 316 case DLGK_TOGGLE: 317 case DLGK_ENTER: 318 result = dlg_enter_buttoncode(button); 319 break; 320 case DLGK_LEAVE: 321 result = dlg_ok_buttoncode(button); 322 break; 323 case DLGK_FIELD_PREV: 324 state = dlg_prev_ok_buttonindex(state, sHR); 325 break; 326 case DLGK_FIELD_NEXT: 327 state = dlg_next_ok_buttonindex(state, sHR); 328 break; 329 case DLGK_FIELD_FIRST: 330 if (obj != 0) { 331 obj->value = 0; 332 (void) DrawObject(obj); 333 } 334 break; 335 case DLGK_FIELD_LAST: 336 if (obj != 0) { 337 switch (state) { 338 case sHR: 339 obj->value = 23; 340 break; 341 case sMN: 342 case sSC: 343 obj->value = 59; 344 break; 345 } 346 (void) DrawObject(obj); 347 } 348 break; 349 case DLGK_DELETE_RIGHT: 350 if (obj != 0) { 351 obj->value /= 10; 352 (void) DrawObject(obj); 353 } 354 break; 355 #ifdef KEY_RESIZE 356 case KEY_RESIZE: 357 dlg_will_resize(dialog); 358 /* reset data */ 359 height = old_height; 360 width = old_width; 361 hour = hr_box.value; 362 minute = mn_box.value; 363 second = sc_box.value; 364 /* repaint */ 365 free(prompt); 366 _dlg_resize_cleanup(dialog); 367 goto retry; 368 #endif 369 default: 370 if (is_DLGK_MOUSE(key)) { 371 result = dlg_ok_buttoncode(key - M_EVENT); 372 if (result < 0) 373 result = DLG_EXIT_OK; 374 } else if (obj != 0) { 375 int step = next_or_previous(key); 376 if (step != 0) { 377 obj->value += step; 378 while (obj->value < 0) 379 obj->value += obj->period; 380 obj->value %= obj->period; 381 (void) DrawObject(obj); 382 } 383 } 384 break; 385 } 386 } else if (isdigit(key)) { 387 if (obj != 0) { 388 int digit = (key - '0'); 389 int value = (obj->value * 10) + digit; 390 if (value < obj->period) { 391 obj->value = value; 392 (void) DrawObject(obj); 393 } else { 394 beep(); 395 } 396 } 397 } else if (key > 0) { 398 beep(); 399 } 400 } 401 } 402 403 #define DefaultFormat(dst, src) \ 404 sprintf(dst, "%02d:%02d:%02d", \ 405 hr_box.value, mn_box.value, sc_box.value) 406 407 #if defined(HAVE_STRFTIME) 408 if (dialog_vars.time_format != 0) { 409 size_t used; 410 time_t now = time((time_t *) 0); 411 struct tm *parts = localtime(&now); 412 413 parts->tm_sec = sc_box.value; 414 parts->tm_min = mn_box.value; 415 parts->tm_hour = hr_box.value; 416 used = strftime(buffer, 417 sizeof(buffer) - 1, 418 dialog_vars.time_format, 419 parts); 420 if (used == 0 || *buffer == '\0') 421 DefaultFormat(buffer, hr_box); 422 } else 423 #endif 424 DefaultFormat(buffer, hr_box); 425 426 dlg_add_result(buffer); 427 AddLastKey(); 428 429 return CleanupResult(result, dialog, prompt, &save_vars); 430 } 431