Home | History | Annotate | Line # | Download | only in battlestar
init.c revision 1.10
      1  1.10      jsm /*	$NetBSD: init.c,v 1.10 1999/09/13 17:18:57 jsm Exp $	*/
      2   1.4      cgd 
      3   1.1      cgd /*
      4   1.4      cgd  * Copyright (c) 1983, 1993
      5   1.4      cgd  *	The Regents of the University of California.  All rights reserved.
      6   1.1      cgd  *
      7   1.1      cgd  * Redistribution and use in source and binary forms, with or without
      8   1.1      cgd  * modification, are permitted provided that the following conditions
      9   1.1      cgd  * are met:
     10   1.1      cgd  * 1. Redistributions of source code must retain the above copyright
     11   1.1      cgd  *    notice, this list of conditions and the following disclaimer.
     12   1.1      cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1      cgd  *    notice, this list of conditions and the following disclaimer in the
     14   1.1      cgd  *    documentation and/or other materials provided with the distribution.
     15   1.1      cgd  * 3. All advertising materials mentioning features or use of this software
     16   1.1      cgd  *    must display the following acknowledgement:
     17   1.1      cgd  *	This product includes software developed by the University of
     18   1.1      cgd  *	California, Berkeley and its contributors.
     19   1.1      cgd  * 4. Neither the name of the University nor the names of its contributors
     20   1.1      cgd  *    may be used to endorse or promote products derived from this software
     21   1.1      cgd  *    without specific prior written permission.
     22   1.1      cgd  *
     23   1.1      cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24   1.1      cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25   1.1      cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26   1.1      cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27   1.1      cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28   1.1      cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29   1.1      cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30   1.1      cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31   1.1      cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32   1.1      cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33   1.1      cgd  * SUCH DAMAGE.
     34   1.1      cgd  */
     35   1.1      cgd 
     36   1.6    lukem #include <sys/cdefs.h>
     37   1.1      cgd #ifndef lint
     38   1.4      cgd #if 0
     39   1.5      tls static char sccsid[] = "@(#)init.c	8.4 (Berkeley) 4/30/95";
     40   1.4      cgd #else
     41  1.10      jsm __RCSID("$NetBSD: init.c,v 1.10 1999/09/13 17:18:57 jsm Exp $");
     42   1.4      cgd #endif
     43   1.7    lukem #endif				/* not lint */
     44   1.1      cgd 
     45   1.5      tls #include "extern.h"
     46   1.1      cgd 
     47   1.6    lukem void
     48   1.9  hubertf initialize(filename)
     49   1.9  hubertf 	const char   *filename;
     50   1.1      cgd {
     51   1.8  hubertf 	const struct objs *p;
     52   1.9  hubertf 	char *savefile;
     53   1.1      cgd 
     54   1.1      cgd 	puts("Version 4.2, fall 1984.");
     55   1.1      cgd 	puts("First Adventure game written by His Lordship, the honorable");
     56   1.1      cgd 	puts("Admiral D.W. Riggle\n");
     57   1.5      tls 	location = dayfile;
     58   1.1      cgd 	srand(getpid());
     59  1.10      jsm 	getutmp(username);
     60   1.1      cgd 	wordinit();
     61   1.9  hubertf 	if (filename == NULL) {
     62   1.1      cgd 		direction = NORTH;
     63   1.6    lukem 		ourtime = 0;
     64   1.1      cgd 		snooze = CYCLE * 1.5;
     65   1.1      cgd 		position = 22;
     66   1.1      cgd 		setbit(wear, PAJAMAS);
     67   1.1      cgd 		fuel = TANKFULL;
     68   1.1      cgd 		torps = TORPEDOES;
     69   1.1      cgd 		for (p = dayobjs; p->room != 0; p++)
     70   1.1      cgd 			setbit(location[p->room].objects, p->obj);
     71   1.9  hubertf 	} else {
     72   1.9  hubertf 		savefile = save_file_name(filename, strlen(filename));
     73   1.9  hubertf 		restore(savefile);
     74   1.9  hubertf 		free(savefile);
     75   1.9  hubertf 	}
     76  1.10      jsm 	wiz = wizard(username);
     77   1.6    lukem 	signal(SIGINT, diesig);
     78   1.1      cgd }
     79   1.1      cgd 
     80   1.6    lukem void
     81   1.1      cgd getutmp(uname)
     82   1.7    lukem 	char   *uname;
     83   1.1      cgd {
     84   1.1      cgd 	struct passwd *ptr;
     85   1.1      cgd 
     86   1.1      cgd 	ptr = getpwuid(getuid());
     87   1.1      cgd 	strcpy(uname, ptr ? ptr->pw_name : "");
     88   1.1      cgd }
     89   1.1      cgd 
     90   1.8  hubertf const char   *const list[] = {		/* hereditary wizards */
     91   1.1      cgd 	"riggle",
     92   1.1      cgd 	"chris",
     93   1.1      cgd 	"edward",
     94   1.1      cgd 	"comay",
     95   1.1      cgd 	"yee",
     96   1.1      cgd 	"dmr",
     97   1.1      cgd 	"ken",
     98   1.1      cgd 	0
     99   1.1      cgd };
    100   1.1      cgd 
    101   1.8  hubertf const char   *const badguys[] = {
    102   1.1      cgd 	"wnj",
    103   1.1      cgd 	"root",
    104   1.1      cgd 	"ted",
    105   1.1      cgd 	0
    106   1.1      cgd };
    107   1.1      cgd 
    108   1.6    lukem int
    109   1.1      cgd wizard(uname)
    110   1.8  hubertf 	const char   *uname;
    111   1.1      cgd {
    112   1.7    lukem 	int     flag;
    113   1.1      cgd 
    114   1.6    lukem 	if ((flag = checkout(uname)) != 0)
    115   1.1      cgd 		printf("You are the Great wizard %s.\n", uname);
    116   1.1      cgd 	return flag;
    117   1.1      cgd }
    118   1.1      cgd 
    119   1.6    lukem int
    120   1.1      cgd checkout(uname)
    121   1.8  hubertf 	const char   *uname;
    122   1.1      cgd {
    123   1.8  hubertf 	const char  *const *ptr;
    124   1.1      cgd 
    125   1.1      cgd 	for (ptr = list; *ptr; ptr++)
    126   1.1      cgd 		if (strcmp(*ptr, uname) == 0)
    127   1.1      cgd 			return 1;
    128   1.1      cgd 	for (ptr = badguys; *ptr; ptr++)
    129   1.1      cgd 		if (strcmp(*ptr, uname) == 0) {
    130   1.1      cgd 			printf("You are the Poor anti-wizard %s.  Good Luck!\n",
    131   1.7    lukem 			    uname);
    132   1.1      cgd 			CUMBER = 3;
    133   1.1      cgd 			WEIGHT = 9;	/* that'll get him! */
    134   1.6    lukem 			ourclock = 10;
    135   1.1      cgd 			setbit(location[7].objects, WOODSMAN);	/* viper room */
    136   1.1      cgd 			setbit(location[20].objects, WOODSMAN);	/* laser " */
    137   1.1      cgd 			setbit(location[13].objects, DARK);	/* amulet " */
    138   1.1      cgd 			setbit(location[8].objects, ELF);	/* closet */
    139   1.1      cgd 			return 0;	/* anything else, Chris? */
    140   1.1      cgd 		}
    141   1.1      cgd 	return 0;
    142   1.1      cgd }
    143