123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263 |
- /****************************************************************************
- * Copyright 2019,2020 Thomas E. Dickey *
- * Copyright 2007-2013,2017 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. *
- ****************************************************************************/
- /*
- * Author: Thomas E. Dickey - 2007
- *
- * $Id: dots_mvcur.c,v 1.26 2020/05/29 23:04:02 tom Exp $
- *
- * A simple demo of the terminfo interface, and mvcur.
- */
- #define USE_TINFO
- #include <test.priv.h>
- #if HAVE_SETUPTERM
- #include <time.h>
- static bool interrupted = FALSE;
- static long total_chars = 0;
- static time_t started;
- static
- TPUTS_PROTO(outc, c)
- {
- int rc = c;
- if (interrupted) {
- char tmp = (char) c;
- if (write(STDOUT_FILENO, &tmp, (size_t) 1) == -1)
- rc = EOF;
- } else {
- if (putc(c, stdout) == EOF)
- rc = EOF;
- }
- TPUTS_RETURN(rc);
- }
- static bool
- outs(const char *s)
- {
- if (VALID_STRING(s)) {
- tputs(s, 1, outc);
- return TRUE;
- }
- return FALSE;
- }
- static void
- cleanup(void)
- {
- outs(exit_attribute_mode);
- if (!outs(orig_colors))
- outs(orig_pair);
- outs(clear_screen);
- outs(cursor_normal);
- fflush(stdout);
- fprintf(stderr, "\n\n%ld total cells, rate %.2f/sec\n",
- total_chars,
- ((double) (total_chars) / (double) (time((time_t *) 0) - started)));
- }
- static void
- onsig(int n GCC_UNUSED)
- {
- interrupted = TRUE;
- }
- static double
- ranf(void)
- {
- long r = (rand() & 077777);
- return ((double) r / 32768.);
- }
- static int
- get_number(NCURSES_CONST char *cap, int map)
- {
- int result = map;
- if (cap != 0) {
- int check = tigetnum(cap);
- if (check > 0)
- result = check;
- }
- return result;
- }
- static void
- usage(void)
- {
- static const char *msg[] =
- {
- "Usage: dots_termcap [options]"
- ,""
- ,"Options:"
- ," -T TERM override $TERM"
- #if HAVE_USE_ENV
- ," -e allow environment $LINES / $COLUMNS"
- #endif
- ," -f use tigetnum rather than <term.h> mapping"
- ," -m SIZE set margin (default: 2)"
- ," -r SECS self-interrupt/exit after specified number of seconds"
- ," -s MSECS delay 1% of the time (default: 1 msecs)"
- };
- size_t n;
- for (n = 0; n < SIZEOF(msg); n++)
- fprintf(stderr, "%s\n", msg[n]);
- ExitProgram(EXIT_FAILURE);
- }
- int
- main(int argc GCC_UNUSED,
- char *argv[]GCC_UNUSED)
- {
- int x0 = 1, y0 = 1;
- int ch;
- double r;
- double c;
- SCREEN *sp;
- int my_colors;
- int f_option = 0;
- int m_option = 2;
- int r_option = 0;
- int s_option = 1;
- size_t need;
- char *my_env;
- while ((ch = getopt(argc, argv, "T:efm:r:s:")) != -1) {
- switch (ch) {
- case 'T':
- need = 6 + strlen(optarg);
- my_env = malloc(need);
- _nc_SPRINTF(my_env, _nc_SLIMIT(need) "TERM=%s", optarg);
- putenv(my_env);
- break;
- #if HAVE_USE_ENV
- case 'e':
- use_env(TRUE);
- break;
- #endif
- case 'f':
- f_option = 1;
- break;
- case 'm':
- m_option = atoi(optarg);
- break;
- case 'r':
- r_option = atoi(optarg);
- break;
- case 's':
- s_option = atoi(optarg);
- break;
- default:
- usage();
- break;
- }
- }
- SetupAlarm(r_option);
- InitAndCatch((sp = newterm((char *) 0, stdout, stdin)), onsig);
- refresh(); /* needed with Solaris curses to cancel endwin */
- if (sp == 0) {
- fprintf(stderr, "Cannot initialize terminal\n");
- ExitProgram(EXIT_FAILURE);
- }
- srand((unsigned) time(0));
- outs(clear_screen);
- outs(cursor_home);
- outs(cursor_invisible);
- #define GetNumber(ln,sn) get_number(f_option ? #sn : 0, ln)
- my_colors = GetNumber(max_colors, colors);
- if (my_colors > 1) {
- if (!VALID_STRING(set_a_foreground)
- || !VALID_STRING(set_a_background)
- || (!VALID_STRING(orig_colors) && !VALID_STRING(orig_pair)))
- my_colors = -1;
- }
- r = (double) (GetNumber(lines, lines) - (m_option * 2));
- c = (double) (GetNumber(columns, cols) - (m_option * 2));
- started = time((time_t *) 0);
- while (!interrupted) {
- int x = (int) (c * ranf()) + m_option;
- int y = (int) (r * ranf()) + m_option;
- int p = (ranf() > 0.9) ? '*' : ' ';
- if (mvcur(y0, x0, y, x) != ERR) {
- x0 = x;
- y0 = y;
- }
- if (my_colors > 0) {
- int z = (int) (ranf() * my_colors);
- if (ranf() > 0.01) {
- tputs(tparm2(set_a_foreground, z), 1, outc);
- } else {
- tputs(tparm2(set_a_background, z), 1, outc);
- if (s_option)
- napms(s_option);
- }
- } else if (VALID_STRING(exit_attribute_mode)
- && VALID_STRING(enter_reverse_mode)) {
- if (ranf() <= 0.01) {
- outs((ranf() > 0.6)
- ? enter_reverse_mode
- : exit_attribute_mode);
- if (s_option)
- napms(s_option);
- }
- }
- outc(p);
- ++x0;
- fflush(stdout);
- ++total_chars;
- }
- cleanup();
- endwin();
- delscreen(sp);
- ExitProgram(EXIT_SUCCESS);
- }
- #else
- int
- main(int argc GCC_UNUSED,
- char *argv[]GCC_UNUSED)
- {
- fprintf(stderr, "This program requires terminfo\n");
- exit(EXIT_FAILURE);
- }
- #endif
|