ai_info_dummy.cpp
Go to the documentation of this file.00001
00002
00003
00004
00005
00006
00007
00008
00009
00012 #include <squirrel.h>
00013 #include "../stdafx.h"
00014
00015 #include "../string_func.h"
00016 #include "../strings_func.h"
00017 #include "table/strings.h"
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028 const SQChar _dummy_script_info[] = _SC(" \n\
00029 class DummyAI extends AIInfo { \n\
00030 function GetAuthor() { return \"OpenTTD NoAI Developers Team\"; } \n\
00031 function GetName() { return \"DummyAI\"; } \n\
00032 function GetShortName() { return \"DUMM\"; } \n\
00033 function GetDescription() { return \"A Dummy AI that is loaded when your ai/ dir is empty\"; }\n\
00034 function GetVersion() { return 1; } \n\
00035 function GetDate() { return \"2008-07-26\"; } \n\
00036 function CreateInstance() { return \"DummyAI\"; } \n\
00037 } \n\
00038 \n\
00039 RegisterDummyAI(DummyAI()); \n\
00040 ");
00041
00042 void AI_CreateAIInfoDummy(HSQUIRRELVM vm)
00043 {
00044 sq_pushroottable(vm);
00045
00046
00047 if (SQ_SUCCEEDED(sq_compilebuffer(vm, _dummy_script_info, scstrlen(_dummy_script_info), _SC("dummy"), SQTrue))) {
00048 sq_push(vm, -2);
00049 if (SQ_SUCCEEDED(sq_call(vm, 1, SQFalse, SQTrue))) {
00050 sq_pop(vm, 1);
00051 return;
00052 }
00053 }
00054 NOT_REACHED();
00055 }
00056
00057 void AI_CreateAIDummy(HSQUIRRELVM vm)
00058 {
00059
00060
00061
00062
00063 char error_message[1024];
00064 GetString(error_message, STR_ERROR_AI_NO_AI_FOUND, lastof(error_message));
00065
00066
00067 char safe_error_message[1024];
00068 char *q = safe_error_message;
00069 for (const char *p = error_message; *p != '\0' && q < lastof(safe_error_message) - 2; p++, q++) {
00070 if (*p == '"' || *p == '\\') *q++ = '\\';
00071 *q = *p;
00072 }
00073 *q = '\0';
00074
00075
00076 char dummy_script[4096];
00077 char *dp = dummy_script;
00078 dp = strecpy(dp, "class DummyAI extends AIController {\n function Start()\n {\n", lastof(dummy_script));
00079
00080
00081
00082 char *newline;
00083 char *p = safe_error_message;
00084 do {
00085 newline = strchr(p, '\n');
00086 if (newline != NULL) *newline = '\0';
00087
00088 dp += seprintf(dp, lastof(dummy_script), " AILog.Error(\"%s\");\n", p);
00089 p = newline + 1;
00090 } while (newline != NULL);
00091
00092 dp = strecpy(dp, " }\n}\n", lastof(dummy_script));
00093
00094
00095
00096
00097 const SQChar *sq_dummy_script = OTTD2FS(dummy_script);
00098
00099
00100 sq_pushroottable(vm);
00101 if (SQ_SUCCEEDED(sq_compilebuffer(vm, sq_dummy_script, scstrlen(sq_dummy_script), _SC("dummy"), SQTrue))) {
00102 sq_push(vm, -2);
00103 if (SQ_SUCCEEDED(sq_call(vm, 1, SQFalse, SQTrue))) {
00104 sq_pop(vm, 1);
00105 return;
00106 }
00107 }
00108 NOT_REACHED();
00109 }