| 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 | } |