games/battlestar/battlestar.c

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