]> git.cameronkatri.com Git - bsdgames-darwin.git/blobdiff - worm/worm.c
Pull in corrections from Free/OpenBSD.
[bsdgames-darwin.git] / worm / worm.c
index e4488bc0732c0fc5a3cc8ac6e04d58d88277f82c..a6784083dcf5294f9879c74d28575db0bd03558f 100644 (file)
@@ -1,4 +1,4 @@
-/*     $NetBSD: worm.c,v 1.7 1995/04/29 01:12:41 mycroft Exp $ */
+/*     $NetBSD: worm.c,v 1.23 2001/12/06 12:24:00 blymn Exp $  */
 
 /*
  * Copyright (c) 1980, 1993
  * SUCH DAMAGE.
  */
 
+#include <sys/cdefs.h>
 #ifndef lint
-static char copyright[] =
-"@(#) Copyright (c) 1980, 1993\n\
-       The Regents of the University of California.  All rights reserved.\n";
+__COPYRIGHT("@(#) Copyright (c) 1980, 1993\n\
+       The Regents of the University of California.  All rights reserved.\n");
 #endif /* not lint */
 
 #ifndef lint
 #if 0
 static char sccsid[] = "@(#)worm.c     8.1 (Berkeley) 5/31/93";
 #else
-static char rcsid[] = "$NetBSD: worm.c,v 1.7 1995/04/29 01:12:41 mycroft Exp $";
+__RCSID("$NetBSD: worm.c,v 1.23 2001/12/06 12:24:00 blymn Exp $");
 #endif
 #endif /* not lint */
 
@@ -54,9 +54,11 @@ static char rcsid[] = "$NetBSD: worm.c,v 1.7 1995/04/29 01:12:41 mycroft Exp $";
 
 #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 '@'
@@ -78,32 +80,57 @@ int running = 0;
 int slow = 0;
 int score = 0;
 int start_len = LENGTH;
-char lastch;
+int visible_len;
+int lastch;
 char outbuf[BUFSIZ];
 
-void leave(), wake(), suspend();
+void   crash __P((void)) __attribute__((__noreturn__));
+void   display __P((const struct body *, char));
+int    main __P((int, char **));
+void   leave __P((int)) __attribute__((__noreturn__));
+void   life __P((void));
+void   newpos __P((struct body *));
+void   process __P((int));
+void   prize __P((void));
+int    rnd __P((int));
+void   setup __P((void));
+void   wake __P((int));
 
+int
 main(argc, argv)
        int argc;
        char **argv;
 {
-       char ch;
 
-       if (argc == 2)
-               start_len = atoi(argv[1]);
-       if ((start_len <= 0) || (start_len > 500))
-               start_len = LENGTH;
+       /* Revoke setgid privileges */
+       setgid(getgid());
+
        setbuf(stdout, outbuf);
        srand(getpid());
        signal(SIGALRM, wake);
        signal(SIGINT, leave);
        signal(SIGQUIT, leave);
-       signal(SIGTSTP, suspend);       /* process control signal */
        initscr();
-       crmode();
+       cbreak();
        noecho();
+#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, '*', '*');
@@ -126,72 +153,103 @@ main(argc, argv)
                else
                {
                    fflush(stdout);
-                   if (read(0, &ch, 1) >= 0)
-                       process(ch);
+                   process(getch());
                }
        }
 }
 
+void
 life()
 {
-       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;
+       if (head == NULL)
+               err(1, NULL);
+       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();
+               if (np == NULL)
+                       err(1, NULL);
                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;
 }
 
+void
 display(pos, chr)
-struct body *pos;
-char chr;
+       const struct body *pos;
+       char chr;
 {
        wmove(tv, pos->y, pos->x);
        waddch(tv, chr);
 }
 
 void
-leave()
+leave(dummy)
+       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()
+wake(dummy)
+       int dummy __attribute__((__unused__));
 {
        signal(SIGALRM, wake);
        fflush(stdout);
        process(lastch);
 }
 
+int
 rnd(range)
+       int range;
 {
        return abs((rand()>>5)+(rand()>>5)) % range;
 }
 
+void
 newpos(bp)
-struct body * bp;
+       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) != ' ');
 }
 
+void
 prize()
 {
        int value;
@@ -202,10 +260,11 @@ prize()
        wrefresh(tv);
 }
 
+void
 process(ch)
-char ch;
+       int ch;
 {
-       register int x,y;
+       int x,y;
        struct body *nh;
 
        alarm(0);
@@ -213,18 +272,42 @@ char ch;
        y = head->y;
        switch(ch)
        {
-               case 'h': x--; break;
-               case 'j': y++; break;
-               case 'k': y--; break;
-               case 'l': x++; break;
+#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 CNTRL('Z'): suspend(); return;
-               case CNTRL('C'): crash(); return;
-               case CNTRL('D'): crash(); return;
+
+               case ERR:
+               case CNTRL('C'):
+               case CNTRL('D'):
+                       crash();
+                       return;
+
                default: if (! running) alarm(1);
                           return;
        }
@@ -236,6 +319,7 @@ char ch;
                nh = tail->next;
                free(tail);
                tail = nh;
+               visible_len--;
        }
        else growing--;
        display(head, BODY);
@@ -246,12 +330,14 @@ char ch;
                prize();
                score += growing;
                running = 0;
-               wmove(stw, 0, 68);
+               wmove(stw, 0, COLS - 12);
                wprintw(stw, "Score: %3d", score);
                wrefresh(stw);
        }
        else if(ch != ' ') crash();
        nh = newlink();
+       if (nh == NULL)
+               err(1, NULL);
        nh->next = NULL;
        nh->prev = head;
        head->next = nh;
@@ -259,39 +345,23 @@ char ch;
        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);
 }
 
+void
 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();
+       leave(0);
 }
 
 void
-suspend()
-{
-       char *sh;
-
-       move(LINES-1, 0);
-       refresh();
-       endwin();
-       fflush(stdout);
-       kill(getpid(), SIGTSTP);
-       signal(SIGTSTP, suspend);
-       crmode();
-       noecho();
-       setup();
-}
-
 setup()
 {
        clear();