src/game/game_scanner.cpp

   1 /* $Id$ */
   2
   3 /*
   4  * This file is part of OpenTTD.
   5  * 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.
   6  * 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.
   7  * 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/>.
   8  */
   9
  10 /** @file game_scanner.cpp allows scanning Game scripts */
  11
  12 #include "../stdafx.h"
  13
  14 #include "../script/squirrel_class.hpp"
  15 #include "game_info.hpp"
  16 #include "game_scanner.hpp"
  17
  18
  19 void GameScannerInfo::Initialize()
  20 {
  21         ScriptScanner::Initialize("GSScanner");
  22 }
  23
  24 void GameScannerInfo::GetScriptName(ScriptInfo *info, char *name, int len)
  25 {
  26         snprintf(name, len, "%s", info->GetName());
  27 }
  28
  29 void GameScannerInfo::RegisterAPI(class Squirrel *engine)
  30 {
  31         GameInfo::RegisterAPI(engine);
  32 }
  33
  34 GameInfo *GameScannerInfo::FindInfo(const char *nameParam, int versionParam, bool force_exact_match)
  35 {
  36         if (this->info_list.size() == 0) return NULL;
  37         if (nameParam == NULL) return NULL;
  38
  39         char game_name[1024];
  40         ttd_strlcpy(game_name, nameParam, sizeof(game_name));
  41         strtolower(game_name);
  42
  43         GameInfo *info = NULL;
  44         int version = -1;
  45
  46         if (versionParam == -1) {
  47                 /* We want to load the latest version of this Game script; so find it */
  48                 if (this->info_single_list.find(game_name) != this->info_single_list.end()) return static_cast<GameInfo *>(this->info_single_list[game_name]);
  49
  50                 /* If we didn't find a match Game script, maybe the user included a version */
  51                 char *e = strrchr(game_name, '.');
  52                 if (e == NULL) return NULL;
  53                 *e = '\0';
  54                 e++;
  55                 versionParam = atoi(e);
  56                 /* FALL THROUGH, like we were calling this function with a version. */
  57         }
  58
  59         if (force_exact_match) {
  60                 /* Try to find a direct 'name.version' match */
  61                 char game_name_tmp[1024];
  62                 snprintf(game_name_tmp, sizeof(game_name_tmp), "%s.%d", game_name, versionParam);
  63                 strtolower(game_name_tmp);
  64                 if (this->info_list.find(game_name_tmp) != this->info_list.end()) return static_cast<GameInfo *>(this->info_list[game_name_tmp]);
  65         }
  66
  67         /* See if there is a compatible Game script which goes by that name, with the highest
  68          *  version which allows loading the requested version */
  69         ScriptInfoList::iterator it = this->info_list.begin();
  70         for (; it != this->info_list.end(); it++) {
  71                 GameInfo *i = static_cast<GameInfo *>((*it).second);
  72                 if (strcasecmp(game_name, i->GetName()) == 0 && i->CanLoadFromVersion(versionParam) && (version == -1 || i->GetVersion() > version)) {
  73                         version = (*it).second->GetVersion();
  74                         info = i;
  75                 }
  76         }
  77
  78         return info;
  79 }
  80
  81
  82 void GameScannerLibrary::Initialize()
  83 {
  84         ScriptScanner::Initialize("GSScanner");
  85 }
  86
  87 void GameScannerLibrary::GetScriptName(ScriptInfo *info, char *name, int len)
  88 {
  89         GameLibrary *library = static_cast<GameLibrary *>(info);
  90         snprintf(name, len, "%s.%s", library->GetCategory(), library->GetInstanceName());
  91 }
  92
  93 void GameScannerLibrary::RegisterAPI(class Squirrel *engine)
  94 {
  95         GameLibrary::RegisterAPI(engine);
  96 }
  97
  98 GameLibrary *GameScannerLibrary::FindLibrary(const char *library, int version)
  99 {
 100         /* Internally we store libraries as 'library.version' */
 101         char library_name[1024];
 102         snprintf(library_name, sizeof(library_name), "%s.%d", library, version);
 103         strtolower(library_name);
 104
 105         /* Check if the library + version exists */
 106         ScriptInfoList::iterator iter = this->info_list.find(library_name);
 107         if (iter == this->info_list.end()) return NULL;
 108
 109         return static_cast<GameLibrary *>((*iter).second);
 110 }