2 * Copyright (c) 1997 Ben Harrison, and others
4 * This software may be copied and distributed for educational, research,
5 * and not for profit purposes provided that this copyright and statement
6 * are included in all such copies.
9 #include "core/asking-player.h"
10 #include "core/game-play.h"
11 #include "core/scores.h"
12 #include "game-option/runtime-arguments.h"
13 #include "io/files-util.h"
15 #include "io/record-play-movie.h"
16 #include "io/signal-handlers.h"
17 #include "io/uid-checker.h"
18 #include "main/angband-initializer.h"
19 #include "player/process-name.h"
20 #include "system/angband-version.h"
21 #include "system/angband.h"
22 #include "system/player-type-definition.h"
23 #include "system/system-variables.h"
24 #include "term/gameterm.h"
25 #include "term/term-color-types.h"
26 #include "util/angband-files.h"
27 #include "util/string-processor.h"
28 #include "view/display-scores.h"
29 #include "wizard/spoiler-util.h"
30 #include "wizard/wizard-spoiler.h"
34 * Available graphic modes
36 #define GRAPHICS_NONE 0
37 #define GRAPHICS_ORIGINAL 1
38 #define GRAPHICS_ADAM_BOLT 2
39 #define GRAPHICS_HENGBAND 3
42 * Some machines have a "main()" function in their "main-xxx.c" file,
43 * all the others use this file for their "main()" function.
48 * A hook for "quit()".
50 * Close down, then fall back into "quit()".
52 static void quit_hook(concptr s)
58 for (auto it = angband_terms.rbegin(); it != angband_terms.rend(); ++it) {
61 if (term == nullptr) {
71 * Set the stack size and overlay buffer (see main-286.c")
73 #ifdef PRIVATE_USER_PATH
76 * Create an ".angband/" directory in the users home directory.
78 * ToDo: Add error handling.
79 * ToDo: Only create the directories when actually writing files.
81 static void create_user_dir(void)
84 char subdirpath[1024];
86 /* Get an absolute path from the filename */
87 path_parse(dirpath, 1024, PRIVATE_USER_PATH);
89 /* Create the ~/.angband/ directory */
92 /* Build the path to the variant-specific sub-directory */
93 path_build(subdirpath, sizeof(subdirpath), dirpath, VARIANT_NAME.data());
95 /* Create the directory */
96 mkdir(subdirpath, 0700);
99 #endif /* PRIVATE_USER_PATH */
102 * Initialize and verify the file paths, and the score file.
104 * Use the ANGBAND_PATH environment var if possible, else use
105 * DEFAULT_(LIB|VAR)_PATH, and in either case, branch off
108 * First, we'll look for the ANGBAND_PATH environment variable,
109 * and then look for the files in there. If that doesn't work,
110 * we'll try the DEFAULT_(LIB|VAR)_PATH constants. So be sure
111 * that one of these two things works...
113 * We must ensure that the path ends with "PATH_SEP" if needed,
114 * since the "init_file_paths()" function will simply append the
115 * relevant "sub-directory names" to the given path.
117 * Make sure that the path doesn't overflow the buffer. We have
118 * to leave enough space for the path separator, directory, and
121 static void init_stuff(void)
123 char libpath[1024], varpath[1024];
127 /* Get the environment variable */
128 tail = getenv("ANGBAND_PATH");
130 /* Use the angband_path, or a default */
131 strncpy(libpath, tail ? tail : DEFAULT_LIB_PATH, 511);
132 strncpy(varpath, tail ? tail : DEFAULT_VAR_PATH, 511);
134 /* Make sure they're terminated */
138 /* Hack -- Add a path separator (only if needed) */
139 if (!suffix(libpath, PATH_SEP)) {
140 strcat(libpath, PATH_SEP);
142 if (!suffix(varpath, PATH_SEP)) {
143 strcat(varpath, PATH_SEP);
147 init_file_paths(libpath, varpath);
151 * Handle a "-d<what>=<path>" option
153 * The "<what>" can be any string starting with the same letter as the
154 * name of a subdirectory of the "lib" folder (i.e. "i" or "info").
156 * The "<path>" can be any legal path for the given system, and should
157 * not end in any special path separator (i.e. "/tmp" or "~/.ang-info").
159 static void change_path(concptr info)
163 /* Find equal sign */
164 s = angband_strchr(info, '=');
166 /* Verify equal sign */
168 quit_fmt("Try '-d<what>=<path>' not '-d%s'", info);
172 switch (tolower(info[0])) {
174 string_free(ANGBAND_DIR_APEX);
175 ANGBAND_DIR_APEX = string_make(s + 1);
180 string_free(ANGBAND_DIR_FILE);
181 ANGBAND_DIR_FILE = string_make(s + 1);
186 string_free(ANGBAND_DIR_HELP);
187 ANGBAND_DIR_HELP = string_make(s + 1);
192 string_free(ANGBAND_DIR_INFO);
193 ANGBAND_DIR_INFO = string_make(s + 1);
198 string_free(ANGBAND_DIR_USER);
199 ANGBAND_DIR_USER = string_make(s + 1);
204 string_free(ANGBAND_DIR_XTRA);
205 ANGBAND_DIR_XTRA = string_make(s + 1);
210 string_free(ANGBAND_DIR_BONE);
211 ANGBAND_DIR_BONE = string_make(s + 1);
216 string_free(ANGBAND_DIR_DATA);
217 ANGBAND_DIR_DATA = string_make(s + 1);
222 string_free(ANGBAND_DIR_EDIT);
223 ANGBAND_DIR_EDIT = string_make(s + 1);
228 string_free(ANGBAND_DIR_SAVE);
229 ANGBAND_DIR_SAVE = string_make(s + 1);
234 string_free(ANGBAND_DIR_SCRIPT);
235 ANGBAND_DIR_SCRIPT = string_make(s + 1);
240 quit_fmt("Bad semantics in '-d%s'", info);
245 static void display_usage(const char *program)
247 /* Dump usage information */
248 printf("Usage: %s [options] [-- subopts]\n", program);
249 puts(" -n Start a new character");
250 puts(" -f Request fiddle mode");
251 puts(" -w Request wizard mode");
252 puts(" -b Request BGM mode");
253 puts(" -v Request sound mode");
254 puts(" -g Request graphics mode");
255 puts(" -o Request original keyset");
256 puts(" -r Request rogue-like keyset");
257 puts(" -M Request monochrome mode");
258 puts(" -s<num> Show <num> high scores");
259 puts(" -u<who> Use your <who> savefile");
260 puts(" -m<sys> Force 'main-<sys>.c' usage");
261 puts(" -d<def> Define a 'lib' dir sub-path");
262 puts(" --output-spoilers");
263 puts(" Output auto generated spoilers and exit");
267 puts(" -mx11 To use X11");
268 puts(" -- Sub options");
269 puts(" -- -d Set display name");
270 puts(" -- -o Request old 8x8 tile graphics");
271 puts(" -- -a Request Adam Bolt 16x16 tile graphics");
272 puts(" -- -b Request Bigtile graphics mode");
273 puts(" -- -s Turn off smoothscaling graphics");
274 puts(" -- -n# Number of terms to use");
279 puts(" -mgcu To use GCU (GNU Curses)");
280 puts(" -- Sub options");
281 puts(" -- -o old subwindow layout (no bigscreen)");
285 puts(" -mcap To use CAP (\"Termcap\" calls)");
288 /* Actually abort the process */
293 * @brief 2文字以上のコマンドライン引数 (オプション)を実行する
294 * @param opt コマンドライン引数
295 * @return Usageを表示する必要があるか否か
296 * @details v3.0.0 Alpha21時点では、スポイラー出力モードの判定及び実行を行う
298 static bool parse_long_opt(const char *opt)
300 if (strcmp(opt + 2, "output-spoilers") != 0) {
305 init_angband(p_ptr, true);
306 switch (output_all_spoilers()) {
307 case SpoilerOutputResultType::SUCCESSFUL:
308 puts("Successfully created a spoiler file.");
311 case SpoilerOutputResultType::FILE_OPEN_FAILED:
312 quit("Cannot create spoiler file.");
314 case SpoilerOutputResultType::FILE_CLOSE_FAILED:
315 quit("Cannot close spoiler file.");
325 * Simple "main" function for multiple platforms.
327 * Note the special "--" option which terminates the processing of
328 * standard options. All non-standard options (if any) are passed
329 * directly to the "init_xxx()" function.
331 int main(int argc, char *argv[])
336 bool new_game = false;
338 concptr mstr = nullptr;
341 /* Save the "program name" XXX XXX XXX */
346 /* Default permissions on files */
351 /* Get the file paths */
356 /* Get the user id (?) */
357 p_ptr->player_uid = getuid();
360 /* Mega-Hack -- Factor group id */
361 p_ptr->player_uid += (getgid() * 1000);
366 #ifdef _POSIX_SAVED_IDS
368 /* Save some info for later */
369 p_ptr->player_euid = geteuid();
370 p_ptr->player_egid = getegid();
378 /* Drop permissions */
383 /* Acquire the "user name" as a default player name */
384 user_name(p_ptr->name, p_ptr->player_uid);
386 #ifdef PRIVATE_USER_PATH
388 /* Create a directory for the users files. */
391 #endif /* PRIVATE_USER_PATH */
395 /* Process the command line arguments */
396 bool browsing_movie = false;
397 for (i = 1; args && (i < argc); i++) {
398 /* Require proper options */
399 if (argv[i][0] != '-') {
400 display_usage(argv[0]);
405 bool is_usage_needed = false;
406 switch (argv[i][1]) {
424 /* HACK - Graphics mode switches on the original tiles */
425 arg_graphics = GRAPHICS_ORIGINAL;
430 arg_force_roguelike = true;
435 arg_force_original = true;
440 show_score = atoi(&argv[i][2]);
441 if (show_score <= 0) {
449 is_usage_needed = true;
453 strcpy(p_ptr->name, &argv[i][2]);
458 is_usage_needed = true;
466 arg_monochrome = true;
471 change_path(&argv[i][2]);
476 is_usage_needed = true;
480 prepare_browse_movie_with_path_build(&argv[i][2]);
481 browsing_movie = true;
485 if (argv[i][2] == '\0') {
491 is_usage_needed = parse_long_opt(argv[i]);
496 is_usage_needed = true;
501 if (!is_usage_needed) {
505 display_usage(argv[0]);
508 /* Hack -- Forget standard args */
514 /* Process the player name */
515 process_player_name(p_ptr, true);
517 /* Install "quit" hook */
518 quit_aux = quit_hook;
521 /* Attempt to use the "main-x11.c" support */
522 if (!done && (!mstr || (streq(mstr, "x11")))) {
523 extern errr init_x11(int, char **);
524 if (0 == init_x11(argc, argv)) {
532 /* Attempt to use the "main-gcu.c" support */
533 if (!done && (!mstr || (streq(mstr, "gcu")))) {
534 extern errr init_gcu(int, char **);
535 if (0 == init_gcu(argc, argv)) {
543 /* Attempt to use the "main-cap.c" support */
544 if (!done && (!mstr || (streq(mstr, "cap")))) {
545 extern errr init_cap(int, char **);
546 if (0 == init_cap(argc, argv)) {
553 /* Make sure we have a display! */
555 quit("Unable to prepare any 'display module'!");
558 /* Hack -- If requested, display scores and quit */
559 if (show_score > 0) {
560 display_scores(0, show_score);
563 /* Catch nasty signals */
567 constexpr auto display_width = 80;
568 constexpr auto display_height = 24;
569 TermCenteredOffsetSetter tcos(display_width, display_height);
572 init_angband(p_ptr, false);
574 /* Wait for response */
579 play_game(p_ptr, new_game, browsing_movie);