/*  system_config.cc
 *      gameexe.ini ファイルの読み込み
 */

/*
 *
 *  Copyright (C) 2000-   Kazunori Ueno(JAGARL) <jagarl@creator.club.ne.jp>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License along
 *  with this program; if not, write to the Free Software Foundation, Inc.,
 *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 *
*/

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <stdarg.h>
#include <ctype.h>
#include <map>
#include <string>
#include "system_config.h"
#include "../system/file.h"

using namespace std;

// #define DEBUG_CONFIG
#ifdef DEBUG_CONFIG
# define dprintf(X) printf X
#else
# define dprintf(X)
#endif /* DEBUG_CONFIG */

#define MAXTOKEN 10 /* = で区切られた領域の最大数 */
#define MAXVARS 32 /* , で区切られた数値の最大数 */

// 初期化ファイルの読み込み
/* config は 文字列、数列、その複合など、いろいろな形式がありうる */
/* 文字列と数列は一般に AyuSys_Config クラスに含める */


/**********************************************************/
/* とりあえずハッシュ比較付き文字列 */
class HashStr {
	const char* str;
	unsigned int hash;
public:
	HashStr(const char*);
	HashStr(const HashStr& orig);
	~HashStr() {
		if (str) delete[] str;
	}
	const char* c_str(void) const { return str; }
	friend inline int operator<(const HashStr& a, const HashStr& b) {
		if (a.hash == b.hash) {
			if (a.str == 0) return 1;
			else if (b.str == 0) return 0;
			else return strcmp(a.str, b.str);
		}
		else return a.hash < b.hash;
	}
};

HashStr::HashStr(const char* s ) {
	if (s == NULL || s[0] == '\0') {
		str = NULL;
		hash = 0;
		return; /* invalid string */
	}
	char* new_str = new char[strlen(s)+1];
	strcpy(new_str, s);
	str = new_str;
	/* calc hash... 適当 */
	int h = strlen(s);
	while(*s != 0) {
		h = *s + ((h * (0x9449+*s))>>7);
		s++;
	}
	hash = (unsigned int)h;
}
HashStr::HashStr(const HashStr& orig) {
	if (orig.str == NULL || orig.str[0] == '\0') {
		str = NULL;
		hash = 0; return; /* invalid */
	}
	char* new_str = new char[strlen(orig.str)+1];
	strcpy(new_str, orig.str);
	str = new_str;
	hash = orig.hash;
}

/**********************************************************
**AyuSys_Config_[String | Intlist] :
** 設定の本体
**	original : 元設定
**	old_data : 前回 ClearDiff() したときの設定
**	new_data : ClearDiff() 以降に設定した内容を保存
**	データ設定：
**	Init() : 元設定を作成
**	Set() : 設定を変更
**	Get() : 最も新しい設定を得る
**
**	変更の記録：
**	Diff() : 前回のClearDiff() から変更した内容を得る
**	DiffLen() : Diff() で必要な文字列長を得る
**	ClearDiff() : 変更記録を消す
**	PatchOld() : Diff() で得た記録に基づき、変更前の状態に戻す
**	PatchNew() : Diff() で得た記録に基づき、変更後の状態に戻す
**
**	元設定からの変更の記録：
**	SetOriginal() : 元設定に戻す
**	DiffOriginal() : 元設定から現在の設定の変更を得る
**	DiffOriginalLen() : DiffOriginal() で必要な文字列長を得る
**	PatchOriginal() : DiffOriginal() で得た記録に基づき、設定を復旧する
*/

/************************************************
** AyuSysConfigStringItem
** 文字列をデータとしてもつ設定項目
*/
class AyuSysConfigStringItem {
	char* original_data;
	char* old_data;
	char* new_data;
public:
	AyuSysConfigStringItem(void) {
		original_data = NULL;
		old_data = NULL;
		new_data = NULL;
	}
	~AyuSysConfigStringItem(void) {
		if (original_data) delete[] original_data;
		if (old_data) delete[] old_data;
		if (new_data) delete[] new_data;
	}
	AyuSysConfigStringItem(const AyuSysConfigStringItem& o) {
		original_data = NULL;
		old_data = NULL;
		new_data = NULL;
		if (o.original_data) {
			original_data = new char[strlen(o.original_data)+1];
			strcpy(original_data, o.original_data);
		}
		if (o.old_data) {
			old_data = new char[strlen(o.old_data)+1];
			strcpy(old_data, o.old_data);
		}
		if (o.new_data) {
			new_data = new char[strlen(o.new_data)+1];
			strcpy(new_data, o.new_data);
		}
	}
	/* 設定：Init で初期化、Set で変更、Get で変更を優先して取り出す */
	void Init(int deal, const char* str) { /* deal は無視 */
		if (original_data) delete[] original_data;
		int len = strlen(str);
		original_data = new char[len+1];
		strcpy(original_data, str);
		original_data[len] = '\0';
	}
	void Set(int deal, const char* str) { /* deal は無視 */
		if (new_data) delete[] new_data;
		int len = strlen(str);
		new_data = new char[len+1];
		strcpy(new_data, str);
		new_data[len] = '\0';
	}
	const char* Get(int deal) const {/* deal は無視 */
		if (new_data) return new_data;
		else if (old_data) return old_data;
		return original_data;
	}
	const char* GetOriginal(int deal) const {
		return original_data;
	}
	int Deal(void) const {
		return 1;
	}
	/* オリジナルからの変化の調査 :
	** DiffOriginal で変化を文字列で取り出し、PatchOriginal で
	** 変化を反映
	*/
	int DiffOriginalLen(void) {
		if (new_data == NULL) return 0;
		return strlen(new_data)+1;
	}
	void DiffOriginal(string& data) {
		if (new_data == NULL) { /* あり得ない */
			fprintf(stderr,"AyuSysConfigStringItem::DiffOriginal : this method must not called if not required!\n");
			return;
		}
		char* out_data = new char[strlen(new_data)*2+1];
		char* buf = out_data;
		int i;
		for (i=0; new_data[i]!=0; i++) {
			switch(new_data[i]) {
				case '?': *buf++ = '?'; *buf++ = '0'; break;
				case '"': *buf++ = '?'; *buf++ = '1'; break;
				case '\'': *buf++ = '?'; *buf++ = '2'; break;
				case ',': *buf++ = '?'; *buf++ = '3'; break;
				case '.': *buf++ = '?'; *buf++ = '4'; break;
				case ':': *buf++ = '?'; *buf++ = '5'; break;
				case ';': *buf++ = '?'; *buf++ = '6'; break;
				case '=': *buf++ = '?'; *buf++ = '7'; break;
				case '<': *buf++ = '?'; *buf++ = '8'; break;
				case '>': *buf++ = '?'; *buf++ = '9'; break;
				default: *buf++ = new_data[i]; break;
			}
		}
		*buf++ = 0;
		data += out_data;
		delete[] out_data;
		return;
	}
	const char* PatchOriginal(const char* data) {
		static const char* table = "?\"',.:;=<>";
		if (new_data != NULL) delete[] new_data;
		if (old_data != NULL) delete[] old_data;
		old_data = NULL;
		new_data = new char[1024];
		int i,j = 0;
		for (i=0; i<1020; i++) {
			switch(data[j]) {
			case '?':
				if (data[j+1] >= '0' && data[j+1] <= '9') {
					new_data[i] = table[ data[j+1] - '0'];
					j += 2;
					break;
				}
			case '"': case '\'': case ',': case '.': case ':':
			case ';': case '=':  case '<': case '>':
				goto for_end;
			default: new_data[i] = data[j++]; break;
			}
		}
	for_end:
		new_data[i] = 0;
		return data;
	}
	void SetOriginal(void) {
		if (new_data) delete[] new_data;
		if (old_data) delete[] old_data;
		new_data = NULL;
		old_data = NULL;
	}
	void Dump(FILE* f) const {
		if (original_data) fprintf(f, "original %s ",original_data);
		if (old_data) fprintf(f, "old_data %s ",old_data);
		if (new_data) fprintf(f, "new_data %s ",new_data);
		fprintf(f, "\n");
	}
};

/************************************************
** AyuSysConfigIntlistItem
** 数値列をデータとしてもつ設定項目
*/
class AyuSysConfigIntlistItem {
	int item_deal;
	int* original_data;
	int* old_data;
	int* new_data;
public:
	AyuSysConfigIntlistItem(void) {
		item_deal = 0;
		original_data = NULL;
		old_data = NULL;
		new_data = NULL;
	}
	~AyuSysConfigIntlistItem(void) {
		if (original_data) delete[] original_data;
		if (old_data) delete[] old_data;
		if (new_data) delete[] new_data;
	}
	AyuSysConfigIntlistItem(const AyuSysConfigIntlistItem& o) {
		item_deal = o.item_deal;
		original_data = NULL;
		old_data = NULL;
		new_data = NULL;
		if (o.original_data) {
			original_data = new int[item_deal];
			memcpy(original_data, o.original_data, sizeof(int)*item_deal);
		}
		if (o.old_data) {
			old_data = new int[item_deal];
			memcpy(old_data, o.old_data, sizeof(int)*item_deal);
		}
		if (o.new_data) {
			new_data = new int[item_deal];
			memcpy(new_data, o.new_data, sizeof(int)*item_deal);
		}
	}
	/* 設定：Init で初期化、Set で変更、Get で変更を優先して取り出す */
	void Init(int deal, const int* list) { /* deal は無視 */
		if (original_data) delete[] original_data;
		original_data = NULL;
		if (deal <= 0) {
			item_deal = 0; return;
		}
		item_deal = deal;
		original_data = new int[item_deal];
		memcpy(original_data, list, sizeof(int)*deal);
	}
	void Set(int deal, const int* list) { /* deal は無視 */
		item_deal = deal;
		if (new_data) delete[] new_data;
		new_data = new int[item_deal];
		memcpy(new_data, list, sizeof(int)*item_deal);
	}
	const int* Get(int deal) const {/* deal は無視 */
		if (item_deal == 0) return NULL;
		if (deal > item_deal) {
			fprintf(stderr,"AyuSysConfigIntlistItem::Get : invalid items deal %d (correct: %d)\n",deal,item_deal);
			return NULL;
		}
		if (new_data) return new_data;
		else if (old_data) return old_data;
		return original_data;
	}
	const int* GetOriginal(int deal) const {/* deal は無視 */
		if (item_deal == 0) return NULL;
		if (deal > item_deal) {
			fprintf(stderr,"AyuSysConfigIntlistItem::Get : invalid items deal %d (correct: %d)\n",deal,item_deal);
			return NULL;
		}
		return original_data;
	}
	int Deal(void) const {
		return item_deal;
	}
	/* オリジナルからの変化の調査 :
	** DiffOriginal で変化を文字列で取り出し、PatchOriginal で
	** 変化を反映
	*/
	int DiffOriginalLen(void) {
		if (new_data == NULL) return 0;
		return  12 * item_deal + 1;
	}
	void DiffOriginal(string& data) {
		if (new_data == NULL) { /* あり得ない */
			fprintf(stderr,"AyuSysConfigStringItem::DiffOriginal : this method must not called if not required!\n");
			return;
		}
		int i; char buf[1024];
		for (i=0; i<item_deal; i++) {
			sprintf(buf, "%d,",new_data[i]);
			data += buf;
		}
		return;
	}
	const char* PatchOriginal(const char* data) {
		if (old_data) delete[] old_data;
		if (new_data) delete[] new_data;
		old_data = NULL;
		new_data = new int[item_deal];
		int i;
		for (i=0; i<item_deal; i++) {
			new_data[i] = atoi(data);
			if (strchr(data, ',') == NULL) break;
			data = strchr(data, ',') + 1;
		}
		return data;
	}
	void SetOriginal(void) {
		if (new_data) delete[] new_data;
		if (old_data) delete[] old_data;
		new_data = NULL;
		old_data = NULL;
	}
	void Dump(FILE* f) const {
		fprintf(f, "item deal %d, ",item_deal);
		if (original_data) {
			fprintf(f, "(%d", original_data[0]);
			int i;for (i=1; i<item_deal; i++) {
				fprintf(f, ",%d",original_data[i]);
			}
			fprintf(f, ") ");
		}
		if (old_data) {
			fprintf(f, "old %p(%d", old_data, old_data[0]);
			int i;for (i=1; i<item_deal; i++) {
				fprintf(f, ",%d",old_data[i]);
			}
			fprintf(f, ") ");
		}
		if (new_data) {
			fprintf(f, "new %p(%d", new_data, new_data[0]);
			int i;for (i=1; i<item_deal; i++) {
				fprintf(f, ",%d",new_data[i]);
			}
			fprintf(f, ") ");
		}
		fprintf(f, "\n");
	}
};

// template map<HashStr, AyuSysConfigStringItem>;
// template map<HashStr, AyuSysConfigIntlistItem>;

/************************************************
** AyuSysConfigItem
** データ名 -> データ本体の map と、map 全体に
** 様々な操作を行うためのメソッド
*/

template<class ItemType, class DataType> class AyuSysConfigItem {
	typedef map<HashStr,ItemType> maptype;
	typedef typename maptype::iterator mapiterator;
	typedef typename maptype::const_iterator const_mapiterator;
	maptype data;
public:
	void SetOrig(HashStr& name, int deal, const DataType* str) {
		if (str == NULL) return; /* 無効 */
		data[name].Init(deal, str);
	}
	void Set(HashStr& name, int deal, const DataType* new_data) {
		if (new_data == NULL) return; /* 無効 */
		/* 設定を検索 */
		mapiterator it = data.find(name);
		/* 設定が元設定に見つからないなら失敗 */
		if (it == data.end()) {
			fprintf(stderr,"AyuSysConfigItem::Set : there is no '%s' parameter\n",name.c_str());
			return;
		}
		/* 設定を変更 */
		it->second.Set(deal, new_data);
	}
	/* 新しい設定を優先して返す */
	const DataType* Get(int deal, HashStr& name) const {
		const_mapiterator it = data.find(name);
		if (it == data.end()) return NULL;
		return it->second.Get(deal);
	}
	const DataType* GetOriginal(int deal, HashStr& name) const {
		const_mapiterator it = data.find(name);
		if (it == data.end()) return NULL;
		return it->second.GetOriginal(deal);
	}
	int Deal(HashStr& name) const {
		const_mapiterator it = data.find(name);
		if (it == data.end()) return NULL;
		return it->second.Deal();
	}
	/* オリジナルからの変化の調査 :
	** DiffOriginal で変化を文字列で取り出し、PatchOriginal で
	** 変化を反映
	*/
	void DiffOriginal(string& ret_str) {
		mapiterator it = data.begin();
		for (; it != data.end(); it++) {
			int len = it->second.DiffOriginalLen();
			if (len) {
				ret_str += it->first.c_str();
				ret_str += "=";
				it->second.DiffOriginal(ret_str);
				ret_str += ";";
			}
		}
		ret_str += ";";
		return;
	}
	const char* PatchOriginal(const char* diff_data) {
		while(*diff_data != ';') {
			char name[1024];
			const char* data_start = strchr(diff_data, '=');
			if (data_start == NULL) break;
			strncpy(name, diff_data, data_start-diff_data);
			name[data_start-diff_data] = 0;
			data_start++;
			mapiterator it = data.find(name);
			if (it != data.end()) {
				diff_data = data_start;
				it->second.PatchOriginal(diff_data);
			}
			diff_data = strchr(diff_data, ';');
			if (diff_data) diff_data++;
		}
		if (*diff_data == ';') {
			diff_data++;
		} else {
			fprintf(stderr,"AyusysConfigItem::PatchOriginal: invalid data %s\n",diff_data);
		}
		return diff_data;
	}
	void SetOriginal(void) {
		mapiterator it = data.begin();
		for (; it != data.end(); it++) {
			it->second.SetOriginal();
		}
	}
	void Dump(FILE* f) const {
		const_mapiterator it = data.begin();
		for (; it != data.end(); it++) {
			fprintf(f, "name %s: ",it->first.c_str());
			it->second.Dump(f);
		}
	}
};
// template AyuSysConfigItem<AyuSysConfigStringItem, char>;
// template AyuSysConfigItem<AyuSysConfigIntlistItem, int>;

/************************************************/
/* ラッパ */
struct AyuSysConfigString {
	AyuSysConfigItem<AyuSysConfigStringItem,char> orig;
	void Dump(FILE* f) const {
		fprintf(f, "string config:\n");
		orig.Dump(f);
	}
};
struct AyuSysConfigIntlist {
	AyuSysConfigItem<AyuSysConfigIntlistItem, int> orig;
	void Dump(FILE* f) const {
		fprintf(f, "integer array config:\n");
		orig.Dump(f);
	}
};

/************************************************/
/* AyuSysConfig クラス */
int AyuSysConfig::SearchParam(const char* name) const{
	HashStr str(name);
	if (str_config->orig.Get(1, str)) return 1; /* char* のパラメータ */
	else if (int_config->orig.Get(1, str)) return 2; /* int のパラメータ */
	/* XXX.015.XXX の類のキー名を XXX.000.XXX の形に規格化して再検索 */
	char name_copy[1024];
	strncpy(name_copy, name, 1000);
	name_copy[1000] = 0;
	char* s;
	for (s=name_copy; s != NULL; s = strchr(s,'.')) {
		if (isdigit(s[1]) && isdigit(s[2]) && isdigit(s[3])) {
			s[1] = '0'; s[2] = '0'; s[3] = '0';
		}
		s++;
	}
	HashStr str2(name_copy);
	if (str_config->orig.Get(1, str2)) return 1; /* char* のパラメータ */
	else if (int_config->orig.Get(1, str2)) return 2; /* int のパラメータ */
	else return 0;
}
const char* AyuSysConfig::GetParaStr(const char* name) const{
	HashStr str(name);
	const char* ret = str_config->orig.Get(1,str);
	if (ret == NULL) {
		// fprintf(stderr,"Cannot find config name '%s'\n",name);
	}
	return ret;
}
int AyuSysConfig::GetParam(const char* name, int deal, ...) const{
	HashStr str(name);
	va_list va; int i;
	const int* vars = int_config->orig.Get(deal, str);
	if (vars == NULL) {
		// fprintf(stderr,"Cannot find config name '%s'\n",name);
		va_start(va, deal);
		for (i=0; i<deal; i++) {
			int* var = va_arg(va, int*);
			if (var != NULL) *var = 0;
		}
		va_end(va);
		return -1;
	} else {
		va_start(va, deal);
		for (i=0; i<deal; i++) {
			int* var = va_arg(va, int*);
			if (var != NULL) *var = vars[i];
		}
		va_end(va);
	}
	return 0;
}
int AyuSysConfig::GetOriginalParam(const char* name, int deal, ...) const{
	HashStr str(name);
	va_list va; int i;
	const int* vars = int_config->orig.GetOriginal(deal, str);
	if (vars == NULL) {
		// fprintf(stderr,"Cannot find config name '%s'\n",name);
		va_start(va, deal);
		for (i=0; i<deal; i++) {
			int* var = va_arg(va, int*);
			if (var != NULL) *var = 0;
		}
		va_end(va);
		return -1;
	} else {
		va_start(va, deal);
		for (i=0; i<deal; i++) {
			int* var = va_arg(va, int*);
			if (var != NULL) *var = vars[i];
		}
		va_end(va);
	}
	return 0;
}
const int* AyuSysConfig::GetParamArray(const char* name, int& deal) const{
	HashStr str(name);
	if (int_config->orig.Deal(str) == 0) {
		deal = 0;
		return NULL;
	}
	deal = int_config->orig.Deal(str);
	const int* vars = int_config->orig.Get(deal, str);
	if (vars == NULL) {
		deal = 0;
		return NULL;
	}
	return vars;
}
void AyuSysConfig::SetParaStr(const char* name, const char* var) {
	HashStr str(name);
	dirty_flag = 1; change_flag = 1;
	str_config->orig.Set(str, 1, var);
}
void AyuSysConfig::SetParam(const char* name, int deal, ...) {
	if (deal >= MAXVARS) return ;
	HashStr str(name);
	int vars[deal]; va_list va; int i;
	va_start(va, deal);
	for (i=0; i<deal; i++) vars[i] = va_arg(va, int);
	va_end(va);
	int_config->orig.Set(str, deal, vars);
	dirty_flag = 1; change_flag = 1;
	return;
}
void AyuSysConfig::SetOrigParaStr(const char* name, const char* var) {
	HashStr str(name);
	str_config->orig.SetOrig(str, 1, var);
	change_flag = 1;
}
void AyuSysConfig::SetOrigParam(const char* name, int deal, ...) {
	if (deal >= MAXVARS) return;
	HashStr str(name);
	int vars[deal]; va_list va; int i;
	va_start(va, deal);
	for(i=0; i<deal; i++) vars[i] = va_arg(va, int);
	va_end(va);
	int_config->orig.SetOrig(str, deal, vars);
	change_flag = 1;
}
void AyuSysConfig::SetOrigParamArray(const char* name, int deal, int* array) {
	HashStr str(name);
	int_config->orig.SetOrig(str, deal, array);
}
void AyuSysConfig::SetOriginal(void) {
	/* 全ての設定を元に戻す */
	str_config->orig.SetOriginal();
	int_config->orig.SetOriginal();
	change_flag = 1;
}
void AyuSysConfig::DiffOriginal(string& data) {
	str_config->orig.DiffOriginal(data);
	int_config->orig.DiffOriginal(data);
	return;
}
const char* AyuSysConfig::PatchOriginal(const char* data) {
	data = str_config->orig.PatchOriginal(data);
	data = int_config->orig.PatchOriginal(data);
	return data;
}

void AyuSysConfig::Dump(FILE* f) const {
	str_config->Dump(f);
	int_config->Dump(f);
}

/************************************************
** AyuSysConfig のコンストラクタ：
** 全ての config 項目を初期化する
*/

AyuSysConfig * AyuSysConfig::_singleton = NULL;

AyuSysConfig* AyuSysConfig::GetInstance(void)
{
	if (_singleton == NULL)
		_singleton = new AyuSysConfig;
	return _singleton;
}

void AyuSysConfig::Quit(void)
{
	if (_singleton != NULL) {
		delete _singleton;
		_singleton = NULL;
	}
}


AyuSysConfig::AyuSysConfig(void) {
	int i;

	change_flag = 1; dirty_flag = 0;
	str_config = new AyuSysConfigString;
	int_config = new AyuSysConfigIntlist;

	/****** 文字列 *******/
	SetOrigParaStr("#WAKUPDT", "GRDAT");	/* 枠、マウスカーソルなどの画像ファイル */
	SetOrigParaStr("#REGNAME", "xclannad");	/* レジストリ名。セーブファイルの作成に使う */
	SetOrigParaStr("#CAPTION", "xclannad");	/* ウィンドウのタイトル */
	SetOrigParaStr("#SAVENAME","SAVE.INI");	/* セーブファイルの名前 */
	SetOrigParaStr("#SAVETITLE", "This is save file"); /* セーブファイルの先頭の文字列 */
	SetOrigParaStr("#SAVENOTITLE", "-----------------"); /* 使われてないセーブデータの名前 */
	SetOrigParaStr("#CGM_FILE", "MODE.CGM");/* CG mode の設定が保存されたファイル名 */
	SetOrigParaStr("#CGTABLE_FILE", "MODE.CGM");/* CG mode の設定が保存されたファイル名 */

	SetOrigParaStr("#WAKU.000.000.NAME", ""); // テキストウィンドウの窓飾り画像名
	SetOrigParaStr("#WAKU.000.000.BACK", ""); // テキストウィンドウのテキスト背景画像名
	SetOrigParaStr("#WAKU.000.000.BTN", ""); // テキストウィンドウのボタン画像名

	SetOrigParaStr("#MOUSE_CURSOR.000.NAME", ""); // マウスカーソルのファイル名
	SetOrigParaStr("#CURSOR.000.NAME", ""); // リターンカーソルのファイル名
	SetOrigParaStr("#SELBTN.000.NAME", ""); // 選択肢背景
	SetOrigParaStr("#SELBTN.000.BACK", ""); // 選択肢背景

	char name_str[8] = "#NAME.A";
	for (i='A'; i<='Z'; i++) {
		name_str[6] = i;
		SetOrigParaStr(name_str, "");
	}

	/****** 数値列 *******/
	SetOrigParam("#CANCELCALL", 2, 0,0); /* キャンセルボタン(右クリック)したときに呼び出されるサブルーチン番号(メニュー) */
	SetOrigParam("#COM2_TITLE", 1, 1); /* ？ */
	SetOrigParam("#COM2_TITLE_COLOR", 1, 2); /* 選択肢タイトルの色 */
	SetOrigParam("#COM2_TITLE_INDENT", 1, 2); /* ？ */
	SetOrigParam("#SAVEFILETIME", 1, 24); /* セーブする場所の数 */
	SetOrigParam("#SEEN_START", 1, 0); /* ゲームを開始するシナリオ番号 */
	SetOrigParam("#SEEN_SRT", 1, 0); /* ゲームを開始するシナリオ番号(好き好き大好き) */
	SetOrigParam("#SEEN_MENU",  1, 0); /* メニューのシナリオ番号 */
	SetOrigParam("#SEEN_TEXT_CURRENT",  1, 0); /* seen.txt を root directory に置くか */
	SetOrigParam("#FADE_TIME", 1, 40); /* 画面のフェード・アウトの速度 */
	SetOrigParam("#NVL_SYSTEM",1, 0); /* テキストウィンドウが全画面か否か */
	SetOrigParam("#WINDOW_ATTR", 5, -1, 128,128, 190, 0); /* テキストウィンドウの色 */
	SetOrigParam("#WINDOW_ATTR_AREA", 4, 4,4,4,4); /* テキストウィンドウの範囲 */
	SetOrigParam("#WINDOW_ATTR_TYPE", 1, 0); /* テキストウィンドウを半透明にするか */
	SetOrigParam("#WINDOW_MSG_POS", 2, 22, 350); /* テキストウィンドウの位置 */
	SetOrigParam("#WINDOW_COM_POS", 2,450, 250); /* 選択ウィンドウの位置 */
	SetOrigParam("#WINDOW_GRP_POS", 2, 16, 100); /* なにかのウィンドウの位置 */
	SetOrigParam("#WINDOW_SUB_POS", 2, 48, 100); /* なにかのウィンドウの位置 */
	SetOrigParam("#WINDOW_SYS_POS", 2, 32, 100); /* なにかのウィンドウの位置 */
	SetOrigParam("#WINDOW_WAKU_TYPE", 1, 0); /* テキストウィンドウの枠の種類。xkanon 独自設定 */
	SetOrigParam("#RETN_CONT", 1, 16); /* リターンカーソルの数 */
	SetOrigParam("#RETN_SPEED",1,100); /* リターンカーソルの動く速度 */
	SetOrigParam("#RETN_XSIZE", 1, 16); /* リターンカーソルの大きさ */
	SetOrigParam("#RETN_YSIZE", 1, 16); /* リターンカーソルの大きさ */
	SetOrigParam("#FONT_SIZE", 1, 26); /* フォントの大きさ */
	SetOrigParam("#FONT_WEIGHT", 1, 100); /* フォントの weight */
	SetOrigParam("#MSG_MOJI_SIZE", 2, 12, 29); /* 文字の大きさ(半角) */
	SetOrigParam("#MESSAGE_SIZE", 2, 23, 3); /* メッセージウィンドウの文字数 */
	SetOrigParam("#COM_MESSAGE_SIZE", 2, 23, 3); /* メッセージウィンドウの文字数 */
	SetOrigParam("#INIT_MESSAGE_SPEED", 1, 30); /* テキスト表示速度 */
	SetOrigParam("#INIT_MESSAGE_SPEED_MOD", 1, 0); /* テキスト表示 no wait */
	SetOrigParam("#MESSAGE_KEY_WAIT_USE", 1, 0); /* テキスト進行オートモード */
	SetOrigParam("#MESSAGE_KEY_WAIT_TIME", 1, 1500); /* オートモードでのキー待ち時間 */

	SetOrigParam("#GRP_DC_TIMES", 1, 4); /* 裏画面の数 */
	SetOrigParam("#MUSIC_LINEAR_PAC",1,0); /* PCM データの 8bit -> 16bit 変換を行うか */
	SetOrigParam("#MUSIC_TYPE",1,0); /* PCM データの種類 */
	SetOrigParam("#WINDOW_MSGBK_BOX",1,0); /* バックログ用のボタン */
	SetOrigParam("#WINDOW_MSGBK_LBOX_POS",4,15,7,8,0); /* バックログ用のボタン(左)の位置 */
	SetOrigParam("#WINDOW_MSGBK_RBOX_POS",4,7,7,0,0); /* バックログ用のボタン(左)の位置 */
	SetOrigParam("#MSGBK_MOD",1,0); /* バックログ用のボタンを使用するか */

	SetOrigParam("#WAKU.000.000.TYPE", 1, 5);
	SetOrigParam("#WAKU.000.000.MOVE_BOX", 5, 0, 0, 0, 0, 0); // テキストウィンドウの移動用ボタン位置
	SetOrigParam("#WAKU.000.000.CLEAR_BOX", 5, 0, 0, 0, 0, 0); //    一時消去用ボタン位置
	SetOrigParam("#WAKU.000.000.READJUMP_BOX", 5, 0, 0, 0, 0, 0); // スキップ用ボタン位置
	SetOrigParam("#WAKU.000.000.AUTOMODE_BOX", 5, 0, 0, 0, 0, 0); // オート用ボタン位置
	SetOrigParam("#WAKU.000.000.MSGBK_BOX", 5, 0, 0, 0, 0, 0); // バックログボタン位置
	SetOrigParam("#WAKU.000.000.MSGBKLEFT_BOX", 5, 0, 0, 0, 0, 0); // バックログ（進める）ボタン位置
	SetOrigParam("#WAKU.000.000.MSGBKRIGHT_BOX", 5, 0, 0, 0, 0, 0); // バックログ（戻る）ボタン位置
	SetOrigParam("#WAKU.000.000.EXBTN_000_BOX", 5, 0, 0, 0, 0, 0); // その他ボタン０位置
	SetOrigParam("#WAKU.000.000.EXBTN_001_BOX", 5, 0, 0, 0, 0, 0); // その他ボタン１位置
	SetOrigParam("#WAKU.000.000.EXBTN_002_BOX", 5, 0, 0, 0, 0, 0); // その他ボタン２位置

	SetOrigParam("#WINDOW.000.MOJI_SIZE", 1, 21); // 文字サイズ
	SetOrigParam("#WINDOW.000.MOJI_REP", 2, -1, 2); // 文字の余裕
	SetOrigParam("#WINDOW.000.MOJI_CNT", 2, 20, 3); // ウィンドウ内の文字数
	SetOrigParam("#WINDOW.000.MOJI_POS", 4, 100, 0, 180, 40); // テキスト位置。3つ目がx で1つ目がyらしい
	SetOrigParam("#WINDOW.000.MOJI_SHADOW", 1, 0); // 文字に影を付けるか
	SetOrigParam("#WINDOW.000.LUBY_SIZE", 1, 8); // ルビの文字サイズ
	SetOrigParam("#WINDOW.000.MOJI_MIN", 2, 8, 1); // 文字同士の隙間？
	SetOrigParam("#WINDOW.000.SELCOM_USE", 1, 0); // 選択肢の実装方法
	SetOrigParam("#WINDOW.000.POS", 4, 100, 0, 0, 260); // ウィンドウ位置
	SetOrigParam("#WINDOW.000.ATTR_MOD", 1, 0); // ウィンドウ色
	SetOrigParam("#WINDOW.000.ATTR", 5, -1, -1, -1, -1, -1); // ウィンドウ色
	/* SELCOM はよくわからんので無視 */
	SetOrigParam("#WINDOW.000.OPEN_ANM_MOD", 1, 0); // ウィンドウを開くときの効果らしい
	SetOrigParam("#WINDOW.000.OPEN_ANM_TIME", 1, 500);
	SetOrigParam("#WINDOW.000.CLOSE_ANM_MOD", 1, 0); // ウィンドウを閉じるときの効果らしい
	SetOrigParam("#WINDOW.000.CLOSE_ANM_TIME", 1, 500);
	SetOrigParam("#WINDOW.000.WAKU_SETNO", 1, 0); // 枠の種類
	SetOrigParam("#WINDOW.000.MOVE_USE", 1, 0); // ウィンドウ枠移動ボタン使用の可否
	SetOrigParam("#WINDOW.000.CLEAR_USE", 1, 0); // ウィンドウ枠消去ボタン使用の可否
	SetOrigParam("#WINDOW.000.READJUMP_USE", 1, 0); // スキップボタン使用の可否
	SetOrigParam("#WINDOW.000.AUTOMODE_USE", 1, 0); // スキップボタン使用の可否
	SetOrigParam("#WINDOW.000.MSGBK_USE", 1, 0); // バックログボタン使用の可否
	SetOrigParam("#WINDOW.000.MSGBKLEFT_USE", 1, 0); // バックログ（進む）ボタン使用の可否
	SetOrigParam("#WINDOW.000.MSGBKRIGHT_USE", 1, 0); // バックログ（戻る）ボタン使用の可否
	SetOrigParam("#WINDOW.000.EXBTN_000_USE", 1, 0); // その他ボタン０使用の可否
	SetOrigParam("#WINDOW.000.EXBTN_001_USE", 1, 0); // その他ボタン１使用の可否
	SetOrigParam("#WINDOW.000.EXBTN_002_USE", 1, 0); // その他ボタン２使用の可否
	SetOrigParam("#WINDOW.000.NAME_MOD", 1, 0); // 名前ウィンドウを別途使用するか
	SetOrigParam("#WINDOW.000.NAME_MOJI_SIZE", 1, 20); // 名前フォントのサイズ
	SetOrigParam("#WINDOW.000.NAME_MOJI_POS", 2, 0, 0); // 名前ウィンドウの文字の位置
	SetOrigParam("#WINDOW.000.NAME_MOJI_MIN", 1, 0); // 名前ウィンドウの幅
	SetOrigParam("#WINDOW.000.NAME_CENTERING", 1, 1); // 名前のセンタリングの有無
	SetOrigParam("#WINDOW.000.NAME_POS", 2, 159, 78); // 名前ウィンドウ位置（左下位置らしい）
	SetOrigParam("#WINDOW.000.NAME_WAKU_SETNO", 1, -1); // 名前ウィンドウ位置（左下位置らしい）
	SetOrigParam("#WINDOW.000.FACE.000", 5, 0, 0, 1, 1, 1); // 顔ウィンドウ位置(始め２つがx,y、MOJI_POSからの相対位置なのに注意)
	SetOrigParam("#WINDOW.000.KEYCUR_MOD", 3, 0, 0, 0); // リターンカーソルの位置


	SetOrigParam("#CURSOR.000.SIZE", 2, 0, 0); // リターンカーソルの大きさ
	SetOrigParam("#CURSOR.000.CONT", 1, 50); // リターンカーソルの繰り返し数
	SetOrigParam("#CURSOR.000.SPEED", 1, 1000); // ブリンクする速さ

	SetOrigParam("#SELBTN.000.CENTERING", 2, 0, 0);
	SetOrigParam("#SELBTN.000.BASEPOS", 2, 0, 0); // 選択肢ウィンドウの位置
	SetOrigParam("#SELBTN.000.REPPOS", 2, 0, 50); // 選択肢ウィンドウの次の位置（相対）
	SetOrigParam("#SELBTN.000.MOJISIZE", 4, 26, 0,0,0); // 文字の大きさ
	SetOrigParam("#SELBTN.000.MOJIDEFAULTCOL", 1, 0); // 非選択時の文字色
	SetOrigParam("#SELBTN.000.MOJISELECTCOL", 1, 0); // 選択時の文字色

	SetOrigParam("#COLOR_TABLE.000", 3, 255,255,255);
	SetOrigParam("#SHAKE.000", 3, 0,0,0);

	SetOrigParam("#SELR.000",16,0,0,640,480,0,0,500,50,0,0,0,0,0,0,255,0);
	SetOrigParam("#SEL.000", 15,0,0,639,479,0,0, 32, 4,0,0,0,0,0,0,0); 

	SetOrigParam("#SCREENSIZE_MOD", 1, 0); /* 0 = 640x480; 1 = 800x600 */
	
	SetOrigParam("#LASTSAVE", 1, 0);
	
	SetOrigParam("#VOLMOD", 4, 128, 128, 128, 128);
}
AyuSysConfig::~AyuSysConfig(void) {
	delete str_config;
	delete int_config;
}

static int SplitVar(const char* str, int* ret_var, int ret_size) {
	/* , あるいは ),:( をセパレータとして、-?[0-9]+ の
	** フォーマットの数値列を読み込む。先頭に (、末尾に ) が付きうる。
	** (),-[0-9] 以外の文字があったらそこで終了
	** 得られたデータ数を返す
	*/
	if (*str == '(') str++;
	int i; for (i=0; i<ret_size; i++) {
		int c; int is_positive = 1;
		/* セパレータの読み飛ばし */
		c = *str;
		if (c == ',' || c == ':') {
			str++;
		} else if (c == ')' && str[1] == '(') {
			str += 2;
		}
		/* - を parse */
		c = *str;
		if (c == '-' && isdigit(str[1])) {
			is_positive = -1; str++;
		} else if (! isdigit(c)) {
			return i; /* 異常な文字を見つけた：終了 */
		}
		int number = 0;
		/* 数字読み込み */
		while(isdigit( (c=*str) )) {
			number *= 10;
			number += c-'0';
			str++;
		}
		ret_var[i] = is_positive * number;
	}
	return i;
}
/* 決められた数の引数を得る。-1 ならエラーが生じた */
static inline int SplitVar(const char* str, int& var1) {
	if (SplitVar(str, &var1, 1) != 1) return -1;
	return 0;
}
static inline int SplitVar(const char* str, int& var1, int& var2) {
	int vars[2];
	if (SplitVar(str, vars, 2) != 2) return -1;
	var1 = vars[0]; var2 = vars[1];
	return 0;
}
static inline int SplitVar(const char* str, int& var1, int& var2, int& var3) {
	int vars[3];
	if (SplitVar(str, vars, 3) != 3) return -1;
	var1 = vars[0]; var2 = vars[1]; var3 = vars[2];
	return 0;
}
static inline int SplitVar(const char* str, int& var1, int& var2, int& var3, int& var4) {
	int vars[4];
	if (SplitVar(str, vars, 4) != 4) return -1;
	var1 = vars[0]; var2 = vars[1]; var3 = vars[2]; var4 = vars[3];
	return 0;
}

bool AyuSysConfig::LoadInitFile(void)
{
	FileSearcher* file_searcher = FileSearcher::GetInstance();

	char buf[1024]; int i;
	char* tokens[MAXTOKEN]; int token_deal; int buf_ptr;
	int numbers[MAXVARS];

	ARCINFO* info = file_searcher->Find(FileSearcher::ROOT, "gameexe.ini");
	if (info == NULL) return false;
	int size = info->Size();
	unsigned char* buf_orig = (unsigned char*)info->Read();
	if (size <= 0 || buf_orig == NULL) {
		delete info; return false;
	}
	unsigned char* buf_end = buf_orig + size;
	int line_count = 0;
	while(buf_orig < buf_end) {
		/* buf_orig から一行読み込む */
		/* その際に、
		** ・頭が # 以外なら次の行までとばす
		** ・"" 外のスペース、TABを初めとする制御文字 (0x20 以下のASCIIコード)を削除
		** ・= で区切る。区切りは最大で10個で、tokens に代入される
		** などの操作を行う
		*/

		/* # チェック */
		if (*buf_orig != '#') {
			/* 次の '\n' まで読み飛ばし */
			while(buf_orig < buf_end &&
				*buf_orig != '\n' && *buf_orig != '\r') buf_orig++;
			if (buf_orig < buf_end-1 && *buf_orig == '\r' && buf_orig[1] == '\n') buf_orig += 2;
			else if (*buf_orig == '\r' || *buf_orig == '\n') buf_orig++;
			line_count++;
			continue;
		}
		/* 初期化 */
		token_deal = 1;
		tokens[0] = buf;
		buf_ptr = NULL;
		int in_quote = 0;

		while(buf_orig < buf_end && buf_ptr < 1023) {
			if (in_quote) {
				/* "" の中 */
				int c = *buf_orig;
				if (c == '\n' || c == '\r') {
					break;
				} else if (c == '\"') {
					in_quote = 0;
				} else {
					buf[buf_ptr++] = c;
				}
				buf_orig++;
			} else { /* quote されてない */
				/* 制御文字を読み飛ばす */
				while(*buf_orig <= 0x20 && buf_orig < buf_end &&
					*buf_orig != '\n' && *buf_orig != '\r') buf_orig++;
				int c = *buf_orig;
				if (c == '\n' || c == '\r') break;
				/* = なら次の token */
				if (c == '=') {
					c = 0;
					tokens[token_deal++] = buf+buf_ptr+1;
					if (token_deal >= MAXTOKEN) break;
				} else if (c == '\"') {
					in_quote = 1; buf_orig++; continue;
				}
				buf[buf_ptr++] = c;
				buf_orig++;
			}
		}
		buf[buf_ptr] = '\0';
		/* 末尾の \r\n を消去 */
		if (buf_orig < buf_end-1 && buf_orig[0] == '\r' && buf_orig[1] == '\n') buf_orig += 2;
		else if (buf_orig < buf_end && (buf_orig[0] == '\r' || buf_orig[0] == '\n')) buf_orig++;
		/* 必要なら parse 内容を出力 */
		dprintf(("line %3d ",line_count));
		for (i=0; i<token_deal; i++) {
			dprintf(("%d:\"%s\", ",i,tokens[i]));
		}
		dprintf(("\n"));
		if (in_quote) {
			fprintf(stderr, "Warning : open quote is found while parsing gameexe.ini, line %d\n",line_count);
		}


		/* 得られた内容を parse */

		/* #NAME=<文字列> */
		int type = SearchParam(tokens[0]);
		if (type == 1) { /* #NAME=<文字列> */
			if (token_deal != 2) {
				dprintf(("Parse error, line %d, %s\n",line_count, tokens[0]));
				goto parse_error;
			}
			SetOrigParaStr(tokens[0], tokens[1]);
			goto parse_end;
		} else if (type == 2) { /* #NAME=<数値列> */
			if (token_deal != 2) {
				dprintf(("Parse error, line %d, %s\n",line_count, tokens[0]));
				goto parse_error;
			}
			int number_deal = SplitVar(tokens[1], numbers, MAXVARS);
			SetOrigParamArray(tokens[0], number_deal, numbers);
			goto parse_end;
		}
		/* 一般的な設定以外 : cdrom track など */
		if (strncmp(tokens[0],"#NAME.", 6) == 0) {
			if (token_deal != 2) goto parse_error;
			SetOrigParaStr(tokens[0], tokens[1]);
			goto parse_end;
		} else if (strncmp(tokens[0],"#DIRC.",6) == 0) {
			if (token_deal != 3) goto parse_error;
			/* ファイル形式の指定 */
			FileSearcher::FILETYPE type;
			char* name = tokens[0]+6;
			if (strcmp(name, "PDT") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "G00") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "GRP") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "TXT") == 0) type = FileSearcher::SCN;
			else if (strcmp(name, "ANM") == 0) type = FileSearcher::ANM; 
			else if (strcmp(name, "ARD") == 0) type = FileSearcher::ARD;
			else if (strcmp(name, "CUR") == 0) type = FileSearcher::CUR;
			else if (strcmp(name, "WAV") == 0) type = FileSearcher::WAV;
			else if (strcmp(name, "KOE") == 0) type = FileSearcher::KOE;
			else if (strcmp(name, "GAN") == 0) type = FileSearcher::GAN;
			else goto parse_error; /* 他に ALL,ROOT,MID,KOE,BGM。たぶん、存在しない */
			if (tokens[2][0] == 'N') { /* directory */
				file_searcher->SetFileInformation(type, FileSearcher::ATYPE_DIR, tokens[1]);
				dprintf(("set file directory; type %s, directory %s\n",name,tokens[1]));
			} else if (tokens[2][0] == 'P' && tokens[2][1] == ':') { /* アーカイブ */
				file_searcher->SetFileInformation(type, FileSearcher::ATYPE_ARC, tokens[2]+2);
				dprintf(("set file archive; type %s, file %s\n",name,tokens[2]+2));
			} else goto parse_error;
			goto parse_end;
		}
		if (strncmp(tokens[0],"#ADRC.",6) == 0) {
			if (token_deal != 3) goto parse_error;
			/* ファイル形式の指定 */
			FileSearcher::FILETYPE type;
			char* name = tokens[0]+6;
			if (strcmp(name, "PDT") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "G00") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "GRP") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "TXT") == 0) type = FileSearcher::SCN;
			else if (strcmp(name, "ANM") == 0) type = FileSearcher::ANM; 
			else if (strcmp(name, "ARD") == 0) type = FileSearcher::ARD;
			else if (strcmp(name, "CUR") == 0) type = FileSearcher::CUR;
			else if (strcmp(name, "WAV") == 0) type = FileSearcher::WAV;
			else if (strcmp(name, "KOE") == 0) type = FileSearcher::KOE;
			else if (strcmp(name, "GAN") == 0) type = FileSearcher::GAN;
			else goto parse_error; /* 他に ALL,ROOT,MID,KOE,BGM。たぶん、存在しない */
			if (tokens[2][0] == 'N') { /* directory */
				file_searcher->AppendFileInformation(type, FileSearcher::ATYPE_DIR, tokens[1]);
				dprintf(("set file directory; type %s, directory %s\n",name,tokens[1]));
			} else if (tokens[2][0] == 'P' && tokens[2][1] == ':') { /* アーカイブ */
				file_searcher->AppendFileInformation(type, FileSearcher::ATYPE_ARC, tokens[2]+2);
				dprintf(("set file archive; type %s, file %s\n",name,tokens[2]+2));
			} else if (tokens[2][0] == 'R' && tokens[2][1] == ':') { /* それ散るアーカイブ */
				file_searcher->AppendFileInformation(type, FileSearcher::ATYPE_ARC, tokens[2]+2);
				dprintf(("set file archive; type %s, file %s\n",name,tokens[2]+2));
			} else goto parse_error;
			goto parse_end;
		}
		if (strncmp(tokens[0],"#FOLDNAME.",10) == 0) {
			if (token_deal != 3) goto parse_error;
			/* ファイル形式の指定 */
			FileSearcher::FILETYPE type;
			char* name = tokens[0]+10;
			if (strcmp(name, "PDT") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "G00") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "GRP") == 0) type = FileSearcher::PDT;
			else if (strcmp(name, "TXT") == 0) type = FileSearcher::SCN;
			else if (strcmp(name, "ANM") == 0) type = FileSearcher::ANM; 
			else if (strcmp(name, "ARD") == 0) type = FileSearcher::ARD;
			else if (strcmp(name, "CUR") == 0) type = FileSearcher::CUR;
			else if (strcmp(name, "WAV") == 0) type = FileSearcher::WAV;
			else if (strcmp(name, "BGM") == 0) type = FileSearcher::BGM;
			else if (strcmp(name, "GAN") == 0) type = FileSearcher::GAN;
			else goto parse_error; /* 他に ALL,ROOT,MID,KOE,BGM。たぶん、存在しない */
			if (tokens[2][0] == '0') { /* directory */
				file_searcher->AppendFileInformation(type, FileSearcher::ATYPE_DIR, tokens[1]);
				dprintf(("set file directory; type %s, directory %s\n",name,tokens[1]));
			} else if (tokens[2][0] == '1' && tokens[2][1] == ':') { /* アーカイブ */
				file_searcher->AppendFileInformation(type, FileSearcher::ATYPE_SCN2k, tokens[2]+2);
				dprintf(("set file archive; type %s, file %s\n",name,tokens[2]+2));
			} else goto parse_error;
			goto parse_end;
		}
		if (strcmp(tokens[0], "#CDTRACK") == 0) {
			if (token_deal != 3) goto parse_error;
			track_name.AddCDROM(tokens[2], atoi(tokens[1]));
			dprintf(("Set CDTRACK, name %s, track %d\n",tokens[2], atoi(tokens[1])));
			goto parse_end;
		}
		if (strcmp(tokens[0], "#DSTRACK") == 0) {
			/* #DSTRACK=00000000-99999000-00782556="filename"   ="name"       */
			/* #DSTRACK=00000000-99999000-00782556="name"       */
			/* 第二トークンの３つめのパラメータを得る（繰り返しの時の再生開始位置） */
			int start_pt = 0;
			const char* tk1 = strchr(tokens[1], '-');
			const char* tk2 = NULL;
			if (tk1 && *tk1) tk2 = strchr(tk1+1, '-');
			if (tk2 && *tk2) start_pt = atoi(tk2+1);
			if (token_deal == 3) {
				track_name.AddWave(tokens[2], tokens[2], start_pt);
				dprintf(("Set Wave track, name %s\n",tokens[2]));
			} else if (token_deal == 4) {
				track_name.AddWave(tokens[3], tokens[2], start_pt);
				dprintf(("Set Wave track, name %s, file %s\n",tokens[3], tokens[2]));
			} else goto parse_error;
			goto parse_end;
		}
		if (strncmp(tokens[0], "#SE.", 4) == 0) {
			/* SE.XXX="XXX"=X */
			if (token_deal == 2) {
				track_name.AddSE(atoi(tokens[0]+4), tokens[1]);
			} else if (token_deal == 3) {
				if (atoi(tokens[2]) != 0) {
					track_name.AddSE(atoi(tokens[0]+4), tokens[1]);
				}
			}
			dprintf(("Set SE %d, name %s\n",atoi(tokens[0]+4), tokens[1]));
			goto parse_end;
		}
		/* 設定項目が見つからなかった */
		dprintf(("Cannot find configuration name: %s\n",tokens[0]));
	parse_error:
	parse_end:
		line_count++;
	}
	delete info;
	/* デフォルトのオプションを指定する */
	// set_game(GetParaStr("#REGNAME"), *this);
	return true;
}

TrackName::TrackName(void) {
	deal = 1;
	track = new char*[deal];
	track_wave = new char*[deal];
	track_num = new int[deal];
	track_start = new int[deal];
	int i; for (i=0; i<deal; i++) track[i] = 0;
	for (i=0; i<deal; i++) track_wave[i] = 0;
	se_deal = 10;
	se_track = new char*[se_deal];
	for (i=0; i<se_deal; i++) se_track[i] = 0;
}

TrackName::~TrackName() {
	int i; for (i=0; i<deal; i++) {
		if (track[i] != 0) delete[] track[i];
		if (track_wave[i] != 0) delete[] track_wave[i];
	}
	for (i=0; i<se_deal; i++) {
		if (se_track[i]) delete[] se_track[i];
	}
	delete[] track;
	delete[] track_wave;
	delete[] track_num;
	delete[] track_start;
	delete[] se_track;
}
void TrackName::Expand(void) {
	int new_deal = deal * 2;
	int* new_track_num = new int[new_deal];
	int* new_track_start = new int[new_deal];
	char** new_track = new char*[new_deal];
	char** new_track_wave = new char*[new_deal];
	int i; for (i=0; i<deal; i++) {
		new_track_num[i] = track_num[i];
		new_track_start[i] = track_start[i];
		new_track[i] = track[i];
		new_track_wave[i] = track_wave[i];
	}
	for (; i<new_deal; i++) { 
		new_track_num[i] = 0;
		new_track_start[i] = 0;
		new_track[i] = 0;
		new_track_wave[i] = 0;
	}
	deal = new_deal;
	delete[] track; track = new_track;
	delete[] track_num; track_num= new_track_num;
	delete[] track_start; track_start= new_track_start;
	delete[] track_wave; track_wave = new_track_wave;
}
void TrackName::ExpandSE(int n) {
	if (n < 0) return;
	n += 10;
	if (se_deal >= n) return;
	char** new_se = new char*[n];
	int i; for (i=0; i<se_deal; i++) new_se[i] = se_track[i];
	for (; i<n; i++) new_se[i] = 0;
	delete[] se_track;
	se_deal = n; se_track = new_se;
}
void TrackName::AddCDROM(char* name, int tk) {
	if (CDTrack(name) != -1) return;
	int i; for (i=0; i<deal; i++) {
		if (track[i] == 0) break;
	}
	int num = i;
	if (i == deal) Expand();
	track[num] = new char[strlen(name)+1];
	for (i=0; name[i] != 0; i++) track[num][i] = tolower(name[i]);
	track[num][i] = 0;
	track_num[num] = tk;
}
void TrackName::AddWave(char* name, char* file, int pt) {
	if (CDTrack(name) != -1) return;
	int i; for (i=0; i<deal; i++) {
		if (track[i] == 0) break;
	}
	int num = i;
	if (i == deal) Expand();
	track_num[num] = 0;
	track_start[num] = pt;
	track[num] = new char[strlen(name)+1];
	for (i=0; name[i] != 0; i++) track[num][i] = tolower(name[i]);
	track[num][i] = 0;
	track_wave[num] = new char[strlen(file)+1]; strcpy(track_wave[num], file);
}
int TrackName::CDTrack(char* name) {
	char buf[1024];
	int i;
	for (i=0; name[i]!=0; i++) buf[i]=tolower(name[i]);
	buf[i]=0;
	for (i=0; i<deal; i++) {
		if (track[i] == 0) return -1;
		if (strcmp(track[i],  buf) == 0) {
			return track_num[i];
		}
	}
	return -1;
}
int TrackName::TrackStart(char* name) {
	char buf[1024];
	int i;
	for (i=0; name[i]!=0; i++) buf[i]=tolower(name[i]);
	buf[i]=0;
	for (i=0; i<deal; i++) {
		if (track[i] == 0) return -1;
		if (strcmp(track[i],  buf) == 0) {
			return track_start[i];
		}
	}
	return 0;
}
const char* TrackName::WaveTrack(char* name) {
	char buf[1024];
	int i;
	for (i=0; name[i]!=0; i++) buf[i]=tolower(name[i]);
	buf[i]=0;
	for (i=0; i<deal; i++) {
		if (track[i] == 0) return NULL;
		if (strcmp(track[i],  buf) == 0) {
			return track_wave[i];
		}
	}
	return NULL;
}
const char* TrackName::SETrack(int n) {
	if (n < 0 || n >= se_deal) return NULL;
	return se_track[n];
}

void TrackName::AddSE(int n, char* file) {
	if (se_deal <= n) ExpandSE(n);
	if (se_track[n]) delete[] se_track[n];
	se_track[n] = new char[strlen(file)+1];
	strcpy(se_track[n], file);
}