OpenClonk
C4Script.cpp File Reference
#include "C4Include.h"
#include "C4Version.h"
#include "lib/C4Random.h"
#include "script/C4AulExec.h"
#include "script/C4AulDefFunc.h"
#include "script/C4ScriptLibraries.h"
Include dependency graph for C4Script.cpp:

Go to the source code of this file.

Macros

#define MAKE_AND_RETURN_ARRAY(values)
 
#define F(f)   ::AddFunc(p, #f, Fn##f)
 

Functions

StdStrBuf FnStringFormat (C4PropList *_this, C4String *szFormatPar, C4Value *Pars, int ParCount)
 
void InitCoreFunctionMap (C4AulScriptEngine *pEngine)
 

Variables

C4ScriptConstDef C4ScriptConstMap []
 
C4ScriptFnDef C4ScriptFnMap []
 

Macro Definition Documentation

◆ F

#define F (   f)    ::AddFunc(p, #f, Fn##f)

◆ MAKE_AND_RETURN_ARRAY

#define MAKE_AND_RETURN_ARRAY (   values)
Value:
do { \
C4ValueArray *matrix = new C4ValueArray(sizeof(values) / sizeof(*values)); \
for (size_t i = 0; i < sizeof(values) / sizeof(*values); ++i) \
(*matrix)[i] = C4VInt(values[i]); \
return matrix; \
} while (0)
C4Value C4VInt(int32_t i)
Definition: C4Value.h:239

Definition at line 127 of file C4Script.cpp.

Function Documentation

◆ FnStringFormat()

StdStrBuf FnStringFormat ( C4PropList _this,
C4String szFormatPar,
C4Value Pars,
int  ParCount 
)

Definition at line 30 of file C4Script.cpp.

31 {
32  int cPar=0;
33 
34  StdStrBuf StringBuf("", false);
35  const char * cpFormat = FnStringPar(szFormatPar);
36  const char * cpType;
37  char szField[20];
38  while (*cpFormat)
39  {
40  // Copy normal stuff
41  while (*cpFormat && (*cpFormat!='%'))
42  StringBuf.AppendChar(*cpFormat++);
43  // Field
44  if (*cpFormat=='%')
45  {
46  // Scan field type
47  for (cpType=cpFormat+1; *cpType && (*cpType == '+' || *cpType == '-' || *cpType == '.' || *cpType == '#' || *cpType == ' ' || Inside(*cpType,'0','9')); cpType++) {}
48  // Copy field
49  SCopy(cpFormat,szField,std::min<unsigned int>(sizeof szField - 1, cpType - cpFormat + 1));
50  // Insert field by type
51  switch (*cpType)
52  {
53  // number
54  case 'd': case 'x': case 'X':
55  {
56  if (cPar >= ParCount) throw C4AulExecError("format placeholder without parameter");
57  StringBuf.AppendFormat(szField, Pars[cPar++].getInt());
58  cpFormat+=SLen(szField);
59  break;
60  }
61  // character
62  case 'c':
63  {
64  if (cPar >= ParCount) throw C4AulExecError("format placeholder without parameter");
65  StringBuf.AppendCharacter(Pars[cPar++].getInt());
66  cpFormat+=SLen(szField);
67  break;
68  }
69  // C4ID
70  case 'i':
71  // C4Value
72  case 'v':
73  {
74  if (cPar >= ParCount) throw C4AulExecError("format placeholder without parameter");
75  StringBuf.Append(static_cast<const StdStrBuf&>(Pars[cPar++].GetDataString(10)));
76  cpFormat+=SLen(szField);
77  break;
78  }
79  // String
80  case 's':
81  {
82  // get string
83  if (cPar >= ParCount) throw C4AulExecError("format placeholder without parameter");
84  const char *szStr = "(null)";
85  if (Pars[cPar].GetData())
86  {
87  C4String * pStr = Pars[cPar].getStr();
88  if (!pStr) throw C4AulExecError("string format placeholder without string");
89  szStr = pStr->GetCStr();
90  }
91  ++cPar;
92  StringBuf.AppendFormat(szField, szStr);
93  cpFormat+=SLen(szField);
94  break;
95  }
96  case '%':
97  StringBuf.AppendChar('%');
98  cpFormat+=SLen(szField);
99  break;
100  // Undefined / Empty
101  default:
102  StringBuf.AppendChar('%');
103  cpFormat++;
104  break;
105  }
106  }
107  }
108  return StringBuf;
109 }
void SCopy(const char *szSource, char *sTarget, size_t iMaxL)
Definition: Standard.cpp:152
bool Inside(T ival, U lbound, V rbound)
Definition: Standard.h:43
size_t SLen(const char *sptr)
Definition: Standard.h:74
const char * GetCStr() const
Definition: C4StringTable.h:49
C4String * getStr() const
Definition: C4Value.h:117

◆ InitCoreFunctionMap()

void InitCoreFunctionMap ( C4AulScriptEngine pEngine)

Definition at line 1128 of file C4Script.cpp.

1129 {
1131  // add all def constants (all Int)
1132  for (C4ScriptConstDef *pCDef = &C4ScriptConstMap[0]; pCDef->Identifier; pCDef++)
1133  {
1134  assert(pCDef->ValType == C4V_Int); // only int supported currently
1135  pEngine->RegisterGlobalConstant(pCDef->Identifier, C4VInt(pCDef->Data));
1136  }
1137 
1138  C4PropListStatic * p = pEngine->GetPropList();
1139  // add all def script funcs
1140  for (C4ScriptFnDef *pDef = &C4ScriptFnMap[0]; pDef->Identifier; pDef++)
1141  new C4AulDefFunc(p, pDef);
1142 #define F(f) ::AddFunc(p, #f, Fn##f)
1143  F(ParseInt);
1144  F(Abs);
1145  F(Min);
1146  F(Max);
1147  F(Sin);
1148  F(Cos);
1149  F(Sqrt);
1150  F(ArcSin);
1151  F(ArcCos);
1152  F(BoundBy);
1153  F(Inside);
1154  F(Random);
1155 
1156  F(CreateArray);
1157  F(CreatePropList);
1158  F(GetProperties);
1159  F(GetProperty);
1160  F(SetProperty);
1161  F(GetPrototype);
1162  F(SetPrototype);
1163  F(ResetProperty);
1164  F(GetName);
1165  F(AddEffect);
1166  F(CreateEffect);
1167  F(CheckEffect);
1168  F(RemoveEffect);
1169  F(GetEffect);
1170  F(GetEffectCount);
1171  F(RegexReplace);
1172  F(RegexSearch);
1173  F(RegexMatch);
1174  F(RegexSplit);
1175  F(Distance);
1176  F(Angle);
1177  F(GetChar);
1178  F(GetType);
1179  F(ModulateColor);
1180  F(WildcardMatch);
1181  F(GetLength);
1182  F(SetLength);
1183  F(GetIndexOf);
1184  F(DeepEqual);
1185  F(StartCallTrace);
1186  F(StartScriptProfiler);
1187  F(StopScriptProfiler);
1188  F(SortArray);
1189  F(SortArrayByProperty);
1190  F(SortArrayByArrayElement);
1191  F(Trans_Identity);
1192  F(Trans_Translate);
1193  F(Trans_Scale);
1194  F(Trans_Rotate);
1195  F(LocateFunc);
1196  F(FileWrite);
1197  F(eval);
1198  F(StringToIdentifier);
1199  F(GetConstantNameByValue);
1200  F(ReplaceString);
1201 
1202  ::AddFunc(p, "Translate", C4AulExec::FnTranslate);
1203  ::AddFunc(p, "LogCallStack", C4AulExec::FnLogCallStack);
1204 #undef F
1205 }
void AddFunc(C4PropListStatic *Parent, const char *Name, RType(*pFunc)(ThisType *, ParTypes...), bool Public=true)
Definition: C4AulDefFunc.h:261
const char * Identifier
Definition: C4AulDefFunc.h:269
uint32_t Random()
Definition: C4Random.cpp:43
C4Real Cos(const C4Real &fAngle)
Definition: C4Real.h:266
C4Real Sin(const C4Real &fAngle)
Definition: C4Real.h:265
C4ScriptConstDef C4ScriptConstMap[]
Definition: C4Script.cpp:1066
#define F(f)
C4ScriptFnDef C4ScriptFnMap[]
Definition: C4Script.cpp:1115
@ C4V_Int
Definition: C4Value.h:26
int32_t Angle(int32_t iX1, int32_t iY1, int32_t iX2, int32_t iY2, int32_t iPrec)
Definition: Standard.cpp:37
int32_t Distance(int32_t iX1, int32_t iY1, int32_t iX2, int32_t iY2)
Definition: Standard.cpp:25
T Abs(T val)
Definition: Standard.h:42
bool WildcardMatch(const char *szWildcard, const char *szString)
Definition: StdFile.cpp:396
static bool FnLogCallStack(C4PropList *_this)
Definition: C4AulExec.cpp:130
static C4String * FnTranslate(C4PropList *_this, C4String *text)
Definition: C4AulExec.cpp:100
C4PropListStatic * GetPropList()
Definition: C4Aul.h:151
void RegisterGlobalConstant(const char *szName, const C4Value &rValue)
Definition: C4Aul.cpp:123
static void InstantiateAllLibraries(C4AulScriptEngine *engine)
const char * Identifier
Definition: C4AulDefFunc.h:277

References Abs(), AddFunc(), Angle(), C4ScriptConstMap, C4ScriptFnMap, C4V_Int, C4VInt(), Cos(), Distance(), F, C4AulExec::FnLogCallStack(), C4AulExec::FnTranslate(), C4AulScriptEngine::GetPropList(), C4ScriptConstDef::Identifier, Inside(), C4ScriptLibrary::InstantiateAllLibraries(), Random(), C4AulScriptEngine::RegisterGlobalConstant(), Sin(), and WildcardMatch().

Referenced by c4_mapgen_handle_init_script_engine(), and C4Game::InitScriptEngine().

Here is the call graph for this function:
Here is the caller graph for this function:

Variable Documentation

◆ C4ScriptConstMap

C4ScriptConstDef C4ScriptConstMap[]

Definition at line 1066 of file C4Script.cpp.

Referenced by InitCoreFunctionMap().

◆ C4ScriptFnMap

C4ScriptFnDef C4ScriptFnMap[]
Initial value:
=
{
{ "EffectCall", true, C4V_Any, { C4V_Object ,C4V_PropList,C4V_String ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any}, FnEffectCall },
{ "DebugLog", true, C4V_Bool, { C4V_String ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any}, FnDebugLog },
{ "FatalError", true, C4V_Nil, { C4V_String ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any}, FnFatalError },
{ "Trans_Mul", true, C4V_Array, { C4V_Array ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any ,C4V_Any}, FnTrans_Mul},
{ nullptr, false, C4V_Nil, { C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil ,C4V_Nil}, nullptr }
}
@ C4V_PropList
Definition: C4Value.h:28
@ C4V_Object
Definition: C4Value.h:38
@ C4V_Any
Definition: C4Value.h:37
@ C4V_Bool
Definition: C4Value.h:27
@ C4V_Array
Definition: C4Value.h:30
@ C4V_Nil
Definition: C4Value.h:25
@ C4V_String
Definition: C4Value.h:29

Definition at line 1115 of file C4Script.cpp.

Referenced by InitCoreFunctionMap().