truelight@0: #include "stdafx.h" truelight@0: #include "ttd.h" truelight@0: #include "sound.h" truelight@0: truelight@0: enum SettingDescType { truelight@0: SDT_INTX, // must be 0 truelight@0: SDT_ONEOFMANY, truelight@0: SDT_MANYOFMANY, truelight@0: SDT_BOOLX, truelight@0: SDT_STRING, truelight@0: SDT_STRINGBUF, truelight@0: SDT_INTLIST, truelight@0: truelight@0: SDT_INT8 = 0 << 4, truelight@0: SDT_UINT8 = 1 << 4, truelight@0: SDT_INT16 = 2 << 4, truelight@0: SDT_UINT16 = 3 << 4, truelight@0: SDT_INT32 = 4 << 4, truelight@0: SDT_UINT32 = 5 << 4, truelight@0: SDT_CALLBX = 6 << 4, truelight@0: truelight@0: SDT_UINT = SDT_UINT32, truelight@0: SDT_INT = SDT_INT32, truelight@0: truelight@0: SDT_NOSAVE = 1 << 8, truelight@0: truelight@0: SDT_CALLB = SDT_INTX | SDT_CALLBX, truelight@0: truelight@0: SDT_BOOL = SDT_BOOLX | SDT_UINT8, truelight@0: }; truelight@0: truelight@0: typedef struct IniFile IniFile; truelight@0: typedef struct IniItem IniItem; truelight@0: typedef struct IniGroup IniGroup; truelight@0: typedef struct SettingDesc SettingDesc; truelight@0: typedef struct MemoryPool MemoryPool; truelight@0: truelight@0: static void pool_init(MemoryPool **pool); truelight@0: static void *pool_alloc(MemoryPool **pool, uint size); truelight@0: static void *pool_strdup(MemoryPool **pool, const char *mem, uint size); truelight@0: static void pool_free(MemoryPool **pool); truelight@0: truelight@0: struct MemoryPool { truelight@0: uint pos,size; truelight@0: MemoryPool *next; truelight@0: byte mem[1]; truelight@0: }; truelight@0: truelight@0: static MemoryPool *pool_new(uint minsize) truelight@0: { truelight@0: MemoryPool *p; truelight@0: if (minsize < 4096 - 12) minsize = 4096 - 12; truelight@0: truelight@0: p = malloc(sizeof(MemoryPool) - 1 + minsize); truelight@0: p->pos = 0; truelight@0: p->size = minsize; truelight@0: p->next = NULL; truelight@0: return p; truelight@0: } truelight@0: truelight@0: static void pool_init(MemoryPool **pool) truelight@0: { truelight@0: *pool = pool_new(0); truelight@0: } truelight@0: truelight@0: static void *pool_alloc(MemoryPool **pool, uint size) truelight@0: { truelight@0: uint pos; truelight@0: MemoryPool *p = *pool; truelight@0: truelight@0: size = (size + 3) & ~3; // align everything to a 32 bit boundary truelight@0: truelight@0: // first check if there's memory in the next pool truelight@0: if (p->next && p->next->pos + size <= p->next->size) { truelight@0: p = p->next; truelight@0: // then check if there's not memory in the cur pool truelight@0: } else if (p->pos + size > p->size) { truelight@0: MemoryPool *n = pool_new(size); truelight@0: *pool = n; truelight@0: n->next = p; truelight@0: p = n; truelight@0: } truelight@0: truelight@0: pos = p->pos; truelight@0: p->pos += size; truelight@0: return p->mem + pos; truelight@0: } truelight@0: truelight@0: static void *pool_strdup(MemoryPool **pool, const char *mem, uint size) truelight@0: { truelight@0: byte *p = pool_alloc(pool, size + 1); truelight@0: p[size] = 0; truelight@0: memcpy(p, mem, size); truelight@0: return p; truelight@0: } truelight@0: truelight@0: static void pool_free(MemoryPool **pool) truelight@0: { truelight@0: MemoryPool *p = *pool, *n; truelight@0: *pool = NULL; truelight@0: while (p) { truelight@0: n = p->next; truelight@0: free(p); truelight@0: p = n; truelight@0: } truelight@0: } truelight@0: truelight@0: // structs describing the ini format. truelight@0: struct IniItem { truelight@0: char *name; truelight@0: char *value; truelight@0: char *comment; truelight@0: IniItem *next; truelight@0: }; truelight@0: truelight@0: struct IniGroup { truelight@0: char *name; // name of group truelight@0: char *comment; //comment for group truelight@0: IniItem *item, **last_item; truelight@0: IniGroup *next; truelight@0: IniFile *ini; truelight@0: }; truelight@0: truelight@0: struct IniFile { truelight@0: MemoryPool *pool; truelight@0: IniGroup *group, **last_group; truelight@0: char *comment; // last comment in file truelight@0: }; truelight@0: truelight@0: // allocate an inifile object truelight@0: static IniFile *ini_alloc() truelight@0: { truelight@0: IniFile *ini; truelight@0: MemoryPool *pool; truelight@0: pool_init(&pool); truelight@0: ini = (IniFile*)pool_alloc(&pool, sizeof(IniFile)); truelight@0: ini->pool = pool; truelight@0: ini->group = NULL; truelight@0: ini->last_group = &ini->group; truelight@0: ini->comment = NULL; truelight@0: return ini; truelight@0: } truelight@0: truelight@0: // allocate an ini group object truelight@0: static IniGroup *ini_group_alloc(IniFile *ini, const char *grpt, int len) truelight@0: { truelight@0: IniGroup *grp = pool_alloc(&ini->pool, sizeof(IniGroup)); truelight@0: grp->ini = ini; truelight@0: grp->name = pool_strdup(&ini->pool, grpt, len); truelight@0: grp->next = NULL; truelight@0: grp->item = NULL; truelight@0: grp->comment = NULL; truelight@0: grp->last_item = &grp->item; truelight@0: *ini->last_group = grp; truelight@0: ini->last_group = &grp->next; truelight@0: return grp; truelight@0: } truelight@0: truelight@0: static IniItem *ini_item_alloc(IniGroup *group, const char *name, int len) truelight@0: { truelight@0: IniItem *item = pool_alloc(&group->ini->pool, sizeof(IniItem)); truelight@0: item->name = pool_strdup(&group->ini->pool, name, len); truelight@0: item->next = NULL; truelight@0: item->comment = NULL; truelight@0: item->value = NULL; truelight@0: *group->last_item = item; truelight@0: group->last_item = &item->next; truelight@0: return item; truelight@0: } truelight@0: truelight@0: // load an ini file into the "abstract" format truelight@0: static IniFile *ini_load(const char *filename) truelight@0: { truelight@0: char buffer[1024], c, *s, *t, *e; truelight@0: FILE *in; truelight@0: IniFile *ini; truelight@0: IniGroup *group = NULL; truelight@0: IniItem *item; truelight@0: truelight@0: byte *comment = NULL; truelight@0: uint comment_size = 0; truelight@0: uint comment_alloc = 0; truelight@0: truelight@0: ini = ini_alloc(); truelight@0: truelight@0: in = fopen(filename, "r"); truelight@0: if (in == NULL) return ini; truelight@0: truelight@0: // for each line in the file truelight@0: while (fgets(buffer, sizeof(buffer), in)) { truelight@0: truelight@0: // trim whitespace from the left side truelight@0: for(s=buffer; *s == ' ' || *s == '\t'; s++); truelight@0: truelight@0: // trim whitespace from right side. truelight@0: e = s + strlen(s); truelight@0: while (e > s && ((c=e[-1]) == '\n' || c == '\r' || c == ' ' || c == '\t')) e--; truelight@0: *e = 0; truelight@0: truelight@0: // skip comments and empty lines truelight@0: if (*s == '#' || *s == 0) { truelight@0: uint ns = comment_size + (e - s + 1); truelight@0: uint a = comment_alloc; truelight@0: uint pos; truelight@0: // add to comment truelight@0: if (ns > a) { truelight@0: a = max(a, 128); truelight@0: do a*=2; while (a < ns); truelight@0: comment = realloc(comment, comment_alloc = a); truelight@0: } truelight@0: pos = comment_size; truelight@0: comment_size += (e - s + 1); truelight@0: comment[pos + e - s] = '\n'; // comment newline truelight@0: memcpy(comment + pos, s, e - s); // copy comment contents truelight@0: continue; truelight@0: } truelight@0: truelight@0: // it's a group? truelight@0: if (s[0] == '[') { truelight@0: if (e[-1] != ']') truelight@0: ShowInfoF("ini: invalid group name '%s'\n", buffer); truelight@0: else truelight@0: e--; truelight@0: s++; // skip [ truelight@0: group = ini_group_alloc(ini, s, e - s); truelight@0: if (comment_size) { truelight@0: group->comment = pool_strdup(&ini->pool, comment, comment_size); truelight@0: comment_size = 0; truelight@0: } truelight@0: } else if (group) { truelight@0: // find end of keyname truelight@0: for(t=s; *t != 0 && *t != '=' && *t != '\t' && *t != ' '; t++) {} truelight@0: truelight@0: // it's an item in an existing group truelight@0: item = ini_item_alloc(group, s, t-s); truelight@0: if (comment_size) { truelight@0: item->comment = pool_strdup(&ini->pool, comment, comment_size); truelight@0: comment_size = 0; truelight@0: } truelight@0: truelight@0: // find start of parameter truelight@0: while (*t == '=' || *t == ' ' || *t == '\t') t++; truelight@0: item->value = pool_strdup(&ini->pool, t, e - t); truelight@0: } else { truelight@0: // it's an orphan item truelight@0: ShowInfoF("ini: '%s' outside of group\n", buffer); truelight@0: } truelight@0: } truelight@0: truelight@0: if (comment_size) { truelight@0: ini->comment = pool_strdup(&ini->pool, comment, comment_size); truelight@0: comment_size = 0; truelight@0: } truelight@0: truelight@0: free(comment); truelight@0: fclose(in); truelight@0: truelight@0: return ini; truelight@0: } truelight@0: truelight@0: // lookup a group or make a new one truelight@0: static IniGroup *ini_getgroup(IniFile *ini, const char *name, int len) truelight@0: { truelight@0: IniGroup *group; truelight@0: truelight@0: if (len == -1) len = strlen(name); truelight@0: truelight@0: // does it exist already? truelight@0: for(group = ini->group; group; group = group->next) truelight@0: if (!memcmp(group->name, name, len) && group->name[len] == 0) truelight@0: return group; truelight@0: truelight@0: // otherwise make a new one truelight@0: group = ini_group_alloc(ini, name, len); truelight@0: group->comment = pool_strdup(&ini->pool, "\n", 1); truelight@0: return group; truelight@0: } truelight@0: truelight@0: // lookup an item or make a new one truelight@0: static IniItem *ini_getitem(IniGroup *group, const char *name, bool create) truelight@0: { truelight@0: IniItem *item; truelight@0: uint len = strlen(name); truelight@0: truelight@0: for(item = group->item; item; item = item->next) truelight@0: if (!strcmp(item->name, name)) truelight@0: return item; truelight@0: truelight@0: if (!create) return NULL; truelight@0: truelight@0: // otherwise make a new one truelight@0: item = ini_item_alloc(group, name, len); truelight@0: return item; truelight@0: } truelight@0: truelight@0: // save ini file from the "abstract" format. truelight@0: static bool ini_save(const char *filename, IniFile *ini) truelight@0: { truelight@0: FILE *f; truelight@0: IniGroup *group; truelight@0: IniItem *item; truelight@0: truelight@0: f = fopen(filename, "w"); truelight@0: if (f == NULL) return false; truelight@0: truelight@0: for(group = ini->group; group; group = group->next) { truelight@0: if (group->comment) fputs(group->comment, f); truelight@0: fprintf(f, "[%s]\n", group->name); truelight@0: for(item = group->item; item; item = item->next) { truelight@0: if (item->comment) fputs(item->comment, f); truelight@0: fprintf(f, "%s = %s\n", item->name, item->value ? item->value : ""); truelight@0: } truelight@0: } truelight@0: if (ini->comment) fputs(ini->comment, f); truelight@0: truelight@0: fclose(f); truelight@0: return true; truelight@0: } truelight@0: truelight@0: static void ini_free(IniFile *ini) truelight@0: { truelight@0: pool_free(&ini->pool); truelight@0: } truelight@0: truelight@0: struct SettingDesc { truelight@0: const char *name; truelight@0: int flags; truelight@0: void *def; truelight@0: void *ptr; truelight@0: void *b; truelight@0: truelight@0: }; truelight@0: truelight@0: static int lookup_oneofmany(const char *many, const char *one, int onelen) truelight@0: { truelight@0: const char *s; truelight@0: int idx; truelight@0: truelight@0: if (onelen == -1) onelen = strlen(one); truelight@0: truelight@0: // check if it's an integer truelight@0: if (*one >= '0' && *one <= '9') truelight@0: return strtoul(one, NULL, 0); truelight@0: truelight@0: idx = 0; truelight@0: for(;;) { truelight@0: // find end of item truelight@0: s = many; truelight@0: while (*s != '|' && *s != 0) s++; truelight@0: if (s - many == onelen && !memcmp(one, many, onelen)) return idx; truelight@0: if (*s == 0) return -1; truelight@0: many = s + 1; truelight@0: idx++; truelight@0: } truelight@0: } truelight@0: truelight@0: static uint32 lookup_manyofmany(const char *many, const char *str) truelight@0: { truelight@0: const char *s; truelight@0: int r; truelight@0: uint32 res = 0; truelight@0: truelight@0: for(;;) { truelight@0: // skip "whitespace" truelight@0: while (*str == ' ' || *str == '\t' || *str == '|') str++; truelight@0: if (*str == 0) break; truelight@0: truelight@0: s = str; truelight@0: while (*s != 0 && *s != ' ' && *s != '\t' && *s != '|') s++; truelight@0: truelight@0: r = lookup_oneofmany(many, str, s - str); truelight@0: if (r == -1) return (uint32)-1; truelight@0: truelight@0: res |= (1 << r); truelight@0: if (*s == 0) break; truelight@0: str = s + 1; truelight@0: } truelight@0: return res; truelight@0: } truelight@0: truelight@0: static int parse_intlist(const char *p, int *items, int maxitems) truelight@0: { truelight@0: int n = 0, v; truelight@0: char *end; truelight@0: truelight@0: for(;;) { truelight@0: v = strtol(p, &end, 0); truelight@0: if (p == end || n == maxitems) return -1; truelight@0: p = end; truelight@0: items[n++] = v; truelight@0: if (*p == 0) break; truelight@0: if (*p != ',') return -1; truelight@0: p++; truelight@0: } truelight@0: truelight@0: return n; truelight@0: } truelight@0: truelight@0: static bool load_intlist(const char *str, void *array, int nelems, int type) truelight@0: { truelight@0: int items[64]; truelight@0: int i,nitems; truelight@0: truelight@0: if (str == NULL) { truelight@0: memset(items, 0, sizeof(items)); truelight@0: nitems = nelems; truelight@0: } else { truelight@0: nitems = parse_intlist(str, items, lengthof(items)); truelight@0: if (nitems != nelems) truelight@0: return false; truelight@0: } truelight@0: truelight@0: switch(type) { truelight@0: case SDT_INT8 >> 4: truelight@0: case SDT_UINT8 >> 4: truelight@0: for(i=0; i!=nitems; i++) ((byte*)array)[i] = items[i]; truelight@0: break; truelight@0: case SDT_INT16 >> 4: truelight@0: case SDT_UINT16 >> 4: truelight@0: for(i=0; i!=nitems; i++) ((uint16*)array)[i] = items[i]; truelight@0: break; truelight@0: case SDT_INT32 >> 4: truelight@0: case SDT_UINT32 >> 4: truelight@0: for(i=0; i!=nitems; i++) ((uint32*)array)[i] = items[i]; truelight@0: break; truelight@0: default: truelight@0: NOT_REACHED(); truelight@0: } truelight@0: truelight@0: return true; truelight@0: } truelight@0: truelight@0: static void make_intlist(char *buf, void *array, int nelems, int type) truelight@0: { truelight@0: int i, v = 0; truelight@0: byte *p = (byte*)array; truelight@0: for(i=0; i!=nelems; i++) { truelight@0: switch(type) { truelight@0: case SDT_INT8 >> 4: v = *(int8*)p; p += 1; break; truelight@0: case SDT_UINT8 >> 4:v = *(byte*)p; p += 1; break; truelight@0: case SDT_INT16 >> 4:v = *(int16*)p; p += 2; break; truelight@0: case SDT_UINT16 >> 4:v = *(uint16*)p; p += 2; break; truelight@0: case SDT_INT32 >> 4:v = *(int32*)p; p += 4; break; truelight@0: case SDT_UINT32 >> 4:v = *(uint32*)p; p += 4; break; truelight@0: default: NOT_REACHED(); truelight@0: } truelight@0: buf += sprintf(buf, i ? ",%d" : "%d", v); truelight@0: } truelight@0: } truelight@0: truelight@0: static void make_oneofmany(char *buf, const char *many, int i) truelight@0: { truelight@0: int orig_i = i; truelight@0: char c; truelight@0: truelight@0: while (--i >= 0) { truelight@0: do { truelight@0: many++; truelight@0: if (many[-1] == 0) { truelight@0: sprintf(buf, "%d", orig_i); truelight@0: return; truelight@0: } truelight@0: } while (many[-1] != '|'); truelight@0: } truelight@0: truelight@0: // copy until | or 0 truelight@0: while ((c=*many++) != 0 && c != '|') truelight@0: *buf++ = c; truelight@0: *buf = 0; truelight@0: } truelight@0: truelight@0: static void make_manyofmany(char *buf, const char *many, uint32 x) truelight@0: { truelight@0: const char *start; truelight@0: int i = 0; truelight@0: bool init = true; truelight@0: truelight@0: do { truelight@0: start = many; truelight@0: while (*many != 0 && *many != '|') many++; truelight@0: if (x & 1) { truelight@0: if (!init) *buf++ = '|'; truelight@0: init = false; truelight@0: if (start == many) { truelight@0: buf += sprintf(buf, "%d", i); truelight@0: } else { truelight@0: memcpy(buf, start, many - start); truelight@0: buf += many - start; truelight@0: } truelight@0: } truelight@0: if (*many == '|') many++; truelight@0: } while (++i, x>>=1); truelight@0: *buf = 0; truelight@0: } truelight@0: truelight@0: static void *string_to_val(const SettingDesc *desc, const char *str) truelight@0: { truelight@0: unsigned long val; truelight@0: char *end; truelight@0: truelight@0: switch(desc->flags & 0xF) { truelight@0: case SDT_INTX: truelight@0: val = strtol(str, &end, 0); truelight@0: if (*end != 0) ShowInfoF("ini: trailing characters at end of setting '%s'", desc->name); truelight@0: return (void*)val; truelight@0: case SDT_ONEOFMANY: { truelight@0: int r = lookup_oneofmany((char*)desc->b, str, -1); truelight@0: if (r != -1) return (void*)r; truelight@0: ShowInfoF("ini: invalid value '%s' for '%s'", str, desc->name); truelight@0: return 0; truelight@0: } truelight@0: case SDT_MANYOFMANY: { truelight@0: uint32 r = lookup_manyofmany(desc->b, str); truelight@0: if (r != (uint32)-1) return (void*)r; truelight@0: ShowInfoF("ini: invalid value '%s' for '%s'", str, desc->name); truelight@0: return 0; truelight@0: } truelight@0: case SDT_BOOLX: truelight@0: if (!strcmp(str, "true") || !strcmp(str, "on") || !strcmp(str, "1")) truelight@0: return (void*)true; truelight@0: if (!strcmp(str, "false") || !strcmp(str, "off") || !strcmp(str, "0")) truelight@0: return (void*)false; truelight@0: ShowInfoF("ini: invalid setting value '%s' for '%s'", str, desc->name); truelight@0: break; truelight@0: truelight@0: case SDT_STRING: truelight@0: case SDT_STRINGBUF: truelight@0: case SDT_INTLIST: truelight@0: return (void*)str; truelight@0: } truelight@0: truelight@0: return NULL; truelight@0: } truelight@0: truelight@0: static void load_setting_desc(IniFile *ini, const SettingDesc *desc, void *grpname, void *base) truelight@0: { truelight@0: IniGroup *group_def = ini_getgroup(ini, grpname, -1), *group; truelight@0: IniItem *item; truelight@0: void *p; truelight@0: void *ptr; truelight@0: truelight@0: for (;desc->name;desc++) { truelight@0: // group override? truelight@0: const char *s = strchr(desc->name, '.'); truelight@0: if (s) { truelight@0: group = ini_getgroup(ini, desc->name, s - desc->name); truelight@0: s++; truelight@0: } else { truelight@0: s = desc->name; truelight@0: group = group_def; truelight@0: } truelight@0: truelight@0: item = ini_getitem(group, s, false); truelight@0: if (!item) { truelight@0: p = desc->def; truelight@0: } else { truelight@0: p = string_to_val(desc, item->value); truelight@0: } truelight@0: truelight@0: // get ptr to array truelight@0: ptr = desc->ptr; truelight@0: if ( (uint32)ptr < 0x10000) truelight@0: ptr = (byte*)base + (uint32)ptr; truelight@0: truelight@0: switch(desc->flags & 0xF) { truelight@0: // all these are stored in the same way truelight@0: case SDT_INTX: truelight@0: case SDT_ONEOFMANY: truelight@0: case SDT_MANYOFMANY: truelight@0: case SDT_BOOLX: truelight@0: switch(desc->flags >> 4 & 7) { truelight@0: case SDT_INT8 >> 4: truelight@0: case SDT_UINT8 >> 4: truelight@0: *(byte*)ptr = (byte)(uint)p; truelight@0: break; truelight@0: case SDT_INT16 >> 4: truelight@0: case SDT_UINT16 >> 4: truelight@0: *(uint16*)ptr = (uint16)(uint)p; truelight@0: break; truelight@0: case SDT_INT32 >> 4: truelight@0: case SDT_UINT32 >> 4: truelight@0: *(uint32*)ptr = (uint32)p; truelight@0: break; truelight@0: default: truelight@0: NOT_REACHED(); truelight@0: } truelight@0: break; truelight@0: case SDT_STRING: truelight@0: if (*(char**)ptr) free(*(char**)ptr); truelight@0: *(char**)ptr = strdup((char*)p); truelight@0: break; truelight@0: case SDT_STRINGBUF: truelight@0: if (p) ttd_strlcpy((char*)ptr, p, desc->flags >> 16); truelight@0: break; truelight@0: case SDT_INTLIST: { truelight@0: if (!load_intlist(p, ptr, desc->flags >> 16, desc->flags >> 4 & 7)) truelight@0: ShowInfoF("ini: error in array '%s'", desc->name); truelight@0: break; truelight@0: } truelight@0: default: truelight@0: NOT_REACHED(); truelight@0: } truelight@0: } truelight@0: } truelight@0: truelight@0: static void save_setting_desc(IniFile *ini, const SettingDesc *desc, void *grpname, void *base) truelight@0: { truelight@0: IniGroup *group_def = NULL, *group; truelight@0: IniItem *item; truelight@0: void *p, *ptr; truelight@0: int i = 0; truelight@0: char buf[512]; // setting buffer truelight@0: const char *s; truelight@0: truelight@0: for (;desc->name;desc++) { truelight@0: if (desc->flags & SDT_NOSAVE) truelight@0: continue; truelight@0: truelight@0: // group override? truelight@0: s = strchr(desc->name, '.'); truelight@0: if (s) { truelight@0: group = ini_getgroup(ini, desc->name, s - desc->name); truelight@0: s++; truelight@0: } else { truelight@0: if (group_def == NULL) truelight@0: group_def = ini_getgroup(ini, grpname, -1); truelight@0: s = desc->name; truelight@0: group = group_def; truelight@0: } truelight@0: truelight@0: item = ini_getitem(group, s, true); truelight@0: truelight@0: // get ptr to array truelight@0: ptr = desc->ptr; truelight@0: if ( (uint32)ptr < 0x10000) truelight@0: ptr = (byte*)base + (uint32)ptr; truelight@0: truelight@0: if (item->value != NULL) { truelight@0: // check if the value is the same as the old value truelight@0: p = string_to_val(desc, item->value); truelight@0: truelight@0: switch(desc->flags & 0xF) { truelight@0: case SDT_INTX: truelight@0: case SDT_ONEOFMANY: truelight@0: case SDT_MANYOFMANY: truelight@0: case SDT_BOOLX: truelight@0: switch(desc->flags >> 4 & 7) { truelight@0: case SDT_INT8 >> 4: truelight@0: case SDT_UINT8 >> 4: truelight@0: if (*(byte*)ptr == (byte)(uint)p) truelight@0: continue; truelight@0: break; truelight@0: case SDT_INT16 >> 4: truelight@0: case SDT_UINT16 >> 4: truelight@0: if (*(uint16*)ptr == (uint16)(uint)p) truelight@0: continue; truelight@0: break; truelight@0: case SDT_INT32 >> 4: truelight@0: case SDT_UINT32 >> 4: truelight@0: if (*(uint32*)ptr == (uint32)p) truelight@0: continue; truelight@0: break; truelight@0: default: truelight@0: NOT_REACHED(); truelight@0: } truelight@0: break; truelight@0: case SDT_STRING: truelight@0: assert(0); truelight@0: break; truelight@0: case SDT_INTLIST: truelight@0: // assume intlist is always changed. truelight@0: break; truelight@0: } truelight@0: } truelight@0: truelight@0: switch(desc->flags & 0xF) { truelight@0: case SDT_INTX: truelight@0: case SDT_ONEOFMANY: truelight@0: case SDT_MANYOFMANY: truelight@0: case SDT_BOOLX: truelight@0: switch(desc->flags >> 4 & 7) { truelight@0: case SDT_INT8 >> 4: i = *(int8*)ptr; break; truelight@0: case SDT_UINT8 >> 4:i = *(byte*)ptr; break; truelight@0: case SDT_INT16 >> 4:i = *(int16*)ptr; break; truelight@0: case SDT_UINT16 >> 4:i = *(uint16*)ptr; break; truelight@0: case SDT_INT32 >> 4:i = *(int32*)ptr; break; truelight@0: case SDT_UINT32 >> 4:i = *(uint32*)ptr; break; truelight@0: default: truelight@0: NOT_REACHED(); truelight@0: } truelight@0: switch(desc->flags & 0xF) { truelight@0: case SDT_INTX: truelight@0: sprintf(buf, "%d", i); truelight@0: break; truelight@0: case SDT_ONEOFMANY: truelight@0: make_oneofmany(buf, (char*)desc->b, i); truelight@0: break; truelight@0: case SDT_MANYOFMANY: truelight@0: make_manyofmany(buf, (char*)desc->b, i); truelight@0: break; truelight@0: case SDT_BOOLX: truelight@0: strcpy(buf, i ? "true" : "false"); truelight@0: break; truelight@0: default: truelight@0: NOT_REACHED(); truelight@0: } truelight@0: break; truelight@0: case SDT_STRINGBUF: truelight@0: strcpy(buf, (char*)ptr); truelight@0: break; truelight@0: case SDT_STRING: truelight@0: strcpy(buf, *(char**)ptr); truelight@0: break; truelight@0: case SDT_INTLIST: truelight@0: make_intlist(buf, ptr, desc->flags >> 16, desc->flags >> 4 & 7); truelight@0: break; truelight@0: } truelight@0: // the value is different, that means we have to write it to the ini truelight@0: item->value = pool_strdup(&ini->pool, buf, strlen(buf)); truelight@0: } truelight@0: } truelight@0: truelight@0: //*************************** truelight@0: // TTD specific INI stuff truelight@0: //*************************** truelight@0: truelight@0: static const SettingDesc music_settings[] = { truelight@0: {"playlist", SDT_UINT8, (void*)0, (void*)offsetof(MusicFileSettings, playlist) }, truelight@0: {"music_vol", SDT_UINT8, (void*)128, (void*)offsetof(MusicFileSettings, music_vol) }, truelight@0: {"effect_vol", SDT_UINT8, (void*)128, (void*)offsetof(MusicFileSettings, effect_vol) }, truelight@0: {"custom_1", SDT_INTLIST | SDT_UINT8 | lengthof(msf.custom_1) << 16, NULL, (void*)offsetof(MusicFileSettings, custom_1) }, truelight@0: {"custom_2", SDT_INTLIST | SDT_UINT8 | lengthof(msf.custom_2) << 16, NULL, (void*)offsetof(MusicFileSettings, custom_2) }, truelight@0: {"playing", SDT_BOOL, (void*)true, (void*)offsetof(MusicFileSettings, btn_down) }, truelight@0: {"shuffle", SDT_BOOL, (void*)false, (void*)offsetof(MusicFileSettings, shuffle) }, truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: static const SettingDesc win32_settings[] = { truelight@0: {"display_hz", SDT_UINT, (void*)0, &_display_hz}, truelight@0: {"force_full_redraw", SDT_BOOL, (void*)false, &_force_full_redraw}, truelight@0: {"fullscreen_bpp", SDT_UINT, (void*)8, &_fullscreen_bpp}, truelight@0: {"double_size", SDT_BOOL, (void*)false, &_double_size}, truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: static const SettingDesc misc_settings[] = { truelight@0: {"display_opt", SDT_MANYOFMANY | SDT_UINT8, (void*)(DO_SHOW_TOWN_NAMES|DO_SHOW_STATION_NAMES|DO_SHOW_SIGNS|DO_FULL_ANIMATION|DO_FULL_DETAIL|DO_TRANS_BUILDINGS|DO_CHECKPOINTS), &_display_opt, "SHOW_TOWN_NAMES|SHOW_STATION_NAMES|SHOW_SIGNS|FULL_ANIMATION|TRANS_BUILDINGS|FULL_DETAIL|CHECKPOINTS"}, truelight@0: {"news_display_opt", SDT_UINT16, (void*)-1, &_news_display_opt}, truelight@0: {"fullscreen", SDT_BOOL, (void*)false, &_fullscreen}, truelight@0: {"videodriver", SDT_STRINGBUF | (lengthof(_ini_videodriver)<<16) | SDT_NOSAVE, NULL, _ini_videodriver}, truelight@0: {"musicdriver", SDT_STRINGBUF | (lengthof(_ini_musicdriver)<<16) | SDT_NOSAVE, NULL, _ini_musicdriver}, truelight@0: {"sounddriver", SDT_STRINGBUF | (lengthof(_ini_sounddriver)<<16) | SDT_NOSAVE, NULL, _ini_sounddriver}, truelight@0: {"language", SDT_STRINGBUF | lengthof(_dynlang.curr_file)<<16, NULL, _dynlang.curr_file }, truelight@0: {"resolution", SDT_UINT16 | SDT_INTLIST | lengthof(_cur_resolution) << 16, "640,480", _cur_resolution}, truelight@0: {"cache_sprites", SDT_BOOL, (void*)false, &_cache_sprites}, truelight@0: {"screenshot_format", SDT_STRINGBUF | (lengthof(_screenshot_format_name)<<16), NULL, _screenshot_format_name}, truelight@0: {"savegame_format", SDT_STRINGBUF | (lengthof(_savegame_format)<<16), NULL, _savegame_format}, truelight@0: {"rightclick_emulate", SDT_BOOL, (void*)false, &_rightclick_emulate}, truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: static const SettingDesc network_settings[] = { dominik@105: {"port", SDT_UINT | SDT_NOSAVE, (void*)3978, &_network_client_port}, dominik@105: {"server_port", SDT_UINT | SDT_NOSAVE, (void*)3979, &_network_server_port}, truelight@0: {"sync_freq", SDT_UINT | SDT_NOSAVE, (void*)4, &_network_sync_freq}, truelight@0: {"ahead_frames", SDT_UINT | SDT_NOSAVE, (void*)5, &_network_ahead_frames}, truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: static const SettingDesc debug_settings[] = { truelight@0: {"savedump_path", SDT_STRINGBUF | (lengthof(_savedump_path)<<16) | SDT_NOSAVE, NULL, _savedump_path}, truelight@0: {"savedump_first", SDT_UINT | SDT_NOSAVE, 0, &_savedump_first}, truelight@0: {"savedump_freq", SDT_UINT | SDT_NOSAVE, (void*)1, &_savedump_freq}, truelight@0: {"savedump_last", SDT_UINT | SDT_NOSAVE, 0, &_savedump_last}, truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: truelight@0: static const SettingDesc gameopt_settings[] = { truelight@0: {"diff_level", SDT_UINT8, (void*)9, (void*)offsetof(GameOptions, diff_level) }, truelight@0: {"diff_custom", SDT_INTLIST | SDT_UINT32 | (sizeof(GameDifficulty)/4) << 16, NULL, (void*)offsetof(GameOptions, diff) }, dominik@117: {"currency", SDT_UINT8 | SDT_ONEOFMANY, (void*)21, (void*)offsetof(GameOptions, currency), "GBP|USD|FF|DM|YEN|PT|FT|ZL|ATS|BEF|DKK|FIM|GRD|CHF|NLG|ITL|SEK|RUR|CZK|ISK|NOK|EUR" }, dominik@117: {"distances", SDT_UINT8 | SDT_ONEOFMANY, (void*)1, (void*)offsetof(GameOptions, kilometers), "imperial|metric" }, dominik@124: {"town_names", SDT_UINT8 | SDT_ONEOFMANY, (void*)0, (void*)offsetof(GameOptions, town_name), "english|french|german|american|latin|silly|swedish|dutch|finnish|polish|czech|slovakish|hungarian" }, truelight@0: {"landscape", SDT_UINT8 | SDT_ONEOFMANY, (void*)0, (void*)offsetof(GameOptions, landscape), "normal|hilly|desert|candy" }, truelight@0: {"autosave", SDT_UINT8 | SDT_ONEOFMANY, (void*)1, (void*)offsetof(GameOptions, autosave), "off|monthly|quarterly|half year|yearly" }, dominik@117: {"road_side", SDT_UINT8 | SDT_ONEOFMANY, (void*)1, (void*)offsetof(GameOptions, road_side), "left|right" }, truelight@0: truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: static const SettingDesc patch_settings[] = { truelight@0: {"vehicle_speed", SDT_BOOL, (void*)true, (void*)offsetof(Patches, vehicle_speed) }, truelight@0: {"build_on_slopes", SDT_BOOL, (void*)true, (void*)offsetof(Patches, build_on_slopes) }, truelight@0: {"mammoth_trains", SDT_BOOL, (void*)true, (void*)offsetof(Patches, mammoth_trains) }, truelight@0: {"join_stations", SDT_BOOL, (void*)true, (void*)offsetof(Patches, join_stations) }, truelight@0: {"station_spread", SDT_UINT8, (void*)12, (void*)offsetof(Patches, station_spread) }, truelight@0: {"full_load_any", SDT_BOOL, (void*)true, (void*)offsetof(Patches, full_load_any)}, dominik@55: {"order_review_system", SDT_UINT8, (void*)2, (void*)offsetof(Patches, order_review_system)}, truelight@0: truelight@0: {"inflation", SDT_BOOL, (void*)true, (void*)offsetof(Patches, inflation)}, truelight@0: {"selectgoods", SDT_BOOL, (void*)true, (void*)offsetof(Patches, selectgoods)}, truelight@0: {"longbridges", SDT_BOOL, (void*)false, (void*)offsetof(Patches, longbridges)}, truelight@0: {"gotodepot", SDT_BOOL, (void*)true, (void*)offsetof(Patches, gotodepot)}, truelight@0: truelight@0: {"build_rawmaterial_ind", SDT_BOOL, (void*)false, (void*)offsetof(Patches, build_rawmaterial_ind)}, truelight@0: {"multiple_industry_per_town", SDT_BOOL, (void*)false, (void*)offsetof(Patches, multiple_industry_per_town)}, truelight@0: {"same_industry_close", SDT_BOOL, (void*)false, (void*)offsetof(Patches, same_industry_close)}, truelight@0: truelight@0: {"lost_train_days", SDT_UINT16, (void*)180, (void*)offsetof(Patches, lost_train_days)}, truelight@0: {"train_income_warn", SDT_BOOL, (void*)true, (void*)offsetof(Patches, train_income_warn)}, truelight@0: truelight@0: {"status_long_date", SDT_BOOL, (void*)true, (void*)offsetof(Patches, status_long_date)}, truelight@0: {"signal_side", SDT_BOOL, (void*)true, (void*)offsetof(Patches, signal_side)}, truelight@0: {"show_finances", SDT_BOOL, (void*)true, (void*)offsetof(Patches, show_finances)}, truelight@0: truelight@0: {"new_nonstop", SDT_BOOL, (void*)false, (void*)offsetof(Patches, new_nonstop)}, truelight@0: {"roadveh_queue", SDT_BOOL, (void*)false, (void*)offsetof(Patches, roadveh_queue)}, truelight@0: truelight@0: {"autoscroll", SDT_BOOL, (void*)false, (void*)offsetof(Patches, autoscroll)}, truelight@0: {"errmsg_duration", SDT_UINT8, (void*)5, (void*)offsetof(Patches, errmsg_duration)}, truelight@0: {"snow_line_height", SDT_UINT8, (void*)7, (void*)offsetof(Patches, snow_line_height)}, truelight@0: truelight@0: {"bribe", SDT_BOOL, (void*)false, (void*)offsetof(Patches, bribe)}, truelight@0: {"new_depot_finding", SDT_BOOL, (void*)false, (void*)offsetof(Patches, new_depot_finding)}, truelight@0: truelight@0: {"nonuniform_stations", SDT_BOOL, (void*)false, (void*)offsetof(Patches, nonuniform_stations)}, truelight@0: {"always_small_airport", SDT_BOOL, (void*)false, (void*)offsetof(Patches, always_small_airport)}, truelight@0: {"realistic_acceleration", SDT_BOOL, (void*)false, (void*)offsetof(Patches, realistic_acceleration)}, darkvater@68: darkvater@68: {"toolbar_pos", SDT_UINT8, (void*)0, (void*)offsetof(Patches, toolbar_pos)}, truelight@0: truelight@0: {"max_trains", SDT_UINT8, (void*)80,(void*)offsetof(Patches, max_trains)}, truelight@0: {"max_roadveh", SDT_UINT8, (void*)80,(void*)offsetof(Patches, max_roadveh)}, truelight@0: {"max_aircraft", SDT_UINT8, (void*)40,(void*)offsetof(Patches, max_aircraft)}, truelight@0: {"max_ships", SDT_UINT8, (void*)50,(void*)offsetof(Patches, max_ships)}, truelight@0: darkvater@156: {"servint_ispercent", SDT_BOOL, (void*)false,(void*)offsetof(Patches, servint_ispercent)}, truelight@0: {"servint_trains", SDT_UINT16, (void*)150,(void*)offsetof(Patches, servint_trains)}, truelight@0: {"servint_roadveh", SDT_UINT16, (void*)150,(void*)offsetof(Patches, servint_roadveh)}, truelight@0: {"servint_ships", SDT_UINT16, (void*)360,(void*)offsetof(Patches, servint_ships)}, truelight@0: {"servint_aircraft", SDT_UINT16, (void*)100,(void*)offsetof(Patches, servint_aircraft)}, truelight@0: truelight@0: {"autorenew", SDT_BOOL, (void*)false,(void*)offsetof(Patches, autorenew)}, truelight@26: {"autorenew_months", SDT_INT16, (void*)-6, (void*)offsetof(Patches, autorenew_months)}, truelight@26: {"autorenew_money", SDT_INT32, (void*)100000, (void*)offsetof(Patches, autorenew_money)}, truelight@0: truelight@0: {"new_pathfinding", SDT_BOOL, (void*)false, (void*)offsetof(Patches, new_pathfinding)}, truelight@0: {"pf_maxlength", SDT_UINT16, (void*)512, (void*)offsetof(Patches, pf_maxlength)}, truelight@0: {"pf_maxdepth", SDT_UINT8, (void*)16, (void*)offsetof(Patches, pf_maxdepth)}, truelight@0: darkvater@67: truelight@0: truelight@20: {"ai_disable_veh_train", SDT_BOOL, (void*)false, (void*)offsetof(Patches, ai_disable_veh_train)}, truelight@20: {"ai_disable_veh_roadveh", SDT_BOOL, (void*)false, (void*)offsetof(Patches, ai_disable_veh_roadveh)}, truelight@20: {"ai_disable_veh_aircraft", SDT_BOOL, (void*)false, (void*)offsetof(Patches, ai_disable_veh_aircraft)}, truelight@20: {"ai_disable_veh_ship", SDT_BOOL, (void*)false, (void*)offsetof(Patches, ai_disable_veh_ship)}, truelight@0: {"starting_date", SDT_UINT32, (void*)1950, (void*)offsetof(Patches, starting_date)}, truelight@0: truelight@0: {"colored_news_date", SDT_UINT32, (void*)2000, (void*)offsetof(Patches, colored_news_date)}, truelight@0: truelight@0: {"bridge_pillars", SDT_BOOL, (void*)true, (void*)offsetof(Patches, bridge_pillars)}, dominik@91: {"invisible_trees", SDT_BOOL, (void*)false, (void*)offsetof(Patches, invisible_trees)}, truelight@0: truelight@0: {"keep_all_autosave", SDT_BOOL, (void*)false, (void*)offsetof(Patches, keep_all_autosave)}, truelight@0: truelight@0: {"extra_dynamite", SDT_BOOL, (void*)false, (void*)offsetof(Patches, extra_dynamite)}, truelight@0: truelight@0: {"never_expire_vehicles", SDT_BOOL, (void*)false, (void*)offsetof(Patches, never_expire_vehicles)}, truelight@0: {"extend_vehicle_life", SDT_UINT8, (void*)0, (void*)offsetof(Patches, extend_vehicle_life)}, truelight@0: truelight@0: {"auto_euro", SDT_BOOL, (void*)true, (void*)offsetof(Patches, auto_euro)}, truelight@0: truelight@0: {"serviceathelipad", SDT_BOOL, (void*)true, (void*)offsetof(Patches, serviceathelipad)}, truelight@0: {"smooth_economy", SDT_BOOL, (void*)false, (void*)offsetof(Patches, smooth_economy)}, truelight@0: {"dist_local_authority", SDT_UINT8, (void*)20, (void*)offsetof(Patches, dist_local_authority)}, truelight@0: truelight@0: {"wait_oneway_signal", SDT_UINT8, (void*)15, (void*)offsetof(Patches, wait_oneway_signal)}, truelight@0: {"wait_twoway_signal", SDT_UINT8, (void*)41, (void*)offsetof(Patches, wait_twoway_signal)}, truelight@84: truelight@84: {"ainew_active", SDT_BOOL, (void*)false, (void*)offsetof(Patches, ainew_active)}, truelight@0: darkvater@58: {"drag_signals_density", SDT_UINT8, (void*)4, (void*)offsetof(Patches, drag_signals_density)}, darkvater@58: truelight@0: {NULL} truelight@0: }; truelight@0: truelight@0: typedef void SettingDescProc(IniFile *ini, const SettingDesc *desc, void *grpname, void *base); truelight@0: truelight@0: static void HandleSettingDescs(IniFile *ini, SettingDescProc *proc) truelight@0: { truelight@0: proc(ini, misc_settings, "misc", NULL); truelight@0: proc(ini, win32_settings, "win32", NULL); truelight@0: proc(ini, network_settings, "network", NULL); truelight@0: proc(ini, music_settings, "music", &msf); truelight@0: proc(ini, gameopt_settings, "gameopt", &_new_opt); truelight@0: proc(ini, patch_settings, "patches", &_patches); truelight@0: truelight@0: proc(ini, debug_settings, "debug", NULL); truelight@0: } truelight@0: truelight@0: void LoadGrfSettings(IniFile *ini) truelight@0: { truelight@0: IniGroup *group = ini_getgroup(ini, "newgrf", -1); truelight@0: IniItem *item; truelight@0: int i; truelight@0: truelight@0: if (!group) truelight@0: return; truelight@0: truelight@0: for(i=0; i!=lengthof(_newgrf_files); i++) { truelight@0: char buf[3]; truelight@0: sprintf(buf, "%d", i); truelight@0: item = ini_getitem(group, buf, false); truelight@0: if (!item) truelight@0: break; truelight@0: _newgrf_files[i] = strdup(item->value); truelight@0: } truelight@0: } truelight@0: truelight@0: void LoadFromConfig() truelight@0: { truelight@0: IniFile *ini = ini_load(_config_file); truelight@0: HandleSettingDescs(ini, load_setting_desc); truelight@0: LoadGrfSettings(ini); truelight@0: ini_free(ini); truelight@0: } truelight@0: truelight@0: void SaveToConfig() truelight@0: { truelight@0: IniFile *ini = ini_load(_config_file); truelight@0: HandleSettingDescs(ini, save_setting_desc); truelight@0: ini_save(_config_file, ini); truelight@0: ini_free(ini); truelight@0: }