src/script/api/script_newgrf.cpp

   1 /*
   2  * This file is part of OpenTTD.
   3  * 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.
   4  * 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.
   5  * 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/>.
   6  */
   7
   8 /** @file script_newgrf.cpp Implementation of ScriptNewGRF and friends. */
   9
  10 #include "../../stdafx.h"
  11 #include "script_newgrf.hpp"
  12 #include "../../core/bitmath_func.hpp"
  13 #include "../../newgrf_config.h"
  14 #include "../../string_func.h"
  15
  16 #include "../../safeguards.h"
  17
  18 ScriptNewGRFList::ScriptNewGRFList()
  19 {
  20         for (auto c = _grfconfig; c != nullptr; c = c->next) {
  21                 if (!HasBit(c->flags, GCF_STATIC)) {
  22                         this->AddItem(BSWAP32(c->ident.grfid));
  23                 }
  24         }
  25 }
  26
  27 /* static */ bool ScriptNewGRF::IsLoaded(SQInteger grfid)
  28 {
  29         grfid = BSWAP32(GB(grfid, 0, 32)); // Match people's expectations.
  30
  31         for (auto c = _grfconfig; c != nullptr; c = c->next) {
  32                 if (!HasBit(c->flags, GCF_STATIC) && c->ident.grfid == grfid) {
  33                         return true;
  34                 }
  35         }
  36
  37         return false;
  38 }
  39
  40 /* static */ SQInteger ScriptNewGRF::GetVersion(SQInteger grfid)
  41 {
  42         grfid = BSWAP32(GB(grfid, 0, 32)); // Match people's expectations.
  43
  44         for (auto c = _grfconfig; c != nullptr; c = c->next) {
  45                 if (!HasBit(c->flags, GCF_STATIC) && c->ident.grfid == grfid) {
  46                         return c->version;
  47                 }
  48         }
  49
  50         return 0;
  51 }
  52
  53 /* static */ std::optional<std::string> ScriptNewGRF::GetName(SQInteger grfid)
  54 {
  55         grfid = BSWAP32(GB(grfid, 0, 32)); // Match people's expectations.
  56
  57         for (auto c = _grfconfig; c != nullptr; c = c->next) {
  58                 if (!HasBit(c->flags, GCF_STATIC) && c->ident.grfid == grfid) {
  59                         return c->GetName();
  60                 }
  61         }
  62
  63         return std::nullopt;
  64 }