/****************************************************************************
- * Copyright (c) 1999-2013,2017 Free Software Foundation, Inc. *
+ * Copyright 2019,2020 Thomas E. Dickey *
+ * Copyright 1999-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 *
/*
* Author: Thomas E. Dickey <dickey@clark.net> 1999
*
- * $Id: dots.c,v 1.32 2017/10/22 15:20:57 tom Exp $
+ * $Id: dots.c,v 1.36 2020/02/02 23:34:34 tom Exp $
*
* A simple demo of the terminfo interface.
*/
,""
,"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)"
main(int argc,
char *argv[])
{
- int x, y, z, p;
+ int ch;
double r;
double c;
int my_colors;
int f_option = 0;
int m_option = 2;
int s_option = 1;
+ size_t need;
+ char *my_env;
- while ((x = getopt(argc, argv, "T:efm:s:")) != -1) {
- switch (x) {
+ while ((ch = getopt(argc, argv, "T:efm:s:")) != -1) {
+ switch (ch) {
case 'T':
- putenv(strcat(strcpy(malloc(6 + strlen(optarg)), "TERM="), optarg));
+ 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;
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(tparm3(cursor_address, y, x), 1, outc);
if (my_colors > 0) {
- z = (int) (ranf() * my_colors);
+ int z = (int) (ranf() * my_colors);
if (ranf() > 0.01) {
tputs(tparm2(set_a_foreground, z), 1, outc);
} else {