# settings.cpp

Go to the documentation of this file.

    00001 /* $Id: settings.cpp 24254 2012-05-15 20:54:40Z rubidium $ */
    00002
    00003 /*
    00004  * This file is part of OpenTTD.
    00005  * OpenTTD 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, version 2.
    00006  * OpenTTD 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.
    00007  * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
    00008  */
    00009
    00026 #include "stdafx.h"
    00027 #include "currency.h"
    00028 #include "screenshot.h"
    00029 #include "network/network.h"
    00030 #include "network/network_func.h"
    00031 #include "settings_internal.h"
    00032 #include "command_func.h"
    00033 #include "console_func.h"
    00034 #include "pathfinder/pathfinder_type.h"
    00035 #include "genworld.h"
    00036 #include "train.h"
    00037 #include "news_func.h"
    00038 #include "window_func.h"
    00039 #include "sound_func.h"
    00040 #include "company_func.h"
    00041 #include "rev.h"
    00042 #ifdef WITH_FREETYPE
    00043 #include "fontcache.h"
    00044 #endif
    00045 #include "textbuf_gui.h"
    00046 #include "rail_gui.h"
    00047 #include "elrail_func.h"
    00048 #include "error.h"
    00049 #include "town.h"
    00050 #include "video/video_driver.hpp"
    00051 #include "sound/sound_driver.hpp"
    00052 #include "music/music_driver.hpp"
    00053 #include "blitter/factory.hpp"
    00054 #include "base_media_base.h"
    00055 #include "gamelog.h"
    00056 #include "settings_func.h"
    00057 #include "ini_type.h"
    00058 #include "ai/ai_config.hpp"
    00059 #include "ai/ai.hpp"
    00060 #include "game/game_config.hpp"
    00061 #include "game/game.hpp"
    00062 #include "ship.h"
    00063 #include "smallmap_gui.h"
    00064 #include "roadveh.h"
    00065 #include "fios.h"
    00066 #include "strings_func.h"
    00067
    00068 #include "void_map.h"
    00069 #include "station_base.h"
    00070
    00071 #include "table/strings.h"
    00072 #include "table/settings.h"
    00073
    00074 ClientSettings _settings_client;
    00075 GameSettings _settings_game;
    00076 GameSettings _settings_newgame;
    00077 VehicleDefaultSettings _old_vds;
    00078 char *_config_file;
    00079
    00080 typedef std::list<ErrorMessageData> ErrorList;
    00081 static ErrorList _settings_error_list;
    00082
    00083
    00084 typedef void SettingDescProc(IniFile *ini, const SettingDesc *desc, const char *grpname, void *object);
    00085 typedef void SettingDescProcList(IniFile *ini, const char *grpname, StringList *list);
    00086
    00087 static bool IsSignedVarMemType(VarType vt);
    00088
    00092 static const char * const _list_group_names[] = {
    00093   "bans",
    00094   "newgrf",
    00095   "servers",
    00096   "server_bind_addresses",
    00097   NULL
    00098 };
    00099
    00107 static size_t LookupOneOfMany(const char *many, const char *one, size_t onelen = 0)
    00108 {
    00109   const char *s;
    00110   size_t idx;
    00111
    00112   if (onelen == 0) onelen = strlen(one);
    00113
    00114   /* check if it's an integer */
    00115   if (*one >= '0' && *one <= '9') return strtoul(one, NULL, 0);
    00116
    00117   idx = 0;
    00118   for (;;) {
    00119     /* find end of item */
    00120     s = many;
    00121     while (*s != '|' && *s != 0) s++;
    00122     if ((size_t)(s - many) == onelen && !memcmp(one, many, onelen)) return idx;
    00123     if (*s == 0) return (size_t)-1;
    00124     many = s + 1;
    00125     idx++;
    00126   }
    00127 }
    00128
    00136 static size_t LookupManyOfMany(const char *many, const char *str)
    00137 {
    00138   const char *s;
    00139   size_t r;
    00140   size_t res = 0;
    00141
    00142   for (;;) {
    00143     /* skip "whitespace" */
    00144     while (*str == ' ' || *str == '\t' || *str == '|') str++;
    00145     if (*str == 0) break;
    00146
    00147     s = str;
    00148     while (*s != 0 && *s != ' ' && *s != '\t' && *s != '|') s++;
    00149
    00150     r = LookupOneOfMany(many, str, s - str);
    00151     if (r == (size_t)-1) return r;
    00152
    00153     SetBit(res, (uint8)r); // value found, set it
    00154     if (*s == 0) break;
    00155     str = s + 1;
    00156   }
    00157   return res;
    00158 }
    00159
    00168 static int ParseIntList(const char *p, int *items, int maxitems)
    00169 {
    00170   int n = 0; // number of items read so far
    00171   bool comma = false; // do we accept comma?
    00172
    00173   while (*p != '\0') {
    00174     switch (*p) {
    00175       case ',':
    00176         /* Do not accept multiple commas between numbers */
    00177         if (!comma) return -1;
    00178         comma = false;
    00179         /* FALL THROUGH */
    00180       case ' ':
    00181         p++;
    00182         break;
    00183
    00184       default: {
    00185         if (n == maxitems) return -1; // we don't accept that many numbers
    00186         char *end;
    00187         long v = strtol(p, &end, 0);
    00188         if (p == end) return -1; // invalid character (not a number)
    00189         if (sizeof(int) < sizeof(long)) v = ClampToI32(v);
    00190         items[n++] = v;
    00191         p = end; // first non-number
    00192         comma = true; // we accept comma now
    00193         break;
    00194       }
    00195     }
    00196   }
    00197
    00198   /* If we have read comma but no number after it, fail.
    00199    * We have read comma when (n != 0) and comma is not allowed */
    00200   if (n != 0 && !comma) return -1;
    00201
    00202   return n;
    00203 }
    00204
    00213 static bool LoadIntList(const char *str, void *array, int nelems, VarType type)
    00214 {
    00215   int items[64];
    00216   int i, nitems;
    00217
    00218   if (str == NULL) {
    00219     memset(items, 0, sizeof(items));
    00220     nitems = nelems;
    00221   } else {
    00222     nitems = ParseIntList(str, items, lengthof(items));
    00223     if (nitems != nelems) return false;
    00224   }
    00225
    00226   switch (type) {
    00227   case SLE_VAR_BL:
    00228   case SLE_VAR_I8:
    00229   case SLE_VAR_U8:
    00230     for (i = 0; i != nitems; i++) ((byte*)array)[i] = items[i];
    00231     break;
    00232   case SLE_VAR_I16:
    00233   case SLE_VAR_U16:
    00234     for (i = 0; i != nitems; i++) ((uint16*)array)[i] = items[i];
    00235     break;
    00236   case SLE_VAR_I32:
    00237   case SLE_VAR_U32:
    00238     for (i = 0; i != nitems; i++) ((uint32*)array)[i] = items[i];
    00239     break;
    00240   default: NOT_REACHED();
    00241   }
    00242
    00243   return true;
    00244 }
    00245
    00255 static void MakeIntList(char *buf, const char *last, const void *array, int nelems, VarType type)
    00256 {
    00257   int i, v = 0;
    00258   const byte *p = (const byte *)array;
    00259
    00260   for (i = 0; i != nelems; i++) {
    00261     switch (type) {
    00262     case SLE_VAR_BL:
    00263     case SLE_VAR_I8:  v = *(const   int8 *)p; p += 1; break;
    00264     case SLE_VAR_U8:  v = *(const  uint8 *)p; p += 1; break;
    00265     case SLE_VAR_I16: v = *(const  int16 *)p; p += 2; break;
    00266     case SLE_VAR_U16: v = *(const uint16 *)p; p += 2; break;
    00267     case SLE_VAR_I32: v = *(const  int32 *)p; p += 4; break;
    00268     case SLE_VAR_U32: v = *(const uint32 *)p; p += 4; break;
    00269     default: NOT_REACHED();
    00270     }
    00271     buf += seprintf(buf, last, (i == 0) ? "%d" : ",%d", v);
    00272   }
    00273 }
    00274
    00282 static void MakeOneOfMany(char *buf, const char *last, const char *many, int id)
    00283 {
    00284   int orig_id = id;
    00285
    00286   /* Look for the id'th element */
    00287   while (--id >= 0) {
    00288     for (; *many != '|'; many++) {
    00289       if (*many == '\0') { // not found
    00290         seprintf(buf, last, "%d", orig_id);
    00291         return;
    00292       }
    00293     }
    00294     many++; // pass the |-character
    00295   }
    00296
    00297   /* copy string until next item (|) or the end of the list if this is the last one */
    00298   while (*many != '\0' && *many != '|' && buf < last) *buf++ = *many++;
    00299   *buf = '\0';
    00300 }
    00301
    00310 static void MakeManyOfMany(char *buf, const char *last, const char *many, uint32 x)
    00311 {
    00312   const char *start;
    00313   int i = 0;
    00314   bool init = true;
    00315
    00316   for (; x != 0; x >>= 1, i++) {
    00317     start = many;
    00318     while (*many != 0 && *many != '|') many++; // advance to the next element
    00319
    00320     if (HasBit(x, 0)) { // item found, copy it
    00321       if (!init) buf += seprintf(buf, last, "|");
    00322       init = false;
    00323       if (start == many) {
    00324         buf += seprintf(buf, last, "%d", i);
    00325       } else {
    00326         memcpy(buf, start, many - start);
    00327         buf += many - start;
    00328       }
    00329     }
    00330
    00331     if (*many == '|') many++;
    00332   }
    00333
    00334   *buf = '\0';
    00335 }
    00336
    00343 static const void *StringToVal(const SettingDescBase *desc, const char *orig_str)
    00344 {
    00345   const char *str = orig_str == NULL ? "" : orig_str;
    00346   switch (desc->cmd) {
    00347     case SDT_NUMX: {
    00348       char *end;
    00349       size_t val = strtoul(str, &end, 0);
    00350       if (end == str) {
    00351         ErrorMessageData msg(STR_CONFIG_ERROR, STR_CONFIG_ERROR_INVALID_VALUE);
    00352         msg.SetDParamStr(0, str);
    00353         msg.SetDParamStr(1, desc->name);
    00354         _settings_error_list.push_back(msg);
    00355         return desc->def;
    00356       }
    00357       if (*end != '\0') {
    00358         ErrorMessageData msg(STR_CONFIG_ERROR, STR_CONFIG_ERROR_TRAILING_CHARACTERS);
    00359         msg.SetDParamStr(0, desc->name);
    00360         _settings_error_list.push_back(msg);
    00361       }
    00362       return (void*)val;
    00363     }
    00364     case SDT_ONEOFMANY: {
    00365       size_t r = LookupOneOfMany(desc->many, str);
    00366       /* if the first attempt of conversion from string to the appropriate value fails,
    00367       * look if we have defined a converter from old value to new value. */
    00368       if (r == (size_t)-1 && desc->proc_cnvt != NULL) r = desc->proc_cnvt(str);
    00369       if (r != (size_t)-1) return (void*)r; // and here goes converted value
    00370
    00371       ErrorMessageData msg(STR_CONFIG_ERROR, STR_CONFIG_ERROR_INVALID_VALUE);
    00372       msg.SetDParamStr(0, str);
    00373       msg.SetDParamStr(1, desc->name);
    00374       _settings_error_list.push_back(msg);
    00375       return desc->def;
    00376     }
    00377     case SDT_MANYOFMANY: {
    00378       size_t r = LookupManyOfMany(desc->many, str);
    00379       if (r != (size_t)-1) return (void*)r;
    00380       ErrorMessageData msg(STR_CONFIG_ERROR, STR_CONFIG_ERROR_INVALID_VALUE);
    00381       msg.SetDParamStr(0, str);
    00382       msg.SetDParamStr(1, desc->name);
    00383       _settings_error_list.push_back(msg);
    00384       return desc->def;
    00385     }
    00386     case SDT_BOOLX: {
    00387       if (strcmp(str, "true")  == 0 || strcmp(str, "on")  == 0 || strcmp(str, "1") == 0) return (void*)true;
    00388       if (strcmp(str, "false") == 0 || strcmp(str, "off") == 0 || strcmp(str, "0") == 0) return (void*)false;
    00389
    00390       ErrorMessageData msg(STR_CONFIG_ERROR, STR_CONFIG_ERROR_INVALID_VALUE);
    00391       msg.SetDParamStr(0, str);
    00392       msg.SetDParamStr(1, desc->name);
    00393       _settings_error_list.push_back(msg);
    00394       return desc->def;
    00395     }
    00396
    00397     case SDT_STRING: return orig_str;
    00398     case SDT_INTLIST: return str;
    00399     default: break;
    00400   }
    00401
    00402   return NULL;
    00403 }
    00404
    00414 static void Write_ValidateSetting(void *ptr, const SettingDesc *sd, int32 val)
    00415 {
    00416   const SettingDescBase *sdb = &sd->desc;
    00417
    00418   if (sdb->cmd != SDT_BOOLX &&
    00419       sdb->cmd != SDT_NUMX &&
    00420       sdb->cmd != SDT_ONEOFMANY &&
    00421       sdb->cmd != SDT_MANYOFMANY) {
    00422     return;
    00423   }
    00424
    00425   /* We cannot know the maximum value of a bitset variable, so just have faith */
    00426   if (sdb->cmd != SDT_MANYOFMANY) {
    00427     /* We need to take special care of the uint32 type as we receive from the function
    00428      * a signed integer. While here also bail out on 64-bit settings as those are not
    00429      * supported. Unsigned 8 and 16-bit variables are safe since they fit into a signed
    00430      * 32-bit variable
    00431      * TODO: Support 64-bit settings/variables */
    00432     switch (GetVarMemType(sd->save.conv)) {
    00433       case SLE_VAR_NULL: return;
    00434       case SLE_VAR_BL:
    00435       case SLE_VAR_I8:
    00436       case SLE_VAR_U8:
    00437       case SLE_VAR_I16:
    00438       case SLE_VAR_U16:
    00439       case SLE_VAR_I32: {
    00440         /* Override the minimum value. No value below sdb->min, except special value 0 */
    00441         if (!(sdb->flags & SGF_0ISDISABLED) || val != 0) val = Clamp(val, sdb->min, sdb->max);
    00442         break;
    00443       }
    00444       case SLE_VAR_U32: {
    00445         /* Override the minimum value. No value below sdb->min, except special value 0 */
    00446         uint min = ((sdb->flags & SGF_0ISDISABLED) && (uint)val <= (uint)sdb->min) ? 0 : sdb->min;
    00447         WriteValue(ptr, SLE_VAR_U32, (int64)ClampU(val, min, sdb->max));
    00448         return;
    00449       }
    00450       case SLE_VAR_I64:
    00451       case SLE_VAR_U64:
    00452       default: NOT_REACHED();
    00453     }
    00454   }
    00455
    00456   WriteValue(ptr, sd->save.conv, (int64)val);
    00457 }
    00458
    00467 static void IniLoadSettings(IniFile *ini, const SettingDesc *sd, const char *grpname, void *object)
    00468 {
    00469   IniGroup *group;
    00470   IniGroup *group_def = ini->GetGroup(grpname);
    00471   IniItem *item;
    00472   const void *p;
    00473   void *ptr;
    00474   const char *s;
    00475
    00476   for (; sd->save.cmd != SL_END; sd++) {
    00477     const SettingDescBase *sdb = &sd->desc;
    00478     const SaveLoad        *sld = &sd->save;
    00479
    00480     if (!SlIsObjectCurrentlyValid(sld->version_from, sld->version_to)) continue;
    00481
    00482     /* For settings.xx.yy load the settings from [xx] yy = ? */
    00483     s = strchr(sdb->name, '.');
    00484     if (s != NULL) {
    00485       group = ini->GetGroup(sdb->name, s - sdb->name);
    00486       s++;
    00487     } else {
    00488       s = sdb->name;
    00489       group = group_def;
    00490     }
    00491
    00492     item = group->GetItem(s, false);
    00493     if (item == NULL && group != group_def) {
    00494       /* For settings.xx.yy load the settings from [settingss] yy = ? in case the previous
    00495        * did not exist (e.g. loading old config files with a [settings] section */
    00496       item = group_def->GetItem(s, false);
    00497     }
    00498     if (item == NULL) {
    00499       /* For settings.xx.zz.yy load the settings from [zz] yy = ? in case the previous
    00500        * did not exist (e.g. loading old config files with a [yapf] section */
    00501       const char *sc = strchr(s, '.');
    00502       if (sc != NULL) item = ini->GetGroup(s, sc - s)->GetItem(sc + 1, false);
    00503     }
    00504
    00505     p = (item == NULL) ? sdb->def : StringToVal(sdb, item->value);
    00506     ptr = GetVariableAddress(object, sld);
    00507
    00508     switch (sdb->cmd) {
    00509       case SDT_BOOLX: // All four are various types of (integer) numbers
    00510       case SDT_NUMX:
    00511       case SDT_ONEOFMANY:
    00512       case SDT_MANYOFMANY:
    00513         Write_ValidateSetting(ptr, sd, (int32)(size_t)p);
    00514         break;
    00515
    00516       case SDT_STRING:
    00517         switch (GetVarMemType(sld->conv)) {
    00518           case SLE_VAR_STRB:
    00519           case SLE_VAR_STRBQ:
    00520             if (p != NULL) ttd_strlcpy((char*)ptr, (const char*)p, sld->length);
    00521             break;
    00522           case SLE_VAR_STR:
    00523           case SLE_VAR_STRQ:
    00524             free(*(char**)ptr);
    00525             *(char**)ptr = p == NULL ? NULL : strdup((const char*)p);
    00526             break;
    00527           case SLE_VAR_CHAR: if (p != NULL) *(char *)ptr = *(const char *)p; break;
    00528           default: NOT_REACHED();
    00529         }
    00530         break;
    00531
    00532       case SDT_INTLIST: {
    00533         if (!LoadIntList((const char*)p, ptr, sld->length, GetVarMemType(sld->conv))) {
    00534           ErrorMessageData msg(STR_CONFIG_ERROR, STR_CONFIG_ERROR_ARRAY);
    00535           msg.SetDParamStr(0, sdb->name);
    00536           _settings_error_list.push_back(msg);
    00537
    00538           /* Use default */
    00539           LoadIntList((const char*)sdb->def, ptr, sld->length, GetVarMemType(sld->conv));
    00540         } else if (sd->desc.proc_cnvt != NULL) {
    00541           sd->desc.proc_cnvt((const char*)p);
    00542         }
    00543         break;
    00544       }
    00545       default: NOT_REACHED();
    00546     }
    00547   }
    00548 }
    00549
    00562 static void IniSaveSettings(IniFile *ini, const SettingDesc *sd, const char *grpname, void *object)
    00563 {
    00564   IniGroup *group_def = NULL, *group;
    00565   IniItem *item;
    00566   char buf[512];
    00567   const char *s;
    00568   void *ptr;
    00569
    00570   for (; sd->save.cmd != SL_END; sd++) {
    00571     const SettingDescBase *sdb = &sd->desc;
    00572     const SaveLoad        *sld = &sd->save;
    00573
    00574     /* If the setting is not saved to the configuration
    00575      * file, just continue with the next setting */
    00576     if (!SlIsObjectCurrentlyValid(sld->version_from, sld->version_to)) continue;
    00577     if (sld->conv & SLF_NOT_IN_CONFIG) continue;
    00578
    00579     /* XXX - wtf is this?? (group override?) */
    00580     s = strchr(sdb->name, '.');
    00581     if (s != NULL) {
    00582       group = ini->GetGroup(sdb->name, s - sdb->name);
    00583       s++;
    00584     } else {
    00585       if (group_def == NULL) group_def = ini->GetGroup(grpname);
    00586       s = sdb->name;
    00587       group = group_def;
    00588     }
    00589
    00590     item = group->GetItem(s, true);
    00591     ptr = GetVariableAddress(object, sld);
    00592
    00593     if (item->value != NULL) {
    00594       /* check if the value is the same as the old value */
    00595       const void *p = StringToVal(sdb, item->value);
    00596
    00597       /* The main type of a variable/setting is in bytes 8-15
    00598        * The subtype (what kind of numbers do we have there) is in 0-7 */
    00599       switch (sdb->cmd) {
    00600       case SDT_BOOLX:
    00601       case SDT_NUMX:
    00602       case SDT_ONEOFMANY:
    00603       case SDT_MANYOFMANY:
    00604         switch (GetVarMemType(sld->conv)) {
    00605         case SLE_VAR_BL:
    00606           if (*(bool*)ptr == (p != NULL)) continue;
    00607           break;
    00608         case SLE_VAR_I8:
    00609         case SLE_VAR_U8:
    00610           if (*(byte*)ptr == (byte)(size_t)p) continue;
    00611           break;
    00612         case SLE_VAR_I16:
    00613         case SLE_VAR_U16:
    00614           if (*(uint16*)ptr == (uint16)(size_t)p) continue;
    00615           break;
    00616         case SLE_VAR_I32:
    00617         case SLE_VAR_U32:
    00618           if (*(uint32*)ptr == (uint32)(size_t)p) continue;
    00619           break;
    00620         default: NOT_REACHED();
    00621         }
    00622         break;
    00623       default: break; // Assume the other types are always changed
    00624       }
    00625     }
    00626
    00627     /* Value has changed, get the new value and put it into a buffer */
    00628     switch (sdb->cmd) {
    00629     case SDT_BOOLX:
    00630     case SDT_NUMX:
    00631     case SDT_ONEOFMANY:
    00632     case SDT_MANYOFMANY: {
    00633       uint32 i = (uint32)ReadValue(ptr, sld->conv);
    00634
    00635       switch (sdb->cmd) {
    00636       case SDT_BOOLX:      strecpy(buf, (i != 0) ? "true" : "false", lastof(buf)); break;
    00637       case SDT_NUMX:       seprintf(buf, lastof(buf), IsSignedVarMemType(sld->conv) ? "%d" : "%u", i); break;
    00638       case SDT_ONEOFMANY:  MakeOneOfMany(buf, lastof(buf), sdb->many, i); break;
    00639       case SDT_MANYOFMANY: MakeManyOfMany(buf, lastof(buf), sdb->many, i); break;
    00640       default: NOT_REACHED();
    00641       }
    00642       break;
    00643     }
    00644
    00645     case SDT_STRING:
    00646       switch (GetVarMemType(sld->conv)) {
    00647       case SLE_VAR_STRB: strecpy(buf, (char*)ptr, lastof(buf)); break;
    00648       case SLE_VAR_STRBQ:seprintf(buf, lastof(buf), "\"%s\"", (char*)ptr); break;
    00649       case SLE_VAR_STR:  strecpy(buf, *(char**)ptr, lastof(buf)); break;
    00650       case SLE_VAR_STRQ:
    00651         if (*(char**)ptr == NULL) {
    00652           buf[0] = '\0';
    00653         } else {
    00654           seprintf(buf, lastof(buf), "\"%s\"", *(char**)ptr);
    00655         }
    00656         break;
    00657       case SLE_VAR_CHAR: buf[0] = *(char*)ptr; buf[1] = '\0'; break;
    00658       default: NOT_REACHED();
    00659       }
    00660       break;
    00661
    00662     case SDT_INTLIST:
    00663       MakeIntList(buf, lastof(buf), ptr, sld->length, GetVarMemType(sld->conv));
    00664       break;
    00665     default: NOT_REACHED();
    00666     }
    00667
    00668     /* The value is different, that means we have to write it to the ini */
    00669     free(item->value);
    00670     item->value = strdup(buf);
    00671   }
    00672 }
    00673
    00683 static void IniLoadSettingList(IniFile *ini, const char *grpname, StringList *list)
    00684 {
    00685   IniGroup *group = ini->GetGroup(grpname);
    00686
    00687   if (group == NULL || list == NULL) return;
    00688
    00689   list->Clear();
    00690
    00691   for (const IniItem *item = group->item; item != NULL; item = item->next) {
    00692     if (item->name != NULL) *list->Append() = strdup(item->name);
    00693   }
    00694 }
    00695
    00705 static void IniSaveSettingList(IniFile *ini, const char *grpname, StringList *list)
    00706 {
    00707   IniGroup *group = ini->GetGroup(grpname);
    00708
    00709   if (group == NULL || list == NULL) return;
    00710   group->Clear();
    00711
    00712   for (char **iter = list->Begin(); iter != list->End(); iter++) {
    00713     group->GetItem(*iter, true)->SetValue("");
    00714   }
    00715 }
    00716
    00717 /* Begin - Callback Functions for the various settings. */
    00718
    00720 static bool v_PositionMainToolbar(int32 p1)
    00721 {
    00722   if (_game_mode != GM_MENU) PositionMainToolbar(NULL);
    00723   return true;
    00724 }
    00725
    00727 static bool v_PositionStatusbar(int32 p1)
    00728 {
    00729   if (_game_mode != GM_MENU) {
    00730     PositionStatusbar(NULL);
    00731     PositionNewsMessage(NULL);
    00732     PositionNetworkChatWindow(NULL);
    00733   }
    00734   return true;
    00735 }
    00736
    00737 static bool PopulationInLabelActive(int32 p1)
    00738 {
    00739   UpdateAllTownVirtCoords();
    00740   return true;
    00741 }
    00742
    00743 static bool RedrawScreen(int32 p1)
    00744 {
    00745   MarkWholeScreenDirty();
    00746   return true;
    00747 }
    00748
    00754 static bool RedrawSmallmap(int32 p1)
    00755 {
    00756   BuildLandLegend();
    00757   BuildOwnerLegend();
    00758   SetWindowClassesDirty(WC_SMALLMAP);
    00759   return true;
    00760 }
    00761
    00762 static bool InvalidateDetailsWindow(int32 p1)
    00763 {
    00764   SetWindowClassesDirty(WC_VEHICLE_DETAILS);
    00765   return true;
    00766 }
    00767
    00768 static bool InvalidateStationBuildWindow(int32 p1)
    00769 {
    00770   SetWindowDirty(WC_BUILD_STATION, 0);
    00771   return true;
    00772 }
    00773
    00774 static bool InvalidateBuildIndustryWindow(int32 p1)
    00775 {
    00776   InvalidateWindowData(WC_BUILD_INDUSTRY, 0);
    00777   return true;
    00778 }
    00779
    00780 static bool CloseSignalGUI(int32 p1)
    00781 {
    00782   if (p1 == 0) {
    00783     DeleteWindowByClass(WC_BUILD_SIGNAL);
    00784   }
    00785   return true;
    00786 }
    00787
    00788 static bool InvalidateTownViewWindow(int32 p1)
    00789 {
    00790   InvalidateWindowClassesData(WC_TOWN_VIEW, p1);
    00791   return true;
    00792 }
    00793
    00794 static bool DeleteSelectStationWindow(int32 p1)
    00795 {
    00796   DeleteWindowById(WC_SELECT_STATION, 0);
    00797   return true;
    00798 }
    00799
    00800 static bool UpdateConsists(int32 p1)
    00801 {
    00802   Train *t;
    00803   FOR_ALL_TRAINS(t) {
    00804     /* Update the consist of all trains so the maximum speed is set correctly. */
    00805     if (t->IsFrontEngine() || t->IsFreeWagon()) t->ConsistChanged(true);
    00806   }
    00807   InvalidateWindowClassesData(WC_BUILD_VEHICLE, 0);
    00808   return true;
    00809 }
    00810
    00811 /* Check service intervals of vehicles, p1 is value of % or day based servicing */
    00812 static bool CheckInterval(int32 p1)
    00813 {
    00814   VehicleDefaultSettings *vds;
    00815   if (_game_mode == GM_MENU || !Company::IsValidID(_current_company)) {
    00816     vds = &_settings_client.company.vehicle;
    00817   } else {
    00818     vds = &Company::Get(_current_company)->settings.vehicle;
    00819   }
    00820
    00821   if (p1 != 0) {
    00822     vds->servint_trains   = 50;
    00823     vds->servint_roadveh  = 50;
    00824     vds->servint_aircraft = 50;
    00825     vds->servint_ships    = 50;
    00826   } else {
    00827     vds->servint_trains   = 150;
    00828     vds->servint_roadveh  = 150;
    00829     vds->servint_aircraft = 100;
    00830     vds->servint_ships    = 360;
    00831   }
    00832
    00833   InvalidateDetailsWindow(0);
    00834
    00835   return true;
    00836 }
    00837
    00838 static bool TrainAccelerationModelChanged(int32 p1)
    00839 {
    00840   Train *t;
    00841   FOR_ALL_TRAINS(t) {
    00842     if (t->IsFrontEngine()) {
    00843       t->tcache.cached_max_curve_speed = t->GetCurveSpeedLimit();
    00844       t->UpdateAcceleration();
    00845     }
    00846   }
    00847
    00848   /* These windows show acceleration values only when realistic acceleration is on. They must be redrawn after a setting change. */
    00849   SetWindowClassesDirty(WC_ENGINE_PREVIEW);
    00850   InvalidateWindowClassesData(WC_BUILD_VEHICLE, 0);
    00851   SetWindowClassesDirty(WC_VEHICLE_DETAILS);
    00852
    00853   return true;
    00854 }
    00855
    00861 static bool TrainSlopeSteepnessChanged(int32 p1)
    00862 {
    00863   Train *t;
    00864   FOR_ALL_TRAINS(t) {
    00865     if (t->IsFrontEngine()) t->CargoChanged();
    00866   }
    00867
    00868   return true;
    00869 }
    00870
    00876 static bool RoadVehAccelerationModelChanged(int32 p1)
    00877 {
    00878   if (_settings_game.vehicle.roadveh_acceleration_model != AM_ORIGINAL) {
    00879     RoadVehicle *rv;
    00880     FOR_ALL_ROADVEHICLES(rv) {
    00881       if (rv->IsFrontEngine()) {
    00882         rv->CargoChanged();
    00883       }
    00884     }
    00885   }
    00886
    00887   /* These windows show acceleration values only when realistic acceleration is on. They must be redrawn after a setting change. */
    00888   SetWindowClassesDirty(WC_ENGINE_PREVIEW);
    00889   InvalidateWindowClassesData(WC_BUILD_VEHICLE, 0);
    00890   SetWindowClassesDirty(WC_VEHICLE_DETAILS);
    00891
    00892   return true;
    00893 }
    00894
    00900 static bool RoadVehSlopeSteepnessChanged(int32 p1)
    00901 {
    00902   RoadVehicle *rv;
    00903   FOR_ALL_ROADVEHICLES(rv) {
    00904     if (rv->IsFrontEngine()) rv->CargoChanged();
    00905   }
    00906
    00907   return true;
    00908 }
    00909
    00910 static bool DragSignalsDensityChanged(int32)
    00911 {
    00912   InvalidateWindowData(WC_BUILD_SIGNAL, 0);
    00913
    00914   return true;
    00915 }
    00916
    00917 static bool TownFoundingChanged(int32 p1)
    00918 {
    00919   if (_game_mode != GM_EDITOR && _settings_game.economy.found_town == TF_FORBIDDEN) {
    00920     DeleteWindowById(WC_FOUND_TOWN, 0);
    00921     return true;
    00922   }
    00923   InvalidateWindowData(WC_FOUND_TOWN, 0);
    00924   return true;
    00925 }
    00926
    00927 static bool InvalidateVehTimetableWindow(int32 p1)
    00928 {
    00929   InvalidateWindowClassesData(WC_VEHICLE_TIMETABLE, -2);
    00930   return true;
    00931 }
    00932
    00933 static bool ZoomMinMaxChanged(int32 p1)
    00934 {
    00935   extern void ConstrainAllViewportsZoom();
    00936   ConstrainAllViewportsZoom();
    00937   GfxClearSpriteCache();
    00938   return true;
    00939 }
    00940
    00948 static bool InvalidateNewGRFChangeWindows(int32 p1)
    00949 {
    00950   InvalidateWindowClassesData(WC_SAVELOAD);
    00951   DeleteWindowByClass(WC_GAME_OPTIONS);
    00952   ReInitAllWindows();
    00953   return true;
    00954 }
    00955
    00956 static bool InvalidateCompanyLiveryWindow(int32 p1)
    00957 {
    00958   InvalidateWindowClassesData(WC_COMPANY_COLOUR);
    00959   return RedrawScreen(p1);
    00960 }
    00961
    00962 static bool InvalidateIndustryViewWindow(int32 p1)
    00963 {
    00964   InvalidateWindowClassesData(WC_INDUSTRY_VIEW);
    00965   return true;
    00966 }
    00967
    00968 static bool InvalidateAISettingsWindow(int32 p1)
    00969 {
    00970   InvalidateWindowClassesData(WC_AI_SETTINGS);
    00971   return true;
    00972 }
    00973
    00979 static bool RedrawTownAuthority(int32 p1)
    00980 {
    00981   SetWindowClassesDirty(WC_TOWN_AUTHORITY);
    00982   return true;
    00983 }
    00984
    00990 static bool InvalidateCompanyInfrastructureWindow(int32 p1)
    00991 {
    00992   InvalidateWindowClassesData(WC_COMPANY_INFRASTRUCTURE);
    00993   return true;
    00994 }
    00995
    00996 /*
    00997  * A: competitors
    00998  * B: competitor start time. Deprecated since savegame version 110.
    00999  * C: town count (3 = high, 0 = very low)
    01000  * D: industry count (4 = high, 0 = none)
    01001  * E: inital loan (in GBP)
    01002  * F: interest rate
    01003  * G: running costs (0 = low, 2 = high)
    01004  * H: construction speed of competitors (0 = very slow, 4 = very fast)
    01005  * I: competitor intelligence. Deprecated since savegame version 110.
    01006  * J: breakdowns (0 = off, 2 = normal)
    01007  * K: subsidy multiplier (0 = 1.5, 3 = 4.0)
    01008  * L: construction cost (0-2)
    01009  * M: terrain type (0 = very flat, 3 = mountainous)
    01010  * N: amount of water (0 = very low, 3 = high)
    01011  * O: economy (0 = steady, 1 = fluctuating)
    01012  * P: Train reversing (0 = end of line + stations, 1 = end of line)
    01013  * Q: disasters
    01014  * R: area restructuring (0 = permissive, 2 = hostile)
    01015  * S: the difficulty level
    01016  */
    01017 static const DifficultySettings _default_game_diff[3] = { /*
    01018    A, C, D,      E, F, G, H, J, K, L, M, N, O, P, Q, R, S*/
    01019   {2, 2, 4, 300000, 2, 0, 2, 1, 2, 0, 1, 0, 0, 0, 0, 0, 0},
    01020   {4, 2, 3, 150000, 3, 1, 3, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1},
    01021   {7, 3, 3, 100000, 4, 1, 3, 2, 0, 2, 3, 2, 1, 1, 1, 2, 2},
    01022 };
    01023
    01024 void SetDifficultyLevel(int mode, DifficultySettings *gm_opt)
    01025 {
    01026   assert(mode <= 3);
    01027
    01028   if (mode != 3) {
    01029     *gm_opt = _default_game_diff[mode];
    01030   } else {
    01031     gm_opt->diff_level = 3;
    01032   }
    01033 }
    01034
    01036 static void ValidateSettings()
    01037 {
    01038   /* Force the difficulty levels to correct values if they are invalid. */
    01039   if (_settings_newgame.difficulty.diff_level != 3) {
    01040     SetDifficultyLevel(_settings_newgame.difficulty.diff_level, &_settings_newgame.difficulty);
    01041   }
    01042
    01043   /* Do not allow a custom sea level with the original land generator. */
    01044   if (_settings_newgame.game_creation.land_generator == 0 &&
    01045       _settings_newgame.difficulty.quantity_sea_lakes == CUSTOM_SEA_LEVEL_NUMBER_DIFFICULTY) {
    01046     _settings_newgame.difficulty.quantity_sea_lakes = CUSTOM_SEA_LEVEL_MIN_PERCENTAGE;
    01047   }
    01048 }
    01049
    01050 static bool DifficultyReset(int32 level)
    01051 {
    01052   /* In game / in the scenario editor you can set the difficulty level only to custom. This is
    01053    * needed by the AI Gui code that sets the difficulty level when you change any AI settings. */
    01054   if (_game_mode != GM_MENU && level != 3) return false;
    01055   SetDifficultyLevel(level, &GetGameSettings().difficulty);
    01056   return true;
    01057 }
    01058
    01059 static bool DifficultyChange(int32)
    01060 {
    01061   if (_game_mode == GM_MENU) {
    01062     if (_settings_newgame.difficulty.diff_level != 3) {
    01063       ShowErrorMessage(STR_WARNING_DIFFICULTY_TO_CUSTOM, INVALID_STRING_ID, WL_WARNING);
    01064       _settings_newgame.difficulty.diff_level = 3;
    01065     }
    01066     SetWindowClassesDirty(WC_SELECT_GAME);
    01067   } else {
    01068     _settings_game.difficulty.diff_level = 3;
    01069   }
    01070
    01071   /* If we are a network-client, update the difficult setting (if it is open).
    01072    * Use this instead of just dirtying the window because we need to load in
    01073    * the new difficulty settings */
    01074   if (_networking) InvalidateWindowClassesData(WC_GAME_OPTIONS, GOID_DIFFICULTY_CHANGED);
    01075
    01076   return true;
    01077 }
    01078
    01079 static bool DifficultyNoiseChange(int32 i)
    01080 {
    01081   if (_game_mode == GM_NORMAL) {
    01082     UpdateAirportsNoise();
    01083     if (_settings_game.economy.station_noise_level) {
    01084       InvalidateWindowClassesData(WC_TOWN_VIEW, 0);
    01085     }
    01086   }
    01087
    01088   return DifficultyChange(i);
    01089 }
    01090
    01091 static bool MaxNoAIsChange(int32 i)
    01092 {
    01093   if (GetGameSettings().difficulty.max_no_competitors != 0 &&
    01094       AI::GetInfoList()->size() == 0 &&
    01095       (!_networking || _network_server)) {
    01096     ShowErrorMessage(STR_WARNING_NO_SUITABLE_AI, INVALID_STRING_ID, WL_CRITICAL);
    01097   }
    01098
    01099   return DifficultyChange(i);
    01100 }
    01101
    01107 static bool CheckRoadSide(int p1)
    01108 {
    01109   extern bool RoadVehiclesAreBuilt();
    01110   return _game_mode == GM_MENU || !RoadVehiclesAreBuilt();
    01111 }
    01112
    01120 static size_t ConvertLandscape(const char *value)
    01121 {
    01122   /* try with the old values */
    01123   return LookupOneOfMany("normal|hilly|desert|candy", value);
    01124 }
    01125
    01126 static bool CheckFreeformEdges(int32 p1)
    01127 {
    01128   if (_game_mode == GM_MENU) return true;
    01129   if (p1 != 0) {
    01130     Ship *s;
    01131     FOR_ALL_SHIPS(s) {
    01132       /* Check if there is a ship on the northern border. */
    01133       if (TileX(s->tile) == 0 || TileY(s->tile) == 0) {
    01134         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_EMPTY, INVALID_STRING_ID, WL_ERROR);
    01135         return false;
    01136       }
    01137     }
    01138     BaseStation *st;
    01139     FOR_ALL_BASE_STATIONS(st) {
    01140       /* Check if there is a non-deleted buoy on the northern border. */
    01141       if (st->IsInUse() && (TileX(st->xy) == 0 || TileY(st->xy) == 0)) {
    01142         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_EMPTY, INVALID_STRING_ID, WL_ERROR);
    01143         return false;
    01144       }
    01145     }
    01146     for (uint i = 0; i < MapSizeX(); i++) MakeVoid(TileXY(i, 0));
    01147     for (uint i = 0; i < MapSizeY(); i++) MakeVoid(TileXY(0, i));
    01148   } else {
    01149     for (uint i = 0; i < MapMaxX(); i++) {
    01150       if (TileHeight(TileXY(i, 1)) != 0) {
    01151         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, WL_ERROR);
    01152         return false;
    01153       }
    01154     }
    01155     for (uint i = 1; i < MapMaxX(); i++) {
    01156       if (!IsTileType(TileXY(i, MapMaxY() - 1), MP_WATER) || TileHeight(TileXY(1, MapMaxY())) != 0) {
    01157         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, WL_ERROR);
    01158         return false;
    01159       }
    01160     }
    01161     for (uint i = 0; i < MapMaxY(); i++) {
    01162       if (TileHeight(TileXY(1, i)) != 0) {
    01163         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, WL_ERROR);
    01164         return false;
    01165       }
    01166     }
    01167     for (uint i = 1; i < MapMaxY(); i++) {
    01168       if (!IsTileType(TileXY(MapMaxX() - 1, i), MP_WATER) || TileHeight(TileXY(MapMaxX(), i)) != 0) {
    01169         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, WL_ERROR);
    01170         return false;
    01171       }
    01172     }
    01173     /* Make tiles at the border water again. */
    01174     for (uint i = 0; i < MapMaxX(); i++) {
    01175       SetTileHeight(TileXY(i, 0), 0);
    01176       SetTileType(TileXY(i, 0), MP_WATER);
    01177     }
    01178     for (uint i = 0; i < MapMaxY(); i++) {
    01179       SetTileHeight(TileXY(0, i), 0);
    01180       SetTileType(TileXY(0, i), MP_WATER);
    01181     }
    01182   }
    01183   MarkWholeScreenDirty();
    01184   return true;
    01185 }
    01186
    01191 static bool ChangeDynamicEngines(int32 p1)
    01192 {
    01193   if (_game_mode == GM_MENU) return true;
    01194
    01195   if (!EngineOverrideManager::ResetToCurrentNewGRFConfig()) {
    01196     ShowErrorMessage(STR_CONFIG_SETTING_DYNAMIC_ENGINES_EXISTING_VEHICLES, INVALID_STRING_ID, WL_ERROR);
    01197     return false;
    01198   }
    01199
    01200   return true;
    01201 }
    01202
    01203 static bool StationCatchmentChanged(int32 p1)
    01204 {
    01205   Station::RecomputeIndustriesNearForAll();
    01206   return true;
    01207 }
    01208
    01209
    01210 #ifdef ENABLE_NETWORK
    01211
    01212 static bool UpdateClientName(int32 p1)
    01213 {
    01214   NetworkUpdateClientName();
    01215   return true;
    01216 }
    01217
    01218 static bool UpdateServerPassword(int32 p1)
    01219 {
    01220   if (strcmp(_settings_client.network.server_password, "*") == 0) {
    01221     _settings_client.network.server_password[0] = '\0';
    01222   }
    01223
    01224   return true;
    01225 }
    01226
    01227 static bool UpdateRconPassword(int32 p1)
    01228 {
    01229   if (strcmp(_settings_client.network.rcon_password, "*") == 0) {
    01230     _settings_client.network.rcon_password[0] = '\0';
    01231   }
    01232
    01233   return true;
    01234 }
    01235
    01236 static bool UpdateClientConfigValues(int32 p1)
    01237 {
    01238   if (_network_server) NetworkServerSendConfigUpdate();
    01239
    01240   return true;
    01241 }
    01242
    01243 #endif /* ENABLE_NETWORK */
    01244
    01245
    01246 /* End - Callback Functions */
    01247
    01251 static void PrepareOldDiffCustom()
    01252 {
    01253   memset(_old_diff_custom, 0, sizeof(_old_diff_custom));
    01254 }
    01255
    01262 static void HandleOldDiffCustom(bool savegame)
    01263 {
    01264   uint options_to_load = GAME_DIFFICULTY_NUM - ((savegame && IsSavegameVersionBefore(4)) ? 1 : 0);
    01265
    01266   if (!savegame) {
    01267     /* If we did read to old_diff_custom, then at least one value must be non 0. */
    01268     bool old_diff_custom_used = false;
    01269     for (uint i = 0; i < options_to_load && !old_diff_custom_used; i++) {
    01270       old_diff_custom_used = (_old_diff_custom[i] != 0);
    01271     }
    01272
    01273     if (!old_diff_custom_used) return;
    01274   }
    01275
    01276   for (uint i = 0; i < options_to_load; i++) {
    01277     const SettingDesc *sd = &_settings[i];
    01278     /* Skip deprecated options */
    01279     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01280     void *var = GetVariableAddress(savegame ? &_settings_game : &_settings_newgame, &sd->save);
    01281     Write_ValidateSetting(var, sd, (int32)((i == 4 ? 1000 : 1) * _old_diff_custom[i]));
    01282   }
    01283 }
    01284
    01291 static bool ConvertOldNewsSetting(const char *name, const char *value)
    01292 {
    01293   if (strcasecmp(name, "openclose") == 0) {
    01294     /* openclose has been split in "open" and "close".
    01295      * So the job is now to decrypt the value of the old news config
    01296      * and give it to the two newly introduced ones*/
    01297
    01298     NewsDisplay display = ND_OFF; // default
    01299     if (strcasecmp(value, "full") == 0) {
    01300       display = ND_FULL;
    01301     } else if (strcasecmp(value, "summarized") == 0) {
    01302       display = ND_SUMMARY;
    01303     }
    01304     /* tranfert of values */
    01305     _news_type_data[NT_INDUSTRY_OPEN].display = display;
    01306     _news_type_data[NT_INDUSTRY_CLOSE].display = display;
    01307     return true;
    01308   }
    01309   return false;
    01310 }
    01311
    01317 static void NewsDisplayLoadConfig(IniFile *ini, const char *grpname)
    01318 {
    01319   IniGroup *group = ini->GetGroup(grpname);
    01320   IniItem *item;
    01321
    01322   /* If no group exists, return */
    01323   if (group == NULL) return;
    01324
    01325   for (item = group->item; item != NULL; item = item->next) {
    01326     int news_item = -1;
    01327     for (int i = 0; i < NT_END; i++) {
    01328       if (strcasecmp(item->name, _news_type_data[i].name) == 0) {
    01329         news_item = i;
    01330         break;
    01331       }
    01332     }
    01333
    01334     /* the config been read is not within current aceptable config */
    01335     if (news_item == -1) {
    01336       /* if the conversion function cannot process it, advice by a debug warning*/
    01337       if (!ConvertOldNewsSetting(item->name, item->value)) {
    01338         DEBUG(misc, 0, "Invalid display option: %s", item->name);
    01339       }
    01340       /* in all cases, there is nothing left to do */
    01341       continue;
    01342     }
    01343
    01344     if (StrEmpty(item->value)) {
    01345       DEBUG(misc, 0, "Empty display value for newstype %s", item->name);
    01346       continue;
    01347     } else if (strcasecmp(item->value, "full") == 0) {
    01348       _news_type_data[news_item].display = ND_FULL;
    01349     } else if (strcasecmp(item->value, "off") == 0) {
    01350       _news_type_data[news_item].display = ND_OFF;
    01351     } else if (strcasecmp(item->value, "summarized") == 0) {
    01352       _news_type_data[news_item].display = ND_SUMMARY;
    01353     } else {
    01354       DEBUG(misc, 0, "Invalid display value for newstype %s: %s", item->name, item->value);
    01355       continue;
    01356     }
    01357   }
    01358 }
    01359
    01360 static void AILoadConfig(IniFile *ini, const char *grpname)
    01361 {
    01362   IniGroup *group = ini->GetGroup(grpname);
    01363   IniItem *item;
    01364
    01365   /* Clean any configured AI */
    01366   for (CompanyID c = COMPANY_FIRST; c < MAX_COMPANIES; c++) {
    01367     AIConfig::GetConfig(c, AIConfig::SSS_FORCE_NEWGAME)->Change(NULL);
    01368   }
    01369
    01370   /* If no group exists, return */
    01371   if (group == NULL) return;
    01372
    01373   CompanyID c = COMPANY_FIRST;
    01374   for (item = group->item; c < MAX_COMPANIES && item != NULL; c++, item = item->next) {
    01375     AIConfig *config = AIConfig::GetConfig(c, AIConfig::SSS_FORCE_NEWGAME);
    01376
    01377     config->Change(item->name);
    01378     if (!config->HasScript()) {
    01379       if (strcmp(item->name, "none") != 0) {
    01380         DEBUG(script, 0, "The AI by the name '%s' was no longer found, and removed from the list.", item->name);
    01381         continue;
    01382       }
    01383     }
    01384     if (item->value != NULL) config->StringToSettings(item->value);
    01385   }
    01386 }
    01387
    01388 static void GameLoadConfig(IniFile *ini, const char *grpname)
    01389 {
    01390   IniGroup *group = ini->GetGroup(grpname);
    01391   IniItem *item;
    01392
    01393   /* Clean any configured GameScript */
    01394   GameConfig::GetConfig(GameConfig::SSS_FORCE_NEWGAME)->Change(NULL);
    01395
    01396   /* If no group exists, return */
    01397   if (group == NULL) return;
    01398
    01399   item = group->item;
    01400   if (item == NULL) return;
    01401
    01402   GameConfig *config = GameConfig::GetConfig(AIConfig::SSS_FORCE_NEWGAME);
    01403
    01404   config->Change(item->name);
    01405   if (!config->HasScript()) {
    01406     if (strcmp(item->name, "none") != 0) {
    01407       DEBUG(script, 0, "The GameScript by the name '%s' was no longer found, and removed from the list.", item->name);
    01408       return;
    01409     }
    01410   }
    01411   if (item->value != NULL) config->StringToSettings(item->value);
    01412 }
    01413
    01420 static GRFConfig *GRFLoadConfig(IniFile *ini, const char *grpname, bool is_static)
    01421 {
    01422   IniGroup *group = ini->GetGroup(grpname);
    01423   IniItem *item;
    01424   GRFConfig *first = NULL;
    01425   GRFConfig **curr = &first;
    01426
    01427   if (group == NULL) return NULL;
    01428
    01429   for (item = group->item; item != NULL; item = item->next) {
    01430     GRFConfig *c = new GRFConfig(item->name);
    01431
    01432     /* Parse parameters */
    01433     if (!StrEmpty(item->value)) {
    01434       c->num_params = ParseIntList(item->value, (int*)c->param, lengthof(c->param));
    01435       if (c->num_params == (byte)-1) {
    01436         SetDParamStr(0, item->name);
    01437         ShowErrorMessage(STR_CONFIG_ERROR, STR_CONFIG_ERROR_ARRAY, WL_CRITICAL);
    01438         c->num_params = 0;
    01439       }
    01440     }
    01441
    01442     /* Check if item is valid */
    01443     if (!FillGRFDetails(c, is_static) || HasBit(c->flags, GCF_INVALID)) {
    01444       if (c->status == GCS_NOT_FOUND) {
    01445         SetDParam(1, STR_CONFIG_ERROR_INVALID_GRF_NOT_FOUND);
    01446       } else if (HasBit(c->flags, GCF_UNSAFE)) {
    01447         SetDParam(1, STR_CONFIG_ERROR_INVALID_GRF_UNSAFE);
    01448       } else if (HasBit(c->flags, GCF_SYSTEM)) {
    01449         SetDParam(1, STR_CONFIG_ERROR_INVALID_GRF_SYSTEM);
    01450       } else if (HasBit(c->flags, GCF_INVALID)) {
    01451         SetDParam(1, STR_CONFIG_ERROR_INVALID_GRF_INCOMPATIBLE);
    01452       } else {
    01453         SetDParam(1, STR_CONFIG_ERROR_INVALID_GRF_UNKNOWN);
    01454       }
    01455
    01456       SetDParamStr(0, item->name);
    01457       ShowErrorMessage(STR_CONFIG_ERROR, STR_CONFIG_ERROR_INVALID_GRF, WL_CRITICAL);
    01458       delete c;
    01459       continue;
    01460     }
    01461
    01462     /* Check for duplicate GRFID (will also check for duplicate filenames) */
    01463     bool duplicate = false;
    01464     for (const GRFConfig *gc = first; gc != NULL; gc = gc->next) {
    01465       if (gc->ident.grfid == c->ident.grfid) {
    01466         SetDParamStr(0, item->name);
    01467         SetDParamStr(1, gc->filename);
    01468         ShowErrorMessage(STR_CONFIG_ERROR, STR_CONFIG_ERROR_DUPLICATE_GRFID, WL_CRITICAL);
    01469         duplicate = true;
    01470         break;
    01471       }
    01472     }
    01473     if (duplicate) {
    01474       delete c;
    01475       continue;
    01476     }
    01477
    01478     /* Mark file as static to avoid saving in savegame. */
    01479     if (is_static) SetBit(c->flags, GCF_STATIC);
    01480
    01481     /* Add item to list */
    01482     *curr = c;
    01483     curr = &c->next;
    01484   }
    01485
    01486   return first;
    01487 }
    01488
    01494 static void NewsDisplaySaveConfig(IniFile *ini, const char *grpname)
    01495 {
    01496   IniGroup *group = ini->GetGroup(grpname);
    01497
    01498   for (int i = 0; i < NT_END; i++) {
    01499     const char *value;
    01500     int v = _news_type_data[i].display;
    01501
    01502     value = (v == ND_OFF ? "off" : (v == ND_SUMMARY ? "summarized" : "full"));
    01503
    01504     group->GetItem(_news_type_data[i].name, true)->SetValue(value);
    01505   }
    01506 }
    01507
    01508 static void AISaveConfig(IniFile *ini, const char *grpname)
    01509 {
    01510   IniGroup *group = ini->GetGroup(grpname);
    01511
    01512   if (group == NULL) return;
    01513   group->Clear();
    01514
    01515   for (CompanyID c = COMPANY_FIRST; c < MAX_COMPANIES; c++) {
    01516     AIConfig *config = AIConfig::GetConfig(c, AIConfig::SSS_FORCE_NEWGAME);
    01517     const char *name;
    01518     char value[1024];
    01519     config->SettingsToString(value, lengthof(value));
    01520
    01521     if (config->HasScript()) {
    01522       name = config->GetName();
    01523     } else {
    01524       name = "none";
    01525     }
    01526
    01527     IniItem *item = new IniItem(group, name, strlen(name));
    01528     item->SetValue(value);
    01529   }
    01530 }
    01531
    01532 static void GameSaveConfig(IniFile *ini, const char *grpname)
    01533 {
    01534   IniGroup *group = ini->GetGroup(grpname);
    01535
    01536   if (group == NULL) return;
    01537   group->Clear();
    01538
    01539   GameConfig *config = GameConfig::GetConfig(AIConfig::SSS_FORCE_NEWGAME);
    01540   const char *name;
    01541   char value[1024];
    01542   config->SettingsToString(value, lengthof(value));
    01543
    01544   if (config->HasScript()) {
    01545     name = config->GetName();
    01546   } else {
    01547     name = "none";
    01548   }
    01549
    01550   IniItem *item = new IniItem(group, name, strlen(name));
    01551   item->SetValue(value);
    01552 }
    01553
    01558 static void SaveVersionInConfig(IniFile *ini)
    01559 {
    01560   IniGroup *group = ini->GetGroup("version");
    01561
    01562   char version[9];
    01563   snprintf(version, lengthof(version), "%08X", _openttd_newgrf_version);
    01564
    01565   const char * const versions[][2] = {
    01566     { "version_string", _openttd_revision },
    01567     { "version_number", version }
    01568   };
    01569
    01570   for (uint i = 0; i < lengthof(versions); i++) {
    01571     group->GetItem(versions[i][0], true)->SetValue(versions[i][1]);
    01572   }
    01573 }
    01574
    01575 /* Save a GRF configuration to the given group name */
    01576 static void GRFSaveConfig(IniFile *ini, const char *grpname, const GRFConfig *list)
    01577 {
    01578   ini->RemoveGroup(grpname);
    01579   IniGroup *group = ini->GetGroup(grpname);
    01580   const GRFConfig *c;
    01581
    01582   for (c = list; c != NULL; c = c->next) {
    01583     char params[512];
    01584     GRFBuildParamList(params, c, lastof(params));
    01585
    01586     group->GetItem(c->filename, true)->SetValue(params);
    01587   }
    01588 }
    01589
    01590 /* Common handler for saving/loading variables to the configuration file */
    01591 static void HandleSettingDescs(IniFile *ini, SettingDescProc *proc, SettingDescProcList *proc_list, bool basic_settings = true, bool other_settings = true)
    01592 {
    01593   if (basic_settings) {
    01594     proc(ini, (const SettingDesc*)_misc_settings,    "misc",  NULL);
    01595 #if defined(WIN32) && !defined(DEDICATED)
    01596     proc(ini, (const SettingDesc*)_win32_settings,   "win32", NULL);
    01597 #endif /* WIN32 */
    01598   }
    01599
    01600   if (other_settings) {
    01601     proc(ini, _settings,         "patches",  &_settings_newgame);
    01602     proc(ini, _currency_settings,"currency", &_custom_currency);
    01603     proc(ini, _company_settings, "company",  &_settings_client.company);
    01604
    01605 #ifdef ENABLE_NETWORK
    01606     proc_list(ini, "server_bind_addresses", &_network_bind_list);
    01607     proc_list(ini, "servers", &_network_host_list);
    01608     proc_list(ini, "bans",    &_network_ban_list);
    01609 #endif /* ENABLE_NETWORK */
    01610   }
    01611 }
    01612
    01613 static IniFile *IniLoadConfig()
    01614 {
    01615   IniFile *ini = new IniFile(_list_group_names);
    01616   ini->LoadFromDisk(_config_file, BASE_DIR);
    01617   return ini;
    01618 }
    01619
    01624 void LoadFromConfig(bool minimal)
    01625 {
    01626   IniFile *ini = IniLoadConfig();
    01627   if (!minimal) ResetCurrencies(false); // Initialize the array of curencies, without preserving the custom one
    01628
    01629   /* Load basic settings only during bootstrap, load other settings not during bootstrap */
    01630   HandleSettingDescs(ini, IniLoadSettings, IniLoadSettingList, minimal, !minimal);
    01631
    01632   if (!minimal) {
    01633     _grfconfig_newgame = GRFLoadConfig(ini, "newgrf", false);
    01634     _grfconfig_static  = GRFLoadConfig(ini, "newgrf-static", true);
    01635     NewsDisplayLoadConfig(ini, "news_display");
    01636     AILoadConfig(ini, "ai_players");
    01637     GameLoadConfig(ini, "game_scripts");
    01638
    01639     PrepareOldDiffCustom();
    01640     IniLoadSettings(ini, _gameopt_settings, "gameopt", &_settings_newgame);
    01641     HandleOldDiffCustom(false);
    01642
    01643     ValidateSettings();
    01644
    01645     /* Display sheduled errors */
    01646     extern void ScheduleErrorMessage(ErrorList &datas);
    01647     ScheduleErrorMessage(_settings_error_list);
    01648     if (FindWindowById(WC_ERRMSG, 0) == NULL) ShowFirstError();
    01649   }
    01650
    01651   delete ini;
    01652 }
    01653
    01655 void SaveToConfig()
    01656 {
    01657   IniFile *ini = IniLoadConfig();
    01658
    01659   /* Remove some obsolete groups. These have all been loaded into other groups. */
    01660   ini->RemoveGroup("patches");
    01661   ini->RemoveGroup("yapf");
    01662   ini->RemoveGroup("gameopt");
    01663
    01664   HandleSettingDescs(ini, IniSaveSettings, IniSaveSettingList);
    01665   GRFSaveConfig(ini, "newgrf", _grfconfig_newgame);
    01666   GRFSaveConfig(ini, "newgrf-static", _grfconfig_static);
    01667   NewsDisplaySaveConfig(ini, "news_display");
    01668   AISaveConfig(ini, "ai_players");
    01669   GameSaveConfig(ini, "game_scripts");
    01670   SaveVersionInConfig(ini);
    01671   ini->SaveToDisk(_config_file);
    01672   delete ini;
    01673 }
    01674
    01679 void GetGRFPresetList(GRFPresetList *list)
    01680 {
    01681   list->Clear();
    01682
    01683   IniFile *ini = IniLoadConfig();
    01684   IniGroup *group;
    01685   for (group = ini->group; group != NULL; group = group->next) {
    01686     if (strncmp(group->name, "preset-", 7) == 0) {
    01687       *list->Append() = strdup(group->name + 7);
    01688     }
    01689   }
    01690
    01691   delete ini;
    01692 }
    01693
    01700 GRFConfig *LoadGRFPresetFromConfig(const char *config_name)
    01701 {
    01702   char *section = (char*)alloca(strlen(config_name) + 8);
    01703   sprintf(section, "preset-%s", config_name);
    01704
    01705   IniFile *ini = IniLoadConfig();
    01706   GRFConfig *config = GRFLoadConfig(ini, section, false);
    01707   delete ini;
    01708
    01709   return config;
    01710 }
    01711
    01718 void SaveGRFPresetToConfig(const char *config_name, GRFConfig *config)
    01719 {
    01720   char *section = (char*)alloca(strlen(config_name) + 8);
    01721   sprintf(section, "preset-%s", config_name);
    01722
    01723   IniFile *ini = IniLoadConfig();
    01724   GRFSaveConfig(ini, section, config);
    01725   ini->SaveToDisk(_config_file);
    01726   delete ini;
    01727 }
    01728
    01733 void DeleteGRFPresetFromConfig(const char *config_name)
    01734 {
    01735   char *section = (char*)alloca(strlen(config_name) + 8);
    01736   sprintf(section, "preset-%s", config_name);
    01737
    01738   IniFile *ini = IniLoadConfig();
    01739   ini->RemoveGroup(section);
    01740   ini->SaveToDisk(_config_file);
    01741   delete ini;
    01742 }
    01743
    01744 static const SettingDesc *GetSettingDescription(uint index)
    01745 {
    01746   if (index >= lengthof(_settings)) return NULL;
    01747   return &_settings[index];
    01748 }
    01749
    01761 CommandCost CmdChangeSetting(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
    01762 {
    01763   const SettingDesc *sd = GetSettingDescription(p1);
    01764
    01765   if (sd == NULL) return CMD_ERROR;
    01766   if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) return CMD_ERROR;
    01767
    01768   if ((sd->desc.flags & SGF_NETWORK_ONLY) && !_networking && _game_mode != GM_MENU) return CMD_ERROR;
    01769   if ((sd->desc.flags & SGF_NO_NETWORK) && _networking) return CMD_ERROR;
    01770   if ((sd->desc.flags & SGF_NEWGAME_ONLY) &&
    01771       (_game_mode == GM_NORMAL ||
    01772       (_game_mode == GM_EDITOR && (sd->desc.flags & SGF_SCENEDIT_TOO) == 0))) {
    01773     return CMD_ERROR;
    01774   }
    01775
    01776   if (flags & DC_EXEC) {
    01777     void *var = GetVariableAddress(&GetGameSettings(), &sd->save);
    01778
    01779     int32 oldval = (int32)ReadValue(var, sd->save.conv);
    01780     int32 newval = (int32)p2;
    01781
    01782     Write_ValidateSetting(var, sd, newval);
    01783     newval = (int32)ReadValue(var, sd->save.conv);
    01784
    01785     if (oldval == newval) return CommandCost();
    01786
    01787     if (sd->desc.proc != NULL && !sd->desc.proc(newval)) {
    01788       WriteValue(var, sd->save.conv, (int64)oldval);
    01789       return CommandCost();
    01790     }
    01791
    01792     if (sd->desc.flags & SGF_NO_NETWORK) {
    01793       GamelogStartAction(GLAT_SETTING);
    01794       GamelogSetting(sd->desc.name, oldval, newval);
    01795       GamelogStopAction();
    01796     }
    01797
    01798     SetWindowClassesDirty(WC_GAME_OPTIONS);
    01799   }
    01800
    01801   return CommandCost();
    01802 }
    01803
    01814 CommandCost CmdChangeCompanySetting(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
    01815 {
    01816   if (p1 >= lengthof(_company_settings)) return CMD_ERROR;
    01817   const SettingDesc *sd = &_company_settings[p1];
    01818
    01819   if (flags & DC_EXEC) {
    01820     void *var = GetVariableAddress(&Company::Get(_current_company)->settings, &sd->save);
    01821
    01822     int32 oldval = (int32)ReadValue(var, sd->save.conv);
    01823     int32 newval = (int32)p2;
    01824
    01825     Write_ValidateSetting(var, sd, newval);
    01826     newval = (int32)ReadValue(var, sd->save.conv);
    01827
    01828     if (oldval == newval) return CommandCost();
    01829
    01830     if (sd->desc.proc != NULL && !sd->desc.proc(newval)) {
    01831       WriteValue(var, sd->save.conv, (int64)oldval);
    01832       return CommandCost();
    01833     }
    01834
    01835     SetWindowClassesDirty(WC_GAME_OPTIONS);
    01836   }
    01837
    01838   return CommandCost();
    01839 }
    01840
    01848 bool SetSettingValue(uint index, int32 value, bool force_newgame)
    01849 {
    01850   const SettingDesc *sd = &_settings[index];
    01851   /* If an item is company-based, we do not send it over the network
    01852    * (if any) to change. Also *hack*hack* we update the _newgame version
    01853    * of settings because changing a company-based setting in a game also
    01854    * changes its defaults. At least that is the convention we have chosen */
    01855   if (sd->save.conv & SLF_NO_NETWORK_SYNC) {
    01856     void *var = GetVariableAddress(&GetGameSettings(), &sd->save);
    01857     Write_ValidateSetting(var, sd, value);
    01858
    01859     if (_game_mode != GM_MENU) {
    01860       void *var2 = GetVariableAddress(&_settings_newgame, &sd->save);
    01861       Write_ValidateSetting(var2, sd, value);
    01862     }
    01863     if (sd->desc.proc != NULL) sd->desc.proc((int32)ReadValue(var, sd->save.conv));
    01864
    01865     SetWindowClassesDirty(WC_GAME_OPTIONS);
    01866
    01867     return true;
    01868   }
    01869
    01870   if (force_newgame) {
    01871     void *var2 = GetVariableAddress(&_settings_newgame, &sd->save);
    01872     Write_ValidateSetting(var2, sd, value);
    01873     return true;
    01874   }
    01875
    01876   /* send non-company-based settings over the network */
    01877   if (!_networking || (_networking && _network_server)) {
    01878     return DoCommandP(0, index, value, CMD_CHANGE_SETTING);
    01879   }
    01880   return false;
    01881 }
    01882
    01889 void SetCompanySetting(uint index, int32 value)
    01890 {
    01891   const SettingDesc *sd = &_company_settings[index];
    01892   if (Company::IsValidID(_local_company) && _game_mode != GM_MENU) {
    01893     DoCommandP(0, index, value, CMD_CHANGE_COMPANY_SETTING);
    01894   } else {
    01895     void *var = GetVariableAddress(&_settings_client.company, &sd->save);
    01896     Write_ValidateSetting(var, sd, value);
    01897     if (sd->desc.proc != NULL) sd->desc.proc((int32)ReadValue(var, sd->save.conv));
    01898   }
    01899 }
    01900
    01904 void SetDefaultCompanySettings(CompanyID cid)
    01905 {
    01906   Company *c = Company::Get(cid);
    01907   const SettingDesc *sd;
    01908   for (sd = _company_settings; sd->save.cmd != SL_END; sd++) {
    01909     void *var = GetVariableAddress(&c->settings, &sd->save);
    01910     Write_ValidateSetting(var, sd, (int32)(size_t)sd->desc.def);
    01911   }
    01912 }
    01913
    01914 #if defined(ENABLE_NETWORK)
    01915
    01918 void SyncCompanySettings()
    01919 {
    01920   const SettingDesc *sd;
    01921   uint i = 0;
    01922   for (sd = _company_settings; sd->save.cmd != SL_END; sd++, i++) {
    01923     const void *old_var = GetVariableAddress(&Company::Get(_current_company)->settings, &sd->save);
    01924     const void *new_var = GetVariableAddress(&_settings_client.company, &sd->save);
    01925     uint32 old_value = (uint32)ReadValue(old_var, sd->save.conv);
    01926     uint32 new_value = (uint32)ReadValue(new_var, sd->save.conv);
    01927     if (old_value != new_value) NetworkSendCommand(0, i, new_value, CMD_CHANGE_COMPANY_SETTING, NULL, NULL, _local_company);
    01928   }
    01929 }
    01930 #endif /* ENABLE_NETWORK */
    01931
    01937 uint GetCompanySettingIndex(const char *name)
    01938 {
    01939   uint i;
    01940   const SettingDesc *sd = GetSettingFromName(name, &i);
    01941   assert(sd != NULL && (sd->desc.flags & SGF_PER_COMPANY) != 0);
    01942   return i;
    01943 }
    01944
    01952 bool SetSettingValue(uint index, const char *value, bool force_newgame)
    01953 {
    01954   const SettingDesc *sd = &_settings[index];
    01955   assert(sd->save.conv & SLF_NO_NETWORK_SYNC);
    01956
    01957   if (GetVarMemType(sd->save.conv) == SLE_VAR_STRQ) {
    01958     char **var = (char**)GetVariableAddress((_game_mode == GM_MENU || force_newgame) ? &_settings_newgame : &_settings_game, &sd->save);
    01959     free(*var);
    01960     *var = strcmp(value, "(null)") == 0 ? NULL : strdup(value);
    01961   } else {
    01962     char *var = (char*)GetVariableAddress(NULL, &sd->save);
    01963     ttd_strlcpy(var, value, sd->save.length);
    01964   }
    01965   if (sd->desc.proc != NULL) sd->desc.proc(0);
    01966
    01967   return true;
    01968 }
    01969
    01977 const SettingDesc *GetSettingFromName(const char *name, uint *i)
    01978 {
    01979   const SettingDesc *sd;
    01980
    01981   /* First check all full names */
    01982   for (*i = 0, sd = _settings; sd->save.cmd != SL_END; sd++, (*i)++) {
    01983     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01984     if (strcmp(sd->desc.name, name) == 0) return sd;
    01985   }
    01986
    01987   /* Then check the shortcut variant of the name. */
    01988   for (*i = 0, sd = _settings; sd->save.cmd != SL_END; sd++, (*i)++) {
    01989     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01990     const char *short_name = strchr(sd->desc.name, '.');
    01991     if (short_name != NULL) {
    01992       short_name++;
    01993       if (strcmp(short_name, name) == 0) return sd;
    01994     }
    01995   }
    01996
    01997   if (strncmp(name, "company.", 8) == 0) name += 8;
    01998   /* And finally the company-based settings */
    01999   for (*i = 0, sd = _company_settings; sd->save.cmd != SL_END; sd++, (*i)++) {
    02000     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    02001     if (strcmp(sd->desc.name, name) == 0) return sd;
    02002   }
    02003
    02004   return NULL;
    02005 }
    02006
    02007 /* Those 2 functions need to be here, else we have to make some stuff non-static
    02008  * and besides, it is also better to keep stuff like this at the same place */
    02009 void IConsoleSetSetting(const char *name, const char *value, bool force_newgame)
    02010 {
    02011   uint index;
    02012   const SettingDesc *sd = GetSettingFromName(name, &index);
    02013
    02014   if (sd == NULL) {
    02015     IConsolePrintF(CC_WARNING, "'%s' is an unknown setting.", name);
    02016     return;
    02017   }
    02018
    02019   bool success;
    02020   if (sd->desc.cmd == SDT_STRING) {
    02021     success = SetSettingValue(index, value, force_newgame);
    02022   } else {
    02023     uint32 val;
    02024     extern bool GetArgumentInteger(uint32 *value, const char *arg);
    02025     success = GetArgumentInteger(&val, value);
    02026     if (!success) {
    02027       IConsolePrintF(CC_ERROR, "'%s' is not an integer.", value);
    02028       return;
    02029     }
    02030
    02031     success = SetSettingValue(index, val, force_newgame);
    02032   }
    02033
    02034   if (!success) {
    02035     if (_network_server) {
    02036       IConsoleError("This command/variable is not available during network games.");
    02037     } else {
    02038       IConsoleError("This command/variable is only available to a network server.");
    02039     }
    02040   }
    02041 }
    02042
    02043 void IConsoleSetSetting(const char *name, int value)
    02044 {
    02045   uint index;
    02046   const SettingDesc *sd = GetSettingFromName(name, &index);
    02047   assert(sd != NULL);
    02048   SetSettingValue(index, value);
    02049 }
    02050
    02056 void IConsoleGetSetting(const char *name, bool force_newgame)
    02057 {
    02058   char value[20];
    02059   uint index;
    02060   const SettingDesc *sd = GetSettingFromName(name, &index);
    02061   const void *ptr;
    02062
    02063   if (sd == NULL) {
    02064     IConsolePrintF(CC_WARNING, "'%s' is an unknown setting.", name);
    02065     return;
    02066   }
    02067
    02068   ptr = GetVariableAddress((_game_mode == GM_MENU || force_newgame) ? &_settings_newgame : &_settings_game, &sd->save);
    02069
    02070   if (sd->desc.cmd == SDT_STRING) {
    02071     IConsolePrintF(CC_WARNING, "Current value for '%s' is: '%s'", name, (GetVarMemType(sd->save.conv) == SLE_VAR_STRQ) ? *(const char * const *)ptr : (const char *)ptr);
    02072   } else {
    02073     if (sd->desc.cmd == SDT_BOOLX) {
    02074       snprintf(value, sizeof(value), (*(const bool*)ptr != 0) ? "on" : "off");
    02075     } else {
    02076       snprintf(value, sizeof(value), sd->desc.min < 0 ? "%d" : "%u", (int32)ReadValue(ptr, sd->save.conv));
    02077     }
    02078
    02079     IConsolePrintF(CC_WARNING, "Current value for '%s' is: '%s' (min: %s%d, max: %u)",
    02080       name, value, (sd->desc.flags & SGF_0ISDISABLED) ? "(0) " : "", sd->desc.min, sd->desc.max);
    02081   }
    02082 }
    02083
    02089 void IConsoleListSettings(const char *prefilter)
    02090 {
    02091   IConsolePrintF(CC_WARNING, "All settings with their current value:");
    02092
    02093   for (const SettingDesc *sd = _settings; sd->save.cmd != SL_END; sd++) {
    02094     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    02095     if (prefilter != NULL && strstr(sd->desc.name, prefilter) == NULL) continue;
    02096     char value[80];
    02097     const void *ptr = GetVariableAddress(&GetGameSettings(), &sd->save);
    02098
    02099     if (sd->desc.cmd == SDT_BOOLX) {
    02100       snprintf(value, lengthof(value), (*(const bool *)ptr != 0) ? "on" : "off");
    02101     } else if (sd->desc.cmd == SDT_STRING) {
    02102       snprintf(value, sizeof(value), "%s", (GetVarMemType(sd->save.conv) == SLE_VAR_STRQ) ? *(const char * const *)ptr : (const char *)ptr);
    02103     } else {
    02104       snprintf(value, lengthof(value), sd->desc.min < 0 ? "%d" : "%u", (int32)ReadValue(ptr, sd->save.conv));
    02105     }
    02106     IConsolePrintF(CC_DEFAULT, "%s = %s", sd->desc.name, value);
    02107   }
    02108
    02109   IConsolePrintF(CC_WARNING, "Use 'setting' command to change a value");
    02110 }
    02111
    02118 static void LoadSettings(const SettingDesc *osd, void *object)
    02119 {
    02120   for (; osd->save.cmd != SL_END; osd++) {
    02121     const SaveLoad *sld = &osd->save;
    02122     void *ptr = GetVariableAddress(object, sld);
    02123
    02124     if (!SlObjectMember(ptr, sld)) continue;
    02125     if (IsNumericType(sld->conv)) Write_ValidateSetting(ptr, osd, ReadValue(ptr, sld->conv));
    02126   }
    02127 }
    02128
    02135 static void SaveSettings(const SettingDesc *sd, void *object)
    02136 {
    02137   /* We need to write the CH_RIFF header, but unfortunately can't call
    02138    * SlCalcLength() because we have a different format. So do this manually */
    02139   const SettingDesc *i;
    02140   size_t length = 0;
    02141   for (i = sd; i->save.cmd != SL_END; i++) {
    02142     length += SlCalcObjMemberLength(object, &i->save);
    02143   }
    02144   SlSetLength(length);
    02145
    02146   for (i = sd; i->save.cmd != SL_END; i++) {
    02147     void *ptr = GetVariableAddress(object, &i->save);
    02148     SlObjectMember(ptr, &i->save);
    02149   }
    02150 }
    02151
    02152 static void Load_OPTS()
    02153 {
    02154   /* Copy over default setting since some might not get loaded in
    02155    * a networking environment. This ensures for example that the local
    02156    * autosave-frequency stays when joining a network-server */
    02157   PrepareOldDiffCustom();
    02158   LoadSettings(_gameopt_settings, &_settings_game);
    02159   HandleOldDiffCustom(true);
    02160 }
    02161
    02162 static void Load_PATS()
    02163 {
    02164   /* Copy over default setting since some might not get loaded in
    02165    * a networking environment. This ensures for example that the local
    02166    * currency setting stays when joining a network-server */
    02167   LoadSettings(_settings, &_settings_game);
    02168 }
    02169
    02170 static void Check_PATS()
    02171 {
    02172   LoadSettings(_settings, &_load_check_data.settings);
    02173 }
    02174
    02175 static void Save_PATS()
    02176 {
    02177   SaveSettings(_settings, &_settings_game);
    02178 }
    02179
    02180 void CheckConfig()
    02181 {
    02182   /*
    02183    * Increase old default values for pf_maxdepth and pf_maxlength
    02184    * to support big networks.
    02185    */
    02186   if (_settings_newgame.pf.opf.pf_maxdepth == 16 && _settings_newgame.pf.opf.pf_maxlength == 512) {
    02187     _settings_newgame.pf.opf.pf_maxdepth = 48;
    02188     _settings_newgame.pf.opf.pf_maxlength = 4096;
    02189   }
    02190 }
    02191
    02192 extern const ChunkHandler _setting_chunk_handlers[] = {
    02193   { 'OPTS', NULL,      Load_OPTS, NULL, NULL,       CH_RIFF},
    02194   { 'PATS', Save_PATS, Load_PATS, NULL, Check_PATS, CH_RIFF | CH_LAST},
    02195 };
    02196
    02197 static bool IsSignedVarMemType(VarType vt)
    02198 {
    02199   switch (GetVarMemType(vt)) {
    02200     case SLE_VAR_I8:
    02201     case SLE_VAR_I16:
    02202     case SLE_VAR_I32:
    02203     case SLE_VAR_I64:
    02204       return true;
    02205   }
    02206   return false;
    02207 }