X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=src%2Finit2.c;h=5e01a2389064b8490094f4b5d345089704fda9a9;hb=68872c332294a5d3fd8c89b8c1814023059380c2;hp=0aaed16e8e079333ed61304867268c438a4cdba9;hpb=562e259d4b157d14e80d30fb1669458879cb3000;p=hengband%2Fhengband.git diff --git a/src/init2.c b/src/init2.c index 0aaed16e8..5e01a2389 100644 --- a/src/init2.c +++ b/src/init2.c @@ -1,73 +1,81 @@ -/* File: init2.c */ - -/* Purpose: Initialization (part 2) -BEN- */ - -#include "angband.h" - -#ifndef MACINTOSH -#ifdef CHECK_MODIFICATION_TIME -#include -#include -#endif /* CHECK_MODIFICATION_TIME */ -#endif - -/* +/*! + * @file init2.c + * @brief ゲームデータ初期化2 / Initialization (part 2) -BEN- + * @date 2014/01/28 + * @author + * 
+ * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke
+ * This software may be copied and distributed for educational, research,
+ * and not for profit purposes provided that this copyright and statement
+ * are included in all such copies.  Other copyrights may also apply.
+ * 2014 Deskull rearranged comment for Doxygen.\n
+ *
+ * @details + * 
  * This file is used to initialize various variables and arrays for the
  * Angband game.  Note the use of "fd_read()" and "fd_write()" to bypass
  * the common limitation of "read()" and "write()" to only 32767 bytes
  * at a time.
- *
  * Several of the arrays for Angband are built from "template" files in
  * the "lib/file" directory, from which quick-load binary "image" files
  * are constructed whenever they are not present in the "lib/data"
  * directory, or if those files become obsolete, if we are allowed.
- *
  * Warning -- the "ascii" file parsers use a minor hack to collect the
  * name and text information in a single pass.  Thus, the game will not
  * be able to load any template file with more than 20K of names or 60K
  * of text, even though technically, up to 64K should be legal.
- *
  * The "init1.c" file is used only to parse the ascii template files,
  * to create the binary image files.  If you include the binary image
  * files instead of the ascii template files, then you can undefine
  * "ALLOW_TEMPLATES", saving about 20K by removing "init1.c".  Note
  * that the binary image files are extremely system dependant.
+ *
*/ +#include "angband.h" +#include "init.h" -/* +#ifndef MACINTOSH +#ifdef CHECK_MODIFICATION_TIME +#include +#include +#endif /* CHECK_MODIFICATION_TIME */ +#endif + +static void put_title(void); + +/*! + * @brief 各データファイルを読み取るためのパスを取得する * Find the default paths to all of our important sub-directories. - * + * @param path パス保管先の文字列 + * @return なし + * @details + * 
  * The purpose of each sub-directory is described in "variable.c".
- *
  * All of the sub-directories should, by default, be located inside
  * the main "lib" directory, whose location is very system dependant.
- *
  * This function takes a writable buffer, initially containing the
  * "path" to the "lib" directory, for example, "/pkg/lib/angband/",
  * or a system dependant string, for example, ":lib:".  The buffer
  * must be large enough to contain at least 32 more characters.
- *
  * Various command line options may allow some of the important
  * directories to be changed to user-specified directories, most
  * importantly, the "info" and "user" and "save" directories,
  * but this is done after this function, see "main.c".
- *
  * In general, the initial path should end in the appropriate "PATH_SEP"
  * string.  All of the "sub-directory" paths (created below or supplied
  * by the user) will NOT end in the "PATH_SEP" string, see the special
  * "path_build()" function in "util.c" for more information.
- *
  * Mega-Hack -- support fat raw files under NEXTSTEP, using special
  * "suffixed" directories for the "ANGBAND_DIR_DATA" directory, but
  * requiring the directories to be created by hand by the user.
- *
  * Hack -- first we free all the strings, since this is known
  * to succeed even if the strings have not been allocated yet,
  * as long as the variables start out as "NULL".  This allows
  * this function to be called multiple times, for example, to
  * try several base "path" values until a good one is found.
+ *
*/ void init_file_paths(char *path) { @@ -104,28 +112,6 @@ void init_file_paths(char *path) /* Prepare to append to the Base Path */ tail = path + strlen(path); - -#ifdef VM - - /*** Use "flat" paths with VM/ESA ***/ - - /* Use "blank" path names */ - ANGBAND_DIR_APEX = string_make(""); - ANGBAND_DIR_BONE = string_make(""); - ANGBAND_DIR_DATA = string_make(""); - ANGBAND_DIR_EDIT = string_make(""); - ANGBAND_DIR_SCRIPT = string_make(""); - ANGBAND_DIR_FILE = string_make(""); - ANGBAND_DIR_HELP = string_make(""); - ANGBAND_DIR_INFO = string_make(""); - ANGBAND_DIR_SAVE = string_make(""); - ANGBAND_DIR_USER = string_make(""); - ANGBAND_DIR_XTRA = string_make(""); - - -#else /* VM */ - - /*** Build the sub-directory names ***/ /* Build a path name */ @@ -171,7 +157,7 @@ void init_file_paths(char *path) #ifdef PRIVATE_USER_PATH /* Build the path to the user specific directory */ - path_build(buf, 1024, PRIVATE_USER_PATH, VERSION_NAME); + path_build(buf, sizeof(buf), PRIVATE_USER_PATH, VERSION_NAME); /* Build a relative path name */ ANGBAND_DIR_USER = string_make(buf); @@ -188,8 +174,6 @@ void init_file_paths(char *path) strcpy(tail, "xtra"); ANGBAND_DIR_XTRA = string_make(path); -#endif /* VM */ - #ifdef NeXT @@ -238,37 +222,27 @@ void init_file_paths(char *path) /* * Hack -- help give useful error messages */ -s16b error_idx; -s16b error_line; - - -/* - * Hack -- help initialize the fake "name" and "text" arrays when - * parsing an "ascii" template file. - */ -u32b fake_name_size; -#ifdef JP -u32b E_fake_name_size; -#endif -u32b fake_text_size; +int error_idx; /*!< データ読み込み/初期化時に汎用的にエラーコードを保存するグローバル変数 */ +int error_line; /*!< データ読み込み/初期化時に汎用的にエラー行数を保存するグローバル変数 */ -/* - * Standard error message text +/*! + * エラーメッセージの名称定義 / Standard error message text */ cptr err_str[PARSE_ERROR_MAX] = { NULL, #ifdef JP - "ʸˡ¥¨¥é¡¼", - "¸Å¤¤¥Õ¥¡¥¤¥ë", - "µ­Ï¿¥Ø¥Ã¥À¤¬¤Ê¤¤", - "ÉÔϢ³¥ì¥³¡¼¥É", - "¤ª¤«¤·¤Ê¥Õ¥é¥°Â¸ºß", - "̤ÄêµÁÌ¿Îá", - "¥á¥â¥êÉÔ­", - "ºÂɸÈϰϳ°", - "°ú¿ôÉÔ­", + "文法エラー", + "古いファイル", + "記録ヘッダがない", + "不連続レコード", + "おかしなフラグ存在", + "未定義命令", + "メモリ不足", + "座標範囲外", + "引数不足", + "未定義地形タグ", #else "parse error", "obsolete file", @@ -279,6 +253,7 @@ cptr err_str[PARSE_ERROR_MAX] = "out of memory", "coordinates out of bounds", "too few arguments", + "undefined terrain tag", #endif }; @@ -287,8 +262,28 @@ cptr err_str[PARSE_ERROR_MAX] = #endif /* ALLOW_TEMPLATES */ +/* + * File headers + */ +header v_head; /*!< Vault情報のヘッダ構造体 */ +header f_head; /*!< 地形情報のヘッダ構造体 */ +header k_head; /*!< ペースアイテム情報のヘッダ構造体 */ +header a_head; /*!< 固定アーティファクト情報のヘッダ構造体 */ +header e_head; /*!< アイテムエゴ情報のヘッダ構造体 */ +header r_head; /*!< モンスター種族情報のヘッダ構造体 */ +header d_head; /*!< ダンジョン情報のヘッダ構造体 */ +header s_head; /*!< プレイヤー職業技能情報のヘッダ構造体 */ +header m_head; /*!< プレイヤー職業魔法情報のヘッダ構造体 */ + #ifdef CHECK_MODIFICATION_TIME +/*! + * @brief テキストファイルとrawファイルの更新時刻を比較する + * Find the default paths to all of our important sub-directories. + * @param fd ファイルディスクリプタ + * @param template_file ファイル名 + * @return テキストの方が新しいか、rawファイルがなく更新の必要がある場合-1、更新の必要がない場合0。 + */ static errr check_modification_date(int fd, cptr template_file) { char buf[1024]; @@ -296,7 +291,7 @@ static errr check_modification_date(int fd, cptr template_file) struct stat txt_stat, raw_stat; /* Build the filename */ - path_build(buf, 1024, ANGBAND_DIR_EDIT, template_file); + path_build(buf, sizeof(buf), ANGBAND_DIR_EDIT, template_file); /* Access stats on text file */ if (stat(buf, &txt_stat)) @@ -328,23 +323,26 @@ static errr check_modification_date(int fd, cptr template_file) /*** Initialize from binary image files ***/ -/* - * Initialize the "f_info" array, by parsing a binary "image" file +/*! + * @brief rawファイルからのデータの読み取り処理 + * Initialize the "*_info" array, by parsing a binary "image" file + * @param fd ファイルディスクリプタ + * @param head rawファイルのヘッダ + * @return エラーコード */ -static errr init_f_info_raw(int fd) +static errr init_info_raw(int fd, header *head) { header test; /* Read and Verify the header */ if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != f_head->v_major) || - (test.v_minor != f_head->v_minor) || - (test.v_patch != f_head->v_patch) || - (test.v_extra != f_head->v_extra) || - (test.info_num != f_head->info_num) || - (test.info_len != f_head->info_len) || - (test.head_size != f_head->head_size) || - (test.info_size != f_head->info_size)) + (test.v_major != head->v_major) || + (test.v_minor != head->v_minor) || + (test.v_patch != head->v_patch) || + (test.info_num != head->info_num) || + (test.info_len != head->info_len) || + (test.head_size != head->head_size) || + (test.info_size != head->info_size)) { /* Error */ return (-1); @@ -352,40 +350,44 @@ static errr init_f_info_raw(int fd) /* Accept the header */ - (*f_head) = test; + (*head) = test; - /* Allocate the "f_info" array */ - C_MAKE(f_info, f_head->info_num, feature_type); + /* Allocate the "*_info" array */ + C_MAKE(head->info_ptr, head->info_size, char); - /* Read the "f_info" array */ - fd_read(fd, (char*)(f_info), f_head->info_size); + /* Read the "*_info" array */ + fd_read(fd, head->info_ptr, head->info_size); - /* Allocate the "f_name" array */ - C_MAKE(f_name, f_head->name_size, char); + if (head->name_size) + { + /* Allocate the "*_name" array */ + C_MAKE(head->name_ptr, head->name_size, char); - /* Read the "f_name" array */ - fd_read(fd, (char*)(f_name), f_head->name_size); + /* Read the "*_name" array */ + fd_read(fd, head->name_ptr, head->name_size); + } -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Allocate the "E_f_name" array */ - C_MAKE(E_f_name, f_head->E_name_size, char); - /* Read the "E_f_name" array */ - fd_read(fd, (char*)(E_f_name), f_head->E_name_size); -#endif + if (head->text_size) + { + /* Allocate the "*_text" array */ + C_MAKE(head->text_ptr, head->text_size, char); -#ifndef DELAY_LOAD_F_TEXT + /* Read the "*_text" array */ + fd_read(fd, head->text_ptr, head->text_size); + } - /* Allocate the "f_text" array */ - C_MAKE(f_text, f_head->text_size, char); - /* Read the "f_text" array */ - fd_read(fd, (char*)(f_text), f_head->text_size); + if (head->tag_size) + { + /* Allocate the "*_tag" array */ + C_MAKE(head->tag_ptr, head->tag_size, char); -#endif /* DELAY_LOAD_F_TEXT */ + /* Read the "*_tag" array */ + fd_read(fd, head->tag_ptr, head->tag_size); + } /* Success */ @@ -394,19 +396,54 @@ static errr init_f_info_raw(int fd) -/* - * Initialize the "f_info" array - * +/*! + * @brief ヘッダ構造体の更新 + * Initialize the header of an *_info.raw file. + * @param head rawファイルのヘッダ + * @param num データ数 + * @param len データの長さ + * @return エラーコード + */ +static void init_header(header *head, int num, int len) +{ + /* Save the "version" */ + head->v_major = FAKE_VER_MAJOR; + head->v_minor = FAKE_VER_MINOR; + head->v_patch = FAKE_VER_PATCH; + head->v_extra = 0; + + /* Save the "record" information */ + head->info_num = num; + head->info_len = len; + + /* Save the size of "*_head" and "*_info" */ + head->head_size = sizeof(header); + head->info_size = head->info_num * head->info_len; +} + + +/*! + * @brief ヘッダ構造体の更新 + * Initialize the "*_info" array + * @param filename ファイル名(拡張子txt/raw) + * @param head 処理に用いるヘッダ構造体 + * @param info データ保管先の構造体ポインタ + * @param name 名称用可変文字列の保管先 + * @param text テキスト用可変文字列の保管先 + * @param tag タグ用可変文字列の保管先 + * @return エラーコード + * @note * Note that we let each entry have a unique "name" and "text" string, * even if the string happens to be empty (everyone has a unique '\0'). */ -static errr init_f_info(void) +static errr init_info(cptr filename, header *head, + void **info, char **name, char **text, char **tag) { int fd; int mode = 0644; - errr err = 0; + errr err = 1; FILE *fp; @@ -414,36 +451,12 @@ static errr init_f_info(void) char buf[1024]; - /*** Make the header ***/ - - /* Allocate the "header" */ - MAKE(f_head, header); - - /* Save the "version" */ - f_head->v_major = FAKE_VER_MAJOR; - f_head->v_minor = FAKE_VER_MINOR; - f_head->v_patch = FAKE_VER_PATCH; - f_head->v_extra = 0; - - /* Save the "record" information */ - f_head->info_num = max_f_idx; - f_head->info_len = sizeof(feature_type); - - /* Save the size of "f_head" and "f_info" */ - f_head->head_size = sizeof(header); - f_head->info_size = f_head->info_num * f_head->info_len; - - #ifdef ALLOW_TEMPLATES /*** Load the binary image file ***/ /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "f_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "f_info.raw"); -#endif + path_build(buf, sizeof(buf), ANGBAND_DIR_DATA, format(_("%s_j.raw", "%s.raw"), filename)); /* Attempt to open the "raw" file */ @@ -454,3019 +467,401 @@ static errr init_f_info(void) { #ifdef CHECK_MODIFICATION_TIME - err = check_modification_date(fd, "f_info_j.txt"); + err = check_modification_date(fd, format("%s.txt", filename)); #endif /* CHECK_MODIFICATION_TIME */ /* Attempt to parse the "raw" file */ if (!err) - err = init_f_info_raw(fd); + err = init_info_raw(fd, head); /* Close it */ (void)fd_close(fd); - - /* Success */ - if (!err) return (0); } - /*** Make the fake arrays ***/ - - /* Fake the size of "f_name" and "f_text" */ - fake_name_size = FAKE_NAME_SIZE; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = FAKE_NAME_SIZE; -#endif - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "f_info" array */ - C_MAKE(f_info, f_head->info_num, feature_type); + /* Do we have to parse the *.txt file? */ + if (err) + { + /*** Make the fake arrays ***/ - /* Hack -- make "fake" arrays */ - C_MAKE(f_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_MAKE(E_f_name, E_fake_name_size, char); -#endif - C_MAKE(f_text, fake_text_size, char); + /* Allocate the "*_info" array */ + C_MAKE(head->info_ptr, head->info_size, char); + /* Hack -- make "fake" arrays */ + if (name) C_MAKE(head->name_ptr, FAKE_NAME_SIZE, char); + if (text) C_MAKE(head->text_ptr, FAKE_TEXT_SIZE, char); + if (tag) C_MAKE(head->tag_ptr, FAKE_TAG_SIZE, char); - /*** Load the ascii template file ***/ + if (info) (*info) = head->info_ptr; + if (name) (*name) = head->name_ptr; + if (text) (*text) = head->text_ptr; + if (tag) (*tag) = head->tag_ptr; - /* Build the filename */ + /*** Load the ascii template file ***/ - path_build(buf, 1024, ANGBAND_DIR_EDIT, "f_info_j.txt"); + /* Build the filename */ - /* Open the file */ - fp = my_fopen(buf, "r"); + path_build(buf, sizeof(buf), ANGBAND_DIR_EDIT, format("%s.txt", filename)); - /* Parse it */ -#ifdef JP - if (!fp) quit("'f_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'f_info.txt' file."); -#endif + /* Open the file */ + fp = my_fopen(buf, "r"); + /* Parse it */ + if (!fp) quit(format(_("'%s.txt'ファイルをオープンできません。", "Cannot open '%s.txt' file."), filename)); - /* Parse the file */ - err = init_f_info_txt(fp, buf); + /* Parse the file */ + err = init_info_txt(fp, buf, head, head->parse_info_txt); - /* Close it */ - my_fclose(fp); + /* Close it */ + my_fclose(fp); - /* Errors */ - if (err) - { - cptr oops; + /* Errors */ + if (err) + { + cptr oops; #ifdef JP - /* Error string */ - oops = ((err > 0) ? err_str[err] : "̤ÃΤÎ"); + /* Error string */ + oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "未知の"); - /* Oops */ - msg_format("'f_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); + /* Oops */ + msg_format("'%s.txt'ファイルの %d 行目にエラー。", filename, error_line); + msg_format("レコード %d は '%s' エラーがあります。", error_idx, oops); + msg_format("構文 '%s'。", buf); + msg_print(NULL); - /* Quit */ - quit("'f_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); + /* Quit */ + quit(format("'%s.txt'ファイルにエラー", filename)); #else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); + /* Error string */ + oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - /* Oops */ - msg_format("Error %d at line %d of 'f_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); + /* Oops */ + msg_format("Error %d at line %d of '%s.txt'.", err, error_line, filename); + msg_format("Record %d contains a '%s' error.", error_idx, oops); + msg_format("Parsing '%s'.", buf); + msg_print(NULL); - /* Quit */ - quit("Error in 'f_info.txt' file."); + /* Quit */ + quit(format("Error in '%s.txt' file.", filename)); #endif - } + } - /*** Dump the binary image file ***/ + /*** Make final retouch on fake tags ***/ - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); + if (head->retouch) + { + (*head->retouch)(head); + } - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "f_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "f_info.raw"); -#endif + /*** Dump the binary image file ***/ - /* Kill the old file */ - (void)fd_kill(buf); + /* File type is "DATA" */ + FILE_TYPE(FILE_TYPE_DATA); - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); + /* Build the filename */ + path_build(buf, sizeof(buf), ANGBAND_DIR_DATA, format(_("%s_j.raw", "%s.raw"), filename)); - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(f_head), f_head->head_size); - /* Dump the "f_info" array */ - fd_write(fd, (char*)(f_info), f_head->info_size); + /* Grab permissions */ + safe_setuid_grab(); - /* Dump the "f_name" array */ - fd_write(fd, (char*)(f_name), f_head->name_size); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Dump the "E_f_name" array */ - fd_write(fd, (char*)(E_f_name), f_head->E_name_size); -#endif + /* Kill the old file */ + (void)fd_kill(buf); - /* Dump the "f_text" array */ - fd_write(fd, (char*)(f_text), f_head->text_size); + /* Attempt to create the raw file */ + fd = fd_make(buf, mode); - /* Close */ - (void)fd_close(fd); - } + /* Drop permissions */ + safe_setuid_drop(); + /* Dump to the file */ + if (fd >= 0) + { + /* Dump it */ + fd_write(fd, (cptr)(head), head->head_size); - /*** Kill the fake arrays ***/ + /* Dump the "*_info" array */ + fd_write(fd, head->info_ptr, head->info_size); - /* Free the "f_info" array */ - C_KILL(f_info, f_head->info_num, feature_type); + /* Dump the "*_name" array */ + fd_write(fd, head->name_ptr, head->name_size); - /* Hack -- Free the "fake" arrays */ - C_KILL(f_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_KILL(E_f_name, E_fake_name_size, char); -#endif - C_KILL(f_text, fake_text_size, char); + /* Dump the "*_text" array */ + fd_write(fd, head->text_ptr, head->text_size); - /* Forget the array sizes */ - fake_name_size = 0; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = 0; -#endif - fake_text_size = 0; + /* Dump the "*_tag" array */ + fd_write(fd, head->tag_ptr, head->tag_size); -#endif /* ALLOW_TEMPLATES */ + /* Close */ + (void)fd_close(fd); + } - /*** Load the binary image file ***/ + /*** Kill the fake arrays ***/ - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "f_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "f_info.raw"); -#endif + /* Free the "*_info" array */ + C_KILL(head->info_ptr, head->info_size, char); + /* Hack -- Free the "fake" arrays */ + if (name) C_KILL(head->name_ptr, FAKE_NAME_SIZE, char); + if (text) C_KILL(head->text_ptr, FAKE_TEXT_SIZE, char); + if (tag) C_KILL(head->tag_ptr, FAKE_TAG_SIZE, char); - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); +#endif /* ALLOW_TEMPLATES */ - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'f_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'f_info.raw' file."); -#endif + /*** Load the binary image file ***/ - /* Attempt to parse the "raw" file */ - err = init_f_info_raw(fd); + /* Build the filename */ + path_build(buf, sizeof(buf), ANGBAND_DIR_DATA, format(_("%s_j.raw", "%s.raw"), filename)); - /* Close it */ - (void)fd_close(fd); + /* Attempt to open the "raw" file */ + fd = fd_open(buf, O_RDONLY); - /* Error */ -#ifdef JP - if (err) quit("'f_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'f_info.raw' file."); + /* Process existing "raw" file */ + if (fd < 0) quit(format(_("'%s_j.raw'ファイルをロードできません。", "Cannot load '%s.raw' file."), filename)); + + /* Attempt to parse the "raw" file */ + err = init_info_raw(fd, head); + + /* Close it */ + (void)fd_close(fd); + + /* Error */ + if (err) quit(format(_("'%s_j.raw'ファイルを解析できません。", "Cannot parse '%s.raw' file."), filename)); + +#ifdef ALLOW_TEMPLATES + } #endif + if (info) (*info) = head->info_ptr; + if (name) (*name) = head->name_ptr; + if (text) (*text) = head->text_ptr; + if (tag) (*tag) = head->tag_ptr; /* Success */ return (0); } -/* - * Initialize the "k_info" array, by parsing a binary "image" file +/*! + * @brief 地形情報読み込みのメインルーチン / + * Initialize the "f_info" array + * @return エラーコード */ -static errr init_k_info_raw(int fd) +static errr init_f_info(void) { - header test; + /* Init the header */ + init_header(&f_head, max_f_idx, sizeof(feature_type)); - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != k_head->v_major) || - (test.v_minor != k_head->v_minor) || - (test.v_patch != k_head->v_patch) || - (test.v_extra != k_head->v_extra) || - (test.info_num != k_head->info_num) || - (test.info_len != k_head->info_len) || - (test.head_size != k_head->head_size) || - (test.info_size != k_head->info_size)) - { - /* Error */ - return (-1); - } +#ifdef ALLOW_TEMPLATES + /* Save a pointer to the parsing function */ + f_head.parse_info_txt = parse_f_info; - /* Accept the header */ - (*k_head) = test; + /* Save a pointer to the retouch fake tags */ + f_head.retouch = retouch_f_info; - /* Allocate the "k_info" array */ - C_MAKE(k_info, k_head->info_num, object_kind); +#endif /* ALLOW_TEMPLATES */ - /* Read the "k_info" array */ - fd_read(fd, (char*)(k_info), k_head->info_size); + return init_info("f_info", &f_head, + (void*)&f_info, &f_name, NULL, &f_tag); +} - /* Allocate the "k_name" array */ - C_MAKE(k_name, k_head->name_size, char); +/*! + * @brief ベースアイテム情報読み込みのメインルーチン / + * Initialize the "k_info" array + * @return エラーコード + */ +static errr init_k_info(void) +{ + /* Init the header */ + init_header(&k_head, max_k_idx, sizeof(object_kind)); - /* Read the "k_name" array */ - fd_read(fd, (char*)(k_name), k_head->name_size); +#ifdef ALLOW_TEMPLATES + /* Save a pointer to the parsing function */ + k_head.parse_info_txt = parse_k_info; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Allocate the "E_k_name" array */ - C_MAKE(E_k_name, k_head->E_name_size, char); +#endif /* ALLOW_TEMPLATES */ - /* Read the "E_k_name" array */ - fd_read(fd, (char*)(E_k_name), k_head->E_name_size); -#endif -#ifndef DELAY_LOAD_K_TEXT + return init_info("k_info", &k_head, + (void*)&k_info, &k_name, &k_text, NULL); +} - /* Allocate the "k_text" array */ - C_MAKE(k_text, k_head->text_size, char); - /* Read the "k_text" array */ - fd_read(fd, (char*)(k_text), k_head->text_size); -#endif /* DELAY_LOAD_K_TEXT */ +/*! + * @brief 固定アーティファクト情報読み込みのメインルーチン / + * Initialize the "a_info" array + * @return エラーコード + */ +static errr init_a_info(void) +{ + /* Init the header */ + init_header(&a_head, max_a_idx, sizeof(artifact_type)); - /* Success */ - return (0); -} +#ifdef ALLOW_TEMPLATES + /* Save a pointer to the parsing function */ + a_head.parse_info_txt = parse_a_info; -/* - * Initialize the "k_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_k_info(void) -{ - int fd; +#endif /* ALLOW_TEMPLATES */ - int mode = 0644; + return init_info("a_info", &a_head, + (void*)&a_info, &a_name, &a_text, NULL); +} - errr err = 0; - FILE *fp; - /* General buffer */ - char buf[1024]; +/*! + * @brief 固定アーティファクト情報読み込みのメインルーチン / + * Initialize the "e_info" array + * @return エラーコード + */ +static errr init_e_info(void) +{ + /* Init the header */ + init_header(&e_head, max_e_idx, sizeof(ego_item_type)); +#ifdef ALLOW_TEMPLATES - /*** Make the header ***/ + /* Save a pointer to the parsing function */ + e_head.parse_info_txt = parse_e_info; - /* Allocate the "header" */ - MAKE(k_head, header); +#endif /* ALLOW_TEMPLATES */ - /* Save the "version" */ - k_head->v_major = FAKE_VER_MAJOR; - k_head->v_minor = FAKE_VER_MINOR; - k_head->v_patch = FAKE_VER_PATCH; - k_head->v_extra = 0; + return init_info("e_info", &e_head, + (void*)&e_info, &e_name, &e_text, NULL); +} - /* Save the "record" information */ - k_head->info_num = max_k_idx; - k_head->info_len = sizeof(object_kind); - /* Save the size of "k_head" and "k_info" */ - k_head->head_size = sizeof(header); - k_head->info_size = k_head->info_num * k_head->info_len; +/*! + * @brief モンスター種族情報読み込みのメインルーチン / + * Initialize the "r_info" array + * @return エラーコード + */ +static errr init_r_info(void) +{ + /* Init the header */ + init_header(&r_head, max_r_idx, sizeof(monster_race)); #ifdef ALLOW_TEMPLATES - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "k_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "k_info.raw"); -#endif + /* Save a pointer to the parsing function */ + r_head.parse_info_txt = parse_r_info; +#endif /* ALLOW_TEMPLATES */ - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); + return init_info("r_info", &r_head, + (void*)&r_info, &r_name, &r_text, NULL); +} - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - err = check_modification_date(fd, "k_info_j.txt"); -#endif /* CHECK_MODIFICATION_TIME */ +/*! + * @brief ダンジョン情報読み込みのメインルーチン / + * Initialize the "d_info" array + * @return エラーコード + */ +static errr init_d_info(void) +{ + /* Init the header */ + init_header(&d_head, max_d_idx, sizeof(dungeon_info_type)); - /* Attempt to parse the "raw" file */ - if (!err) - err = init_k_info_raw(fd); +#ifdef ALLOW_TEMPLATES - /* Close it */ - (void)fd_close(fd); + /* Save a pointer to the parsing function */ + d_head.parse_info_txt = parse_d_info; - /* Success */ - if (!err) - { -#ifdef USE_SCRIPT - if (init_object_kind_list_callback()) return (0); -#endif /* USE_SCRIPT */ +#endif /* ALLOW_TEMPLATES */ - return (0); - } - } + return init_info("d_info", &d_head, + (void*)&d_info, &d_name, &d_text, NULL); +} - /*** Make the fake arrays ***/ +/*! + * @brief Vault情報読み込みのメインルーチン / + * Initialize the "v_info" array + * @return エラーコード + * @note + * Note that we let each entry have a unique "name" and "text" string, + * even if the string happens to be empty (everyone has a unique '\0'). + */ +errr init_v_info(void) +{ + /* Init the header */ + init_header(&v_head, max_v_idx, sizeof(vault_type)); - /* Fake the size of "k_name" and "k_text" */ - fake_name_size = FAKE_NAME_SIZE; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = FAKE_NAME_SIZE; -#endif - fake_text_size = FAKE_TEXT_SIZE; +#ifdef ALLOW_TEMPLATES - /* Allocate the "k_info" array */ - C_MAKE(k_info, k_head->info_num, object_kind); + /* Save a pointer to the parsing function */ + v_head.parse_info_txt = parse_v_info; - /* Hack -- make "fake" arrays */ - C_MAKE(k_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_MAKE(E_k_name, E_fake_name_size, char); -#endif - C_MAKE(k_text, fake_text_size, char); +#endif /* ALLOW_TEMPLATES */ + return init_info("v_info", &v_head, + (void*)&v_info, &v_name, &v_text, NULL); +} - /*** Load the ascii template file ***/ - /* Build the filename */ +/*! + * @brief 職業技能情報読み込みのメインルーチン / + * Initialize the "s_info" array + * @return エラーコード + */ +static errr init_s_info(void) +{ + /* Init the header */ + init_header(&s_head, MAX_CLASS, sizeof(skill_table)); - path_build(buf, 1024, ANGBAND_DIR_EDIT, "k_info_j.txt"); +#ifdef ALLOW_TEMPLATES - /* Open the file */ - fp = my_fopen(buf, "r"); + /* Save a pointer to the parsing function */ + s_head.parse_info_txt = parse_s_info; - /* Parse it */ -#ifdef JP - if (!fp) quit("'k_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'k_info.txt' file."); -#endif +#endif /* ALLOW_TEMPLATES */ + return init_info("s_info", &s_head, + (void*)&s_info, NULL, NULL, NULL); +} - /* Parse the file */ - err = init_k_info_txt(fp, buf); - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = ((err > 0) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'k_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'k_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'k_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'k_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "k_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "k_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(k_head), k_head->head_size); - - /* Dump the "k_info" array */ - fd_write(fd, (char*)(k_info), k_head->info_size); - - /* Dump the "k_name" array */ - fd_write(fd, (char*)(k_name), k_head->name_size); - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Dump the "E_k_name" array */ - fd_write(fd, (char*)(E_k_name), k_head->E_name_size); -#endif - /* Dump the "k_text" array */ - fd_write(fd, (char*)(k_text), k_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "k_info" array */ - C_KILL(k_info, k_head->info_num, object_kind); - - /* Hack -- Free the "fake" arrays */ - C_KILL(k_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_KILL(E_k_name, E_fake_name_size, char); -#endif - C_KILL(k_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = 0; -#endif - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "k_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "k_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'k_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'k_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_k_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'k_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'k_info.raw' file."); -#endif - - - -#ifdef USE_SCRIPT - if (init_object_kind_list_callback()) return (0); -#endif /* USE_SCRIPT */ - - /* Success */ - return (0); -} - - - -/* - * Initialize the "a_info" array, by parsing a binary "image" file - */ -static errr init_a_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != a_head->v_major) || - (test.v_minor != a_head->v_minor) || - (test.v_patch != a_head->v_patch) || - (test.v_extra != a_head->v_extra) || - (test.info_num != a_head->info_num) || - (test.info_len != a_head->info_len) || - (test.head_size != a_head->head_size) || - (test.info_size != a_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*a_head) = test; - - - /* Allocate the "a_info" array */ - C_MAKE(a_info, a_head->info_num, artifact_type); - - /* Read the "a_info" array */ - fd_read(fd, (char*)(a_info), a_head->info_size); - - - /* Allocate the "a_name" array */ - C_MAKE(a_name, a_head->name_size, char); - - /* Read the "a_name" array */ - fd_read(fd, (char*)(a_name), a_head->name_size); - - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Allocate the "E_a_name" array */ - C_MAKE(E_a_name, a_head->E_name_size, char); - - /* Read the "E_a_name" array */ - fd_read(fd, (char*)(E_a_name), a_head->E_name_size); -#endif - - /* Allocate the "a_text" array */ - C_MAKE(a_text, a_head->text_size, char); - - /* Read the "a_text" array */ - fd_read(fd, (char*)(a_text), a_head->text_size); - - /* Success */ - return (0); -} - - - -/* - * Initialize the "a_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_a_info(void) -{ - int fd; - - int mode = 0644; - - errr err = 0; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the "header" ***/ - - /* Allocate the "header" */ - MAKE(a_head, header); - - /* Save the "version" */ - a_head->v_major = FAKE_VER_MAJOR; - a_head->v_minor = FAKE_VER_MINOR; - a_head->v_patch = FAKE_VER_PATCH; - a_head->v_extra = 0; - - /* Save the "record" information */ - a_head->info_num = max_a_idx; - a_head->info_len = sizeof(artifact_type); - - /* Save the size of "a_head" and "a_info" */ - a_head->head_size = sizeof(header); - a_head->info_size = a_head->info_num * a_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "a_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "a_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "a_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_a_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "a_name" and "a_text" */ - fake_name_size = FAKE_NAME_SIZE; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = FAKE_NAME_SIZE; -#endif - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "a_info" array */ - C_MAKE(a_info, a_head->info_num, artifact_type); - - /* Hack -- make "fake" arrays */ - C_MAKE(a_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_MAKE(E_a_name, E_fake_name_size, char); -#endif - C_MAKE(a_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "a_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'a_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'a_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_a_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = ((err > 0) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'a_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'a_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'a_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'a_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "a_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "a_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(a_head), a_head->head_size); - - /* Dump the "a_info" array */ - fd_write(fd, (char*)(a_info), a_head->info_size); - - /* Dump the "a_name" array */ - fd_write(fd, (char*)(a_name), a_head->name_size); - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Dump the "E_a_name" array */ - fd_write(fd, (char*)(E_a_name), a_head->E_name_size); -#endif - /* Dump the "a_text" array */ - fd_write(fd, (char*)(a_text), a_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "a_info" array */ - C_KILL(a_info, a_head->info_num, artifact_type); - - /* Hack -- Free the "fake" arrays */ - C_KILL(a_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_KILL(E_a_name, E_fake_name_size, char); -#endif - C_KILL(a_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = 0; -#endif - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "a_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "a_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'a_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot open 'a_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_a_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'a_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'a_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - - -/* - * Initialize the "e_info" array, by parsing a binary "image" file - */ -static errr init_e_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != e_head->v_major) || - (test.v_minor != e_head->v_minor) || - (test.v_patch != e_head->v_patch) || - (test.v_extra != e_head->v_extra) || - (test.info_num != e_head->info_num) || - (test.info_len != e_head->info_len) || - (test.head_size != e_head->head_size) || - (test.info_size != e_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*e_head) = test; - - - /* Allocate the "e_info" array */ - C_MAKE(e_info, e_head->info_num, ego_item_type); - - /* Read the "e_info" array */ - fd_read(fd, (char*)(e_info), e_head->info_size); - - - /* Allocate the "e_name" array */ - C_MAKE(e_name, e_head->name_size, char); - - /* Read the "e_name" array */ - fd_read(fd, (char*)(e_name), e_head->name_size); - - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Allocate the "E_e_name" array */ - C_MAKE(E_e_name, e_head->E_name_size, char); - - /* Read the "E_e_name" array */ - fd_read(fd, (char*)(E_e_name), e_head->E_name_size); -#endif -#ifndef DELAY_LOAD_E_TEXT - - /* Allocate the "e_text" array */ - C_MAKE(e_text, e_head->text_size, char); - - /* Read the "e_text" array */ - fd_read(fd, (char*)(e_text), e_head->text_size); - -#endif /* DELAY_LOAD_E_TEXT */ - - - /* Success */ - return (0); -} - - - -/* - * Initialize the "e_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_e_info(void) -{ - int fd; - - int mode = 0644; - - errr err = 0; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the "header" ***/ - - /* Allocate the "header" */ - MAKE(e_head, header); - - /* Save the "version" */ - e_head->v_major = FAKE_VER_MAJOR; - e_head->v_minor = FAKE_VER_MINOR; - e_head->v_patch = FAKE_VER_PATCH; - e_head->v_extra = 0; - - /* Save the "record" information */ - e_head->info_num = max_e_idx; - e_head->info_len = sizeof(ego_item_type); - - /* Save the size of "e_head" and "e_info" */ - e_head->head_size = sizeof(header); - e_head->info_size = e_head->info_num * e_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "e_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "e_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { - -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "e_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_e_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "e_name" and "e_text" */ - fake_name_size = FAKE_NAME_SIZE; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = FAKE_NAME_SIZE; -#endif - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "e_info" array */ - C_MAKE(e_info, e_head->info_num, ego_item_type); - - /* Hack -- make "fake" arrays */ - C_MAKE(e_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_MAKE(E_e_name, E_fake_name_size, char); -#endif - C_MAKE(e_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "e_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'e_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'e_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_e_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = ((err > 0) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'e_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'e_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'e_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'e_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "e_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "e_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(e_head), e_head->head_size); - - /* Dump the "e_info" array */ - fd_write(fd, (char*)(e_info), e_head->info_size); - - /* Dump the "e_name" array */ - fd_write(fd, (char*)(e_name), e_head->name_size); - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Dump the "E_e_name" array */ - fd_write(fd, (char*)(E_e_name), e_head->E_name_size); -#endif - /* Dump the "e_text" array */ - fd_write(fd, (char*)(e_text), e_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "e_info" array */ - C_KILL(e_info, e_head->info_num, ego_item_type); - - /* Hack -- Free the "fake" arrays */ - C_KILL(e_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_KILL(E_e_name, E_fake_name_size, char); -#endif - C_KILL(e_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = 0; -#endif - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "e_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "e_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'e_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'e_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_e_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'e_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'e_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - - -/* - * Initialize the "r_info" array, by parsing a binary "image" file - */ -static errr init_r_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != r_head->v_major) || - (test.v_minor != r_head->v_minor) || - (test.v_patch != r_head->v_patch) || - (test.v_extra != r_head->v_extra) || - (test.info_num != r_head->info_num) || - (test.info_len != r_head->info_len) || - (test.head_size != r_head->head_size) || - (test.info_size != r_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*r_head) = test; - - - /* Allocate the "r_info" array */ - C_MAKE(r_info, r_head->info_num, monster_race); - - /* Read the "r_info" array */ - fd_read(fd, (char*)(r_info), r_head->info_size); - - - /* Allocate the "r_name" array */ - C_MAKE(r_name, r_head->name_size, char); - - /* Read the "r_name" array */ - fd_read(fd, (char*)(r_name), r_head->name_size); - - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Allocate the "E_r_name" array */ - C_MAKE(E_r_name, r_head->E_name_size, char); - - /* Read the "E_r_name" array */ - fd_read(fd, (char*)(E_r_name), r_head->E_name_size); -#endif -#ifndef DELAY_LOAD_R_TEXT - - /* Allocate the "r_text" array */ - C_MAKE(r_text, r_head->text_size, char); - - /* Read the "r_text" array */ - fd_read(fd, (char*)(r_text), r_head->text_size); - -#endif /* DELAY_LOAD_R_TEXT */ - - /* Success */ - return (0); -} - - - -/* - * Initialize the "r_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_r_info(void) -{ - int fd; - - int mode = 0644; - - errr err = 0; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the header ***/ - - /* Allocate the "header" */ - MAKE(r_head, header); - - /* Save the "version" */ - r_head->v_major = FAKE_VER_MAJOR; - r_head->v_minor = FAKE_VER_MINOR; - r_head->v_patch = FAKE_VER_PATCH; - r_head->v_extra = 0; - - /* Save the "record" information */ - r_head->info_num = max_r_idx; - r_head->info_len = sizeof(monster_race); - - /* Save the size of "r_head" and "r_info" */ - r_head->head_size = sizeof(header); - r_head->info_size = r_head->info_num * r_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "r_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "r_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "r_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_r_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Assume the size of "r_name" and "r_text" */ - fake_name_size = FAKE_NAME_SIZE; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = FAKE_NAME_SIZE; -#endif - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "r_info" array */ - C_MAKE(r_info, r_head->info_num, monster_race); - - /* Hack -- make "fake" arrays */ - C_MAKE(r_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_MAKE(E_r_name, E_fake_name_size, char); -#endif - C_MAKE(r_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "r_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'r_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'r_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_r_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = ((err > 0) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'r_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'r_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'r_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'r_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "r_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "r_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(r_head), r_head->head_size); - - /* Dump the "r_info" array */ - fd_write(fd, (char*)(r_info), r_head->info_size); - - /* Dump the "r_name" array */ - fd_write(fd, (char*)(r_name), r_head->name_size); - -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - /* Dump the "E_r_name" array */ - fd_write(fd, (char*)(E_r_name), r_head->E_name_size); -#endif - /* Dump the "r_text" array */ - fd_write(fd, (char*)(r_text), r_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "r_info" array */ - C_KILL(r_info, r_head->info_num, monster_race); - - /* Hack -- Free the "fake" arrays */ - C_KILL(r_name, fake_name_size, char); -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - C_KILL(E_r_name, E_fake_name_size, char); -#endif - C_KILL(r_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; -#ifdef JP - /* ±Ñ¸ì̾ÍÑ */ - E_fake_name_size = 0; -#endif - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "r_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "r_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'r_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'r_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_r_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'r_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'r_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - - -/* - * Initialize the "d_info" array, by parsing a binary "image" file - */ -static errr init_d_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != d_head->v_major) || - (test.v_minor != d_head->v_minor) || - (test.v_patch != d_head->v_patch) || - (test.v_extra != d_head->v_extra) || - (test.info_num != d_head->info_num) || - (test.info_len != d_head->info_len) || - (test.head_size != d_head->head_size) || - (test.info_size != d_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*d_head) = test; - - - /* Allocate the "d_info" array */ - C_MAKE(d_info, d_head->info_num, dungeon_info_type); - - /* Read the "d_info" array */ - fd_read(fd, (char*)(d_info), d_head->info_size); - - - /* Allocate the "d_name" array */ - C_MAKE(d_name, d_head->name_size, char); - - /* Read the "d_name" array */ - fd_read(fd, (char*)(d_name), d_head->name_size); - - -#ifndef DELAY_LOAD_D_TEXT - - /* Allocate the "d_text" array */ - C_MAKE(d_text, d_head->text_size, char); - - /* Read the "d_text" array */ - fd_read(fd, (char*)(d_text), d_head->text_size); - -#endif /* DELAY_LOAD_D_TEXT */ - - - /* Success */ - return (0); -} - - - -/* - * Initialize the "d_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_d_info(void) -{ - int fd; - - int mode = 0644; - - errr err = 0; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the "header" ***/ - - /* Allocate the "header" */ - MAKE(d_head, header); - - /* Save the "version" */ - d_head->v_major = FAKE_VER_MAJOR; - d_head->v_minor = FAKE_VER_MINOR; - d_head->v_patch = FAKE_VER_PATCH; - d_head->v_extra = 0; - - /* Save the "record" information */ - d_head->info_num = max_d_idx; - d_head->info_len = sizeof(dungeon_info_type); - - /* Save the size of "d_head" and "d_info" */ - d_head->head_size = sizeof(header); - d_head->info_size = d_head->info_num * d_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "d_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "d_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { - -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "d_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_d_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "d_name" and "d_text" */ - fake_name_size = FAKE_NAME_SIZE; - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "d_info" array */ - C_MAKE(d_info, d_head->info_num, dungeon_info_type); - - /* Hack -- make "fake" arrays */ - C_MAKE(d_name, fake_name_size, char); - C_MAKE(d_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "d_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'d_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'd_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_d_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = ((err > 0) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'d_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'d_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'd_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'd_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "d_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "d_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(d_head), d_head->head_size); - - /* Dump the "d_info" array */ - fd_write(fd, (char*)(d_info), d_head->info_size); - - /* Dump the "d_name" array */ - fd_write(fd, (char*)(d_name), d_head->name_size); - - /* Dump the "d_text" array */ - fd_write(fd, (char*)(d_text), d_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "d_info" array */ - C_KILL(d_info, d_head->info_num, dungeon_info_type); - - /* Hack -- Free the "fake" arrays */ - C_KILL(d_name, fake_name_size, char); - C_KILL(d_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "d_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "d_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'d_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'd_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_d_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'d_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'd_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - - -/* - * Initialize the "v_info" array, by parsing a binary "image" file - */ -static errr init_v_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != v_head->v_major) || - (test.v_minor != v_head->v_minor) || - (test.v_patch != v_head->v_patch) || - (test.v_extra != v_head->v_extra) || - (test.info_num != v_head->info_num) || - (test.info_len != v_head->info_len) || - (test.head_size != v_head->head_size) || - (test.info_size != v_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*v_head) = test; - - - /* Allocate the "v_info" array */ - C_MAKE(v_info, v_head->info_num, vault_type); - - /* Read the "v_info" array */ - fd_read(fd, (char*)(v_info), v_head->info_size); - - - /* Allocate the "v_name" array */ - C_MAKE(v_name, v_head->name_size, char); - - /* Read the "v_name" array */ - fd_read(fd, (char*)(v_name), v_head->name_size); - - -#ifndef DELAY_LOAD_V_TEXT - - /* Allocate the "v_text" array */ - C_MAKE(v_text, v_head->text_size, char); - - /* Read the "v_text" array */ - fd_read(fd, (char*)(v_text), v_head->text_size); - -#endif /* DELAY_LOAD_V_TEXT */ - - /* Success */ - return (0); -} - - -/* - * Initialize the "v_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -errr init_v_info(void) -{ - int fd; - - int mode = 0644; - - errr err; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the header ***/ - - /* Allocate the "header" */ - MAKE(v_head, header); - - /* Save the "version" */ - v_head->v_major = FAKE_VER_MAJOR; - v_head->v_minor = FAKE_VER_MINOR; - v_head->v_patch = FAKE_VER_PATCH; - v_head->v_extra = 0; - - /* Save the "record" information */ - v_head->info_num = max_v_idx; - v_head->info_len = sizeof(vault_type); - - /* Save the size of "v_head" and "v_info" */ - v_head->head_size = sizeof(header); - v_head->info_size = v_head->info_num * v_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "v_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "v_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "v_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_v_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "v_name" and "v_text" */ - fake_name_size = FAKE_NAME_SIZE; - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "k_info" array */ - C_MAKE(v_info, v_head->info_num, vault_type); - - /* Hack -- make "fake" arrays */ - C_MAKE(v_name, fake_name_size, char); - C_MAKE(v_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "v_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'v_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'v_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_v_info_txt(fp, buf, TRUE); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'v_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'v_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'v_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'v_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "v_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "v_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(v_head), v_head->head_size); - - /* Dump the "v_info" array */ - fd_write(fd, (char*)(v_info), v_head->info_size); - - /* Dump the "v_name" array */ - fd_write(fd, (char*)(v_name), v_head->name_size); - - /* Dump the "v_text" array */ - fd_write(fd, (char*)(v_text), v_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "v_info" array */ - C_KILL(v_info, v_head->info_num, vault_type); - - /* Hack -- Free the "fake" arrays */ - C_KILL(v_name, fake_name_size, char); - C_KILL(v_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "v_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "v_info.raw"); -#endif - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'v_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'v_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_v_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'v_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'v_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - -/* - * Initialize the "we_info" array, by parsing a binary "image" file - */ -static errr init_we_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != we_head->v_major) || - (test.v_minor != we_head->v_minor) || - (test.v_patch != we_head->v_patch) || - (test.v_extra != we_head->v_extra) || - (test.info_num != we_head->info_num) || - (test.info_len != we_head->info_len) || - (test.head_size != we_head->head_size) || - (test.info_size != we_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*we_head) = test; - - - /* Allocate the "we_info" array */ - C_MAKE(we_info, we_head->info_num, weapon_exp_table); - - /* Read the "we_info" array */ - fd_read(fd, (char*)(we_info), we_head->info_size); - - - /* Allocate the "we_name" array */ - C_MAKE(we_name, we_head->name_size, char); - - /* Read the "we_name" array */ - fd_read(fd, (char*)(we_name), we_head->name_size); - - - /* Allocate the "we_text" array */ - C_MAKE(we_text, we_head->text_size, char); - - /* Read the "we_text" array */ - fd_read(fd, (char*)(we_text), we_head->text_size); - - /* Success */ - return (0); -} - - -/* - * Initialize the "we_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_we_info(void) -{ - int fd; - - int mode = 0644; - - errr err; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the header ***/ - - /* Allocate the "header" */ - MAKE(we_head, header); - - /* Save the "version" */ - we_head->v_major = FAKE_VER_MAJOR; - we_head->v_minor = FAKE_VER_MINOR; - we_head->v_patch = FAKE_VER_PATCH; - we_head->v_extra = 0; - - /* Save the "record" information */ - we_head->info_num = MAX_CLASS; - we_head->info_len = sizeof(weapon_exp_table); - - /* Save the size of "we_head" and "we_info" */ - we_head->head_size = sizeof(header); - we_head->info_size = we_head->info_num * we_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "we_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "we_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "we_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_we_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "we_name" and "we_text" */ - fake_name_size = FAKE_NAME_SIZE; - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "we_info" array */ - C_MAKE(we_info, we_head->info_num, weapon_exp_table); - - /* Hack -- make "fake" arrays */ - C_MAKE(we_name, fake_name_size, char); - C_MAKE(we_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "we_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'we_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'we_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_we_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'we_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'we_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'we_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'we_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "we_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "we_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(we_head), we_head->head_size); - - /* Dump the "we_info" array */ - fd_write(fd, (char*)(we_info), we_head->info_size); - - /* Dump the "we_name" array */ - fd_write(fd, (char*)(we_name), we_head->name_size); - - /* Dump the "we_text" array */ - fd_write(fd, (char*)(we_text), we_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "we_info" array */ - C_KILL(we_info, we_head->info_num, weapon_exp_table); - - /* Hack -- Free the "fake" arrays */ - C_KILL(we_name, fake_name_size, char); - C_KILL(we_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "we_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "we_info.raw"); -#endif - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'we_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'we_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_we_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'we_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'we_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - -/* - * Initialize the "se_info" array, by parsing a binary "image" file - */ -static errr init_se_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != se_head->v_major) || - (test.v_minor != se_head->v_minor) || - (test.v_patch != se_head->v_patch) || - (test.v_extra != se_head->v_extra) || - (test.info_num != se_head->info_num) || - (test.info_len != se_head->info_len) || - (test.head_size != se_head->head_size) || - (test.info_size != se_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*se_head) = test; - - - /* Allocate the "se_info" array */ - C_MAKE(se_info, se_head->info_num, skill_exp_table); - - /* Read the "se_info" array */ - fd_read(fd, (char*)(se_info), se_head->info_size); - - - /* Allocate the "se_name" array */ - C_MAKE(se_name, se_head->name_size, char); - - /* Read the "se_name" array */ - fd_read(fd, (char*)(se_name), se_head->name_size); - - - /* Allocate the "se_text" array */ - C_MAKE(se_text, se_head->text_size, char); - - /* Read the "se_text" array */ - fd_read(fd, (char*)(se_text), se_head->text_size); - - /* Success */ - return (0); -} - - -/* - * Initialize the "se_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). - */ -static errr init_se_info(void) -{ - int fd; - - int mode = 0644; - - errr err; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the header ***/ - - /* Allocate the "header" */ - MAKE(se_head, header); - - /* Save the "version" */ - se_head->v_major = FAKE_VER_MAJOR; - se_head->v_minor = FAKE_VER_MINOR; - se_head->v_patch = FAKE_VER_PATCH; - se_head->v_extra = 0; - - /* Save the "record" information */ - se_head->info_num = MAX_CLASS; - se_head->info_len = sizeof(skill_exp_table); - - /* Save the size of "se_head" and "se_info" */ - se_head->head_size = sizeof(header); - se_head->info_size = se_head->info_num * se_head->info_len; - - -#ifdef ALLOW_TEMPLATES - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "se_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "se_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "se_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_se_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "se_name" and "se_text" */ - fake_name_size = FAKE_NAME_SIZE; - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "se_info" array */ - C_MAKE(se_info, se_head->info_num, skill_exp_table); - - /* Hack -- make "fake" arrays */ - C_MAKE(se_name, fake_name_size, char); - C_MAKE(se_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "se_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'se_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'se_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_se_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'se_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'se_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'se_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'se_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "se_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "se_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(se_head), se_head->head_size); - - /* Dump the "se_info" array */ - fd_write(fd, (char*)(se_info), se_head->info_size); - - /* Dump the "se_name" array */ - fd_write(fd, (char*)(se_name), se_head->name_size); - - /* Dump the "se_text" array */ - fd_write(fd, (char*)(se_text), se_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "se_info" array */ - C_KILL(se_info, se_head->info_num, skill_exp_table); - - /* Hack -- Free the "fake" arrays */ - C_KILL(se_name, fake_name_size, char); - C_KILL(se_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; - fake_text_size = 0; - -#endif /* ALLOW_TEMPLATES */ - - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "se_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "se_info.raw"); -#endif - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'se_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'se_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_se_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'se_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'se_info.raw' file."); -#endif - - - /* Success */ - return (0); -} - - -/* - * Initialize the "m_info" array, by parsing a binary "image" file - */ -static errr init_m_info_raw(int fd) -{ - header test; - - /* Read and Verify the header */ - if (fd_read(fd, (char*)(&test), sizeof(header)) || - (test.v_major != m_head->v_major) || - (test.v_minor != m_head->v_minor) || - (test.v_patch != m_head->v_patch) || - (test.v_extra != m_head->v_extra) || - (test.info_num != m_head->info_num) || - (test.info_len != m_head->info_len) || - (test.head_size != m_head->head_size) || - (test.info_size != m_head->info_size)) - { - /* Error */ - return (-1); - } - - - /* Accept the header */ - (*m_head) = test; - - - /* Allocate the "m_info" array */ - C_MAKE(m_info, m_head->info_num, player_magic); - - /* Read the "m_info" array */ - fd_read(fd, (char*)(m_info), m_head->info_size); - - - /* Allocate the "m_name" array */ - C_MAKE(m_name, m_head->name_size, char); - - /* Read the "m_name" array */ - fd_read(fd, (char*)(m_name), m_head->name_size); - - - /* Allocate the "m_text" array */ - C_MAKE(m_text, m_head->text_size, char); - - /* Read the "m_text" array */ - fd_read(fd, (char*)(m_text), m_head->text_size); - - /* Success */ - return (0); -} - - -/* +/*! + * @brief 職業魔法情報読み込みのメインルーチン / * Initialize the "m_info" array - * - * Note that we let each entry have a unique "name" and "text" string, - * even if the string happens to be empty (everyone has a unique '\0'). + * @return エラーコード */ static errr init_m_info(void) { - int fd; - - int mode = 0644; - - errr err; - - FILE *fp; - - /* General buffer */ - char buf[1024]; - - - /*** Make the header ***/ - - /* Allocate the "header" */ - MAKE(m_head, header); - - /* Save the "version" */ - m_head->v_major = FAKE_VER_MAJOR; - m_head->v_minor = FAKE_VER_MINOR; - m_head->v_patch = FAKE_VER_PATCH; - m_head->v_extra = 0; - - /* Save the "record" information */ - m_head->info_num = MAX_CLASS; - m_head->info_len = sizeof(player_magic); - - /* Save the size of "m_head" and "m_info" */ - m_head->head_size = sizeof(header); - m_head->info_size = m_head->info_num * m_head->info_len; - + /* Init the header */ + init_header(&m_head, MAX_CLASS, sizeof(player_magic)); #ifdef ALLOW_TEMPLATES - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "m_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "m_info.raw"); -#endif - - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ - if (fd >= 0) - { -#ifdef CHECK_MODIFICATION_TIME - - err = check_modification_date(fd, "m_info_j.txt"); - -#endif /* CHECK_MODIFICATION_TIME */ - - /* Attempt to parse the "raw" file */ - if (!err) - err = init_m_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Success */ - if (!err) return (0); - } - - - /*** Make the fake arrays ***/ - - /* Fake the size of "m_name" and "m_text" */ - fake_name_size = FAKE_NAME_SIZE; - fake_text_size = FAKE_TEXT_SIZE; - - /* Allocate the "m_info" array */ - C_MAKE(m_info, m_head->info_num, player_magic); - - /* Hack -- make "fake" arrays */ - C_MAKE(m_name, fake_name_size, char); - C_MAKE(m_text, fake_text_size, char); - - - /*** Load the ascii template file ***/ - - /* Build the filename */ - - path_build(buf, 1024, ANGBAND_DIR_EDIT, "m_info_j.txt"); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* Parse it */ -#ifdef JP - if (!fp) quit("'m_info_j.txt'¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (!fp) quit("Cannot open 'm_info.txt' file."); -#endif - - - /* Parse the file */ - err = init_m_info_txt(fp, buf); - - /* Close it */ - my_fclose(fp); - - /* Errors */ - if (err) - { - cptr oops; - -#ifdef JP - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "̤ÃΤÎ"); - - /* Oops */ - msg_format("'m_info_j.txt'¥Õ¥¡¥¤¥ë¤Î %d ¹ÔÌܤ˥¨¥é¡¼¡£", error_line); - msg_format("¥ì¥³¡¼¥É %d ¤Ï '%s' ¥¨¥é¡¼¤¬¤¢¤ê¤Þ¤¹¡£", error_idx, oops); - msg_format("¹½Ê¸ '%s'¡£", buf); - msg_print(NULL); - - /* Quit */ - quit("'m_info_j.txt'¥Õ¥¡¥¤¥ë¤Ë¥¨¥é¡¼"); -#else - /* Error string */ - oops = (((err > 0) && (err < PARSE_ERROR_MAX)) ? err_str[err] : "unknown"); - - /* Oops */ - msg_format("Error %d at line %d of 'm_info.txt'.", err, error_line); - msg_format("Record %d contains a '%s' error.", error_idx, oops); - msg_format("Parsing '%s'.", buf); - msg_print(NULL); - - /* Quit */ - quit("Error in 'm_info.txt' file."); -#endif - - } - - - /*** Dump the binary image file ***/ - - /* File type is "DATA" */ - FILE_TYPE(FILE_TYPE_DATA); - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "m_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "m_info.raw"); -#endif - - - /* Kill the old file */ - (void)fd_kill(buf); - - /* Attempt to create the raw file */ - fd = fd_make(buf, mode); - - /* Dump to the file */ - if (fd >= 0) - { - /* Dump it */ - fd_write(fd, (char*)(m_head), m_head->head_size); - - /* Dump the "m_info" array */ - fd_write(fd, (char*)(m_info), m_head->info_size); - - /* Dump the "m_name" array */ - fd_write(fd, (char*)(m_name), m_head->name_size); - - /* Dump the "m_text" array */ - fd_write(fd, (char*)(m_text), m_head->text_size); - - /* Close */ - (void)fd_close(fd); - } - - - /*** Kill the fake arrays ***/ - - /* Free the "m_info" array */ - C_KILL(m_info, m_head->info_num, player_magic); - - /* Hack -- Free the "fake" arrays */ - C_KILL(m_name, fake_name_size, char); - C_KILL(m_text, fake_text_size, char); - - /* Forget the array sizes */ - fake_name_size = 0; - fake_text_size = 0; + /* Save a pointer to the parsing function */ + m_head.parse_info_txt = parse_m_info; #endif /* ALLOW_TEMPLATES */ - - /*** Load the binary image file ***/ - - /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_DATA, "m_info_j.raw"); -#else - path_build(buf, 1024, ANGBAND_DIR_DATA, "m_info.raw"); -#endif - - /* Attempt to open the "raw" file */ - fd = fd_open(buf, O_RDONLY); - - /* Process existing "raw" file */ -#ifdef JP - if (fd < 0) quit("'m_info_j.raw'¥Õ¥¡¥¤¥ë¤ò¥í¡¼¥É¤Ç¤­¤Þ¤»¤ó¡£"); -#else - if (fd < 0) quit("Cannot load 'm_info.raw' file."); -#endif - - - /* Attempt to parse the "raw" file */ - err = init_m_info_raw(fd); - - /* Close it */ - (void)fd_close(fd); - - /* Error */ -#ifdef JP - if (err) quit("'m_info_j.raw'¥Õ¥¡¥¤¥ë¤ò²òÀϤǤ­¤Þ¤»¤ó¡£"); -#else - if (err) quit("Cannot parse 'm_info.raw' file."); -#endif - - - /* Success */ - return (0); + return init_info("m_info", &m_head, + (void*)&m_info, NULL, NULL, NULL); } /*** Initialize others ***/ -/* - * Hack -- Objects sold in the stores -- by tval/sval pair. +/*! + * 店舗で販売するオブジェクトを定義する / Hack -- Objects sold in the stores -- by tval/sval pair. */ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { @@ -3518,16 +913,14 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_FOOD, SV_FOOD_RATION }, { TV_FOOD, SV_FOOD_RATION }, - { TV_LITE, SV_LITE_TORCH }, - { TV_LITE, SV_LITE_TORCH }, + { TV_POTION, SV_POTION_WATER }, + { TV_POTION, SV_POTION_WATER }, { TV_LITE, SV_LITE_LANTERN }, { TV_LITE, SV_LITE_LANTERN }, - { TV_FLASK, 0 }, - { TV_FLASK, 0 }, - + { TV_FOOD, SV_FOOD_WAYBREAD }, + { TV_FOOD, SV_FOOD_WAYBREAD }, { TV_CAPTURE, 0 }, - { TV_FIGURINE, 0 }, { TV_SHOT, SV_AMMO_NORMAL }, @@ -3633,30 +1026,30 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_BOW, SV_SLING }, { TV_BOW, SV_SHORT_BOW }, - { TV_BOW, SV_LONG_BOW }, { TV_BOW, SV_LIGHT_XBOW }, { TV_SHOT, SV_AMMO_NORMAL }, { TV_SHOT, SV_AMMO_NORMAL }, - { TV_ARROW, SV_AMMO_NORMAL }, + { TV_ARROW, SV_AMMO_NORMAL }, { TV_BOLT, SV_AMMO_NORMAL }, { TV_BOLT, SV_AMMO_NORMAL }, - - { TV_BOW, SV_LONG_BOW }, { TV_BOW, SV_LIGHT_XBOW }, + { TV_ARROW, SV_AMMO_NORMAL }, { TV_BOLT, SV_AMMO_NORMAL }, - { TV_BOW, SV_SHORT_BOW }, + { TV_BOW, SV_LIGHT_XBOW }, + { TV_SWORD, SV_DAGGER }, { TV_SWORD, SV_TANTO }, { TV_SWORD, SV_RAPIER }, - { TV_SWORD, SV_SMALL_SWORD }, + { TV_SWORD, SV_SHORT_SWORD }, { TV_SWORD, SV_LONG_SWORD }, { TV_SWORD, SV_SCIMITAR }, + { TV_SWORD, SV_BROAD_SWORD }, { TV_HISSATSU_BOOK, 0 }, { TV_HISSATSU_BOOK, 0 }, @@ -3699,14 +1092,14 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_LIFE_BOOK, 0 }, { TV_LIFE_BOOK, 0 }, - { TV_LIFE_BOOK, 0 }, - { TV_LIFE_BOOK, 0 }, - - { TV_LIFE_BOOK, 1 }, - { TV_LIFE_BOOK, 1 }, { TV_LIFE_BOOK, 1 }, { TV_LIFE_BOOK, 1 }, + { TV_CRUSADE_BOOK, 0 }, + { TV_CRUSADE_BOOK, 0 }, + { TV_CRUSADE_BOOK, 1 }, + { TV_CRUSADE_BOOK, 1 }, + { TV_HAFTED, SV_WHIP }, { TV_HAFTED, SV_MACE }, { TV_HAFTED, SV_BALL_AND_CHAIN }, @@ -3754,7 +1147,7 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_SCROLL, SV_SCROLL_DETECT_INVIS }, { TV_SCROLL, SV_SCROLL_RECHARGING }, - { TV_SCROLL, SV_SCROLL_SATISFY_HUNGER }, + { TV_SCROLL, SV_SCROLL_TELEPORT }, { TV_SCROLL, SV_SCROLL_WORD_OF_RECALL }, { TV_SCROLL, SV_SCROLL_WORD_OF_RECALL }, @@ -3788,9 +1181,9 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_SCROLL, SV_SCROLL_ENCHANT_ARMOR }, { TV_SCROLL, SV_SCROLL_RECHARGING }, - { TV_SCROLL, SV_SCROLL_SATISFY_HUNGER }, - { TV_SCROLL, SV_SCROLL_SATISFY_HUNGER }, - { TV_SCROLL, SV_SCROLL_SATISFY_HUNGER } + { TV_SCROLL, SV_SCROLL_PHASE_DOOR }, + { TV_SCROLL, SV_SCROLL_ENCHANT_WEAPON_TO_HIT }, + { TV_SCROLL, SV_SCROLL_ENCHANT_WEAPON_TO_DAM }, }, @@ -3798,7 +1191,7 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = /* Magic-User store */ { TV_RING, SV_RING_PROTECTION }, - { TV_RING, SV_RING_FEATHER_FALL }, + { TV_RING, SV_RING_LEVITATION_FALL }, { TV_RING, SV_RING_PROTECTION }, { TV_RING, SV_RING_RESIST_FIRE }, @@ -3964,10 +1357,10 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_ARCANE_BOOK, 2 }, { TV_ARCANE_BOOK, 3 }, - { TV_ENCHANT_BOOK, 0 }, - { TV_ENCHANT_BOOK, 0 }, - { TV_ENCHANT_BOOK, 1 }, - { TV_ENCHANT_BOOK, 1 }, + { TV_CRAFT_BOOK, 0 }, + { TV_CRAFT_BOOK, 0 }, + { TV_CRAFT_BOOK, 1 }, + { TV_CRAFT_BOOK, 1 }, { TV_DAEMON_BOOK, 0 }, { TV_DAEMON_BOOK, 0 }, @@ -3978,6 +1371,11 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = { TV_MUSIC_BOOK, 0 }, { TV_MUSIC_BOOK, 1 }, { TV_MUSIC_BOOK, 1 }, + + { TV_HEX_BOOK, 0 }, + { TV_HEX_BOOK, 0 }, + { TV_HEX_BOOK, 1 }, + { TV_HEX_BOOK, 1 }, }, { @@ -4018,20 +1416,24 @@ static byte store_table[MAX_STORES][STORE_CHOICES][2] = }; -/* +/*! + * @brief 基本情報読み込みのメインルーチン / * Initialize misc. values + * @return エラーコード */ static errr init_misc(void) { /* Initialize the values */ - process_dungeon_file("misc_j.txt", 0, 0, 0, 0); + process_dungeon_file("misc.txt", 0, 0, 0, 0); return 0; } -/* +/*! + * @brief 町情報読み込みのメインルーチン / * Initialize town array + * @return エラーコード */ static errr init_towns(void) { @@ -4060,9 +1462,9 @@ static errr init_towns(void) /* Assume full stock */ /* - * ²æ¤¬²È¤¬ 20 ¥Ú¡¼¥¸¤Þ¤Ç»È¤¨¤ë±£¤·µ¡Ç½¤Î¤¿¤á¤Î½àÈ÷¡£ - * ¥ª¥×¥·¥ç¥ó¤¬Í­¸ú¤Ç¤â¤½¤¦¤Ç¤Ê¤¯¤Æ¤â°ì±þ¥¹¥Ú¡¼¥¹ - * ¤òºî¤Ã¤Æ¤ª¤¯¡£ + * 我が家が 20 ページまで使える隠し機能のための準備。 + * オプションが有効でもそうでなくても一応スペース + * を作っておく。 */ if (j == STORE_HOME) { @@ -4120,8 +1522,10 @@ static errr init_towns(void) return 0; } -/* +/*! + * @brief 店情報初期化のメインルーチン / * Initialize buildings + * @return エラーコード */ errr init_buildings(void) { @@ -4163,8 +1567,10 @@ errr init_buildings(void) } -/* +/*! + * @brief クエスト情報初期化のメインルーチン / * Initialize quest array + * @return エラーコード */ static errr init_quests(void) { @@ -4184,9 +1590,176 @@ static errr init_quests(void) return 0; } +/*! 地形タグ情報から地形IDを得られなかった場合にTRUEを返すグローバル変数 */ +static bool feat_tag_is_not_found = FALSE; -/* +/*! + * @brief 地形タグからIDを得る / + * Initialize quest array + * @return 地形ID + */ +s16b f_tag_to_index_in_init(cptr str) +{ + s16b feat = f_tag_to_index(str); + + if (feat < 0) feat_tag_is_not_found = TRUE; + + return feat; +} + + +/*! + * @brief 地形の汎用定義をタグを通じて取得する / + * Initialize feature variables + * @return エラーコード + */ +static errr init_feat_variables(void) +{ + FEAT_IDX i; + + /* Nothing */ + feat_none = f_tag_to_index_in_init("NONE"); + + /* Floor */ + feat_floor = f_tag_to_index_in_init("FLOOR"); + + /* Objects */ + feat_glyph = f_tag_to_index_in_init("GLYPH"); + feat_explosive_rune = f_tag_to_index_in_init("EXPLOSIVE_RUNE"); + feat_mirror = f_tag_to_index_in_init("MIRROR"); + + /* Doors */ + feat_door[DOOR_DOOR].open = f_tag_to_index_in_init("OPEN_DOOR"); + feat_door[DOOR_DOOR].broken = f_tag_to_index_in_init("BROKEN_DOOR"); + feat_door[DOOR_DOOR].closed = f_tag_to_index_in_init("CLOSED_DOOR"); + + /* Locked doors */ + for (i = 1; i < MAX_LJ_DOORS; i++) + { + s16b door = f_tag_to_index(format("LOCKED_DOOR_%d", i)); + if (door < 0) break; + feat_door[DOOR_DOOR].locked[i - 1] = door; + } + if (i == 1) return PARSE_ERROR_UNDEFINED_TERRAIN_TAG; + feat_door[DOOR_DOOR].num_locked = i - 1; + + /* Jammed doors */ + for (i = 0; i < MAX_LJ_DOORS; i++) + { + s16b door = f_tag_to_index(format("JAMMED_DOOR_%d", i)); + if (door < 0) break; + feat_door[DOOR_DOOR].jammed[i] = door; + } + if (!i) return PARSE_ERROR_UNDEFINED_TERRAIN_TAG; + feat_door[DOOR_DOOR].num_jammed = i; + + /* Glass doors */ + feat_door[DOOR_GLASS_DOOR].open = f_tag_to_index_in_init("OPEN_GLASS_DOOR"); + feat_door[DOOR_GLASS_DOOR].broken = f_tag_to_index_in_init("BROKEN_GLASS_DOOR"); + feat_door[DOOR_GLASS_DOOR].closed = f_tag_to_index_in_init("CLOSED_GLASS_DOOR"); + + /* Locked glass doors */ + for (i = 1; i < MAX_LJ_DOORS; i++) + { + s16b door = f_tag_to_index(format("LOCKED_GLASS_DOOR_%d", i)); + if (door < 0) break; + feat_door[DOOR_GLASS_DOOR].locked[i - 1] = door; + } + if (i == 1) return PARSE_ERROR_UNDEFINED_TERRAIN_TAG; + feat_door[DOOR_GLASS_DOOR].num_locked = i - 1; + + /* Jammed glass doors */ + for (i = 0; i < MAX_LJ_DOORS; i++) + { + s16b door = f_tag_to_index(format("JAMMED_GLASS_DOOR_%d", i)); + if (door < 0) break; + feat_door[DOOR_GLASS_DOOR].jammed[i] = door; + } + if (!i) return PARSE_ERROR_UNDEFINED_TERRAIN_TAG; + feat_door[DOOR_GLASS_DOOR].num_jammed = i; + + /* Curtains */ + feat_door[DOOR_CURTAIN].open = f_tag_to_index_in_init("OPEN_CURTAIN"); + feat_door[DOOR_CURTAIN].broken = feat_door[DOOR_CURTAIN].open; + feat_door[DOOR_CURTAIN].closed = f_tag_to_index_in_init("CLOSED_CURTAIN"); + feat_door[DOOR_CURTAIN].locked[0] = feat_door[DOOR_CURTAIN].closed; + feat_door[DOOR_CURTAIN].num_locked = 1; + feat_door[DOOR_CURTAIN].jammed[0] = feat_door[DOOR_CURTAIN].closed; + feat_door[DOOR_CURTAIN].num_jammed = 1; + + /* Stairs */ + feat_up_stair = f_tag_to_index_in_init("UP_STAIR"); + feat_down_stair = f_tag_to_index_in_init("DOWN_STAIR"); + feat_entrance = f_tag_to_index_in_init("ENTRANCE"); + + /* Normal traps */ + init_normal_traps(); + + /* Special traps */ + feat_trap_open = f_tag_to_index_in_init("TRAP_OPEN"); + feat_trap_armageddon = f_tag_to_index_in_init("TRAP_ARMAGEDDON"); + feat_trap_piranha = f_tag_to_index_in_init("TRAP_PIRANHA"); + + /* Rubble */ + feat_rubble = f_tag_to_index_in_init("RUBBLE"); + + /* Seams */ + feat_magma_vein = f_tag_to_index_in_init("MAGMA_VEIN"); + feat_quartz_vein = f_tag_to_index_in_init("QUARTZ_VEIN"); + + /* Walls */ + feat_granite = f_tag_to_index_in_init("GRANITE"); + feat_permanent = f_tag_to_index_in_init("PERMANENT"); + + /* Glass floor */ + feat_glass_floor = f_tag_to_index_in_init("GLASS_FLOOR"); + + /* Glass walls */ + feat_glass_wall = f_tag_to_index_in_init("GLASS_WALL"); + feat_permanent_glass_wall = f_tag_to_index_in_init("PERMANENT_GLASS_WALL"); + + /* Pattern */ + feat_pattern_start = f_tag_to_index_in_init("PATTERN_START"); + feat_pattern_1 = f_tag_to_index_in_init("PATTERN_1"); + feat_pattern_2 = f_tag_to_index_in_init("PATTERN_2"); + feat_pattern_3 = f_tag_to_index_in_init("PATTERN_3"); + feat_pattern_4 = f_tag_to_index_in_init("PATTERN_4"); + feat_pattern_end = f_tag_to_index_in_init("PATTERN_END"); + feat_pattern_old = f_tag_to_index_in_init("PATTERN_OLD"); + feat_pattern_exit = f_tag_to_index_in_init("PATTERN_EXIT"); + feat_pattern_corrupted = f_tag_to_index_in_init("PATTERN_CORRUPTED"); + + /* Various */ + feat_black_market = f_tag_to_index_in_init("BLACK_MARKET"); + feat_town = f_tag_to_index_in_init("TOWN"); + + /* Terrains */ + feat_deep_water = f_tag_to_index_in_init("DEEP_WATER"); + feat_shallow_water = f_tag_to_index_in_init("SHALLOW_WATER"); + feat_deep_lava = f_tag_to_index_in_init("DEEP_LAVA"); + feat_shallow_lava = f_tag_to_index_in_init("SHALLOW_LAVA"); + feat_dirt = f_tag_to_index_in_init("DIRT"); + feat_grass = f_tag_to_index_in_init("GRASS"); + feat_flower = f_tag_to_index_in_init("FLOWER"); + feat_brake = f_tag_to_index_in_init("BRAKE"); + feat_tree = f_tag_to_index_in_init("TREE"); + feat_mountain = f_tag_to_index_in_init("MOUNTAIN"); + feat_swamp = f_tag_to_index_in_init("SWAMP"); + + /* Unknown grid (not detected) */ + feat_undetected = f_tag_to_index_in_init("UNDETECTED"); + + /* Wilderness terrains */ + init_wilderness_terrains(); + + return feat_tag_is_not_found ? PARSE_ERROR_UNDEFINED_TERRAIN_TAG : 0; +} + + +/*! + * @brief その他の初期情報更新 / * Initialize some other arrays + * @return エラーコード */ static errr init_other(void) { @@ -4201,8 +1774,14 @@ static errr init_other(void) /* Allocate and Wipe the monster list */ C_MAKE(m_list, max_m_idx, monster_type); - /* Allocate and Wipe the max dungeon level */ - C_MAKE(max_dlv, max_d_idx, s16b); + /* Allocate and Wipe the monster process list */ + for (i = 0; i < MAX_MTIMED; i++) + { + C_MAKE(mproc_list[i], max_m_idx, s16b); + } + + /* Allocate and Wipe the max dungeon level */ + C_MAKE(max_dlv, max_d_idx, DEPTH); /* Allocate and wipe each line of the cave */ for (i = 0; i < MAX_HGT; i++) @@ -4223,10 +1802,10 @@ static errr init_other(void) C_MAKE(macro__buf, 1024, char); /* Quark variables */ - C_MAKE(quark__str, QUARK_MAX, cptr); + quark_init(); /* Message variables */ - C_MAKE(message__ptr, MESSAGE_MAX, u16b); + C_MAKE(message__ptr, MESSAGE_MAX, u32b); C_MAKE(message__buf, MESSAGE_BUF, char); /* Hack -- No messages yet */ @@ -4239,47 +1818,6 @@ static errr init_other(void) C_MAKE(inventory, INVEN_TOTAL, object_type); - /*** Pre-allocate the basic "auto-inscriptions" ***/ - - /* The "basic" feelings */ -#ifdef JP - (void)quark_add("¼ö¤ï¤ì¤Æ¤¤¤ë"); - (void)quark_add("²õ¤ì¤Æ¤¤¤ë"); - (void)quark_add("ÊÂ"); - (void)quark_add("¾å¼Á"); -#else - (void)quark_add("cursed"); - (void)quark_add("broken"); - (void)quark_add("average"); - (void)quark_add("good"); -#endif - - - /* The "extra" feelings */ -#ifdef JP - (void)quark_add("¹âµéÉÊ"); - (void)quark_add("̵²ÁÃÍ"); - (void)quark_add("ÆÃÊÌÀ½"); - (void)quark_add("¶²¤í¤·¤¤"); -#else - (void)quark_add("excellent"); - (void)quark_add("worthless"); - (void)quark_add("special"); - (void)quark_add("terrible"); -#endif - - - /* Some extra strings */ -#ifdef JP - (void)quark_add("¼ö¤¤¤Ê¤·"); - (void)quark_add("Çä½ÐÃæ"); -#else - (void)quark_add("uncursed"); - (void)quark_add("on sale"); -#endif - - - /*** Prepare the options ***/ /* Scan the options */ @@ -4325,6 +1863,14 @@ static errr init_other(void) } } + /* + * Set the "default" window flags + * Window 1 : Display messages + * Window 2 : Display inven/equip + */ + window_flag[1] = 1L << 6; + window_flag[2] = 1L << 0; + /*** Pre-allocate space for the "format()" buffer ***/ @@ -4337,9 +1883,122 @@ static errr init_other(void) } +/*! + * @brief オブジェクト配列を初期化する / + * Initialize some other arrays + * @return エラーコード + */ +static errr init_object_alloc(void) +{ + int i, j; + object_kind *k_ptr; + alloc_entry *table; + s16b num[MAX_DEPTH]; + s16b aux[MAX_DEPTH]; + + + /*** Analyze object allocation info ***/ -/* + /* Clear the "aux" array */ + (void)C_WIPE(&aux, MAX_DEPTH, s16b); + + /* Clear the "num" array */ + (void)C_WIPE(&num, MAX_DEPTH, s16b); + + /* Free the old "alloc_kind_table" (if it exists) */ + if (alloc_kind_table) + { + C_KILL(alloc_kind_table, alloc_kind_size, alloc_entry); + } + + /* Size of "alloc_kind_table" */ + alloc_kind_size = 0; + + /* Scan the objects */ + for (i = 1; i < max_k_idx; i++) + { + k_ptr = &k_info[i]; + + /* Scan allocation pairs */ + for (j = 0; j < 4; j++) + { + /* Count the "legal" entries */ + if (k_ptr->chance[j]) + { + /* Count the entries */ + alloc_kind_size++; + + /* Group by level */ + num[k_ptr->locale[j]]++; + } + } + } + + /* Collect the level indexes */ + for (i = 1; i < MAX_DEPTH; i++) + { + /* Group by level */ + num[i] += num[i-1]; + } + + /* Paranoia */ + if (!num[0]) quit(_("町のアイテムがない！", "No town objects!")); + + /*** Initialize object allocation info ***/ + + /* Allocate the alloc_kind_table */ + C_MAKE(alloc_kind_table, alloc_kind_size, alloc_entry); + + /* Access the table entry */ + table = alloc_kind_table; + + /* Scan the objects */ + for (i = 1; i < max_k_idx; i++) + { + k_ptr = &k_info[i]; + + /* Scan allocation pairs */ + for (j = 0; j < 4; j++) + { + /* Count the "legal" entries */ + if (k_ptr->chance[j]) + { + int p, x, y, z; + + /* Extract the base level */ + x = k_ptr->locale[j]; + + /* Extract the base probability */ + p = (100 / k_ptr->chance[j]); + + /* Skip entries preceding our locale */ + y = (x > 0) ? num[x-1] : 0; + + /* Skip previous entries at this locale */ + z = y + aux[x]; + + /* Load the entry */ + table[z].index = i; + table[z].level = (DEPTH)x; + table[z].prob1 = (PROB)p; + table[z].prob2 = (PROB)p; + table[z].prob3 = (PROB)p; + + /* Another entry complete for this locale */ + aux[x]++; + } + } + } + + /* Success */ + return (0); +} + + +/*! + * @brief モンスター配列と生成テーブルを初期化する / * Initialize some other arrays + * @return エラーコード */ static errr init_alloc(void) { @@ -4357,7 +2016,7 @@ static errr init_alloc(void) for (i = 1; i < max_r_idx; i++) { elements[i].tag = r_info[i].level; - elements[i].pointer = (void*)i; + elements[i].index = i; } tag_sort(elements, max_r_idx); @@ -4374,7 +2033,7 @@ static errr init_alloc(void) for (i = 1; i < max_r_idx; i++) { /* Get the i'th race */ - r_ptr = &r_info[(int)elements[i].pointer]; + r_ptr = &r_info[elements[i].index]; /* Count valid pairs */ if (r_ptr->rarity) @@ -4388,14 +2047,17 @@ static errr init_alloc(void) p = (100 / r_ptr->rarity); /* Load the entry */ - alloc_race_table[i].index = (int)elements[i].pointer; - alloc_race_table[i].level = x; - alloc_race_table[i].prob1 = p; - alloc_race_table[i].prob2 = p; - alloc_race_table[i].prob3 = p; + alloc_race_table[i].index = elements[i].index; + alloc_race_table[i].level = (DEPTH)x; + alloc_race_table[i].prob1 = (PROB)p; + alloc_race_table[i].prob2 = (PROB)p; + alloc_race_table[i].prob3 = (PROB)p; } } + /* Free the "r_info" array */ + C_KILL(elements, max_r_idx, tag_type); + #else /* SORT_R_INFO */ int j; @@ -4439,13 +2101,7 @@ static errr init_alloc(void) } /* Paranoia */ -#ifdef JP - if (!num[0]) quit("Ä®¤Î¥â¥ó¥¹¥¿¡¼¤¬¤Ê¤¤¡ª"); -#else - if (!num[0]) quit("No town monsters!"); -#endif - - + if (!num[0]) quit(_("町のモンスターがない！", "No town monsters!")); /*** Initialize monster allocation info ***/ @@ -4501,8 +2157,10 @@ static errr init_alloc(void) -/* +/*! + * @brief 画面左下にシステムメッセージを表示する / * Hack -- take notes on line 23 + * @return なし */ static void note(cptr str) { @@ -4513,12 +2171,16 @@ static void note(cptr str) -/* +/*! + * @brief 全ゲームデータ読み込みのサブルーチン / * Hack -- Explain a broken "lib" folder and quit (see below). - * + * @return なし + * @note + * 
  * XXX XXX XXX This function is "messy" because various things
  * may or may not be initialized, but the "plog()" and "quit()"
  * functions are "supposed" to work under any conditions.
+ *
*/ static void init_angband_aux(cptr why) { @@ -4527,16 +2189,16 @@ static void init_angband_aux(cptr why) #ifdef JP /* Explain */ - plog("'lib'¥Ç¥£¥ì¥¯¥È¥ê¤¬Â¸ºß¤·¤Ê¤¤¤«²õ¤ì¤Æ¤¤¤ë¤è¤¦¤Ç¤¹¡£"); + plog("'lib'ディレクトリが存在しないか壊れているようです。"); /* More details */ - plog("¤Ò¤ç¤Ã¤È¤¹¤ë¤È¥¢¡¼¥«¥¤¥Ö¤¬Àµ¤·¤¯²òÅव¤ì¤Æ¤¤¤Ê¤¤¤Î¤«¤â¤·¤ì¤Þ¤»¤ó¡£"); + plog("ひょっとするとアーカイブが正しく解凍されていないのかもしれません。"); /* Explain */ - plog("³ºÅö¤¹¤ë'README'¥Õ¥¡¥¤¥ë¤òÆɤó¤Ç³Îǧ¤·¤Æ¤ß¤Æ²¼¤µ¤¤¡£"); + plog("該当する'README'ファイルを読んで確認してみて下さい。"); /* Quit with error */ - quit("Ã×̿Ū¤Ê¥¨¥é¡¼¡£"); + quit("致命的なエラー。"); #else /* Explain */ plog("The 'lib' directory is probably missing or broken."); @@ -4554,26 +2216,29 @@ static void init_angband_aux(cptr why) } -/* +/*! + * @brief 全ゲームデータ読み込みのメインルーチン / * Hack -- main Angband initialization entry point - * + * @return なし + * @note + * 
+ * XXX XXX XXX This function is "messy" because various things
+ * may or may not be initialized, but the "plog()" and "quit()"
+ * functions are "supposed" to work under any conditions.
  * Verify some files, display the "news.txt" file, create
  * the high score file, initialize all internal arrays, and
  * load the basic "user pref files".
- *
  * Be very careful to keep track of the order in which things
  * are initialized, in particular, the only thing *known* to
  * be available when this function is called is the "z-term.c"
  * package, and that may not be fully initialized until the
  * end of this function, when the default "user pref files"
  * are loaded and "Term_xtra(TERM_XTRA_REACT,0)" is called.
- *
  * Note that this function attempts to verify the "news" file,
  * and the game aborts (cleanly) on failure, since without the
  * "news" file, it is likely that the "lib" folder has not been
  * correctly located.  Otherwise, the news file is displayed for
  * the user.
- *
  * Note that this function attempts to verify (or create) the
  * "high score" file, and the game aborts (cleanly) on failure,
  * since one of the most common "extraction" failures involves
@@ -4584,28 +2249,24 @@ static void init_angband_aux(cptr why)
  * code below, since the "lib/apex" directory, being empty in the
  * standard distributions, is most likely to be "lost", making it
  * impossible to create the high score file.
- *
  * Note that various things are initialized by this function,
  * including everything that was once done by "init_some_arrays".
- *
  * This initialization involves the parsing of special files
  * in the "lib/data" and sometimes the "lib/edit" directories.
- *
  * Note that the "template" files are initialized first, since they
  * often contain errors.  This means that macros and message recall
  * and things like that are not available until after they are done.
- *
  * We load the default "user pref files" here in case any "color"
  * changes are needed before character creation.
- *
  * Note that the "graf-xxx.prf" file must be loaded separately,
  * if needed, in the first (?) pass through "TERM_XTRA_REACT".
+ *
*/ void init_angband(void) { int fd = -1; - int mode = 0644; + int mode = 0664; FILE *fp; @@ -4615,12 +2276,7 @@ void init_angband(void) /*** Verify the "news" file ***/ /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_FILE, "news_j.txt"); -#else - path_build(buf, 1024, ANGBAND_DIR_FILE, "news.txt"); -#endif - + path_build(buf, sizeof(buf), ANGBAND_DIR_FILE, _("news_j.txt", "news.txt")); /* Attempt to open the file */ fd = fd_open(buf, O_RDONLY); @@ -4631,12 +2287,7 @@ void init_angband(void) char why[1024]; /* Message */ -#ifdef JP - sprintf(why, "'%s'¥Õ¥¡¥¤¥ë¤Ë¥¢¥¯¥»¥¹¤Ç¤­¤Þ¤»¤ó!", buf); -#else - sprintf(why, "Cannot access the '%s' file!", buf); -#endif - + sprintf(why, _("'%s'ファイルにアクセスできません!", "Cannot access the '%s' file!"), buf); /* Crash and burn */ init_angband_aux(why); @@ -4652,12 +2303,7 @@ void init_angband(void) Term_clear(); /* Build the filename */ -#ifdef JP - path_build(buf, 1024, ANGBAND_DIR_FILE, "news_j.txt"); -#else - path_build(buf, 1024, ANGBAND_DIR_FILE, "news.txt"); -#endif - + path_build(buf, sizeof(buf), ANGBAND_DIR_FILE, _("news_j.txt", "news.txt")); /* Open the News file */ fp = my_fopen(buf, "r"); @@ -4668,7 +2314,7 @@ void init_angband(void) int i = 0; /* Dump the file to the screen */ - while (0 == my_fgets(fp, buf, 1024)) + while (0 == my_fgets(fp, buf, sizeof(buf))) { /* Display and advance */ Term_putstr(0, i++, -1, TERM_WHITE, buf); @@ -4679,13 +2325,13 @@ void init_angband(void) } /* Flush it */ - Term_fresh(); + Term_flush(); /*** Verify (or create) the "high score" file ***/ /* Build the filename */ - path_build(buf, 1024, ANGBAND_DIR_APEX, "scores.raw"); + path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw"); /* Attempt to open the high score file */ fd = fd_open(buf, O_RDONLY); @@ -4696,21 +2342,22 @@ void init_angband(void) /* File type is "DATA" */ FILE_TYPE(FILE_TYPE_DATA); + /* Grab permissions */ + safe_setuid_grab(); + /* Create a new high score file */ fd = fd_make(buf, mode); + /* Drop permissions */ + safe_setuid_drop(); + /* Failure */ if (fd < 0) { char why[1024]; /* Message */ -#ifdef JP - sprintf(why, "'%s'¥Õ¥¡¥¤¥ë¤òºîÀ®¤Ç¤­¤Þ¤»¤ó!", buf); -#else - sprintf(why, "Cannot create the '%s' file!", buf); -#endif - + sprintf(why, _("'%s'ファイルを作成できません!", "Cannot create the '%s' file!"), buf); /* Crash and burn */ init_angband_aux(why); @@ -4720,96 +2367,49 @@ void init_angband(void) /* Close it */ (void)fd_close(fd); + put_title(); /*** Initialize some arrays ***/ /* Initialize misc. values */ -#ifdef JP -note("[ÊÑ¿ô¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹...(¤½¤Î¾)"); -#else - note("[Initializing values... (misc)]"); -#endif - -#ifdef JP -if (init_misc()) quit("¤½¤Î¾¤ÎÊÑ¿ô¤ò½é´ü²½¤Ç¤­¤Þ¤»¤ó"); -#else - if (init_misc()) quit("Cannot initialize misc. values"); -#endif - - -#ifdef USE_SCRIPT -#ifdef JP -note("[¥¹¥¯¥ê¥×¥È¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹... ]"); -#else - note("[Initializing scripts... ]"); -#endif - -#ifdef JP -if (init_script()) quit("¥¹¥¯¥ê¥×¥È¤ò½é´ü²½¤Ç¤­¤Þ¤»¤ó"); -#else - if (init_script()) quit("Cannot initialize scripts"); -#endif - -#endif /* USE_SCRIPT */ + note(_("[変数を初期化しています...(その他)", "[Initializing values... (misc)]")); + if (init_misc()) quit(_("その他の変数を初期化できません", "Cannot initialize misc. values")); /* Initialize feature info */ #ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (ÃÏ·Á)]"); - if (init_f_info()) quit("ÃÏ·Á½é´ü²½ÉÔǽ"); + note("[データの初期化中... (地形)]"); + if (init_f_info()) quit("地形初期化不能"); + if (init_feat_variables()) quit("地形初期化不能"); #else note("[Initializing arrays... (features)]"); if (init_f_info()) quit("Cannot initialize features"); + if (init_feat_variables()) quit("Cannot initialize features"); #endif /* Initialize object info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (¥¢¥¤¥Æ¥à)]"); - if (init_k_info()) quit("¥¢¥¤¥Æ¥à½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (objects)]"); - if (init_k_info()) quit("Cannot initialize objects"); -#endif + note(_("[データの初期化中... (アイテム)]", "[Initializing arrays... (objects)]")); + if (init_k_info()) quit(_("アイテム初期化不能", "Cannot initialize objects")); /* Initialize artifact info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (ÅÁÀâ¤Î¥¢¥¤¥Æ¥à)]"); - if (init_a_info()) quit("ÅÁÀâ¤Î¥¢¥¤¥Æ¥à½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (artifacts)]"); - if (init_a_info()) quit("Cannot initialize artifacts"); -#endif + note(_("[データの初期化中... (伝説のアイテム)]", "[Initializing arrays... (artifacts)]")); + if (init_a_info()) quit(_("伝説のアイテム初期化不能", "Cannot initialize artifacts")); /* Initialize ego-item info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (̾¤Î¤¢¤ë¥¢¥¤¥Æ¥à)]"); - if (init_e_info()) quit("̾¤Î¤¢¤ë¥¢¥¤¥Æ¥à½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (ego-items)]"); - if (init_e_info()) quit("Cannot initialize ego-items"); -#endif + note(_("[データの初期化中... (名のあるアイテム)]", "[Initializing arrays... (ego-items)]")); + if (init_e_info()) quit(_("名のあるアイテム初期化不能", "Cannot initialize ego-items")); /* Initialize monster info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (¥â¥ó¥¹¥¿¡¼)]"); - if (init_r_info()) quit("¥â¥ó¥¹¥¿¡¼½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (monsters)]"); - if (init_r_info()) quit("Cannot initialize monsters"); -#endif + note(_("[データの初期化中... (モンスター)]", "[Initializing arrays... (monsters)]")); + if (init_r_info()) quit(_("モンスター初期化不能", "Cannot initialize monsters")); /* Initialize dungeon info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (¥À¥ó¥¸¥ç¥ó)]"); - if (init_d_info()) quit("¥À¥ó¥¸¥ç¥ó½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (dungeon)]"); - if (init_d_info()) quit("Cannot initialize dungeon"); -#endif + note(_("[データの初期化中... (ダンジョン)]", "[Initializing arrays... (dungeon)]")); + if (init_d_info()) quit(_("ダンジョン初期化不能", "Cannot initialize dungeon")); { int i; for (i = 1; i < max_d_idx; i++) @@ -4818,119 +2418,51 @@ if (init_script()) quit(" } /* Initialize magic info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (ËâË¡)]"); - if (init_m_info()) quit("ËâË¡½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (magic)]"); - if (init_m_info()) quit("Cannot initialize magic"); -#endif - - /* Initialize weapon_exp info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (Éð´ï½ÏÎýÅÙ)]"); - if (init_we_info()) quit("Éð´ï½ÏÎýÅÙ½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (weapon exp)]"); - if (init_we_info()) quit("Cannot initialize weapon exp"); -#endif + note(_("[データの初期化中... (魔法)]", "[Initializing arrays... (magic)]")); + if (init_m_info()) quit(_("魔法初期化不能", "Cannot initialize magic")); /* Initialize weapon_exp info */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (µ»Ç½½ÏÎýÅÙ)]"); - if (init_se_info()) quit("µ»Ç½½ÏÎýÅÙ½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (skill exp)]"); - if (init_se_info()) quit("Cannot initialize skill exp"); -#endif + note(_("[データの初期化中... (熟練度)]", "[Initializing arrays... (skill)]")); + if (init_s_info()) quit(_("熟練度初期化不能", "Cannot initialize skill")); /* Initialize wilderness array */ -#ifdef JP -note("[ÇÛÎó¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹... (¹ÓÌî)]"); -#else - note("[Initializing arrays... (wilderness)]"); -#endif + note(_("[配列を初期化しています... (荒野)]", "[Initializing arrays... (wilderness)]")); -#ifdef JP -if (init_wilderness()) quit("¹ÓÌî¤ò½é´ü²½¤Ç¤­¤Þ¤»¤ó"); -#else - if (init_wilderness()) quit("Cannot initialize wilderness"); -#endif + if (init_wilderness()) quit(_("荒野を初期化できません", "Cannot initialize wilderness")); /* Initialize town array */ -#ifdef JP -note("[ÇÛÎó¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹... (³¹)]"); -#else - note("[Initializing arrays... (towns)]"); -#endif - -#ifdef JP -if (init_towns()) quit("³¹¤ò½é´ü²½¤Ç¤­¤Þ¤»¤ó"); -#else - if (init_towns()) quit("Cannot initialize towns"); -#endif + note(_("[配列を初期化しています... (街)]", "[Initializing arrays... (towns)]")); + if (init_towns()) quit(_("街を初期化できません", "Cannot initialize towns")); /* Initialize building array */ -#ifdef JP -note("[ÇÛÎó¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹... (·úʪ)]"); -#else - note("[Initializing arrays... (buildings)]"); -#endif - -#ifdef JP -if (init_buildings()) quit("·úʪ¤ò½é´ü²½¤Ç¤­¤Þ¤»¤ó"); -#else - if (init_buildings()) quit("Cannot initialize buildings"); -#endif + note(_("[配列を初期化しています... (建物)]", "[Initializing arrays... (buildings)]")); + if (init_buildings()) quit(_("建物を初期化できません", "Cannot initialize buildings")); /* Initialize quest array */ -#ifdef JP -note("[ÇÛÎó¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹... (¥¯¥¨¥¹¥È)]"); -#else - note("[Initializing arrays... (quests)]"); -#endif - -#ifdef JP -if (init_quests()) quit("¥¯¥¨¥¹¥È¤ò½é´ü²½¤Ç¤­¤Þ¤»¤ó"); -#else - if (init_quests()) quit("Cannot initialize quests"); -#endif + note(_("[配列を初期化しています... (クエスト)]", "[Initializing arrays... (quests)]")); + if (init_quests()) quit(_("クエストを初期化できません", "Cannot initialize quests")); + /* Initialize vault info */ + if (init_v_info()) quit(_("vault 初期化不能", "Cannot initialize vaults")); /* Initialize some other arrays */ -#ifdef JP - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (¤½¤Î¾)]"); - if (init_other()) quit("¤½¤Î¾¤Î¥Ç¡¼¥¿½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (other)]"); - if (init_other()) quit("Cannot initialize other stuff"); -#endif + note(_("[データの初期化中... (その他)]", "[Initializing arrays... (other)]")); + if (init_other()) quit(_("その他のデータ初期化不能", "Cannot initialize other stuff")); /* Initialize some other arrays */ -#ifdef JP - /* translation */ - note("[¥Ç¡¼¥¿¤Î½é´ü²½Ãæ... (¥¢¥í¥±¡¼¥·¥ç¥ó)]"); - if (init_alloc()) quit("¥¢¥í¥±¡¼¥·¥ç¥ó¡¦¥¹¥¿¥Ã¥Õ½é´ü²½ÉÔǽ"); -#else - note("[Initializing arrays... (alloc)]"); - if (init_alloc()) quit("Cannot initialize alloc stuff"); -#endif + note(_("[データの初期化中... (アロケーション)]", "[Initializing arrays... (alloc)]")); + if (init_alloc()) quit(_("アロケーション・スタッフ初期化不能", "Cannot initialize alloc stuff")); /*** Load default user pref files ***/ /* Initialize feature info */ -#ifdef JP -note("[¥æ¡¼¥¶¡¼ÀßÄê¥Õ¥¡¥¤¥ë¤ò½é´ü²½¤·¤Æ¤¤¤Þ¤¹...]"); -#else - note("[Initializing user pref files...]"); -#endif - + note(_("[ユーザー設定ファイルを初期化しています...]", "[Initializing user pref files...]")); /* Access the "basic" pref file */ strcpy(buf, "pref.prf"); @@ -4938,29 +2470,50 @@ note("[ /* Process that file */ process_pref_file(buf); - /* Access the "user" pref file */ - sprintf(buf, "user.prf"); - - /* Process that file */ - process_pref_file(buf); - /* Access the "basic" system pref file */ sprintf(buf, "pref-%s.prf", ANGBAND_SYS); /* Process that file */ process_pref_file(buf); - /* Access the "user" system pref file */ - sprintf(buf, "user-%s.prf", ANGBAND_SYS); - - /* Process that file */ - process_pref_file(buf); - /* Done */ -#ifdef JP - note("[½é´ü²½½ªÎ»]"); + note(_("[初期化終了]", "[Initialization complete]")); +} + +/*! + * @brief タイトル記述 + * @return なし + */ +static void put_title(void) +{ + char title[120]; + int col; +#if H_VER_EXTRA > 0 + sprintf(title, _("変愚蛮怒 %d.%d.%d.%d(%s)", "Hengband %d.%d.%d.%d(%s)"), H_VER_MAJOR, H_VER_MINOR, H_VER_PATCH, H_VER_EXTRA, #else - note("[Initialization complete]"); + sprintf(title, _("変愚蛮怒 %d.%d.%d(%s)", "Hengband %d.%d.%d(%s)"), H_VER_MAJOR, H_VER_MINOR, H_VER_PATCH, #endif + IS_STABLE_VERSION ? _("安定版", "Stable") : _("開発版", "Developing")); + col = (80 - strlen(title)) / 2; + col = col < 0 ? 0 : col; + prt(title, VER_INFO_ROW, col); +} +/*! + * @brief サムチェック情報を出力 / Get check sum in string form + * @return サムチェック情報の文字列 + */ +cptr get_check_sum(void) +{ + return format("%02x%02x%02x%02x%02x%02x%02x%02x%02x", + f_head.v_extra, + k_head.v_extra, + a_head.v_extra, + e_head.v_extra, + r_head.v_extra, + d_head.v_extra, + m_head.v_extra, + s_head.v_extra, + v_head.v_extra); } +