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