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 unsigned int isInstanceClass;
 483 } __attribute__ ((gcc_struct));
 484
 485 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name);
 486
 487 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 488
 489 struct __ecereNameSpace__ecere__com__Instance
 490 {
 491 int (* *  _vTbl)();
 492 struct __ecereNameSpace__ecere__com__Class * _class;
 493 int _refCount;
 494 } __attribute__ ((gcc_struct));
 495
 496 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 497
 498 struct __ecereNameSpace__ecere__com__DataMember
 499 {
 500 struct __ecereNameSpace__ecere__com__DataMember * prev;
 501 struct __ecereNameSpace__ecere__com__DataMember * next;
 502 char *  name;
 503 unsigned int isProperty;
 504 int memberAccess;
 505 int id;
 506 struct __ecereNameSpace__ecere__com__Class * _class;
 507 char *  dataTypeString;
 508 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 509 struct Type * dataType;
 510 int type;
 511 int offset;
 512 int memberID;
 513 struct __ecereNameSpace__ecere__sys__OldList members;
 514 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 515 int memberOffset;
 516 int structAlignment;
 517 } __attribute__ ((gcc_struct));
 518
 519 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 520
 521 struct __ecereNameSpace__ecere__com__SerialBuffer
 522 {
 523 unsigned char *  _buffer;
 524 unsigned int count;
 525 unsigned int _size;
 526 unsigned int pos;
 527 } __attribute__ ((gcc_struct));
 528
 529 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 530
 531 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 532 {
 533 union
 534 {
 535 struct
 536 {
 537 char *  dataTypeString;
 538 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 539 } __attribute__ ((gcc_struct));
 540 struct __ecereNameSpace__ecere__com__DataValue expression;
 541 struct
 542 {
 543 char *  memberString;
 544 union
 545 {
 546 struct __ecereNameSpace__ecere__com__DataMember * member;
 547 struct __ecereNameSpace__ecere__com__Property * prop;
 548 struct __ecereNameSpace__ecere__com__Method * method;
 549 } __attribute__ ((gcc_struct));
 550 } __attribute__ ((gcc_struct));
 551 } __attribute__ ((gcc_struct));
 552 } __attribute__ ((gcc_struct));
 553
 554 extern int yychar;
 555
 556 struct __ecereNameSpace__ecere__com__NameSpace * globalData;
 557
 558 void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace)
 559 {
 560 globalData = nameSpace;
 561 }
 562
 563 struct __ecereNameSpace__ecere__sys__OldList dataRedefinitions;
 564
 565 extern char sourceFileStack[30][797];
 566
 567 extern int include_stack_ptr;
 568
 569 static int numIncludes;
 570
 571 static char ** includes;
 572
 573 unsigned int inIDE = 0x0;
 574
 575 void SetInIDE(unsigned int b)
 576 {
 577 inIDE = b;
 578 }
 579
 580 struct __ecereNameSpace__ecere__com__Instance * sourceDirs;
 581
 582 void SetSourceDirs(struct __ecereNameSpace__ecere__com__Instance * list)
 583 {
 584 sourceDirs = list;
 585 }
 586
 587 struct __ecereNameSpace__ecere__sys__OldList * includeDirs, * sysIncludeDirs;
 588
 589 void SetIncludeDirs(struct __ecereNameSpace__ecere__sys__OldList * list)
 590 {
 591 includeDirs = list;
 592 }
 593
 594 void SetSysIncludeDirs(struct __ecereNameSpace__ecere__sys__OldList * list)
 595 {
 596 sysIncludeDirs = list;
 597 }
 598
 599 unsigned int ecereImported;
 600
 601 void SetEcereImported(unsigned int b)
 602 {
 603 ecereImported = b;
 604 }
 605
 606 unsigned int GetEcereImported()
 607 {
 608 return ecereImported;
 609 }
 610
 611 unsigned int inPreCompiler = 0x0;
 612
 613 void SetInPreCompiler(unsigned int b)
 614 {
 615 inPreCompiler = b;
 616 }
 617
 618 unsigned int inSymbolGen = 0x0;
 619
 620 void SetInSymbolGen(unsigned int b)
 621 {
 622 inSymbolGen = b;
 623 }
 624
 625 struct __ecereNameSpace__ecere__sys__OldList * precompDefines;
 626
 627 void SetPrecompDefines(struct __ecereNameSpace__ecere__sys__OldList * list)
 628 {
 629 precompDefines = list;
 630 }
 631
 632 unsigned int DummyMethod()
 633 {
 634 return 0x1;
 635 }
 636
 637 extern char *  __ecereNameSpace__ecere__sys__TrimLSpaces(char *  string, char *  output);
 638
 639 extern int strcmp(const char * , const char * );
 640
 641 extern int strtol(char * , char * * , int base);
 642
 643 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);
 644
 645 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__BitMember;
 646
 647 struct __ecereNameSpace__ecere__com__BitMember
 648 {
 649 struct __ecereNameSpace__ecere__com__BitMember * prev;
 650 struct __ecereNameSpace__ecere__com__BitMember * next;
 651 char *  name;
 652 unsigned int isProperty;
 653 int memberAccess;
 654 int id;
 655 struct __ecereNameSpace__ecere__com__Class * _class;
 656 char *  dataTypeString;
 657 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 658 struct Type * dataType;
 659 int type;
 660 int size;
 661 int pos;
 662 uint64 mask;
 663 } __attribute__ ((gcc_struct));
 664
 665 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);
 666
 667 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);
 668
 669 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
 670
 671 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
 672
 673 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
 674
 675 extern char *  strcpy(char * , const char * );
 676
 677 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(struct __ecereNameSpace__ecere__com__Instance * this, char *  s, int max);
 678
 679 static void ReadDataMembers(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__com__Instance * f)
 680 {
 681 char line[1024];
 682 char name[1024];
 683 int size = 0, bitPos = -1;
 684 int memberAccess = 1;
 685
 686 for(; ; )
 687 {
 688 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 689 break;
 690 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 691 if(!strcmp(line, "."))
 692 break;
 693 if(line[0] == '[')
 694 {
 695 if(!strcmp(line, "[Size]"))
 696 {
 697 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
 698 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 699 size = strtol(line, (((void *)0)), 0);
 700 }
 701 else if(!strcmp(line, "[Pos]"))
 702 {
 703 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
 704 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 705 bitPos = strtol(line, (((void *)0)), 0);
 706 }
 707 else if(!strcmp(line, "[Public]"))
 708 memberAccess = 1;
 709 else if(!strcmp(line, "[Private]"))
 710 memberAccess = 2;
 711 else if(!strcmp(line, "[Type]"))
 712 {
 713 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
 714 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 715 if(member)
 716 {
 717 if(!__ecereNameSpace__ecere__com__eMember_AddDataMember(member, name, line[0] ? line : 0, 0, 0, memberAccess))
 718 ;
 719 }
 720 else if(regClass && regClass->type == 2)
 721 {
 722 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess);
 723
 724 member->size = size;
 725 member->pos = bitPos;
 726 }
 727 else if(regClass)
 728 {
 729 if(!__ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess))
 730 ;
 731 }
 732 }
 733 else if(!strcmp(line, "[Struct]") || !strcmp(line, "[Union]"))
 734 {
 735 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (regClass || member) ? __ecereNameSpace__ecere__com__eMember_New((!strcmp(line, "[Union]")) ? 1 : 2, memberAccess) : (((void *)0));
 736
 737 ReadDataMembers((((void *)0)), dataMember, f);
 738 if(member)
 739 {
 740 if(!__ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember))
 741 ;
 742 }
 743 else if(regClass)
 744 {
 745 if(!__ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember))
 746 ;
 747 }
 748 }
 749 }
 750 else
 751 {
 752 size = 0;
 753 bitPos = -1;
 754 strcpy(name, line);
 755 memberAccess = 1;
 756 }
 757 }
 758 }
 759
 760 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpenBuffered(char *  fileName, int mode);
 761
 762 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(char *  string, char *  output);
 763
 764 extern int strcasecmp(const char * , const char * );
 765
 766 extern struct Symbol * DeclClass(int symbolID, char *  name);
 767
 768 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
 769
 770 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
 771
 772 extern struct Symbol * FindClass(char *  name);
 773
 774 extern char *  sourceFile;
 775
 776 extern char *  strstr(const char * , const char * );
 777
 778 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (*  Constructor)(void * ), void (*  Destructor)(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
 779
 780 extern char *  strcat(char * , const char * );
 781
 782 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldLink;
 783
 784 struct __ecereNameSpace__ecere__sys__OldLink
 785 {
 786 struct __ecereNameSpace__ecere__sys__OldLink * prev;
 787 struct __ecereNameSpace__ecere__sys__OldLink * next;
 788 void *  data;
 789 } __attribute__ ((gcc_struct));
 790
 791 extern void __ecereNameSpace__ecere__com__eClass_DestructionWatchable(struct __ecereNameSpace__ecere__com__Class * _class);
 792
 793 extern struct ModuleImport * FindModule(struct __ecereNameSpace__ecere__com__Instance * moduleToFind);
 794
 795 extern struct ModuleImport * mainModule;
 796
 797 extern char *  strchr(const char * , int);
 798
 799 extern void *  memcpy(void * , const void * , size_t size);
 800
 801 extern char *  __ecereNameSpace__ecere__sys__TrimRSpaces(char *  string, char *  output);
 802
 803 extern void __ecereNameSpace__ecere__com__eEnum_AddFixedValue(struct __ecereNameSpace__ecere__com__Class * _class, char *  string, int value);
 804
 805 extern int atoi(const char * );
 806
 807 extern int __ecereNameSpace__ecere__com__eEnum_AddValue(struct __ecereNameSpace__ecere__com__Class * _class, char *  string);
 808
 809 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);
 810
 811 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);
 812
 813 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);
 814
 815 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
 816
 817 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassProperty;
 818
 819 struct __ecereNameSpace__ecere__com__ClassProperty;
 820
 821 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);
 822
 823 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
 824
 825 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_OpTable;
 826
 827 struct OpTable
 828 {
 829 unsigned int (*  Add)(struct Expression *, struct Operand *, struct Operand *);
 830 unsigned int (*  Sub)(struct Expression *, struct Operand *, struct Operand *);
 831 unsigned int (*  Mul)(struct Expression *, struct Operand *, struct Operand *);
 832 unsigned int (*  Div)(struct Expression *, struct Operand *, struct Operand *);
 833 unsigned int (*  Mod)(struct Expression *, struct Operand *, struct Operand *);
 834 unsigned int (*  Neg)(struct Expression *, struct Operand *);
 835 unsigned int (*  Inc)(struct Expression *, struct Operand *);
 836 unsigned int (*  Dec)(struct Expression *, struct Operand *);
 837 unsigned int (*  Asign)(struct Expression *, struct Operand *, struct Operand *);
 838 unsigned int (*  AddAsign)(struct Expression *, struct Operand *, struct Operand *);
 839 unsigned int (*  SubAsign)(struct Expression *, struct Operand *, struct Operand *);
 840 unsigned int (*  MulAsign)(struct Expression *, struct Operand *, struct Operand *);
 841 unsigned int (*  DivAsign)(struct Expression *, struct Operand *, struct Operand *);
 842 unsigned int (*  ModAsign)(struct Expression *, struct Operand *, struct Operand *);
 843 unsigned int (*  BitAnd)(struct Expression *, struct Operand *, struct Operand *);
 844 unsigned int (*  BitOr)(struct Expression *, struct Operand *, struct Operand *);
 845 unsigned int (*  BitXor)(struct Expression *, struct Operand *, struct Operand *);
 846 unsigned int (*  LShift)(struct Expression *, struct Operand *, struct Operand *);
 847 unsigned int (*  RShift)(struct Expression *, struct Operand *, struct Operand *);
 848 unsigned int (*  BitNot)(struct Expression *, struct Operand *);
 849 unsigned int (*  AndAsign)(struct Expression *, struct Operand *, struct Operand *);
 850 unsigned int (*  OrAsign)(struct Expression *, struct Operand *, struct Operand *);
 851 unsigned int (*  XorAsign)(struct Expression *, struct Operand *, struct Operand *);
 852 unsigned int (*  LShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
 853 unsigned int (*  RShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
 854 unsigned int (*  Not)(struct Expression *, struct Operand *);
 855 unsigned int (*  Equ)(struct Expression *, struct Operand *, struct Operand *);
 856 unsigned int (*  Nqu)(struct Expression *, struct Operand *, struct Operand *);
 857 unsigned int (*  And)(struct Expression *, struct Operand *, struct Operand *);
 858 unsigned int (*  Or)(struct Expression *, struct Operand *, struct Operand *);
 859 unsigned int (*  Grt)(struct Expression *, struct Operand *, struct Operand *);
 860 unsigned int (*  Sma)(struct Expression *, struct Operand *, struct Operand *);
 861 unsigned int (*  GrtEqu)(struct Expression *, struct Operand *, struct Operand *);
 862 unsigned int (*  SmaEqu)(struct Expression *, struct Operand *, struct Operand *);
 863 unsigned int (*  Cond)(struct Expression *, struct Operand *, struct Operand *, struct Operand *);
 864 } __attribute__ ((gcc_struct));
 865
 866 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Operand;
 867
 868 struct Operand
 869 {
 870 int kind;
 871 struct Type * type;
 872 unsigned int ptrSize;
 873 union
 874 {
 875 char c;
 876 unsigned char uc;
 877 short s;
 878 unsigned short us;
 879 int i;
 880 unsigned int ui;
 881 float f;
 882 double d;
 883 long long i64;
 884 uint64 ui64;
 885 } __attribute__ ((gcc_struct));
 886 struct OpTable ops;
 887 } __attribute__ ((gcc_struct));
 888
 889 extern struct Location yylloc;
 890
 891 extern struct __ecereNameSpace__ecere__com__Instance * fileInput;
 892
 893 extern int declMode;
 894
 895 extern void resetScanner();
 896
 897 extern struct Expression * ParseExpressionString(char *  expression);
 898
 899 extern struct Type * ProcessTypeString(char *  string, unsigned int staticMethod);
 900
 901 extern void ProcessExpressionType(struct Expression * exp);
 902
 903 extern void ComputeExpression(struct Expression * exp);
 904
 905 extern struct Operand GetOperand(struct Expression * exp);
 906
 907 extern void FreeExpression(struct Expression * exp);
 908
 909 extern void resetScannerPos(struct CodePosition * pos);
 910
 911 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateParameter;
 912
 913 struct __ecereNameSpace__ecere__com__ClassTemplateParameter;
 914
 915 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);
 916
 917 extern void __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(struct __ecereNameSpace__ecere__com__Class * base);
 918
 919 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DefinedExpression;
 920
 921 struct __ecereNameSpace__ecere__com__DefinedExpression;
 922
 923 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_RegisterDefine(char *  name, char *  value, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
 924
 925 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
 926
 927 struct __ecereNameSpace__ecere__com__GlobalFunction;
 928
 929 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);
 930
 931 extern char *  strncpy(char * , const char * , size_t n);
 932
 933 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
 934
 935 struct __ecereNameSpace__ecere__com__NameSpace
 936 {
 937 char *  name;
 938 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
 939 struct __ecereNameSpace__ecere__com__NameSpace *  left;
 940 struct __ecereNameSpace__ecere__com__NameSpace *  right;
 941 int depth;
 942 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
 943 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
 944 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 945 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
 946 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
 947 } __attribute__ ((gcc_struct));
 948
 949 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
 950
 951 struct GlobalData
 952 {
 953 uintptr_t key;
 954 struct __ecereNameSpace__ecere__sys__BTNode * parent;
 955 struct __ecereNameSpace__ecere__sys__BTNode * left;
 956 struct __ecereNameSpace__ecere__sys__BTNode * right;
 957 int depth;
 958 struct __ecereNameSpace__ecere__com__Instance * module;
 959 char *  dataTypeString;
 960 struct Type * dataType;
 961 void *  symbol;
 962 char *  fullName;
 963 } __attribute__ ((gcc_struct));
 964
 965 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DataRedefinition;
 966
 967 struct DataRedefinition
 968 {
 969 struct DataRedefinition * prev;
 970 struct DataRedefinition * next;
 971 char name[1024];
 972 char type1[1024];
 973 char type2[1024];
 974 } __attribute__ ((gcc_struct));
 975
 976 void ImportModule(char *  name, int importType, int importAccess, unsigned int loadDllOnly);
 977
 978 extern char *  __ecereNameSpace__ecere__sys__GetSystemPathBuffer(char *  d, char *  p);
 979
 980 extern void Compiler_Error(char *  format, ...);
 981
 982 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
 983
 984 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
 985
 986 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 987
 988 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
 989
 990 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
 991
 992 struct __ecereNameSpace__ecere__sys__BTNode * __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  key);
 993
 994 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  a, char *  b);
 995
 996 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
 997
 998 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 999
1000 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
1001
1002 unsigned int LoadSymbols(char * fileName, int importType, unsigned int loadDllOnly)
1003 {
1004 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpenBuffered(fileName, 1);
1005 unsigned int globalInstance = 0x0;
1006
1007 if(f)
1008 {
1009 unsigned int ecereCOMModule = 0x0;
1010 char moduleName[797];
1011
1012 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, moduleName);
1013 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")))
1014 ecereCOMModule = 0x1;
1015 for(; ; )
1016 {
1017 char line[1024];
1018
1019 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1020 break;
1021 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1022 if(line[0] == '[')
1023 {
1024 if(!strcmp(line, "[Global Instance]"))
1025 globalInstance = 0x1;
1026 else if(!strcmp(line, "[Defined Classes]"))
1027 {
1028 struct __ecereNameSpace__ecere__com__Class * regClass = (((void *)0));
1029 char name[1024];
1030 unsigned int isRemote = 0x0;
1031 unsigned int isStatic = 0x0;
1032 unsigned int isWatchable = 0x0;
1033 int classType = 0;
1034 unsigned int fixed = 0x0;
1035 unsigned int noExpansion = 0x0;
1036 int inheritanceAccess = 1;
1037
1038 for(; ; )
1039 {
1040 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1041 break;
1042 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1043 if(!strcmp(line, "."))
1044 break;
1045 if(line[0] == '[')
1046 {
1047 if(!strcmp(line, "[Remote]"))
1048 isRemote = 0x1;
1049 else if(!strcmp(line, "[Static]"))
1050 isStatic = 0x1;
1051 else if(!strcmp(line, "[Fixed]"))
1052 fixed = 0x1;
1053 else if(!strcmp(line, "[No Expansion]"))
1054 noExpansion = 0x1;
1055 else if(!strcmp(line, "[Watchable]"))
1056 isWatchable = 0x1;
1057 else if(!strcmp(line, "[Enum]"))
1058 classType = 4;
1059 else if(!strcmp(line, "[Bit]"))
1060 classType = 2;
1061 else if(!strcmp(line, "[Struct]"))
1062 classType = 1;
1063 else if(!strcmp(line, "[Unit]"))
1064 classType = 3;
1065 else if(!strcmp(line, "[NoHead]"))
1066 classType = 5;
1067 else if(!strcmp(line, "[Base]") || !strcmp(line, "[Private Base]"))
1068 {
1069 if(!strcmp(line, "[Private Base]"))
1070 inheritanceAccess = 2;
1071 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1072 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1073 if(importType == 3)
1074 DeclClass(0, name);
1075 if(isStatic || loadDllOnly || importType == 3 || importType == 4)
1076 regClass = (((void *)0));
1077 else if(regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, name), !regClass || regClass->internalDecl || regClass->isRemote)
1078 {
1079 struct Symbol * existingClass = FindClass(name);
1080 char * baseName = (classType == 0 && importType == 2 && isRemote) ? "DCOMClientObject" : (!strcmp(line, "[None]") ? (((void *)0)) : line);
1081
1082 if(!isRemote || (importType != 2) || (!sourceFile || !strstr(sourceFile, ".main.ec")))
1083 {
1084 if(!regClass || regClass->internalDecl)
1085 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, name, isRemote ? (((void *)0)) : baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1086 if(regClass && isRemote)
1087 regClass->isRemote = (importType == 2) ? (unsigned int)1 : (unsigned int)2;
1088 if(isRemote)
1089 {
1090 if(importType == 2)
1091 {
1092 char className[1024] = "DCOMClient_";
1093
1094 strcat(className, name);
1095 if(!existingClass)
1096 existingClass = DeclClass(0, name);
1097 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, className, baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1098 }
1099 if(regClass)
1100 regClass->isRemote = (importType == 2) ? (unsigned int)1 : (unsigned int)3;
1101 }
1102 if(existingClass)
1103 {
1104 struct __ecereNameSpace__ecere__sys__OldLink * link;
1105
1106 for(link = existingClass->templatedClasses.first; link; link = link->next)
1107 {
1108 struct Symbol * symbol = link->data;
1109
1110 symbol->registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1111 }
1112 }
1113 if(fixed)
1114 regClass->fixed = 0x1;
1115 if(noExpansion)
1116 regClass->noExpansion = 0x1;
1117 if(isWatchable)
1118 {
1119 __ecereNameSpace__ecere__com__eClass_DestructionWatchable(regClass);
1120 regClass->structSize = regClass->offset;
1121 }
1122 if(regClass && existingClass)
1123 {
1124 existingClass->registered = regClass;
1125 regClass->symbol = existingClass;
1126 existingClass->id = (((int)0x7fffffff));
1127 existingClass->idCode = (((int)0x7fffffff));
1128 existingClass->imported = 0x1;
1129 if(regClass->module)
1130 existingClass->module = FindModule(regClass->module);
1131 else
1132 existingClass->module = mainModule;
1133 }
1134 }
1135 else
1136 regClass = (((void *)0));
1137 }
1138 else
1139 regClass = (((void *)0));
1140 isRemote = 0x0;
1141 isWatchable = 0x0;
1142 fixed = 0x0;
1143 isStatic = 0x0;
1144 }
1145 else if(!strcmp(line, "[Enum Values]"))
1146 {
1147 for(; ; )
1148 {
1149 char * equal;
1150
1151 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1152 break;
1153 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1154 if(!strcmp(line, "."))
1155 break;
1156 if(regClass)
1157 {
1158 equal = strchr(line, '=');
1159 if(equal)
1160 {
1161 char name[1024];
1162
1163 memcpy(name, line, (int)(equal - line));
1164 name[equal - line] = '\0';
1165 __ecereNameSpace__ecere__sys__TrimLSpaces(name, name);
1166 __ecereNameSpace__ecere__sys__TrimRSpaces(name, name);
1167 __ecereNameSpace__ecere__com__eEnum_AddFixedValue(regClass, name, atoi(equal + 1));
1168 }
1169 else
1170 {
1171 __ecereNameSpace__ecere__com__eEnum_AddValue(regClass, line);
1172 }
1173 }
1174 }
1175 }
1176 else if(!strcmp(line, "[Defined Methods]"))
1177 {
1178 char name[1024];
1179 unsigned int isVirtual = 0x0;
1180 int memberAccess = 1;
1181
1182 for(; ; )
1183 {
1184 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1185 break;
1186 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1187 if(!strcmp(line, "."))
1188 break;
1189 if(line[0] == '[')
1190 {
1191 if(!strcmp(line, "[Type]"))
1192 {
1193 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1194 if(regClass)
1195 {
1196 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1197 if(isVirtual)
1198 __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1199 else
1200 __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1201 }
1202 }
1203 else if(!strcmp(line, "[Virtual]"))
1204 isVirtual = 0x1;
1205 else if(!strcmp(line, "[Public]"))
1206 memberAccess = 1;
1207 else if(!strcmp(line, "[Private]"))
1208 memberAccess = 2;
1209 }
1210 else
1211 {
1212 strcpy(name, line);
1213 isVirtual = 0x0;
1214 memberAccess = 1;
1215 }
1216 }
1217 }
1218 else if(!strcmp(line, "[Defined Properties]"))
1219 {
1220 char name[1024];
1221 unsigned int setStmt = 0x0, getStmt = 0x0, isVirtual = 0x0, conversion = 0x0;
1222 unsigned int isWatchable = 0x0;
1223 int memberAccess = 1;
1224
1225 for(; ; )
1226 {
1227 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1228 break;
1229 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1230 if(!strcmp(line, "."))
1231 break;
1232 if(line[0] == '[')
1233 {
1234 if(!strcmp(line, "[Type]"))
1235 {
1236 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1237 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1238 if(regClass)
1239 {
1240 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);
1241
1242 if(prop)
1243 {
1244 prop->compiled = 0x0;
1245 if(isWatchable)
1246 {
1247 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1248 regClass->structSize = regClass->offset;
1249 }
1250 }
1251 }
1252 }
1253 else if(!strcmp(line, "[Set]"))
1254 setStmt = 0x1;
1255 else if(!strcmp(line, "[Get]"))
1256 getStmt = 0x1;
1257 else if(!strcmp(line, "[Watchable]"))
1258 isWatchable = 0x1;
1259 else if(!strcmp(line, "[Public]"))
1260 memberAccess = 1;
1261 else if(!strcmp(line, "[Private]"))
1262 memberAccess = 2;
1263 else if(!strcmp(line, "[Conversion]"))
1264 {
1265 conversion = 0x1;
1266 setStmt = getStmt = isVirtual = isWatchable = 0x0;
1267 }
1268 }
1269 else
1270 {
1271 strcpy(name, line);
1272 setStmt = getStmt = isVirtual = conversion = isWatchable = 0x0;
1273 memberAccess = 1;
1274 }
1275 }
1276 }
1277 else if(!strcmp(line, "[Defined Class Properties]"))
1278 {
1279 char name[1024];
1280 unsigned int setStmt = 0x0, getStmt = 0x0;
1281
1282 for(; ; )
1283 {
1284 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1285 break;
1286 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1287 if(!strcmp(line, "."))
1288 break;
1289 if(line[0] == '[')
1290 {
1291 if(!strcmp(line, "[Type]"))
1292 {
1293 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1294 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1295 if(regClass)
1296 {
1297 __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, name, line, (void *)(unsigned int)setStmt, (void *)(unsigned int)getStmt);
1298 }
1299 }
1300 else if(!strcmp(line, "[Set]"))
1301 setStmt = 0x1;
1302 else if(!strcmp(line, "[Get]"))
1303 getStmt = 0x1;
1304 }
1305 else
1306 {
1307 strcpy(name, line);
1308 setStmt = getStmt = 0x0;
1309 }
1310 }
1311 }
1312 else if(!strcmp(line, "[Defined Data Members]"))
1313 {
1314 ReadDataMembers(regClass, (((void *)0)), f);
1315 }
1316 else if(!strcmp(line, "[Template Parameters]"))
1317 {
1318 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(f))
1319 {
1320 char name[1024];
1321 int type = 0;
1322 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1323 {
1324 0, 0, 0, 0, 0
1325 };
1326 void * info = (((void *)0));
1327
1328 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1329 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1330 if(line[0] == '.')
1331 break;
1332 strcpy(name, line);
1333 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1334 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1335 if(!strcmp(line, "[Expression]"))
1336 type = 2;
1337 else if(!strcmp(line, "[Identifier]"))
1338 type = 1;
1339 switch(type)
1340 {
1341 case 0:
1342 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1343 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1344 if(regClass && strcmp(line, "[None]"))
1345 {
1346 info = __ecereNameSpace__ecere__sys__CopyString(line);
1347 }
1348 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1349 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1350 if(regClass && strcmp(line, "[None]"))
1351 {
1352 defaultArg.dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line);
1353 }
1354 break;
1355 case 2:
1356 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1357 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1358 if(regClass && strcmp(line, "[None]"))
1359 {
1360 info = __ecereNameSpace__ecere__sys__CopyString(line);
1361 }
1362 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1363 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1364 if(regClass && strcmp(line, "[None]"))
1365 {
1366 struct Operand op;
1367 struct Expression * exp;
1368 struct Location oldLocation = yylloc;
1369 struct __ecereNameSpace__ecere__com__Instance * backFileInput = fileInput;
1370
1371 declMode = (int)0;
1372 resetScanner();
1373 exp = ParseExpressionString(line);
1374 if(info)
1375 exp->destType = ProcessTypeString(info, 0x0);
1376 ProcessExpressionType(exp);
1377 ComputeExpression(exp);
1378 op = GetOperand(exp);
1379 defaultArg.expression.ui64 = op.ui64;
1380 FreeExpression(exp);
1381 resetScanner();
1382 yylloc = oldLocation;
1383 fileInput = backFileInput;
1384 if(fileInput)
1385 {
1386 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(fileInput, yylloc.start.pos, 0);
1387 resetScannerPos(&yylloc.start);
1388 yychar = -2;
1389 }
1390 }
1391 break;
1392 case 1:
1393 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1394 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1395 if(!strcmp(line, "[Data member]"))
1396 info = (void *)0;
1397 else if(!strcmp(line, "[Method]"))
1398 info = (void *)1;
1399 else if(!strcmp(line, "[Property]"))
1400 info = (void *)2;
1401 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1402 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1403 if(regClass && strcmp(line, "[None]"))
1404 {
1405 defaultArg.memberString = __ecereNameSpace__ecere__sys__CopyString(line);
1406 }
1407 break;
1408 }
1409 if(regClass)
1410 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, name, type, info, &defaultArg);
1411 if(type == 0 || type == 2)
1412 (__ecereNameSpace__ecere__com__eSystem_Delete(info), info = 0);
1413 if(type == 0 || type == 1)
1414 (__ecereNameSpace__ecere__com__eSystem_Delete(defaultArg.dataTypeString), defaultArg.dataTypeString = 0);
1415 }
1416 if(regClass)
1417 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1418 }
1419 }
1420 else
1421 {
1422 inheritanceAccess = 1;
1423 classType = 0;
1424 isRemote = 0x0;
1425 strcpy(name, line);
1426 regClass = (((void *)0));
1427 }
1428 }
1429 }
1430 else if(!strcmp(line, "[Defined Expressions]"))
1431 {
1432 char name[1024];
1433
1434 for(; ; )
1435 {
1436 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1437 break;
1438 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1439 if(!strcmp(line, "."))
1440 break;
1441 if(!strcmp(line, "[Value]"))
1442 {
1443 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1444 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1445 if(!loadDllOnly && importType != 3 && importType != 4)
1446 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(name, line, privateModule, ecereCOMModule ? 4 : 1);
1447 }
1448 else if(line[0] != '[')
1449 {
1450 strcpy(name, line);
1451 }
1452 }
1453 }
1454 else if(!strcmp(line, "[Defined Functions]"))
1455 {
1456 char name[1024];
1457
1458 for(; ; )
1459 {
1460 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1461 break;
1462 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1463 if(!strcmp(line, "."))
1464 break;
1465 if(!strcmp(line, "[Type]"))
1466 {
1467 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1468 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1469 if(!loadDllOnly && importType != 3 && importType != 4)
1470 __ecereNameSpace__ecere__com__eSystem_RegisterFunction(name, line, (((void *)0)), privateModule, ecereCOMModule ? 4 : 1);
1471 }
1472 else if(line[0] != '[')
1473 {
1474 strcpy(name, line);
1475 }
1476 }
1477 }
1478 else if(!strcmp(line, "[Defined Data]"))
1479 {
1480 char name[1024];
1481
1482 for(; ; )
1483 {
1484 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1485 break;
1486 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1487 if(!strcmp(line, "."))
1488 break;
1489 if(!strcmp(line, "[Type]"))
1490 {
1491 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line);
1492 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1493 if(!loadDllOnly && importType != 3 && importType != 4)
1494 {
1495 int start = 0, c;
1496 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace = globalData;
1497 struct GlobalData * data;
1498
1499 for(c = 0; name[c]; c++)
1500 {
1501 if(name[c] == '.' || (name[c] == ':' && name[c + 1] == ':'))
1502 {
1503 struct __ecereNameSpace__ecere__com__NameSpace * newSpace;
1504 char * spaceName = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (c - start + 1));
1505
1506 strncpy(spaceName, name + start, c - start);
1507 spaceName[c - start] = '\0';
1508 newSpace = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).nameSpaces, spaceName);
1509 if(!newSpace)
1510 {
1511 newSpace = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__com__NameSpace) * (1));
1512 (*newSpace).classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1513 (*newSpace).defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1514 (*newSpace).functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1515 (*newSpace).nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1516 (*newSpace).name = spaceName;
1517 (*newSpace).parent = nameSpace;
1518 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)newSpace);
1519 }
1520 else
1521 (__ecereNameSpace__ecere__com__eSystem_Delete(spaceName), spaceName = 0);
1522 nameSpace = newSpace;
1523 if(name[c] == ':')
1524 c++;
1525 start = c + 1;
1526 }
1527 }
1528 if(c - start)
1529 {
1530 data = (struct GlobalData *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).functions, name + start);
1531 if(!data)
1532 {
1533 data = __extension__ ({
1534 struct GlobalData * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData);
1535
1536 __ecereInstance1->fullName = __ecereNameSpace__ecere__sys__CopyString(name), __ecereInstance1->dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1->module = privateModule, __ecereInstance1;
1537 });
1538 data->key = (uintptr_t)(data->fullName + start);
1539 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1540 }
1541 else if(strcmp(data->dataTypeString, line))
1542 {
1543 struct DataRedefinition * redefinition = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DataRedefinition);
1544
1545 strcpy(redefinition->name, name);
1546 strcpy(redefinition->type1, data->dataTypeString);
1547 strcpy(redefinition->type2, line);
1548 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&dataRedefinitions, redefinition);
1549 }
1550 }
1551 }
1552 }
1553 else if(line[0] != '[')
1554 {
1555 strcpy(name, line);
1556 }
1557 }
1558 }
1559 else if(!strcmp(line, "[Imported Modules]"))
1560 {
1561 int moduleImportType = 0;
1562 int importAccess = 1;
1563
1564 for(; ; )
1565 {
1566 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
1567 break;
1568 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1569 if(!strcmp(line, "."))
1570 break;
1571 if(!strcmp(line, "[Static]"))
1572 moduleImportType = 1;
1573 else if(!strcmp(line, "[Remote]"))
1574 moduleImportType = 2;
1575 else if(!strcmp(line, "[Private]"))
1576 importAccess = 2;
1577 else if(line[0] != '[')
1578 {
1579 if(importType != 3 && importType != 4)
1580 ImportModule(line, moduleImportType, importAccess, loadDllOnly);
1581 else
1582 ImportModule(line, 4, importAccess, loadDllOnly);
1583 if(!strcmp(line, "ecere"))
1584 ecereImported = 0x1;
1585 moduleImportType = 0;
1586 importAccess = 1;
1587 }
1588 }
1589 }
1590 }
1591 }
1592 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1593 }
1594 else if(importType != 4)
1595 {
1596 char sysFileName[797];
1597
1598 __ecereNameSpace__ecere__sys__GetSystemPathBuffer(sysFileName, fileName);
1599 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Couldn't open %s\n", (((void *)0))), sysFileName);
1600 }
1601 return globalInstance;
1602 }
1603
1604 struct __ecereNameSpace__ecere__com__Instance * loadedModules;
1605
1606 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
1607
1608 extern struct __ecereNameSpace__ecere__sys__OldList *  defines;
1609
1610 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
1611
1612 struct ImportedModule
1613 {
1614 struct ImportedModule * prev;
1615 struct ImportedModule * next;
1616 char *  name;
1617 int type;
1618 int importType;
1619 unsigned int globalInstance;
1620 unsigned int dllOnly;
1621 int importAccess;
1622 } __attribute__ ((gcc_struct));
1623
1624 extern size_t strlen(const char * );
1625
1626 extern char *  __ecereNameSpace__ecere__sys__GetExtension(char *  string, char *  output);
1627
1628 extern char *  symbolsDir;
1629
1630 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, char *  addedPath);
1631
1632 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(char *  string, char *  ext, char *  output);
1633
1634 extern unsigned int __ecereNameSpace__ecere__sys__FileExists(char *  fileName);
1635
1636 extern unsigned int inCompiler;
1637
1638 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__IteratorPointer;
1639
1640 struct __ecereNameSpace__ecere__com__IteratorPointer;
1641
1642 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__MapIterator;
1643
1644 struct __ecereNameSpace__ecere__com__MapIterator
1645 {
1646 struct __ecereNameSpace__ecere__com__Instance * container;
1647 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
1648 } __attribute__ ((gcc_struct));
1649
1650 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com__eModule_LoadStrict(struct __ecereNameSpace__ecere__com__Instance * fromModule, char *  name, int importAccess);
1651
1652 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1653
1654 struct __ecereNameSpace__ecere__com__Module
1655 {
1656 struct __ecereNameSpace__ecere__com__Instance * application;
1657 struct __ecereNameSpace__ecere__sys__OldList classes;
1658 struct __ecereNameSpace__ecere__sys__OldList defines;
1659 struct __ecereNameSpace__ecere__sys__OldList functions;
1660 struct __ecereNameSpace__ecere__sys__OldList modules;
1661 struct __ecereNameSpace__ecere__com__Instance * prev;
1662 struct __ecereNameSpace__ecere__com__Instance * next;
1663 char *  name;
1664 void *  library;
1665 void *  Unload;
1666 int importType;
1667 int origImportType;
1668 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1669 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1670 } __attribute__ ((gcc_struct));
1671
1672 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Iterator;
1673
1674 struct __ecereNameSpace__ecere__com__Iterator
1675 {
1676 struct __ecereNameSpace__ecere__com__Instance * container;
1677 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
1678 } __attribute__ ((gcc_struct));
1679
1680 extern int sprintf(char * , char * , ...);
1681
1682 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
1683
1684 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_;
1685
1686 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
1687
1688 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
1689
1690 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
1691
1692 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__MapIterator_map;
1693
1694 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 index, unsigned int create);
1695
1696 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
1697
1698 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
1699
1700 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
1701
1702 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Iterator_data;
1703
1704 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
1705
1706 void ImportModule(char * name, int importType, int importAccess, unsigned int loadDllOnly)
1707 {
1708 struct ImportedModule * module = (((void *)0));
1709 char moduleName[274];
1710
1711 strncpy(moduleName, name, (274) - 1);
1712 moduleName[(274) - 1] = (char)0;
1713 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1714 for(module = (*defines).first; module; module = module->next)
1715 {
1716 if(module->type == 0 && !(strcasecmp)(module->name, moduleName))
1717 break;
1718 }
1719 if((!module || (module->dllOnly && !loadDllOnly)) && strlen(name) < (274))
1720 {
1721 char ext[17];
1722 struct __ecereNameSpace__ecere__com__Instance * loadedModule = (((void *)0));
1723 char symFile[797];
1724
1725 symFile[0] = '\0';
1726 __ecereNameSpace__ecere__sys__GetExtension(name, ext);
1727 strcpy(symFile, symbolsDir ? symbolsDir : "");
1728 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1729 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1730 if(!strcmp(ext, "dll") || !strcmp(ext, "dll") || !ext[0])
1731 {
1732 if(importType != 4)
1733 {
1734 if(!module)
1735 {
1736 if(precompDefines)
1737 {
1738 module = __extension__ ({
1739 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1740
1741 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1742 });
1743 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1744 }
1745 module = __extension__ ({
1746 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1747
1748 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1749 });
1750 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1751 }
1752 module->dllOnly = loadDllOnly;
1753 if(ext[0] || !__ecereNameSpace__ecere__sys__FileExists(symFile))
1754 {
1755 unsigned int skipLoad = 0x0;
1756 struct __ecereNameSpace__ecere__com__Instance * list = (((void *)0));
1757 char file[274];
1758
1759 strcpy(file, name);
1760 __ecereNameSpace__ecere__sys__StripExtension(file);
1761 if(!inCompiler && !inPreCompiler && !inSymbolGen)
1762 {
1763 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, loadedModules), it);
1764
1765 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&it, (uint64)(file), 0x0))
1766 {
1767 struct __ecereNameSpace__ecere__com__Instance * firstModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(__thisModule, file, importAccess);
1768
1769 if(firstModule)
1770 {
1771 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_);
1772 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))list->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(firstModule));
1773 __extension__ ({
1774 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1775 {
1776 loadedModules, 0
1777 };
1778
1779 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, (uint64)(((uint64)(file))), 0x1);
1780 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, list);
1781 });
1782 }
1783 else
1784 skipLoad = 0x1;
1785 }
1786 else
1787 list = ((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&it));
1788 }
1789 if(!skipLoad)
1790 {
1791 loadedModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, file, importAccess);
1792 if(loadedModule)
1793 {
1794 ((struct __ecereNameSpace__ecere__com__Module *)(((char *)loadedModule + structSize_Instance)))->importType = importType;
1795 module->dllOnly = 0x0;
1796 if(list)
1797 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))list->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(loadedModule));
1798 }
1799 }
1800 }
1801 }
1802 }
1803 if(!loadedModule && (!strcmp(ext, "ec") || !strcmp(ext, "sym") || !ext[0]))
1804 {
1805 {
1806 if(!module)
1807 {
1808 if(precompDefines)
1809 {
1810 module = __extension__ ({
1811 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1812
1813 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1814 });
1815 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1816 }
1817 module = __extension__ ({
1818 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1819
1820 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1821 });
1822 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1823 }
1824 module->dllOnly = loadDllOnly;
1825 if(inPreCompiler)
1826 return ;
1827 if(inIDE && !__ecereNameSpace__ecere__sys__FileExists(symFile) && sourceDirs)
1828 {
1829 {
1830 struct __ecereNameSpace__ecere__com__Iterator dir =
1831 {
1832 (sourceDirs), 0
1833 };
1834
1835 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&dir))
1836 {
1837 char configDir[274];
1838
1839 strcpy(symFile, __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&dir));
1840 __ecereNameSpace__ecere__sys__PathCat(symFile, "obj");
1841 sprintf(configDir, "debug.%s", (__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? "win32" : "linux");
1842 __ecereNameSpace__ecere__sys__PathCat(symFile, configDir);
1843 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1844 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1845 if(__ecereNameSpace__ecere__sys__FileExists(symFile))
1846 break;
1847 }
1848 }
1849 }
1850 if(!__ecereNameSpace__ecere__sys__FileExists(symFile))
1851 {
1852 char fileName[274];
1853
1854 __ecereNameSpace__ecere__sys__GetLastDirectory(symFile, fileName);
1855 strcpy(symFile, symbolsDir ? symbolsDir : "");
1856 __ecereNameSpace__ecere__sys__PathCat(symFile, fileName);
1857 }
1858 module->globalInstance = LoadSymbols(symFile, importType, loadDllOnly);
1859 }
1860 }
1861 }
1862 }
1863
1864 int FindIncludeFileID(char * includeFile)
1865 {
1866 int c;
1867
1868 for(c = 0; c < numIncludes; c++)
1869 if(!((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? (strcasecmp) : strcmp)(includes[c], includeFile))
1870 return c + 1;
1871 return 0;
1872 }
1873
1874 int GetIncludeFileID(char * includeFile)
1875 {
1876 int found = FindIncludeFileID(includeFile);
1877
1878 if(found)
1879 return found;
1880 includes = __ecereNameSpace__ecere__com__eSystem_Renew(includes, sizeof(char *) * (numIncludes + 1));
1881 includes[numIncludes++] = __ecereNameSpace__ecere__sys__CopyString(includeFile);
1882 return numIncludes;
1883 }
1884
1885 char * GetIncludeFileFromID(int id)
1886 {
1887 return includes[id - 1];
1888 }
1889
1890 extern char *  __ecereNameSpace__ecere__sys__StripLastDirectory(char *  string, char *  output);
1891
1892 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(char *  fileName, int mode);
1893
1894 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__NamedItem;
1895
1896 struct __ecereNameSpace__ecere__sys__NamedItem
1897 {
1898 struct __ecereNameSpace__ecere__sys__NamedItem * prev;
1899 struct __ecereNameSpace__ecere__sys__NamedItem * next;
1900 char *  name;
1901 } __attribute__ ((gcc_struct));
1902
1903 struct __ecereNameSpace__ecere__com__Instance * OpenIncludeFile(char * includeFile)
1904 {
1905 struct __ecereNameSpace__ecere__com__Instance * file;
1906 char location[274];
1907
1908 __ecereNameSpace__ecere__sys__StripLastDirectory(sourceFileStack[(include_stack_ptr >= 0) ? include_stack_ptr : 0], location);
1909 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
1910 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
1911 if(file)
1912 {
1913 strcpy(sourceFileStack[include_stack_ptr + 1], location);
1914 }
1915 else if(inIDE)
1916 {
1917 struct __ecereNameSpace__ecere__sys__NamedItem * includeDir;
1918
1919 if(includeDirs)
1920 {
1921 for(includeDir = (*includeDirs).first; includeDir; includeDir = includeDir->next)
1922 {
1923 strcpy(location, includeDir->name);
1924 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
1925 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
1926 if(file)
1927 break;
1928 }
1929 }
1930 if(sysIncludeDirs)
1931 {
1932 for(includeDir = (*sysIncludeDirs).first; includeDir; includeDir = includeDir->next)
1933 {
1934 strcpy(location, includeDir->name);
1935 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
1936 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
1937 if(file)
1938 break;
1939 }
1940 }
1941 }
1942 return file;
1943 }
1944
1945 void FreeIncludeFiles()
1946 {
1947 int c;
1948
1949 for(c = 0; c < numIncludes; c++)
1950 (__ecereNameSpace__ecere__com__eSystem_Delete(includes[c]), includes[c] = 0);
1951 (__ecereNameSpace__ecere__com__eSystem_Delete(includes), includes = 0);
1952 numIncludes = 0;
1953 }
1954
1955 extern void FreeSymbol(struct Symbol * symbol);
1956
1957 extern void FreeType(struct Type * type);
1958
1959 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1960
1961 void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList)
1962 {
1963 struct __ecereNameSpace__ecere__com__NameSpace * ns;
1964 struct GlobalData * data;
1965
1966 for(; (ns = (struct __ecereNameSpace__ecere__com__NameSpace *)globalDataList->nameSpaces.root); )
1967 {
1968 FreeGlobalData(ns);
1969 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)ns);
1970 (__ecereNameSpace__ecere__com__eSystem_Delete((*ns).name), (*ns).name = 0);
1971 (__ecereNameSpace__ecere__com__eSystem_Delete(ns), ns = 0);
1972 }
1973 for(; (data = (struct GlobalData *)globalDataList->functions.root); )
1974 {
1975 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->functions, data);
1976 if(data->symbol)
1977 FreeSymbol(data->symbol);
1978 FreeType(data->dataType);
1979 (__ecereNameSpace__ecere__com__eSystem_Delete(data->fullName), data->fullName = 0);
1980 (__ecereNameSpace__ecere__com__eSystem_Delete(data->dataTypeString), data->dataTypeString = 0);
1981 ((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);
1982 }
1983 }
1984
1985 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
1986
1987 extern void Compiler_Warning(char *  format, ...);
1988
1989 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
1990
1991 void CheckDataRedefinitions()
1992 {
1993 struct DataRedefinition * redefinition;
1994
1995 for(redefinition = dataRedefinitions.first; redefinition; redefinition = redefinition->next)
1996 {
1997 struct Type * type1 = ProcessTypeString(redefinition->type1, 0x0);
1998 struct Type * type2 = ProcessTypeString(redefinition->type2, 0x0);
1999 char type1String[1024] = "";
2000 char type2String[1024] = "";
2001
2002 PrintType(type1, type1String, 0x0, 0x1);
2003 PrintType(type2, type2String, 0x0, 0x1);
2004 if(strcmp(type1String, type2String))
2005 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Redefinition of %s (defining as %s, already defined as %s)\n", (((void *)0))), redefinition->name, type1String, type2String);
2006 FreeType(type1);
2007 FreeType(type2);
2008 }
2009 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&dataRedefinitions, (((void *)0)));
2010 }
2011
2012 void __ecereRegisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2013 {
2014 struct __ecereNameSpace__ecere__com__Class * class;
2015
2016 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetGlobalData", "void SetGlobalData(ecere::com::NameSpace * nameSpace)", SetGlobalData, module, 1);
2017 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInIDE", "void SetInIDE(bool b)", SetInIDE, module, 1);
2018 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSourceDirs", "void SetSourceDirs(ecere::com::List<String> list)", SetSourceDirs, module, 1);
2019 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetIncludeDirs", "void SetIncludeDirs(ecere::sys::OldList * list)", SetIncludeDirs, module, 1);
2020 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSysIncludeDirs", "void SetSysIncludeDirs(ecere::sys::OldList * list)", SetSysIncludeDirs, module, 1);
2021 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetEcereImported", "void SetEcereImported(bool b)", SetEcereImported, module, 1);
2022 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetEcereImported", "bool GetEcereImported(void)", GetEcereImported, module, 1);
2023 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInPreCompiler", "void SetInPreCompiler(bool b)", SetInPreCompiler, module, 1);
2024 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInSymbolGen", "void SetInSymbolGen(bool b)", SetInSymbolGen, module, 1);
2025 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetPrecompDefines", "void SetPrecompDefines(ecere::sys::OldList * list)", SetPrecompDefines, module, 1);
2026 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DummyMethod", "bool DummyMethod(void)", DummyMethod, module, 1);
2027 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("LoadSymbols", "bool LoadSymbols(char * fileName, ecere::com::ImportType importType, bool loadDllOnly)", LoadSymbols, module, 1);
2028 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ImportModule", "void ImportModule(char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess, bool loadDllOnly)", ImportModule, module, 1);
2029 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindIncludeFileID", "int FindIncludeFileID(char * includeFile)", FindIncludeFileID, module, 2);
2030 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileID", "int GetIncludeFileID(char * includeFile)", GetIncludeFileID, module, 2);
2031 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileFromID", "char * GetIncludeFileFromID(int id)", GetIncludeFileFromID, module, 2);
2032 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OpenIncludeFile", "ecere::sys::File OpenIncludeFile(char * includeFile)", OpenIncludeFile, module, 2);
2033 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIncludeFiles", "void FreeIncludeFiles(void)", FreeIncludeFiles, module, 1);
2034 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeGlobalData", "void FreeGlobalData(ecere::com::NameSpace globalDataList)", FreeGlobalData, module, 1);
2035 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckDataRedefinitions", "void CheckDataRedefinitions(void)", CheckDataRedefinitions, module, 1);
2036 }
2037
2038 void __ecereUnregisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2039 {
2040
2041 }
2042
2043 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___;
2044
2045 void __ecereCreateModuleInstances_loadSymbols()
2046 {
2047 loadedModules = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___);
2048 __ecereNameSpace__ecere__com__eInstance_IncRef(loadedModules);
2049 }
2050
2051 void __ecereDestroyModuleInstances_loadSymbols()
2052 {
2053 (__ecereNameSpace__ecere__com__eInstance_DecRef(loadedModules), loadedModules = 0);
2054 }
2055