Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 1 | /**************************************************************************** |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 2 | * Copyright 2019-2020,2022 Thomas E. Dickey * |
| 3 | * Copyright 1998-2002,2006 Free Software Foundation, Inc. * |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 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 | * |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 33 | * $Id: testscanw.c,v 1.15 2022/12/11 00:10:29 tom Exp $ |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 34 | */ |
| 35 | #include <test.priv.h> |
| 36 | |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 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 | |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 59 | int |
| 60 | main(int argc, char *argv[]) |
| 61 | { |
| 62 | long badanswer = 1; |
| 63 | long *response = &badanswer; |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 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 | } |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 76 | |
| 77 | setlocale(LC_ALL, ""); |
| 78 | |
| 79 | initscr(); |
| 80 | scrollok(stdscr, TRUE); |
| 81 | idlok(stdscr, TRUE); |
| 82 | echo(); |
| 83 | |
| 84 | #if 0 |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 85 | curses_trace(TRACE_UPDATE | TRACE_CALLS); |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 86 | #endif |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 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+")) |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 92 | keypad(stdscr, TRUE); |
micky387 | 9b9f5e7 | 2025-07-08 18:04:53 -0400 | [diff] [blame] | 93 | else if (!strcmp(token, "k-")) |
| 94 | keypad(stdscr, FALSE); |
Steve Kondik | ae271bc | 2015-11-15 02:50:53 +0100 | [diff] [blame] | 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 | } |