KSGSBefehl.h 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274
  1. #ifndef KSGSBefehl_H
  2. #define KSGSBefehl_H
  3. #include <Array.h>
  4. #include <Text.h>
  5. using namespace Framework;
  6. namespace KSGScript
  7. {
  8. class KSGScriptObj; // ../Main/KSGScriptObj.h
  9. struct KSGSLeseBefehl; // ../Leser/KSGSLeser.h
  10. struct KSGSLeseDebug; // ../Leser/KSGSLeser.h
  11. struct KSGSBefehlParameter; // aus dieser Datei
  12. class KSGSCompKlassTable; // ../Leser/Compile.h
  13. class KSGSCompFuncTable; // ../Leser/Compile.h
  14. class KSGSCompVarTable; // ../Leser/Compile.h
  15. class KSGSBefehl; // aus dieser Datei
  16. class KSGSFunktionInstanz; // KSGSFunktion
  17. class KSGSVariable; // KSGSKlasse.h
  18. class KSGScriptProcessor;
  19. struct KSGSBefehlVariable
  20. {
  21. int varId;
  22. int varSichtbar; // 0 = global, 1 = klasse, 2 = parameter, 3 = lokal
  23. // Konstruktor
  24. __declspec( dllexport ) KSGSBefehlVariable( Text *txt, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT, KSGSCompVarTable *zVT,
  25. const char *klassName, const char *funktionName, int *typId, bool *ok );
  26. };
  27. struct KSGSBefehlFunktion
  28. {
  29. int funcId;
  30. int funkSichtbar;
  31. Array< KSGSBefehlParameter * > parameter;
  32. // Konstruktor
  33. __declspec( dllexport ) KSGSBefehlFunktion( KSGScriptProcessor *zObj, Text *txt, KSGSLeseDebug *dbg, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT, KSGSCompVarTable *zVT,
  34. const char *klassName, const char *funktionName, int *typId, bool *ok );
  35. // Destruktor
  36. ~KSGSBefehlFunktion();
  37. };
  38. struct KSGSBefehlMember
  39. {
  40. enum Typ
  41. {
  42. BEFEHL,
  43. FUNKTION,
  44. VARIABLE
  45. };
  46. Typ typ;
  47. KSGSBefehl *bef;
  48. KSGSBefehlFunktion *funk;
  49. KSGSBefehlVariable *var;
  50. // Konstruktor
  51. __declspec( dllexport ) KSGSBefehlMember( KSGScriptProcessor *zObj, Text *txt, KSGSLeseDebug *dbg, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  52. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName, int *typId, bool *ok );
  53. // Destruktor
  54. __declspec( dllexport ) ~KSGSBefehlMember();
  55. };
  56. struct KSGSBefehlParameter
  57. {
  58. enum Typ
  59. {
  60. WERT,
  61. OBJEKT
  62. };
  63. Typ typ;
  64. Text wert;
  65. Array< KSGSBefehlMember * > objekt;
  66. // Konstruktor
  67. __declspec( dllexport ) KSGSBefehlParameter( KSGScriptProcessor *zObj, Text *txt, KSGSLeseDebug *dbg, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  68. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName, int *typId, bool *ok );
  69. // Destruktor
  70. __declspec( dllexport ) ~KSGSBefehlParameter();
  71. };
  72. struct KSGSBefehlErstell
  73. {
  74. int id;
  75. int typId;
  76. bool konstruktor;
  77. KSGSBefehlParameter *param;
  78. // Konstruktor
  79. __declspec( dllexport ) KSGSBefehlErstell( KSGScriptProcessor *zObj, Text *txt, KSGSLeseDebug *dbg, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  80. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName, bool *ok );
  81. // Destruktor
  82. __declspec( dllexport ) ~KSGSBefehlErstell();
  83. };
  84. class KSGSBefehl : public virtual ReferenceCounter
  85. {
  86. public:
  87. enum Typ
  88. {
  89. CALL,
  90. OPERATOR,
  91. IF,
  92. FOR,
  93. WHILE,
  94. RETURN,
  95. BREAK,
  96. CONTINUE,
  97. VARIABLE
  98. };
  99. protected:
  100. Typ typ;
  101. bool fehler;
  102. int returnTyp;
  103. public:
  104. // Konstruktor
  105. __declspec( dllexport ) KSGSBefehl( Typ typ );
  106. // Destruktor
  107. __declspec( dllexport ) virtual ~KSGSBefehl();
  108. // constant
  109. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const;
  110. __declspec( dllexport ) bool hatFehler() const;
  111. __declspec( dllexport ) int getReturnTyp() const;
  112. __declspec( dllexport ) bool istTyp( Typ t ) const;
  113. // static
  114. __declspec( dllexport ) static KSGSVariable *prozessVariable( KSGSVariable *zVorObj, KSGSBefehlVariable *zVar, KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI );
  115. __declspec( dllexport ) static KSGSVariable *prozessFunktion( KSGSVariable *zVorObj, KSGSBefehlFunktion *zFunk, KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI );
  116. __declspec( dllexport ) static KSGSVariable *prozessMember( KSGSVariable *zVorObj, KSGSBefehlMember *zMem, KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI );
  117. __declspec( dllexport ) static KSGSVariable *prozessParameter( KSGSBefehlParameter *zParam, KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI );
  118. __declspec( dllexport ) static KSGSVariable *prozessErstell( KSGSBefehlErstell *zErst, KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI );
  119. };
  120. class KSGSCallBefehl : public KSGSBefehl
  121. {
  122. private:
  123. Array< KSGSBefehlMember * > objekt;
  124. public:
  125. // Konstruktor
  126. __declspec( dllexport ) KSGSCallBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  127. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  128. // Destruktor
  129. __declspec( dllexport ) ~KSGSCallBefehl();
  130. // constant
  131. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  132. };
  133. class KSGSOperatorBefehl : public KSGSBefehl
  134. {
  135. private:
  136. KSGSBefehlParameter *paramL;
  137. int operatorId;
  138. KSGSBefehlParameter *paramR;
  139. public:
  140. // Konstruktor
  141. __declspec( dllexport ) KSGSOperatorBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  142. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  143. // Destruktor
  144. __declspec( dllexport ) ~KSGSOperatorBefehl();
  145. // constant
  146. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  147. };
  148. class KSGSIfBefehl : public KSGSBefehl
  149. {
  150. private:
  151. KSGSBefehlParameter *bedingung;
  152. RCArray< KSGSBefehl > bTrue;
  153. RCArray< KSGSBefehl > bFalse;
  154. public:
  155. // Konstruktor
  156. __declspec( dllexport ) KSGSIfBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  157. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  158. // Destruktor
  159. __declspec( dllexport ) ~KSGSIfBefehl();
  160. // constant
  161. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  162. };
  163. class KSGSForBefehl : public KSGSBefehl
  164. {
  165. private:
  166. KSGSBefehl *links;
  167. KSGSBefehlParameter *bedingung;
  168. KSGSBefehl *rechts;
  169. RCArray< KSGSBefehl > schleife;
  170. public:
  171. // Konstruktor
  172. __declspec( dllexport ) KSGSForBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  173. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  174. // Destruktor
  175. __declspec( dllexport ) ~KSGSForBefehl();
  176. // constant
  177. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  178. };
  179. class KSGSWhileBefehl : public KSGSBefehl
  180. {
  181. private:
  182. KSGSBefehlParameter *bedingung;
  183. RCArray< KSGSBefehl > schleife;
  184. public:
  185. // Konstruktor
  186. __declspec( dllexport ) KSGSWhileBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  187. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  188. // Destruktor
  189. __declspec( dllexport ) ~KSGSWhileBefehl();
  190. // constant
  191. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  192. };
  193. class KSGSReturnBefehl : public KSGSBefehl
  194. {
  195. private:
  196. KSGSBefehlParameter *param;
  197. public:
  198. // Konstruktor
  199. __declspec( dllexport ) KSGSReturnBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  200. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  201. // Destruktor
  202. __declspec( dllexport ) ~KSGSReturnBefehl();
  203. // constant
  204. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  205. };
  206. class KSGSBreakBefehl : public KSGSBefehl
  207. {
  208. private:
  209. public:
  210. // Konstruktor
  211. __declspec( dllexport ) KSGSBreakBefehl( KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  212. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  213. // Destruktor
  214. __declspec( dllexport ) ~KSGSBreakBefehl();
  215. // constant
  216. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  217. };
  218. class KSGSContinueBefehl : public KSGSBefehl
  219. {
  220. private:
  221. public:
  222. // Konstruktor
  223. __declspec( dllexport ) KSGSContinueBefehl( KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  224. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  225. // Destruktor
  226. __declspec( dllexport ) ~KSGSContinueBefehl();
  227. // constant
  228. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  229. };
  230. class KSGSVariableBefehl : public KSGSBefehl
  231. {
  232. private:
  233. KSGSBefehlErstell *erstell;
  234. public:
  235. // Konstruktor
  236. __declspec( dllexport ) KSGSVariableBefehl( KSGScriptProcessor *zObj, KSGSLeseBefehl *bef, KSGSCompKlassTable *zKT, KSGSCompFuncTable *zFT,
  237. KSGSCompVarTable *zVT, const char *klassName, const char *funktionName );
  238. // Destruktor
  239. __declspec( dllexport ) ~KSGSVariableBefehl();
  240. // constant
  241. __declspec( dllexport ) virtual KSGSVariable *execute( KSGScriptProcessor *zObj, KSGSFunktionInstanz *zFI, KSGSVariable *zKI ) const override;
  242. };
  243. }
  244. #endif