1 /* 2 * $Id: mousewget.c,v 1.26 2022/04/03 22:39:39 tom Exp $ 3 * 4 * mousewget.c -- mouse/wgetch support for dialog 5 * 6 * Copyright 2000-2019,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 24 #include <dlg_internals.h> 25 #include <dlg_keys.h> 26 27 static int 28 mouse_wgetch(WINDOW *win, int *fkey, bool ignore_errs) 29 { 30 int mouse_err = FALSE; 31 int key; 32 33 do { 34 35 key = dlg_getc(win, fkey); 36 37 #if USE_MOUSE 38 39 mouse_err = FALSE; 40 if (key == KEY_MOUSE) { 41 MEVENT event; 42 43 if (getmouse(&event) != ERR) { 44 mseRegion *p; 45 46 DLG_TRACE(("# mouse-click abs %d,%d (rel %d,%d)\n", 47 event.y, event.x, 48 event.y - getbegy(win), 49 event.x - getbegx(win))); 50 if ((p = dlg_mouse_region(event.y, event.x)) != 0) { 51 key = DLGK_MOUSE(p->code); 52 } else if ((p = dlg_mouse_bigregion(event.y, event.x)) != 0) { 53 int x = event.x - p->x; 54 int y = event.y - p->y; 55 int row = (p->X - p->x) / p->step_x; 56 57 key = -(p->code); 58 switch (p->mode) { 59 case 1: /* index by lines */ 60 key += y; 61 break; 62 case 2: /* index by columns */ 63 key += (x / p->step_x); 64 break; 65 default: 66 case 3: /* index by cells */ 67 key += (x / p->step_x) + (y * row); 68 break; 69 } 70 } else { 71 (void) beep(); 72 mouse_err = TRUE; 73 } 74 } else { 75 (void) beep(); 76 mouse_err = TRUE; 77 } 78 } 79 #endif 80 81 } while (ignore_errs && mouse_err); 82 83 return key; 84 } 85 86 int 87 dlg_mouse_wgetch(WINDOW *win, int *fkey) 88 { 89 return mouse_wgetch(win, fkey, TRUE); 90 } 91 92 int 93 dlg_mouse_wgetch_nowait(WINDOW *win, int *fkey) 94 { 95 return mouse_wgetch(win, fkey, FALSE); 96 } 97