diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/ai/ai_instance.cpp | 6 | ||||
-rw-r--r-- | src/ai/ai_instance.hpp | 1 | ||||
-rw-r--r-- | src/ai/ai_scanner.cpp | 4 | ||||
-rw-r--r-- | src/script/script_info_dummy.cpp (renamed from src/ai/ai_info_dummy.cpp) | 55 | ||||
-rw-r--r-- | src/script/script_instance.cpp | 4 | ||||
-rw-r--r-- | src/script/script_instance.hpp | 5 | ||||
-rw-r--r-- | src/script/squirrel.hpp | 15 |
7 files changed, 48 insertions, 42 deletions
diff --git a/src/ai/ai_instance.cpp b/src/ai/ai_instance.cpp index 11459f649..2df8c2e44 100644 --- a/src/ai/ai_instance.cpp +++ b/src/ai/ai_instance.cpp @@ -229,6 +229,12 @@ void AIInstance::Died() } } +void AIInstance::LoadDummyScript() +{ + extern void Script_CreateDummy(HSQUIRRELVM vm, StringID string, const char *type); + Script_CreateDummy(this->engine->GetVM(), STR_ERROR_AI_NO_AI_FOUND, "AI"); +} + /** * DoCommand callback function for all commands executed by AIs. * @param result The result of the command. diff --git a/src/ai/ai_instance.hpp b/src/ai/ai_instance.hpp index f0b66997e..886b716ae 100644 --- a/src/ai/ai_instance.hpp +++ b/src/ai/ai_instance.hpp @@ -32,6 +32,7 @@ private: /* virtual */ void RegisterAPI(); /* virtual */ void Died(); /* virtual */ CommandCallback *GetDoCommandCallback(); + /* virtual */ void LoadDummyScript(); /** * Load squirrel scripts to emulate an older API. diff --git a/src/ai/ai_scanner.cpp b/src/ai/ai_scanner.cpp index 3a296f00e..25d38ccdb 100644 --- a/src/ai/ai_scanner.cpp +++ b/src/ai/ai_scanner.cpp @@ -34,8 +34,8 @@ void AIScannerInfo::Initialize(const char *name) /* Create the dummy AI */ free(this->main_script); this->main_script = strdup("%_dummy"); - extern void AI_CreateAIInfoDummy(HSQUIRRELVM vm); - AI_CreateAIInfoDummy(this->engine->GetVM()); + extern void Script_CreateDummyInfo(HSQUIRRELVM vm, const char *type, const char *dir); + Script_CreateDummyInfo(this->engine->GetVM(), "AI", "ai"); } void AIScannerInfo::SetDummyAI(class AIInfo *info) diff --git a/src/ai/ai_info_dummy.cpp b/src/script/script_info_dummy.cpp index f706110f7..4620ce8f7 100644 --- a/src/ai/ai_info_dummy.cpp +++ b/src/script/script_info_dummy.cpp @@ -7,7 +7,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/>. */ -/** @file ai_info_dummy.cpp Implementation of a dummy AI. */ +/** @file script_info_dummy.cpp Implementation of a dummy Script. */ #include <squirrel.h> #include "../stdafx.h" @@ -16,37 +16,36 @@ #include "../strings_func.h" #include "table/strings.h" -/* The reason this exists in C++, is that a user can trash his ai/ dir, - * leaving no AIs available. The complexity to solve this is insane, and - * therefor the alternative is used, and make sure there is always an AI +/* The reason this exists in C++, is that a user can trash his ai/ or game/ dir, + * leaving no Scripts available. The complexity to solve this is insane, and + * therefor the alternative is used, and make sure there is always a Script * available, no matter what the situation is. By defining it in C++, there - * is simply now way a user can delete it, and therefor safe to use. It has - * to be noted that this AI is complete invisible for the user, and impossible - * to select manual. It is a fail-over in case no AIs are available. + * is simply no way a user can delete it, and therefor safe to use. It has + * to be noted that this Script is complete invisible for the user, and impossible + * to select manual. It is a fail-over in case no Scripts are available. */ -/** info.nut for the dummy AI. */ -const SQChar _dummy_script_info[] = _SC(" \n\ -class DummyAI extends AIInfo { \n\ - function GetAuthor() { return \"OpenTTD NoAI Developers Team\"; } \n\ - function GetName() { return \"DummyAI\"; } \n\ - function GetShortName() { return \"DUMM\"; } \n\ - function GetDescription() { return \"A Dummy AI that is loaded when your ai/ dir is empty\"; }\n\ - function GetVersion() { return 1; } \n\ - function GetDate() { return \"2008-07-26\"; } \n\ - function CreateInstance() { return \"DummyAI\"; } \n\ -} \n\ - \n\ -RegisterDummyAI(DummyAI()); \n\ -"); - /** Run the dummy info.nut. */ -void AI_CreateAIInfoDummy(HSQUIRRELVM vm) +void Script_CreateDummyInfo(HSQUIRRELVM vm, const char *type, const char *dir) { + char dummy_script[4096]; + char *dp = dummy_script; + dp += seprintf(dp, lastof(dummy_script), "class Dummy%s extends %sInfo {\n", type, type); + dp += seprintf(dp, lastof(dummy_script), "function GetAuthor() { return \"OpenTTD Developers Team\"; }\n"); + dp += seprintf(dp, lastof(dummy_script), "function GetName() { return \"Dummy%s\"; }\n", type); + dp += seprintf(dp, lastof(dummy_script), "function GetShortName() { return \"DUMM\"; }\n"); + dp += seprintf(dp, lastof(dummy_script), "function GetDescription() { return \"A Dummy %s that is loaded when your %s/ dir is empty\"; }\n", type, dir); + dp += seprintf(dp, lastof(dummy_script), "function GetVersion() { return 1; }\n"); + dp += seprintf(dp, lastof(dummy_script), "function GetDate() { return \"2008-07-26\"; }\n"); + dp += seprintf(dp, lastof(dummy_script), "function CreateInstance() { return \"Dummy%s\"; }\n", type); + dp += seprintf(dp, lastof(dummy_script), "} RegisterDummy%s(Dummy%s());\n", type, type); + + const SQChar *sq_dummy_script = OTTD2SQ(dummy_script); + sq_pushroottable(vm); /* Load and run the script */ - if (SQ_SUCCEEDED(sq_compilebuffer(vm, _dummy_script_info, scstrlen(_dummy_script_info), _SC("dummy"), SQTrue))) { + if (SQ_SUCCEEDED(sq_compilebuffer(vm, sq_dummy_script, scstrlen(sq_dummy_script), _SC("dummy"), SQTrue))) { sq_push(vm, -2); if (SQ_SUCCEEDED(sq_call(vm, 1, SQFalse, SQTrue))) { sq_pop(vm, 1); @@ -57,14 +56,14 @@ void AI_CreateAIInfoDummy(HSQUIRRELVM vm) } /** Run the dummy AI and let it generate an error message. */ -void AI_CreateAIDummy(HSQUIRRELVM vm) +void Script_CreateDummy(HSQUIRRELVM vm, StringID string, const char *type) { /* We want to translate the error message. * We do this in three steps: * 1) We get the error message */ char error_message[1024]; - GetString(error_message, STR_ERROR_AI_NO_AI_FOUND, lastof(error_message)); + GetString(error_message, string, lastof(error_message)); /* Make escapes for all quotes and slashes. */ char safe_error_message[1024]; @@ -78,7 +77,7 @@ void AI_CreateAIDummy(HSQUIRRELVM vm) /* 2) We construct the AI's code. This is done by merging a header, body and footer */ char dummy_script[4096]; char *dp = dummy_script; - dp = strecpy(dp, "class DummyAI extends AIController {\n function Start()\n {\n", lastof(dummy_script)); + dp += seprintf(dp, lastof(dummy_script), "class Dummy%s extends %sController {\n function Start()\n {\n", type, type); /* As special trick we need to split the error message on newlines and * emit each newline as a separate error printing string. */ @@ -88,7 +87,7 @@ void AI_CreateAIDummy(HSQUIRRELVM vm) newline = strchr(p, '\n'); if (newline != NULL) *newline = '\0'; - dp += seprintf(dp, lastof(dummy_script), " AILog.Error(\"%s\");\n", p); + dp += seprintf(dp, lastof(dummy_script), " %sLog.Error(\"%s\");\n", type, p); p = newline + 1; } while (newline != NULL); diff --git a/src/script/script_instance.cpp b/src/script/script_instance.cpp index beebe2fd7..97fdfd68f 100644 --- a/src/script/script_instance.cpp +++ b/src/script/script_instance.cpp @@ -78,8 +78,7 @@ void ScriptInstance::Initialize(const char *main_script, const char *instance_na ScriptObject::SetAllowDoCommand(false); /* Load and execute the script for this script */ if (strcmp(main_script, "%_dummy") == 0) { - extern void AI_CreateAIDummy(HSQUIRRELVM vm); - AI_CreateAIDummy(this->engine->GetVM()); + this->LoadDummyScript(); } else if (!this->engine->LoadScript(main_script) || this->engine->IsSuspended()) { if (this->engine->IsSuspended()) ScriptLog::Error("This script took too long to load script. AI is not started."); this->Died(); @@ -103,6 +102,7 @@ void ScriptInstance::Initialize(const char *main_script, const char *instance_na void ScriptInstance::RegisterAPI() { + extern void squirrel_register_std(Squirrel *engine); squirrel_register_std(this->engine); } diff --git a/src/script/script_instance.hpp b/src/script/script_instance.hpp index c5ff730c7..b84a36496 100644 --- a/src/script/script_instance.hpp +++ b/src/script/script_instance.hpp @@ -162,6 +162,11 @@ protected: */ virtual CommandCallback *GetDoCommandCallback() = 0; + /** + * Load the dummy script. + */ + virtual void LoadDummyScript() = 0; + private: class ScriptController *controller; ///< The script main class. class ScriptStorage *storage; ///< Some global information for each running script. diff --git a/src/script/squirrel.hpp b/src/script/squirrel.hpp index 6b9c3ab70..dbccd3c08 100644 --- a/src/script/squirrel.hpp +++ b/src/script/squirrel.hpp @@ -36,11 +36,6 @@ private: static SQInteger _RunError(HSQUIRRELVM vm); /** - * Get the squirrel VM. Try to avoid using this. - */ - HSQUIRRELVM GetVM() { return this->vm; } - - /** * Get the API name. */ const char *GetAPIName() { return this->APIName; } @@ -67,15 +62,15 @@ protected: static void ErrorPrintFunc(HSQUIRRELVM vm, const SQChar *s, ...); public: - friend class AIScannerInfo; - friend class ScriptInstance; - friend class ScriptController; - friend void squirrel_register_std(Squirrel *engine); - Squirrel(const char *APIName); ~Squirrel(); /** + * Get the squirrel VM. Try to avoid using this. + */ + HSQUIRRELVM GetVM() { return this->vm; } + + /** * Load a script. * @param script The full script-name to load. * @return False if loading failed. |