+/* $NetBSD: worm.c,v 1.31 2015/08/17 17:17:01 dholland Exp $ */
+
/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1980, 1993
+ * The Regents of the University of California. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
+ * 3. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
-char copyright[] =
-"@(#) Copyright (c) 1980 Regents of the University of California.\n\
- All rights reserved.\n";
+__COPYRIGHT("@(#) Copyright (c) 1980, 1993\
+ The Regents of the University of California. All rights reserved.");
#endif /* not lint */
#ifndef lint
-static char sccsid[] = "@(#)worm.c 5.8 (Berkeley) 2/28/91";
+#if 0
+static char sccsid[] = "@(#)worm.c 8.1 (Berkeley) 5/31/93";
+#else
+__RCSID("$NetBSD: worm.c,v 1.31 2015/08/17 17:17:01 dholland Exp $");
+#endif
#endif /* not lint */
/*
#include <ctype.h>
#include <curses.h>
+#include <err.h>
#include <signal.h>
+#include <stdlib.h>
+#include <termios.h>
+#include <unistd.h>
-#define newlink() (struct body *) malloc(sizeof (struct body));
#define HEAD '@'
#define BODY 'o'
#define LENGTH 7
#define RUNLEN 8
-#define when break;case
-#define otherwise break;default
#define CNTRL(p) (p-'A'+1)
-#ifndef baudrate
-# define baudrate() _tty.sg_ospeed
-#endif
-WINDOW *tv;
-WINDOW *stw;
struct body {
int x;
int y;
struct body *prev;
struct body *next;
-} *head, *tail, goody;
-int growing = 0;
-int running = 0;
-int slow = 0;
-int score = 0;
-int start_len = LENGTH;
-char lastch;
-char outbuf[BUFSIZ];
-
-void leave(), wake(), suspend();
-
-main(argc, argv)
- int argc;
- char **argv;
+};
+
+static WINDOW *tv;
+static WINDOW *stw;
+static struct body *head, *tail, goody;
+static int growing = 0;
+static int running = 0;
+static int slow = 0;
+static int score = 0;
+static int start_len = LENGTH;
+static int visible_len;
+static int lastch;
+static char outbuf[BUFSIZ];
+
+int main(int, char **);
+static void crash(void) __dead;
+static void display(const struct body *, char);
+static void leave(int) __dead;
+static void life(void);
+static void newpos(struct body *);
+static void process(int);
+static void prize(void);
+static int rnd(int);
+static void setup(void);
+static void wake(int);
+
+static struct body *
+newlink(void)
{
- char ch;
+ struct body *b;
+
+ b = malloc(sizeof(*b));
+ if (b == NULL) {
+ err(EXIT_FAILURE, NULL);
+ }
+ return b;
+}
+
+int
+main(int argc, char **argv)
+{
+
+ /* Revoke setgid privileges */
+ setgid(getgid());
- if (argc == 2)
- start_len = atoi(argv[1]);
- if ((start_len <= 0) || (start_len > 500))
- start_len = LENGTH;
setbuf(stdout, outbuf);
srand(getpid());
signal(SIGALRM, wake);
signal(SIGINT, leave);
signal(SIGQUIT, leave);
- signal(SIGTSTP, suspend); /* process control signal */
- initscr();
- crmode();
+ if (!initscr())
+ errx(0, "couldn't initialize screen");
+ cbreak();
noecho();
- slow = (baudrate() <= B1200);
+#ifdef KEY_LEFT
+ keypad(stdscr, TRUE);
+#endif
+ slow = (baudrate() <= 1200);
clear();
+ if (COLS < 18 || LINES < 5) {
+ /*
+ * Insufficient room for the line with " Worm" and the
+ * score if fewer than 18 columns; insufficient room for
+ * anything much if fewer than 5 lines.
+ */
+ endwin();
+ errx(1, "screen too small");
+ }
+ if (argc == 2)
+ start_len = atoi(argv[1]);
+ if ((start_len <= 0) || (start_len > ((LINES-3) * (COLS-2)) / 3))
+ start_len = LENGTH;
stw = newwin(1, COLS-1, 0, 0);
tv = newwin(LINES-1, COLS-1, 1, 0);
box(tv, '*', '*');
else
{
fflush(stdout);
- if (read(0, &ch, 1) >= 0)
- process(ch);
+ process(getch());
}
}
}
-life()
+static void
+life(void)
{
- register struct body *bp, *np;
- register int i;
+ struct body *bp, *np;
+ int i, j = 1;
+ np = NULL;
head = newlink();
- head->x = start_len+2;
- head->y = 12;
+ head->x = start_len % (COLS-5) + 2;
+ head->y = LINES / 2;
head->next = NULL;
display(head, HEAD);
for (i = 0, bp = head; i < start_len; i++, bp = np) {
np = newlink();
np->next = bp;
bp->prev = np;
- np->x = bp->x - 1;
- np->y = bp->y;
+ if (((bp->x <= 2) && (j == 1)) || ((bp->x >= COLS-4) && (j == -1))) {
+ j *= -1;
+ np->x = bp->x;
+ np->y = bp->y + 1;
+ } else {
+ np->x = bp->x - j;
+ np->y = bp->y;
+ }
display(np, BODY);
}
tail = np;
tail->prev = NULL;
+ visible_len = start_len + 1;
}
-display(pos, chr)
-struct body *pos;
-char chr;
+static void
+display(const struct body *pos, char chr)
{
wmove(tv, pos->y, pos->x);
waddch(tv, chr);
}
-void
-leave()
+static void
+leave(int dummy)
{
endwin();
+
+ if (dummy == 0){ /* called via crash() */
+ printf("\nWell, you ran into something and the game is over.\n");
+ printf("Your final score was %d\n\n", score);
+ }
exit(0);
}
-void
-wake()
+static void
+wake(int dummy)
{
signal(SIGALRM, wake);
fflush(stdout);
process(lastch);
}
-rnd(range)
+static int
+rnd(int range)
{
return abs((rand()>>5)+(rand()>>5)) % range;
}
-newpos(bp)
-struct body * bp;
+static void
+newpos(struct body *bp)
{
+ if (visible_len == (LINES-3) * (COLS-3) - 1) {
+ endwin();
+
+ printf("\nYou won!\n");
+ printf("Your final score was %d\n\n", score);
+ exit(0);
+ }
do {
- bp->y = rnd(LINES-3)+ 2;
+ bp->y = rnd(LINES-3)+ 1;
bp->x = rnd(COLS-3) + 1;
wmove(tv, bp->y, bp->x);
} while(winch(tv) != ' ');
}
-prize()
+static void
+prize(void)
{
int value;
wrefresh(tv);
}
-process(ch)
-char ch;
+static void
+process(int ch)
{
- register int x,y;
+ int x,y;
struct body *nh;
alarm(0);
y = head->y;
switch(ch)
{
- when 'h': x--;
- when 'j': y++;
- when 'k': y--;
- when 'l': x++;
- when 'H': x--; running = RUNLEN; ch = tolower(ch);
- when 'J': y++; running = RUNLEN/2; ch = tolower(ch);
- when 'K': y--; running = RUNLEN/2; ch = tolower(ch);
- when 'L': x++; running = RUNLEN; ch = tolower(ch);
- when '\f': setup(); return;
- when CNTRL('Z'): suspend(); return;
- when CNTRL('C'): crash(); return;
- when CNTRL('D'): crash(); return;
- otherwise: if (! running) alarm(1);
+#ifdef KEY_LEFT
+ case KEY_LEFT:
+#endif
+ case 'h':
+ x--; break;
+
+#ifdef KEY_DOWN
+ case KEY_DOWN:
+#endif
+ case 'j':
+ y++; break;
+
+#ifdef KEY_UP
+ case KEY_UP:
+#endif
+ case 'k':
+ y--; break;
+
+#ifdef KEY_RIGHT
+ case KEY_RIGHT:
+#endif
+ case 'l':
+ x++; break;
+
+ case 'H': x--; running = RUNLEN; ch = tolower(ch); break;
+ case 'J': y++; running = RUNLEN/2; ch = tolower(ch); break;
+ case 'K': y--; running = RUNLEN/2; ch = tolower(ch); break;
+ case 'L': x++; running = RUNLEN; ch = tolower(ch); break;
+ case '\f': setup(); return;
+
+ case ERR:
+ case CNTRL('C'):
+ case CNTRL('D'):
+ crash();
+ return;
+
+ default: if (! running) alarm(1);
return;
}
lastch = ch;
nh = tail->next;
free(tail);
tail = nh;
+ visible_len--;
}
else growing--;
display(head, BODY);
prize();
score += growing;
running = 0;
- wmove(stw, 0, 68);
+ wmove(stw, 0, COLS - 12);
wprintw(stw, "Score: %3d", score);
wrefresh(stw);
}
nh->x = x;
display(nh, HEAD);
head = nh;
+ visible_len++;
if (!(slow && running))
+ {
+ wmove(tv, head->y, head->x);
wrefresh(tv);
+ }
if (!running)
alarm(1);
}
-crash()
-{
- sleep(2);
- clear();
- move(23, 0);
- refresh();
- printf("Well, you ran into something and the game is over.\n");
- printf("Your final score was %d\n", score);
- leave();
-}
-
-void
-suspend()
+static void
+crash(void)
{
- char *sh;
-
- move(LINES-1, 0);
- refresh();
- endwin();
- fflush(stdout);
- kill(getpid(), SIGTSTP);
- signal(SIGTSTP, suspend);
- crmode();
- noecho();
- setup();
+ leave(0);
}
-setup()
+static void
+setup(void)
{
clear();
refresh();
git.ckatri.com / bsdgames-darwin.git / blobdiff