Initial import from FreeBSD RELENG_4:
[dragonfly.git] / games / battlestar / init.c
1 /*
2  * Copyright (c) 1983, 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
34 #ifndef lint
35 #if 0
36 static char sccsid[] = "@(#)init.c      8.1 (Berkeley) 5/31/93";
37 #endif
38 static const char rcsid[] =
39  "$FreeBSD: src/games/battlestar/init.c,v 1.7.2.1 2001/03/05 11:45:36 kris Exp $";
40 #endif /* not lint */
41
42 #include <sys/types.h>
43 #include <pwd.h>
44 #include <string.h>
45 #include "externs.h"
46
47 static int       checkout __P((const char *));
48 static void      getutmp __P((char *));
49 static int       wizard __P((const char *));
50
51 void
52 initialize(startup)
53         int  startup;
54 {
55         const struct objs *p;
56
57         puts("Version 4.2, fall 1984.");
58         puts("First Adventure game written by His Lordship, the honorable");
59         puts("Admiral D.W. Riggle\n");
60         srandomdev();
61         getutmp(uname);
62         if (startup)
63                 location = dayfile;
64         wiz = wizard(uname);
65         wordinit();
66         if (startup) {
67                 direction = NORTH;
68                 gtime = 0;
69                 snooze = CYCLE * 1.5;
70                 position = 22;
71                 setbit(wear, PAJAMAS);
72                 fuel = TANKFULL;
73                 torps = TORPEDOES;
74                 for (p = dayobjs; p->room != 0; p++)
75                         setbit(location[p->room].objects, p->obj);
76         } else
77                 restore();
78         signal(SIGINT, die);
79 }
80
81 void
82 getutmp(battlestar_uname)
83         char *battlestar_uname;
84 {
85         struct passwd *ptr;
86
87         ptr = getpwuid(getuid());
88         strcpy(battlestar_uname, ptr ? ptr->pw_name : "");
89 }
90
91 const char *const list[] = {    /* hereditary wizards */
92         "riggle",
93         "chris",
94         "edward",
95         "comay",
96         "yee",
97         "dmr",
98         "ken",
99         0
100 };
101
102 const char *const badguys[] = {
103         "wnj",
104         "root",
105         "ted",
106         0
107 };
108
109 int
110 wizard(battlestar_uname)
111         const char *battlestar_uname;
112 {
113         char flag;
114
115         if ((flag = checkout(battlestar_uname)) > 0)
116                 printf("You are the Great wizard %s.\n", battlestar_uname);
117         return flag;
118 }
119
120 int
121 checkout(battlestar_uname)
122         const char *battlestar_uname;
123 {
124         const char *const *ptr;
125
126         for (ptr = list; *ptr; ptr++)
127                 if (strcmp(*ptr, battlestar_uname) == 0)
128                         return 1;
129         for (ptr = badguys; *ptr; ptr++)
130                 if (strcmp(*ptr, battlestar_uname) == 0) {
131                         printf("You are the Poor anti-wizard %s.  Good Luck!\n",
132                                 battlestar_uname);
133                         if (location != NULL) {
134                                 CUMBER = 3;
135                                 WEIGHT = 9;     /* that'll get him! */
136                                 gclock = 10;
137                                 setbit(location[7].objects, WOODSMAN);  /* viper room */
138                                 setbit(location[20].objects, WOODSMAN); /* laser " */
139                                 setbit(location[13].objects, DARK);     /* amulet " */
140                                 setbit(location[8].objects, ELF);       /* closet */
141                         }
142                         return 0;       /* anything else, Chris? */
143                 }
144         return 0;
145 }