X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=test%2Fdots_termcap.c;h=52749c754d63122d8e23731582ef4fff744b437e;hp=0e442b134688ff9db06185d409a112176968d13c;hb=9b4c4abadc0a29999c5ddad5aa8d769fee28d687;hpb=47d2fb4537d9ad5bb14f4810561a327930ca4280 diff --git a/test/dots_termcap.c b/test/dots_termcap.c index 0e442b13..52749c75 100644 --- a/test/dots_termcap.c +++ b/test/dots_termcap.c @@ -30,7 +30,7 @@ /* * Author: Thomas E. Dickey * - * $Id: dots_termcap.c,v 1.20 2020/02/02 23:34:34 tom Exp $ + * $Id: dots_termcap.c,v 1.24 2020/05/29 23:04:02 tom Exp $ * * A simple demo of the termcap interface. */ @@ -131,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 @@ -189,6 +190,7 @@ usage(void) ," -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; @@ -208,6 +210,7 @@ main(int argc, char *argv[]) int num_columns; int e_option = 0; int m_option = 2; + int r_option = 0; int s_option = 1; double r; double c; @@ -217,7 +220,7 @@ main(int argc, char *argv[]) size_t need; char *my_env; - while ((ch = getopt(argc, argv, "T:em:s:")) != -1) { + while ((ch = getopt(argc, argv, "T:em:r:s:")) != -1) { switch (ch) { case 'T': need = 6 + strlen(optarg); @@ -231,6 +234,9 @@ 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; @@ -247,6 +253,7 @@ main(int argc, char *argv[]) srand((unsigned) time(0)); + SetupAlarm((unsigned) r_option); InitAndCatch(ch = tgetent(buffer, name), onsig); if (ch < 0) { fprintf(stderr, "terminal description not found\n"); @@ -290,7 +297,8 @@ main(int argc, char *argv[]) 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)) { @@ -298,7 +306,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);