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