# settings.cpp

Go to the documentation of this file.

    00001 /* $Id: settings.cpp 19430 2010-03-15 22:52:39Z 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
    00025 #include "stdafx.h"
    00026 #include "currency.h"
    00027 #include "screenshot.h"
    00028 #include "variables.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 "strings_func.h"
    00040 #include "vehicle_func.h"
    00041 #include "sound_func.h"
    00042 #include "company_func.h"
    00043 #include "rev.h"
    00044 #ifdef WITH_FREETYPE
    00045 #include "fontcache.h"
    00046 #endif
    00047 #include "textbuf_gui.h"
    00048 #include "rail_gui.h"
    00049 #include "elrail_func.h"
    00050 #include "gui.h"
    00051 #include "town.h"
    00052 #include "video/video_driver.hpp"
    00053 #include "sound/sound_driver.hpp"
    00054 #include "music/music_driver.hpp"
    00055 #include "blitter/factory.hpp"
    00056 #include "base_media_base.h"
    00057 #include "gamelog.h"
    00058 #include "settings_func.h"
    00059 #include "ini_type.h"
    00060 #include "ai/ai_config.hpp"
    00061 #include "ai/ai.hpp"
    00062 #include "newgrf.h"
    00063 #include "ship.h"
    00064 #include "company_base.h"
    00065 #include "engine_base.h"
    00066 #include "smallmap_gui.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
    00079 typedef void SettingDescProc(IniFile *ini, const SettingDesc *desc, const char *grpname, void *object);
    00080 typedef void SettingDescProcList(IniFile *ini, const char *grpname, StringList *list);
    00081
    00082 static bool IsSignedVarMemType(VarType vt);
    00083
    00087 static const char * const _list_group_names[] = {
    00088   "bans",
    00089   "newgrf",
    00090   "servers",
    00091   "server_bind_addresses",
    00092   NULL
    00093 };
    00094
    00100 static int lookup_oneofmany(const char *many, const char *one, size_t onelen = 0)
    00101 {
    00102   const char *s;
    00103   int idx;
    00104
    00105   if (onelen == 0) onelen = strlen(one);
    00106
    00107   /* check if it's an integer */
    00108   if (*one >= '0' && *one <= '9')
    00109     return strtoul(one, NULL, 0);
    00110
    00111   idx = 0;
    00112   for (;;) {
    00113     /* find end of item */
    00114     s = many;
    00115     while (*s != '|' && *s != 0) s++;
    00116     if ((size_t)(s - many) == onelen && !memcmp(one, many, onelen)) return idx;
    00117     if (*s == 0) return -1;
    00118     many = s + 1;
    00119     idx++;
    00120   }
    00121 }
    00122
    00128 static uint32 lookup_manyofmany(const char *many, const char *str)
    00129 {
    00130   const char *s;
    00131   int r;
    00132   uint32 res = 0;
    00133
    00134   for (;;) {
    00135     /* skip "whitespace" */
    00136     while (*str == ' ' || *str == '\t' || *str == '|') str++;
    00137     if (*str == 0) break;
    00138
    00139     s = str;
    00140     while (*s != 0 && *s != ' ' && *s != '\t' && *s != '|') s++;
    00141
    00142     r = lookup_oneofmany(many, str, s - str);
    00143     if (r == -1) return (uint32)-1;
    00144
    00145     SetBit(res, r); // value found, set it
    00146     if (*s == 0) break;
    00147     str = s + 1;
    00148   }
    00149   return res;
    00150 }
    00151
    00158 static int parse_intlist(const char *p, int *items, int maxitems)
    00159 {
    00160   int n = 0, v;
    00161   char *end;
    00162
    00163   for (;;) {
    00164     v = strtol(p, &end, 0);
    00165     if (p == end || n == maxitems) return -1;
    00166     p = end;
    00167     items[n++] = v;
    00168     if (*p == '\0') break;
    00169     if (*p != ',' && *p != ' ') return -1;
    00170     p++;
    00171   }
    00172
    00173   return n;
    00174 }
    00175
    00182 static bool load_intlist(const char *str, void *array, int nelems, VarType type)
    00183 {
    00184   int items[64];
    00185   int i, nitems;
    00186
    00187   if (str == NULL) {
    00188     memset(items, 0, sizeof(items));
    00189     nitems = nelems;
    00190   } else {
    00191     nitems = parse_intlist(str, items, lengthof(items));
    00192     if (nitems != nelems) return false;
    00193   }
    00194
    00195   switch (type) {
    00196   case SLE_VAR_BL:
    00197   case SLE_VAR_I8:
    00198   case SLE_VAR_U8:
    00199     for (i = 0; i != nitems; i++) ((byte*)array)[i] = items[i];
    00200     break;
    00201   case SLE_VAR_I16:
    00202   case SLE_VAR_U16:
    00203     for (i = 0; i != nitems; i++) ((uint16*)array)[i] = items[i];
    00204     break;
    00205   case SLE_VAR_I32:
    00206   case SLE_VAR_U32:
    00207     for (i = 0; i != nitems; i++) ((uint32*)array)[i] = items[i];
    00208     break;
    00209   default: NOT_REACHED();
    00210   }
    00211
    00212   return true;
    00213 }
    00214
    00222 static void make_intlist(char *buf, const char *last, const void *array, int nelems, VarType type)
    00223 {
    00224   int i, v = 0;
    00225   byte *p = (byte*)array;
    00226
    00227   for (i = 0; i != nelems; i++) {
    00228     switch (type) {
    00229     case SLE_VAR_BL:
    00230     case SLE_VAR_I8:  v = *(int8*)p;   p += 1; break;
    00231     case SLE_VAR_U8:  v = *(byte*)p;   p += 1; break;
    00232     case SLE_VAR_I16: v = *(int16*)p;  p += 2; break;
    00233     case SLE_VAR_U16: v = *(uint16*)p; p += 2; break;
    00234     case SLE_VAR_I32: v = *(int32*)p;  p += 4; break;
    00235     case SLE_VAR_U32: v = *(uint32*)p; p += 4; break;
    00236     default: NOT_REACHED();
    00237     }
    00238     buf += seprintf(buf, last, (i == 0) ? "%d" : ",%d", v);
    00239   }
    00240 }
    00241
    00247 static void make_oneofmany(char *buf, const char *last, const char *many, int id)
    00248 {
    00249   int orig_id = id;
    00250
    00251   /* Look for the id'th element */
    00252   while (--id >= 0) {
    00253     for (; *many != '|'; many++) {
    00254       if (*many == '\0') { // not found
    00255         seprintf(buf, last, "%d", orig_id);
    00256         return;
    00257       }
    00258     }
    00259     many++; // pass the |-character
    00260   }
    00261
    00262   /* copy string until next item (|) or the end of the list if this is the last one */
    00263   while (*many != '\0' && *many != '|' && buf < last) *buf++ = *many++;
    00264   *buf = '\0';
    00265 }
    00266
    00273 static void make_manyofmany(char *buf, const char *last, const char *many, uint32 x)
    00274 {
    00275   const char *start;
    00276   int i = 0;
    00277   bool init = true;
    00278
    00279   for (; x != 0; x >>= 1, i++) {
    00280     start = many;
    00281     while (*many != 0 && *many != '|') many++; // advance to the next element
    00282
    00283     if (HasBit(x, 0)) { // item found, copy it
    00284       if (!init) buf += seprintf(buf, last, "|");
    00285       init = false;
    00286       if (start == many) {
    00287         buf += seprintf(buf, last, "%d", i);
    00288       } else {
    00289         memcpy(buf, start, many - start);
    00290         buf += many - start;
    00291       }
    00292     }
    00293
    00294     if (*many == '|') many++;
    00295   }
    00296
    00297   *buf = '\0';
    00298 }
    00299
    00304 static const void *string_to_val(const SettingDescBase *desc, const char *orig_str)
    00305 {
    00306   const char *str = orig_str == NULL ? "" : orig_str;
    00307   switch (desc->cmd) {
    00308   case SDT_NUMX: {
    00309     char *end;
    00310     unsigned long val = strtoul(str, &end, 0);
    00311     if (*end != '\0') ShowInfoF("ini: trailing characters at end of setting '%s'", desc->name);
    00312     return (void*)val;
    00313   }
    00314   case SDT_ONEOFMANY: {
    00315     long r = lookup_oneofmany(desc->many, str);
    00316     /* if the first attempt of conversion from string to the appropriate value fails,
    00317      * look if we have defined a converter from old value to new value. */
    00318     if (r == -1 && desc->proc_cnvt != NULL) r = desc->proc_cnvt(str);
    00319     if (r != -1) return (void*)r; // and here goes converted value
    00320     ShowInfoF("ini: invalid value '%s' for '%s'", str, desc->name); // sorry, we failed
    00321     return 0;
    00322   }
    00323   case SDT_MANYOFMANY: {
    00324     unsigned long r = lookup_manyofmany(desc->many, str);
    00325     if (r != (unsigned long)-1) return (void*)r;
    00326     ShowInfoF("ini: invalid value '%s' for '%s'", str, desc->name);
    00327     return 0;
    00328   }
    00329   case SDT_BOOLX:
    00330     if (strcmp(str, "true")  == 0 || strcmp(str, "on")  == 0 || strcmp(str, "1") == 0)
    00331       return (void*)true;
    00332     if (strcmp(str, "false") == 0 || strcmp(str, "off") == 0 || strcmp(str, "0") == 0)
    00333       return (void*)false;
    00334     ShowInfoF("ini: invalid setting value '%s' for '%s'", str, desc->name);
    00335     break;
    00336
    00337   case SDT_STRING: return orig_str;
    00338   case SDT_INTLIST: return str;
    00339   default: break;
    00340   }
    00341
    00342   return NULL;
    00343 }
    00344
    00352 static void Write_ValidateSetting(void *ptr, const SettingDesc *sd, int32 val)
    00353 {
    00354   const SettingDescBase *sdb = &sd->desc;
    00355
    00356   if (sdb->cmd != SDT_BOOLX &&
    00357       sdb->cmd != SDT_NUMX &&
    00358       sdb->cmd != SDT_ONEOFMANY &&
    00359       sdb->cmd != SDT_MANYOFMANY) {
    00360     return;
    00361   }
    00362
    00363   /* We cannot know the maximum value of a bitset variable, so just have faith */
    00364   if (sdb->cmd != SDT_MANYOFMANY) {
    00365     /* We need to take special care of the uint32 type as we receive from the function
    00366      * a signed integer. While here also bail out on 64-bit settings as those are not
    00367      * supported. Unsigned 8 and 16-bit variables are safe since they fit into a signed
    00368      * 32-bit variable
    00369      * TODO: Support 64-bit settings/variables */
    00370     switch (GetVarMemType(sd->save.conv)) {
    00371       case SLE_VAR_NULL: return;
    00372       case SLE_VAR_BL:
    00373       case SLE_VAR_I8:
    00374       case SLE_VAR_U8:
    00375       case SLE_VAR_I16:
    00376       case SLE_VAR_U16:
    00377       case SLE_VAR_I32: {
    00378         /* Override the minimum value. No value below sdb->min, except special value 0 */
    00379         if (!(sdb->flags & SGF_0ISDISABLED) || val != 0) val = Clamp(val, sdb->min, sdb->max);
    00380       } break;
    00381       case SLE_VAR_U32: {
    00382         /* Override the minimum value. No value below sdb->min, except special value 0 */
    00383         uint min = ((sdb->flags & SGF_0ISDISABLED) && (uint)val <= (uint)sdb->min) ? 0 : sdb->min;
    00384         WriteValue(ptr, SLE_VAR_U32, (int64)ClampU(val, min, sdb->max));
    00385         return;
    00386       }
    00387       case SLE_VAR_I64:
    00388       case SLE_VAR_U64:
    00389       default: NOT_REACHED();
    00390     }
    00391   }
    00392
    00393   WriteValue(ptr, sd->save.conv, (int64)val);
    00394 }
    00395
    00402 static void ini_load_settings(IniFile *ini, const SettingDesc *sd, const char *grpname, void *object)
    00403 {
    00404   IniGroup *group;
    00405   IniGroup *group_def = ini->GetGroup(grpname);
    00406   IniItem *item;
    00407   const void *p;
    00408   void *ptr;
    00409   const char *s;
    00410
    00411   for (; sd->save.cmd != SL_END; sd++) {
    00412     const SettingDescBase *sdb = &sd->desc;
    00413     const SaveLoad        *sld = &sd->save;
    00414
    00415     if (!SlIsObjectCurrentlyValid(sld->version_from, sld->version_to)) continue;
    00416
    00417     /* For settings.xx.yy load the settings from [xx] yy = ? */
    00418     s = strchr(sdb->name, '.');
    00419     if (s != NULL) {
    00420       group = ini->GetGroup(sdb->name, s - sdb->name);
    00421       s++;
    00422     } else {
    00423       s = sdb->name;
    00424       group = group_def;
    00425     }
    00426
    00427     item = group->GetItem(s, false);
    00428     if (item == NULL && group != group_def) {
    00429       /* For settings.xx.yy load the settings from [settingss] yy = ? in case the previous
    00430        * did not exist (e.g. loading old config files with a [settings] section */
    00431       item = group_def->GetItem(s, false);
    00432     }
    00433     if (item == NULL) {
    00434       /* For settings.xx.zz.yy load the settings from [zz] yy = ? in case the previous
    00435        * did not exist (e.g. loading old config files with a [yapf] section */
    00436       const char *sc = strchr(s, '.');
    00437       if (sc != NULL) item = ini->GetGroup(s, sc - s)->GetItem(sc + 1, false);
    00438     }
    00439
    00440     p = (item == NULL) ? sdb->def : string_to_val(sdb, item->value);
    00441     ptr = GetVariableAddress(object, sld);
    00442
    00443     switch (sdb->cmd) {
    00444     case SDT_BOOLX: // All four are various types of (integer) numbers
    00445     case SDT_NUMX:
    00446     case SDT_ONEOFMANY:
    00447     case SDT_MANYOFMANY:
    00448       Write_ValidateSetting(ptr, sd, (int32)(size_t)p); break;
    00449
    00450     case SDT_STRING:
    00451       switch (GetVarMemType(sld->conv)) {
    00452         case SLE_VAR_STRB:
    00453         case SLE_VAR_STRBQ:
    00454           if (p != NULL) ttd_strlcpy((char*)ptr, (const char*)p, sld->length);
    00455           break;
    00456         case SLE_VAR_STR:
    00457         case SLE_VAR_STRQ:
    00458           free(*(char**)ptr);
    00459           *(char**)ptr = p == NULL ? NULL : strdup((const char*)p);
    00460           break;
    00461         case SLE_VAR_CHAR: if (p != NULL) *(char*)ptr = *(char*)p; break;
    00462         default: NOT_REACHED();
    00463       }
    00464       break;
    00465
    00466     case SDT_INTLIST: {
    00467       if (!load_intlist((const char*)p, ptr, sld->length, GetVarMemType(sld->conv))) {
    00468         ShowInfoF("ini: error in array '%s'", sdb->name);
    00469       } else if (sd->desc.proc_cnvt != NULL) {
    00470         sd->desc.proc_cnvt((const char*)p);
    00471       }
    00472       break;
    00473     }
    00474     default: NOT_REACHED();
    00475     }
    00476   }
    00477 }
    00478
    00490 static void ini_save_settings(IniFile *ini, const SettingDesc *sd, const char *grpname, void *object)
    00491 {
    00492   IniGroup *group_def = NULL, *group;
    00493   IniItem *item;
    00494   char buf[512];
    00495   const char *s;
    00496   void *ptr;
    00497
    00498   for (; sd->save.cmd != SL_END; sd++) {
    00499     const SettingDescBase *sdb = &sd->desc;
    00500     const SaveLoad        *sld = &sd->save;
    00501
    00502     /* If the setting is not saved to the configuration
    00503      * file, just continue with the next setting */
    00504     if (!SlIsObjectCurrentlyValid(sld->version_from, sld->version_to)) continue;
    00505     if (sld->conv & SLF_CONFIG_NO) continue;
    00506
    00507     /* XXX - wtf is this?? (group override?) */
    00508     s = strchr(sdb->name, '.');
    00509     if (s != NULL) {
    00510       group = ini->GetGroup(sdb->name, s - sdb->name);
    00511       s++;
    00512     } else {
    00513       if (group_def == NULL) group_def = ini->GetGroup(grpname);
    00514       s = sdb->name;
    00515       group = group_def;
    00516     }
    00517
    00518     item = group->GetItem(s, true);
    00519     ptr = GetVariableAddress(object, sld);
    00520
    00521     if (item->value != NULL) {
    00522       /* check if the value is the same as the old value */
    00523       const void *p = string_to_val(sdb, item->value);
    00524
    00525       /* The main type of a variable/setting is in bytes 8-15
    00526        * The subtype (what kind of numbers do we have there) is in 0-7 */
    00527       switch (sdb->cmd) {
    00528       case SDT_BOOLX:
    00529       case SDT_NUMX:
    00530       case SDT_ONEOFMANY:
    00531       case SDT_MANYOFMANY:
    00532         switch (GetVarMemType(sld->conv)) {
    00533         case SLE_VAR_BL:
    00534           if (*(bool*)ptr == (p != NULL)) continue;
    00535           break;
    00536         case SLE_VAR_I8:
    00537         case SLE_VAR_U8:
    00538           if (*(byte*)ptr == (byte)(unsigned long)p) continue;
    00539           break;
    00540         case SLE_VAR_I16:
    00541         case SLE_VAR_U16:
    00542           if (*(uint16*)ptr == (uint16)(unsigned long)p) continue;
    00543           break;
    00544         case SLE_VAR_I32:
    00545         case SLE_VAR_U32:
    00546           if (*(uint32*)ptr == (uint32)(unsigned long)p) continue;
    00547           break;
    00548         default: NOT_REACHED();
    00549         }
    00550         break;
    00551       default: break; // Assume the other types are always changed
    00552       }
    00553     }
    00554
    00555     /* Value has changed, get the new value and put it into a buffer */
    00556     switch (sdb->cmd) {
    00557     case SDT_BOOLX:
    00558     case SDT_NUMX:
    00559     case SDT_ONEOFMANY:
    00560     case SDT_MANYOFMANY: {
    00561       uint32 i = (uint32)ReadValue(ptr, sld->conv);
    00562
    00563       switch (sdb->cmd) {
    00564       case SDT_BOOLX:      strecpy(buf, (i != 0) ? "true" : "false", lastof(buf)); break;
    00565       case SDT_NUMX:       seprintf(buf, lastof(buf), IsSignedVarMemType(sld->conv) ? "%d" : "%u", i); break;
    00566       case SDT_ONEOFMANY:  make_oneofmany(buf, lastof(buf), sdb->many, i); break;
    00567       case SDT_MANYOFMANY: make_manyofmany(buf, lastof(buf), sdb->many, i); break;
    00568       default: NOT_REACHED();
    00569       }
    00570     } break;
    00571
    00572     case SDT_STRING:
    00573       switch (GetVarMemType(sld->conv)) {
    00574       case SLE_VAR_STRB: strecpy(buf, (char*)ptr, lastof(buf)); break;
    00575       case SLE_VAR_STRBQ:seprintf(buf, lastof(buf), "\"%s\"", (char*)ptr); break;
    00576       case SLE_VAR_STR:  strecpy(buf, *(char**)ptr, lastof(buf)); break;
    00577       case SLE_VAR_STRQ:
    00578         if (*(char**)ptr == NULL) {
    00579           buf[0] = '\0';
    00580         } else {
    00581           seprintf(buf, lastof(buf), "\"%s\"", *(char**)ptr);
    00582         }
    00583         break;
    00584       case SLE_VAR_CHAR: buf[0] = *(char*)ptr; buf[1] = '\0'; break;
    00585       default: NOT_REACHED();
    00586       }
    00587       break;
    00588
    00589     case SDT_INTLIST:
    00590       make_intlist(buf, lastof(buf), ptr, sld->length, GetVarMemType(sld->conv));
    00591       break;
    00592     default: NOT_REACHED();
    00593     }
    00594
    00595     /* The value is different, that means we have to write it to the ini */
    00596     free(item->value);
    00597     item->value = strdup(buf);
    00598   }
    00599 }
    00600
    00609 static void ini_load_setting_list(IniFile *ini, const char *grpname, StringList *list)
    00610 {
    00611   IniGroup *group = ini->GetGroup(grpname);
    00612
    00613   if (group == NULL || list == NULL) return;
    00614
    00615   list->Clear();
    00616
    00617   for (const IniItem *item = group->item; item != NULL; item = item->next) {
    00618     if (item->name != NULL) *list->Append() = strdup(item->name);
    00619   }
    00620 }
    00621
    00630 static void ini_save_setting_list(IniFile *ini, const char *grpname, StringList *list)
    00631 {
    00632   IniGroup *group = ini->GetGroup(grpname);
    00633
    00634   if (group == NULL || list == NULL) return;
    00635   group->Clear();
    00636
    00637   for (char **iter = list->Begin(); iter != list->End(); iter++) {
    00638     group->GetItem(*iter, true)->SetValue("");
    00639   }
    00640 }
    00641
    00642 /* Begin - Callback Functions for the various settings
    00643  * virtual PositionMainToolbar function, calls the right one.*/
    00644 static bool v_PositionMainToolbar(int32 p1)
    00645 {
    00646   if (_game_mode != GM_MENU) PositionMainToolbar(NULL);
    00647   return true;
    00648 }
    00649
    00650 static bool PopulationInLabelActive(int32 p1)
    00651 {
    00652   UpdateAllTownVirtCoords();
    00653   return true;
    00654 }
    00655
    00656 static bool RedrawScreen(int32 p1)
    00657 {
    00658   MarkWholeScreenDirty();
    00659   return true;
    00660 }
    00661
    00667 static bool RedrawSmallmap(int32 p1)
    00668 {
    00669   BuildLandLegend();
    00670   SetWindowClassesDirty(WC_SMALLMAP);
    00671   return true;
    00672 }
    00673
    00674 static bool InvalidateDetailsWindow(int32 p1)
    00675 {
    00676   SetWindowClassesDirty(WC_VEHICLE_DETAILS);
    00677   return true;
    00678 }
    00679
    00680 static bool InvalidateStationBuildWindow(int32 p1)
    00681 {
    00682   SetWindowDirty(WC_BUILD_STATION, 0);
    00683   return true;
    00684 }
    00685
    00686 static bool InvalidateBuildIndustryWindow(int32 p1)
    00687 {
    00688   InvalidateWindowData(WC_BUILD_INDUSTRY, 0);
    00689   return true;
    00690 }
    00691
    00692 static bool CloseSignalGUI(int32 p1)
    00693 {
    00694   if (p1 == 0) {
    00695     DeleteWindowByClass(WC_BUILD_SIGNAL);
    00696   }
    00697   return true;
    00698 }
    00699
    00700 static bool InvalidateTownViewWindow(int32 p1)
    00701 {
    00702   InvalidateWindowClassesData(WC_TOWN_VIEW, p1);
    00703   return true;
    00704 }
    00705
    00706 static bool DeleteSelectStationWindow(int32 p1)
    00707 {
    00708   DeleteWindowById(WC_SELECT_STATION, 0);
    00709   return true;
    00710 }
    00711
    00712 static bool UpdateConsists(int32 p1)
    00713 {
    00714   Train *t;
    00715   FOR_ALL_TRAINS(t) {
    00716     /* Update the consist of all trains so the maximum speed is set correctly. */
    00717     if (t->IsFrontEngine() || t->IsFreeWagon()) t->ConsistChanged(true);
    00718   }
    00719   return true;
    00720 }
    00721
    00722 /* Check service intervals of vehicles, p1 is value of % or day based servicing */
    00723 static bool CheckInterval(int32 p1)
    00724 {
    00725   VehicleDefaultSettings *vds;
    00726   if (_game_mode == GM_MENU || !Company::IsValidID(_current_company)) {
    00727     vds = &_settings_client.company.vehicle;
    00728   } else {
    00729     vds = &Company::Get(_current_company)->settings.vehicle;
    00730   }
    00731
    00732   if (p1) {
    00733     vds->servint_trains   = 50;
    00734     vds->servint_roadveh  = 50;
    00735     vds->servint_aircraft = 50;
    00736     vds->servint_ships    = 50;
    00737   } else {
    00738     vds->servint_trains   = 150;
    00739     vds->servint_roadveh  = 150;
    00740     vds->servint_aircraft = 360;
    00741     vds->servint_ships    = 100;
    00742   }
    00743
    00744   InvalidateDetailsWindow(0);
    00745
    00746   return true;
    00747 }
    00748
    00749 static bool TrainAccelerationModelChanged(int32 p1)
    00750 {
    00751   Train *t;
    00752   FOR_ALL_TRAINS(t) {
    00753     if (t->IsFrontEngine()) {
    00754       t->tcache.cached_max_curve_speed = t->GetCurveSpeedLimit();
    00755       t->UpdateAcceleration();
    00756     }
    00757   }
    00758
    00759   return true;
    00760 }
    00761
    00767 static bool TrainSlopeSteepnessChanged(int32 p1)
    00768 {
    00769   Train *t;
    00770   FOR_ALL_TRAINS(t) {
    00771     if (t->IsFrontEngine()) t->CargoChanged();
    00772   }
    00773
    00774   return true;
    00775 }
    00776
    00777 static bool DragSignalsDensityChanged(int32)
    00778 {
    00779   InvalidateWindowData(WC_BUILD_SIGNAL, 0);
    00780
    00781   return true;
    00782 }
    00783
    00784 static bool TownFoundingChanged(int32 p1)
    00785 {
    00786   if (_game_mode != GM_EDITOR && _settings_game.economy.found_town == TF_FORBIDDEN) {
    00787     DeleteWindowById(WC_FOUND_TOWN, 0);
    00788     return true;
    00789   }
    00790   InvalidateWindowData(WC_FOUND_TOWN, 0);
    00791   return true;
    00792 }
    00793
    00794 static bool InvalidateVehTimetableWindow(int32 p1)
    00795 {
    00796   InvalidateWindowClassesData(WC_VEHICLE_TIMETABLE, -2);
    00797   return true;
    00798 }
    00799
    00800 /*
    00801  * A: competitors
    00802  * B: competitor start time. Deprecated since savegame version 110.
    00803  * C: town count (3 = high, 0 = very low)
    00804  * D: industry count (4 = high, 0 = none)
    00805  * E: inital loan (in GBP)
    00806  * F: interest rate
    00807  * G: running costs (0 = low, 2 = high)
    00808  * H: construction speed of competitors (0 = very slow, 4 = very fast)
    00809  * I: competitor intelligence. Deprecated since savegame version 110.
    00810  * J: breakdowns (0 = off, 2 = normal)
    00811  * K: subsidy multiplier (0 = 1.5, 3 = 4.0)
    00812  * L: construction cost (0-2)
    00813  * M: terrain type (0 = very flat, 3 = mountainous)
    00814  * N: amount of water (0 = very low, 3 = high)
    00815  * O: economy (0 = steady, 1 = fluctuating)
    00816  * P: Train reversing (0 = end of line + stations, 1 = end of line)
    00817  * Q: disasters
    00818  * R: area restructuring (0 = permissive, 2 = hostile)
    00819  * S: the difficulty level
    00820  */
    00821 static const DifficultySettings _default_game_diff[3] = { /*
    00822    A, C, D,      E, F, G, H, J, K, L, M, N, O, P, Q, R, S*/
    00823   {2, 2, 4, 300000, 2, 0, 2, 1, 2, 0, 1, 0, 0, 0, 0, 0, 0},
    00824   {4, 2, 3, 150000, 3, 1, 3, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1},
    00825   {7, 3, 3, 100000, 4, 1, 3, 2, 0, 2, 3, 2, 1, 1, 1, 2, 2},
    00826 };
    00827
    00828 void SetDifficultyLevel(int mode, DifficultySettings *gm_opt)
    00829 {
    00830   assert(mode <= 3);
    00831
    00832   if (mode != 3) {
    00833     *gm_opt = _default_game_diff[mode];
    00834   } else {
    00835     gm_opt->diff_level = 3;
    00836   }
    00837 }
    00838
    00843 static void CheckDifficultyLevels()
    00844 {
    00845   if (_settings_newgame.difficulty.diff_level != 3) {
    00846     SetDifficultyLevel(_settings_newgame.difficulty.diff_level, &_settings_newgame.difficulty);
    00847   }
    00848 }
    00849
    00850 static bool DifficultyReset(int32 level)
    00851 {
    00852   SetDifficultyLevel(level, (_game_mode == GM_MENU) ? &_settings_newgame.difficulty : &_settings_game.difficulty);
    00853   return true;
    00854 }
    00855
    00856 static bool DifficultyChange(int32)
    00857 {
    00858   if (_game_mode == GM_MENU) {
    00859     if (_settings_newgame.difficulty.diff_level != 3) {
    00860       ShowErrorMessage(STR_WARNING_DIFFICULTY_TO_CUSTOM, INVALID_STRING_ID, 0, 0);
    00861       _settings_newgame.difficulty.diff_level = 3;
    00862     }
    00863     SetWindowClassesDirty(WC_SELECT_GAME);
    00864   } else {
    00865     _settings_game.difficulty.diff_level = 3;
    00866   }
    00867
    00868   /* If we are a network-client, update the difficult setting (if it is open).
    00869    * Use this instead of just dirtying the window because we need to load in
    00870    * the new difficulty settings */
    00871   if (_networking && FindWindowById(WC_GAME_OPTIONS, 0) != NULL) {
    00872     ShowGameDifficulty();
    00873   }
    00874
    00875   return true;
    00876 }
    00877
    00878 static bool DifficultyNoiseChange(int32 i)
    00879 {
    00880   if (_game_mode == GM_NORMAL) {
    00881     UpdateAirportsNoise();
    00882     if (_settings_game.economy.station_noise_level) {
    00883       InvalidateWindowClassesData(WC_TOWN_VIEW, 0);
    00884     }
    00885   }
    00886
    00887   return DifficultyChange(i);
    00888 }
    00889
    00890 static bool MaxNoAIsChange(int32 i)
    00891 {
    00892   if (((_game_mode == GM_MENU) ? _settings_newgame.difficulty : _settings_game.difficulty).max_no_competitors != 0 &&
    00893 #ifdef ENABLE_AI
    00894       AI::GetInfoList()->size() == 0 &&
    00895 #endif /* ENABLE_AI */
    00896       (!_networking || _network_server)) {
    00897     ShowErrorMessage(STR_WARNING_NO_SUITABLE_AI, INVALID_STRING_ID, 0, 0, true);
    00898   }
    00899
    00900   return DifficultyChange(i);
    00901 }
    00902
    00908 static bool CheckRoadSide(int p1)
    00909 {
    00910   extern bool RoadVehiclesAreBuilt();
    00911   return _game_mode == GM_MENU || !RoadVehiclesAreBuilt();
    00912 }
    00913
    00920 static int32 ConvertLandscape(const char *value)
    00921 {
    00922   /* try with the old values */
    00923   return lookup_oneofmany("normal|hilly|desert|candy", value);
    00924 }
    00925
    00926 static bool CheckFreeformEdges(int32 p1)
    00927 {
    00928   if (_game_mode == GM_MENU) return true;
    00929   if (p1 != 0) {
    00930     Ship *s;
    00931     FOR_ALL_SHIPS(s) {
    00932       if (TileX(s->tile) == 0 || TileY(s->tile) == 0) {
    00933         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_EMPTY, INVALID_STRING_ID, 0, 0);
    00934         return false;
    00935       }
    00936     }
    00937     Station *st;
    00938     FOR_ALL_STATIONS(st) {
    00939       if (TileX(st->xy) == 0 || TileY(st->xy) == 0) {
    00940         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_EMPTY, INVALID_STRING_ID, 0, 0);
    00941         return false;
    00942       }
    00943     }
    00944     for (uint i = 0; i < MapSizeX(); i++) MakeVoid(TileXY(i, 0));
    00945     for (uint i = 0; i < MapSizeY(); i++) MakeVoid(TileXY(0, i));
    00946   } else {
    00947     for (uint i = 0; i < MapMaxX(); i++) {
    00948       if (TileHeight(TileXY(i, 1)) != 0) {
    00949         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, 0, 0);
    00950         return false;
    00951       }
    00952     }
    00953     for (uint i = 1; i < MapMaxX(); i++) {
    00954       if (!IsTileType(TileXY(i, MapMaxY() - 1), MP_WATER) || TileHeight(TileXY(1, MapMaxY())) != 0) {
    00955         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, 0, 0);
    00956         return false;
    00957       }
    00958     }
    00959     for (uint i = 0; i < MapMaxY(); i++) {
    00960       if (TileHeight(TileXY(1, i)) != 0) {
    00961         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, 0, 0);
    00962         return false;
    00963       }
    00964     }
    00965     for (uint i = 1; i < MapMaxY(); i++) {
    00966       if (!IsTileType(TileXY(MapMaxX() - 1, i), MP_WATER) || TileHeight(TileXY(MapMaxX(), i)) != 0) {
    00967         ShowErrorMessage(STR_CONFIG_SETTING_EDGES_NOT_WATER, INVALID_STRING_ID, 0, 0);
    00968         return false;
    00969       }
    00970     }
    00971     /* Make tiles at the border water again. */
    00972     for (uint i = 0; i < MapMaxX(); i++) {
    00973       SetTileHeight(TileXY(i, 0), 0);
    00974       SetTileType(TileXY(i, 0), MP_WATER);
    00975     }
    00976     for (uint i = 0; i < MapMaxY(); i++) {
    00977       SetTileHeight(TileXY(0, i), 0);
    00978       SetTileType(TileXY(0, i), MP_WATER);
    00979     }
    00980   }
    00981   MarkWholeScreenDirty();
    00982   return true;
    00983 }
    00984
    00989 static bool ChangeDynamicEngines(int32 p1)
    00990 {
    00991   if (_game_mode == GM_MENU) return true;
    00992
    00993   const Vehicle *v;
    00994   FOR_ALL_VEHICLES(v) {
    00995     if (IsCompanyBuildableVehicleType(v)) {
    00996       ShowErrorMessage(STR_CONFIG_SETTING_DYNAMIC_ENGINES_EXISTING_VEHICLES, INVALID_STRING_ID, 0, 0);
    00997       return false;
    00998     }
    00999   }
    01000
    01001   /* Reset the engines, they will get new EngineIDs */
    01002   _engine_mngr.ResetToDefaultMapping();
    01003   ReloadNewGRFData();
    01004
    01005   return true;
    01006 }
    01007
    01008 static bool StationCatchmentChanged(int32 p1)
    01009 {
    01010   Station::RecomputeIndustriesNearForAll();
    01011   return true;
    01012 }
    01013
    01014 #ifdef ENABLE_NETWORK
    01015
    01016 static bool UpdateClientName(int32 p1)
    01017 {
    01018   NetworkUpdateClientName();
    01019   return true;
    01020 }
    01021
    01022 static bool UpdateServerPassword(int32 p1)
    01023 {
    01024   if (strcmp(_settings_client.network.server_password, "*") == 0) {
    01025     _settings_client.network.server_password[0] = '\0';
    01026   }
    01027
    01028   return true;
    01029 }
    01030
    01031 static bool UpdateRconPassword(int32 p1)
    01032 {
    01033   if (strcmp(_settings_client.network.rcon_password, "*") == 0) {
    01034     _settings_client.network.rcon_password[0] = '\0';
    01035   }
    01036
    01037   return true;
    01038 }
    01039
    01040 static bool UpdateClientConfigValues(int32 p1)
    01041 {
    01042   if (_network_server) NetworkServerSendConfigUpdate();
    01043
    01044   return true;
    01045 }
    01046
    01047 #endif /* ENABLE_NETWORK */
    01048
    01049
    01050 /* End - Callback Functions */
    01051
    01055 static void PrepareOldDiffCustom()
    01056 {
    01057   memset(_old_diff_custom, 0, sizeof(_old_diff_custom));
    01058 }
    01059
    01066 static void HandleOldDiffCustom(bool savegame)
    01067 {
    01068   uint options_to_load = GAME_DIFFICULTY_NUM - ((savegame && CheckSavegameVersion(4)) ? 1 : 0);
    01069
    01070   if (!savegame) {
    01071     /* If we did read to old_diff_custom, then at least one value must be non 0. */
    01072     bool old_diff_custom_used = false;
    01073     for (uint i = 0; i < options_to_load && !old_diff_custom_used; i++) {
    01074       old_diff_custom_used = (_old_diff_custom[i] != 0);
    01075     }
    01076
    01077     if (!old_diff_custom_used) return;
    01078   }
    01079
    01080   for (uint i = 0; i < options_to_load; i++) {
    01081     const SettingDesc *sd = &_settings[i];
    01082     /* Skip deprecated options */
    01083     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01084     void *var = GetVariableAddress(savegame ? &_settings_game : &_settings_newgame, &sd->save);
    01085     Write_ValidateSetting(var, sd, (int32)((i == 4 ? 1000 : 1) * _old_diff_custom[i]));
    01086   }
    01087 }
    01088
    01093 static bool ConvertOldNewsSetting(const char *name, const char *value)
    01094 {
    01095   if (strcasecmp(name, "openclose") == 0) {
    01096     /* openclose has been split in "open" and "close".
    01097      * So the job is now to decrypt the value of the old news config
    01098      * and give it to the two newly introduced ones*/
    01099
    01100     NewsDisplay display = ND_OFF; // default
    01101     if (strcasecmp(value, "full") == 0) {
    01102       display = ND_FULL;
    01103     } else if (strcasecmp(value, "summarized") == 0) {
    01104       display = ND_SUMMARY;
    01105     }
    01106     /* tranfert of values */
    01107     _news_type_data[NT_INDUSTRY_OPEN].display = display;
    01108     _news_type_data[NT_INDUSTRY_CLOSE].display = display;
    01109     return true;
    01110   }
    01111   return false;
    01112 }
    01113
    01114 static void NewsDisplayLoadConfig(IniFile *ini, const char *grpname)
    01115 {
    01116   IniGroup *group = ini->GetGroup(grpname);
    01117   IniItem *item;
    01118
    01119   /* If no group exists, return */
    01120   if (group == NULL) return;
    01121
    01122   for (item = group->item; item != NULL; item = item->next) {
    01123     int news_item = -1;
    01124     for (int i = 0; i < NT_END; i++) {
    01125       if (strcasecmp(item->name, _news_type_data[i].name) == 0) {
    01126         news_item = i;
    01127         break;
    01128       }
    01129     }
    01130
    01131     /* the config been read is not within current aceptable config */
    01132     if (news_item == -1) {
    01133       /* if the conversion function cannot process it, advice by a debug warning*/
    01134       if (!ConvertOldNewsSetting(item->name, item->value)) {
    01135         DEBUG(misc, 0, "Invalid display option: %s", item->name);
    01136       }
    01137       /* in all cases, there is nothing left to do */
    01138       continue;
    01139     }
    01140
    01141     if (StrEmpty(item->value)) {
    01142       DEBUG(misc, 0, "Empty display value for newstype %s", item->name);
    01143       continue;
    01144     } else if (strcasecmp(item->value, "full") == 0) {
    01145       _news_type_data[news_item].display = ND_FULL;
    01146     } else if (strcasecmp(item->value, "off") == 0) {
    01147       _news_type_data[news_item].display = ND_OFF;
    01148     } else if (strcasecmp(item->value, "summarized") == 0) {
    01149       _news_type_data[news_item].display = ND_SUMMARY;
    01150     } else {
    01151       DEBUG(misc, 0, "Invalid display value for newstype %s: %s", item->name, item->value);
    01152       continue;
    01153     }
    01154   }
    01155 }
    01156
    01157 static void AILoadConfig(IniFile *ini, const char *grpname)
    01158 {
    01159 #ifdef ENABLE_AI
    01160   IniGroup *group = ini->GetGroup(grpname);
    01161   IniItem *item;
    01162
    01163   /* Clean any configured AI */
    01164   for (CompanyID c = COMPANY_FIRST; c < MAX_COMPANIES; c++) {
    01165     AIConfig::GetConfig(c, AIConfig::AISS_FORCE_NEWGAME)->ChangeAI(NULL);
    01166   }
    01167
    01168   /* If no group exists, return */
    01169   if (group == NULL) return;
    01170
    01171   CompanyID c = COMPANY_FIRST;
    01172   for (item = group->item; c < MAX_COMPANIES && item != NULL; c++, item = item->next) {
    01173     AIConfig *config = AIConfig::GetConfig(c, AIConfig::AISS_FORCE_NEWGAME);
    01174
    01175     config->ChangeAI(item->name);
    01176     if (!config->HasAI()) {
    01177       if (strcmp(item->name, "none") != 0) {
    01178         DEBUG(ai, 0, "The AI by the name '%s' was no longer found, and removed from the list.", item->name);
    01179         continue;
    01180       }
    01181     }
    01182     if (item->value != NULL) config->StringToSettings(item->value);
    01183   }
    01184 #endif /* ENABLE_AI */
    01185 }
    01186
    01187 /* Load a GRF configuration from the given group name */
    01188 static GRFConfig *GRFLoadConfig(IniFile *ini, const char *grpname, bool is_static)
    01189 {
    01190   IniGroup *group = ini->GetGroup(grpname);
    01191   IniItem *item;
    01192   GRFConfig *first = NULL;
    01193   GRFConfig **curr = &first;
    01194
    01195   if (group == NULL) return NULL;
    01196
    01197   for (item = group->item; item != NULL; item = item->next) {
    01198     GRFConfig *c = CallocT<GRFConfig>(1);
    01199     c->filename = strdup(item->name);
    01200
    01201     /* Parse parameters */
    01202     if (!StrEmpty(item->value)) {
    01203       c->num_params = parse_intlist(item->value, (int*)c->param, lengthof(c->param));
    01204       if (c->num_params == (byte)-1) {
    01205         ShowInfoF("ini: error in array '%s'", item->name);
    01206         c->num_params = 0;
    01207       }
    01208     }
    01209
    01210     /* Check if item is valid */
    01211     if (!FillGRFDetails(c, is_static)) {
    01212       const char *msg;
    01213
    01214       if (c->status == GCS_NOT_FOUND) {
    01215         msg = "not found";
    01216       } else if (HasBit(c->flags, GCF_UNSAFE)) {
    01217         msg = "unsafe for static use";
    01218       } else if (HasBit(c->flags, GCF_SYSTEM)) {
    01219         msg = "system NewGRF";
    01220       } else {
    01221         msg = "unknown";
    01222       }
    01223
    01224       ShowInfoF("ini: ignoring invalid NewGRF '%s': %s", item->name, msg);
    01225       ClearGRFConfig(&c);
    01226       continue;
    01227     }
    01228
    01229     /* Check for duplicate GRFID (will also check for duplicate filenames) */
    01230     bool duplicate = false;
    01231     for (const GRFConfig *gc = first; gc != NULL; gc = gc->next) {
    01232       if (gc->grfid == c->grfid) {
    01233         ShowInfoF("ini: ignoring  NewGRF '%s': duplicate GRF ID with '%s'", item->name, gc->filename);
    01234         duplicate = true;
    01235         break;
    01236       }
    01237     }
    01238     if (duplicate) {
    01239       ClearGRFConfig(&c);
    01240       continue;
    01241     }
    01242
    01243     /* Mark file as static to avoid saving in savegame. */
    01244     if (is_static) SetBit(c->flags, GCF_STATIC);
    01245
    01246     /* Add item to list */
    01247     *curr = c;
    01248     curr = &c->next;
    01249   }
    01250
    01251   return first;
    01252 }
    01253
    01254 static void NewsDisplaySaveConfig(IniFile *ini, const char *grpname)
    01255 {
    01256   IniGroup *group = ini->GetGroup(grpname);
    01257
    01258   for (int i = 0; i < NT_END; i++) {
    01259     const char *value;
    01260     int v = _news_type_data[i].display;
    01261
    01262     value = (v == ND_OFF ? "off" : (v == ND_SUMMARY ? "summarized" : "full"));
    01263
    01264     group->GetItem(_news_type_data[i].name, true)->SetValue(value);
    01265   }
    01266 }
    01267
    01268 static void AISaveConfig(IniFile *ini, const char *grpname)
    01269 {
    01270 #ifdef ENABLE_AI
    01271   IniGroup *group = ini->GetGroup(grpname);
    01272
    01273   if (group == NULL) return;
    01274   group->Clear();
    01275
    01276   for (CompanyID c = COMPANY_FIRST; c < MAX_COMPANIES; c++) {
    01277     AIConfig *config = AIConfig::GetConfig(c, AIConfig::AISS_FORCE_NEWGAME);
    01278     const char *name;
    01279     char value[1024];
    01280     config->SettingsToString(value, lengthof(value));
    01281
    01282     if (config->HasAI()) {
    01283       name = config->GetName();
    01284     } else {
    01285       name = "none";
    01286     }
    01287
    01288     IniItem *item = new IniItem(group, name, strlen(name));
    01289     item->SetValue(value);
    01290   }
    01291 #endif /* ENABLE_AI */
    01292 }
    01293
    01298 static void SaveVersionInConfig(IniFile *ini)
    01299 {
    01300   IniGroup *group = ini->GetGroup("version");
    01301
    01302   char version[9];
    01303   snprintf(version, lengthof(version), "%08X", _openttd_newgrf_version);
    01304
    01305   const char * const versions[][2] = {
    01306     { "version_string", _openttd_revision },
    01307     { "version_number", version }
    01308   };
    01309
    01310   for (uint i = 0; i < lengthof(versions); i++) {
    01311     group->GetItem(versions[i][0], true)->SetValue(versions[i][1]);
    01312   }
    01313 }
    01314
    01315 /* Save a GRF configuration to the given group name */
    01316 static void GRFSaveConfig(IniFile *ini, const char *grpname, const GRFConfig *list)
    01317 {
    01318   ini->RemoveGroup(grpname);
    01319   IniGroup *group = ini->GetGroup(grpname);
    01320   const GRFConfig *c;
    01321
    01322   for (c = list; c != NULL; c = c->next) {
    01323     char params[512];
    01324     GRFBuildParamList(params, c, lastof(params));
    01325
    01326     group->GetItem(c->filename, true)->SetValue(params);
    01327   }
    01328 }
    01329
    01330 /* Common handler for saving/loading variables to the configuration file */
    01331 static void HandleSettingDescs(IniFile *ini, SettingDescProc *proc, SettingDescProcList *proc_list)
    01332 {
    01333   proc(ini, (const SettingDesc*)_misc_settings,    "misc",  NULL);
    01334   proc(ini, (const SettingDesc*)_music_settings,   "music", &msf);
    01335 #if defined(WIN32) && !defined(DEDICATED)
    01336   proc(ini, (const SettingDesc*)_win32_settings,   "win32", NULL);
    01337 #endif /* WIN32 */
    01338
    01339   proc(ini, _settings,         "patches",  &_settings_newgame);
    01340   proc(ini, _currency_settings,"currency", &_custom_currency);
    01341   proc(ini, _company_settings, "company",  &_settings_client.company);
    01342
    01343 #ifdef ENABLE_NETWORK
    01344   proc_list(ini, "server_bind_addresses", &_network_bind_list);
    01345   proc_list(ini, "servers", &_network_host_list);
    01346   proc_list(ini, "bans",    &_network_ban_list);
    01347 #endif /* ENABLE_NETWORK */
    01348 }
    01349
    01350 static IniFile *IniLoadConfig()
    01351 {
    01352   IniFile *ini = new IniFile(_list_group_names);
    01353   ini->LoadFromDisk(_config_file);
    01354   return ini;
    01355 }
    01356
    01358 void LoadFromConfig()
    01359 {
    01360   IniFile *ini = IniLoadConfig();
    01361   ResetCurrencies(false); // Initialize the array of curencies, without preserving the custom one
    01362
    01363   HandleSettingDescs(ini, ini_load_settings, ini_load_setting_list);
    01364   _grfconfig_newgame = GRFLoadConfig(ini, "newgrf", false);
    01365   _grfconfig_static  = GRFLoadConfig(ini, "newgrf-static", true);
    01366   NewsDisplayLoadConfig(ini, "news_display");
    01367   AILoadConfig(ini, "ai_players");
    01368
    01369   PrepareOldDiffCustom();
    01370   ini_load_settings(ini, _gameopt_settings, "gameopt",  &_settings_newgame);
    01371   HandleOldDiffCustom(false);
    01372
    01373   CheckDifficultyLevels();
    01374   delete ini;
    01375 }
    01376
    01378 void SaveToConfig()
    01379 {
    01380   IniFile *ini = IniLoadConfig();
    01381
    01382   /* Remove some obsolete groups. These have all been loaded into other groups. */
    01383   ini->RemoveGroup("patches");
    01384   ini->RemoveGroup("yapf");
    01385   ini->RemoveGroup("gameopt");
    01386
    01387   HandleSettingDescs(ini, ini_save_settings, ini_save_setting_list);
    01388   GRFSaveConfig(ini, "newgrf", _grfconfig_newgame);
    01389   GRFSaveConfig(ini, "newgrf-static", _grfconfig_static);
    01390   NewsDisplaySaveConfig(ini, "news_display");
    01391   AISaveConfig(ini, "ai_players");
    01392   SaveVersionInConfig(ini);
    01393   ini->SaveToDisk(_config_file);
    01394   delete ini;
    01395 }
    01396
    01397 void GetGRFPresetList(GRFPresetList *list)
    01398 {
    01399   list->Clear();
    01400
    01401   IniFile *ini = IniLoadConfig();
    01402   IniGroup *group;
    01403   for (group = ini->group; group != NULL; group = group->next) {
    01404     if (strncmp(group->name, "preset-", 7) == 0) {
    01405       *list->Append() = strdup(group->name + 7);
    01406     }
    01407   }
    01408
    01409   delete ini;
    01410 }
    01411
    01412 GRFConfig *LoadGRFPresetFromConfig(const char *config_name)
    01413 {
    01414   char *section = (char*)alloca(strlen(config_name) + 8);
    01415   sprintf(section, "preset-%s", config_name);
    01416
    01417   IniFile *ini = IniLoadConfig();
    01418   GRFConfig *config = GRFLoadConfig(ini, section, false);
    01419   delete ini;
    01420
    01421   return config;
    01422 }
    01423
    01424 void SaveGRFPresetToConfig(const char *config_name, GRFConfig *config)
    01425 {
    01426   char *section = (char*)alloca(strlen(config_name) + 8);
    01427   sprintf(section, "preset-%s", config_name);
    01428
    01429   IniFile *ini = IniLoadConfig();
    01430   GRFSaveConfig(ini, section, config);
    01431   ini->SaveToDisk(_config_file);
    01432   delete ini;
    01433 }
    01434
    01435 void DeleteGRFPresetFromConfig(const char *config_name)
    01436 {
    01437   char *section = (char*)alloca(strlen(config_name) + 8);
    01438   sprintf(section, "preset-%s", config_name);
    01439
    01440   IniFile *ini = IniLoadConfig();
    01441   ini->RemoveGroup(section);
    01442   ini->SaveToDisk(_config_file);
    01443   delete ini;
    01444 }
    01445
    01446 static const SettingDesc *GetSettingDescription(uint index)
    01447 {
    01448   if (index >= lengthof(_settings)) return NULL;
    01449   return &_settings[index];
    01450 }
    01451
    01462 CommandCost CmdChangeSetting(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
    01463 {
    01464   const SettingDesc *sd = GetSettingDescription(p1);
    01465
    01466   if (sd == NULL) return CMD_ERROR;
    01467   if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) return CMD_ERROR;
    01468
    01469   if ((sd->desc.flags & SGF_NETWORK_ONLY) && !_networking && _game_mode != GM_MENU) return CMD_ERROR;
    01470   if ((sd->desc.flags & SGF_NO_NETWORK) && _networking) return CMD_ERROR;
    01471   if ((sd->desc.flags & SGF_NEWGAME_ONLY) &&
    01472       (_game_mode == GM_NORMAL ||
    01473       (_game_mode == GM_EDITOR && (sd->desc.flags & SGF_SCENEDIT_TOO) == 0))) {
    01474     return CMD_ERROR;
    01475   }
    01476
    01477   if (flags & DC_EXEC) {
    01478     GameSettings *s = (_game_mode == GM_MENU) ? &_settings_newgame : &_settings_game;
    01479     void *var = GetVariableAddress(s, &sd->save);
    01480
    01481     int32 oldval = (int32)ReadValue(var, sd->save.conv);
    01482     int32 newval = (int32)p2;
    01483
    01484     Write_ValidateSetting(var, sd, newval);
    01485     newval = (int32)ReadValue(var, sd->save.conv);
    01486
    01487     if (oldval == newval) return CommandCost();
    01488
    01489     if (sd->desc.proc != NULL && !sd->desc.proc(newval)) {
    01490       WriteValue(var, sd->save.conv, (int64)oldval);
    01491       return CommandCost();
    01492     }
    01493
    01494     if (sd->desc.flags & SGF_NO_NETWORK) {
    01495       GamelogStartAction(GLAT_SETTING);
    01496       GamelogSetting(sd->desc.name, oldval, newval);
    01497       GamelogStopAction();
    01498     }
    01499
    01500     SetWindowDirty(WC_GAME_OPTIONS, 0);
    01501   }
    01502
    01503   return CommandCost();
    01504 }
    01505
    01515 CommandCost CmdChangeCompanySetting(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
    01516 {
    01517   if (p1 >= lengthof(_company_settings)) return CMD_ERROR;
    01518   const SettingDesc *sd = &_company_settings[p1];
    01519
    01520   if (flags & DC_EXEC) {
    01521     void *var = GetVariableAddress(&Company::Get(_current_company)->settings, &sd->save);
    01522
    01523     int32 oldval = (int32)ReadValue(var, sd->save.conv);
    01524     int32 newval = (int32)p2;
    01525
    01526     Write_ValidateSetting(var, sd, newval);
    01527     newval = (int32)ReadValue(var, sd->save.conv);
    01528
    01529     if (oldval == newval) return CommandCost();
    01530
    01531     if (sd->desc.proc != NULL && !sd->desc.proc(newval)) {
    01532       WriteValue(var, sd->save.conv, (int64)oldval);
    01533       return CommandCost();
    01534     }
    01535
    01536     SetWindowDirty(WC_GAME_OPTIONS, 0);
    01537   }
    01538
    01539   return CommandCost();
    01540 }
    01541
    01548 bool SetSettingValue(uint index, int32 value, bool force_newgame)
    01549 {
    01550   const SettingDesc *sd = &_settings[index];
    01551   /* If an item is company-based, we do not send it over the network
    01552    * (if any) to change. Also *hack*hack* we update the _newgame version
    01553    * of settings because changing a company-based setting in a game also
    01554    * changes its defaults. At least that is the convention we have chosen */
    01555   if (sd->save.conv & SLF_NETWORK_NO) {
    01556     void *var = GetVariableAddress((_game_mode == GM_MENU) ? &_settings_newgame : &_settings_game, &sd->save);
    01557     Write_ValidateSetting(var, sd, value);
    01558
    01559     if (_game_mode != GM_MENU) {
    01560       void *var2 = GetVariableAddress(&_settings_newgame, &sd->save);
    01561       Write_ValidateSetting(var2, sd, value);
    01562     }
    01563     if (sd->desc.proc != NULL) sd->desc.proc((int32)ReadValue(var, sd->save.conv));
    01564     SetWindowDirty(WC_GAME_OPTIONS, 0);
    01565     return true;
    01566   }
    01567
    01568   if (force_newgame) {
    01569     void *var2 = GetVariableAddress(&_settings_newgame, &sd->save);
    01570     Write_ValidateSetting(var2, sd, value);
    01571     return true;
    01572   }
    01573
    01574   /* send non-company-based settings over the network */
    01575   if (!_networking || (_networking && _network_server)) {
    01576     return DoCommandP(0, index, value, CMD_CHANGE_SETTING);
    01577   }
    01578   return false;
    01579 }
    01580
    01586 void SetCompanySetting(uint index, int32 value)
    01587 {
    01588   const SettingDesc *sd = &_company_settings[index];
    01589   if (Company::IsValidID(_local_company) && _game_mode != GM_MENU) {
    01590     DoCommandP(0, index, value, CMD_CHANGE_COMPANY_SETTING);
    01591   } else {
    01592     void *var = GetVariableAddress(&_settings_client.company, &sd->save);
    01593     Write_ValidateSetting(var, sd, value);
    01594     if (sd->desc.proc != NULL) sd->desc.proc((int32)ReadValue(var, sd->save.conv));
    01595   }
    01596 }
    01597
    01601 void SetDefaultCompanySettings(CompanyID cid)
    01602 {
    01603   Company *c = Company::Get(cid);
    01604   const SettingDesc *sd;
    01605   for (sd = _company_settings; sd->save.cmd != SL_END; sd++) {
    01606     void *var = GetVariableAddress(&c->settings, &sd->save);
    01607     Write_ValidateSetting(var, sd, (int32)(size_t)sd->desc.def);
    01608   }
    01609 }
    01610
    01611 #if defined(ENABLE_NETWORK)
    01612
    01615 void SyncCompanySettings()
    01616 {
    01617   const SettingDesc *sd;
    01618   uint i = 0;
    01619   for (sd = _company_settings; sd->save.cmd != SL_END; sd++, i++) {
    01620     const void *old_var = GetVariableAddress(&Company::Get(_current_company)->settings, &sd->save);
    01621     const void *new_var = GetVariableAddress(&_settings_client.company, &sd->save);
    01622     uint32 old_value = (uint32)ReadValue(old_var, sd->save.conv);
    01623     uint32 new_value = (uint32)ReadValue(new_var, sd->save.conv);
    01624     if (old_value != new_value) NetworkSend_Command(0, i, new_value, CMD_CHANGE_COMPANY_SETTING, NULL, NULL, _local_company);
    01625   }
    01626 }
    01627 #endif /* ENABLE_NETWORK */
    01628
    01634 uint GetCompanySettingIndex(const char *name)
    01635 {
    01636   uint i;
    01637   const SettingDesc *sd = GetSettingFromName(name, &i);
    01638   assert(sd != NULL && (sd->desc.flags & SGF_PER_COMPANY) != 0);
    01639   return i;
    01640 }
    01641
    01648 bool SetSettingValue(uint index, const char *value)
    01649 {
    01650   const SettingDesc *sd = &_settings[index];
    01651   assert(sd->save.conv & SLF_NETWORK_NO);
    01652
    01653   char *var = (char*)GetVariableAddress(NULL, &sd->save);
    01654   ttd_strlcpy(var, value, sd->save.length);
    01655   if (sd->desc.proc != NULL) sd->desc.proc(0);
    01656
    01657   return true;
    01658 }
    01659
    01667 const SettingDesc *GetSettingFromName(const char *name, uint *i)
    01668 {
    01669   const SettingDesc *sd;
    01670
    01671   /* First check all full names */
    01672   for (*i = 0, sd = _settings; sd->save.cmd != SL_END; sd++, (*i)++) {
    01673     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01674     if (strcmp(sd->desc.name, name) == 0) return sd;
    01675   }
    01676
    01677   /* Then check the shortcut variant of the name. */
    01678   for (*i = 0, sd = _settings; sd->save.cmd != SL_END; sd++, (*i)++) {
    01679     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01680     const char *short_name = strchr(sd->desc.name, '.');
    01681     if (short_name != NULL) {
    01682       short_name++;
    01683       if (strcmp(short_name, name) == 0) return sd;
    01684     }
    01685   }
    01686
    01687   if (strncmp(name, "company.", 8) == 0) name += 8;
    01688   /* And finally the company-based settings */
    01689   for (*i = 0, sd = _company_settings; sd->save.cmd != SL_END; sd++, (*i)++) {
    01690     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01691     if (strcmp(sd->desc.name, name) == 0) return sd;
    01692   }
    01693
    01694   return NULL;
    01695 }
    01696
    01697 /* Those 2 functions need to be here, else we have to make some stuff non-static
    01698  * and besides, it is also better to keep stuff like this at the same place */
    01699 void IConsoleSetSetting(const char *name, const char *value, bool force_newgame)
    01700 {
    01701   uint index;
    01702   const SettingDesc *sd = GetSettingFromName(name, &index);
    01703
    01704   if (sd == NULL) {
    01705     IConsolePrintF(CC_WARNING, "'%s' is an unknown setting.", name);
    01706     return;
    01707   }
    01708
    01709   bool success;
    01710   if (sd->desc.cmd == SDT_STRING) {
    01711     success = SetSettingValue(index, value);
    01712   } else {
    01713     uint32 val;
    01714     extern bool GetArgumentInteger(uint32 *value, const char *arg);
    01715     success = GetArgumentInteger(&val, value);
    01716     if (!success) {
    01717       IConsolePrintF(CC_ERROR, "'%s' is not an integer.", value);
    01718       return;
    01719     }
    01720
    01721     success = SetSettingValue(index, val, force_newgame);
    01722   }
    01723
    01724   if (!success) {
    01725     if (_network_server) {
    01726       IConsoleError("This command/variable is not available during network games.");
    01727     } else {
    01728       IConsoleError("This command/variable is only available to a network server.");
    01729     }
    01730   }
    01731 }
    01732
    01733 void IConsoleSetSetting(const char *name, int value)
    01734 {
    01735   uint index;
    01736   const SettingDesc *sd = GetSettingFromName(name, &index);
    01737   assert(sd != NULL);
    01738   SetSettingValue(index, value);
    01739 }
    01740
    01746 void IConsoleGetSetting(const char *name, bool force_newgame)
    01747 {
    01748   char value[20];
    01749   uint index;
    01750   const SettingDesc *sd = GetSettingFromName(name, &index);
    01751   const void *ptr;
    01752
    01753   if (sd == NULL) {
    01754     IConsolePrintF(CC_WARNING, "'%s' is an unknown setting.", name);
    01755     return;
    01756   }
    01757
    01758   ptr = GetVariableAddress((_game_mode == GM_MENU || force_newgame) ? &_settings_newgame : &_settings_game, &sd->save);
    01759
    01760   if (sd->desc.cmd == SDT_STRING) {
    01761     IConsolePrintF(CC_WARNING, "Current value for '%s' is: '%s'", name, (const char *)ptr);
    01762   } else {
    01763     if (sd->desc.cmd == SDT_BOOLX) {
    01764       snprintf(value, sizeof(value), (*(bool*)ptr == 1) ? "on" : "off");
    01765     } else {
    01766       snprintf(value, sizeof(value), "%d", (int32)ReadValue(ptr, sd->save.conv));
    01767     }
    01768
    01769     IConsolePrintF(CC_WARNING, "Current value for '%s' is: '%s' (min: %s%d, max: %d)",
    01770       name, value, (sd->desc.flags & SGF_0ISDISABLED) ? "(0) " : "", sd->desc.min, sd->desc.max);
    01771   }
    01772 }
    01773
    01779 void IConsoleListSettings(const char *prefilter)
    01780 {
    01781   IConsolePrintF(CC_WARNING, "All settings with their current value:");
    01782
    01783   for (const SettingDesc *sd = _settings; sd->save.cmd != SL_END; sd++) {
    01784     if (!SlIsObjectCurrentlyValid(sd->save.version_from, sd->save.version_to)) continue;
    01785     if (prefilter != NULL && strstr(sd->desc.name, prefilter) == NULL) continue;
    01786     char value[80];
    01787     const void *ptr = GetVariableAddress((_game_mode == GM_MENU) ? &_settings_newgame : &_settings_game, &sd->save);
    01788
    01789     if (sd->desc.cmd == SDT_BOOLX) {
    01790       snprintf(value, lengthof(value), (*(bool*)ptr == 1) ? "on" : "off");
    01791     } else if (sd->desc.cmd == SDT_STRING) {
    01792       snprintf(value, sizeof(value), "%s", (const char *)ptr);
    01793     } else {
    01794       snprintf(value, lengthof(value), "%d", (uint32)ReadValue(ptr, sd->save.conv));
    01795     }
    01796     IConsolePrintF(CC_DEFAULT, "%s = %s", sd->desc.name, value);
    01797   }
    01798
    01799   IConsolePrintF(CC_WARNING, "Use 'setting' command to change a value");
    01800 }
    01801
    01806 static void LoadSettings(const SettingDesc *osd, void *object)
    01807 {
    01808   for (; osd->save.cmd != SL_END; osd++) {
    01809     const SaveLoad *sld = &osd->save;
    01810     void *ptr = GetVariableAddress(object, sld);
    01811
    01812     if (!SlObjectMember(ptr, sld)) continue;
    01813     if (IsNumericType(sld->conv)) Write_ValidateSetting(ptr, osd, ReadValue(ptr, sld->conv));
    01814   }
    01815 }
    01816
    01821 static inline void LoadSettingsGlobList(const SettingDescGlobVarList *sdg)
    01822 {
    01823   LoadSettings((const SettingDesc*)sdg, NULL);
    01824 }
    01825
    01830 static void SaveSettings(const SettingDesc *sd, void *object)
    01831 {
    01832   /* We need to write the CH_RIFF header, but unfortunately can't call
    01833    * SlCalcLength() because we have a different format. So do this manually */
    01834   const SettingDesc *i;
    01835   size_t length = 0;
    01836   for (i = sd; i->save.cmd != SL_END; i++) {
    01837     length += SlCalcObjMemberLength(object, &i->save);
    01838   }
    01839   SlSetLength(length);
    01840
    01841   for (i = sd; i->save.cmd != SL_END; i++) {
    01842     void *ptr = GetVariableAddress(object, &i->save);
    01843     SlObjectMember(ptr, &i->save);
    01844   }
    01845 }
    01846
    01850 static inline void SaveSettingsGlobList(const SettingDescGlobVarList *sdg)
    01851 {
    01852   SaveSettings((const SettingDesc*)sdg, NULL);
    01853 }
    01854
    01855 static void Load_OPTS()
    01856 {
    01857   /* Copy over default setting since some might not get loaded in
    01858    * a networking environment. This ensures for example that the local
    01859    * autosave-frequency stays when joining a network-server */
    01860   PrepareOldDiffCustom();
    01861   LoadSettings(_gameopt_settings, &_settings_game);
    01862   HandleOldDiffCustom(true);
    01863 }
    01864
    01865 static void Load_PATS()
    01866 {
    01867   /* Copy over default setting since some might not get loaded in
    01868    * a networking environment. This ensures for example that the local
    01869    * signal_side stays when joining a network-server */
    01870   LoadSettings(_settings, &_settings_game);
    01871 }
    01872
    01873 static void Save_PATS()
    01874 {
    01875   SaveSettings(_settings, &_settings_game);
    01876 }
    01877
    01878 void CheckConfig()
    01879 {
    01880   /*
    01881    * Increase old default values for pf_maxdepth and pf_maxlength
    01882    * to support big networks.
    01883    */
    01884   if (_settings_newgame.pf.opf.pf_maxdepth == 16 && _settings_newgame.pf.opf.pf_maxlength == 512) {
    01885     _settings_newgame.pf.opf.pf_maxdepth = 48;
    01886     _settings_newgame.pf.opf.pf_maxlength = 4096;
    01887   }
    01888 }
    01889
    01890 extern const ChunkHandler _setting_chunk_handlers[] = {
    01891   { 'OPTS', NULL,      Load_OPTS, NULL, CH_RIFF},
    01892   { 'PATS', Save_PATS, Load_PATS, NULL, CH_RIFF | CH_LAST},
    01893 };
    01894
    01895 static bool IsSignedVarMemType(VarType vt)
    01896 {
    01897   switch (GetVarMemType(vt)) {
    01898     case SLE_VAR_I8:
    01899     case SLE_VAR_I16:
    01900     case SLE_VAR_I32:
    01901     case SLE_VAR_I64:
    01902       return true;
    01903   }
    01904   return false;
    01905 }