#include <test.priv.h>
#include <time.h>
#define valid(s) ((s != 0) && s != (char *)-1)
static bool interrupted = FALSE;
static long total_chars = 0;
static time_t started;
static void
cleanup(void)
{
endwin();
printf("\n\n%ld total chars, rate %.2f/sec\n",
total_chars,
((double) (total_chars) / (time((time_t *) 0) - started)));
}
static void
onsig(int n GCC_UNUSED)
{
interrupted = TRUE;
}
static float
ranf(void)
{
long r = (rand() & 077777);
return ((float) r / 32768.);
}
static void
set_color(char *my_pairs, int fg, int bg)
{
int pair = (fg * COLORS) + bg;
if (!my_pairs[pair]) {
init_pair(pair, fg, bg);
}
attron(COLOR_PAIR(pair));
}
int
main(
int argc GCC_UNUSED,
char *argv[]GCC_UNUSED)
{
int ch, x, y, z, p;
float r;
float c;
bool use_colors;
bool opt_r = FALSE;
char *my_pairs = 0;
int last_fg = 0;
int last_bg = 0;
while ((ch = getopt(argc, argv, "r")) != -1) {
switch (ch) {
case 'r':
opt_r = TRUE;
break;
default:
fprintf(stderr, "usage: echochar [-r]\n");
ExitProgram(EXIT_FAILURE);
}
}
CATCHALL(onsig);
initscr();
use_colors = has_colors();
if (use_colors) {
start_color();
if (COLOR_PAIRS > 0) {
my_pairs = typeCalloc(char, COLOR_PAIRS);
}
use_colors = (my_pairs != 0);
}
srand((unsigned) time(0));
curs_set(0);
r = (float) (LINES - 4);
c = (float) (COLS - 4);
started = time((time_t *) 0);
while (!interrupted) {
x = (int) (c * ranf()) + 2;
y = (int) (r * ranf()) + 2;
p = (ranf() > 0.9) ? '*' : ' ';
move(y, x);
if (use_colors > 0) {
z = (int) (ranf() * COLORS);
if (ranf() > 0.01) {
set_color(my_pairs, z, last_bg);
last_fg = z;
} else {
set_color(my_pairs, last_fg, z);
last_bg = z;
napms(1);
}
} else {
if (ranf() <= 0.01) {
if (ranf() > 0.6)
attron(A_REVERSE);
else
attroff(A_REVERSE);
napms(1);
}
}
if (opt_r) {
addch(UChar(p));
refresh();
} else {
echochar(UChar(p));
}
++total_chars;
}
cleanup();
ExitProgram(EXIT_SUCCESS);
}