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