2 * Copyright (c) 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software contributed to Berkeley by
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * @(#)init.c 8.1 (Berkeley) 5/31/93
33 * $FreeBSD: src/games/rogue/init.c,v 1.4 1999/11/30 03:49:22 billf Exp $
39 * This source herein may be modified and/or distributed by anybody who
40 * so desires, with the following restrictions:
41 * 1.) No portion of this notice shall be removed.
42 * 2.) Credit shall not be taken for the creation of this source.
43 * 3.) This code is not to be traded, sold, or used for personal
51 static void do_args(int, char **);
52 static void do_opts(void);
53 static void env_get_value(char **, char *, boolean
);
54 static void init_str(char **, const char *);
55 static void player_init(void);
58 char login_name
[MAX_OPT_LEN
];
59 char *nick_name
= NULL
;
60 char *rest_file
= NULL
;
64 boolean init_curses
= 0;
65 boolean save_is_interactive
= 1;
70 const char *error_file
= "rogue.esave";
71 const char *byebye_string
= "Okay, bye bye!";
74 extern char *save_file
;
75 extern short party_room
;
79 init(int argc
, char *argv
[])
84 if ((!pn
) || (strlen(pn
) >= MAX_OPT_LEN
)) {
85 clean_up("Hey! Who are you?");
87 strcpy(login_name
, pn
);
92 if (!score_only
&& !rest_file
) {
93 printf("Hello %s, just a moment while I dig the dungeon...",
99 if ((LINES
< DROWS
) || (COLS
< DCOLS
)) {
100 clean_up("must be played on 24 x 80 screen");
116 get_wand_and_ring_materials();
117 make_scroll_titles();
119 level_objects
.next_object
= NULL
;
120 level_monsters
.next_monster
= NULL
;
131 rogue
.pack
.next_object
= NULL
;
133 obj
= alloc_object();
135 add_to_pack(obj
, &rogue
.pack
, 1);
137 obj
= alloc_object(); /* initial armor */
138 obj
->what_is
= ARMOR
;
139 obj
->which_kind
= RINGMAIL
;
140 obj
->class = RINGMAIL
+2;
141 obj
->is_protected
= 0;
143 add_to_pack(obj
, &rogue
.pack
, 1);
146 obj
= alloc_object(); /* initial weapons */
147 obj
->what_is
= WEAPON
;
148 obj
->which_kind
= MACE
;
150 obj
->hit_enchant
= obj
->d_enchant
= 1;
152 add_to_pack(obj
, &rogue
.pack
, 1);
155 obj
= alloc_object();
156 obj
->what_is
= WEAPON
;
157 obj
->which_kind
= BOW
;
159 obj
->hit_enchant
= 1;
162 add_to_pack(obj
, &rogue
.pack
, 1);
164 obj
= alloc_object();
165 obj
->what_is
= WEAPON
;
166 obj
->which_kind
= ARROW
;
167 obj
->quantity
= get_rand(25, 35);
169 obj
->hit_enchant
= 0;
172 add_to_pack(obj
, &rogue
.pack
, 1);
176 clean_up(const char *estr
)
178 if (save_is_interactive
) {
184 printf("\n%s\n", estr
);
197 md_control_keybord(0);
204 md_control_keybord(1);
208 byebye(__unused
int sig
)
214 clean_up(byebye_string
);
220 onintr(__unused
int sig
)
227 message("interrupt", 1);
233 error_save(__unused
int sig
)
235 save_is_interactive
= 0;
236 save_into_file(error_file
);
241 do_args(int argc
, char *argv
[])
245 for (i
= 1; i
< argc
; i
++) {
246 if (argv
[i
][0] == '-') {
247 for (j
= 1; argv
[i
][j
]; j
++) {
265 if ((eptr
= md_getenv("ROGUEOPTS")) != NULL
) {
267 while ((*eptr
) == ' ') {
273 if (!strncmp(eptr
, "fruit=", 6)) {
275 env_get_value(&fruit
, eptr
, 1);
276 } else if (!strncmp(eptr
, "file=", 5)) {
278 env_get_value(&save_file
, eptr
, 0);
279 } else if (!strncmp(eptr
, "jump", 4)) {
281 } else if (!strncmp(eptr
, "name=", 5)) {
283 env_get_value(&nick_name
, eptr
, 0);
284 } else if (!strncmp(eptr
, "noaskquit", 9)) {
286 } else if (!strncmp(eptr
, "noskull", 7) ||
287 !strncmp(eptr
,"notomb", 6)) {
289 } else if (!strncmp(eptr
, "passgo", 6)) {
291 } else if (!strncmp(eptr
, "noflush", 7)) {
294 while ((*eptr
) && (*eptr
!= ',')) {
302 /* If some strings have not been set through ROGUEOPTS, assign defaults
303 * to them so that the options editor has data to work with.
305 init_str(&nick_name
, login_name
);
306 init_str(&save_file
, "rogue.save");
307 init_str(&fruit
, "slime-mold");
311 env_get_value(char **s
, char *e
, boolean add_blank
)
318 while ((*e
) && (*e
!= ',')) {
320 *e
= ';'; /* ':' reserved for score file purposes */
323 if (++i
>= MAX_OPT_LEN
) {
327 /* note: edit_opts() in room.c depends on this being the right size */
328 *s
= md_malloc(MAX_OPT_LEN
+ 2);
337 init_str(char **str
, const char *dflt
)
340 /* note: edit_opts() in room.c depends on this size */
341 *str
= md_malloc(MAX_OPT_LEN
+ 2);