| /**************************************************************************** |
| * 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.22 2020/02/02 23:34:34 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); |
| |
| printf("\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)" |
| ," -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 s_option = 1; |
| size_t need; |
| char *my_env; |
| |
| while ((ch = getopt(argc, argv, "T:efm: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 's': |
| s_option = atoi(optarg); |
| break; |
| default: |
| usage(); |
| break; |
| } |
| } |
| |
| 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); |
| 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); |
| 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 |