games/battlestar/battlestar.c

   1 /*      $NetBSD: battlestar.c,v 1.15 2005/07/01 06:04:54 jmc Exp $      */
   2
   3 /*
   4  * Copyright (c) 1983, 1993
   5  *      The Regents of the University of California.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. Neither the name of the University nor the names of its contributors
  16  *    may be used to endorse or promote products derived from this software
  17  *    without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  */
  31
  32 #include <sys/cdefs.h>
  33 #ifndef lint
  34 __COPYRIGHT("@(#) Copyright (c) 1983, 1993\
  35  The Regents of the University of California.  All rights reserved.");
  36 #endif                          /* not lint */
  37
  38 #ifndef lint
  39 #if 0
  40 static char sccsid[] = "@(#)battlestar.c        8.2 (Berkeley) 4/28/95";
  41 #else
  42 __RCSID("$NetBSD: battlestar.c,v 1.15 2005/07/01 06:04:54 jmc Exp $");
  43 #endif
  44 #endif                          /* not lint */
  45
  46 /*
  47  * Battlestar - a stellar-tropical adventure game
  48  *
  49  * Originally written by His Lordship, Admiral David W. Horatio Riggle,
  50  * on the Cory PDP-11/70, University of California, Berkeley.
  51  */
  52
  53 #include "extern.h"
  54
  55 int
  56 main(int argc, char **argv)
  57 {
  58         char    mainbuf[LINELENGTH];
  59         char   *next;
  60
  61         /* Open the score file then revoke setgid privileges */
  62         open_score_file();
  63         setgid(getgid());
  64
  65         if (argc < 2)
  66                 initialize(NULL);
  67         else if (strcmp(argv[1], "-r") == 0)
  68                 initialize((argc > 2) ? argv[2] : DEFAULT_SAVE_FILE);
  69         else
  70                 initialize(argv[1]);
  71 start:
  72         news();
  73         if (beenthere[position] <= ROOMDESC)
  74                 beenthere[position]++;
  75         if (notes[LAUNCHED])
  76                 crash();        /* decrements fuel & crash */
  77         if (matchlight) {
  78                 puts("Your match splutters out.");
  79                 matchlight = 0;
  80         }
  81         if (!notes[CANTSEE] || testbit(inven, LAMPON) ||
  82             testbit(location[position].objects, LAMPON)) {
  83                 writedes();
  84                 printobjs();
  85         } else
  86                 puts("It's too dark to see anything in here!");
  87         whichway(location[position]);
  88 run:
  89         next = getcom(mainbuf, sizeof mainbuf, ">-: ",
  90             "Please type in something.");
  91         for (wordcount = 0; next && wordcount < NWORD - 1; wordcount++)
  92                 next = getword(next, words[wordcount], -1);
  93         parse();
  94         switch (cypher()) {
  95         case -1:
  96                 goto run;
  97         case 0:
  98                 goto start;
  99         default:
 100                 errx(1, "bad return from cypher(): please submit a bug report");
 101         }
 102 }