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