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. Neither the name of the University nor the names of its contributors
  14  *    may be used to endorse or promote products derived from this software
  15  *    without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  *
  29  * @(#)init.c   8.1 (Berkeley) 5/31/93
  30  * $FreeBSD: src/games/battlestar/init.c,v 1.7.2.1 2001/03/05 11:45:36 kris Exp $
  31  * $DragonFly: src/games/battlestar/init.c,v 1.4 2006/08/08 16:47:20 pavalos Exp $
  32  */
  33
  34 #include <pwd.h>
  35 #include "externs.h"
  36
  37 static int checkout(const char *);
  38 static void getutmp(char *);
  39 static int wizard(const char *);
  40
  41 void
  42 initialize(int startup)
  43 {
  44         const struct objs *p;
  45
  46         puts("Version 4.2, fall 1984.");
  47         puts("First Adventure game written by His Lordship, the honorable");
  48         puts("Admiral D.W. Riggle\n");
  49         srandomdev();
  50         getutmp(uname);
  51         if (startup)
  52                 location = dayfile;
  53         wiz = wizard(uname);
  54         wordinit();
  55         if (startup) {
  56                 direction = NORTH;
  57                 gtime = 0;
  58                 snooze = CYCLE * 1.5;
  59                 position = 22;
  60                 setbit(wear, PAJAMAS);
  61                 fuel = TANKFULL;
  62                 torps = TORPEDOES;
  63                 for (p = dayobjs; p->room != 0; p++)
  64                         setbit(location[p->room].objects, p->obj);
  65         } else
  66                 restore();
  67         signal(SIGINT, die);
  68 }
  69
  70 static void
  71 getutmp(char *battlestar_uname)
  72 {
  73         struct passwd *ptr;
  74
  75         ptr = getpwuid(getuid());
  76         strcpy(battlestar_uname, ptr ? ptr->pw_name : "");
  77 }
  78
  79 const char *const list[] = {    /* hereditary wizards */
  80         "riggle",
  81         "chris",
  82         "edward",
  83         "comay",
  84         "yee",
  85         "dmr",
  86         "ken",
  87         0
  88 };
  89
  90 const char *const badguys[] = {
  91         "wnj",
  92         "root",
  93         "ted",
  94         0
  95 };
  96
  97 static int
  98 wizard(const char *battlestar_uname)
  99 {
 100         char flag;
 101
 102         if ((flag = checkout(battlestar_uname)) > 0)
 103                 printf("You are the Great wizard %s.\n", battlestar_uname);
 104         return flag;
 105 }
 106
 107 static int
 108 checkout(const char *battlestar_uname)
 109 {
 110         const char *const *ptr;
 111
 112         for (ptr = list; *ptr; ptr++)
 113                 if (strcmp(*ptr, battlestar_uname) == 0)
 114                         return 1;
 115         for (ptr = badguys; *ptr; ptr++)
 116                 if (strcmp(*ptr, battlestar_uname) == 0) {
 117                         printf("You are the Poor anti-wizard %s.  Good Luck!\n",
 118                                 battlestar_uname);
 119                         if (location != NULL) {
 120                                 CUMBER = 3;
 121                                 WEIGHT = 9;     /* that'll get him! */
 122                                 gclock = 10;
 123                                 setbit(location[7].objects, WOODSMAN);  /* viper room */
 124                                 setbit(location[20].objects, WOODSMAN); /* laser " */
 125                                 setbit(location[13].objects, DARK);     /* amulet " */
 126                                 setbit(location[8].objects, ELF);       /* closet */
 127                         }
 128                         return 0;       /* anything else, Chris? */
 129                 }
 130         return 0;
 131 }