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. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 static const char copyright[] = 36 "@(#) Copyright (c) 1980, 1993\n\ 37 The Regents of the University of California. All rights reserved.\n"; 38 #endif /* not lint */ 39 40 #ifndef lint 41 #if 0 42 static char sccsid[] = "@(#)main.c 8.1 (Berkeley) 5/31/93"; 43 #endif 44 static const char rcsid[] = 45 "$FreeBSD: src/games/trek/main.c,v 1.7.2.1 2001/03/05 12:11:14 kris Exp $"; 46 #endif /* not lint */ 47 48 # include "trek.h" 49 # include <stdio.h> 50 # include <sgtty.h> 51 # include <setjmp.h> 52 # include <stdlib.h> 53 54 # define PRIO 00 /* default priority */ 55 56 int Mother = 51 + (51 << 8); 57 58 /* 59 ** #### ##### # #### ##### #### ##### # # 60 ** # # # # # # # # # # # # 61 ** ### # ##### #### # #### ### ### 62 ** # # # # # # # # # # # # 63 ** #### # # # # # # # # ##### # # 64 ** 65 ** C version by Eric P. Allman 5/76 (U.C. Berkeley) with help 66 ** from Jeff Poskanzer and Pete Rubinstein. 67 ** 68 ** I also want to thank everyone here at Berkeley who 69 ** where crazy enough to play the undebugged game. I want to 70 ** particularly thank Nick Whyte, who made considerable 71 ** suggestions regarding the content of the game. Why, I'll 72 ** never forget the time he suggested the name for the 73 ** "capture" command. 74 ** 75 ** Please send comments, questions, and suggestions about this 76 ** game to: 77 ** Eric P. Allman 78 ** Project INGRES 79 ** Electronics Research Laboratory 80 ** Cory Hall 81 ** University of California 82 ** Berkeley, California 94720 83 ** 84 ** If you make ANY changes in the game, I sure would like to 85 ** know about them. It is sort of an ongoing project for me, 86 ** and I very much want to put in any bug fixes and improvements 87 ** that you might come up with. 88 ** 89 ** FORTRASH version by Kay R. Fisher (DEC) "and countless others". 90 ** That was adapted from the "original BASIC program" (ha!) by 91 ** Mike Mayfield (Centerline Engineering). 92 ** 93 ** Additional inspiration taken from FORTRAN version by 94 ** David Matuszek and Paul Reynolds which runs on the CDC 95 ** 7600 at Lawrence Berkeley Lab, maintained there by 96 ** Andy Davidson. This version is also available at LLL 97 ** and at LMSC. In all fairness, this version was the 98 ** major inspiration for this version of the game (trans- 99 ** lation: I ripped off a whole lot of code). 100 ** 101 ** Minor other input from the "Battelle Version 7A" by Joe Miller 102 ** (Graphics Systems Group, Battelle-Columbus Labs) and 103 ** Ross Pavlac (Systems Programmer, Battelle Memorial 104 ** Institute). That version was written in December '74 105 ** and extensively modified June '75. It was adapted 106 ** from the FTN version by Ron Williams of CDC Sunnyvale, 107 ** which was adapted from the Basic version distributed 108 ** by DEC. It also had "neat stuff swiped" from T. T. 109 ** Terry and Jim Korp (University of Texas), Hicks (Penn 110 ** U.), and Rick Maus (Georgia Tech). Unfortunately, it 111 ** was not as readable as it could have been and so the 112 ** translation effort was severely hampered. None the 113 ** less, I got the idea of inhabited starsystems from this 114 ** version. 115 ** 116 ** Permission is given for use, copying, and modification of 117 ** all or part of this program and related documentation, 118 ** provided that all reference to the authors are maintained. 119 ** 120 ** 121 ********************************************************************** 122 ** 123 ** NOTES TO THE MAINTAINER: 124 ** 125 ** There is a compilation option xTRACE which must be set for any 126 ** trace information to be generated. It is probably defined in 127 ** the version that you get. It can be removed, however, if you 128 ** have trouble finding room in core. 129 ** 130 ** Many things in trek are not as clear as they might be, but are 131 ** done to reduce space. I compile with the -f and -O flags. I 132 ** am constrained to running with non-separated I/D space, since 133 ** we don't have doubleing point hardware here; even if we did, I 134 ** would like trek to be available to the large number of people 135 ** who either have an 11/40 or do not have FP hardware. I also 136 ** found it desirable to make the code run reentrant, so this 137 ** added even more space constraints. 138 ** 139 ** I use the portable C library to do my I/O. This is done be- 140 ** cause I wanted the game easily transportable to other C 141 ** implementations, and because I was too lazy to do the doubleing 142 ** point input myself. Little did I know. The portable C library 143 ** released by Bell Labs has more bugs than you would believe, so 144 ** I ended up rewriting the whole blessed thing. Trek excercises 145 ** many of the bugs in it, as well as bugs in some of the section 146 ** III UNIX routines. We have fixed them here. One main problem 147 ** was a bug in alloc() that caused it to always ask for a large 148 ** hunk of memory, which worked fine unless you were almost out, 149 ** which I inevitably was. If you want the code for all of this 150 ** stuff, it is also available through me. 151 ** 152 *********************************************************************** 153 */ 154 155 jmp_buf env; 156 157 main(argc, argv) 158 int argc; 159 char **argv; 160 { 161 /* extern FILE *f_log; */ 162 char opencode; 163 int prio; 164 int ac; 165 char **av; 166 struct sgttyb argp; 167 168 /* revoke */ 169 setgid(getgid()); 170 171 av = argv; 172 ac = argc; 173 av++; 174 srandomdev(); 175 opencode = 'w'; 176 prio = PRIO; 177 if (gtty(1, &argp) == 0) 178 { 179 if ((argp.sg_ispeed ) < B1200) 180 Etc.fast++; 181 } 182 while (ac > 1 && av[0][0] == '-') 183 { 184 switch (av[0][1]) 185 { 186 case 'a': /* append to log file */ 187 opencode = 'a'; 188 break; 189 190 case 'f': /* set fast mode */ 191 Etc.fast++; 192 break; 193 194 case 's': /* set slow mode */ 195 Etc.fast = 0; 196 break; 197 198 # ifdef xTRACE 199 case 't': /* trace */ 200 if (getuid() != Mother) 201 goto badflag; 202 Trace++; 203 break; 204 # endif 205 206 case 'p': /* set priority */ 207 if (getuid() != Mother) 208 goto badflag; 209 prio = atoi(av[0] + 2); 210 break; 211 212 default: 213 badflag: 214 printf("Invalid option: %s\n", av[0]); 215 216 } 217 ac--; 218 av++; 219 } 220 if (ac > 2) 221 syserr(0, "arg count"); 222 /* 223 if (ac > 1) 224 f_log = fopen(av[0], opencode); 225 */ 226 227 printf("\n * * * S T A R T R E K * * *\n\nPress return to continue.\n"); 228 229 if (setjmp(env)) 230 { 231 if ( !getynpar("Another game") ) 232 exit(0); 233 } 234 do 235 { 236 setup(); 237 play(); 238 } while (getynpar("Another game")); 239 240 fflush(stdout); 241 } 242