vasilito
ff4ff35918
Red Bear OS is a full fork. All sources must be available from git clone with zero network access. Removed gitignore rules that excluded fetched source trees under recipes/*/source/, local/recipes/kde/*/source/, local/recipes/qt/*/source/, and vendor source trees. Build artifacts (target/, build/, source.tar, *.o, *.so) remain excluded. 127291 files added — kernel, relibc, base, bootloader, pkgar, all KDE/Qt frameworks, mesa, wayland, DRM drivers, and every other recipe source.
102 lines
3.6 KiB
C
102 lines
3.6 KiB
C
/****************************************************************************
|
|
* Copyright 2019-2024,2025 Thomas E. Dickey *
|
|
* Copyright 1998-2002,2006 Free Software Foundation, Inc. *
|
|
* *
|
|
* Permission is hereby granted, free of charge, to any person obtaining a *
|
|
* copy of this software and associated documentation files (the *
|
|
* "Software"), to deal in the Software without restriction, including *
|
|
* without limitation the rights to use, copy, modify, merge, publish, *
|
|
* distribute, distribute with modifications, sublicense, and/or sell *
|
|
* copies of the Software, and to permit persons to whom the Software is *
|
|
* furnished to do so, subject to the following conditions: *
|
|
* *
|
|
* The above copyright notice and this permission notice shall be included *
|
|
* in all copies or substantial portions of the Software. *
|
|
* *
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
|
|
* IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
|
|
* DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
|
|
* OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
|
|
* THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
|
|
* *
|
|
* Except as contained in this notice, the name(s) of the above copyright *
|
|
* holders shall not be used in advertising or otherwise to promote the *
|
|
* sale, use or other dealings in this Software without prior written *
|
|
* authorization. *
|
|
****************************************************************************/
|
|
/* gleaned from a web-search, shows a bug combining scanw and implicit scroll.
|
|
* Date: 1997/03/17
|
|
* From: bayern@morpheus.cis.yale.edu
|
|
*
|
|
* $Id: testscanw.c,v 1.17 2025/07/05 15:22:23 tom Exp $
|
|
*/
|
|
#include <test.priv.h>
|
|
|
|
static void
|
|
usage(int ok)
|
|
{
|
|
static const char *msg[] =
|
|
{
|
|
"Usage: testscanw [options] tokens"
|
|
,""
|
|
,"Tokens are integers (starting line-number) or k+, k- to turn keypad on/off."
|
|
,""
|
|
,USAGE_COMMON
|
|
};
|
|
size_t n;
|
|
|
|
for (n = 0; n < SIZEOF(msg); n++)
|
|
fprintf(stderr, "%s\n", msg[n]);
|
|
|
|
ExitProgram(ok ? EXIT_SUCCESS : EXIT_FAILURE);
|
|
}
|
|
/* *INDENT-OFF* */
|
|
VERSION_COMMON()
|
|
/* *INDENT-ON* */
|
|
|
|
int
|
|
main(int argc, char *argv[])
|
|
{
|
|
long badanswer = 1;
|
|
long *response = &badanswer;
|
|
int ch;
|
|
|
|
while ((ch = getopt(argc, argv, OPTS_COMMON)) != -1) {
|
|
switch (ch) {
|
|
default:
|
|
CASE_COMMON;
|
|
/* NOTREACHED */
|
|
}
|
|
}
|
|
|
|
setlocale(LC_ALL, "");
|
|
|
|
initscr();
|
|
scrollok(stdscr, TRUE);
|
|
idlok(stdscr, TRUE);
|
|
echo();
|
|
|
|
#if 0
|
|
curses_trace(TRACE_UPDATE | TRACE_CALLS);
|
|
#endif
|
|
while (optind < argc) {
|
|
const char *token = argv[optind++];
|
|
if (isdigit(UChar(*token)))
|
|
move(atoi(token), 0);
|
|
else if (!strcmp(token, "k+"))
|
|
keypad(stdscr, TRUE);
|
|
else if (!strcmp(token, "k-"))
|
|
keypad(stdscr, FALSE);
|
|
}
|
|
|
|
while (badanswer) {
|
|
printw("Enter a number (0 to quit):\n");
|
|
printw("--> ");
|
|
scanw("%20ld", response); /* yes, it's a pointer */
|
|
}
|
|
endwin();
|
|
ExitProgram(EXIT_SUCCESS);
|
|
}
|