/****************************************************************************
- * Copyright (c) 1998-2006,2007 Free Software Foundation, Inc. *
+ * Copyright (c) 1998-2007,2008 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 *
traces will be dumped. The program stops and waits for one character of
input at the beginning and end of the interval.
- $Id: worm.c,v 1.50 2007/12/22 23:55:13 tom Exp $
+ $Id: worm.c,v 1.58 2008/10/04 21:54:09 tom Exp $
*/
#include <test.priv.h>
#include <pthread.h>
#endif
+WANT_USE_WINDOW();
+
+#define MAX_WORMS 40
+#define MAX_LENGTH 1024
+
static chtype flavor[] =
{
'O', '*', '#', '$', '%', '0', '@',
#endif
} WORM;
+static unsigned long sequence = 0;
static bool quitting = FALSE;
-static WORM worm[40];
+static WORM worm[MAX_WORMS];
static short **refs;
+static int last_x, last_y;
static const char *field;
static int length = 16, number = 3;
static chtype trail = ' ';
+static unsigned pending;
#ifdef TRACE
static int generation, trace_start, trace_end;
#endif /* TRACE */
static void
cleanup(void)
{
- standend();
- refresh();
+ USING_WINDOW(stdscr, wrefresh);
curs_set(1);
endwin();
}
{
WORM *w = (WORM *) data;
const struct options *op;
+ unsigned mask = ~(1 << (w - worm));
+ chtype attrs = w->attrs | ((mask & pending) ? A_REVERSE : 0);
int x;
int y;
int h;
- int bottom = LINES - 1;
- int last = COLS - 1;
-
bool done = FALSE;
if ((x = w->xpos[h = w->head]) < 0) {
- wmove(win, y = w->ypos[h] = bottom, x = w->xpos[h] = 0);
- waddch(win, w->attrs);
+ wmove(win, y = w->ypos[h] = last_y, x = w->xpos[h] = 0);
+ waddch(win, attrs);
refs[y][x]++;
} else {
y = w->ypos[h];
}
- if (x > last)
- x = last;
- if (y > bottom)
- y = bottom;
+ if (x > last_x)
+ x = last_x;
+ if (y > last_y)
+ y = last_y;
if (++h == length)
h = 0;
op = &(x == 0
? (y == 0
? upleft
- : (y == bottom
+ : (y == last_y
? lowleft
: left))
- : (x == last
+ : (x == last_x
? (y == 0
? upright
- : (y == bottom
+ : (y == last_y
? lowright
: right))
: (y == 0
? upper
- : (y == bottom
+ : (y == last_y
? lower
: normal))))[w->orientation];
if (y < 0)
y = 0;
- waddch(win, w->attrs);
+ waddch(win, attrs);
w->ypos[h] = y;
w->xpos[h] = x;
return done;
}
-#if !defined(NCURSES_VERSION_PATCH) || (NCURSES_VERSION_PATCH < 20070915)
-static int
-use_window(WINDOW *win, int (*func) (WINDOW *, void *), void *data)
-{
- return func(win, data);
-}
-#endif
-
#ifdef USE_PTHREADS
static bool
-quit_worm(void)
+quit_worm(int bitnum)
{
- napms(20); /* let the other thread(s) have a chance */
+ pending |= (1 << bitnum);
+ napms(10); /* let the other thread(s) have a chance */
+ pending &= ~(1 << bitnum);
return quitting;
}
static void *
start_worm(void *arg)
{
- while (!quit_worm()) {
- use_window(stdscr, draw_worm, arg);
+ unsigned long compare = 0;
+ Trace(("start_worm"));
+ while (!quit_worm(((struct worm *) arg) - worm)) {
+ while (compare < sequence) {
+ ++compare;
+ use_window(stdscr, draw_worm, arg);
+ }
}
+ Trace(("...start_worm (done)"));
return NULL;
}
#endif
}
#else
for (n = 0, w = &worm[0]; n < number; n++, w++) {
- if (use_window(stdscr, draw_worm, w))
+ if (USING_WINDOW2(stdscr, draw_worm, w))
done = TRUE;
}
#endif
return done;
}
+static int
+get_input(void)
+{
+ int ch;
+ ch = USING_WINDOW(stdscr, wgetch);
+ return ch;
+}
+
+#ifdef KEY_RESIZE
+static int
+update_refs(WINDOW *win)
+{
+ int x, y;
+
+ (void) win;
+ if (last_x != COLS - 1) {
+ for (y = 0; y <= last_y; y++) {
+ refs[y] = typeRealloc(short, COLS, refs[y]);
+ for (x = last_x + 1; x < COLS; x++)
+ refs[y][x] = 0;
+ }
+ last_x = COLS - 1;
+ }
+ if (last_y != LINES - 1) {
+ for (y = LINES; y <= last_y; y++)
+ free(refs[y]);
+ refs = typeRealloc(short *, LINES, refs);
+ for (y = last_y + 1; y < LINES; y++) {
+ refs[y] = typeMalloc(short, COLS);
+ for (x = 0; x < COLS; x++)
+ refs[y][x] = 0;
+ }
+ last_y = LINES - 1;
+ }
+ return OK;
+}
+#endif
+
int
main(int argc, char *argv[])
{
int n;
struct worm *w;
short *ip;
- int last, bottom;
bool done = FALSE;
setlocale(LC_ALL, "");
case 'l':
if (++x == argc)
goto usage;
- if ((length = atoi(argv[x])) < 2 || length > 1024) {
+ if ((length = atoi(argv[x])) < 2 || length > MAX_LENGTH) {
fprintf(stderr, "%s: Invalid length\n", *argv);
ExitProgram(EXIT_FAILURE);
}
case 'n':
if (++x == argc)
goto usage;
- if ((number = atoi(argv[x])) < 1 || number > 40) {
+ if ((number = atoi(argv[x])) < 1 || number > MAX_WORMS) {
fprintf(stderr, "%s: Invalid number of worms\n", *argv);
ExitProgram(EXIT_FAILURE);
}
curs_set(0);
- bottom = LINES - 1;
- last = COLS - 1;
+ last_y = LINES - 1;
+ last_x = COLS - 1;
#ifdef A_COLOR
if (has_colors()) {
#ifdef BADCORNER
/* if addressing the lower right corner doesn't work in your curses */
- refs[bottom][last] = 1;
+ refs[last_y][last_x] = 1;
#endif /* BADCORNER */
for (n = number, w = &worm[0]; --n >= 0; w++) {
if (field) {
const char *p;
p = field;
- for (y = bottom; --y >= 0;) {
+ for (y = last_y; --y >= 0;) {
for (x = COLS; --x >= 0;) {
addch((chtype) (*p++));
if (!*p)
}
}
}
- napms(10);
- refresh();
+ USING_WINDOW(stdscr, wrefresh);
nodelay(stdscr, TRUE);
while (!done) {
int ch;
- if ((ch = getch()) > 0) {
+ ++sequence;
+ if ((ch = get_input()) > 0) {
#ifdef TRACE
if (trace_start || trace_end) {
if (generation == trace_start) {
trace(TRACE_CALLS);
- getch();
+ get_input();
} else if (generation == trace_end) {
trace(0);
- getch();
+ get_input();
}
generation++;
}
#endif
+
#ifdef KEY_RESIZE
if (ch == KEY_RESIZE) {
- if (last != COLS - 1) {
- for (y = 0; y <= bottom; y++) {
- refs[y] = typeRealloc(short, COLS, refs[y]);
- for (x = last + 1; x < COLS; x++)
- refs[y][x] = 0;
- }
- last = COLS - 1;
- }
- if (bottom != LINES - 1) {
- for (y = LINES; y <= bottom; y++)
- free(refs[y]);
- refs = typeRealloc(short *, LINES, refs);
- for (y = bottom + 1; y < LINES; y++) {
- refs[y] = typeMalloc(short, COLS);
- for (x = 0; x < COLS; x++)
- refs[y][x] = 0;
- }
- bottom = LINES - 1;
- }
+ USING_WINDOW(stdscr, update_refs);
}
#endif
+
/*
* Make it simple to put this into single-step mode, or resume
* normal operation -T.Dickey
done = draw_all_worms();
napms(10);
- refresh();
+ USING_WINDOW(stdscr, wrefresh);
}
+ Trace(("Cleanup"));
cleanup();
#ifdef NO_LEAKS
for (y = 0; y < LINES; y++) {
/*
* Do this just in case one of the threads did not really exit.
*/
+ Trace(("join all threads"));
for (n = 0; n < number; n++) {
pthread_join(worm[n].thread, NULL);
}
projects / ncurses.git / blobdiff