Files
@ r20670:c15fc236f61a
Branch filter:
Location: cpp/openttd-patchpack/source/src/script/api/script_admin.cpp - annotation
r20670:c15fc236f61a
3.6 KiB
text/x-c
(svn r25708) -Fix: don't return NULL as bool
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 | r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 r18765:0c8917c89d77 | /* $Id$ */
/*
* This file is part of OpenTTD.
* 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.
* 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.
* 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 script_admin.cpp Implementation of ScriptAdmin. */
#include "../../stdafx.h"
#include "script_admin.hpp"
#include "script_log.hpp"
#include "../../network/network_admin.h"
#include "../script_instance.hpp"
/* static */ bool ScriptAdmin::MakeJSON(HSQUIRRELVM vm, SQInteger index, int max_depth, std::string &data)
{
if (max_depth == 0) {
ScriptLog::Error("Send parameters can only be nested to 25 deep. No data sent."); // SQUIRREL_MAX_DEPTH = 25
return false;
}
switch (sq_gettype(vm, index)) {
case OT_INTEGER: {
SQInteger res;
sq_getinteger(vm, index, &res);
char buf[10];
snprintf(buf, sizeof(buf), "%d", (int32)res);
data = buf;
return true;
}
case OT_STRING: {
const SQChar *res;
sq_getstring(vm, index, &res);
/* @bug if a string longer than 512 characters is given to SQ2OTTD, the
* internal buffer overflows. */
const char *buf = SQ2OTTD(res);
size_t len = strlen(buf) + 1;
if (len >= 255) {
ScriptLog::Error("Maximum string length is 254 chars. No data sent.");
return false;
}
data = std::string("\"") + buf + "\"";
return true;
}
case OT_ARRAY: {
data = "[ ";
bool first = true;
sq_pushnull(vm);
while (SQ_SUCCEEDED(sq_next(vm, index - 1))) {
if (!first) data += ", ";
if (first) first = false;
std::string tmp;
bool res = MakeJSON(vm, -1, max_depth - 1, tmp);
sq_pop(vm, 2);
if (!res) {
sq_pop(vm, 1);
return false;
}
data += tmp;
}
sq_pop(vm, 1);
data += " ]";
return true;
}
case OT_TABLE: {
data = "{ ";
bool first = true;
sq_pushnull(vm);
while (SQ_SUCCEEDED(sq_next(vm, index - 1))) {
if (!first) data += ", ";
if (first) first = false;
std::string key;
std::string value;
/* Store the key + value */
bool res = MakeJSON(vm, -2, max_depth - 1, key) && MakeJSON(vm, -1, max_depth - 1, value);
sq_pop(vm, 2);
if (!res) {
sq_pop(vm, 1);
return false;
}
data += key + ": " + value;
}
sq_pop(vm, 1);
data += " }";
return true;
}
case OT_BOOL: {
SQBool res;
sq_getbool(vm, index, &res);
if (res) {
data = "true";
return true;
}
data = "false";
return true;
}
case OT_NULL: {
data = "null";
return true;
}
default:
ScriptLog::Error("You tried to send an unsupported type. No data sent.");
return false;
}
}
/* static */ SQInteger ScriptAdmin::Send(HSQUIRRELVM vm)
{
if (sq_gettop(vm) - 1 != 1) return sq_throwerror(vm, _SC("wrong number of parameters"));
if (sq_gettype(vm, 2) != OT_TABLE) {
return sq_throwerror(vm, _SC("ScriptAdmin::Send requires a table as first parameter. No data sent."));
}
std::string json;
ScriptAdmin::MakeJSON(vm, -1, SQUIRREL_MAX_DEPTH, json);
#ifdef ENABLE_NETWORK
if (json.length() > NETWORK_GAMESCRIPT_JSON_LENGTH) {
ScriptLog::Error("You are trying to send a table that is too large to the AdminPort. No data sent.");
sq_pushinteger(vm, 0);
return 1;
}
NetworkAdminGameScript(json.c_str());
#endif /* ENABLE_NETWORK */
sq_pushinteger(vm, 1);
return 1;
}
|