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

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #ifndef _WIN32
   5 #define __declspec(x)
   6 #endif
   7 #elif defined(__TINYC__)
   8 #include <stdarg.h>
   9 #define __builtin_va_list va_list
  10 #define __builtin_va_start va_start
  11 #define __builtin_va_end va_end
  12 #ifdef _WIN32
  13 #define strcasecmp stricmp
  14 #define strncasecmp strnicmp
  15 #define __declspec(x) __attribute__((x))
  16 #else
  17 #define __declspec(x)
  18 #endif
  19 typedef long long int64;
  20 typedef unsigned long long uint64;
  21 #else
  22 typedef __int64 int64;
  23 typedef unsigned __int64 uint64;
  24 #endif
  25 #ifdef __BIG_ENDIAN__
  26 #define __ENDIAN_PAD(x) (8 - (x))
  27 #else
  28 #define __ENDIAN_PAD(x) 0
  29 #endif
  30 #include <stdint.h>
  31 #include <sys/types.h>
  32
  33 #if defined(_W64) || (defined(__WORDSIZE) && __WORDSIZE == 8) || defined(__x86_64__)
  34 #define _64BIT 1
  35 #else
  36 #define _64BIT 0
  37 #endif
  38
  39 #define arch_PointerSize                  sizeof(void *)
  40 #define structSize_Instance               (_64BIT ? 24 : 12)
  41
  42 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
  43
  44 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
  45
  46 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
  47
  48 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
  49
  50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  51
  52 struct __ecereNameSpace__ecere__sys__BTNode;
  53
  54 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  55
  56 struct __ecereNameSpace__ecere__sys__BinaryTree
  57 {
  58 struct __ecereNameSpace__ecere__sys__BTNode * root;
  59 int count;
  60 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
  61 void (*  FreeKey)(void *  key);
  62 } __attribute__ ((gcc_struct));
  63
  64 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  65
  66 struct __ecereNameSpace__ecere__sys__OldList
  67 {
  68 void *  first;
  69 void *  last;
  70 int count;
  71 unsigned int offset;
  72 unsigned int circ;
  73 } __attribute__ ((gcc_struct));
  74
  75 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  76
  77 struct __ecereNameSpace__ecere__com__Method
  78 {
  79 char *  name;
  80 struct __ecereNameSpace__ecere__com__Method * parent;
  81 struct __ecereNameSpace__ecere__com__Method * left;
  82 struct __ecereNameSpace__ecere__com__Method * right;
  83 int depth;
  84 int (*  function)();
  85 int vid;
  86 int type;
  87 struct __ecereNameSpace__ecere__com__Class * _class;
  88 void *  symbol;
  89 char *  dataTypeString;
  90 struct Type * dataType;
  91 int memberAccess;
  92 } __attribute__ ((gcc_struct));
  93
  94 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  95
  96 struct __ecereNameSpace__ecere__com__Property
  97 {
  98 struct __ecereNameSpace__ecere__com__Property * prev;
  99 struct __ecereNameSpace__ecere__com__Property * next;
 100 char *  name;
 101 unsigned int isProperty;
 102 int memberAccess;
 103 int id;
 104 struct __ecereNameSpace__ecere__com__Class * _class;
 105 char *  dataTypeString;
 106 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 107 struct Type * dataType;
 108 void (*  Set)(void * , int);
 109 int (*  Get)(void * );
 110 unsigned int (*  IsSet)(void * );
 111 void *  data;
 112 void *  symbol;
 113 int vid;
 114 unsigned int conversion;
 115 unsigned int watcherOffset;
 116 char *  category;
 117 unsigned int compiled;
 118 unsigned int selfWatchable;
 119 unsigned int isWatchable;
 120 } __attribute__ ((gcc_struct));
 121
 122 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
 123
 124 struct CodePosition
 125 {
 126 int line;
 127 int charPos;
 128 int pos;
 129 unsigned int included;
 130 } __attribute__ ((gcc_struct));
 131
 132 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 133
 134 struct Location
 135 {
 136 struct CodePosition start;
 137 struct CodePosition end;
 138 } __attribute__ ((gcc_struct));
 139
 140 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
 141
 142 struct Attrib;
 143
 144 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
 145
 146 struct ExtDecl;
 147
 148 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 149
 150 struct ClassDefinition;
 151
 152 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 153
 154 struct Context;
 155
 156 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 157
 158 struct Instantiation;
 159
 160 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 161
 162 struct Declaration;
 163
 164 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 165
 166 struct Statement;
 167
 168 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 169
 170 struct TypeName;
 171
 172 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 173
 174 struct Initializer;
 175
 176 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 177
 178 struct __ecereNameSpace__ecere__com__DataValue
 179 {
 180 union
 181 {
 182 char c;
 183 unsigned char uc;
 184 short s;
 185 unsigned short us;
 186 int i;
 187 unsigned int ui;
 188 void *  p;
 189 float f;
 190 double d;
 191 long long i64;
 192 uint64 ui64;
 193 } __attribute__ ((gcc_struct));
 194 } __attribute__ ((gcc_struct));
 195
 196 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 197
 198 struct Expression
 199 {
 200 struct Expression * prev;
 201 struct Expression * next;
 202 struct Location loc;
 203 int type;
 204 union
 205 {
 206 struct
 207 {
 208 char *  constant;
 209 struct Identifier * identifier;
 210 } __attribute__ ((gcc_struct));
 211 struct Statement * compound;
 212 struct Instantiation * instance;
 213 char *  string;
 214 struct __ecereNameSpace__ecere__sys__OldList *  list;
 215 struct
 216 {
 217 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
 218 struct Declarator * decl;
 219 } __attribute__ ((gcc_struct)) _classExp;
 220 struct
 221 {
 222 struct Identifier * id;
 223 } __attribute__ ((gcc_struct)) classData;
 224 struct
 225 {
 226 struct Expression * exp;
 227 struct __ecereNameSpace__ecere__sys__OldList * arguments;
 228 struct Location argLoc;
 229 } __attribute__ ((gcc_struct)) call;
 230 struct
 231 {
 232 struct Expression * exp;
 233 struct __ecereNameSpace__ecere__sys__OldList * index;
 234 } __attribute__ ((gcc_struct)) index;
 235 struct
 236 {
 237 struct Expression * exp;
 238 struct Identifier * member;
 239 int memberType;
 240 unsigned int thisPtr;
 241 } __attribute__ ((gcc_struct)) member;
 242 struct
 243 {
 244 int op;
 245 struct Expression * exp1;
 246 struct Expression * exp2;
 247 } __attribute__ ((gcc_struct)) op;
 248 struct TypeName * typeName;
 249 struct Specifier * _class;
 250 struct
 251 {
 252 struct TypeName * typeName;
 253 struct Expression * exp;
 254 } __attribute__ ((gcc_struct)) cast;
 255 struct
 256 {
 257 struct Expression * cond;
 258 struct __ecereNameSpace__ecere__sys__OldList * exp;
 259 struct Expression * elseExp;
 260 } __attribute__ ((gcc_struct)) cond;
 261 struct
 262 {
 263 struct TypeName * typeName;
 264 struct Expression * size;
 265 } __attribute__ ((gcc_struct)) _new;
 266 struct
 267 {
 268 struct TypeName * typeName;
 269 struct Expression * size;
 270 struct Expression * exp;
 271 } __attribute__ ((gcc_struct)) _renew;
 272 struct
 273 {
 274 char * table;
 275 struct Identifier * id;
 276 } __attribute__ ((gcc_struct)) db;
 277 struct
 278 {
 279 struct Expression * ds;
 280 struct Expression * name;
 281 } __attribute__ ((gcc_struct)) dbopen;
 282 struct
 283 {
 284 struct TypeName * typeName;
 285 struct Initializer * initializer;
 286 } __attribute__ ((gcc_struct)) initializer;
 287 struct
 288 {
 289 struct Expression * exp;
 290 struct TypeName * typeName;
 291 } __attribute__ ((gcc_struct)) vaArg;
 292 } __attribute__ ((gcc_struct));
 293 unsigned int debugValue;
 294 struct __ecereNameSpace__ecere__com__DataValue val;
 295 uint64 address;
 296 unsigned int hasAddress;
 297 struct Type * expType;
 298 struct Type * destType;
 299 unsigned int usage;
 300 int tempCount;
 301 unsigned int byReference;
 302 unsigned int isConstant;
 303 unsigned int addedThis;
 304 unsigned int needCast;
 305 unsigned int thisPtr;
 306 } __attribute__ ((gcc_struct));
 307
 308 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 309
 310 struct TemplateDatatype;
 311
 312 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 313
 314 struct TemplateArgument;
 315
 316 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 317
 318 struct TemplateParameter;
 319
 320 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 321
 322 struct Specifier;
 323
 324 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 325
 326 struct Identifier;
 327
 328 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Pointer;
 329
 330 struct Pointer;
 331
 332 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 333
 334 struct Declarator;
 335
 336 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 337
 338 struct FunctionDefinition;
 339
 340 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 341
 342 struct DBTableDef;
 343
 344 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 345
 346 struct External;
 347
 348 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 349
 350 struct ModuleImport;
 351
 352 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 353
 354 struct ClassImport;
 355
 356 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 357
 358 struct Symbol
 359 {
 360 char *  string;
 361 struct Symbol * parent;
 362 struct Symbol * left;
 363 struct Symbol * right;
 364 int depth;
 365 struct Type * type;
 366 union
 367 {
 368 struct __ecereNameSpace__ecere__com__Method * method;
 369 struct __ecereNameSpace__ecere__com__Property * _property;
 370 struct __ecereNameSpace__ecere__com__Class * registered;
 371 } __attribute__ ((gcc_struct));
 372 int id;
 373 int idCode;
 374 union
 375 {
 376 struct
 377 {
 378 struct External * pointerExternal;
 379 struct External * structExternal;
 380 } __attribute__ ((gcc_struct));
 381 struct
 382 {
 383 struct External * externalGet;
 384 struct External * externalSet;
 385 struct External * externalPtr;
 386 struct External * externalIsSet;
 387 } __attribute__ ((gcc_struct));
 388 struct
 389 {
 390 struct External * methodExternal;
 391 struct External * methodCodeExternal;
 392 } __attribute__ ((gcc_struct));
 393 } __attribute__ ((gcc_struct));
 394 unsigned int imported;
 395 unsigned int declaredStructSym;
 396 struct __ecereNameSpace__ecere__com__Class * _class;
 397 unsigned int declaredStruct;
 398 unsigned int needConstructor;
 399 unsigned int needDestructor;
 400 char *  constructorName;
 401 char *  structName;
 402 char *  className;
 403 char *  destructorName;
 404 struct ModuleImport * module;
 405 struct ClassImport * _import;
 406 struct Location nameLoc;
 407 unsigned int isParam;
 408 unsigned int isRemote;
 409 unsigned int isStruct;
 410 unsigned int fireWatchersDone;
 411 int declaring;
 412 unsigned int classData;
 413 unsigned int isStatic;
 414 char *  shortName;
 415 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 416 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 417 struct Context * ctx;
 418 int isIterator;
 419 struct Expression * propCategory;
 420 } __attribute__ ((gcc_struct));
 421
 422 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 423
 424 struct Type;
 425
 426 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 427
 428 struct __ecereNameSpace__ecere__com__Class
 429 {
 430 struct __ecereNameSpace__ecere__com__Class * prev;
 431 struct __ecereNameSpace__ecere__com__Class * next;
 432 char *  name;
 433 int offset;
 434 int structSize;
 435 int (* *  _vTbl)();
 436 int vTblSize;
 437 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 438 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 439 int offsetClass;
 440 int sizeClass;
 441 struct __ecereNameSpace__ecere__com__Class * base;
 442 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 443 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 444 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 445 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 446 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 447 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 448 int memberID;
 449 int startMemberID;
 450 int type;
 451 struct __ecereNameSpace__ecere__com__Instance * module;
 452 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 453 char *  dataTypeString;
 454 struct Type * dataType;
 455 int typeSize;
 456 int defaultAlignment;
 457 void (*  Initialize)();
 458 int memberOffset;
 459 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 460 char *  designerClass;
 461 unsigned int noExpansion;
 462 char *  defaultProperty;
 463 unsigned int comRedefinition;
 464 int count;
 465 unsigned int isRemote;
 466 unsigned int internalDecl;
 467 void *  data;
 468 unsigned int computeSize;
 469 int structAlignment;
 470 int destructionWatchOffset;
 471 unsigned int fixed;
 472 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 473 int inheritanceAccess;
 474 char *  fullName;
 475 void *  symbol;
 476 struct __ecereNameSpace__ecere__sys__OldList conversions;
 477 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 478 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 479 struct __ecereNameSpace__ecere__com__Class * templateClass;
 480 struct __ecereNameSpace__ecere__sys__OldList templatized;
 481 int numParams;
 482 } __attribute__ ((gcc_struct));
 483
 484 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name);
 485
 486 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 487
 488 struct __ecereNameSpace__ecere__com__Instance
 489 {
 490 int (* *  _vTbl)();
 491 struct __ecereNameSpace__ecere__com__Class * _class;
 492 int _refCount;
 493 } __attribute__ ((gcc_struct));
 494
 495 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 496
 497 struct __ecereNameSpace__ecere__com__DataMember
 498 {
 499 struct __ecereNameSpace__ecere__com__DataMember * prev;
 500 struct __ecereNameSpace__ecere__com__DataMember * next;
 501 char *  name;
 502 unsigned int isProperty;
 503 int memberAccess;
 504 int id;
 505 struct __ecereNameSpace__ecere__com__Class * _class;
 506 char *  dataTypeString;
 507 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 508 struct Type * dataType;
 509 int type;
 510 int offset;
 511 int memberID;
 512 struct __ecereNameSpace__ecere__sys__OldList members;
 513 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 514 int memberOffset;
 515 int structAlignment;
 516 } __attribute__ ((gcc_struct));
 517
 518 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 519
 520 struct __ecereNameSpace__ecere__com__SerialBuffer
 521 {
 522 unsigned char *  _buffer;
 523 unsigned int count;
 524 unsigned int _size;
 525 unsigned int pos;
 526 } __attribute__ ((gcc_struct));
 527
 528 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 529
 530 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 531 {
 532 union
 533 {
 534 struct
 535 {
 536 char *  dataTypeString;
 537 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 538 } __attribute__ ((gcc_struct));
 539 struct __ecereNameSpace__ecere__com__DataValue expression;
 540 struct
 541 {
 542 char *  memberString;
 543 union
 544 {
 545 struct __ecereNameSpace__ecere__com__DataMember * member;
 546 struct __ecereNameSpace__ecere__com__Property * prop;
 547 struct __ecereNameSpace__ecere__com__Method * method;
 548 } __attribute__ ((gcc_struct));
 549 } __attribute__ ((gcc_struct));
 550 } __attribute__ ((gcc_struct));
 551 } __attribute__ ((gcc_struct));
 552
 553 extern int yychar;
 554
 555 struct __ecereNameSpace__ecere__com__NameSpace * globalData;
 556
 557 void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace)
 558 {
 559 globalData = nameSpace;
 560 }
 561
 562 struct __ecereNameSpace__ecere__sys__OldList dataRedefinitions;
 563
 564 extern char sourceFileStack[30][797];
 565
 566 extern int include_stack_ptr;
 567
 568 static int numIncludes;
 569
 570 static char ** includes;
 571
 572 unsigned int inIDE = 0x0;
 573
 574 void SetInIDE(unsigned int b)
 575 {
 576 inIDE = b;
 577 }
 578
 579 struct __ecereNameSpace__ecere__com__Instance * sourceDirs;
 580
 581 void SetSourceDirs(struct __ecereNameSpace__ecere__com__Instance * list)
 582 {
 583 sourceDirs = list;
 584 }
 585
 586 struct __ecereNameSpace__ecere__sys__OldList * includeDirs, * sysIncludeDirs;
 587
 588 void SetIncludeDirs(struct __ecereNameSpace__ecere__sys__OldList * list)
 589 {
 590 includeDirs = list;
 591 }
 592
 593 void SetSysIncludeDirs(struct __ecereNameSpace__ecere__sys__OldList * list)
 594 {
 595 sysIncludeDirs = list;
 596 }
 597
 598 unsigned int ecereImported;
 599
 600 void SetEcereImported(unsigned int b)
 601 {
 602 ecereImported = b;
 603 }
 604
 605 unsigned int GetEcereImported()
 606 {
 607 return ecereImported;
 608 }
 609
 610 unsigned int inPreCompiler = 0x0;
 611
 612 void SetInPreCompiler(unsigned int b)
 613 {
 614 inPreCompiler = b;
 615 }
 616
 617 struct __ecereNameSpace__ecere__sys__OldList * precompDefines;
 618
 619 void SetPrecompDefines(struct __ecereNameSpace__ecere__sys__OldList * list)
 620 {
 621 precompDefines = list;
 622 }
 623
 624 unsigned int DummyMethod()
 625 {
 626 return 0x1;
 627 }
 628
 629 extern char *  __ecereNameSpace__ecere__sys__TrimLSpaces(char *  string, char *  output);
 630
 631 extern int strcmp(const char * , const char * );
 632
 633 extern int strtol(char * , char * * , int base);
 634
 635 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_AddDataMember(struct __ecereNameSpace__ecere__com__DataMember * member, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
 636
 637 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__BitMember;
 638
 639 struct __ecereNameSpace__ecere__com__BitMember
 640 {
 641 struct __ecereNameSpace__ecere__com__BitMember * prev;
 642 struct __ecereNameSpace__ecere__com__BitMember * next;
 643 char *  name;
 644 unsigned int isProperty;
 645 int memberAccess;
 646 int id;
 647 struct __ecereNameSpace__ecere__com__Class * _class;
 648 char *  dataTypeString;
 649 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 650 struct Type * dataType;
 651 int type;
 652 int size;
 653 int pos;
 654 uint64 mask;
 655 } __attribute__ ((gcc_struct));
 656
 657 extern struct __ecereNameSpace__ecere__com__BitMember * __ecereNameSpace__ecere__com__eClass_AddBitMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, int bitSize, int bitPos, int declMode);
 658
 659 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eClass_AddDataMember(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, unsigned int size, unsigned int alignment, int declMode);
 660
 661 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
 662
 663 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
 664
 665 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
 666
 667 extern char *  strcpy(char * , const char * );
 668
 669 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(struct __ecereNameSpace__ecere__com__Instance * this, char *  s, int max);
 670
 671 static void ReadDataMembers(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__com__Instance * f)
 672 {
 673 char line[1024];
 674 char name[1024];
 675 int size = 0, bitPos = -1;
 676 int memberAccess = 1;
 677
 678 for(; ; )
 679 {
 680 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 681 break;
 682 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 683 if(!strcmp(line, "."))
 684 break;
 685 if(line[0] == '[')
 686 {
 687 if(!strcmp(line, "[Size]"))
 688 {
 689 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
 690 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 691 size = strtol(line, (((void *)0)), 0);
 692 }
 693 else if(!strcmp(line, "[Pos]"))
 694 {
 695 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
 696 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 697 bitPos = strtol(line, (((void *)0)), 0);
 698 }
 699 else if(!strcmp(line, "[Public]"))
 700 memberAccess = 1;
 701 else if(!strcmp(line, "[Private]"))
 702 memberAccess = 2;
 703 else if(!strcmp(line, "[Type]"))
 704 {
 705 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
 706 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 707 if(member)
 708 {
 709 if(!__ecereNameSpace__ecere__com__eMember_AddDataMember(member, name, line[0] ? line : 0, 0, 0, memberAccess))
 710 ;
 711 }
 712 else if(regClass && regClass->type == 2)
 713 {
 714 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess);
 715
 716 member->size = size;
 717 member->pos = bitPos;
 718 }
 719 else if(regClass)
 720 {
 721 if(!__ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess))
 722 ;
 723 }
 724 }
 725 else if(!strcmp(line, "[Struct]") || !strcmp(line, "[Union]"))
 726 {
 727 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (regClass || member) ? __ecereNameSpace__ecere__com__eMember_New((!strcmp(line, "[Union]")) ? 1 : 2, memberAccess) : (((void *)0));
 728
 729 ReadDataMembers((((void *)0)), dataMember, f);
 730 if(member)
 731 {
 732 if(!__ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember))
 733 ;
 734 }
 735 else if(regClass)
 736 {
 737 if(!__ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember))
 738 ;
 739 }
 740 }
 741 }
 742 else
 743 {
 744 size = 0;
 745 bitPos = -1;
 746 strcpy(name, line);
 747 memberAccess = 1;
 748 }
 749 }
 750 }
 751
 752 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpenBuffered(char *  fileName, int mode);
 753
 754 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(char *  string, char *  output);
 755
 756 extern int strcasecmp(const char * , const char * );
 757
 758 extern struct Symbol * DeclClass(int symbolID, char *  name);
 759
 760 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
 761
 762 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
 763
 764 extern struct Symbol * FindClass(char *  name);
 765
 766 extern char *  sourceFile;
 767
 768 extern char *  strstr(const char * , const char * );
 769
 770 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (* )(void * ), void (* )(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
 771
 772 extern char *  strcat(char * , const char * );
 773
 774 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldLink;
 775
 776 struct __ecereNameSpace__ecere__sys__OldLink
 777 {
 778 struct __ecereNameSpace__ecere__sys__OldLink * prev;
 779 struct __ecereNameSpace__ecere__sys__OldLink * next;
 780 void *  data;
 781 } __attribute__ ((gcc_struct));
 782
 783 extern void __ecereNameSpace__ecere__com__eClass_DestructionWatchable(struct __ecereNameSpace__ecere__com__Class * _class);
 784
 785 extern struct ModuleImport * FindModule(struct __ecereNameSpace__ecere__com__Instance * moduleToFind);
 786
 787 extern struct ModuleImport * mainModule;
 788
 789 extern char *  strchr(const char * , int);
 790
 791 extern void *  memcpy(void * , const void * , size_t size);
 792
 793 extern char *  __ecereNameSpace__ecere__sys__TrimRSpaces(char *  string, char *  output);
 794
 795 extern void __ecereNameSpace__ecere__com__eEnum_AddFixedValue(struct __ecereNameSpace__ecere__com__Class * _class, char *  string, int value);
 796
 797 extern int atoi(const char * );
 798
 799 extern int __ecereNameSpace__ecere__com__eEnum_AddValue(struct __ecereNameSpace__ecere__com__Class * _class, char *  string);
 800
 801 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
 802
 803 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  type, void *  function, int declMode);
 804
 805 extern struct __ecereNameSpace__ecere__com__Property * __ecereNameSpace__ecere__com__eClass_AddProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  dataType, void *  setStmt, void *  getStmt, int declMode);
 806
 807 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
 808
 809 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassProperty;
 810
 811 struct __ecereNameSpace__ecere__com__ClassProperty;
 812
 813 extern struct __ecereNameSpace__ecere__com__ClassProperty * __ecereNameSpace__ecere__com__eClass_AddClassProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, char *  dataType, void *  setStmt, void *  getStmt);
 814
 815 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
 816
 817 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_OpTable;
 818
 819 struct OpTable
 820 {
 821 unsigned int (*  Add)(struct Expression *, struct Operand *, struct Operand *);
 822 unsigned int (*  Sub)(struct Expression *, struct Operand *, struct Operand *);
 823 unsigned int (*  Mul)(struct Expression *, struct Operand *, struct Operand *);
 824 unsigned int (*  Div)(struct Expression *, struct Operand *, struct Operand *);
 825 unsigned int (*  Mod)(struct Expression *, struct Operand *, struct Operand *);
 826 unsigned int (*  Neg)(struct Expression *, struct Operand *);
 827 unsigned int (*  Inc)(struct Expression *, struct Operand *);
 828 unsigned int (*  Dec)(struct Expression *, struct Operand *);
 829 unsigned int (*  Asign)(struct Expression *, struct Operand *, struct Operand *);
 830 unsigned int (*  AddAsign)(struct Expression *, struct Operand *, struct Operand *);
 831 unsigned int (*  SubAsign)(struct Expression *, struct Operand *, struct Operand *);
 832 unsigned int (*  MulAsign)(struct Expression *, struct Operand *, struct Operand *);
 833 unsigned int (*  DivAsign)(struct Expression *, struct Operand *, struct Operand *);
 834 unsigned int (*  ModAsign)(struct Expression *, struct Operand *, struct Operand *);
 835 unsigned int (*  BitAnd)(struct Expression *, struct Operand *, struct Operand *);
 836 unsigned int (*  BitOr)(struct Expression *, struct Operand *, struct Operand *);
 837 unsigned int (*  BitXor)(struct Expression *, struct Operand *, struct Operand *);
 838 unsigned int (*  LShift)(struct Expression *, struct Operand *, struct Operand *);
 839 unsigned int (*  RShift)(struct Expression *, struct Operand *, struct Operand *);
 840 unsigned int (*  BitNot)(struct Expression *, struct Operand *);
 841 unsigned int (*  AndAsign)(struct Expression *, struct Operand *, struct Operand *);
 842 unsigned int (*  OrAsign)(struct Expression *, struct Operand *, struct Operand *);
 843 unsigned int (*  XorAsign)(struct Expression *, struct Operand *, struct Operand *);
 844 unsigned int (*  LShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
 845 unsigned int (*  RShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
 846 unsigned int (*  Not)(struct Expression *, struct Operand *);
 847 unsigned int (*  Equ)(struct Expression *, struct Operand *, struct Operand *);
 848 unsigned int (*  Nqu)(struct Expression *, struct Operand *, struct Operand *);
 849 unsigned int (*  And)(struct Expression *, struct Operand *, struct Operand *);
 850 unsigned int (*  Or)(struct Expression *, struct Operand *, struct Operand *);
 851 unsigned int (*  Grt)(struct Expression *, struct Operand *, struct Operand *);
 852 unsigned int (*  Sma)(struct Expression *, struct Operand *, struct Operand *);
 853 unsigned int (*  GrtEqu)(struct Expression *, struct Operand *, struct Operand *);
 854 unsigned int (*  SmaEqu)(struct Expression *, struct Operand *, struct Operand *);
 855 unsigned int (*  Cond)(struct Expression *, struct Operand *, struct Operand *, struct Operand *);
 856 } __attribute__ ((gcc_struct));
 857
 858 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Operand;
 859
 860 struct Operand
 861 {
 862 int kind;
 863 struct Type * type;
 864 unsigned int ptrSize;
 865 union
 866 {
 867 char c;
 868 unsigned char uc;
 869 short s;
 870 unsigned short us;
 871 int i;
 872 unsigned int ui;
 873 float f;
 874 double d;
 875 long long i64;
 876 uint64 ui64;
 877 } __attribute__ ((gcc_struct));
 878 struct OpTable ops;
 879 } __attribute__ ((gcc_struct));
 880
 881 extern struct Location yylloc;
 882
 883 extern struct __ecereNameSpace__ecere__com__Instance * fileInput;
 884
 885 extern int declMode;
 886
 887 extern void resetScanner();
 888
 889 extern struct Expression * ParseExpressionString(char *  expression);
 890
 891 extern struct Type * ProcessTypeString(char *  string, unsigned int staticMethod);
 892
 893 extern void ProcessExpressionType(struct Expression * exp);
 894
 895 extern void ComputeExpression(struct Expression * exp);
 896
 897 extern struct Operand GetOperand(struct Expression * exp);
 898
 899 extern void FreeExpression(struct Expression * exp);
 900
 901 extern void resetScannerPos(struct CodePosition * pos);
 902
 903 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateParameter;
 904
 905 struct __ecereNameSpace__ecere__com__ClassTemplateParameter;
 906
 907 extern struct __ecereNameSpace__ecere__com__ClassTemplateParameter * __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, int type, void *  info, struct __ecereNameSpace__ecere__com__ClassTemplateArgument * defaultArg);
 908
 909 extern void __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(struct __ecereNameSpace__ecere__com__Class * base);
 910
 911 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DefinedExpression;
 912
 913 struct __ecereNameSpace__ecere__com__DefinedExpression;
 914
 915 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_RegisterDefine(char *  name, char *  value, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
 916
 917 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
 918
 919 struct __ecereNameSpace__ecere__com__GlobalFunction;
 920
 921 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_RegisterFunction(char *  name, char *  type, void *  func, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
 922
 923 extern char *  strncpy(char * , const char * , size_t n);
 924
 925 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
 926
 927 struct __ecereNameSpace__ecere__com__NameSpace
 928 {
 929 char *  name;
 930 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
 931 struct __ecereNameSpace__ecere__com__NameSpace *  left;
 932 struct __ecereNameSpace__ecere__com__NameSpace *  right;
 933 int depth;
 934 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
 935 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
 936 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 937 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
 938 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
 939 } __attribute__ ((gcc_struct));
 940
 941 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
 942
 943 struct GlobalData
 944 {
 945 uintptr_t key;
 946 struct __ecereNameSpace__ecere__sys__BTNode * parent;
 947 struct __ecereNameSpace__ecere__sys__BTNode * left;
 948 struct __ecereNameSpace__ecere__sys__BTNode * right;
 949 int depth;
 950 struct __ecereNameSpace__ecere__com__Instance * module;
 951 char *  dataTypeString;
 952 struct Type * dataType;
 953 void *  symbol;
 954 char *  fullName;
 955 } __attribute__ ((gcc_struct));
 956
 957 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DataRedefinition;
 958
 959 struct DataRedefinition
 960 {
 961 struct DataRedefinition * prev;
 962 struct DataRedefinition * next;
 963 char name[1024];
 964 char type1[1024];
 965 char type2[1024];
 966 } __attribute__ ((gcc_struct));
 967
 968 void ImportModule(char *  name, int importType, int importAccess, unsigned int loadDllOnly);
 969
 970 extern void Compiler_Error(char *  format, ...);
 971
 972 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
 973
 974 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
 975
 976 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 977
 978 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
 979
 980 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
 981
 982 struct __ecereNameSpace__ecere__sys__BTNode * __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  key);
 983
 984 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  a, char *  b);
 985
 986 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
 987
 988 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 989
 990 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 991
 992 unsigned int LoadSymbols(char * fileName, int importType, unsigned int loadDllOnly)
 993 {
 994 void * __ecereTemp1;
 995 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpenBuffered(fileName, 1);
 996 unsigned int globalInstance = 0x0;
 997
 998 if(f)
 999 {
1000 unsigned int ecereCOMModule = 0x0;
1001 char moduleName[797];
1002
1003 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, moduleName);
1004 if(!((strcasecmp)(moduleName, "instance.sym") && (strcasecmp)(moduleName, "BinaryTree.sym") && (strcasecmp)(moduleName, "dataTypes.sym") && (strcasecmp)(moduleName, "OldList.sym") && (strcasecmp)(moduleName, "String.sym") && (strcasecmp)(moduleName, "BTNode.sym") && (strcasecmp)(moduleName, "Array.sym") && (strcasecmp)(moduleName, "AVLTree.sym") && (strcasecmp)(moduleName, "BuiltInContainer.sym") && (strcasecmp)(moduleName, "Container.sym") && (strcasecmp)(moduleName, "CustomAVLTree.sym") && (strcasecmp)(moduleName, "LinkList.sym") && (strcasecmp)(moduleName, "List.sym") && (strcasecmp)(moduleName, "Map.sym") && (strcasecmp)(moduleName, "Mutex.sym")))
1005 ecereCOMModule = 0x1;
1006 for(; ; )
1007 {
1008 char line[1024];
1009
1010 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1011 break;
1012 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1013 if(line[0] == '[')
1014 {
1015 if(!strcmp(line, "[Global Instance]"))
1016 globalInstance = 0x1;
1017 else if(!strcmp(line, "[Defined Classes]"))
1018 {
1019 struct __ecereNameSpace__ecere__com__Class * regClass = (((void *)0));
1020 char name[1024];
1021 unsigned int isRemote = 0x0;
1022 unsigned int isStatic = 0x0;
1023 unsigned int isWatchable = 0x0;
1024 int classType = 0;
1025 unsigned int fixed = 0x0;
1026 unsigned int noExpansion = 0x0;
1027 int inheritanceAccess = 1;
1028
1029 for(; ; )
1030 {
1031 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1032 break;
1033 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1034 if(!strcmp(line, "."))
1035 break;
1036 if(line[0] == '[')
1037 {
1038 if(!strcmp(line, "[Remote]"))
1039 isRemote = 0x1;
1040 else if(!strcmp(line, "[Static]"))
1041 isStatic = 0x1;
1042 else if(!strcmp(line, "[Fixed]"))
1043 fixed = 0x1;
1044 else if(!strcmp(line, "[No Expansion]"))
1045 noExpansion = 0x1;
1046 else if(!strcmp(line, "[Watchable]"))
1047 isWatchable = 0x1;
1048 else if(!strcmp(line, "[Enum]"))
1049 classType = 4;
1050 else if(!strcmp(line, "[Bit]"))
1051 classType = 2;
1052 else if(!strcmp(line, "[Struct]"))
1053 classType = 1;
1054 else if(!strcmp(line, "[Unit]"))
1055 classType = 3;
1056 else if(!strcmp(line, "[NoHead]"))
1057 classType = 5;
1058 else if(!strcmp(line, "[Base]") || !strcmp(line, "[Private Base]"))
1059 {
1060 if(!strcmp(line, "[Private Base]"))
1061 inheritanceAccess = 2;
1062 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1063 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1064 if(importType == 3)
1065 DeclClass(0, name);
1066 if(isStatic || loadDllOnly || importType == 3 || importType == 4)
1067 regClass = (((void *)0));
1068 else if(regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, name), !regClass || regClass->internalDecl || regClass->isRemote)
1069 {
1070 struct Symbol * existingClass = FindClass(name);
1071 char * baseName = (classType == 0 && importType == 2 && isRemote) ? "DCOMClientObject" : (!strcmp(line, "[None]") ? (((void *)0)) : line);
1072
1073 if(!isRemote || (importType != 2) || (!sourceFile || !strstr(sourceFile, ".main.ec")))
1074 {
1075 if(!regClass || regClass->internalDecl)
1076 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, name, isRemote ? (((void *)0)) : baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1077 if(regClass && isRemote)
1078 regClass->isRemote = (importType == 2) ? (unsigned int)1 : (unsigned int)2;
1079 if(isRemote)
1080 {
1081 if(importType == 2)
1082 {
1083 char className[1024] = "DCOMClient_";
1084
1085 strcat(className, name);
1086 if(!existingClass)
1087 existingClass = DeclClass(0, name);
1088 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, className, baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1089 }
1090 if(regClass)
1091 regClass->isRemote = (importType == 2) ? (unsigned int)1 : (unsigned int)3;
1092 }
1093 if(existingClass)
1094 {
1095 struct __ecereNameSpace__ecere__sys__OldLink * link;
1096
1097 for(link = existingClass->templatedClasses.first; link; link = link->next)
1098 {
1099 struct Symbol * symbol = link->data;
1100
1101 symbol->registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1102 }
1103 }
1104 if(fixed)
1105 regClass->fixed = 0x1;
1106 if(noExpansion)
1107 regClass->noExpansion = 0x1;
1108 if(isWatchable)
1109 {
1110 __ecereNameSpace__ecere__com__eClass_DestructionWatchable(regClass);
1111 regClass->structSize = regClass->offset;
1112 }
1113 if(regClass && existingClass)
1114 {
1115 existingClass->registered = regClass;
1116 regClass->symbol = existingClass;
1117 existingClass->id = (((int)0x7fffffff));
1118 existingClass->idCode = (((int)0x7fffffff));
1119 existingClass->imported = 0x1;
1120 if(regClass->module)
1121 existingClass->module = FindModule(regClass->module);
1122 else
1123 existingClass->module = mainModule;
1124 }
1125 }
1126 else
1127 regClass = (((void *)0));
1128 }
1129 else
1130 regClass = (((void *)0));
1131 isRemote = 0x0;
1132 isWatchable = 0x0;
1133 fixed = 0x0;
1134 isStatic = 0x0;
1135 }
1136 else if(!strcmp(line, "[Enum Values]"))
1137 {
1138 for(; ; )
1139 {
1140 char * equal;
1141
1142 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1143 break;
1144 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1145 if(!strcmp(line, "."))
1146 break;
1147 if(regClass)
1148 {
1149 equal = strchr(line, '=');
1150 if(equal)
1151 {
1152 char name[1024];
1153
1154 memcpy(name, line, (int)(equal - line));
1155 name[equal - line] = '\0';
1156 __ecereNameSpace__ecere__sys__TrimLSpaces(name, name);
1157 __ecereNameSpace__ecere__sys__TrimRSpaces(name, name);
1158 __ecereNameSpace__ecere__com__eEnum_AddFixedValue(regClass, name, atoi(equal + 1));
1159 }
1160 else
1161 {
1162 __ecereNameSpace__ecere__com__eEnum_AddValue(regClass, line);
1163 }
1164 }
1165 }
1166 }
1167 else if(!strcmp(line, "[Defined Methods]"))
1168 {
1169 char name[1024];
1170 unsigned int isVirtual = 0x0;
1171 int memberAccess = 1;
1172
1173 for(; ; )
1174 {
1175 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1176 break;
1177 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1178 if(!strcmp(line, "."))
1179 break;
1180 if(line[0] == '[')
1181 {
1182 if(!strcmp(line, "[Type]"))
1183 {
1184 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1185 if(regClass)
1186 {
1187 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1188 if(isVirtual)
1189 __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1190 else
1191 __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1192 }
1193 }
1194 else if(!strcmp(line, "[Virtual]"))
1195 isVirtual = 0x1;
1196 else if(!strcmp(line, "[Public]"))
1197 memberAccess = 1;
1198 else if(!strcmp(line, "[Private]"))
1199 memberAccess = 2;
1200 }
1201 else
1202 {
1203 strcpy(name, line);
1204 isVirtual = 0x0;
1205 memberAccess = 1;
1206 }
1207 }
1208 }
1209 else if(!strcmp(line, "[Defined Properties]"))
1210 {
1211 char name[1024];
1212 unsigned int setStmt = 0x0, getStmt = 0x0, isVirtual = 0x0, conversion = 0x0;
1213 unsigned int isWatchable = 0x0;
1214 int memberAccess = 1;
1215
1216 for(; ; )
1217 {
1218 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1219 break;
1220 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1221 if(!strcmp(line, "."))
1222 break;
1223 if(line[0] == '[')
1224 {
1225 if(!strcmp(line, "[Type]"))
1226 {
1227 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1228 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1229 if(regClass)
1230 {
1231 struct __ecereNameSpace__ecere__com__Property * prop = __ecereNameSpace__ecere__com__eClass_AddProperty(regClass, conversion ? (((void *)0)) : name, line[0] ? line : 0, (void *)(unsigned int)setStmt, (void *)(unsigned int)getStmt, memberAccess);
1232
1233 if(prop)
1234 {
1235 prop->compiled = 0x0;
1236 if(isWatchable)
1237 {
1238 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1239 regClass->structSize = regClass->offset;
1240 }
1241 }
1242 }
1243 }
1244 else if(!strcmp(line, "[Set]"))
1245 setStmt = 0x1;
1246 else if(!strcmp(line, "[Get]"))
1247 getStmt = 0x1;
1248 else if(!strcmp(line, "[Watchable]"))
1249 isWatchable = 0x1;
1250 else if(!strcmp(line, "[Public]"))
1251 memberAccess = 1;
1252 else if(!strcmp(line, "[Private]"))
1253 memberAccess = 2;
1254 else if(!strcmp(line, "[Conversion]"))
1255 {
1256 conversion = 0x1;
1257 setStmt = getStmt = isVirtual = isWatchable = 0x0;
1258 }
1259 }
1260 else
1261 {
1262 strcpy(name, line);
1263 setStmt = getStmt = isVirtual = conversion = isWatchable = 0x0;
1264 memberAccess = 1;
1265 }
1266 }
1267 }
1268 else if(!strcmp(line, "[Defined Class Properties]"))
1269 {
1270 char name[1024];
1271 unsigned int setStmt = 0x0, getStmt = 0x0;
1272
1273 for(; ; )
1274 {
1275 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1276 break;
1277 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1278 if(!strcmp(line, "."))
1279 break;
1280 if(line[0] == '[')
1281 {
1282 if(!strcmp(line, "[Type]"))
1283 {
1284 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1285 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1286 if(regClass)
1287 {
1288 __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, name, line, (void *)(unsigned int)setStmt, (void *)(unsigned int)getStmt);
1289 }
1290 }
1291 else if(!strcmp(line, "[Set]"))
1292 setStmt = 0x1;
1293 else if(!strcmp(line, "[Get]"))
1294 getStmt = 0x1;
1295 }
1296 else
1297 {
1298 strcpy(name, line);
1299 setStmt = getStmt = 0x0;
1300 }
1301 }
1302 }
1303 else if(!strcmp(line, "[Defined Data Members]"))
1304 {
1305 ReadDataMembers(regClass, (((void *)0)), f);
1306 }
1307 else if(!strcmp(line, "[Template Parameters]"))
1308 {
1309 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(f))
1310 {
1311 char name[1024];
1312 int type = 0;
1313 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1314 {
1315 0, 0, 0, 0, 0
1316 };
1317 void * info = (((void *)0));
1318
1319 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1320 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1321 if(line[0] == '.')
1322 break;
1323 strcpy(name, line);
1324 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1325 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1326 if(!strcmp(line, "[Expression]"))
1327 type = 2;
1328 else if(!strcmp(line, "[Identifier]"))
1329 type = 1;
1330 switch(type)
1331 {
1332 case 0:
1333 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1334 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1335 if(regClass && strcmp(line, "[None]"))
1336 {
1337 info = __ecereNameSpace__ecere__sys__CopyString(line);
1338 }
1339 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1340 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1341 if(regClass && strcmp(line, "[None]"))
1342 {
1343 defaultArg.dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line);
1344 }
1345 break;
1346 case 2:
1347 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1348 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1349 if(regClass && strcmp(line, "[None]"))
1350 {
1351 info = __ecereNameSpace__ecere__sys__CopyString(line);
1352 }
1353 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1354 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1355 if(regClass && strcmp(line, "[None]"))
1356 {
1357 struct Operand op;
1358 struct Expression * exp;
1359 struct Location oldLocation = yylloc;
1360 struct __ecereNameSpace__ecere__com__Instance * backFileInput = fileInput;
1361
1362 declMode = (int)0;
1363 resetScanner();
1364 exp = ParseExpressionString(line);
1365 if(info)
1366 exp->destType = ProcessTypeString(info, 0x0);
1367 ProcessExpressionType(exp);
1368 ComputeExpression(exp);
1369 op = GetOperand(exp);
1370 defaultArg.expression.ui64 = op.ui64;
1371 FreeExpression(exp);
1372 resetScanner();
1373 yylloc = oldLocation;
1374 fileInput = backFileInput;
1375 if(fileInput)
1376 {
1377 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(fileInput, yylloc.start.pos, 0);
1378 resetScannerPos(&yylloc.start);
1379 yychar = -2;
1380 }
1381 }
1382 break;
1383 case 1:
1384 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1385 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1386 if(!strcmp(line, "[Data member]"))
1387 info = (void *)0;
1388 else if(!strcmp(line, "[Method]"))
1389 info = (void *)1;
1390 else if(!strcmp(line, "[Property]"))
1391 info = (void *)2;
1392 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1393 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1394 if(regClass && strcmp(line, "[None]"))
1395 {
1396 defaultArg.memberString = __ecereNameSpace__ecere__sys__CopyString(line);
1397 }
1398 break;
1399 }
1400 if(regClass)
1401 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, name, type, info, &defaultArg);
1402 if(type == 0 || type == 2)
1403 (__ecereNameSpace__ecere__com__eSystem_Delete(info), info = 0);
1404 if(type == 0 || type == 1)
1405 (__ecereNameSpace__ecere__com__eSystem_Delete(defaultArg.dataTypeString), defaultArg.dataTypeString = 0);
1406 }
1407 if(regClass)
1408 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1409 }
1410 }
1411 else
1412 {
1413 inheritanceAccess = 1;
1414 classType = 0;
1415 isRemote = 0x0;
1416 strcpy(name, line);
1417 regClass = (((void *)0));
1418 }
1419 }
1420 }
1421 else if(!strcmp(line, "[Defined Expressions]"))
1422 {
1423 char name[1024];
1424
1425 for(; ; )
1426 {
1427 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1428 break;
1429 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1430 if(!strcmp(line, "."))
1431 break;
1432 if(!strcmp(line, "[Value]"))
1433 {
1434 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1435 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1436 if(!loadDllOnly && importType != 3 && importType != 4)
1437 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(name, line, privateModule, ecereCOMModule ? 4 : 1);
1438 }
1439 else if(line[0] != '[')
1440 {
1441 strcpy(name, line);
1442 }
1443 }
1444 }
1445 else if(!strcmp(line, "[Defined Functions]"))
1446 {
1447 char name[1024];
1448
1449 for(; ; )
1450 {
1451 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1452 break;
1453 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1454 if(!strcmp(line, "."))
1455 break;
1456 if(!strcmp(line, "[Type]"))
1457 {
1458 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1459 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1460 if(!loadDllOnly && importType != 3 && importType != 4)
1461 __ecereNameSpace__ecere__com__eSystem_RegisterFunction(name, line, (((void *)0)), privateModule, ecereCOMModule ? 4 : 1);
1462 }
1463 else if(line[0] != '[')
1464 {
1465 strcpy(name, line);
1466 }
1467 }
1468 }
1469 else if(!strcmp(line, "[Defined Data]"))
1470 {
1471 char name[1024];
1472
1473 for(; ; )
1474 {
1475 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1476 break;
1477 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1478 if(!strcmp(line, "."))
1479 break;
1480 if(!strcmp(line, "[Type]"))
1481 {
1482 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1483 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1484 if(!loadDllOnly && importType != 3 && importType != 4)
1485 {
1486 int start = 0, c;
1487 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace = globalData;
1488 struct GlobalData * data;
1489
1490 for(c = 0; name[c]; c++)
1491 {
1492 if(name[c] == '.' || (name[c] == ':' && name[c + 1] == ':'))
1493 {
1494 struct __ecereNameSpace__ecere__com__NameSpace * newSpace;
1495 char * spaceName = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (c - start + 1));
1496
1497 strncpy(spaceName, name + start, c - start);
1498 spaceName[c - start] = '\0';
1499 newSpace = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).nameSpaces, spaceName);
1500 if(!newSpace)
1501 {
1502 newSpace = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__com__NameSpace) * (1));
1503 (*newSpace).classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1504 (*newSpace).defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1505 (*newSpace).functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1506 (*newSpace).nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1507 (*newSpace).name = spaceName;
1508 (*newSpace).parent = nameSpace;
1509 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)newSpace);
1510 }
1511 else
1512 (__ecereNameSpace__ecere__com__eSystem_Delete(spaceName), spaceName = 0);
1513 nameSpace = newSpace;
1514 if(name[c] == ':')
1515 c++;
1516 start = c + 1;
1517 }
1518 }
1519 if(c - start)
1520 {
1521 data = (struct GlobalData *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).functions, name + start);
1522 if(!data)
1523 {
1524 data = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData), ((struct GlobalData *)__ecereTemp1)->fullName = __ecereNameSpace__ecere__sys__CopyString(name), ((struct GlobalData *)__ecereTemp1)->dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line), ((struct GlobalData *)__ecereTemp1)->module = privateModule, ((struct GlobalData *)__ecereTemp1));
1525 data->key = (uintptr_t)(data->fullName + start);
1526 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1527 }
1528 else if(strcmp(data->dataTypeString, line))
1529 {
1530 struct DataRedefinition * redefinition = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DataRedefinition);
1531
1532 strcpy(redefinition->name, name);
1533 strcpy(redefinition->type1, data->dataTypeString);
1534 strcpy(redefinition->type2, line);
1535 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&dataRedefinitions, redefinition);
1536 }
1537 }
1538 }
1539 }
1540 else if(line[0] != '[')
1541 {
1542 strcpy(name, line);
1543 }
1544 }
1545 }
1546 else if(!strcmp(line, "[Imported Modules]"))
1547 {
1548 int moduleImportType = 0;
1549 int importAccess = 1;
1550
1551 for(; ; )
1552 {
1553 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1554 break;
1555 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1556 if(!strcmp(line, "."))
1557 break;
1558 if(!strcmp(line, "[Static]"))
1559 moduleImportType = 1;
1560 else if(!strcmp(line, "[Remote]"))
1561 moduleImportType = 2;
1562 else if(!strcmp(line, "[Private]"))
1563 importAccess = 2;
1564 else if(line[0] != '[')
1565 {
1566 if(importType != 3 && importType != 4)
1567 ImportModule(line, moduleImportType, importAccess, loadDllOnly);
1568 else
1569 ImportModule(line, 4, importAccess, loadDllOnly);
1570 if(!strcmp(line, "ecere"))
1571 ecereImported = 0x1;
1572 moduleImportType = 0;
1573 importAccess = 1;
1574 }
1575 }
1576 }
1577 }
1578 }
1579 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1580 }
1581 else if(importType != 4)
1582 {
1583 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Couldn't open %s\n", (((void *)0))), fileName);
1584 }
1585 return globalInstance;
1586 }
1587
1588 struct __ecereNameSpace__ecere__com__Instance * loadedModules;
1589
1590 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
1591
1592 extern struct __ecereNameSpace__ecere__sys__OldList *  defines;
1593
1594 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
1595
1596 struct ImportedModule
1597 {
1598 struct ImportedModule * prev;
1599 struct ImportedModule * next;
1600 char *  name;
1601 int type;
1602 int importType;
1603 unsigned int globalInstance;
1604 unsigned int dllOnly;
1605 int importAccess;
1606 } __attribute__ ((gcc_struct));
1607
1608 extern size_t strlen(const char * );
1609
1610 extern char *  __ecereNameSpace__ecere__sys__GetExtension(char *  string, char *  output);
1611
1612 extern char *  symbolsDir;
1613
1614 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, char *  addedPath);
1615
1616 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(char *  string, char *  ext, char *  output);
1617
1618 extern unsigned int __ecereNameSpace__ecere__sys__FileExists(char *  fileName);
1619
1620 extern unsigned int inCompiler;
1621
1622 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__IteratorPointer;
1623
1624 struct __ecereNameSpace__ecere__com__IteratorPointer;
1625
1626 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__MapIterator;
1627
1628 struct __ecereNameSpace__ecere__com__MapIterator
1629 {
1630 struct __ecereNameSpace__ecere__com__Instance * container;
1631 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
1632 } __attribute__ ((gcc_struct));
1633
1634 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com__eModule_LoadStrict(struct __ecereNameSpace__ecere__com__Instance * fromModule, char *  name, int importAccess);
1635
1636 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1637
1638 struct __ecereNameSpace__ecere__com__Module
1639 {
1640 struct __ecereNameSpace__ecere__com__Instance * application;
1641 struct __ecereNameSpace__ecere__sys__OldList classes;
1642 struct __ecereNameSpace__ecere__sys__OldList defines;
1643 struct __ecereNameSpace__ecere__sys__OldList functions;
1644 struct __ecereNameSpace__ecere__sys__OldList modules;
1645 struct __ecereNameSpace__ecere__com__Instance * prev;
1646 struct __ecereNameSpace__ecere__com__Instance * next;
1647 char *  name;
1648 void *  library;
1649 void *  Unload;
1650 int importType;
1651 int origImportType;
1652 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1653 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1654 } __attribute__ ((gcc_struct));
1655
1656 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Iterator;
1657
1658 struct __ecereNameSpace__ecere__com__Iterator
1659 {
1660 struct __ecereNameSpace__ecere__com__Instance * container;
1661 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
1662 } __attribute__ ((gcc_struct));
1663
1664 extern int sprintf(char * , char * , ...);
1665
1666 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
1667
1668 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_;
1669
1670 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1671
1672 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
1673
1674 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
1675
1676 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__MapIterator_map;
1677
1678 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 index, unsigned int create);
1679
1680 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
1681
1682 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
1683
1684 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
1685
1686 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Iterator_data;
1687
1688 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
1689
1690 void ImportModule(char * name, int importType, int importAccess, unsigned int loadDllOnly)
1691 {
1692 void * __ecereTemp1;
1693 struct ImportedModule * module = (((void *)0));
1694 char moduleName[274];
1695
1696 strncpy(moduleName, name, (274) - 1);
1697 moduleName[(274) - 1] = (char)0;
1698 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1699 for(module = (*defines).first; module; module = module->next)
1700 {
1701 if(module->type == 0 && !(strcasecmp)(module->name, moduleName))
1702 break;
1703 }
1704 if((!module || (module->dllOnly && !loadDllOnly)) && strlen(name) < (274))
1705 {
1706 char ext[17];
1707 struct __ecereNameSpace__ecere__com__Instance * loadedModule = (((void *)0));
1708 char symFile[797];
1709
1710 symFile[0] = '\0';
1711 __ecereNameSpace__ecere__sys__GetExtension(name, ext);
1712 strcpy(symFile, symbolsDir ? symbolsDir : "");
1713 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1714 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1715 if(!strcmp(ext, "dll") || !strcmp(ext, "dll") || !ext[0])
1716 {
1717 if(importType != 4)
1718 {
1719 if(!module)
1720 {
1721 if(precompDefines)
1722 {
1723 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1)->importType = importType, ((struct ImportedModule *)__ecereTemp1)->importAccess = importAccess, ((struct ImportedModule *)__ecereTemp1));
1724 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1725 }
1726 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1)->importType = importType, ((struct ImportedModule *)__ecereTemp1)->importAccess = importAccess, ((struct ImportedModule *)__ecereTemp1));
1727 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1728 }
1729 module->dllOnly = loadDllOnly;
1730 if(ext[0] || !__ecereNameSpace__ecere__sys__FileExists(symFile))
1731 {
1732 unsigned int skipLoad = 0x0;
1733 struct __ecereNameSpace__ecere__com__Instance * list = (((void *)0));
1734 char file[274];
1735
1736 strcpy(file, name);
1737 __ecereNameSpace__ecere__sys__StripExtension(file);
1738 if(!inCompiler)
1739 {
1740 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, loadedModules), it);
1741
1742 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&it, (uint64)(file), 0x0))
1743 {
1744 struct __ecereNameSpace__ecere__com__Instance * firstModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(__thisModule, file, importAccess);
1745
1746 if(firstModule)
1747 {
1748 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_);
1749 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))list->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(firstModule));
1750 __extension__ ({
1751 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1752 {
1753 loadedModules, 0
1754 };
1755
1756 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, (uint64)(((uint64)(file))), 0x1);
1757 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, list);
1758 });
1759 }
1760 else
1761 skipLoad = 0x1;
1762 }
1763 else
1764 list = ((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&it));
1765 }
1766 if(!skipLoad)
1767 {
1768 loadedModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, file, importAccess);
1769 if(loadedModule)
1770 {
1771 ((struct __ecereNameSpace__ecere__com__Module *)(((char *)loadedModule + structSize_Instance)))->importType = importType;
1772 module->dllOnly = 0x0;
1773 if(list)
1774 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))list->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(loadedModule));
1775 }
1776 }
1777 }
1778 }
1779 }
1780 if(!loadedModule && (!strcmp(ext, "ec") || !strcmp(ext, "sym") || !ext[0]))
1781 {
1782 {
1783 if(!module)
1784 {
1785 if(precompDefines)
1786 {
1787 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1)->importType = importType, ((struct ImportedModule *)__ecereTemp1)->importAccess = importAccess, ((struct ImportedModule *)__ecereTemp1));
1788 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1789 }
1790 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1)->importType = importType, ((struct ImportedModule *)__ecereTemp1)->importAccess = importAccess, ((struct ImportedModule *)__ecereTemp1));
1791 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1792 }
1793 module->dllOnly = loadDllOnly;
1794 if(inPreCompiler)
1795 return ;
1796 if(inIDE && !__ecereNameSpace__ecere__sys__FileExists(symFile) && sourceDirs)
1797 {
1798 {
1799 struct __ecereNameSpace__ecere__com__Iterator dir =
1800 {
1801 (sourceDirs), 0
1802 };
1803
1804 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&dir))
1805 {
1806 char configDir[274];
1807
1808 strcpy(symFile, __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&dir));
1809 __ecereNameSpace__ecere__sys__PathCat(symFile, "obj");
1810 sprintf(configDir, "debug.%s", (__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "win32" : "linux");
1811 __ecereNameSpace__ecere__sys__PathCat(symFile, configDir);
1812 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1813 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1814 if(__ecereNameSpace__ecere__sys__FileExists(symFile))
1815 break;
1816 }
1817 }
1818 }
1819 if(!__ecereNameSpace__ecere__sys__FileExists(symFile))
1820 {
1821 char fileName[274];
1822
1823 __ecereNameSpace__ecere__sys__GetLastDirectory(symFile, fileName);
1824 strcpy(symFile, symbolsDir ? symbolsDir : "");
1825 __ecereNameSpace__ecere__sys__PathCat(symFile, fileName);
1826 }
1827 module->globalInstance = LoadSymbols(symFile, importType, loadDllOnly);
1828 }
1829 }
1830 }
1831 }
1832
1833 int FindIncludeFileID(char * includeFile)
1834 {
1835 int c;
1836
1837 for(c = 0; c < numIncludes; c++)
1838 if(!((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? (strcasecmp) : strcmp)(includes[c], includeFile))
1839 return c + 1;
1840 return 0;
1841 }
1842
1843 int GetIncludeFileID(char * includeFile)
1844 {
1845 int found = FindIncludeFileID(includeFile);
1846
1847 if(found)
1848 return found;
1849 includes = __ecereNameSpace__ecere__com__eSystem_Renew(includes, sizeof(char *) * (numIncludes + 1));
1850 includes[numIncludes++] = __ecereNameSpace__ecere__sys__CopyString(includeFile);
1851 return numIncludes;
1852 }
1853
1854 char * GetIncludeFileFromID(int id)
1855 {
1856 return includes[id - 1];
1857 }
1858
1859 extern char *  __ecereNameSpace__ecere__sys__StripLastDirectory(char *  string, char *  output);
1860
1861 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(char *  fileName, int mode);
1862
1863 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__NamedItem;
1864
1865 struct __ecereNameSpace__ecere__sys__NamedItem
1866 {
1867 struct __ecereNameSpace__ecere__sys__NamedItem * prev;
1868 struct __ecereNameSpace__ecere__sys__NamedItem * next;
1869 char *  name;
1870 } __attribute__ ((gcc_struct));
1871
1872 struct __ecereNameSpace__ecere__com__Instance * OpenIncludeFile(char * includeFile)
1873 {
1874 struct __ecereNameSpace__ecere__com__Instance * file;
1875 char location[274];
1876
1877 __ecereNameSpace__ecere__sys__StripLastDirectory(sourceFileStack[(include_stack_ptr >= 0) ? include_stack_ptr : 0], location);
1878 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
1879 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
1880 if(file)
1881 {
1882 strcpy(sourceFileStack[include_stack_ptr + 1], location);
1883 }
1884 else if(inIDE)
1885 {
1886 struct __ecereNameSpace__ecere__sys__NamedItem * includeDir;
1887
1888 if(includeDirs)
1889 {
1890 for(includeDir = (*includeDirs).first; includeDir; includeDir = includeDir->next)
1891 {
1892 strcpy(location, includeDir->name);
1893 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
1894 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
1895 if(file)
1896 break;
1897 }
1898 }
1899 if(sysIncludeDirs)
1900 {
1901 for(includeDir = (*sysIncludeDirs).first; includeDir; includeDir = includeDir->next)
1902 {
1903 strcpy(location, includeDir->name);
1904 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
1905 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
1906 if(file)
1907 break;
1908 }
1909 }
1910 }
1911 return file;
1912 }
1913
1914 void FreeIncludeFiles()
1915 {
1916 int c;
1917
1918 for(c = 0; c < numIncludes; c++)
1919 (__ecereNameSpace__ecere__com__eSystem_Delete(includes[c]), includes[c] = 0);
1920 (__ecereNameSpace__ecere__com__eSystem_Delete(includes), includes = 0);
1921 numIncludes = 0;
1922 }
1923
1924 extern void FreeSymbol(struct Symbol * symbol);
1925
1926 extern void FreeType(struct Type * type);
1927
1928 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1929
1930 void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList)
1931 {
1932 struct __ecereNameSpace__ecere__com__NameSpace * ns;
1933 struct GlobalData * data;
1934
1935 for(; (ns = (struct __ecereNameSpace__ecere__com__NameSpace *)globalDataList->nameSpaces.root); )
1936 {
1937 FreeGlobalData(ns);
1938 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)ns);
1939 (__ecereNameSpace__ecere__com__eSystem_Delete((*ns).name), (*ns).name = 0);
1940 (__ecereNameSpace__ecere__com__eSystem_Delete(ns), ns = 0);
1941 }
1942 for(; (data = (struct GlobalData *)globalDataList->functions.root); )
1943 {
1944 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->functions, data);
1945 if(data->symbol)
1946 FreeSymbol(data->symbol);
1947 FreeType(data->dataType);
1948 (__ecereNameSpace__ecere__com__eSystem_Delete(data->fullName), data->fullName = 0);
1949 (__ecereNameSpace__ecere__com__eSystem_Delete(data->dataTypeString), data->dataTypeString = 0);
1950 ((data ? (__ecereClass_GlobalData->Destructor ? __ecereClass_GlobalData->Destructor(data) : 0, __ecereClass___ecereNameSpace__ecere__sys__BTNode->Destructor ? __ecereClass___ecereNameSpace__ecere__sys__BTNode->Destructor(data) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(data)) : 0), data = 0);
1951 }
1952 }
1953
1954 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
1955
1956 extern void Compiler_Warning(char *  format, ...);
1957
1958 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
1959
1960 void CheckDataRedefinitions()
1961 {
1962 struct DataRedefinition * redefinition;
1963
1964 for(redefinition = dataRedefinitions.first; redefinition; redefinition = redefinition->next)
1965 {
1966 struct Type * type1 = ProcessTypeString(redefinition->type1, 0x0);
1967 struct Type * type2 = ProcessTypeString(redefinition->type2, 0x0);
1968 char type1String[1024] = "";
1969 char type2String[1024] = "";
1970
1971 PrintType(type1, type1String, 0x0, 0x1);
1972 PrintType(type2, type2String, 0x0, 0x1);
1973 if(strcmp(type1String, type2String))
1974 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Redefinition of %s (defining as %s, already defined as %s)\n", (((void *)0))), redefinition->name, type1String, type2String);
1975 FreeType(type1);
1976 FreeType(type2);
1977 }
1978 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&dataRedefinitions, (((void *)0)));
1979 }
1980
1981 void __ecereRegisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
1982 {
1983 struct __ecereNameSpace__ecere__com__Class * class;
1984
1985 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetGlobalData", "void SetGlobalData(ecere::com::NameSpace * nameSpace)", SetGlobalData, module, 1);
1986 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInIDE", "void SetInIDE(bool b)", SetInIDE, module, 1);
1987 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSourceDirs", "void SetSourceDirs(ecere::com::List<String> list)", SetSourceDirs, module, 1);
1988 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetIncludeDirs", "void SetIncludeDirs(ecere::sys::OldList * list)", SetIncludeDirs, module, 1);
1989 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSysIncludeDirs", "void SetSysIncludeDirs(ecere::sys::OldList * list)", SetSysIncludeDirs, module, 1);
1990 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetEcereImported", "void SetEcereImported(bool b)", SetEcereImported, module, 1);
1991 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetEcereImported", "bool GetEcereImported(void)", GetEcereImported, module, 1);
1992 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInPreCompiler", "void SetInPreCompiler(bool b)", SetInPreCompiler, module, 1);
1993 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetPrecompDefines", "void SetPrecompDefines(ecere::sys::OldList * list)", SetPrecompDefines, module, 1);
1994 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DummyMethod", "bool DummyMethod(void)", DummyMethod, module, 1);
1995 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("LoadSymbols", "bool LoadSymbols(char * fileName, ecere::com::ImportType importType, bool loadDllOnly)", LoadSymbols, module, 1);
1996 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ImportModule", "void ImportModule(char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess, bool loadDllOnly)", ImportModule, module, 1);
1997 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindIncludeFileID", "int FindIncludeFileID(char * includeFile)", FindIncludeFileID, module, 2);
1998 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileID", "int GetIncludeFileID(char * includeFile)", GetIncludeFileID, module, 2);
1999 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileFromID", "char * GetIncludeFileFromID(int id)", GetIncludeFileFromID, module, 2);
2000 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OpenIncludeFile", "ecere::sys::File OpenIncludeFile(char * includeFile)", OpenIncludeFile, module, 2);
2001 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIncludeFiles", "void FreeIncludeFiles(void)", FreeIncludeFiles, module, 1);
2002 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeGlobalData", "void FreeGlobalData(ecere::com::NameSpace globalDataList)", FreeGlobalData, module, 1);
2003 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckDataRedefinitions", "void CheckDataRedefinitions(void)", CheckDataRedefinitions, module, 1);
2004 }
2005
2006 void __ecereUnregisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2007 {
2008
2009 }
2010
2011 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___;
2012
2013 void __ecereCreateModuleInstances_loadSymbols()
2014 {
2015 loadedModules = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___);
2016 __ecereNameSpace__ecere__com__eInstance_IncRef(loadedModules);
2017 }
2018
2019 void __ecereDestroyModuleInstances_loadSymbols()
2020 {
2021 (__ecereNameSpace__ecere__com__eInstance_DecRef(loadedModules), loadedModules = 0);
2022 }
2023