1 /* $NetBSD: wizard.c,v 1.11 2003/08/07 09:36:51 agc Exp $ */ 2 3 /*- 4 * Copyright (c) 1991, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * The game adventure was originally written in Fortran by Will Crowther 8 * and Don Woods. It was later translated to C and enhanced by Jim 9 * Gillogly. This code is derived from software contributed to Berkeley 10 * by Jim Gillogly at The Rand Corporation. 11 * 12 * Redistribution and use in source and binary forms, with or without 13 * modification, are permitted provided that the following conditions 14 * are met: 15 * 1. Redistributions of source code must retain the above copyright 16 * notice, this list of conditions and the following disclaimer. 17 * 2. Redistributions in binary form must reproduce the above copyright 18 * notice, this list of conditions and the following disclaimer in the 19 * documentation and/or other materials provided with the distribution. 20 * 3. Neither the name of the University nor the names of its contributors 21 * may be used to endorse or promote products derived from this software 22 * without specific prior written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 34 * SUCH DAMAGE. 35 */ 36 37 #include <sys/cdefs.h> 38 #ifndef lint 39 #if 0 40 static char sccsid[] = "@(#)wizard.c 8.1 (Berkeley) 6/2/93"; 41 #else 42 __RCSID("$NetBSD: wizard.c,v 1.11 2003/08/07 09:36:51 agc Exp $"); 43 #endif 44 #endif /* not lint */ 45 46 /* Re-coding of advent in C: privileged operations */ 47 48 #include <stdio.h> 49 #include <string.h> 50 #include <stdlib.h> 51 #include <time.h> 52 #include "hdr.h" 53 #include "extern.h" 54 55 void 56 datime(d, t) 57 int *d, *t; 58 { 59 time_t tvec; 60 struct tm *tptr; 61 62 time(&tvec); 63 tptr = localtime(&tvec); 64 /* day since 1977 (mod leap) */ 65 *d = (tptr->tm_yday + 365 * (tptr->tm_year - 77) 66 + (tptr->tm_year - 77) / 4 - (tptr->tm_year - 1) / 100 67 + (tptr->tm_year + 299) / 400); 68 /* bug: this will overflow in the year 2066 AD (with 16 bit int) */ 69 /* it will be attributed to Wm the C's millenial celebration */ 70 /* and minutes since midnite */ 71 *t = tptr->tm_hour * 60 + tptr->tm_min; 72 } /* pretty painless */ 73 74 75 char magic[6]; 76 77 void 78 poof() 79 { 80 strcpy(magic, DECR('d', 'w', 'a', 'r', 'f')); 81 latncy = 45; 82 } 83 84 int 85 Start() 86 { 87 int d, t, delay; 88 89 datime(&d, &t); 90 delay = (d - saveday) * 1440 + (t - savet); /* good for about a 91 * month */ 92 93 if (delay >= latncy) { 94 saved = -1; 95 return (FALSE); 96 } 97 printf("This adventure was suspended a mere %d minute%s ago.", 98 delay, delay == 1 ? "" : "s"); 99 if (delay <= latncy / 3) { 100 mspeak(2); 101 exit(0); 102 } 103 mspeak(8); 104 if (!wizard()) { 105 mspeak(9); 106 exit(0); 107 } 108 saved = -1; 109 return (FALSE); 110 } 111 112 int 113 wizard() 114 { /* not as complex as advent/10 (for now) */ 115 char *word, *x; 116 if (!yesm(16, 0, 7)) 117 return (FALSE); 118 mspeak(17); 119 getin(&word, &x); 120 if (!weq(word, magic)) { 121 mspeak(20); 122 return (FALSE); 123 } 124 mspeak(19); 125 return (TRUE); 126 } 127 128 void 129 ciao() 130 { 131 char *c; 132 char fname[80]; 133 134 printf("What would you like to call the saved version?\n"); 135 /* XXX - should use fgetln to avoid arbitrary limit */ 136 for (c = fname; c < fname + sizeof fname - 1; c++) { 137 int ch; 138 ch = getchar(); 139 if (ch == '\n' || ch == EOF) 140 break; 141 *c = ch; 142 } 143 *c = 0; 144 if (save(fname) != 0) 145 return; /* Save failed */ 146 printf("To resume, say \"adventure %s\".\n", fname); 147 printf("\"With these rooms I might now have been familiarly acquainted.\"\n"); 148 exit(0); 149 } 150 151 152 int 153 ran(range) 154 int range; 155 { 156 long i; 157 158 i = rand() % range; 159 return (i); 160 } 161