The Ecere SDK - sdk/blob - compiler/bootstrap/libec/bootstrap/dbpass.c

   1 /* Code generated from eC source file: dbpass.ec */
   2 #if defined(_WIN32)
   3 #define __runtimePlatform 1
   4 #elif defined(__APPLE__)
   5 #define __runtimePlatform 3
   6 #else
   7 #define __runtimePlatform 2
   8 #endif
   9 #if defined(__GNUC__)
  10 typedef long long int64;
  11 typedef unsigned long long uint64;
  12 #ifndef _WIN32
  13 #define __declspec(x)
  14 #endif
  15 #elif defined(__TINYC__)
  16 #include <stdarg.h>
  17 #define __builtin_va_list va_list
  18 #define __builtin_va_start va_start
  19 #define __builtin_va_end va_end
  20 #ifdef _WIN32
  21 #define strcasecmp stricmp
  22 #define strncasecmp strnicmp
  23 #define __declspec(x) __attribute__((x))
  24 #else
  25 #define __declspec(x)
  26 #endif
  27 typedef long long int64;
  28 typedef unsigned long long uint64;
  29 #else
  30 typedef __int64 int64;
  31 typedef unsigned __int64 uint64;
  32 #endif
  33 #ifdef __BIG_ENDIAN__
  34 #define __ENDIAN_PAD(x) (8 - (x))
  35 #else
  36 #define __ENDIAN_PAD(x) 0
  37 #endif
  38 #include <stdint.h>
  39 #include <sys/types.h>
  40 enum yytokentype
  41 {
  42 IDENTIFIER = 258, CONSTANT = 259, STRING_LITERAL = 260, SIZEOF = 261, PTR_OP = 262, INC_OP = 263, DEC_OP = 264, LEFT_OP = 265, RIGHT_OP = 266, LE_OP = 267, GE_OP = 268, EQ_OP = 269, NE_OP = 270, AND_OP = 271, OR_OP = 272, MUL_ASSIGN = 273, DIV_ASSIGN = 274, MOD_ASSIGN = 275, ADD_ASSIGN = 276, SUB_ASSIGN = 277, LEFT_ASSIGN = 278, RIGHT_ASSIGN = 279, AND_ASSIGN = 280, XOR_ASSIGN = 281, OR_ASSIGN = 282, TYPE_NAME = 283, TYPEDEF = 284, EXTERN = 285, STATIC = 286, AUTO = 287, REGISTER = 288, CHAR = 289, SHORT = 290, INT = 291, UINT = 292, INT64 = 293, LONG = 294, SIGNED = 295, UNSIGNED = 296, FLOAT = 297, DOUBLE = 298, CONST = 299, VOLATILE = 300, VOID = 301, VALIST = 302, STRUCT = 303, UNION = 304, ENUM = 305, ELLIPSIS = 306, CASE = 307, DEFAULT = 308, IF = 309, SWITCH = 310, WHILE = 311, DO = 312, FOR = 313, GOTO = 314, CONTINUE = 315, BREAK = 316, RETURN = 317, IFX = 318, ELSE = 319, CLASS = 320, THISCLASS = 321, CLASS_NAME = 322, PROPERTY = 323, SETPROP = 324, GETPROP = 325, NEWOP = 326, RENEW = 327, DELETE = 328, EXT_DECL = 329, EXT_STORAGE = 330, IMPORT = 331, DEFINE = 332, VIRTUAL = 333, ATTRIB = 334, PUBLIC = 335, PRIVATE = 336, TYPED_OBJECT = 337, ANY_OBJECT = 338, _INCREF = 339, EXTENSION = 340, ASM = 341, TYPEOF = 342, WATCH = 343, STOPWATCHING = 344, FIREWATCHERS = 345, WATCHABLE = 346, CLASS_DESIGNER = 347, CLASS_NO_EXPANSION = 348, CLASS_FIXED = 349, ISPROPSET = 350, CLASS_DEFAULT_PROPERTY = 351, PROPERTY_CATEGORY = 352, CLASS_DATA = 353, CLASS_PROPERTY = 354, SUBCLASS = 355, NAMESPACE = 356, NEW0OP = 357, RENEW0 = 358, VAARG = 359, DBTABLE = 360, DBFIELD = 361, DBINDEX = 362, DATABASE_OPEN = 363, ALIGNOF = 364, ATTRIB_DEP = 365, __ATTRIB = 366, BOOL = 367, _BOOL = 368, _COMPLEX = 369, _IMAGINARY = 370, RESTRICT = 371, THREAD = 372, WIDE_STRING_LITERAL = 373
  43 };
  44
  45 static int numIndexes;
  46
  47 extern unsigned int inCompiler;
  48
  49 struct __ecereNameSpace__ecere__sys__OldList
  50 {
  51 void *  first;
  52 void *  last;
  53 int count;
  54 unsigned int offset;
  55 unsigned int circ;
  56 } __attribute__ ((gcc_struct));
  57
  58 struct __ecereNameSpace__ecere__sys__BTNode;
  59
  60 struct __ecereNameSpace__ecere__com__DataValue
  61 {
  62 union
  63 {
  64 char c;
  65 unsigned char uc;
  66 short s;
  67 unsigned short us;
  68 int i;
  69 unsigned int ui;
  70 void *  p;
  71 float f;
  72 double d;
  73 long long i64;
  74 uint64 ui64;
  75 } __attribute__ ((gcc_struct)) __anon1;
  76 } __attribute__ ((gcc_struct));
  77
  78 struct __ecereNameSpace__ecere__com__SerialBuffer
  79 {
  80 unsigned char *  _buffer;
  81 unsigned int count;
  82 unsigned int _size;
  83 unsigned int pos;
  84 } __attribute__ ((gcc_struct));
  85
  86 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
  87
  88 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
  89
  90 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
  91
  92 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
  93
  94 extern void __ecereNameSpace__ecere__com__eSystem_Delete(void *  memory);
  95
  96 struct Enumerator;
  97
  98 struct Declarator;
  99
 100 struct Pointer;
 101
 102 struct AsmField;
 103
 104 struct Attrib;
 105
 106 struct ExtDecl;
 107
 108 struct Attribute;
 109
 110 struct TemplateParameter;
 111
 112 struct TemplateArgument;
 113
 114 struct TemplateDatatype;
 115
 116 struct CodePosition
 117 {
 118 int line;
 119 int charPos;
 120 int pos;
 121 int included;
 122 } __attribute__ ((gcc_struct));
 123
 124 extern size_t strlen(const char * );
 125
 126 extern void *  memcpy(void * , const void * , size_t size);
 127
 128 extern void __ecereNameSpace__ecere__sys__ChangeCh(char *  string, char ch1, char ch2);
 129
 130 extern int sprintf(char * , const char * , ...);
 131
 132 extern void Compiler_Error(const char *  format, ...);
 133
 134 extern const char *  __ecereNameSpace__ecere__GetTranslatedString(const char * name, const char *  string, const char *  stringAndContext);
 135
 136 struct __ecereNameSpace__ecere__com__LinkList
 137 {
 138 void * first;
 139 void * last;
 140 int count;
 141 } __attribute__ ((gcc_struct));
 142
 143 extern int strcmp(const char * , const char * );
 144
 145 extern char *  strcpy(char * , const char * );
 146
 147 struct ModuleImport;
 148
 149 struct ClassImport;
 150
 151 extern char *  __ecereNameSpace__ecere__sys__CopyString(const char *  string);
 152
 153 extern void PrePreProcessClassDefinitions(void);
 154
 155 struct __ecereNameSpace__ecere__com__GlobalFunction;
 156
 157 static struct __ecereNameSpace__ecere__sys__OldList * tableStatements, * indexStatements, * addFieldStatements;
 158
 159 extern struct __ecereNameSpace__ecere__sys__OldList *  MkList(void);
 160
 161 extern struct __ecereNameSpace__ecere__sys__OldList *  MkListOne(void *  item);
 162
 163 extern struct __ecereNameSpace__ecere__sys__OldList *  ast;
 164
 165 extern struct __ecereNameSpace__ecere__sys__OldList *  CopyList(struct __ecereNameSpace__ecere__sys__OldList *  source, void *  (*  CopyFunction)(void * ));
 166
 167 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 168
 169 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert(struct __ecereNameSpace__ecere__sys__OldList * this, void *  prevItem, void *  item);
 170
 171 extern struct Declarator * CopyDeclarator(struct Declarator * declarator);
 172
 173 struct Location
 174 {
 175 struct CodePosition start;
 176 struct CodePosition end;
 177 } __attribute__ ((gcc_struct));
 178
 179 extern struct Location yylloc;
 180
 181 struct External;
 182
 183 static struct External * addAfter;
 184
 185 extern struct External * curExternal;
 186
 187 struct Identifier;
 188
 189 static void ProcessIdentifier(struct Identifier * id)
 190 {
 191 }
 192
 193 extern struct Identifier * MkIdentifier(const char *  string);
 194
 195 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
 196
 197 extern struct Identifier * CopyIdentifier(struct Identifier * id);
 198
 199 struct Context;
 200
 201 extern struct Context * curContext;
 202
 203 extern struct Context * PushContext(void);
 204
 205 extern void PopContext(struct Context * ctx);
 206
 207 extern struct Context * globalContext;
 208
 209 struct __ecereNameSpace__ecere__com__Class;
 210
 211 struct __ecereNameSpace__ecere__com__Instance
 212 {
 213 void * *  _vTbl;
 214 struct __ecereNameSpace__ecere__com__Class * _class;
 215 int _refCount;
 216 } __attribute__ ((gcc_struct));
 217
 218 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name);
 219
 220 extern void __ecereNameSpace__ecere__com__eClass_SetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, long long value);
 221
 222 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 223
 224 extern void __ecereNameSpace__ecere__com__eInstance_SetMethod(struct __ecereNameSpace__ecere__com__Instance * instance, const char *  name, void *  function);
 225
 226 extern void __ecereNameSpace__ecere__com__eInstance_IncRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 227
 228 struct __ecereNameSpace__ecere__com__Property;
 229
 230 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
 231
 232 extern void __ecereNameSpace__ecere__com__eInstance_StopWatching(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property, struct __ecereNameSpace__ecere__com__Instance * object);
 233
 234 extern void __ecereNameSpace__ecere__com__eInstance_Watch(void *  instance, struct __ecereNameSpace__ecere__com__Property * _property, void *  object, void (*  callback)(void * , void * ));
 235
 236 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
 237
 238 struct Expression;
 239
 240 extern void FreeExpContents(struct Expression * exp);
 241
 242 extern struct Expression * MkExpIdentifier(struct Identifier * id);
 243
 244 extern struct Expression * MkExpConstant(const char *  string);
 245
 246 extern struct Expression * MkExpOp(struct Expression * exp1, int op, struct Expression * exp2);
 247
 248 extern struct Expression * CopyExpression(struct Expression * exp);
 249
 250 extern struct Expression * MkExpCall(struct Expression * expression, struct __ecereNameSpace__ecere__sys__OldList * arguments);
 251
 252 extern struct Expression * MkExpMember(struct Expression * expression, struct Identifier * member);
 253
 254 extern struct Declarator * MkDeclaratorArray(struct Declarator * declarator, struct Expression * exp);
 255
 256 extern struct Expression * MkExpString(const char *  string);
 257
 258 extern struct Expression * MkExpClass(struct __ecereNameSpace__ecere__sys__OldList *  specifiers, struct Declarator * decl);
 259
 260 extern struct Expression * MkExpIndex(struct Expression * expression, struct __ecereNameSpace__ecere__sys__OldList * index);
 261
 262 extern struct Expression * MkExpDBTable(char *  table);
 263
 264 extern struct Expression * MkExpDBField(char *  table, struct Identifier * id);
 265
 266 struct Specifier;
 267
 268 extern struct Specifier * MkSpecifierName(const char *  name);
 269
 270 extern struct Specifier * MkSpecifier(int specifier);
 271
 272 extern struct Specifier * CopySpecifier(struct Specifier * spec);
 273
 274 struct Symbol;
 275
 276 struct Specifier
 277 {
 278 struct Specifier * prev;
 279 struct Specifier * next;
 280 struct Location loc;
 281 int type;
 282 union
 283 {
 284 int specifier;
 285 struct
 286 {
 287 struct ExtDecl * extDecl;
 288 char *  name;
 289 struct Symbol * symbol;
 290 struct __ecereNameSpace__ecere__sys__OldList *  templateArgs;
 291 } __attribute__ ((gcc_struct)) __anon1;
 292 struct
 293 {
 294 struct Identifier * id;
 295 struct __ecereNameSpace__ecere__sys__OldList *  list;
 296 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 297 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 298 unsigned int addNameSpace;
 299 struct Context * ctx;
 300 struct ExtDecl * extDeclStruct;
 301 } __attribute__ ((gcc_struct)) __anon2;
 302 struct Expression * expression;
 303 struct Specifier * _class;
 304 struct TemplateParameter * templateParameter;
 305 } __attribute__ ((gcc_struct)) __anon1;
 306 } __attribute__ ((gcc_struct));
 307
 308 struct Identifier
 309 {
 310 struct Identifier * prev;
 311 struct Identifier * next;
 312 struct Location loc;
 313 struct Symbol * classSym;
 314 struct Specifier * _class;
 315 char *  string;
 316 struct Identifier * badID;
 317 } __attribute__ ((gcc_struct));
 318
 319 struct DBTableDef
 320 {
 321 char *  name;
 322 struct Symbol * symbol;
 323 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 324 int declMode;
 325 } __attribute__ ((gcc_struct));
 326
 327 extern struct Symbol * DeclClass(const char *  name);
 328
 329 struct PropertyDef;
 330
 331 struct Instantiation;
 332
 333 struct Instantiation
 334 {
 335 struct Instantiation * prev;
 336 struct Instantiation * next;
 337 struct Location loc;
 338 struct Specifier * _class;
 339 struct Expression * exp;
 340 struct __ecereNameSpace__ecere__sys__OldList *  members;
 341 struct Symbol * symbol;
 342 unsigned int fullSet;
 343 unsigned int isConstant;
 344 unsigned char *  data;
 345 struct Location nameLoc;
 346 struct Location insideLoc;
 347 unsigned int built;
 348 } __attribute__ ((gcc_struct));
 349
 350 extern struct Expression * MkExpInstance(struct Instantiation * inst);
 351
 352 extern struct Instantiation * MkInstantiation(struct Specifier * _class, struct Expression * exp, struct __ecereNameSpace__ecere__sys__OldList * members);
 353
 354 struct Statement;
 355
 356 extern struct Statement * MkCompoundStmt(struct __ecereNameSpace__ecere__sys__OldList * declarations, struct __ecereNameSpace__ecere__sys__OldList * statements);
 357
 358 extern struct Statement * MkIfStmt(struct __ecereNameSpace__ecere__sys__OldList * exp, struct Statement * statement, struct Statement * elseStmt);
 359
 360 extern struct Statement * MkReturnStmt(struct __ecereNameSpace__ecere__sys__OldList * exp);
 361
 362 extern struct Statement * MkExpressionStmt(struct __ecereNameSpace__ecere__sys__OldList * expressions);
 363
 364 struct PropertyDef
 365 {
 366 struct PropertyDef * prev;
 367 struct PropertyDef * next;
 368 struct Location loc;
 369 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 370 struct Declarator * declarator;
 371 struct Identifier * id;
 372 struct Statement * getStmt;
 373 struct Statement * setStmt;
 374 struct Statement * issetStmt;
 375 struct Symbol * symbol;
 376 struct Expression * category;
 377 struct
 378 {
 379 unsigned int conversion : 1;
 380 unsigned int isWatchable : 1;
 381 unsigned int isDBProp : 1;
 382 } __attribute__ ((gcc_struct)) __anon1;
 383 } __attribute__ ((gcc_struct));
 384
 385 extern struct PropertyDef * MkProperty(struct __ecereNameSpace__ecere__sys__OldList * specs, struct Declarator * decl, struct Identifier * id, struct Statement * setStmt, struct Statement * getStmt);
 386
 387 struct Declaration;
 388
 389 struct Statement
 390 {
 391 struct Statement * prev;
 392 struct Statement * next;
 393 struct Location loc;
 394 int type;
 395 union
 396 {
 397 struct __ecereNameSpace__ecere__sys__OldList *  expressions;
 398 struct
 399 {
 400 struct Identifier * id;
 401 struct Statement * stmt;
 402 } __attribute__ ((gcc_struct)) labeled;
 403 struct
 404 {
 405 struct Expression * exp;
 406 struct Statement * stmt;
 407 } __attribute__ ((gcc_struct)) caseStmt;
 408 struct
 409 {
 410 struct __ecereNameSpace__ecere__sys__OldList * declarations;
 411 struct __ecereNameSpace__ecere__sys__OldList * statements;
 412 struct Context * context;
 413 unsigned int isSwitch;
 414 } __attribute__ ((gcc_struct)) compound;
 415 struct
 416 {
 417 struct __ecereNameSpace__ecere__sys__OldList * exp;
 418 struct Statement * stmt;
 419 struct Statement * elseStmt;
 420 } __attribute__ ((gcc_struct)) ifStmt;
 421 struct
 422 {
 423 struct __ecereNameSpace__ecere__sys__OldList * exp;
 424 struct Statement * stmt;
 425 } __attribute__ ((gcc_struct)) switchStmt;
 426 struct
 427 {
 428 struct __ecereNameSpace__ecere__sys__OldList * exp;
 429 struct Statement * stmt;
 430 } __attribute__ ((gcc_struct)) whileStmt;
 431 struct
 432 {
 433 struct __ecereNameSpace__ecere__sys__OldList * exp;
 434 struct Statement * stmt;
 435 } __attribute__ ((gcc_struct)) doWhile;
 436 struct
 437 {
 438 struct Statement * init;
 439 struct Statement * check;
 440 struct __ecereNameSpace__ecere__sys__OldList * increment;
 441 struct Statement * stmt;
 442 } __attribute__ ((gcc_struct)) forStmt;
 443 struct
 444 {
 445 struct Identifier * id;
 446 } __attribute__ ((gcc_struct)) gotoStmt;
 447 struct
 448 {
 449 struct Specifier * spec;
 450 char * statements;
 451 struct __ecereNameSpace__ecere__sys__OldList * inputFields;
 452 struct __ecereNameSpace__ecere__sys__OldList * outputFields;
 453 struct __ecereNameSpace__ecere__sys__OldList * clobberedFields;
 454 } __attribute__ ((gcc_struct)) asmStmt;
 455 struct
 456 {
 457 struct Expression * watcher;
 458 struct Expression * object;
 459 struct __ecereNameSpace__ecere__sys__OldList * watches;
 460 } __attribute__ ((gcc_struct)) _watch;
 461 struct
 462 {
 463 struct Identifier * id;
 464 struct __ecereNameSpace__ecere__sys__OldList * exp;
 465 struct __ecereNameSpace__ecere__sys__OldList * filter;
 466 struct Statement * stmt;
 467 } __attribute__ ((gcc_struct)) forEachStmt;
 468 struct Declaration * decl;
 469 } __attribute__ ((gcc_struct)) __anon1;
 470 } __attribute__ ((gcc_struct));
 471
 472 extern struct Declaration * MkDeclaration(struct __ecereNameSpace__ecere__sys__OldList * specifiers, struct __ecereNameSpace__ecere__sys__OldList * initDeclarators);
 473
 474 struct Declaration
 475 {
 476 struct Declaration * prev;
 477 struct Declaration * next;
 478 struct Location loc;
 479 int type;
 480 union
 481 {
 482 struct
 483 {
 484 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
 485 struct __ecereNameSpace__ecere__sys__OldList *  declarators;
 486 } __attribute__ ((gcc_struct)) __anon1;
 487 struct Instantiation * inst;
 488 struct
 489 {
 490 struct Identifier * id;
 491 struct Expression * exp;
 492 } __attribute__ ((gcc_struct)) __anon2;
 493 } __attribute__ ((gcc_struct)) __anon1;
 494 struct Specifier * extStorage;
 495 struct Symbol * symbol;
 496 int declMode;
 497 } __attribute__ ((gcc_struct));
 498
 499 extern struct External * MkExternalDeclaration(struct Declaration * declaration);
 500
 501 extern struct Declaration * MkDeclarationInst(struct Instantiation * inst);
 502
 503 struct Initializer;
 504
 505 extern struct Initializer * MkInitializerAssignment(struct Expression * exp);
 506
 507 extern struct Initializer * MkInitializerList(struct __ecereNameSpace__ecere__sys__OldList * list);
 508
 509 struct Initializer
 510 {
 511 struct Initializer * prev;
 512 struct Initializer * next;
 513 struct Location loc;
 514 int type;
 515 union
 516 {
 517 struct Expression * exp;
 518 struct __ecereNameSpace__ecere__sys__OldList *  list;
 519 } __attribute__ ((gcc_struct)) __anon1;
 520 unsigned int isConstant;
 521 struct Identifier * id;
 522 } __attribute__ ((gcc_struct));
 523
 524 struct MembersInit;
 525
 526 extern struct MembersInit * MkMembersInitList(struct __ecereNameSpace__ecere__sys__OldList * dataMembers);
 527
 528 struct ClassDef;
 529
 530 extern struct ClassDef * MkClassDefDefaultProperty(struct __ecereNameSpace__ecere__sys__OldList * defProperties);
 531
 532 extern struct ClassDef * MkClassDefProperty(struct PropertyDef * propertyDef);
 533
 534 extern struct ClassDef * MkClassDefClassPropertyValue(struct Identifier * id, struct Initializer * initializer);
 535
 536 struct __ecereNameSpace__ecere__sys__BinaryTree;
 537
 538 struct __ecereNameSpace__ecere__sys__BinaryTree
 539 {
 540 struct __ecereNameSpace__ecere__sys__BTNode * root;
 541 int count;
 542 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
 543 void (*  FreeKey)(void *  key);
 544 } __attribute__ ((gcc_struct));
 545
 546 struct ClassDefinition;
 547
 548 struct ClassDefinition
 549 {
 550 struct ClassDefinition * prev;
 551 struct ClassDefinition * next;
 552 struct Location loc;
 553 struct Specifier * _class;
 554 struct __ecereNameSpace__ecere__sys__OldList *  baseSpecs;
 555 struct __ecereNameSpace__ecere__sys__OldList *  definitions;
 556 struct Symbol * symbol;
 557 struct Location blockStart;
 558 struct Location nameLoc;
 559 int declMode;
 560 unsigned int deleteWatchable;
 561 } __attribute__ ((gcc_struct));
 562
 563 extern struct ClassDefinition * MkClass(struct Symbol * symbol, struct __ecereNameSpace__ecere__sys__OldList * baseSpecs, struct __ecereNameSpace__ecere__sys__OldList * definitions);
 564
 565 extern struct External * MkExternalClass(struct ClassDefinition * _class);
 566
 567 struct Context
 568 {
 569 struct Context * parent;
 570 struct __ecereNameSpace__ecere__sys__BinaryTree types;
 571 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 572 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
 573 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
 574 int nextID;
 575 int simpleID;
 576 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
 577 struct ClassDefinition * classDef;
 578 unsigned int templateTypesOnly;
 579 unsigned int hasNameSpace;
 580 } __attribute__ ((gcc_struct));
 581
 582 struct DBTableEntry;
 583
 584 struct DBIndexItem;
 585
 586 struct DBIndexItem
 587 {
 588 struct DBIndexItem * prev;
 589 struct DBIndexItem * next;
 590 struct Identifier * id;
 591 int order;
 592 } __attribute__ ((gcc_struct));
 593
 594 struct __ecereNameSpace__ecere__com__Method;
 595
 596 struct __ecereNameSpace__ecere__com__Module;
 597
 598 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_RegisterFunction(const char *  name, const char *  type, void *  func, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
 599
 600 struct Type;
 601
 602 struct __ecereNameSpace__ecere__com__Property
 603 {
 604 struct __ecereNameSpace__ecere__com__Property * prev;
 605 struct __ecereNameSpace__ecere__com__Property * next;
 606 const char *  name;
 607 unsigned int isProperty;
 608 int memberAccess;
 609 int id;
 610 struct __ecereNameSpace__ecere__com__Class * _class;
 611 const char *  dataTypeString;
 612 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 613 struct Type * dataType;
 614 void (*  Set)(void * , int);
 615 int (*  Get)(void * );
 616 unsigned int (*  IsSet)(void * );
 617 void *  data;
 618 void *  symbol;
 619 int vid;
 620 unsigned int conversion;
 621 unsigned int watcherOffset;
 622 const char *  category;
 623 unsigned int compiled;
 624 unsigned int selfWatchable;
 625 unsigned int isWatchable;
 626 } __attribute__ ((gcc_struct));
 627
 628 struct __ecereNameSpace__ecere__com__Method
 629 {
 630 const char *  name;
 631 struct __ecereNameSpace__ecere__com__Method * parent;
 632 struct __ecereNameSpace__ecere__com__Method * left;
 633 struct __ecereNameSpace__ecere__com__Method * right;
 634 int depth;
 635 int (*  function)();
 636 int vid;
 637 int type;
 638 struct __ecereNameSpace__ecere__com__Class * _class;
 639 void *  symbol;
 640 const char *  dataTypeString;
 641 struct Type * dataType;
 642 int memberAccess;
 643 } __attribute__ ((gcc_struct));
 644
 645 struct Symbol
 646 {
 647 char *  string;
 648 struct Symbol * parent;
 649 struct Symbol * left;
 650 struct Symbol * right;
 651 int depth;
 652 struct Type * type;
 653 union
 654 {
 655 struct __ecereNameSpace__ecere__com__Method * method;
 656 struct __ecereNameSpace__ecere__com__Property * _property;
 657 struct __ecereNameSpace__ecere__com__Class * registered;
 658 } __attribute__ ((gcc_struct)) __anon1;
 659 unsigned int notYetDeclared;
 660 union
 661 {
 662 struct
 663 {
 664 struct External * pointerExternal;
 665 struct External * structExternal;
 666 } __attribute__ ((gcc_struct)) __anon1;
 667 struct
 668 {
 669 struct External * externalGet;
 670 struct External * externalSet;
 671 struct External * externalPtr;
 672 struct External * externalIsSet;
 673 } __attribute__ ((gcc_struct)) __anon2;
 674 struct
 675 {
 676 struct External * methodExternal;
 677 struct External * methodCodeExternal;
 678 } __attribute__ ((gcc_struct)) __anon3;
 679 } __attribute__ ((gcc_struct)) __anon2;
 680 unsigned int imported;
 681 unsigned int declaredStructSym;
 682 struct __ecereNameSpace__ecere__com__Class * _class;
 683 unsigned int declaredStruct;
 684 unsigned int needConstructor;
 685 unsigned int needDestructor;
 686 char *  constructorName;
 687 char *  structName;
 688 char *  className;
 689 char *  destructorName;
 690 struct ModuleImport * module;
 691 struct ClassImport * _import;
 692 struct Location nameLoc;
 693 unsigned int isParam;
 694 unsigned int isRemote;
 695 unsigned int isStruct;
 696 unsigned int fireWatchersDone;
 697 int declaring;
 698 unsigned int classData;
 699 unsigned int isStatic;
 700 char *  shortName;
 701 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 702 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 703 struct Context * ctx;
 704 int isIterator;
 705 struct Expression * propCategory;
 706 } __attribute__ ((gcc_struct));
 707
 708 struct Type
 709 {
 710 struct Type * prev;
 711 struct Type * next;
 712 int refCount;
 713 union
 714 {
 715 struct Symbol * _class;
 716 struct
 717 {
 718 struct __ecereNameSpace__ecere__sys__OldList members;
 719 char *  enumName;
 720 } __attribute__ ((gcc_struct)) __anon1;
 721 struct
 722 {
 723 struct Type * returnType;
 724 struct __ecereNameSpace__ecere__sys__OldList params;
 725 struct Symbol * thisClass;
 726 unsigned int staticMethod;
 727 struct TemplateParameter * thisClassTemplate;
 728 } __attribute__ ((gcc_struct)) __anon2;
 729 struct
 730 {
 731 struct __ecereNameSpace__ecere__com__Method * method;
 732 struct __ecereNameSpace__ecere__com__Class * methodClass;
 733 struct __ecereNameSpace__ecere__com__Class * usedClass;
 734 } __attribute__ ((gcc_struct)) __anon3;
 735 struct
 736 {
 737 struct Type * arrayType;
 738 int arraySize;
 739 struct Expression * arraySizeExp;
 740 unsigned int freeExp;
 741 struct Symbol * enumClass;
 742 } __attribute__ ((gcc_struct)) __anon4;
 743 struct Type * type;
 744 struct TemplateParameter * templateParameter;
 745 } __attribute__ ((gcc_struct)) __anon1;
 746 int kind;
 747 unsigned int size;
 748 char *  name;
 749 char *  typeName;
 750 struct __ecereNameSpace__ecere__com__Class * thisClassFrom;
 751 int classObjectType;
 752 int alignment;
 753 unsigned int offset;
 754 int bitFieldCount;
 755 int count;
 756 unsigned int isSigned : 1;
 757 unsigned int constant : 1;
 758 unsigned int truth : 1;
 759 unsigned int byReference : 1;
 760 unsigned int extraParam : 1;
 761 unsigned int directClassAccess : 1;
 762 unsigned int computing : 1;
 763 unsigned int keepCast : 1;
 764 unsigned int passAsTemplate : 1;
 765 unsigned int dllExport : 1;
 766 unsigned int attrStdcall : 1;
 767 unsigned int declaredWithStruct : 1;
 768 unsigned int typedByReference : 1;
 769 unsigned int casted : 1;
 770 unsigned int pointerAlignment : 1;
 771 } __attribute__ ((gcc_struct));
 772
 773 struct TypeName;
 774
 775 struct Expression
 776 {
 777 struct Expression * prev;
 778 struct Expression * next;
 779 struct Location loc;
 780 int type;
 781 union
 782 {
 783 struct
 784 {
 785 char *  constant;
 786 struct Identifier * identifier;
 787 } __attribute__ ((gcc_struct)) __anon1;
 788 struct Statement * compound;
 789 struct Instantiation * instance;
 790 struct
 791 {
 792 char *  string;
 793 unsigned int intlString;
 794 unsigned int wideString;
 795 } __attribute__ ((gcc_struct)) __anon2;
 796 struct __ecereNameSpace__ecere__sys__OldList *  list;
 797 struct
 798 {
 799 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 800 struct Declarator * decl;
 801 } __attribute__ ((gcc_struct)) _classExp;
 802 struct
 803 {
 804 struct Identifier * id;
 805 } __attribute__ ((gcc_struct)) classData;
 806 struct
 807 {
 808 struct Expression * exp;
 809 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 810 struct Location argLoc;
 811 } __attribute__ ((gcc_struct)) call;
 812 struct
 813 {
 814 struct Expression * exp;
 815 struct __ecereNameSpace__ecere__sys__OldList * index;
 816 } __attribute__ ((gcc_struct)) index;
 817 struct
 818 {
 819 struct Expression * exp;
 820 struct Identifier * member;
 821 int memberType;
 822 unsigned int thisPtr;
 823 } __attribute__ ((gcc_struct)) member;
 824 struct
 825 {
 826 int op;
 827 struct Expression * exp1;
 828 struct Expression * exp2;
 829 } __attribute__ ((gcc_struct)) op;
 830 struct TypeName * typeName;
 831 struct Specifier * _class;
 832 struct
 833 {
 834 struct TypeName * typeName;
 835 struct Expression * exp;
 836 } __attribute__ ((gcc_struct)) cast;
 837 struct
 838 {
 839 struct Expression * cond;
 840 struct __ecereNameSpace__ecere__sys__OldList * exp;
 841 struct Expression * elseExp;
 842 } __attribute__ ((gcc_struct)) cond;
 843 struct
 844 {
 845 struct TypeName * typeName;
 846 struct Expression * size;
 847 } __attribute__ ((gcc_struct)) _new;
 848 struct
 849 {
 850 struct TypeName * typeName;
 851 struct Expression * size;
 852 struct Expression * exp;
 853 } __attribute__ ((gcc_struct)) _renew;
 854 struct
 855 {
 856 char * table;
 857 struct Identifier * id;
 858 } __attribute__ ((gcc_struct)) db;
 859 struct
 860 {
 861 struct Expression * ds;
 862 struct Expression * name;
 863 } __attribute__ ((gcc_struct)) dbopen;
 864 struct
 865 {
 866 struct TypeName * typeName;
 867 struct Initializer * initializer;
 868 } __attribute__ ((gcc_struct)) initializer;
 869 struct
 870 {
 871 struct Expression * exp;
 872 struct TypeName * typeName;
 873 } __attribute__ ((gcc_struct)) vaArg;
 874 } __attribute__ ((gcc_struct)) __anon1;
 875 unsigned int debugValue;
 876 struct __ecereNameSpace__ecere__com__DataValue val;
 877 uint64 address;
 878 unsigned int hasAddress;
 879 struct Type * expType;
 880 struct Type * destType;
 881 unsigned int usage;
 882 int tempCount;
 883 unsigned int byReference;
 884 unsigned int isConstant;
 885 unsigned int addedThis;
 886 unsigned int needCast;
 887 unsigned int thisPtr;
 888 unsigned int opDestType;
 889 unsigned int needTemplateCast;
 890 } __attribute__ ((gcc_struct));
 891
 892 struct DBTableEntry
 893 {
 894 struct DBTableEntry * prev;
 895 struct DBTableEntry * next;
 896 int type;
 897 struct Identifier * id;
 898 union
 899 {
 900 struct
 901 {
 902 struct TypeName * dataType;
 903 char *  name;
 904 } __attribute__ ((gcc_struct)) __anon1;
 905 struct __ecereNameSpace__ecere__sys__OldList *  items;
 906 } __attribute__ ((gcc_struct)) __anon1;
 907 } __attribute__ ((gcc_struct));
 908
 909 struct TypeName
 910 {
 911 struct TypeName * prev;
 912 struct TypeName * next;
 913 struct Location loc;
 914 struct __ecereNameSpace__ecere__sys__OldList *  qualifiers;
 915 struct Declarator * declarator;
 916 int classObjectType;
 917 struct Expression * bitCount;
 918 } __attribute__ ((gcc_struct));
 919
 920 struct PropertyWatch;
 921
 922 struct PropertyWatch
 923 {
 924 struct PropertyWatch * prev;
 925 struct PropertyWatch * next;
 926 struct Location loc;
 927 struct Statement * compound;
 928 struct __ecereNameSpace__ecere__sys__OldList *  properties;
 929 unsigned int deleteWatch;
 930 } __attribute__ ((gcc_struct));
 931
 932 static void ProcessStatement(struct Statement *  stmt);
 933
 934 static void ProcessProperty(struct PropertyDef * def)
 935 {
 936 if(def->getStmt)
 937 {
 938 ProcessStatement(def->getStmt);
 939 }
 940 if(def->setStmt)
 941 {
 942 ProcessStatement(def->setStmt);
 943 }
 944 }
 945
 946 struct MemberInit;
 947
 948 struct MemberInit
 949 {
 950 struct MemberInit * prev;
 951 struct MemberInit * next;
 952 struct Location loc;
 953 struct Location realLoc;
 954 struct __ecereNameSpace__ecere__sys__OldList *  identifiers;
 955 struct Initializer * initializer;
 956 unsigned int used;
 957 unsigned int variable;
 958 unsigned int takeOutExp;
 959 } __attribute__ ((gcc_struct));
 960
 961 extern struct MemberInit * MkMemberInit(struct __ecereNameSpace__ecere__sys__OldList * ids, struct Initializer * initializer);
 962
 963 extern struct MemberInit * MkMemberInitExp(struct Expression * idExp, struct Initializer * initializer);
 964
 965 struct InitDeclarator;
 966
 967 extern struct InitDeclarator * MkInitDeclarator(struct Declarator * declarator, struct Initializer * initializer);
 968
 969 struct InitDeclarator
 970 {
 971 struct InitDeclarator * prev;
 972 struct InitDeclarator * next;
 973 struct Location loc;
 974 struct Declarator * declarator;
 975 struct Initializer * initializer;
 976 } __attribute__ ((gcc_struct));
 977
 978 static void ProcessExpression(struct Expression *  exp);
 979
 980 static void ProcessInitializer(struct Initializer * initializer)
 981 {
 982 switch(initializer->type)
 983 {
 984 case 1:
 985 {
 986 struct Initializer * init;
 987
 988 for(init = (*initializer->__anon1.list).first; init; init = init->next)
 989 {
 990 ProcessInitializer(init);
 991 }
 992 break;
 993 }
 994 case 0:
 995 ProcessExpression(initializer->__anon1.exp);
 996 break;
 997 }
 998 }
 999
1000 static void ProcessInitDeclarator(struct InitDeclarator * decl)
1001 {
1002 if(decl->initializer)
1003 ProcessInitializer(decl->initializer);
1004 }
1005
1006 static void ProcessMemberInit(struct MemberInit * init)
1007 {
1008 if(init->initializer)
1009 {
1010 ProcessInitializer(init->initializer);
1011 }
1012 }
1013
1014 struct ClassFunction;
1015
1016 struct ClassDef
1017 {
1018 struct ClassDef * prev;
1019 struct ClassDef * next;
1020 struct Location loc;
1021 int type;
1022 union
1023 {
1024 struct Declaration * decl;
1025 struct ClassFunction * function;
1026 struct __ecereNameSpace__ecere__sys__OldList *  defProperties;
1027 struct PropertyDef * propertyDef;
1028 struct PropertyWatch * propertyWatch;
1029 char *  designer;
1030 struct Identifier * defaultProperty;
1031 struct
1032 {
1033 struct Identifier * id;
1034 struct Initializer * initializer;
1035 } __attribute__ ((gcc_struct)) __anon1;
1036 } __attribute__ ((gcc_struct)) __anon1;
1037 int memberAccess;
1038 void *  object;
1039 } __attribute__ ((gcc_struct));
1040
1041 struct MembersInit
1042 {
1043 struct MembersInit * prev;
1044 struct MembersInit * next;
1045 struct Location loc;
1046 int type;
1047 union
1048 {
1049 struct __ecereNameSpace__ecere__sys__OldList *  dataMembers;
1050 struct ClassFunction * function;
1051 } __attribute__ ((gcc_struct)) __anon1;
1052 } __attribute__ ((gcc_struct));
1053
1054 struct ClassFunction
1055 {
1056 struct ClassFunction * prev;
1057 struct ClassFunction * next;
1058 struct Location loc;
1059 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
1060 struct Declarator * declarator;
1061 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
1062 struct Statement * body;
1063 struct __ecereNameSpace__ecere__com__Class * _class;
1064 struct __ecereNameSpace__ecere__sys__OldList attached;
1065 int declMode;
1066 struct Type * type;
1067 struct Symbol * propSet;
1068 unsigned int isVirtual;
1069 unsigned int isConstructor;
1070 unsigned int isDestructor;
1071 unsigned int dontMangle;
1072 int id;
1073 int idCode;
1074 } __attribute__ ((gcc_struct));
1075
1076 static void ProcessClassFunction(struct ClassFunction * func)
1077 {
1078 if(func->body)
1079 {
1080 ProcessStatement(func->body);
1081 }
1082 }
1083
1084 static void ProcessInstance(struct Instantiation * inst)
1085 {
1086 if(inst->members)
1087 {
1088 struct MembersInit * init;
1089 struct MemberInit * memberInit;
1090
1091 for(init = (*inst->members).first; init; init = init->next)
1092 {
1093 if(init->type == 0 && init->__anon1.dataMembers)
1094 {
1095 for(memberInit = (*init->__anon1.dataMembers).first; memberInit; memberInit = memberInit->next)
1096 {
1097 ProcessMemberInit(memberInit);
1098 }
1099 }
1100 if(init->type == 1)
1101 {
1102 ProcessClassFunction(init->__anon1.function);
1103 }
1104 }
1105 }
1106 }
1107
1108 struct __ecereNameSpace__ecere__com__NameSpace;
1109
1110 struct __ecereNameSpace__ecere__com__NameSpace
1111 {
1112 const char *  name;
1113 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
1114 struct __ecereNameSpace__ecere__com__NameSpace *  left;
1115 struct __ecereNameSpace__ecere__com__NameSpace *  right;
1116 int depth;
1117 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
1118 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
1119 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
1120 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
1121 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
1122 } __attribute__ ((gcc_struct));
1123
1124 struct __ecereNameSpace__ecere__com__Application
1125 {
1126 int argc;
1127 const char * *  argv;
1128 int exitCode;
1129 unsigned int isGUIApp;
1130 struct __ecereNameSpace__ecere__sys__OldList allModules;
1131 char *  parsedCommand;
1132 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
1133 } __attribute__ ((gcc_struct));
1134
1135 struct __ecereNameSpace__ecere__com__Module
1136 {
1137 struct __ecereNameSpace__ecere__com__Instance * application;
1138 struct __ecereNameSpace__ecere__sys__OldList classes;
1139 struct __ecereNameSpace__ecere__sys__OldList defines;
1140 struct __ecereNameSpace__ecere__sys__OldList functions;
1141 struct __ecereNameSpace__ecere__sys__OldList modules;
1142 struct __ecereNameSpace__ecere__com__Instance * prev;
1143 struct __ecereNameSpace__ecere__com__Instance * next;
1144 const char *  name;
1145 void *  library;
1146 void *  Unload;
1147 int importType;
1148 int origImportType;
1149 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1150 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1151 } __attribute__ ((gcc_struct));
1152
1153 void __ecereUnregisterModule_dbpass(struct __ecereNameSpace__ecere__com__Instance * module)
1154 {
1155
1156 }
1157
1158 struct FunctionDefinition;
1159
1160 typedef union YYSTYPE
1161 {
1162 int specifierType;
1163 int i;
1164 int declMode;
1165 struct Identifier * id;
1166 struct Expression * exp;
1167 struct Specifier * specifier;
1168 struct __ecereNameSpace__ecere__sys__OldList * list;
1169 struct Enumerator * enumerator;
1170 struct Declarator * declarator;
1171 struct Pointer * pointer;
1172 struct Initializer * initializer;
1173 struct InitDeclarator * initDeclarator;
1174 struct TypeName * typeName;
1175 struct Declaration * declaration;
1176 struct Statement * stmt;
1177 struct FunctionDefinition * function;
1178 struct External * external;
1179 struct Context * context;
1180 struct AsmField * asmField;
1181 struct Attrib * attrib;
1182 struct ExtDecl * extDecl;
1183 struct Attribute * attribute;
1184 struct Instantiation * instance;
1185 struct MembersInit * membersInit;
1186 struct MemberInit * memberInit;
1187 struct ClassFunction * classFunction;
1188 struct ClassDefinition * _class;
1189 struct ClassDef * classDef;
1190 struct PropertyDef * prop;
1191 char * string;
1192 struct Symbol * symbol;
1193 struct PropertyWatch * propertyWatch;
1194 struct TemplateParameter * templateParameter;
1195 struct TemplateArgument * templateArgument;
1196 struct TemplateDatatype * templateDatatype;
1197 struct DBTableEntry * dbtableEntry;
1198 struct DBIndexItem * dbindexItem;
1199 struct DBTableDef * dbtableDef;
1200 } __attribute__ ((gcc_struct)) YYSTYPE;
1201
1202 extern YYSTYPE yylval;
1203
1204 struct FunctionDefinition
1205 {
1206 struct FunctionDefinition * prev;
1207 struct FunctionDefinition * next;
1208 struct Location loc;
1209 struct __ecereNameSpace__ecere__sys__OldList *  specifiers;
1210 struct Declarator * declarator;
1211 struct __ecereNameSpace__ecere__sys__OldList *  declarations;
1212 struct Statement * body;
1213 struct __ecereNameSpace__ecere__com__Class * _class;
1214 struct __ecereNameSpace__ecere__sys__OldList attached;
1215 int declMode;
1216 struct Type * type;
1217 struct Symbol * propSet;
1218 int tempCount;
1219 unsigned int propertyNoThis;
1220 } __attribute__ ((gcc_struct));
1221
1222 struct External
1223 {
1224 struct External * prev;
1225 struct External * next;
1226 struct Location loc;
1227 int type;
1228 struct Symbol * symbol;
1229 union
1230 {
1231 struct FunctionDefinition * function;
1232 struct ClassDefinition * _class;
1233 struct Declaration * declaration;
1234 char *  importString;
1235 struct Identifier * id;
1236 struct DBTableDef * table;
1237 } __attribute__ ((gcc_struct)) __anon1;
1238 int importType;
1239 struct External * fwdDecl;
1240 struct __ecereNameSpace__ecere__com__Instance * outgoing;
1241 struct __ecereNameSpace__ecere__com__Instance * incoming;
1242 int nonBreakableIncoming;
1243 } __attribute__ ((gcc_struct));
1244
1245 static void ProcessFunction(struct FunctionDefinition * func)
1246 {
1247 if(func->body)
1248 {
1249 ProcessStatement(func->body);
1250 }
1251 }
1252
1253 struct __ecereNameSpace__ecere__com__DataMember;
1254
1255 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
1256 {
1257 union
1258 {
1259 struct
1260 {
1261 const char *  dataTypeString;
1262 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
1263 } __attribute__ ((gcc_struct)) __anon1;
1264 struct __ecereNameSpace__ecere__com__DataValue expression;
1265 struct
1266 {
1267 const char *  memberString;
1268 union
1269 {
1270 struct __ecereNameSpace__ecere__com__DataMember * member;
1271 struct __ecereNameSpace__ecere__com__Property * prop;
1272 struct __ecereNameSpace__ecere__com__Method * method;
1273 } __attribute__ ((gcc_struct)) __anon1;
1274 } __attribute__ ((gcc_struct)) __anon2;
1275 } __attribute__ ((gcc_struct)) __anon1;
1276 } __attribute__ ((gcc_struct));
1277
1278 struct __ecereNameSpace__ecere__com__DataMember
1279 {
1280 struct __ecereNameSpace__ecere__com__DataMember * prev;
1281 struct __ecereNameSpace__ecere__com__DataMember * next;
1282 const char *  name;
1283 unsigned int isProperty;
1284 int memberAccess;
1285 int id;
1286 struct __ecereNameSpace__ecere__com__Class * _class;
1287 const char *  dataTypeString;
1288 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
1289 struct Type * dataType;
1290 int type;
1291 int offset;
1292 int memberID;
1293 struct __ecereNameSpace__ecere__sys__OldList members;
1294 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
1295 int memberOffset;
1296 short structAlignment;
1297 short pointerAlignment;
1298 } __attribute__ ((gcc_struct));
1299
1300 struct __ecereNameSpace__ecere__com__Class
1301 {
1302 struct __ecereNameSpace__ecere__com__Class * prev;
1303 struct __ecereNameSpace__ecere__com__Class * next;
1304 const char *  name;
1305 int offset;
1306 int structSize;
1307 void * *  _vTbl;
1308 int vTblSize;
1309 unsigned int (*  Constructor)(void * );
1310 void (*  Destructor)(void * );
1311 int offsetClass;
1312 int sizeClass;
1313 struct __ecereNameSpace__ecere__com__Class * base;
1314 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
1315 struct __ecereNameSpace__ecere__sys__BinaryTree members;
1316 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
1317 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
1318 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
1319 struct __ecereNameSpace__ecere__sys__OldList derivatives;
1320 int memberID;
1321 int startMemberID;
1322 int type;
1323 struct __ecereNameSpace__ecere__com__Instance * module;
1324 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
1325 const char *  dataTypeString;
1326 struct Type * dataType;
1327 int typeSize;
1328 int defaultAlignment;
1329 void (*  Initialize)();
1330 int memberOffset;
1331 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
1332 const char *  designerClass;
1333 unsigned int noExpansion;
1334 const char *  defaultProperty;
1335 unsigned int comRedefinition;
1336 int count;
1337 int isRemote;
1338 unsigned int internalDecl;
1339 void *  data;
1340 unsigned int computeSize;
1341 short structAlignment;
1342 short pointerAlignment;
1343 int destructionWatchOffset;
1344 unsigned int fixed;
1345 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
1346 int inheritanceAccess;
1347 const char *  fullName;
1348 void *  symbol;
1349 struct __ecereNameSpace__ecere__sys__OldList conversions;
1350 struct __ecereNameSpace__ecere__sys__OldList templateParams;
1351 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
1352 struct __ecereNameSpace__ecere__com__Class * templateClass;
1353 struct __ecereNameSpace__ecere__sys__OldList templatized;
1354 int numParams;
1355 unsigned int isInstanceClass;
1356 unsigned int byValueSystemClass;
1357 } __attribute__ ((gcc_struct));
1358
1359 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
1360
1361 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
1362
1363 static void ProcessExpression(struct Expression * exp)
1364 {
1365 switch(exp->type)
1366 {
1367 case 13:
1368 ProcessExpression(exp->__anon1._new.size);
1369 break;
1370 case 14:
1371 ProcessExpression(exp->__anon1._renew.exp);
1372 ProcessExpression(exp->__anon1._renew.size);
1373 break;
1374 case 2:
1375 break;
1376 case 0:
1377 ProcessIdentifier(exp->__anon1.__anon1.identifier);
1378 break;
1379 case 1:
1380 ProcessInstance(exp->__anon1.instance);
1381 break;
1382 case 3:
1383 break;
1384 case 4:
1385 if(exp->__anon1.op.exp1)
1386 {
1387 ProcessExpression(exp->__anon1.op.exp1);
1388 }
1389 if(exp->__anon1.op.exp2)
1390 {
1391 ProcessExpression(exp->__anon1.op.exp2);
1392 }
1393 break;
1394 case 5:
1395 {
1396 struct Expression * expression;
1397
1398 for(expression = (*exp->__anon1.list).first; expression; expression = expression->next)
1399 {
1400 ProcessExpression(expression);
1401 }
1402 break;
1403 }
1404 case 6:
1405 {
1406 struct Expression * expression;
1407
1408 ProcessExpression(exp->__anon1.index.exp);
1409 for(expression = (*exp->__anon1.index.index).first; expression; expression = expression->next)
1410 {
1411 ProcessExpression(expression);
1412 }
1413 break;
1414 }
1415 case 7:
1416 {
1417 ProcessExpression(exp->__anon1.call.exp);
1418 if(exp->__anon1.call.arguments)
1419 {
1420 struct Expression * expression;
1421
1422 for(expression = (*exp->__anon1.call.arguments).first; expression; expression = expression->next)
1423 {
1424 ProcessExpression(expression);
1425 }
1426 }
1427 break;
1428 }
1429 case 8:
1430 ProcessExpression(exp->__anon1.member.exp);
1431 break;
1432 case 9:
1433 ProcessExpression(exp->__anon1.member.exp);
1434 break;
1435 case 10:
1436 break;
1437 case 11:
1438 ProcessExpression(exp->__anon1.cast.exp);
1439 break;
1440 case 12:
1441 ProcessExpression(exp->__anon1.cond.cond);
1442 {
1443 struct Expression * expression;
1444
1445 for(expression = (*exp->__anon1.cond.exp).first; expression; expression = expression->next)
1446 {
1447 ProcessExpression(expression);
1448 }
1449 }
1450 ProcessExpression(exp->__anon1.cond.elseExp);
1451 break;
1452 case 16:
1453 break;
1454 case 29:
1455 {
1456 char tableName[1024];
1457 char name[1024];
1458 int len = strlen(exp->__anon1.db.table);
1459
1460 memcpy(tableName, exp->__anon1.db.table + 1, len - 2);
1461 tableName[len - 2] = (char)0;
1462 __ecereNameSpace__ecere__sys__ChangeCh(tableName, ' ', '_');
1463 sprintf(name, "__ecereDBField_%s_%s", tableName, exp->__anon1.db.id->string);
1464 FreeExpContents(exp);
1465 exp->type = 0;
1466 exp->__anon1.__anon1.identifier = MkIdentifier(name);
1467 break;
1468 }
1469 case 30:
1470 {
1471 char tableName[1024];
1472 char name[1024];
1473 int len = strlen(exp->__anon1.db.table);
1474
1475 memcpy(tableName, exp->__anon1.db.table + 1, len - 2);
1476 tableName[len - 2] = (char)0;
1477 __ecereNameSpace__ecere__sys__ChangeCh(tableName, ' ', '_');
1478 sprintf(name, "__ecereDBTable_%s", tableName);
1479 FreeExpContents(exp);
1480 exp->type = 0;
1481 exp->__anon1.__anon1.identifier = MkIdentifier(name);
1482 break;
1483 }
1484 case 31:
1485 {
1486 char tableName[1024];
1487 char name[1024];
1488 int len = strlen(exp->__anon1.db.table);
1489
1490 memcpy(tableName, exp->__anon1.db.table + 1, len - 2);
1491 tableName[len - 2] = (char)0;
1492 __ecereNameSpace__ecere__sys__ChangeCh(tableName, ' ', '_');
1493 sprintf(name, "__ecereDBIndex_%s_%s", tableName, exp->__anon1.db.id->string);
1494 FreeExpContents(exp);
1495 exp->type = 0;
1496 exp->__anon1.__anon1.identifier = MkIdentifier(name);
1497 break;
1498 }
1499 case 28:
1500 {
1501 if(tableStatements)
1502 {
1503 struct Statement * databaseOpenStmt = MkCompoundStmt(MkList(), MkList());
1504 struct Statement * compound;
1505 struct Statement * ifDBStmt;
1506 struct __ecereNameSpace__ecere__sys__OldList * args;
1507 char numIndexesString[16];
1508
1509 databaseOpenStmt->__anon1.compound.context = __extension__ ({
1510 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1511
1512 __ecereInstance1->parent = curContext, __ecereInstance1;
1513 });
1514 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.declarations), MkDeclaration(MkListOne(MkSpecifierName("Database")), MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier("db")), (((void *)0))))));
1515 args = MkList();
1516 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkSpecifier(STATIC));
1517 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkSpecifierName("bool"));
1518 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.declarations), MkDeclaration(args, MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier("initialized")), MkInitializerAssignment(MkExpIdentifier(MkIdentifier("false")))))));
1519 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.statements), MkIfStmt(MkListOne(MkExpIdentifier(MkIdentifier("initialized"))), MkReturnStmt(MkListOne(MkExpConstant("0"))), (((void *)0))));
1520 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier("initialized")), '=', MkExpIdentifier(MkIdentifier("true"))))));
1521 args = MkList();
1522 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), CopyExpression(exp->__anon1.dbopen.name));
1523 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("no")));
1524 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier("db")), '=', MkExpCall(MkExpMember(CopyExpression(exp->__anon1.dbopen.ds), MkIdentifier("OpenDatabase")), args)))));
1525 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.statements), MkIfStmt(MkListOne(MkExpOp((((void *)0)), '!', MkExpIdentifier(MkIdentifier("db")))), compound = MkCompoundStmt((((void *)0)), MkList()), (((void *)0))));
1526 compound->__anon1.compound.context = __extension__ ({
1527 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1528
1529 __ecereInstance1->parent = databaseOpenStmt->__anon1.compound.context, __ecereInstance1;
1530 });
1531 args = MkList();
1532 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), exp->__anon1.dbopen.name);
1533 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("create")));
1534 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*compound->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier("db")), '=', MkExpCall(MkExpMember(exp->__anon1.dbopen.ds, MkIdentifier("OpenDatabase")), args)))));
1535 exp->__anon1.dbopen.name = (((void *)0));
1536 exp->__anon1.dbopen.ds = (((void *)0));
1537 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.statements), MkIfStmt(MkListOne(MkExpIdentifier(MkIdentifier("db"))), ifDBStmt = MkCompoundStmt(MkList(), MkList()), (((void *)0))));
1538 ifDBStmt->__anon1.compound.context = __extension__ ({
1539 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1540
1541 __ecereInstance1->parent = databaseOpenStmt->__anon1.compound.context, __ecereInstance1;
1542 });
1543 sprintf(numIndexesString, "%d", numIndexes);
1544 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ifDBStmt->__anon1.compound.declarations), MkDeclaration(MkListOne(MkSpecifierName("FieldIndex")), MkListOne(MkInitDeclarator(MkDeclaratorArray(MkDeclaratorIdentifier(MkIdentifier("indexes")), MkExpConstant(numIndexesString)), MkInitializerList(MkListOne(MkInitializerList(MkListOne(MkInitializerAssignment(MkExpIdentifier(MkIdentifier("null")))))))))));
1545 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ifDBStmt->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier("db")), MkIdentifier("Begin")), MkList()))));
1546 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ifDBStmt->__anon1.compound.statements), compound = MkCompoundStmt((((void *)0)), tableStatements));
1547 compound->__anon1.compound.context = __extension__ ({
1548 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1549
1550 __ecereInstance1->parent = ifDBStmt->__anon1.compound.context, __ecereInstance1;
1551 });
1552 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ifDBStmt->__anon1.compound.statements), (compound = MkCompoundStmt((((void *)0)), addFieldStatements), compound->__anon1.compound.context = __extension__ ({
1553 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1554
1555 __ecereInstance1->parent = ifDBStmt->__anon1.compound.context, __ecereInstance1;
1556 }), compound));
1557 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ifDBStmt->__anon1.compound.statements), compound = MkCompoundStmt((((void *)0)), indexStatements));
1558 compound->__anon1.compound.context = __extension__ ({
1559 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1560
1561 __ecereInstance1->parent = ifDBStmt->__anon1.compound.context, __ecereInstance1;
1562 });
1563 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ifDBStmt->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier("db")), MkIdentifier("Commit")), MkList()))));
1564 exp->type = 23;
1565 exp->__anon1.compound = databaseOpenStmt;
1566 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*databaseOpenStmt->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpIdentifier(MkIdentifier("db")))));
1567 tableStatements = (((void *)0));
1568 }
1569 else
1570 {
1571 FreeExpContents(exp);
1572 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString("ec", "No database table defined in this module or database_open already used.\n", (((void *)0))));
1573 exp->type = 16;
1574 }
1575 break;
1576 }
1577 }
1578 }
1579
1580 static void ProcessDBTable(struct DBTableDef * table)
1581 {
1582 struct __ecereNameSpace__ecere__sys__OldList * rowClassDefs = MkList(), * idClassDefs = (((void *)0));
1583 char tableName[1024];
1584 char rowClassName[1024];
1585 int len = strlen(table->name);
1586 unsigned int indexed = 0;
1587 char tableID[1024];
1588 char nameField[1024];
1589 struct __ecereNameSpace__ecere__sys__OldList * args;
1590 struct __ecereNameSpace__ecere__sys__OldList * members;
1591
1592 if(table->symbol)
1593 idClassDefs = MkList();
1594 nameField[0] = (char)0;
1595 memcpy(tableName, table->name + 1, len - 2);
1596 tableName[len - 2] = (char)0;
1597 __ecereNameSpace__ecere__sys__ChangeCh(tableName, ' ', '_');
1598 sprintf(tableID, "__ecereDBTable_%s", tableName);
1599 sprintf(rowClassName, "Row%s", tableName);
1600 __ecereNameSpace__ecere__sys__ChangeCh(rowClassName, ' ', '_');
1601 if(!tableStatements)
1602 {
1603 tableStatements = MkList();
1604 indexStatements = MkList();
1605 addFieldStatements = MkList();
1606 }
1607 {
1608 struct External * external;
1609
1610 external = MkExternalDeclaration(MkDeclaration(MkListOne(MkSpecifierName("Table")), MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier(tableID)), (((void *)0))))));
1611 external->__anon1.declaration->declMode = table->declMode;
1612 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*ast), addAfter, external);
1613 args = MkList();
1614 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*tableStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier(tableID)), '=', MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier("db")), MkIdentifier("OpenTable")), args)))));
1615 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpString(table->name));
1616 members = MkList();
1617 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpInstance(MkInstantiation((((void *)0)), (((void *)0)), MkListOne(MkMembersInitList(members)))));
1618 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*members), MkMemberInit((((void *)0)), MkInitializerAssignment(MkExpIdentifier(MkIdentifier("tableRows")))));
1619 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*members), MkMemberInit((((void *)0)), MkInitializerAssignment(MkExpIdentifier(MkIdentifier("create")))));
1620 }
1621 {
1622 struct ClassDefinition * _class;
1623 struct ClassDef * def;
1624 struct External * external;
1625 struct __ecereNameSpace__ecere__sys__OldList * inheritanceSpecs = MkList();
1626
1627 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*inheritanceSpecs), MkSpecifier(PRIVATE));
1628 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*inheritanceSpecs), MkSpecifierName("Row"));
1629 PushContext();
1630 _class = MkClass(DeclClass(rowClassName), inheritanceSpecs, rowClassDefs);
1631 PopContext(curContext);
1632 def = MkClassDefDefaultProperty(MkListOne(MkMemberInitExp(MkExpIdentifier(MkIdentifier("tbl")), MkInitializerAssignment(MkExpIdentifier(MkIdentifier(tableID))))));
1633 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowClassDefs), def);
1634 _class->declMode = table->declMode;
1635 external = MkExternalClass(_class);
1636 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*ast), addAfter, external);
1637 addAfter = external;
1638 }
1639 if(table->definitions)
1640 {
1641 struct DBTableEntry * entry;
1642
1643 for(entry = (*table->definitions).first; entry; entry = entry->next)
1644 {
1645 switch(entry->type)
1646 {
1647 case 0:
1648 {
1649 unsigned int isIndex = 0;
1650 char fieldID[1024];
1651 struct __ecereNameSpace__ecere__sys__OldList * args;
1652 struct Specifier * spec = entry->__anon1.__anon1.dataType->qualifiers ? (struct Specifier *)(*entry->__anon1.__anon1.dataType->qualifiers).first : (((void *)0));
1653
1654 sprintf(fieldID, "__ecereDBField_%s_%s", tableName, entry->id->string);
1655 if(idClassDefs)
1656 {
1657 if(!nameField[0] && spec->type == 1 && (!strcmp(spec->__anon1.__anon1.name, "String") || !strcmp(spec->__anon1.__anon1.name, "eda::CIString")))
1658 {
1659 strcpy(nameField, entry->id->string);
1660 }
1661 if(!indexed && spec->type == 1 && !strcmp(spec->__anon1.__anon1.name, table->symbol->string))
1662 {
1663 struct Statement * rowSet = MkCompoundStmt(MkList(), MkList());
1664 char name[1024];
1665 struct ClassDef * def;
1666
1667 numIndexes = ((numIndexes > 1) ? numIndexes : 1);
1668 isIndex = 1;
1669 indexed = 1;
1670 sprintf(name, "_%s", entry->id->string);
1671 curContext = rowSet->__anon1.compound.context = __extension__ ({
1672 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1673
1674 __ecereInstance1->parent = globalContext, __ecereInstance1;
1675 });
1676 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowSet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpIdentifier(MkIdentifier("Find")), args = MkList()))));
1677 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier(fieldID)));
1678 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("middle")));
1679 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("nil")));
1680 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("value")));
1681 curContext = globalContext;
1682 def = MkClassDefProperty(MkProperty(CopyList(entry->__anon1.__anon1.dataType->qualifiers, (void *)(CopySpecifier)), CopyDeclarator(entry->__anon1.__anon1.dataType->declarator), MkIdentifier(name), rowSet, (((void *)0))));
1683 def->__anon1.propertyDef->__anon1.isDBProp = 1;
1684 def->memberAccess = 1;
1685 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowClassDefs), def);
1686 }
1687 }
1688 if(rowClassDefs)
1689 {
1690 struct Statement * rowSet = MkCompoundStmt(MkList(), MkList()), * rowGet = MkCompoundStmt(MkList(), MkList());
1691 struct ClassDef * def;
1692
1693 curContext = rowGet->__anon1.compound.context = __extension__ ({
1694 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1695
1696 __ecereInstance1->parent = globalContext, __ecereInstance1;
1697 });
1698 if(spec->type == 1 && spec->__anon1.__anon1.symbol && spec->__anon1.__anon1.symbol->__anon1.registered && spec->__anon1.__anon1.symbol->__anon1.registered->type == 1)
1699 {
1700 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowGet->__anon1.compound.declarations), MkDeclarationInst(MkInstantiation(MkSpecifierName(spec->__anon1.__anon1.name), MkExpIdentifier(MkIdentifier("d")), (((void *)0)))));
1701 }
1702 else
1703 {
1704 struct Expression * exp;
1705
1706 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowGet->__anon1.compound.declarations), MkDeclaration(CopyList(entry->__anon1.__anon1.dataType->qualifiers, (void *)(CopySpecifier)), MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier("d")), MkInitializerAssignment(exp = MkExpConstant("0"))))));
1707 exp->destType = __extension__ ({
1708 struct Type * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type);
1709
1710 __ecereInstance1->kind = 3, __ecereInstance1->refCount = 1, __ecereInstance1;
1711 });
1712 }
1713 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowGet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpIdentifier(MkIdentifier("GetData")), args = MkList()))));
1714 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier(fieldID)));
1715 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("d")));
1716 if(spec->type == 1 && spec->__anon1.__anon1.symbol && spec->__anon1.__anon1.symbol->__anon1.registered && spec->__anon1.__anon1.symbol->__anon1.registered->type == 1)
1717 {
1718 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowGet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier("value")), '=', MkExpIdentifier(MkIdentifier("d"))))));
1719 }
1720 else
1721 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowGet->__anon1.compound.statements), MkReturnStmt(MkListOne(MkExpIdentifier(MkIdentifier("d")))));
1722 curContext = rowSet->__anon1.compound.context = __extension__ ({
1723 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1724
1725 __ecereInstance1->parent = globalContext, __ecereInstance1;
1726 });
1727 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowSet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpIdentifier(MkIdentifier("SetData")), args = MkList()))));
1728 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier(fieldID)));
1729 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("value")));
1730 curContext = globalContext;
1731 def = MkClassDefProperty(MkProperty(CopyList(entry->__anon1.__anon1.dataType->qualifiers, (void *)(CopySpecifier)), entry->__anon1.__anon1.dataType->declarator, CopyIdentifier(entry->id), rowSet, rowGet));
1732 def->__anon1.propertyDef->__anon1.isDBProp = 1;
1733 def->memberAccess = 1;
1734 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*rowClassDefs), def);
1735 }
1736 {
1737 struct External * external;
1738
1739 external = MkExternalDeclaration(MkDeclaration(MkListOne(MkSpecifierName("Field")), MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier(fieldID)), (((void *)0))))));
1740 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ast), external);
1741 external->__anon1.declaration->declMode = table->declMode;
1742 args = MkList();
1743 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*addFieldStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier(fieldID)), '=', MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier(tableID)), MkIdentifier("FindField")), args)))));
1744 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpString(entry->__anon1.__anon1.name));
1745 args = MkList();
1746 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*addFieldStatements), MkIfStmt(MkListOne(MkExpOp((((void *)0)), '!', MkExpIdentifier(MkIdentifier(fieldID)))), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier(fieldID)), '=', MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier(tableID)), MkIdentifier("AddField")), args)))), (((void *)0))));
1747 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpString(entry->__anon1.__anon1.name));
1748 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpClass(CopyList(entry->__anon1.__anon1.dataType->qualifiers, (void *)(CopySpecifier)), CopyDeclarator(entry->__anon1.__anon1.dataType->declarator)));
1749 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpConstant("0"));
1750 }
1751 if(isIndex)
1752 {
1753 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpMember(MkExpIndex(MkExpIdentifier(MkIdentifier("indexes")), MkListOne(MkExpConstant("0"))), MkIdentifier("field")), '=', MkExpIdentifier(MkIdentifier(fieldID))))));
1754 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpMember(MkExpIndex(MkExpIdentifier(MkIdentifier("indexes")), MkListOne(MkExpConstant("0"))), MkIdentifier("order")), '=', MkExpIdentifier(MkIdentifier("ascending"))))));
1755 args = MkList();
1756 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier(tableID)), MkIdentifier("Index")), args))));
1757 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpConstant("1"));
1758 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("indexes")));
1759 }
1760 break;
1761 }
1762 }
1763 }
1764 }
1765 if(table->symbol)
1766 {
1767 struct ClassDefinition * _class;
1768 struct External * external;
1769 struct ClassDef * def;
1770 struct Expression * exp;
1771
1772 PushContext();
1773 _class = MkClass(table->symbol, MkListOne(MkSpecifierName("Id")), idClassDefs);
1774 PopContext(curContext);
1775 _class->declMode = table->declMode;
1776 external = MkExternalClass(_class);
1777 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Insert((&*ast), addAfter, external);
1778 addAfter = external;
1779 def = MkClassDefClassPropertyValue(MkIdentifier("table"), MkInitializerAssignment(exp = MkExpOp((((void *)0)), '&', MkExpDBTable(__ecereNameSpace__ecere__sys__CopyString(table->name)))));
1780 ProcessExpression(exp);
1781 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idClassDefs), def);
1782 if(nameField[0])
1783 {
1784 def = MkClassDefClassPropertyValue(MkIdentifier("nameField"), MkInitializerAssignment(exp = MkExpOp((((void *)0)), '&', MkExpDBField(__ecereNameSpace__ecere__sys__CopyString(table->name), MkIdentifier(nameField)))));
1785 ProcessExpression(exp);
1786 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idClassDefs), def);
1787 }
1788 }
1789 if(table->definitions)
1790 {
1791 struct DBTableEntry * entry;
1792
1793 for(entry = (*table->definitions).first; entry; entry = entry->next)
1794 {
1795 switch(entry->type)
1796 {
1797 case 0:
1798 {
1799 char fieldID[1024];
1800 struct __ecereNameSpace__ecere__sys__OldList * args;
1801 struct Specifier * spec = entry->__anon1.__anon1.dataType->qualifiers ? (struct Specifier *)(*entry->__anon1.__anon1.dataType->qualifiers).first : (((void *)0));
1802
1803 sprintf(fieldID, "__ecereDBField_%s_%s", tableName, entry->id->string);
1804 if(idClassDefs && spec)
1805 {
1806 struct Statement * idSet = MkCompoundStmt(MkList(), MkList()), * idGet = MkCompoundStmt(MkList(), MkList());
1807 struct ClassDef * def;
1808
1809 curContext = idGet->__anon1.compound.context = __extension__ ({
1810 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1811
1812 __ecereInstance1->parent = globalContext, __ecereInstance1;
1813 });
1814 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.declarations), MkDeclarationInst(MkInstantiation(MkSpecifierName(rowClassName), MkExpIdentifier(MkIdentifier("r")), MkListOne(MkMembersInitList(MkListOne(MkMemberInit((((void *)0)), MkInitializerAssignment(MkExpIdentifier(MkIdentifier("this"))))))))));
1815 if(spec->type == 1 && spec->__anon1.__anon1.symbol && spec->__anon1.__anon1.symbol->__anon1.registered && spec->__anon1.__anon1.symbol->__anon1.registered->type == 1)
1816 {
1817 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.declarations), MkDeclarationInst(MkInstantiation(MkSpecifierName(spec->__anon1.__anon1.name), MkExpIdentifier(MkIdentifier("d")), (((void *)0)))));
1818 }
1819 else
1820 {
1821 struct Expression * exp;
1822
1823 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.declarations), MkDeclaration(CopyList(entry->__anon1.__anon1.dataType->qualifiers, (void *)(CopySpecifier)), MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier("d")), MkInitializerAssignment(exp = MkExpConstant("0"))))));
1824 exp->destType = __extension__ ({
1825 struct Type * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Type);
1826
1827 __ecereInstance1->kind = 3, __ecereInstance1->refCount = 1, __ecereInstance1;
1828 });
1829 }
1830 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier("r")), MkIdentifier("GetData")), args = MkList()))));
1831 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier(fieldID)));
1832 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("d")));
1833 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp((((void *)0)), DELETE, MkExpIdentifier(MkIdentifier("r"))))));
1834 if(spec->type == 1 && spec->__anon1.__anon1.symbol && spec->__anon1.__anon1.symbol->__anon1.registered && spec->__anon1.__anon1.symbol->__anon1.registered->type == 1)
1835 {
1836 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier("value")), '=', MkExpIdentifier(MkIdentifier("d"))))));
1837 }
1838 else
1839 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idGet->__anon1.compound.statements), MkReturnStmt(MkListOne(MkExpIdentifier(MkIdentifier("d")))));
1840 curContext = idSet->__anon1.compound.context = __extension__ ({
1841 struct Context * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1842
1843 __ecereInstance1->parent = globalContext, __ecereInstance1;
1844 });
1845 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idSet->__anon1.compound.declarations), MkDeclarationInst(MkInstantiation(MkSpecifierName(rowClassName), MkExpIdentifier(MkIdentifier("r")), MkListOne(MkMembersInitList(MkListOne(MkMemberInit((((void *)0)), MkInitializerAssignment(MkExpIdentifier(MkIdentifier("this"))))))))));
1846 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idSet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier("r")), MkIdentifier("SetData")), args = MkList()))));
1847 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier(fieldID)));
1848 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("value")));
1849 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idSet->__anon1.compound.statements), MkExpressionStmt(MkListOne(MkExpOp((((void *)0)), DELETE, MkExpIdentifier(MkIdentifier("r"))))));
1850 curContext = globalContext;
1851 def = MkClassDefProperty(MkProperty(CopyList(entry->__anon1.__anon1.dataType->qualifiers, (void *)(CopySpecifier)), CopyDeclarator(entry->__anon1.__anon1.dataType->declarator), CopyIdentifier(entry->id), idSet, idGet));
1852 def->__anon1.propertyDef->__anon1.isDBProp = 1;
1853 def->memberAccess = 1;
1854 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*idClassDefs), def);
1855 }
1856 break;
1857 }
1858 case 1:
1859 {
1860 if(entry->__anon1.items && (*entry->__anon1.items).count)
1861 {
1862 char indexID[1024];
1863 struct DBIndexItem * item;
1864 int c;
1865 unsigned int needTable = 0;
1866 char num[16];
1867
1868 if(entry->id || indexed)
1869 {
1870 if(entry->id || (*entry->__anon1.items).count == 1)
1871 {
1872 struct External * external;
1873 struct Identifier * id = entry->id ? entry->id : ((struct DBIndexItem *)(*entry->__anon1.items).first)->id;
1874
1875 sprintf(indexID, "__ecereDBIndex_%s_%s", tableName, id->string);
1876 external = MkExternalDeclaration(MkDeclaration(MkListOne(MkSpecifierName("Table")), MkListOne(MkInitDeclarator(MkDeclaratorIdentifier(MkIdentifier(indexID)), (((void *)0))))));
1877 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*ast), external);
1878 external->__anon1.declaration->declMode = table->declMode;
1879 needTable = 1;
1880 }
1881 else
1882 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString("ec", "Multiple field index requires a name\n", (((void *)0))));
1883 }
1884 else
1885 {
1886 indexed = 1;
1887 strcpy(indexID, tableID);
1888 }
1889 for(c = 0, item = (*entry->__anon1.items).first; item; item = item->next, c++)
1890 {
1891 char fieldID[1024];
1892
1893 sprintf(num, "%d", c);
1894 sprintf(fieldID, "__ecereDBField_%s_%s", tableName, item->id->string);
1895 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpMember(MkExpIndex(MkExpIdentifier(MkIdentifier("indexes")), MkListOne(MkExpConstant(num))), MkIdentifier("field")), '=', MkExpIdentifier(MkIdentifier(fieldID))))));
1896 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpMember(MkExpIndex(MkExpIdentifier(MkIdentifier("indexes")), MkListOne(MkExpConstant(num))), MkIdentifier("order")), '=', MkExpIdentifier(MkIdentifier((item->order == 0) ? "ascending" : "descending"))))));
1897 }
1898 sprintf(num, "%d", c);
1899 numIndexes = ((numIndexes > c) ? numIndexes : c);
1900 if(needTable)
1901 {
1902 args = MkList();
1903 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpOp(MkExpIdentifier(MkIdentifier(indexID)), '=', MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier("db")), MkIdentifier("OpenTable")), args)))));
1904 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpString(table->name));
1905 members = MkList();
1906 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpInstance(MkInstantiation((((void *)0)), (((void *)0)), MkListOne(MkMembersInitList(members)))));
1907 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*members), MkMemberInit((((void *)0)), MkInitializerAssignment(MkExpIdentifier(MkIdentifier("tableRows")))));
1908 }
1909 args = MkList();
1910 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*indexStatements), MkExpressionStmt(MkListOne(MkExpCall(MkExpMember(MkExpIdentifier(MkIdentifier(indexID)), MkIdentifier("Index")), args))));
1911 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpConstant(num));
1912 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*args), MkExpIdentifier(MkIdentifier("indexes")));
1913 }
1914 break;
1915 }
1916 }
1917 }
1918 }
1919 }
1920
1921 static void ProcessDeclaration(struct Declaration *  decl);
1922
1923 static void ProcessSpecifier(struct Specifier * spec)
1924 {
1925 switch(spec->type)
1926 {
1927 case 2:
1928 case 3:
1929 case 4:
1930 {
1931 if(spec->__anon1.__anon2.definitions)
1932 {
1933 struct ClassDef * def;
1934
1935 for(def = (*spec->__anon1.__anon2.definitions).first; def; def = def->next)
1936 {
1937 switch(def->type)
1938 {
1939 case 2:
1940 ProcessDeclaration(def->__anon1.decl);
1941 break;
1942 case 1:
1943 {
1944 struct MemberInit * init;
1945
1946 for(init = (*def->__anon1.defProperties).first; init; init = init->next)
1947 {
1948 ProcessMemberInit(init);
1949 }
1950 break;
1951 }
1952 case 0:
1953 ProcessClassFunction(def->__anon1.function);
1954 break;
1955 case 3:
1956 if(def->__anon1.propertyDef)
1957 {
1958 ProcessProperty(def->__anon1.propertyDef);
1959 }
1960 break;
1961 case 4:
1962 if(def->__anon1.propertyWatch && def->__anon1.propertyWatch->compound)
1963 {
1964 ProcessStatement(def->__anon1.propertyWatch->compound);
1965 }
1966 break;
1967 case 11:
1968 if(def->__anon1.__anon1.initializer)
1969 ProcessInitializer(def->__anon1.__anon1.initializer);
1970 break;
1971 }
1972 }
1973 }
1974 break;
1975 }
1976 }
1977 }
1978
1979 static void ProcessStatement(struct Statement * stmt)
1980 {
1981 switch(stmt->type)
1982 {
1983 case 0:
1984 ProcessStatement(stmt->__anon1.labeled.stmt);
1985 break;
1986 case 1:
1987 if(stmt->__anon1.caseStmt.exp)
1988 {
1989 ProcessExpression(stmt->__anon1.caseStmt.exp);
1990 }
1991 if(stmt->__anon1.caseStmt.stmt)
1992 {
1993 ProcessStatement(stmt->__anon1.caseStmt.stmt);
1994 }
1995 break;
1996 case 14:
1997 {
1998 ProcessDeclaration(stmt->__anon1.decl);
1999 break;
2000 }
2001 case 2:
2002 {
2003 struct Context * oldContext = curContext;
2004
2005 curContext = stmt->__anon1.compound.context;
2006 if(stmt->__anon1.compound.declarations)
2007 {
2008 struct Declaration * decl;
2009
2010 for(decl = (*stmt->__anon1.compound.declarations).first; decl; decl = decl->next)
2011 {
2012 ProcessDeclaration(decl);
2013 }
2014 }
2015 if(stmt->__anon1.compound.statements)
2016 {
2017 struct Statement * statement;
2018
2019 for(statement = (*stmt->__anon1.compound.statements).first; statement; statement = statement->next)
2020 {
2021 ProcessStatement(statement);
2022 }
2023 }
2024 curContext = oldContext;
2025 break;
2026 }
2027 case 3:
2028 {
2029 if(stmt->__anon1.expressions)
2030 {
2031 struct Expression * exp;
2032
2033 for(exp = (*stmt->__anon1.expressions).first; exp; exp = exp->next)
2034 {
2035 ProcessExpression(exp);
2036 }
2037 }
2038 break;
2039 }
2040 case 4:
2041 {
2042 struct Expression * exp;
2043
2044 for(exp = (*stmt->__anon1.ifStmt.exp).first; exp; exp = exp->next)
2045 {
2046 ProcessExpression(exp);
2047 }
2048 if(stmt->__anon1.ifStmt.stmt)
2049 {
2050 ProcessStatement(stmt->__anon1.ifStmt.stmt);
2051 }
2052 if(stmt->__anon1.ifStmt.elseStmt)
2053 {
2054 ProcessStatement(stmt->__anon1.ifStmt.elseStmt);
2055 }
2056 break;
2057 }
2058 case 5:
2059 {
2060 struct Expression * exp;
2061
2062 for(exp = (*stmt->__anon1.switchStmt.exp).first; exp; exp = exp->next)
2063 {
2064 ProcessExpression(exp);
2065 }
2066 ProcessStatement(stmt->__anon1.switchStmt.stmt);
2067 break;
2068 }
2069 case 6:
2070 {
2071 struct Expression * exp;
2072
2073 if(stmt->__anon1.whileStmt.exp)
2074 {
2075 for(exp = (*stmt->__anon1.whileStmt.exp).first; exp; exp = exp->next)
2076 {
2077 ProcessExpression(exp);
2078 }
2079 }
2080 if(stmt->__anon1.whileStmt.stmt)
2081 ProcessStatement(stmt->__anon1.whileStmt.stmt);
2082 break;
2083 }
2084 case 7:
2085 {
2086 ProcessStatement(stmt->__anon1.doWhile.stmt);
2087 if(stmt->__anon1.doWhile.exp)
2088 {
2089 struct Expression * exp;
2090
2091 for(exp = (*stmt->__anon1.doWhile.exp).first; exp; exp = exp->next)
2092 {
2093 ProcessExpression(exp);
2094 }
2095 }
2096 break;
2097 }
2098 case 8:
2099 {
2100 struct Expression * exp;
2101
2102 if(stmt->__anon1.forStmt.init)
2103 {
2104 ProcessStatement(stmt->__anon1.forStmt.init);
2105 }
2106 if(stmt->__anon1.forStmt.check)
2107 {
2108 ProcessStatement(stmt->__anon1.forStmt.check);
2109 }
2110 if(stmt->__anon1.forStmt.increment)
2111 {
2112 for(exp = (*stmt->__anon1.forStmt.increment).first; exp; exp = exp->next)
2113 {
2114 ProcessExpression(exp);
2115 }
2116 }
2117 if(stmt->__anon1.forStmt.stmt)
2118 ProcessStatement(stmt->__anon1.forStmt.stmt);
2119 break;
2120 }
2121 case 9:
2122 break;
2123 case 10:
2124 break;
2125 case 11:
2126 break;
2127 case 12:
2128 if(stmt->__anon1.expressions)
2129 {
2130 struct Expression * exp;
2131
2132 for(exp = (*stmt->__anon1.expressions).first; exp; exp = exp->next)
2133 {
2134 ProcessExpression(exp);
2135 }
2136 }
2137 break;
2138 case 15:
2139 case 16:
2140 {
2141 struct Identifier * _watch;
2142
2143 if(stmt->__anon1._watch.watcher)
2144 {
2145 ProcessExpression(stmt->__anon1._watch.watcher);
2146 }
2147 if(stmt->__anon1._watch.object)
2148 {
2149 ProcessExpression(stmt->__anon1._watch.object);
2150 }
2151 if(stmt->__anon1._watch.watches)
2152 {
2153 for(_watch = (*stmt->__anon1._watch.watches).first; _watch; _watch = _watch->next)
2154 {
2155 ProcessIdentifier(_watch);
2156 }
2157 }
2158 break;
2159 }
2160 case 17:
2161 {
2162 struct PropertyWatch * _watch;
2163
2164 if(stmt->__anon1._watch.watcher)
2165 {
2166 ProcessExpression(stmt->__anon1._watch.watcher);
2167 }
2168 if(stmt->__anon1._watch.object)
2169 {
2170 ProcessExpression(stmt->__anon1._watch.object);
2171 }
2172 if(stmt->__anon1._watch.watches)
2173 {
2174 for(_watch = (*stmt->__anon1._watch.watches).first; _watch; _watch = _watch->next)
2175 {
2176 if(_watch->compound)
2177 {
2178 ProcessStatement(_watch->compound);
2179 }
2180 }
2181 }
2182 break;
2183 }
2184 }
2185 }
2186
2187 static void ProcessClassDef(struct ClassDef * def)
2188 {
2189 switch(def->type)
2190 {
2191 case 2:
2192 ProcessDeclaration(def->__anon1.decl);
2193 break;
2194 case 1:
2195 {
2196 struct MemberInit * init;
2197
2198 for(init = (*def->__anon1.defProperties).first; init; init = init->next)
2199 {
2200 ProcessMemberInit(init);
2201 }
2202 break;
2203 }
2204 case 11:
2205 if(def->__anon1.__anon1.initializer)
2206 ProcessInitializer(def->__anon1.__anon1.initializer);
2207 break;
2208 case 0:
2209 ProcessClassFunction(def->__anon1.function);
2210 break;
2211 case 3:
2212 if(def->__anon1.propertyDef)
2213 {
2214 ProcessProperty(def->__anon1.propertyDef);
2215 }
2216 break;
2217 case 4:
2218 if(def->__anon1.propertyWatch && def->__anon1.propertyWatch->compound)
2219 {
2220 ProcessStatement(def->__anon1.propertyWatch->compound);
2221 }
2222 break;
2223 }
2224 }
2225
2226 static void ProcessDeclaration(struct Declaration * decl)
2227 {
2228 switch(decl->type)
2229 {
2230 case 0:
2231 {
2232 struct Specifier * spec;
2233
2234 if(decl->__anon1.__anon1.specifiers)
2235 {
2236 for(spec = (*decl->__anon1.__anon1.specifiers).first; spec; spec = spec->next)
2237 {
2238 ProcessSpecifier(spec);
2239 }
2240 }
2241 break;
2242 }
2243 case 1:
2244 {
2245 if(decl->__anon1.__anon1.specifiers)
2246 {
2247 struct Specifier * s;
2248
2249 for(s = (*decl->__anon1.__anon1.specifiers).first; s; s = s->next)
2250 {
2251 ProcessSpecifier(s);
2252 }
2253 }
2254 if(decl->__anon1.__anon1.declarators && (*decl->__anon1.__anon1.declarators).first)
2255 {
2256 struct InitDeclarator * d;
2257
2258 for(d = (*decl->__anon1.__anon1.declarators).first; d; d = d->next)
2259 {
2260 ProcessInitDeclarator(d);
2261 }
2262 }
2263 break;
2264 }
2265 case 2:
2266 ProcessInstance(decl->__anon1.inst);
2267 break;
2268 }
2269 }
2270
2271 static void ProcessClass(struct ClassDefinition * _class)
2272 {
2273 if(_class->definitions)
2274 {
2275 struct ClassDef * def;
2276
2277 for(def = (*_class->definitions).first; def; def = def->next)
2278 {
2279 ProcessClassDef(def);
2280 }
2281 }
2282 }
2283
2284 void ProcessDBTableDefinitions()
2285 {
2286 struct External * external;
2287
2288 addAfter = (((void *)0));
2289 curContext = globalContext;
2290 if(inCompiler)
2291 PrePreProcessClassDefinitions();
2292 DeclClass("Field");
2293 DeclClass("Table");
2294 DeclClass("Row");
2295 DeclClass("Id");
2296 numIndexes = 0;
2297 if(ast != (((void *)0)))
2298 {
2299 for(external = (*ast).first; external; external = external->next)
2300 {
2301 curExternal = external;
2302 addAfter = external->prev;
2303 switch(external->type)
2304 {
2305 case 5:
2306 ProcessDBTable(external->__anon1.table);
2307 break;
2308 }
2309 }
2310 for(external = (*ast).first; external; external = external->next)
2311 {
2312 curExternal = external;
2313 addAfter = external->prev;
2314 switch(external->type)
2315 {
2316 case 0:
2317 ProcessFunction(external->__anon1.function);
2318 break;
2319 case 1:
2320 ProcessDeclaration(external->__anon1.declaration);
2321 break;
2322 case 2:
2323 ProcessClass(external->__anon1._class);
2324 break;
2325 }
2326 }
2327 }
2328 curContext = globalContext;
2329 }
2330
2331 void __ecereRegisterModule_dbpass(struct __ecereNameSpace__ecere__com__Instance * module)
2332 {
2333 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2334
2335 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ProcessDBTableDefinitions", "void ProcessDBTableDefinitions(void)", ProcessDBTableDefinitions, module, 1);
2336 }
2337