12 #include "../stdafx.h" 13 #include "../settings_type.h" 20 #include "../safeguards.h" 22 ScriptInfo::~ScriptInfo()
27 free((*it).description);
28 if (it->labels != NULL) {
53 seprintf(error,
lastof(error),
"your info.nut/library.nut doesn't have the method '%s'", name);
72 static const char *
const required_functions[] = {
81 for (
size_t i = 0; i <
lengthof(required_functions); i++) {
82 if (!info->
CheckMethod(required_functions[i]))
return SQ_ERROR;
120 memset(&config, 0,
sizeof(config));
127 while (SQ_SUCCEEDED(sq_next(vm, -2))) {
129 if (SQ_FAILED(sq_getstring(vm, -2, &key)))
return SQ_ERROR;
132 if (strcmp(key,
"name") == 0) {
133 const SQChar *sqvalue;
134 if (SQ_FAILED(sq_getstring(vm, -1, &sqvalue)))
return SQ_ERROR;
141 while ((s = strchr(name,
'=')) != NULL) *s =
'_';
142 while ((s = strchr(name,
',')) != NULL) *s =
'_';
145 }
else if (strcmp(key,
"description") == 0) {
146 const SQChar *sqdescription;
147 if (SQ_FAILED(sq_getstring(vm, -1, &sqdescription)))
return SQ_ERROR;
151 }
else if (strcmp(key,
"min_value") == 0) {
153 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
156 }
else if (strcmp(key,
"max_value") == 0) {
158 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
161 }
else if (strcmp(key,
"easy_value") == 0) {
163 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
166 }
else if (strcmp(key,
"medium_value") == 0) {
168 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
171 }
else if (strcmp(key,
"hard_value") == 0) {
173 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
176 }
else if (strcmp(key,
"random_deviation") == 0) {
178 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
181 }
else if (strcmp(key,
"custom_value") == 0) {
183 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
186 }
else if (strcmp(key,
"step_size") == 0) {
188 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
190 }
else if (strcmp(key,
"flags") == 0) {
192 if (SQ_FAILED(sq_getinteger(vm, -1, &res)))
return SQ_ERROR;
197 seprintf(error,
lastof(error),
"unknown setting property '%s'", key);
210 seprintf(error,
lastof(error),
"Setting both random_deviation and SCRIPTCONFIG_RANDOM is not allowed");
221 seprintf(error,
lastof(error),
"please define all properties of a setting (min/max not allowed for booleans)");
232 const SQChar *setting_name;
233 if (SQ_FAILED(sq_getstring(vm, -2, &setting_name)))
return SQ_ERROR;
237 for (ScriptConfigItemList::iterator it = this->
config_list.begin(); it != this->
config_list.end(); it++) {
238 if (strcmp((*it).name, setting_name) == 0) config = &(*it);
241 if (config == NULL) {
243 seprintf(error,
lastof(error),
"Trying to add labels for non-defined setting '%s'", setting_name);
247 if (config->
labels != NULL)
return SQ_ERROR;
253 while (SQ_SUCCEEDED(sq_next(vm, -2))) {
254 const SQChar *key_string;
256 if (SQ_FAILED(sq_getstring(vm, -2, &key_string)))
return SQ_ERROR;
257 if (SQ_FAILED(sq_getstring(vm, -1, &label)))
return SQ_ERROR;
260 int key = atoi(key_string + 1);
272 for (
int value = config->
min_value; value <= config->max_value; value++) {
289 for (ScriptConfigItemList::const_iterator it = this->
config_list.begin(); it != this->
config_list.end(); it++) {
290 if (strcmp((*it).name, name) == 0)
return &(*it);
297 for (ScriptConfigItemList::const_iterator it = this->
config_list.begin(); it != this->
config_list.end(); it++) {
298 if (strcmp((*it).name, name) != 0)
continue;
301 case SP_EASY:
return (*it).easy_value;
302 case SP_MEDIUM: return (*it).medium_value;
303 case SP_HARD: return (*it).hard_value;
304 case SP_CUSTOM: return (*it).custom_value;
305 default: NOT_REACHED();
const char * GetMainScript()
Get the current main script the ScanDir is currently tracking.
const char * GetTarFile()
Get the current tar file the ScanDir is currently tracking.
bool Contains(const T &key) const
Tests whether a key is assigned in this map.
int version
Version of the script.
class ScriptScanner * scanner
ScriptScanner object that was used to scan this script info.
HSQOBJECT * SQ_instance
The Squirrel instance created for this info.
int random_deviation
The maximum random deviation from the default value.
void ThrowError(const char *error)
Throw a Squirrel error that will be nicely displayed to the user.
bool CallMethod(HSQOBJECT instance, const char *method_name, HSQOBJECT *ret, int suspend)
Call a method of an instance, in various flavors.
bool CheckMethod(const char *name) const
Check if a given method exists.
int CDECL seprintf(char *str, const char *last, const char *format,...)
Safer implementation of snprintf; same as snprintf except:
const ScriptConfigItemList * GetConfigList() const
Get the config list for this Script.
int min_value
The minimal value this configuration setting can have.
const char * date
The date the script was written at.
std::list< ScriptConfigItem > ScriptConfigItemList
List of ScriptConfig items.
static bool GetInstance(HSQUIRRELVM vm, HSQOBJECT *ptr, int pos=1)
Get the Squirrel-instance pointer.
const char * url
URL of the script.
ScriptConfigItemList config_list
List of settings from this Script.
No profile, special "custom" highscore.
LabelMapping * labels
Text labels for the integer values.
bool Insert(const T &key, const U &data)
Adds new item to this map.
const char * instance_name
Name of the main class in the script.
int max_value
The maximal value this configuration setting can have.
int GetSettingDefaultValue(const char *name) const
Get the default value for a setting.
#define lastof(x)
Get the last element of an fixed size array.
static void * GetGlobalPointer(HSQUIRRELVM vm)
Get the pointer as set by SetGlobalPointer.
declarations and parts of the implementation of the class for convert code
int medium_value
The default value on medium difficulty setting.
Scanner to help finding scripts.
ScriptConfigFlags
Bitmask of flags for Script settings.
const char * short_name
Short name (4 chars) which uniquely identifies the script.
SQInteger AddLabels(HSQUIRRELVM vm)
Add labels for a setting.
bool complete_labels
True if all values have a label.
class Squirrel * GetEngine()
Get the engine of the main squirrel handler (it indexes all available scripts).
All static information from an Script like name, version, etc.
const char * author
Author of the script.
int easy_value
The default value on easy difficulty setting.
char * stredup(const char *s, const char *last)
Create a duplicate of the given string.
bool GetSettings()
Get the settings of the Script.
When randomizing the Script, pick any value between min_value and max_value when on custom difficulty...
#define lengthof(x)
Return the length of an fixed size array.
int custom_value
The default value on custom difficulty setting.
const ScriptConfigItem * GetConfigItem(const char *name) const
Get the description of a certain Script config option.
SmallMap< int, char * > LabelMapping
Map-type used to map the setting numbers to labels.
This value is a boolean (either 0 (false) or 1 (true) ).
const char * description
The description of the configuration setting.
ScriptSettings script
settings for scripts
const char * name
Full name of the script.
ScriptConfigFlags flags
Flags for the configuration setting.
SQInteger AddSetting(HSQUIRRELVM vm)
Set a setting.
Info about a single Script setting.
static GameSettings & GetGameSettings()
Get the settings-object applicable for the current situation: the newgame settings when we're in the ...
static const int MAX_GET_OPS
Number of operations to get the author and similar information.
bool MethodExists(HSQOBJECT instance, const char *method_name)
Check if a method exists in an instance.
void CDECL error(const char *s,...)
Error handling for fatal non-user errors.
char * main_script
The full path of the script.
static const int MAX_CREATEINSTANCE_OPS
Number of operations to create an instance of a script.
Declarations of the class for the script scanner.
class Squirrel * engine
Engine used to register for Squirrel.
static SQInteger Constructor(HSQUIRRELVM vm, ScriptInfo *info)
Process the creation of a FileInfo object.
static void free(const void *ptr)
Version of the standard free that accepts const pointers.
uint8 settings_profile
difficulty profile to set initial settings of scripts, esp. random AIs
const char * description
Small description of the script.
int hard_value
The default value on hard difficulty setting.
char * tar_file
If, which tar file the script was in.
static const int MAX_GET_SETTING_OPS
Maximum number of operations allowed for getting a particular setting.
void ValidateString(const char *str)
Scans the string for valid characters and if it finds invalid ones, replaces them with a question mar...
int step_size
The step size in the gui.
const char * name
The name of the configuration setting.
ScriptInfo keeps track of all information of a script, like Author, Description, ...