test/testscanw.c

   1 /****************************************************************************
   2  * Copyright 2019-2020,2022 Thomas E. Dickey                                *
   3  * Copyright 1998-2002,2006 Free Software Foundation, Inc.                  *
   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  * Except as contained in this notice, the name(s) of the above copyright   *
  25  * holders shall not be used in advertising or otherwise to promote the     *
  26  * sale, use or other dealings in this Software without prior written       *
  27  * authorization.                                                           *
  28  ****************************************************************************/
  29 /* gleaned from a web-search, shows a bug combining scanw and implicit scroll.
  30  * Date:  1997/03/17
  31  * From:  bayern@morpheus.cis.yale.edu
  32  *
  33  * $Id: testscanw.c,v 1.15 2022/12/11 00:10:29 tom Exp $
  34  */
  35 #include <test.priv.h>
  36
  37 static void
  38 usage(int ok)
  39 {
  40     static const char *msg[] =
  41     {
  42         "Usage: testscanw [options] tokens"
  43         ,""
  44         ,"Tokens are integers (starting line-number) or k+, k- to turn keypad on/off."
  45         ,""
  46         ,USAGE_COMMON
  47     };
  48     size_t n;
  49
  50     for (n = 0; n < SIZEOF(msg); n++)
  51         fprintf(stderr, "%s\n", msg[n]);
  52
  53     ExitProgram(ok ? EXIT_SUCCESS : EXIT_FAILURE);
  54 }
  55 /* *INDENT-OFF* */
  56 VERSION_COMMON()
  57 /* *INDENT-ON* */
  58
  59 int
  60 main(int argc, char *argv[])
  61 {
  62     long badanswer = 1;
  63     long *response = &badanswer;
  64     int ch;
  65
  66     while ((ch = getopt(argc, argv, OPTS_COMMON)) != -1) {
  67         switch (ch) {
  68         case OPTS_VERSION:
  69             show_version(argv);
  70             ExitProgram(EXIT_SUCCESS);
  71         default:
  72             usage(ch == OPTS_USAGE);
  73             /* NOTREACHED */
  74         }
  75     }
  76
  77     setlocale(LC_ALL, "");
  78
  79     initscr();
  80     scrollok(stdscr, TRUE);
  81     idlok(stdscr, TRUE);
  82     echo();
  83
  84 #if 0
  85     curses_trace(TRACE_UPDATE | TRACE_CALLS);
  86 #endif
  87     while (optind < argc) {
  88         char *token = argv[optind++];
  89         if (isdigit(UChar(*token)))
  90             move(atoi(token), 0);
  91         else if (!strcmp(token, "k+"))
  92             keypad(stdscr, TRUE);
  93         else if (!strcmp(token, "k-"))
  94             keypad(stdscr, FALSE);
  95     }
  96
  97     while (badanswer) {
  98         printw("Enter a number (0 to quit):\n");
  99         printw("--> ");
 100         scanw("%20ld", response);       /* yes, it's a pointer */
 101     }
 102     endwin();
 103     ExitProgram(EXIT_SUCCESS);
 104 }