test/test_mouse.c

   1 /****************************************************************************
   2  * Copyright 2022,2023 Thomas E. Dickey                                     *
   3  * Copyright 2022 Leonid S. Usov <leonid.s.usov at gmail.com>               *
   4  *                                                                          *
   5  * Permission is hereby granted, free of charge, to any person obtaining a  *
   6  * copy of this software and associated documentation files (the            *
   7  * "Software"), to deal in the Software without restriction, including      *
   8  * without limitation the rights to use, copy, modify, merge, publish,      *
   9  * distribute, distribute with modifications, sublicense, and/or sell       *
  10  * copies of the Software, and to permit persons to whom the Software is    *
  11  * furnished to do so, subject to the following conditions:                 *
  12  *                                                                          *
  13  * The above copyright notice and this permission notice shall be included  *
  14  * in all copies or substantial portions of the Software.                   *
  15  *                                                                          *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  17  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  18  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  19  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  20  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  21  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  22  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  23  ****************************************************************************/
  24 /*
  25  * $Id: test_mouse.c,v 1.27 2023/01/07 17:22:42 tom Exp $
  26  *
  27  * Author: Leonid S Usov
  28  *
  29  * Observe mouse events in the raw terminal or parsed ncurses modes
  30  */
  31
  32 #include <test.priv.h>
  33
  34 #if defined(NCURSES_MOUSE_VERSION) && !defined(_NC_WINDOWS)
  35
  36 static int logoffset = 0;
  37
  38 static int
  39 raw_loop(void)
  40 {
  41     struct termios tty;
  42     struct termios old;
  43     char *xtermcap;
  44
  45     tcgetattr(0, &old);
  46 #if HAVE_CFMAKERAW
  47     cfmakeraw(&tty);
  48 #else
  49     tty = old;
  50     tty.c_iflag &= (unsigned) (~(IGNBRK | BRKINT | PARMRK | ISTRIP
  51                                  | INLCR | IGNCR | ICRNL | IXON));
  52     tty.c_oflag &= (unsigned) (~OPOST);
  53     tty.c_lflag &= (unsigned) (~(ECHO | ECHONL | ICANON | ISIG | IEXTEN));
  54     tty.c_cflag &= (unsigned) (~(CSIZE | PARENB));
  55     tty.c_cflag |= CS8;
  56     tcsetattr(0, TCSANOW, &tty);
  57 #endif
  58
  59     setupterm(NULL, 0, 0);
  60     xtermcap = tigetstr("XM");
  61     if (!VALID_STRING(xtermcap)) {
  62         fprintf(stderr, "couldn't get XM terminfo");
  63         return 1;
  64     }
  65
  66     putp(tparm(xtermcap, 1));
  67     fflush(stdout);
  68
  69     tcsetattr(0, TCSANOW, &tty);
  70
  71     while (1) {
  72         int c = getc(stdin);
  73         const char *pretty;
  74
  75         if (c == -1 || c == '\003') {
  76             break;
  77         } else if (c == '\033') {
  78             printf("\r\n\\E");
  79         } else if ((pretty = unctrl((chtype) c)) != NULL) {
  80             printf("%s", pretty);
  81         } else if (isprint(c)) {
  82             printf("%c", c);
  83         } else {
  84             printf("{%x}", UChar(c));
  85         }
  86     }
  87
  88     putp(tparm(xtermcap, 0));
  89     fflush(stdout);
  90     tcsetattr(0, TCSANOW, &old);
  91     return 0;
  92 }
  93
  94 static void logw(const char *fmt, ...) GCC_PRINTFLIKE(1, 2);
  95
  96 static void
  97 logw(const char *fmt, ...)
  98 {
  99     int row = getcury(stdscr);
 100     va_list args;
 101
 102     va_start(args, fmt);
 103     wmove(stdscr, row++, 0);
 104     vw_printw(stdscr, fmt, args);
 105     va_end(args);
 106
 107     clrtoeol();
 108
 109     row %= (getmaxy(stdscr) - logoffset);
 110     if (row < logoffset) {
 111         row = logoffset;
 112     }
 113
 114     wmove(stdscr, row, 0);
 115     wprintw(stdscr, ">");
 116     clrtoeol();
 117 }
 118
 119 static void
 120 usage(int ok)
 121 {
 122     static const char *msg[] =
 123     {
 124         "Usage: test_mouse [options]"
 125         ,""
 126         ,"Test mouse events.  These examples for $TERM demonstrate xterm"
 127         ,"features:"
 128         ,"    xterm"
 129         ,"    xterm-1002"
 130         ,"    xterm-1003"
 131         ,""
 132         ,USAGE_COMMON
 133         ,"Options:"
 134         ," -r       show raw input stream, injecting a new line before every ESC"
 135         ," -i n     set mouse interval to n; default is 0 (no double-clicks)"
 136         ," -T term  use terminal description other than $TERM"
 137     };
 138     unsigned n;
 139     for (n = 0; n < sizeof(msg) / sizeof(char *); ++n) {
 140         fprintf(stderr, "%s\n", msg[n]);
 141     }
 142     ExitProgram(ok ? EXIT_SUCCESS : EXIT_FAILURE);
 143 }
 144 /* *INDENT-OFF* */
 145 VERSION_COMMON()
 146 /* *INDENT-ON* */
 147
 148 int
 149 main(int argc, char *argv[])
 150 {
 151     bool rawmode = FALSE;
 152     int interval = 0;
 153     int ch;
 154     MEVENT event;
 155     char *my_environ = NULL;
 156     const char *term_format = "TERM=%s";
 157
 158     while ((ch = getopt(argc, argv, OPTS_COMMON "i:rT:")) != -1) {
 159         switch (ch) {
 160         case 'i':
 161             interval = atoi(optarg);
 162             break;
 163         case 'r':
 164             rawmode = TRUE;
 165             break;
 166         case 'T':
 167             my_environ = malloc(strlen(term_format) + strlen(optarg));
 168             if (my_environ != NULL) {
 169                 sprintf(my_environ, term_format, optarg);
 170                 putenv(my_environ);
 171             }
 172             break;
 173         case OPTS_VERSION:
 174             show_version(argv);
 175             ExitProgram(EXIT_SUCCESS);
 176         default:
 177             usage(ch == OPTS_USAGE);
 178             /* NOTREACHED */
 179         }
 180     }
 181     if (optind < argc) {
 182         usage(FALSE);
 183         ExitProgram(EXIT_FAILURE);
 184     }
 185
 186     if (rawmode) {
 187         printf("Entering raw mode. Ctrl-c to quit.\n");
 188         return raw_loop();
 189     }
 190
 191     initscr();
 192     noecho();
 193     cbreak();                   /* Line buffering disabled; pass everything */
 194     nonl();
 195     keypad(stdscr, TRUE);
 196
 197     /* Get all the mouse events */
 198     mousemask(ALL_MOUSE_EVENTS | REPORT_MOUSE_POSITION, NULL);
 199     mouseinterval(interval);
 200
 201     logw("Ctrl-c to quit");
 202     logw("--------------");
 203     if (my_environ)
 204         logw("%s", my_environ);
 205     logoffset = getcury(stdscr);
 206
 207     while (1) {
 208         int c = getch();
 209
 210         switch (c) {
 211         case KEY_MOUSE:
 212             if (getmouse(&event) == OK) {
 213                 unsigned btn;
 214                 mmask_t events;
 215 #if NCURSES_MOUSE_VERSION > 1
 216                 const unsigned max_btn = 5;
 217 #else
 218                 const unsigned max_btn = 4;
 219 #endif
 220                 const mmask_t btn_mask = (NCURSES_BUTTON_RELEASED |
 221                                           NCURSES_BUTTON_PRESSED |
 222                                           NCURSES_BUTTON_CLICKED |
 223                                           NCURSES_DOUBLE_CLICKED |
 224                                           NCURSES_TRIPLE_CLICKED);
 225                 bool found = FALSE;
 226                 for (btn = 1; btn <= max_btn; btn++) {
 227                     events = (mmask_t) (event.bstate
 228                                         & NCURSES_MOUSE_MASK(btn, btn_mask));
 229                     if (events == 0)
 230                         continue;
 231 #define ShowQ(btn,name) \
 232         (((event.bstate & NCURSES_MOUSE_MASK(btn, NCURSES_ ## name)) != 0) \
 233          ? (" " #name) \
 234          : "")
 235 #define ShowM(name) \
 236         (((event.bstate & NCURSES_MOUSE_MASK(btn, BUTTON_ ## name)) != 0) \
 237          ? (" " #name) \
 238          : "")
 239 #define ShowP() \
 240          ((event.bstate & REPORT_MOUSE_POSITION) != 0 \
 241           ? " position" \
 242           : "")
 243                     logw("[%08lX] button %d%s%s%s%s%s%s%s%s%s @ %d, %d",
 244                          (unsigned long) events,
 245                          btn,
 246                          ShowQ(btn, BUTTON_RELEASED),
 247                          ShowQ(btn, BUTTON_PRESSED),
 248                          ShowQ(btn, BUTTON_CLICKED),
 249                          ShowQ(btn, DOUBLE_CLICKED),
 250                          ShowQ(btn, TRIPLE_CLICKED),
 251                          ShowM(SHIFT),
 252                          ShowM(CTRL),
 253                          ShowM(ALT),
 254                          ShowP(),
 255                          event.y, event.x);
 256                     found = TRUE;
 257                 }
 258                 /*
 259                  * A position report need not have a button associated with it.
 260                  * The modifiers probably are unused.
 261                  */
 262                 if (!found && (event.bstate & REPORT_MOUSE_POSITION)) {
 263                     logw("[%08lX]%s%s%s%s @ %d, %d",
 264                          (unsigned long) events,
 265                          ShowM(SHIFT),
 266                          ShowM(CTRL),
 267                          ShowM(ALT),
 268                          ShowP(),
 269                          event.y, event.x);
 270                 }
 271             }
 272             break;
 273         case '\003':
 274             goto end;
 275         default:
 276             logw("got another char: 0x%x", UChar(c));
 277         }
 278         refresh();
 279     }
 280   end:
 281     endwin();
 282     ExitProgram(EXIT_SUCCESS);
 283 }
 284 #else
 285 int
 286 main(void)
 287 {
 288     printf("This program requires the ncurses library\n");
 289     ExitProgram(EXIT_FAILURE);
 290 }
 291 #endif