Pull in corrections from Free/OpenBSD.

[bsdgames-darwin.git] / worm / worm.c

diff --git a/worm/worm.c b/worm/worm.c
index e4488bc0732c0fc5a3cc8ac6e04d58d88277f82c..a6784083dcf5294f9879c74d28575db0bd03558f 100644 (file)
--- a/worm/worm.c
+++ b/worm/worm.c
@@ -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
 
 /*
  * Copyright (c) 1980, 1993


@@ -33,17 +33,17 @@
  * SUCH DAMAGE.
  */
 
  * SUCH DAMAGE.
  */
 

+#include <sys/cdefs.h>

 #ifndef lint
 #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
 #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 */
 
 #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 <ctype.h>
 #include <curses.h>

+#include <err.h>

 #include <signal.h>
 #include <stdlib.h>
 #include <termios.h>
 #include <signal.h>
 #include <stdlib.h>
 #include <termios.h>

+#include <unistd.h>

 
 #define newlink() (struct body *) malloc(sizeof (struct body));
 #define HEAD '@'
 
 #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;
 int slow = 0;
 int score = 0;
 int start_len = LENGTH;

-char lastch;
+int visible_len;
+int lastch;

 char outbuf[BUFSIZ];
 
 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;
 {
 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);
        setbuf(stdout, outbuf);
        srand(getpid());
        signal(SIGALRM, wake);
        signal(SIGINT, leave);
        signal(SIGQUIT, leave);

-       signal(SIGTSTP, suspend);       /* process control signal */

        initscr();
        initscr();

-       crmode();
+       cbreak();

        noecho();
        noecho();

+#ifdef KEY_LEFT
+       keypad(stdscr, TRUE);
+#endif

        slow = (baudrate() <= 1200);
        clear();
        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, '*', '*');
        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);
                else
                {
                    fflush(stdout);

-                   if (read(0, &ch, 1) >= 0)
-                       process(ch);
+                   process(getch());

                }
        }
 }
 
                }
        }
 }
 

+void

 life()
 {
 life()
 {

-       register struct body *bp, *np;
-       register int i;
+       struct body *bp, *np;
+       int i, j = 1;

 
 

+       np = NULL;

        head = newlink();
        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();
        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->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;
                display(np, BODY);
        }
        tail = np;
        tail->prev = NULL;

+       visible_len = start_len + 1;

 }
 
 }
 

+void

 display(pos, chr)
 display(pos, chr)

-struct body *pos;
-char chr;
+       const struct body *pos;
+       char chr;

 {
        wmove(tv, pos->y, pos->x);
        waddch(tv, chr);
 }
 
 void
 {
        wmove(tv, pos->y, pos->x);
        waddch(tv, chr);
 }
 
 void

-leave()
+leave(dummy)
+       int dummy;

 {
        endwin();
 {
        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
        exit(0);
 }
 
 void

-wake()
+wake(dummy)
+       int dummy __attribute__((__unused__));

 {
        signal(SIGALRM, wake);
        fflush(stdout);
        process(lastch);
 }
 
 {
        signal(SIGALRM, wake);
        fflush(stdout);
        process(lastch);
 }
 

+int

 rnd(range)
 rnd(range)

+       int range;

 {
        return abs((rand()>>5)+(rand()>>5)) % range;
 }
 
 {
        return abs((rand()>>5)+(rand()>>5)) % range;
 }
 

+void

 newpos(bp)
 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 {
        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) != ' ');
 }
 
                bp->x = rnd(COLS-3) + 1;
                wmove(tv, bp->y, bp->x);
        } while(winch(tv) != ' ');
 }
 

+void

 prize()
 {
        int value;
 prize()
 {
        int value;


@@ -202,10 +260,11 @@ prize()
        wrefresh(tv);
 }
 
        wrefresh(tv);
 }
 

+void

 process(ch)
 process(ch)

-char ch;
+       int ch;

 {
 {

-       register int x,y;
+       int x,y;

        struct body *nh;
 
        alarm(0);
        struct body *nh;
 
        alarm(0);


@@ -213,18 +272,42 @@ char ch;
        y = head->y;
        switch(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 '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;
        }
                default: if (! running) alarm(1);
                           return;
        }


@@ -236,6 +319,7 @@ char ch;
                nh = tail->next;
                free(tail);
                tail = nh;
                nh = tail->next;
                free(tail);
                tail = nh;

+               visible_len--;

        }
        else growing--;
        display(head, BODY);
        }
        else growing--;
        display(head, BODY);


@@ -246,12 +330,14 @@ char ch;
                prize();
                score += growing;
                running = 0;
                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();
                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;
        nh->next = NULL;
        nh->prev = head;
        head->next = nh;


@@ -259,39 +345,23 @@ char ch;
        nh->x = x;
        display(nh, HEAD);
        head = nh;
        nh->x = x;
        display(nh, HEAD);
        head = nh;

+       visible_len++;

        if (!(slow && running))
        if (!(slow && running))

+       {
+               wmove(tv, head->y, head->x);

                wrefresh(tv);
                wrefresh(tv);

+       }

        if (!running)
                alarm(1);
 }
 
        if (!running)
                alarm(1);
 }
 

+void

 crash()
 {
 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
 }
 
 void

-suspend()
-{
-       char *sh;
-
-       move(LINES-1, 0);
-       refresh();
-       endwin();
-       fflush(stdout);
-       kill(getpid(), SIGTSTP);
-       signal(SIGTSTP, suspend);
-       crmode();
-       noecho();
-       setup();
-}
-

 setup()
 {
        clear();
 setup()
 {
        clear();