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