X-Git-Url: http://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=test%2Fdots_termcap.c;h=679c9928f99bd44ddddd0944b85167be2e0a37fe;hb=2632b47fdcf4dcd101962c92acafaac69630388f;hp=b81a53d741a25a465f743b683b35b995dd7c5ce3;hpb=eccca377f55c70b12e3e92621d94d1e1c1fcfb7d;p=ncurses.git diff --git a/test/dots_termcap.c b/test/dots_termcap.c index b81a53d7..679c9928 100644 --- a/test/dots_termcap.c +++ b/test/dots_termcap.c @@ -1,5 +1,6 @@ /**************************************************************************** - * Copyright (c) 2013-2018,2019 Free Software Foundation, Inc. * + * Copyright 2018-2022,2023 Thomas E. Dickey * + * Copyright 2013-2014,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 * @@ -29,14 +30,14 @@ /* * Author: Thomas E. Dickey * - * $Id: dots_termcap.c,v 1.18 2019/01/21 14:20:18 tom Exp $ + * $Id: dots_termcap.c,v 1.31 2023/01/07 17:21:48 tom Exp $ * * A simple demo of the termcap interface. */ #define USE_TINFO #include -#if !defined(_WIN32) +#if !defined(_NC_WINDOWS) #include #endif @@ -130,9 +131,10 @@ cleanup(void) outs(t_cl); outs(t_ve); - printf("\n\n%ld total cells, rate %.2f/sec\n", - total_chars, - ((double) (total_chars) / (double) (time((time_t *) 0) - started))); + 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 @@ -152,8 +154,8 @@ static void my_napms(int ms) { if (ms > 0) { -#if defined(_WIN32) || !HAVE_GETTIMEOFDAY - Sleep((DWORD) ms); +#if defined(_NC_WINDOWS) || !HAVE_GETTIMEOFDAY + Sleep((unsigned int) ms); #else struct timeval data; data.tv_sec = 0; @@ -178,16 +180,18 @@ get_number(NCURSES_CONST char *cap, const char *env) } static void -usage(void) +usage(int ok) { static const char *msg[] = { "Usage: dots_termcap [options]" ,"" + ,USAGE_COMMON ,"Options:" ," -T TERM override $TERM" ," -e allow environment $LINES / $COLUMNS" ," -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; @@ -195,18 +199,22 @@ usage(void) for (n = 0; n < SIZEOF(msg); n++) fprintf(stderr, "%s\n", msg[n]); - ExitProgram(EXIT_FAILURE); + ExitProgram(ok ? EXIT_SUCCESS : EXIT_FAILURE); } +/* *INDENT-OFF* */ +VERSION_COMMON() +/* *INDENT-ON* */ int main(int argc, char *argv[]) { - int x, y, z, p; + int ch; int num_colors; int num_lines; int num_columns; int e_option = 0; int m_option = 2; + int r_option = 0; int s_option = 1; double r; double c; @@ -216,13 +224,14 @@ main(int argc, char *argv[]) size_t need; char *my_env; - while ((x = getopt(argc, argv, "T:em:s:")) != -1) { - switch (x) { + while ((ch = getopt(argc, argv, OPTS_COMMON "T:em: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); + if ((my_env = malloc(need)) != NULL) { + _nc_SPRINTF(my_env, _nc_SLIMIT(need) "TERM=%s", optarg); + putenv(my_env); + } break; case 'e': e_option = 1; @@ -230,12 +239,18 @@ main(int argc, char *argv[]) case 'm': m_option = atoi(optarg); break; + case 'r': + r_option = atoi(optarg); + break; case 's': s_option = atoi(optarg); break; + case OPTS_VERSION: + show_version(argv); + ExitProgram(EXIT_SUCCESS); default: - usage(); - break; + usage(ch == OPTS_USAGE); + /* NOTREACHED */ } } @@ -246,8 +261,9 @@ main(int argc, char *argv[]) srand((unsigned) time(0)); - InitAndCatch(z = tgetent(buffer, name), onsig); - if (z < 0) { + SetupAlarm((unsigned) r_option); + InitAndCatch(ch = tgetent(buffer, name), onsig); + if (ch < 0) { fprintf(stderr, "terminal description not found\n"); ExitProgram(EXIT_FAILURE); } else { @@ -278,18 +294,19 @@ main(int argc, char *argv[]) started = time((time_t *) 0); while (!interrupted) { - x = (int) (c * ranf()) + m_option; - y = (int) (r * ranf()) + m_option; - p = (ranf() > 0.9) ? '*' : ' '; + int x = (int) (c * ranf()) + m_option; + int y = (int) (r * ranf()) + m_option; + int p = (ranf() > 0.9) ? '*' : ' '; tputs(tgoto(t_cm, x, y), 1, outc); if (num_colors > 0) { - z = (int) (ranf() * num_colors); + int z = (int) (ranf() * num_colors); if (ranf() > 0.01) { tputs(tgoto(t_AF, 0, z), 1, outc); } else { tputs(tgoto(t_AB, 0, z), 1, outc); - my_napms(s_option); + if (s_option) + my_napms(s_option); } } else if (VALID_STRING(t_me) && VALID_STRING(t_mr)) { @@ -297,7 +314,8 @@ main(int argc, char *argv[]) outs((ranf() > 0.6) ? t_mr : t_me); - my_napms(s_option); + if (s_option) + my_napms(s_option); } } outc(p); @@ -309,8 +327,7 @@ main(int argc, char *argv[]) } #else int -main(int argc GCC_UNUSED, - char *argv[]GCC_UNUSED) +main(void) { fprintf(stderr, "This program requires termcap\n"); exit(EXIT_FAILURE);