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
usage(int ok)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* */
VERSION_COMMON()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 }
105