1/* $NetBSD: wizard.c,v 1.17 2021/05/02 12:50:43 rillig 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 40static char sccsid[] = "@(#)wizard.c 8.1 (Berkeley) 6/2/93"; 41#else 42__RCSID("$NetBSD: wizard.c,v 1.17 2021/05/02 12:50:43 rillig 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 55static int wizard(void); 56 57void 58datime(int *d, int *t) 59{ 60 time_t tvec; 61 struct tm *tptr; 62 63 time(&tvec); 64 tptr = localtime(&tvec); 65 /* day since 1977 (mod leap) */ 66 *d = (tptr->tm_yday + 365 * (tptr->tm_year - 77) 67 + (tptr->tm_year - 77) / 4 - (tptr->tm_year - 1) / 100 68 + (tptr->tm_year + 299) / 400); 69 /* bug: this will overflow in the year 2066 AD (with 16 bit int) */ 70 /* it will be attributed to Wm the C's millenial celebration */ 71 /* and minutes since midnite */ 72 *t = tptr->tm_hour * 60 + tptr->tm_min; 73} /* pretty painless */ 74 75 76static char magic[6]; 77 78void 79poof(void) 80{ 81 strcpy(magic, DECR('d', 'w', 'a', 'r', 'f')); 82 latency = 45; 83} 84 85int 86Start(void) 87{ 88 int d, t, delay; 89 90 datime(&d, &t); 91 delay = (d - saveday) * 1440 + (t - savet); /* good for about a 92 * month */ 93 94 if (delay >= latency) { 95 saved = -1; 96 return (FALSE); 97 } 98 printf("This adventure was suspended a mere %d minute%s ago.", 99 delay, delay == 1 ? "" : "s"); 100 if (delay <= latency / 3) { 101 mspeak(2); 102 exit(0); 103 } 104 mspeak(8); 105 if (!wizard()) { 106 mspeak(9); 107 exit(0); 108 } 109 saved = -1; 110 return (FALSE); 111} 112 113/* not as complex as advent/10 (for now) */ 114static int 115wizard(void) 116{ 117 char *word, *x; 118 if (!yesm(16, 0, 7)) 119 return (FALSE); 120 mspeak(17); 121 getin(&word, &x); 122 if (!weq(word, magic)) { 123 mspeak(20); 124 return (FALSE); 125 } 126 mspeak(19); 127 return (TRUE); 128} 129 130void 131ciao(void) 132{ 133 char fname[80]; 134 size_t pos; 135 136 printf("What would you like to call the saved version?\n"); 137 /* XXX - should use fgetln to avoid arbitrary limit */ 138 for (pos = 0; pos < sizeof(fname) - 1; pos++) { 139 int ch; 140 ch = getchar(); 141 if (ch == '\n' || ch == EOF) 142 break; 143 fname[pos] = ch; 144 } 145 fname[pos] = '\0'; 146 if (save(fname) != 0) 147 return; /* Save failed */ 148 printf("To resume, say \"adventure %s\".\n", fname); 149 printf("\"With these rooms I might now have been familiarly "); 150 printf("acquainted.\"\n"); 151 exit(0); 152} 153 154 155int 156ran(int range) 157{ 158 long i; 159 160 i = rand() % range; 161 return (i); 162} 163