games/trek/main.c

   1 /*-
   2  * Copyright (c) 1980, 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) 1980, 1993 The Regents of the University of California.  All rights reserved.
  30  * @(#)main.c   8.1 (Berkeley) 5/31/93
  31  * $FreeBSD: src/games/trek/main.c,v 1.7.2.1 2001/03/05 12:11:14 kris Exp $
  32  */
  33
  34 #include "trek.h"
  35 #include "getpar.h"
  36
  37 unsigned int    Mother  = 51 + (51 << 8);
  38
  39 /*
  40 **       ####  #####    #    ####          #####  ####   #####  #   #
  41 **      #        #     # #   #   #           #    #   #  #      #  #
  42 **       ###     #    #####  ####            #    ####   ###    ###
  43 **          #    #    #   #  #  #            #    #  #   #      #  #
  44 **      ####     #    #   #  #   #           #    #   #  #####  #   #
  45 **
  46 **      C version by Eric P. Allman 5/76 (U.C. Berkeley) with help
  47 **              from Jeff Poskanzer and Pete Rubinstein.
  48 **
  49 **      I also want to thank everyone here at Berkeley who
  50 **      where crazy enough to play the undebugged game.  I want to
  51 **      particularly thank Nick Whyte, who made considerable
  52 **      suggestions regarding the content of the game.  Why, I'll
  53 **      never forget the time he suggested the name for the
  54 **      "capture" command.
  55 **
  56 **      Please send comments, questions, and suggestions about this
  57 **              game to:
  58 **                      Eric P. Allman
  59 **                      Project INGRES
  60 **                      Electronics Research Laboratory
  61 **                      Cory Hall
  62 **                      University of California
  63 **                      Berkeley, California  94720
  64 **
  65 **      If you make ANY changes in the game, I sure would like to
  66 **      know about them.  It is sort of an ongoing project for me,
  67 **      and I very much want to put in any bug fixes and improvements
  68 **      that you might come up with.
  69 **
  70 **      FORTRASH version by Kay R. Fisher (DEC) "and countless others".
  71 **      That was adapted from the "original BASIC program" (ha!) by
  72 **              Mike Mayfield (Centerline Engineering).
  73 **
  74 **      Additional inspiration taken from FORTRAN version by
  75 **              David Matuszek and Paul Reynolds which runs on the CDC
  76 **              7600 at Lawrence Berkeley Lab, maintained there by
  77 **              Andy Davidson.  This version is also available at LLL
  78 **              and at LMSC.  In all fairness, this version was the
  79 **              major inspiration for this version of the game (trans-
  80 **              lation:  I ripped off a whole lot of code).
  81 **
  82 **      Minor other input from the "Battelle Version 7A" by Joe Miller
  83 **              (Graphics Systems Group, Battelle-Columbus Labs) and
  84 **              Ross Pavlac (Systems Programmer, Battelle Memorial
  85 **              Institute).  That version was written in December '74
  86 **              and extensively modified June '75.  It was adapted
  87 **              from the FTN version by Ron Williams of CDC Sunnyvale,
  88 **              which was adapted from the Basic version distributed
  89 **              by DEC.  It also had "neat stuff swiped" from T. T.
  90 **              Terry and Jim Korp (University of Texas), Hicks (Penn
  91 **              U.), and Rick Maus (Georgia Tech).  Unfortunately, it
  92 **              was not as readable as it could have been and so the
  93 **              translation effort was severely hampered.  None the
  94 **              less, I got the idea of inhabited starsystems from this
  95 **              version.
  96 **
  97 **      Permission is given for use, copying, and modification of
  98 **              all or part of this program and related documentation,
  99 **              provided that all reference to the authors are maintained.
 100 **
 101 **
 102 **********************************************************************
 103 **
 104 **  NOTES TO THE MAINTAINER:
 105 **
 106 **      There is a compilation option xTRACE which must be set for any
 107 **      trace information to be generated.  It is probably defined in
 108 **      the version that you get.  It can be removed, however, if you
 109 **      have trouble finding room in core.
 110 **
 111 **      Many things in trek are not as clear as they might be, but are
 112 **      done to reduce space.  I compile with the -f and -O flags.  I
 113 **      am constrained to running with non-separated I/D space, since
 114 **      we don't have doubleing point hardware here; even if we did, I
 115 **      would like trek to be available to the large number of people
 116 **      who either have an 11/40 or do not have FP hardware.  I also
 117 **      found it desirable to make the code run reentrant, so this
 118 **      added even more space constraints.
 119 **
 120 **      I use the portable C library to do my I/O.  This is done be-
 121 **      cause I wanted the game easily transportable to other C
 122 **      implementations, and because I was too lazy to do the doubleing
 123 **      point input myself.  Little did I know.  The portable C library
 124 **      released by Bell Labs has more bugs than you would believe, so
 125 **      I ended up rewriting the whole blessed thing.  Trek exercises
 126 **      many of the bugs in it, as well as bugs in some of the section
 127 **      III UNIX routines.  We have fixed them here.  One main problem
 128 **      was a bug in alloc() that caused it to always ask for a large
 129 **      hunk of memory, which worked fine unless you were almost out,
 130 **      which I inevitably was.  If you want the code for all of this
 131 **      stuff, it is also available through me.
 132 **
 133 ***********************************************************************
 134 */
 135
 136 jmp_buf env;
 137
 138 int
 139 main(int argc, char **argv)
 140 {
 141 #if 0
 142         extern FILE             *f_log;
 143         char            opencode;
 144 #endif
 145         int             ac;
 146         char            **av;
 147
 148         /* Revoke setgid privileges */
 149         setgid(getgid());
 150
 151         av = argv;
 152         ac = argc;
 153         av++;
 154         srandomdev();
 155 #if 0
 156         opencode = 'w';
 157 #endif
 158         while (ac > 1 && av[0][0] == '-') {
 159                 switch (av[0][1]) {
 160                   case 'a':     /* append to log file */
 161 #if 0
 162                         opencode = 'a';
 163 #endif
 164                         break;
 165
 166 #ifdef xTRACE
 167                   case 't':     /* trace */
 168                         if (getuid() != Mother)
 169                                 goto badflag;
 170                         Trace++;
 171                         break;
 172 #endif
 173                   default:
 174                   badflag:
 175                         printf("Invalid option: %s\n", av[0]);
 176
 177                 }
 178                 ac--;
 179                 av++;
 180         }
 181         if (ac > 2)
 182                 syserr("arg count");
 183 #if 0
 184         if (ac > 1)
 185                 f_log = fopen(av[0], opencode);
 186 #endif
 187
 188         printf("\n   * * *   S T A R   T R E K   * * *\n\nPress return to continue.\n");
 189
 190         if (setjmp(env)) {
 191                 if ( !getynpar("Another game") )
 192                         exit(0);
 193         }
 194         do {
 195                 setup();
 196                 play();
 197         } while (getynpar("Another game"));
 198
 199         fflush(stdout);
 200         return (0);
 201 }