void initoptions(void)
{
int i;
iflags.travelcc.x = iflags.travelcc.y = -1;
flags.warnlevel = 1;
flags.warntype = 0L;
/* init flags.inv_order this way, as setting it via the option
* requires a preexisting order */
memcpy(flags.inv_order, def_inv_order, sizeof flags.inv_order);
/* since this is done before init_objects(), do partial init here */
objects[SLIME_MOLD].oc_name_idx = SLIME_MOLD;
strncpy(pl_fruit, OBJ_NAME(objects[SLIME_MOLD]), PL_FSIZ);
fruitadd(pl_fruit);
/* init from option definitions */
for (i = 0; birth_options[i].name; i++)
nh_set_option(birth_options[i].name, birth_options[i].value, FALSE);
for (i = 0; options[i].name; i++)
nh_set_option(options[i].name, options[i].value, FALSE);
/* at this point the user may no longer change their birth options.
* active_birth_options will recieve birth option changes made during
* log replay, so that we can show the user what birth options the
* loaded game was started with */
active_birth_options = clone_optlist(birth_options);
}
void
initoptions(void)
{
flags.mon_generation = 1;
flags.travelcc.x = flags.travelcc.y = -1;
/* init flags.inv_order this way, as setting it via the option requires a
preexisting order */
memcpy(flags.inv_order, def_inv_order, sizeof flags.inv_order);
fruitadd(obj_descr[SLIME_MOLD].oc_name);
strncpy(gamestate.fruits.curname, obj_descr[SLIME_MOLD].oc_name, PL_FSIZ);
}
void initoptions(void)
{
int i;
iflags.travelcc.x = iflags.travelcc.y = -1;
flags.warnlevel = 1;
flags.warntype = 0L;
/* init flags.inv_order this way, as setting it via the option
* requires a preexisting order */
memcpy(flags.inv_order, def_inv_order, sizeof flags.inv_order);
fruitadd(obj_descr[SLIME_MOLD].oc_name);
strncpy(pl_fruit, obj_descr[SLIME_MOLD].oc_name, PL_FSIZ);
/* init from option definitions */
for (i = 0; birth_options[i].name; i++)
nh_set_option(birth_options[i].name, birth_options[i].value, FALSE);
for (i = 0; options[i].name; i++)
nh_set_option(options[i].name, options[i].value, FALSE);
if (!active_birth_options) {
/* at this point the user may no longer change their birth options.
* active_birth_options will recieve birth option changes made during
* log replay, so that we can show the user what birth options the
* loaded game was started with */
active_birth_options = clone_optlist(birth_options);
} else {
/* the switch to alternate birth options has already happened,
* so make sure those settings are active instead. */
for (i = 0; active_birth_options[i].name; i++) {
nh_set_option(active_birth_options[i].name,
active_birth_options[i].value, FALSE);
}
}
}
boolean
set_option(const char *name, union nh_optvalue value,
struct newgame_options *ngo)
{
struct nh_option_desc *option = NULL, *options = new_opt_struct();
boolean ret = FALSE;
/* can't change options for other players */
if (program_state.followmode != FM_PLAY)
goto free;
if (options)
option = nhlib_find_option(options, name);
if (!option || (option->birth_option && program_state.game_running))
goto free;
if (!nhlib_option_value_ok(option, value))
goto free;
nhlib_copy_option_value(option, value);
if (option->type == OPTTYPE_BOOL) {
boolean *bvar = nhlib_find_boolopt(boolopt_map, option->name);
if (!bvar) {
impossible("no boolean for option '%s'", option->name);
goto free;
}
*bvar = option->value.b;
ret = TRUE;
goto free;
} else if (!strcmp("disclose", option->name)) {
flags.end_disclose = option->value.e;
} else if (!strcmp("fruit", option->name)) {
strncpy(gamestate.fruits.curname, option->value.s, PL_FSIZ-1);
gamestate.fruits.curname[PL_FSIZ - 1] = '\0';
if (objects) /* don't do fruitadd before the game is running */
fruitadd(gamestate.fruits.curname);
} else if (!strcmp("menustyle", option->name)) {
flags.menu_style = option->value.e;
} else if (!strcmp("movecommand", option->name)) {
flags.interaction_mode = option->value.e;
} else if (!strcmp("packorder", option->name)) {
if (!change_inv_order(option->value.s))
goto free;
} else if (!strcmp("pickup_burden", option->name)) {
flags.pickup_burden = option->value.e;
} else if (!strcmp("autopickup_rules", option->name)) {
if (flags.ap_rules) {
free(flags.ap_rules->rules);
free(flags.ap_rules);
flags.ap_rules = NULL;
}
flags.ap_rules = nhlib_copy_autopickup_rules(option->value.ar);
}
/* birth options */
else if (!strcmp("mode", option->name)) {
flags.debug = (option->value.e == MODE_WIZARD);
flags.explore = (option->value.e == MODE_EXPLORE);
flags.challenge = (option->value.e == MODE_CHALLENGE);
} else if (!strcmp("align", option->name)) {
u.initalign = option->value.e;
} else if (!strcmp("gender", option->name)) {
u.initgend = option->value.e;
} else if (!strcmp("race", option->name)) {
u.initrace = option->value.e;
} else if (!strcmp("role", option->name)) {
u.initrole = option->value.e;
}
else if (!strcmp("name", option->name)) {
strncpy(u.uplname, option->value.s, PL_NSIZ-1);
(u.uplname)[PL_NSIZ - 1] = '\0';
} else if (!strcmp("seed", option->name)) {
/* note: does not NUL-terminate a max-length string, this is
intentional */
strncpy(flags.setseed, option->value.s, RNG_SEED_SIZE_BASE64);
} else if (!strcmp("catname", option->name)) {
if (!ngo)
panic("catname set outside newgame sequence");
strncpy(ngo->catname, option->value.s, PL_PSIZ-1);
ngo->catname[PL_PSIZ - 1] = '\0';
} else if (!strcmp("dogname", option->name)) {
if (!ngo)
panic("dogname set outside newgame sequence");
strncpy(ngo->dogname, option->value.s, PL_PSIZ-1);
ngo->dogname[PL_PSIZ - 1] = '\0';
} else if (!strcmp("horsename", option->name)) {
if (!ngo)
panic("horsename set outside newgame sequence");
strncpy(ngo->horsename, option->value.s, PL_PSIZ-1);
ngo->horsename[PL_PSIZ - 1] = '\0';
} else if (!strcmp("pettype", option->name)) {
if (!ngo)
panic("preferred_pet set outside newgame sequence");
ngo->preferred_pet = (char)option->value.e;
} else if (!strcmp("timezone", option->name)) {
flags.timezone = option->value.e;
} else if (!strcmp("polyinit", option->name)) {
flags.polyinit_mnum = option->value.e;
}
else
/* unrecognized option */
goto free;
/* assume that any recognized option has been handled. */
ret = TRUE;
free:
nhlib_free_optlist(options);
return ret;
}
static boolean
set_option(const char *name, union nh_optvalue value, boolean isstring)
{
boolean is_ui = FALSE;
struct nh_option_desc *option = NULL;
if (options)
option = find_option(options, name);
if (!option && !program_state.game_running && birth_options)
option = find_option(birth_options, name);
if (!option && ui_options) {
option = find_option(ui_options, name);
is_ui = TRUE;
}
if (!option)
return FALSE;
/* if this option change affects game options (!is_ui) and happens during a
replay (program_state.viewing) and the change isn't triggered by the
replay (!program_state.restoring) */
if (!is_ui && program_state.viewing && !program_state.restoring)
return FALSE; /* Nope, sorry. That would mess up the replay */
if (isstring)
value = string_to_optvalue(option, value.s);
if (!option_value_ok(option, value))
return FALSE;
if (copy_option_value(option, value) && !is_ui)
log_option(option); /* prev value != new value */
if (option->type == OPTTYPE_BOOL) {
int i;
boolean *bvar = NULL;
const struct nh_boolopt_map *boolmap = boolopt_map;
if (is_ui)
boolmap = ui_boolopt_map;
for (i = 0; boolmap[i].optname && !bvar; i++)
if (!strcmp(option->name, boolmap[i].optname))
bvar = boolmap[i].addr;
if (!bvar)
/* shouldn't happen */
return FALSE;
*bvar = option->value.b;
if (is_ui && ui_option_callback)
/* allow the ui to "see" changes to booleans, but the return value
doesn't mattter as the option was set here. */
ui_option_callback(option);
return TRUE;
} else if (is_ui)
return ui_option_callback(option);
/* regular non-boolean options */
else if (!strcmp("comment", option->name)) {
/* do nothing */
} else if (!strcmp("disclose", option->name)) {
flags.end_disclose = option->value.e;
} else if (!strcmp("fruit", option->name)) {
strncpy(pl_fruit, option->value.s, PL_FSIZ);
if (objects) /* don't do fruitadd before the game is running */
fruitadd(pl_fruit);
} else if (!strcmp("menustyle", option->name)) {
flags.menu_style = option->value.e;
} else if (!strcmp("packorder", option->name)) {
if (!change_inv_order(option->value.s))
return FALSE;
} else if (!strcmp("pickup_burden", option->name)) {
flags.pickup_burden = option->value.e;
} else if (!strcmp("runmode", option->name)) {
iflags.runmode = option->value.e;
} else if (!strcmp("autopickup_rules", option->name)) {
if (iflags.ap_rules) {
free(iflags.ap_rules->rules);
free(iflags.ap_rules);
iflags.ap_rules = NULL;
}
iflags.ap_rules = copy_autopickup_rules(option->value.ar);
}
/* birth options */
else if (!strcmp("align", option->name)) {
flags.init_align = option->value.e;
} else if (!strcmp("gender", option->name)) {
flags.init_gend = option->value.e;
} else if (!strcmp("race", option->name)) {
flags.init_race = option->value.e;
} else if (!strcmp("role", option->name)) {
flags.init_role = option->value.e;
}
else if (!strcmp("catname", option->name)) {
strncpy(catname, option->value.s, PL_PSIZ);
} else if (!strcmp("dogname", option->name)) {
strncpy(dogname, option->value.s, PL_PSIZ);
} else if (!strcmp("horsename", option->name)) {
strncpy(horsename, option->value.s, PL_PSIZ);
} else if (!strcmp("pettype", option->name)) {
preferred_pet = (char)option->value.e;
}
else
/* unrecognized option */
return FALSE;
/* assume that any recognized option has been handled. */
return TRUE;
}
void
initoptions()
{
register char *opts;
#ifdef MACOS
char keepname[PL_NSIZ]; /* for save file starts */
#endif
flags.time = flags.nonews = flags.notombstone = flags.end_own =
flags.standout = flags.nonull = flags.ignintr = FALSE;
flags.no_rest_on_space = flags.invlet_constant = TRUE;
flags.end_top = 3;
flags.end_around = 2;
flags.female = FALSE; /* players are usually male */
flags.sortpack = TRUE;
flags.soundok = TRUE;
flags.verbose = TRUE;
flags.confirm = TRUE;
flags.safe_dog = TRUE;
flags.silent = flags.pickup = TRUE;
#ifdef TUTTI_FRUTTI
nmcpy(pl_fruit, objects[SLIME_MOLD].oc_name, PL_FSIZ);
#endif
flags.num_pad = FALSE;
flags.help = TRUE;
flags.IBMgraphics = FALSE;
flags.DECgraphics = FALSE;
#ifdef TEXTCOLOR
flags.use_color = TRUE;
#endif
#ifdef AMIFLUSH
flags.amiflush = FALSE; /* default to original behaviour */
#endif
#ifdef MSDOS
#ifdef DGK
flags.IBMBIOS =
#ifdef TOS
TRUE; /* BIOS might as well always be on for TOS */
#endif
flags.rawio = FALSE;
#endif
read_config_file();
#endif /* MSDOS */
#ifdef MACOS
if (plname[0] == '\0') keepname[0] = '\0';
else Strcpy(keepname, plname); /* keep name from save file */
read_config_file();
if (keepname[0] != '\0') Strcpy(plname, keepname);
flags.standout = TRUE;
#endif
if(opts = getenv("NETHACKOPTIONS"))
parseoptions(opts,TRUE);
#ifdef TUTTI_FRUTTI
(void)fruitadd(pl_fruit);
/* Remove "slime mold" from list of object names; this will */
/* prevent it from being wished unless it's actually present */
/* as a named (or default) fruit. Wishing for "fruit" will */
/* result in the player's preferred fruit [better than "\033"]. */
objects[SLIME_MOLD].oc_name = "fruit";
#endif
}
