xref: /netbsd-src/games/adventure/wizard.c (revision f5d3fbbc6ff4a77159fb268d247bd94cb7d7e332)
1 /*	$NetBSD: wizard.c,v 1.6 1997/10/11 01:53:40 lukem 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.6 1997/10/11 01:53:40 lukem 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 	/* bug: this will overflow in the year 2066 AD                  */
71 	/* it will be attributed to Wm the C's millenial celebration    */
72 	/* and minutes since midnite */
73 	*t = tptr->tm_hour * 60 + tptr->tm_min;
74 }				/* pretty painless              */
75 
76 
77 char    magic[6];
78 
79 void
80 poof()
81 {
82 	strcpy(magic, DECR('d', 'w', 'a', 'r', 'f'));
83 	latncy = 45;
84 }
85 
86 int
87 Start(n)
88 {
89 	int     d, t, delay;
90 
91 	datime(&d, &t);
92 	delay = (d - saved) * 1440 + (t - savet);	/* good for about a
93 							 * month     */
94 
95 	if (delay >= latncy) {
96 		saved = -1;
97 		return (FALSE);
98 	}
99 	printf("This adventure was suspended a mere %d minute%s ago.",
100 	    delay, delay == 1 ? "" : "s");
101 	if (delay <= latncy / 3) {
102 		mspeak(2);
103 		exit(0);
104 	}
105 	mspeak(8);
106 	if (!wizard()) {
107 		mspeak(9);
108 		exit(0);
109 	}
110 	saved = -1;
111 	return (FALSE);
112 }
113 
114 int
115 wizard()
116 {				/* not as complex as advent/10 (for now)        */
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 
130 void
131 ciao(cmdfile)
132 	char   *cmdfile;
133 {
134 	char   *c;
135 	char    fname[80];
136 
137 	printf("What would you like to call the saved version?\n");
138 	for (c = fname;; c++)
139 		if ((*c = getchar()) == '\n')
140 			break;
141 	*c = 0;
142 	if (save(fname) != 0)
143 		return;		/* Save failed */
144 	printf("To resume, say \"adventure %s\".\n", fname);
145 	printf("\"With these rooms I might now have been familiarly acquainted.\"\n");
146 	exit(0);
147 }
148 
149 
150 int
151 ran(range)
152 	int     range;
153 {
154 	long    i;
155 
156 	i = rand() % range;
157 	return (i);
158 }
159