The Ecere SDK - sdk/blob - compiler/bootstrap/ecs/bootstrap/ecs.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 #define structSize_Module                 (_64BIT ? 560 : 300)
  42
  43 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
  44
  45 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
  46
  47 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
  48
  49 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
  50
  51 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  52
  53 struct __ecereNameSpace__ecere__sys__BTNode;
  54
  55 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  56
  57 struct __ecereNameSpace__ecere__sys__BinaryTree
  58 {
  59 struct __ecereNameSpace__ecere__sys__BTNode * root;
  60 int count;
  61 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
  62 void (*  FreeKey)(void *  key);
  63 } __attribute__ ((gcc_struct));
  64
  65 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  66
  67 struct __ecereNameSpace__ecere__sys__OldList
  68 {
  69 void *  first;
  70 void *  last;
  71 int count;
  72 unsigned int offset;
  73 unsigned int circ;
  74 } __attribute__ ((gcc_struct));
  75
  76 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  77
  78 struct __ecereNameSpace__ecere__com__Method
  79 {
  80 char *  name;
  81 struct __ecereNameSpace__ecere__com__Method * parent;
  82 struct __ecereNameSpace__ecere__com__Method * left;
  83 struct __ecereNameSpace__ecere__com__Method * right;
  84 int depth;
  85 int (*  function)();
  86 int vid;
  87 int type;
  88 struct __ecereNameSpace__ecere__com__Class * _class;
  89 void *  symbol;
  90 char *  dataTypeString;
  91 struct Type * dataType;
  92 int memberAccess;
  93 } __attribute__ ((gcc_struct));
  94
  95 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  96
  97 struct __ecereNameSpace__ecere__com__Property
  98 {
  99 struct __ecereNameSpace__ecere__com__Property * prev;
 100 struct __ecereNameSpace__ecere__com__Property * next;
 101 char *  name;
 102 unsigned int isProperty;
 103 int memberAccess;
 104 int id;
 105 struct __ecereNameSpace__ecere__com__Class * _class;
 106 char *  dataTypeString;
 107 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 108 struct Type * dataType;
 109 void (*  Set)(void * , int);
 110 int (*  Get)(void * );
 111 unsigned int (*  IsSet)(void * );
 112 void *  data;
 113 void *  symbol;
 114 int vid;
 115 unsigned int conversion;
 116 unsigned int watcherOffset;
 117 char *  category;
 118 unsigned int compiled;
 119 unsigned int selfWatchable;
 120 unsigned int isWatchable;
 121 } __attribute__ ((gcc_struct));
 122
 123 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
 124
 125 struct CodePosition
 126 {
 127 int line;
 128 int charPos;
 129 int pos;
 130 unsigned int included;
 131 } __attribute__ ((gcc_struct));
 132
 133 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 134
 135 struct Location
 136 {
 137 struct CodePosition start;
 138 struct CodePosition end;
 139 } __attribute__ ((gcc_struct));
 140
 141 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
 142
 143 struct Attrib;
 144
 145 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
 146
 147 struct ExtDecl;
 148
 149 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 150
 151 struct ClassDefinition;
 152
 153 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 154
 155 struct Context;
 156
 157 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 158
 159 struct Instantiation;
 160
 161 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 162
 163 struct Declaration;
 164
 165 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 166
 167 struct Statement;
 168
 169 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 170
 171 struct TypeName;
 172
 173 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 174
 175 struct Initializer;
 176
 177 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 178
 179 struct __ecereNameSpace__ecere__com__DataValue
 180 {
 181 union
 182 {
 183 char c;
 184 unsigned char uc;
 185 short s;
 186 unsigned short us;
 187 int i;
 188 unsigned int ui;
 189 void *  p;
 190 float f;
 191 double d;
 192 long long i64;
 193 uint64 ui64;
 194 } __attribute__ ((gcc_struct));
 195 } __attribute__ ((gcc_struct));
 196
 197 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 198
 199 struct Expression;
 200
 201 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 202
 203 struct TemplateDatatype;
 204
 205 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 206
 207 struct TemplateArgument;
 208
 209 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 210
 211 struct TemplateParameter;
 212
 213 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 214
 215 struct Specifier;
 216
 217 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 218
 219 struct Identifier;
 220
 221 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 222
 223 struct Declarator;
 224
 225 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 226
 227 struct FunctionDefinition;
 228
 229 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 230
 231 struct DBTableDef;
 232
 233 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 234
 235 struct External;
 236
 237 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 238
 239 struct ModuleImport
 240 {
 241 struct ModuleImport * prev;
 242 struct ModuleImport * next;
 243 char *  name;
 244 struct __ecereNameSpace__ecere__sys__OldList classes;
 245 struct __ecereNameSpace__ecere__sys__OldList functions;
 246 int importType;
 247 int importAccess;
 248 } __attribute__ ((gcc_struct));
 249
 250 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 251
 252 struct ClassImport
 253 {
 254 struct ClassImport * prev;
 255 struct ClassImport * next;
 256 char *  name;
 257 struct __ecereNameSpace__ecere__sys__OldList methods;
 258 struct __ecereNameSpace__ecere__sys__OldList properties;
 259 unsigned int itself;
 260 unsigned int isRemote;
 261 } __attribute__ ((gcc_struct));
 262
 263 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 264
 265 struct Symbol
 266 {
 267 char *  string;
 268 struct Symbol * parent;
 269 struct Symbol * left;
 270 struct Symbol * right;
 271 int depth;
 272 struct Type * type;
 273 union
 274 {
 275 struct __ecereNameSpace__ecere__com__Method * method;
 276 struct __ecereNameSpace__ecere__com__Property * _property;
 277 struct __ecereNameSpace__ecere__com__Class * registered;
 278 } __attribute__ ((gcc_struct));
 279 int id;
 280 int idCode;
 281 union
 282 {
 283 struct
 284 {
 285 struct External * pointerExternal;
 286 struct External * structExternal;
 287 } __attribute__ ((gcc_struct));
 288 struct
 289 {
 290 struct External * externalGet;
 291 struct External * externalSet;
 292 struct External * externalPtr;
 293 struct External * externalIsSet;
 294 } __attribute__ ((gcc_struct));
 295 struct
 296 {
 297 struct External * methodExternal;
 298 struct External * methodCodeExternal;
 299 } __attribute__ ((gcc_struct));
 300 } __attribute__ ((gcc_struct));
 301 unsigned int imported;
 302 unsigned int declaredStructSym;
 303 struct __ecereNameSpace__ecere__com__Class * _class;
 304 unsigned int declaredStruct;
 305 unsigned int needConstructor;
 306 unsigned int needDestructor;
 307 char *  constructorName;
 308 char *  structName;
 309 char *  className;
 310 char *  destructorName;
 311 struct ModuleImport * module;
 312 struct ClassImport * _import;
 313 struct Location nameLoc;
 314 unsigned int isParam;
 315 unsigned int isRemote;
 316 unsigned int isStruct;
 317 unsigned int fireWatchersDone;
 318 int declaring;
 319 unsigned int classData;
 320 unsigned int isStatic;
 321 char *  shortName;
 322 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 323 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 324 struct Context * ctx;
 325 int isIterator;
 326 struct Expression * propCategory;
 327 } __attribute__ ((gcc_struct));
 328
 329 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 330
 331 struct Type
 332 {
 333 struct Type * prev;
 334 struct Type * next;
 335 int refCount;
 336 union
 337 {
 338 struct Symbol * _class;
 339 struct
 340 {
 341 struct __ecereNameSpace__ecere__sys__OldList members;
 342 char *  enumName;
 343 } __attribute__ ((gcc_struct));
 344 struct
 345 {
 346 struct Type * returnType;
 347 struct __ecereNameSpace__ecere__sys__OldList params;
 348 struct Symbol * thisClass;
 349 unsigned int staticMethod;
 350 struct TemplateParameter * thisClassTemplate;
 351 } __attribute__ ((gcc_struct));
 352 struct
 353 {
 354 struct __ecereNameSpace__ecere__com__Method * method;
 355 struct __ecereNameSpace__ecere__com__Class * methodClass;
 356 struct __ecereNameSpace__ecere__com__Class * usedClass;
 357 } __attribute__ ((gcc_struct));
 358 struct
 359 {
 360 struct Type * arrayType;
 361 int arraySize;
 362 struct Expression * arraySizeExp;
 363 unsigned int freeExp;
 364 struct Symbol * enumClass;
 365 } __attribute__ ((gcc_struct));
 366 struct Type * type;
 367 struct TemplateParameter * templateParameter;
 368 } __attribute__ ((gcc_struct));
 369 unsigned int isSigned;
 370 int kind;
 371 unsigned int constant;
 372 unsigned int size;
 373 char *  name;
 374 char *  typeName;
 375 unsigned int count;
 376 unsigned int truth;
 377 int classObjectType;
 378 unsigned int byReference;
 379 unsigned int extraParam;
 380 int alignment;
 381 unsigned int directClassAccess;
 382 unsigned int computing;
 383 unsigned int dllExport;
 384 unsigned int offset;
 385 unsigned int keepCast;
 386 unsigned int passAsTemplate;
 387 int bitFieldCount;
 388 } __attribute__ ((gcc_struct));
 389
 390 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 391
 392 struct __ecereNameSpace__ecere__com__Class
 393 {
 394 struct __ecereNameSpace__ecere__com__Class * prev;
 395 struct __ecereNameSpace__ecere__com__Class * next;
 396 char *  name;
 397 int offset;
 398 int structSize;
 399 int (* *  _vTbl)();
 400 int vTblSize;
 401 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 402 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 403 int offsetClass;
 404 int sizeClass;
 405 struct __ecereNameSpace__ecere__com__Class * base;
 406 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 407 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 408 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 409 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 410 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 411 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 412 int memberID;
 413 int startMemberID;
 414 int type;
 415 struct __ecereNameSpace__ecere__com__Instance * module;
 416 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 417 char *  dataTypeString;
 418 struct Type * dataType;
 419 int typeSize;
 420 int defaultAlignment;
 421 void (*  Initialize)();
 422 int memberOffset;
 423 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 424 char *  designerClass;
 425 unsigned int noExpansion;
 426 char *  defaultProperty;
 427 unsigned int comRedefinition;
 428 int count;
 429 unsigned int isRemote;
 430 unsigned int internalDecl;
 431 void *  data;
 432 unsigned int computeSize;
 433 int structAlignment;
 434 int destructionWatchOffset;
 435 unsigned int fixed;
 436 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 437 int inheritanceAccess;
 438 char *  fullName;
 439 void *  symbol;
 440 struct __ecereNameSpace__ecere__sys__OldList conversions;
 441 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 442 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 443 struct __ecereNameSpace__ecere__com__Class * templateClass;
 444 struct __ecereNameSpace__ecere__sys__OldList templatized;
 445 int numParams;
 446 } __attribute__ ((gcc_struct));
 447
 448 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, char *  name);
 449
 450 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 451
 452 struct __ecereNameSpace__ecere__com__Instance
 453 {
 454 int (* *  _vTbl)();
 455 struct __ecereNameSpace__ecere__com__Class * _class;
 456 int _refCount;
 457 } __attribute__ ((gcc_struct));
 458
 459 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 460
 461 struct __ecereNameSpace__ecere__com__DataMember
 462 {
 463 struct __ecereNameSpace__ecere__com__DataMember * prev;
 464 struct __ecereNameSpace__ecere__com__DataMember * next;
 465 char *  name;
 466 unsigned int isProperty;
 467 int memberAccess;
 468 int id;
 469 struct __ecereNameSpace__ecere__com__Class * _class;
 470 char *  dataTypeString;
 471 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 472 struct Type * dataType;
 473 int type;
 474 int offset;
 475 int memberID;
 476 struct __ecereNameSpace__ecere__sys__OldList members;
 477 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 478 int memberOffset;
 479 int structAlignment;
 480 } __attribute__ ((gcc_struct));
 481
 482 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 483
 484 struct __ecereNameSpace__ecere__com__SerialBuffer
 485 {
 486 unsigned char *  _buffer;
 487 unsigned int count;
 488 unsigned int _size;
 489 unsigned int pos;
 490 } __attribute__ ((gcc_struct));
 491
 492 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 493
 494 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 495 {
 496 union
 497 {
 498 struct
 499 {
 500 char *  dataTypeString;
 501 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 502 } __attribute__ ((gcc_struct));
 503 struct __ecereNameSpace__ecere__com__DataValue expression;
 504 struct
 505 {
 506 char *  memberString;
 507 union
 508 {
 509 struct __ecereNameSpace__ecere__com__DataMember * member;
 510 struct __ecereNameSpace__ecere__com__Property * prop;
 511 struct __ecereNameSpace__ecere__com__Method * method;
 512 } __attribute__ ((gcc_struct));
 513 } __attribute__ ((gcc_struct));
 514 } __attribute__ ((gcc_struct));
 515 } __attribute__ ((gcc_struct));
 516
 517
 518 static unsigned int i18n;
 519
 520 static int targetPlatform;
 521
 522 static int targetBits;
 523
 524 static unsigned int isConsole;
 525
 526 static unsigned int isDynamicLibrary;
 527
 528 static unsigned int isStaticLibrary;
 529
 530 static struct __ecereNameSpace__ecere__sys__OldList modules;
 531
 532 static struct __ecereNameSpace__ecere__com__Instance * dcomSymbols;
 533
 534 struct __ecereNameSpace__ecere__sys__OldList _defines =
 535 {
 536 0, 0, 0, 0, 0
 537 };
 538
 539 struct __ecereNameSpace__ecere__sys__OldList _imports =
 540 {
 541 0, 0, 0, 0, 0
 542 };
 543
 544 struct __ecereNameSpace__ecere__sys__OldList _excludedSymbols =
 545 {
 546 0, 0, 0, (unsigned int)&((struct Symbol *)(void *)0)->left, 0
 547 };
 548
 549 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
 550
 551 struct __ecereNameSpace__ecere__com__NameSpace
 552 {
 553 char *  name;
 554 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
 555 struct __ecereNameSpace__ecere__com__NameSpace *  left;
 556 struct __ecereNameSpace__ecere__com__NameSpace *  right;
 557 int depth;
 558 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
 559 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
 560 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 561 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
 562 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
 563 } __attribute__ ((gcc_struct));
 564
 565 static struct __ecereNameSpace__ecere__com__NameSpace globalData;
 566
 567 static struct Context * theGlobalContext;
 568
 569 static struct ModuleImport * mainModule;
 570
 571 static struct __ecereNameSpace__ecere__com__Instance * privateModule;
 572
 573 static char mainModuleName[797];
 574
 575 static char projectName[797];
 576
 577 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(char *  fileName, int mode);
 578
 579 extern char *  __ecereNameSpace__ecere__sys__TrimLSpaces(char *  string, char *  output);
 580
 581 extern int strcmp(const char * , const char * );
 582
 583 extern struct ModuleImport * GetMainModule(void);
 584
 585 extern void SetMainModule(struct ModuleImport * moduleImport);
 586
 587 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
 588
 589 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MethodImport;
 590
 591 struct MethodImport
 592 {
 593 struct MethodImport * prev;
 594 struct MethodImport * next;
 595 char *  name;
 596 unsigned int isVirtual;
 597 } __attribute__ ((gcc_struct));
 598
 599 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyImport;
 600
 601 struct PropertyImport
 602 {
 603 struct PropertyImport * prev;
 604 struct PropertyImport * next;
 605 char *  name;
 606 unsigned int isVirtual;
 607 unsigned int hasSet;
 608 unsigned int hasGet;
 609 } __attribute__ ((gcc_struct));
 610
 611 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 612
 613 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionImport;
 614
 615 struct FunctionImport
 616 {
 617 struct FunctionImport * prev;
 618 struct FunctionImport * next;
 619 char *  name;
 620 } __attribute__ ((gcc_struct));
 621
 622 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(struct __ecereNameSpace__ecere__com__Instance * this, char *  s, int max);
 623
 624 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 625
 626 void *  __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(struct __ecereNameSpace__ecere__sys__OldList * this, char *  name, unsigned int warn);
 627
 628 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 629
 630 static void LoadImports(char * fileName)
 631 {
 632 void * __ecereTemp1;
 633 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 1);
 634
 635 if(f)
 636 {
 637 for(; ; )
 638 {
 639 char line[1024];
 640
 641 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 642 break;
 643 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 644 if(line[0] == '[')
 645 {
 646 if(!strcmp(line, "[Imported Modules]"))
 647 {
 648 struct ModuleImport * module = (((void *)0));
 649
 650 for(; ; )
 651 {
 652 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 653 break;
 654 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 655 if(!strcmp(line, "."))
 656 break;
 657 if(line[0] == '[')
 658 {
 659 struct ClassImport * _class = (((void *)0));
 660 struct FunctionImport * function = (((void *)0));
 661
 662 if(!strcmp(line, "[This]"))
 663 {
 664 if((mainModule = GetMainModule()))
 665 module = mainModule;
 666 else
 667 {
 668 mainModule = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport);
 669 SetMainModule(mainModule);
 670 module = mainModule;
 671 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_imports, module);
 672 }
 673 }
 674 else if(!strcmp(line, "[Static]"))
 675 {
 676 module->importType = 1;
 677 }
 678 else if(!strcmp(line, "[Remote]"))
 679 {
 680 module->importType = 2;
 681 }
 682 else if(!strcmp(line, "[Private]"))
 683 {
 684 if(module->importAccess != 1)
 685 module->importAccess = 2;
 686 }
 687 else if(!strcmp(line, "[Public]"))
 688 {
 689 module->importAccess = 1;
 690 }
 691 else if(!strcmp(line, "[Imported Classes]"))
 692 {
 693 for(; ; )
 694 {
 695 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 696 break;
 697 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 698 if(!strcmp(line, "."))
 699 break;
 700 if(line[0] == '[')
 701 {
 702 if(!strcmp(line, "[Instantiated]"))
 703 {
 704 _class->itself = 0x1;
 705 }
 706 else if(!strcmp(line, "[Remote]"))
 707 {
 708 _class->isRemote = (unsigned int)1;
 709 }
 710 else if(!strcmp(line, "[Imported Methods]"))
 711 {
 712 struct MethodImport * method = (((void *)0));
 713
 714 for(; ; )
 715 {
 716 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 717 break;
 718 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 719 if(!strcmp(line, "."))
 720 break;
 721 if(line[0] != '[')
 722 {
 723 if(!(method = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_class->methods, line, 0x0)))
 724 {
 725 method = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_MethodImport), ((struct MethodImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(line), ((struct MethodImport *)__ecereTemp1));
 726 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_class->methods, method);
 727 }
 728 }
 729 else if(!strcmp(line, "[Virtual]"))
 730 method->isVirtual = 0x1;
 731 }
 732 }
 733 else if(!strcmp(line, "[Imported Properties]"))
 734 {
 735 struct PropertyImport * prop = (((void *)0));
 736
 737 for(; ; )
 738 {
 739 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 740 break;
 741 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 742 if(!strcmp(line, "."))
 743 break;
 744 if(line[0] != '[')
 745 {
 746 if(!(prop = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_class->properties, line, 0x0)))
 747 {
 748 prop = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_PropertyImport), ((struct PropertyImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(line), ((struct PropertyImport *)__ecereTemp1));
 749 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_class->properties, prop);
 750 }
 751 }
 752 else if(!strcmp(line, "[Set]"))
 753 prop->hasSet = 0x1;
 754 else if(!strcmp(line, "[Get]"))
 755 prop->hasGet = 0x1;
 756 else if(!strcmp(line, "[Virtual]"))
 757 prop->isVirtual = 0x1;
 758 }
 759 }
 760 }
 761 else
 762 {
 763 if(!(_class = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&module->classes, line, 0x0)))
 764 {
 765 _class = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ClassImport), ((struct ClassImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(line), ((struct ClassImport *)__ecereTemp1));
 766 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&module->classes, _class);
 767 }
 768 }
 769 }
 770 }
 771 else if(!strcmp(line, "[Imported Functions]"))
 772 {
 773 for(; ; )
 774 {
 775 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
 776 break;
 777 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
 778 if(!strcmp(line, "."))
 779 break;
 780 if(line[0] == '[')
 781 {
 782 }
 783 else
 784 {
 785 if(!(function = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&module->functions, line, 0x0)))
 786 {
 787 function = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_FunctionImport), ((struct FunctionImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(line), ((struct FunctionImport *)__ecereTemp1));
 788 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&module->functions, function);
 789 }
 790 }
 791 }
 792 }
 793 }
 794 else
 795 {
 796 if(!(module = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_imports, line, 0x0)))
 797 {
 798 if(!strcmp(line, "ecereCOM"))
 799 {
 800 module = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_imports, "ecere", 0x0);
 801 }
 802 else if(!strcmp(line, "ecere"))
 803 {
 804 module = __ecereMethod___ecereNameSpace__ecere__sys__OldList_FindName(&_imports, "ecereCOM", 0x0);
 805 if(module)
 806 {
 807 (__ecereNameSpace__ecere__com__eSystem_Delete(module->name), module->name = 0);
 808 module->name = __ecereNameSpace__ecere__sys__CopyString("ecere");
 809 }
 810 }
 811 if(!module)
 812 {
 813 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport), ((struct ModuleImport *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(line), ((struct ModuleImport *)__ecereTemp1));
 814 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_imports, module);
 815 }
 816 }
 817 }
 818 }
 819 }
 820 }
 821 }
 822 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
 823 }
 824 }
 825
 826 static struct __ecereNameSpace__ecere__com__Class * thisAppClass;
 827
 828 struct ModuleInfo
 829 {
 830 struct ModuleInfo * prev, * next;
 831 char * name;
 832 unsigned int globalInstance;
 833 } __attribute__ ((gcc_struct));
 834
 835 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleInfo;
 836
 837 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(char *  string, char *  output);
 838
 839 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
 840
 841 extern char *  strcpy(char * , const char * );
 842
 843 extern void __ecereNameSpace__ecere__sys__ChangeCh(char *  string, char ch1, char ch2);
 844
 845 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
 846
 847 struct ImportedModule
 848 {
 849 struct ImportedModule * prev;
 850 struct ImportedModule * next;
 851 char *  name;
 852 int type;
 853 int importType;
 854 unsigned int globalInstance;
 855 unsigned int dllOnly;
 856 int importAccess;
 857 } __attribute__ ((gcc_struct));
 858
 859 static void BindDCOMServer();
 860
 861 static void BindDCOMClient();
 862
 863 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
 864
 865 extern void FullClassNameCat(char *  output, char *  className, unsigned int includeTemplateParams);
 866
 867 extern void MangleClassName(char *  className);
 868
 869 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_FindMethod(struct __ecereNameSpace__ecere__com__Class * _class, char *  name, struct __ecereNameSpace__ecere__com__Instance * module);
 870
 871 extern struct Context * SetupTemplatesContext(struct __ecereNameSpace__ecere__com__Class * _class);
 872
 873 extern struct Type * ProcessTypeString(char *  string, unsigned int staticMethod);
 874
 875 extern void FinishTemplatesContext(struct Context * context);
 876
 877 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__GlobalFunction;
 878
 879 struct __ecereNameSpace__ecere__com__GlobalFunction
 880 {
 881 struct __ecereNameSpace__ecere__com__GlobalFunction * prev;
 882 struct __ecereNameSpace__ecere__com__GlobalFunction * next;
 883 char *  name;
 884 int (*  function)();
 885 struct __ecereNameSpace__ecere__com__Instance * module;
 886 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 887 char *  dataTypeString;
 888 struct Type * dataType;
 889 void *  symbol;
 890 } __attribute__ ((gcc_struct));
 891
 892 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_FindFunction(struct __ecereNameSpace__ecere__com__Instance * module, char *  name);
 893
 894 extern int sprintf(char * , char * , ...);
 895
 896 extern void __ecereNameSpace__ecere__com__eInstance_Delete(struct __ecereNameSpace__ecere__com__Instance * instance);
 897
 898 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts;
 899
 900 int __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(struct __ecereNameSpace__ecere__com__Instance * this, char *  format, ...);
 901
 902 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
 903
 904 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
 905
 906 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Read;
 907
 908 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Write;
 909
 910 static void WriteMain(char * fileName)
 911 {
 912 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 2);
 913
 914 if(f)
 915 {
 916 struct ModuleImport * module;
 917 struct ModuleInfo * defModule;
 918 unsigned int nonInst = 0x0, anyMethod = 0x0, anyProp = 0x0, anyFunction = 0x0;
 919 struct ImportedModule * importedModule;
 920
 921 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, mainModuleName);
 922 __ecereNameSpace__ecere__sys__StripExtension(mainModuleName);
 923 if(!projectName[0])
 924 {
 925 strcpy(projectName, mainModuleName);
 926 __ecereNameSpace__ecere__sys__StripExtension(projectName);
 927 }
 928 __ecereNameSpace__ecere__sys__ChangeCh(mainModuleName, '.', '_');
 929 __ecereNameSpace__ecere__sys__ChangeCh(mainModuleName, '-', '_');
 930 __ecereNameSpace__ecere__sys__ChangeCh(mainModuleName, ' ', '_');
 931 if(targetPlatform == 1 && !isConsole && !isStaticLibrary && !isDynamicLibrary)
 932 {
 933 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "typedef void * HINSTANCE;\n");
 934 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "#define WINAPI __stdcall\n");
 935 }
 936 for(importedModule = _defines.first; importedModule; importedModule = importedModule->next)
 937 {
 938 if(importedModule->type == 0)
 939 {
 940 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "import ");
 941 if(importedModule->importType == 1)
 942 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "static ", importedModule->name);
 943 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\"%s\"\n", importedModule->name);
 944 }
 945 }
 946 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "default:\n");
 947 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "static Module __currentModule;\n\n");
 948 if(!isStaticLibrary)
 949 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "Module __thisModule;\n\n");
 950 BindDCOMServer();
 951 BindDCOMClient();
 952 if(dcomSymbols)
 953 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereRegisterModule_%s(Module module);\n\n", mainModuleName);
 954 for(module = _imports.first; module; module = module->next)
 955 {
 956 struct ClassImport * _class;
 957 struct FunctionImport * function;
 958
 959 if(module->importType == 1)
 960 {
 961 {
 962 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "bool __ecereDll_Load_%s(Module module);\n", module->name);
 963 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "bool __ecereDll_Unload_%s(Module module);\n", module->name);
 964 }
 965 }
 966 for(_class = module->classes.first; _class; _class = _class->next)
 967 {
 968 struct MethodImport * method;
 969 struct PropertyImport * prop;
 970 char className[1024] = "";
 971 struct __ecereNameSpace__ecere__com__Class * regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, _class->name);
 972
 973 FullClassNameCat(className, _class->name, 0x1);
 974 MangleClassName(className);
 975 if(_class->itself)
 976 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "Class __ecereClass_%s;\n", className);
 977 else
 978 nonInst = 0x1;
 979 {
 980 {
 981 for(method = _class->methods.first; method; method = method->next)
 982 {
 983 struct __ecereNameSpace__ecere__com__Method * meth = __ecereNameSpace__ecere__com__eClass_FindMethod(regClass, method->name, privateModule);
 984
 985 if(meth && !meth->dataType)
 986 {
 987 struct Context * context = SetupTemplatesContext(regClass);
 988
 989 meth->dataType = ProcessTypeString(meth->dataTypeString, 0x0);
 990 FinishTemplatesContext(context);
 991 }
 992 if(method->isVirtual)
 993 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "int __ecereVMethodID_%s_%s;\n", className, method->name);
 994 else if(module->name && module->importType != 1 && (!meth || !meth->dataType->dllExport))
 995 {
 996 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "int (*__ecereMethod_%s_%s)();\n", className, method->name);
 997 }
 998 anyMethod = 0x1;
 999 }
1000 }
1001 for(prop = _class->properties.first; prop; prop = prop->next)
1002 {
1003 char propName[1024];
1004
1005 propName[0] = (char)0;
1006 FullClassNameCat(propName, prop->name, 0x1);
1007 MangleClassName(propName);
1008 if(module->name && module->importType != 1)
1009 {
1010 if(prop->hasSet)
1011 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void * __ecereProp_%s_Set_%s;\n", className, propName);
1012 if(prop->hasGet)
1013 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void * __ecereProp_%s_Get_%s;\n", className, propName);
1014 }
1015 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "Property __ecereProp_%s_%s;\n", className, propName);
1016 anyProp = 0x1;
1017 }
1018 }
1019 }
1020 for(function = module->functions.first; function; function = function->next)
1021 {
1022 struct __ecereNameSpace__ecere__com__GlobalFunction * func = __ecereNameSpace__ecere__com__eSystem_FindFunction(privateModule, function->name);
1023
1024 if(func && !func->dataType)
1025 func->dataType = ProcessTypeString(func->dataTypeString, 0x0);
1026 if(module->name && module->importType != 1 && (!func || !func->dataType || !func->dataType->dllExport))
1027 {
1028 char functionName[1024];
1029
1030 functionName[0] = (char)0;
1031 FullClassNameCat(functionName, function->name, 0x0);
1032 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void * __ecereFunction_%s;\n", functionName);
1033 anyFunction = 0x1;
1034 }
1035 }
1036 }
1037 for(defModule = modules.first; defModule; defModule = defModule->next)
1038 {
1039 char moduleName[1024];
1040
1041 strcpy(moduleName, defModule->name);
1042 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, ' ', '_');
1043 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '-', '_');
1044 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '.', '_');
1045 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereRegisterModule_%s(Module module);\n", moduleName);
1046 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereUnregisterModule_%s(Module module);\n", moduleName);
1047 if(defModule->globalInstance)
1048 {
1049 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereCreateModuleInstances_%s();\n", moduleName);
1050 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "void __ecereDestroyModuleInstances_%s();\n", moduleName);
1051 }
1052 }
1053 if(dcomSymbols)
1054 {
1055 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1056 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))dcomSymbols->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(dcomSymbols, 0, 0);
1057 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))dcomSymbols->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(dcomSymbols))
1058 {
1059 char buffer[4096];
1060 int read = ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))dcomSymbols->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Read])(dcomSymbols, buffer, 1, sizeof buffer);
1061
1062 if(!read)
1063 break;
1064 ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Write])(f, buffer, 1, read);
1065 }
1066 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1067 }
1068 if(isStaticLibrary)
1069 {
1070 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\nbool __ecereDll_Load_%s(Module module)\n{\n", projectName);
1071 }
1072 else if(isDynamicLibrary)
1073 {
1074 if(targetPlatform == 1)
1075 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __stdcall __ecereDll_Load(Module module)\n{\n");
1076 else
1077 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __ecereDll_Load(Module module)\n{\n");
1078 }
1079 else if(targetPlatform == 1 && !isConsole)
1080 {
1081 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\nint WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInst, char * cmdLine, int show)\n{\n");
1082 }
1083 else
1084 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\nint main(int _argc, char * _argv[])\n{\n");
1085 if(!isDynamicLibrary)
1086 {
1087 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   int exitCode;\n");
1088 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   Module module;\n");
1089 }
1090 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   Class _class;\n");
1091 if(anyMethod)
1092 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   Method method;\n");
1093 if(anyProp)
1094 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   Property _property;\n");
1095 if(anyFunction)
1096 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   GlobalFunction function;\n");
1097 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n");
1098 if(isDynamicLibrary)
1099 {
1100 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(!__currentModule)\n");
1101 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
1102 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __currentModule = module;\n");
1103 if(!isStaticLibrary)
1104 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __thisModule = module;\n");
1105 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n\n");
1106 }
1107 else if(targetPlatform == 1 && !isConsole)
1108 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __thisModule = __currentModule = module = __ecere_COM_Initialize(1, 0, null);\n\n");
1109 else
1110 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   __thisModule = __currentModule = module = __ecere_COM_Initialize(1, _argc, (void *)_argv);\n\n");
1111 if(_imports.count)
1112 {
1113 for(module = _imports.first; module; module = module->next)
1114 {
1115 if(module->name)
1116 {
1117 {
1118 if(module->importType == 1)
1119 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   eModule_LoadStatic(module, \"%s\", %s, __ecereDll_Load_%s, __ecereDll_Unload_%s);\n", module->name, (module->importAccess == 2) ? "privateAccess" : "publicAccess", module->name, module->name);
1120 else
1121 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   eModule_Load(module, \"%s\", %s);\n", module->name, (module->importAccess == 2) ? "privateAccess" : "publicAccess");
1122 }
1123 }
1124 }
1125 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1126 }
1127 if(modules.count)
1128 {
1129 for(defModule = modules.first; defModule; defModule = defModule->next)
1130 {
1131 char moduleName[1024];
1132
1133 strcpy(moduleName, defModule->name);
1134 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, ' ', '_');
1135 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '-', '_');
1136 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '.', '_');
1137 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereRegisterModule_%s(module);\n", moduleName);
1138 }
1139 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1140 }
1141 if(dcomSymbols)
1142 {
1143 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereRegisterModule_%s(module);\n\n", mainModuleName);
1144 (__ecereNameSpace__ecere__com__eInstance_DecRef(dcomSymbols), dcomSymbols = 0);
1145 }
1146 if(isDynamicLibrary)
1147 {
1148 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
1149 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
1150 }
1151 for(module = _imports.first; module; module = module->next)
1152 {
1153 struct ClassImport * _class;
1154 struct FunctionImport * function;
1155
1156 if(module->classes.count)
1157 {
1158 for(_class = module->classes.first; _class; _class = _class->next)
1159 {
1160 struct __ecereNameSpace__ecere__com__Class * regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, _class->name);
1161
1162 {
1163 struct MethodImport * method;
1164 struct PropertyImport * prop;
1165 char classID[1024];
1166 char className[1024] = "";
1167
1168 FullClassNameCat(className, _class->name, 0x1);
1169 MangleClassName(className);
1170 if(_class->itself)
1171 sprintf(classID, "__ecereClass_%s", className);
1172 else
1173 strcpy(classID, "_class");
1174 if(isDynamicLibrary && !isStaticLibrary)
1175 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   %s = eSystem_FindClass(__currentModule, \"%s\");\n", classID, _class->name);
1176 else
1177 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   %s = eSystem_FindClass(module, \"%s\");\n", classID, _class->name);
1178 for(method = _class->methods.first; method; method = method->next)
1179 {
1180 struct __ecereNameSpace__ecere__com__Method * meth = __ecereNameSpace__ecere__com__eClass_FindMethod(regClass, method->name, privateModule);
1181
1182 if(!meth || !meth->dataType->dllExport)
1183 {
1184 if(method->isVirtual || (module->name && module->importType != 1))
1185 {
1186 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   method = eClass_FindMethod(%s, \"%s\", module);\n", classID, method->name);
1187 if(method->isVirtual)
1188 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   if(method) __ecereVMethodID_%s_%s = method.vid;\n", className, method->name);
1189 else
1190 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   if(method) __ecereMethod_%s_%s = method.function;\n", className, method->name);
1191 }
1192 }
1193 }
1194 for(prop = _class->properties.first; prop; prop = prop->next)
1195 {
1196 char propName[1024];
1197
1198 propName[0] = (char)0;
1199 FullClassNameCat(propName, prop->name, 0x1);
1200 MangleClassName(propName);
1201 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereProp_%s_%s = _property = eClass_FindProperty(%s, \"%s\", module);\n", className, propName, classID, prop->name);
1202 if(module->name && module->importType != 1)
1203 {
1204 if(prop->hasSet)
1205 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereProp_%s_Set_%s = _property.Set;\n", className, propName);
1206 if(prop->hasGet)
1207 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereProp_%s_Get_%s = _property.Get;\n", className, propName);
1208 }
1209 }
1210 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1211 }
1212 }
1213 }
1214 if(module->functions.count)
1215 {
1216 for(function = module->functions.first; function; function = function->next)
1217 {
1218 struct __ecereNameSpace__ecere__com__GlobalFunction * func = __ecereNameSpace__ecere__com__eSystem_FindFunction(privateModule, function->name);
1219
1220 if(module->name && module->importType != 1 && (!func || !func->dataType || !func->dataType->dllExport))
1221 {
1222 char functionName[1024];
1223
1224 functionName[0] = (char)0;
1225 FullClassNameCat(functionName, function->name, 0x0);
1226 if(isDynamicLibrary && !isStaticLibrary)
1227 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   function = eSystem_FindFunction(__currentModule, \"%s\");\n", function->name);
1228 else
1229 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   function = eSystem_FindFunction(module, \"%s\");\n", function->name);
1230 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   if(function) __ecereFunction_%s = function.function;\n", functionName);
1231 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1232 }
1233 }
1234 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1235 }
1236 }
1237 for(defModule = modules.first; defModule; defModule = defModule->next)
1238 if(defModule->globalInstance)
1239 {
1240 if(!strcmp(defModule->name, "i18n"))
1241 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereCreateModuleInstances_i18n();\n");
1242 }
1243 if(i18n)
1244 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      LoadTranslatedStrings(module, \"%s\");\n", projectName);
1245 if(isDynamicLibrary)
1246 {
1247 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n");
1248 }
1249 if(!isDynamicLibrary && thisAppClass)
1250 {
1251 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   _class = eSystem_FindClass(__currentModule, \"%s\");\n", thisAppClass->name);
1252 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   eInstance_Evolve((Instance *)&__currentModule, _class);\n");
1253 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __thisModule = __currentModule;\n");
1254 }
1255 if(isDynamicLibrary)
1256 {
1257 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
1258 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
1259 }
1260 if(modules.count)
1261 {
1262 for(defModule = modules.first; defModule; defModule = defModule->next)
1263 if(defModule->globalInstance)
1264 {
1265 char moduleName[1024];
1266
1267 if(!strcmp(defModule->name, "i18n"))
1268 continue;
1269 strcpy(moduleName, defModule->name);
1270 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, ' ', '_');
1271 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '-', '_');
1272 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '.', '_');
1273 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereCreateModuleInstances_%s();\n", moduleName);
1274 }
1275 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1276 }
1277 if(isDynamicLibrary)
1278 {
1279 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n");
1280 }
1281 if(!isDynamicLibrary && thisAppClass)
1282 {
1283 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   ((void(*)(void *))(void *)__currentModule._vTbl[12])(__currentModule);\n");
1284 }
1285 if(isDynamicLibrary)
1286 {
1287 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   return true;\n");
1288 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}\n");
1289 if(isStaticLibrary)
1290 {
1291 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\nbool __ecereDll_Unload_%s(Module module)\n{\n", projectName);
1292 }
1293 else
1294 {
1295 if(targetPlatform == 1)
1296 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __stdcall __ecereDll_Unload(Module module)\n{\n");
1297 else
1298 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\ndllexport bool __ecereDll_Unload(Module module)\n{\n");
1299 }
1300 }
1301 if(isDynamicLibrary)
1302 {
1303 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
1304 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   {\n");
1305 }
1306 {
1307 unsigned int destroyI18n = 0x0;
1308
1309 if(modules.count)
1310 {
1311 for(defModule = modules.first; defModule; defModule = defModule->next)
1312 if(defModule->globalInstance)
1313 {
1314 char moduleName[1024];
1315
1316 if(!strcmp(defModule->name, "i18n"))
1317 {
1318 destroyI18n = 0x1;
1319 continue;
1320 }
1321 strcpy(moduleName, defModule->name);
1322 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, ' ', '_');
1323 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '-', '_');
1324 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '.', '_');
1325 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereDestroyModuleInstances_%s();\n", moduleName);
1326 }
1327 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1328 }
1329 if(i18n)
1330 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   UnloadTranslatedStrings(__currentModule);\n");
1331 if(destroyI18n)
1332 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereDestroyModuleInstances_i18n();\n");
1333 }
1334 if(isDynamicLibrary)
1335 {
1336 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   }\n");
1337 if(isDynamicLibrary)
1338 {
1339 }
1340 if(modules.count)
1341 {
1342 for(defModule = modules.first; defModule; defModule = defModule->next)
1343 {
1344 char moduleName[1024];
1345
1346 strcpy(moduleName, defModule->name);
1347 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, ' ', '_');
1348 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '-', '_');
1349 __ecereNameSpace__ecere__sys__ChangeCh(moduleName, '.', '_');
1350 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   __ecereUnregisterModule_%s(module);\n", moduleName);
1351 }
1352 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1353 }
1354 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__currentModule == module)\n");
1355 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __currentModule = (void *)0;\n");
1356 if(!isStaticLibrary)
1357 {
1358 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   if(__thisModule == module)\n");
1359 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "      __thisModule = (void *)0;\n");
1360 }
1361 }
1362 if(!isDynamicLibrary)
1363 {
1364 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "\n   _class = eSystem_FindClass(__currentModule, \"ecere::com::Application\");\n   exitCode = ((ecere::com::Application)__currentModule).exitCode;\n   delete __currentModule;\n   return exitCode;\n");
1365 }
1366 else
1367 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "   return true;\n");
1368 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, "}\n");
1369 __ecereNameSpace__ecere__com__eInstance_Delete(f);
1370 }
1371 }
1372
1373 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__BTNamedLink;
1374
1375 struct __ecereNameSpace__ecere__com__BTNamedLink
1376 {
1377 char *  name;
1378 struct __ecereNameSpace__ecere__com__BTNamedLink * parent;
1379 struct __ecereNameSpace__ecere__com__BTNamedLink * left;
1380 struct __ecereNameSpace__ecere__com__BTNamedLink * right;
1381 int depth;
1382 void *  data;
1383 } __attribute__ ((gcc_struct));
1384
1385 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(struct __ecereNameSpace__ecere__sys__BinaryTree * this);
1386
1387 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__sys__BinaryTree_first;
1388
1389 struct __ecereNameSpace__ecere__sys__BTNode * __ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(struct __ecereNameSpace__ecere__sys__BTNode * this);
1390
1391 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__sys__BTNode_next;
1392
1393 static struct __ecereNameSpace__ecere__com__Class * FindAppClass(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace, unsigned int thisModule)
1394 {
1395 struct __ecereNameSpace__ecere__com__BTNamedLink * link;
1396 struct __ecereNameSpace__ecere__com__NameSpace * ns;
1397
1398 for(link = (struct __ecereNameSpace__ecere__com__BTNamedLink *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&(*nameSpace).classes); link; link = (struct __ecereNameSpace__ecere__com__BTNamedLink *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)link)))
1399 {
1400 struct __ecereNameSpace__ecere__com__Class * _class = link->data;
1401
1402 if(strcmp(_class->fullName, "ecere::com::Application") && (!thisModule || _class->module == privateModule))
1403 {
1404 struct __ecereNameSpace__ecere__com__Class * base;
1405
1406 for(base = _class->base; base && base->type != 1000; base = base->base)
1407 if(!strcmp(base->fullName, "ecere::com::Application"))
1408 return _class;
1409 }
1410 }
1411 for(ns = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&(*nameSpace).nameSpaces); ns; ns = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)ns)))
1412 {
1413 struct __ecereNameSpace__ecere__com__Class * _class = FindAppClass(ns, thisModule);
1414
1415 if(_class)
1416 return _class;
1417 }
1418 return (((void *)0));
1419 }
1420
1421 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1422
1423 struct __ecereNameSpace__ecere__com__Module
1424 {
1425 struct __ecereNameSpace__ecere__com__Instance * application;
1426 struct __ecereNameSpace__ecere__sys__OldList classes;
1427 struct __ecereNameSpace__ecere__sys__OldList defines;
1428 struct __ecereNameSpace__ecere__sys__OldList functions;
1429 struct __ecereNameSpace__ecere__sys__OldList modules;
1430 struct __ecereNameSpace__ecere__com__Instance * prev;
1431 struct __ecereNameSpace__ecere__com__Instance * next;
1432 char *  name;
1433 void *  library;
1434 void *  Unload;
1435 int importType;
1436 int origImportType;
1437 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1438 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1439 } __attribute__ ((gcc_struct));
1440
1441 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SubModule;
1442
1443 struct __ecereNameSpace__ecere__com__SubModule
1444 {
1445 struct __ecereNameSpace__ecere__com__SubModule * prev;
1446 struct __ecereNameSpace__ecere__com__SubModule * next;
1447 struct __ecereNameSpace__ecere__com__Instance * module;
1448 int importMode;
1449 } __attribute__ ((gcc_struct));
1450
1451 static struct __ecereNameSpace__ecere__com__Class * SearchAppClass_Module(struct __ecereNameSpace__ecere__com__Instance * module)
1452 {
1453 struct __ecereNameSpace__ecere__com__Class * appClass;
1454 struct __ecereNameSpace__ecere__com__SubModule * subModule;
1455
1456 appClass = FindAppClass(&((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + structSize_Instance)))->publicNameSpace, 0x0);
1457 if(appClass)
1458 return appClass;
1459 appClass = FindAppClass(&((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + structSize_Instance)))->privateNameSpace, 0x0);
1460 if(appClass)
1461 return appClass;
1462 for(subModule = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + structSize_Instance)))->modules.first; subModule; subModule = subModule->next)
1463 {
1464 appClass = SearchAppClass_Module(subModule->module);
1465 if(appClass)
1466 return appClass;
1467 }
1468 return (((void *)0));
1469 }
1470
1471 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldLink;
1472
1473 struct __ecereNameSpace__ecere__sys__OldLink
1474 {
1475 struct __ecereNameSpace__ecere__sys__OldLink * prev;
1476 struct __ecereNameSpace__ecere__sys__OldLink * next;
1477 void *  data;
1478 } __attribute__ ((gcc_struct));
1479
1480 extern void DeclareClass(struct Symbol * classSym, char *  className);
1481
1482 extern struct Symbol * FindClass(char *  name);
1483
1484 extern struct __ecereNameSpace__ecere__sys__OldList *  MkList(void);
1485
1486 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
1487
1488 extern struct Declarator * SpecDeclFromString(char *  string, struct __ecereNameSpace__ecere__sys__OldList *  specs, struct Declarator * baseDecl);
1489
1490 extern struct Declarator * MkDeclaratorIdentifier(struct Identifier * id);
1491
1492 extern struct Identifier * MkIdentifier(char *  string);
1493
1494 extern struct TypeName * MkTypeName(struct __ecereNameSpace__ecere__sys__OldList * qualifiers, struct Declarator * declarator);
1495
1496 extern void OutputTypeName(struct TypeName * type, struct __ecereNameSpace__ecere__com__Instance * f, unsigned int typeName);
1497
1498 extern char *  strcat(char * , const char * );
1499
1500 extern void DeclareMethod(struct __ecereNameSpace__ecere__com__Method * method, char *  name);
1501
1502 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__TempFile;
1503
1504 static void BindDCOMClient()
1505 {
1506 struct __ecereNameSpace__ecere__com__Class * dcomClientObjectClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::net::DCOMClientObject");
1507 struct __ecereNameSpace__ecere__sys__OldLink * deriv;
1508
1509 if(dcomClientObjectClass && dcomClientObjectClass->derivatives.first)
1510 {
1511 struct __ecereNameSpace__ecere__com__Instance * f;
1512
1513 if(!dcomSymbols)
1514 dcomSymbols = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
1515 f = dcomSymbols;
1516 for(deriv = dcomClientObjectClass->derivatives.first; deriv; deriv = deriv->next)
1517 {
1518 struct __ecereNameSpace__ecere__com__Class * _class = deriv->data;
1519 struct __ecereNameSpace__ecere__com__Method * method, * next;
1520 int id = 0;
1521 int vid;
1522 unsigned int doVirtual;
1523
1524 DeclareClass(FindClass("ecere::net::DCOMClientObject"), "__ecereClass___ecereNameSpace__ecere__net__DCOMClientObject");
1525 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "class %s : ecere::net::DCOMClientObject\n", _class->fullName);
1526 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "{\n");
1527 if(_class->vTblSize > _class->base->vTblSize)
1528 {
1529 int vid;
1530
1531 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   virtual void CallVirtualMethod(uint __ecereMethodID, SerialBuffer __ecereBuffer)\n");
1532 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1533 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      switch(__ecereMethodID)\n");
1534 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1535 for(vid = _class->base->vTblSize; vid < _class->vTblSize; vid++)
1536 {
1537 struct __ecereNameSpace__ecere__com__Method * method;
1538
1539 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
1540 {
1541 if(method->type == 1 && method->_class == _class && method->vid == vid)
1542 break;
1543 }
1544 if(method)
1545 {
1546 struct Type * param;
1547
1548 method->dataType = ProcessTypeString(method->dataTypeString, 0x0);
1549 if(method->dataType && method->dataType->name)
1550 {
1551 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         case %d:\n", vid - _class->base->vTblSize);
1552 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         {\n");
1553 {
1554 if(method->dataType->returnType->kind != 0)
1555 {
1556 struct TypeName * resultType;
1557 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1558 struct Declarator * decl;
1559 char type[1024] = "";
1560 char className[1024];
1561 struct Symbol * classSym;
1562
1563 if(method->dataType->returnType->kind == 8)
1564 classSym = method->dataType->returnType->_class;
1565 else
1566 {
1567 PrintType(method->dataType->returnType, type, 0x0, 0x1);
1568 classSym = FindClass(type);
1569 type[0] = (char)0;
1570 }
1571 strcpy(className, "__ecereClass_");
1572 FullClassNameCat(className, classSym->string, 0x1);
1573 MangleClassName(className);
1574 DeclareClass(classSym, className);
1575 PrintType(method->dataType->returnType, type, 0x1, 0x1);
1576 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1577 resultType = MkTypeName(specs, decl);
1578 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1579 OutputTypeName(resultType, f, 0x0);
1580 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1581 }
1582 for(param = method->dataType->params.first; param; param = param->next)
1583 {
1584 if(param->kind == 8 && !strcmp(param->_class->string, "String"))
1585 {
1586 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            char %s[1024];\n", param->name);
1587 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1588 DeclareClass(FindClass("String"), "__ecereClass_String");
1589 }
1590 else
1591 {
1592 struct TypeName * paramTypeName;
1593 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1594 struct Declarator * decl;
1595 char type[1024] = "";
1596 char className[1024];
1597 struct Symbol * classSym;
1598
1599 if(param->kind == 8)
1600 classSym = param->_class;
1601 else
1602 {
1603 PrintType(param, type, 0x0, 0x1);
1604 classSym = FindClass(type);
1605 type[0] = (char)0;
1606 }
1607 strcpy(className, "__ecereClass_");
1608 FullClassNameCat(className, classSym->string, 0x1);
1609 MangleClassName(className);
1610 DeclareClass(classSym, className);
1611 PrintType(param, type, 0x1, 0x1);
1612 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier(param->name)));
1613 paramTypeName = MkTypeName(specs, decl);
1614 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1615 OutputTypeName(paramTypeName, f, 0x0);
1616 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1617 }
1618 }
1619 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1620 for(param = method->dataType->params.first; param; param = param->next)
1621 {
1622 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Unserialize(");
1623 if(param->kind == 8 && !strcmp(param->_class->string, "String"))
1624 {
1625 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1626 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "(StaticString)");
1627 }
1628 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, param->name);
1629 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1630 }
1631 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1632 if(method->dataType->returnType->kind != 0)
1633 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "__ecereResult = ");
1634 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s(", method->name);
1635 for(param = method->dataType->params.first; param; param = param->next)
1636 {
1637 if(param->prev)
1638 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ", ");
1639 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s", param->name);
1640 }
1641 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1642 for(param = method->dataType->params.first; param; param = param->next)
1643 {
1644 if(param->kind == 8 && ((param->_class && param->_class->registered && param->_class->registered->type == 1) || !strcmp(param->_class->string, "String")) && !param->constant)
1645 {
1646 if(!strcmp(param->_class->string, "String"))
1647 {
1648 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1649 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize((StaticString)%s);\n", param->name);
1650 }
1651 else
1652 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(%s);\n", param->name);
1653 }
1654 }
1655 if(method->dataType->returnType->kind != 0)
1656 {
1657 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(__ecereResult);\n");
1658 }
1659 for(param = method->dataType->params.first; param; param = param->next)
1660 {
1661 if(param->kind == 8 && strcmp(param->_class->string, "String") && param->_class->registered && (param->_class->registered->type == 0 || param->_class->registered->type == 5))
1662 {
1663 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete %s;\n", param->name);
1664 }
1665 }
1666 if(method->dataType->returnType->kind == 8 && strcmp(method->dataType->returnType->_class->string, "String") && method->dataType->returnType->_class->registered && (method->dataType->returnType->_class->registered->type == 0 || method->dataType->returnType->_class->registered->type == 5))
1667 {
1668 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete __ecereResult;\n");
1669 }
1670 }
1671 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            break;\n");
1672 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         }\n");
1673 }
1674 }
1675 }
1676 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
1677 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
1678 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1679 }
1680 doVirtual = 0x1;
1681 id = 0;
1682 vid = _class->base->vTblSize;
1683 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods);
1684 while(next && ((next->type == 1) != doVirtual || (doVirtual && next->vid != vid)))
1685 {
1686 id++;
1687 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)next));
1688 if(!next && doVirtual)
1689 {
1690 if(vid == _class->vTblSize)
1691 doVirtual = 0x0;
1692 else
1693 vid++;
1694 id = 0;
1695 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods);
1696 }
1697 }
1698 for(method = next; method; method = next)
1699 {
1700 struct Type * param;
1701
1702 if(!method->dataType)
1703 method->dataType = ProcessTypeString(method->dataTypeString, 0x0);
1704 if(method->dataType->name)
1705 {
1706 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   ");
1707 if(doVirtual)
1708 {
1709 char name[1024];
1710
1711 strcpy(name, "__ecereVMethodID_");
1712 FullClassNameCat(name, method->_class->fullName, 0x1);
1713 strcat(name, "_");
1714 strcat(name, method->name);
1715 DeclareMethod(method, name);
1716 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "virtual ");
1717 }
1718 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s\n", method->dataTypeString);
1719 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1720 if(method->dataType)
1721 {
1722 if(method->dataType->returnType->kind != 0)
1723 {
1724 struct TypeName * resultType;
1725 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1726 struct Declarator * decl;
1727 char type[1024] = "";
1728 char className[1024];
1729 struct Symbol * classSym;
1730
1731 if(method->dataType->returnType->kind == 8)
1732 classSym = method->dataType->returnType->_class;
1733 else
1734 {
1735 PrintType(method->dataType->returnType, type, 0x0, 0x1);
1736 classSym = FindClass(type);
1737 type[0] = (char)0;
1738 }
1739 strcpy(className, "__ecereClass_");
1740 FullClassNameCat(className, classSym->string, 0x1);
1741 MangleClassName(className);
1742 DeclareClass(classSym, className);
1743 PrintType(method->dataType->returnType, type, 0x1, 0x1);
1744 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1745 resultType = MkTypeName(specs, decl);
1746 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      ");
1747 OutputTypeName(resultType, f, 0x0);
1748 if(method->dataType->returnType->kind == 9)
1749 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = { 0 }");
1750 else if(method->dataType->returnType->kind == 8 && method->dataType->returnType->_class->registered && method->dataType->returnType->_class->registered->type == 1)
1751 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " { }");
1752 else
1753 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = 0");
1754 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n\n");
1755 }
1756 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      incref this;\n");
1757 for(param = method->dataType->params.first; param; param = param->next)
1758 {
1759 char type[1024] = "";
1760 char className[1024];
1761 struct Symbol * classSym;
1762
1763 if(param->kind == 8)
1764 classSym = param->_class;
1765 else
1766 {
1767 PrintType(param, type, 0x0, 0x1);
1768 classSym = FindClass(type);
1769 type[0] = (char)0;
1770 }
1771 strcpy(className, "__ecereClass_");
1772 FullClassNameCat(className, classSym->string, 0x1);
1773 MangleClassName(className);
1774 DeclareClass(classSym, className);
1775 if(param->kind == 8 && !strcmp(param->_class->string, "String"))
1776 {
1777 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1778 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereBuffer.Serialize((StaticString)%s);\n", param->name);
1779 }
1780 else
1781 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereBuffer.Serialize(%s);\n", param->name);
1782 }
1783 DeclareMethod(__ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::net::DCOMClientObject"), "CallMethod", privateModule), "__ecereMethod___ecereNameSpace__ecere__net__DCOMClientObject_CallMethod");
1784 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      if(DCOMClientObject::CallMethod(%d))\n", id++);
1785 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1786 for(param = method->dataType->params.first; param; param = param->next)
1787 {
1788 if(param->kind == 8 && ((param->_class && param->_class->registered && param->_class->registered->type == 1) || !strcmp(param->_class->string, "String")) && !param->constant)
1789 {
1790 if(!strcmp(param->_class->string, "String"))
1791 {
1792 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1793 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize((StaticString)%s);\n", param->name);
1794 }
1795 else
1796 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize(%s);\n", param->name);
1797 }
1798 }
1799 if(method->dataType->returnType->kind != 0)
1800 {
1801 if(method->dataType->returnType->kind == 8 && !strcmp(method->dataType->returnType->_class->string, "String"))
1802 {
1803 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1804 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize((StaticString)__ecereResult);\n");
1805 }
1806 else
1807 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereBuffer.Unserialize(__ecereResult);\n");
1808 }
1809 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
1810 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereBuffer.Free();\n");
1811 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      delete this;\n");
1812 if(method->dataType->returnType->kind != 0)
1813 {
1814 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      return __ecereResult;\n");
1815 }
1816 }
1817 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
1818 }
1819 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method));
1820 while(next && ((next->type == 1) != doVirtual || (doVirtual && next->vid != vid)))
1821 {
1822 id++;
1823 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)next));
1824 if(!next && doVirtual)
1825 {
1826 if(vid == _class->vTblSize)
1827 doVirtual = 0x0;
1828 else
1829 vid++;
1830 id = 0;
1831 next = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods);
1832 }
1833 }
1834 if(next)
1835 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1836 }
1837 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "}\n");
1838 if(deriv->next)
1839 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1840 }
1841 }
1842 }
1843
1844 static void BindDCOMServer()
1845 {
1846 unsigned int mutexDeclared = 0x0;
1847 struct __ecereNameSpace__ecere__com__Class * _class;
1848
1849 for(_class = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)privateModule + structSize_Instance)))->classes.first; _class; _class = _class->next)
1850 {
1851 if(_class->isRemote == (unsigned int)3)
1852 break;
1853 }
1854 if(_class)
1855 {
1856 struct __ecereNameSpace__ecere__com__Instance * f;
1857
1858 if(!dcomSymbols)
1859 dcomSymbols = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
1860 f = dcomSymbols;
1861 DeclareClass(FindClass("ecere::net::DCOMServerObject"), "__ecereClass___ecereNameSpace__ecere__net__DCOMServerObject");
1862 for(_class = ((struct __ecereNameSpace__ecere__com__Module *)(((char *)privateModule + structSize_Instance)))->classes.first; _class; _class = _class->next)
1863 {
1864 if(_class->isRemote == (unsigned int)3)
1865 {
1866 struct __ecereNameSpace__ecere__com__Method * method;
1867 int id = 0;
1868 int vid;
1869
1870 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "class DCOM%s : ecere::net::DCOMServerObject\n", _class->fullName);
1871 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "{\n");
1872 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   virtual void CallMethod(uint __ecereMethodID, SerialBuffer __ecereBuffer)\n");
1873 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
1874 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      %s inst = (%s)instance;\n", _class->fullName, _class->fullName);
1875 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      incref inst;\n");
1876 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      switch(__ecereMethodID)\n");
1877 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
1878 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
1879 {
1880 struct Type * param;
1881
1882 method->dataType = ProcessTypeString(method->dataTypeString, 0x0);
1883 if(method->dataType && method->dataType->name)
1884 {
1885 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         case %d:\n", id++);
1886 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         {\n");
1887 {
1888 if(method->dataType->returnType->kind != 0)
1889 {
1890 struct TypeName * resultType;
1891 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1892 struct Declarator * decl;
1893 char type[1024] = "";
1894 char className[1024];
1895 struct Symbol * classSym;
1896
1897 if(method->dataType->returnType->kind == 8)
1898 classSym = method->dataType->returnType->_class;
1899 else
1900 {
1901 PrintType(method->dataType->returnType, type, 0x0, 0x1);
1902 classSym = FindClass(type);
1903 type[0] = (char)0;
1904 }
1905 strcpy(className, "__ecereClass_");
1906 FullClassNameCat(className, classSym->string, 0x1);
1907 MangleClassName(className);
1908 DeclareClass(classSym, className);
1909 PrintType(method->dataType->returnType, type, 0x1, 0x1);
1910 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
1911 resultType = MkTypeName(specs, decl);
1912 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1913 OutputTypeName(resultType, f, 0x0);
1914 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1915 }
1916 for(param = method->dataType->params.first; param; param = param->next)
1917 {
1918 if(param->kind == 8 && !strcmp(param->_class->string, "String"))
1919 {
1920 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            char %s[1024];\n", param->name);
1921 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1922 DeclareClass(FindClass("String"), "__ecereClass_String");
1923 }
1924 else
1925 {
1926 struct TypeName * paramTypeName;
1927 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
1928 struct Declarator * decl;
1929 char type[1024] = "";
1930 char className[1024];
1931 struct Symbol * classSym;
1932
1933 if(param->kind == 8)
1934 classSym = param->_class;
1935 else
1936 {
1937 PrintType(param, type, 0x0, 0x1);
1938 classSym = FindClass(type);
1939 type[0] = (char)0;
1940 }
1941 strcpy(className, "__ecereClass_");
1942 FullClassNameCat(className, classSym->string, 0x1);
1943 MangleClassName(className);
1944 DeclareClass(classSym, className);
1945 PrintType(param, type, 0x1, 0x1);
1946 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier(param->name)));
1947 paramTypeName = MkTypeName(specs, decl);
1948 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1949 OutputTypeName(paramTypeName, f, 0x0);
1950 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n");
1951 }
1952 }
1953 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
1954 for(param = method->dataType->params.first; param; param = param->next)
1955 {
1956 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Unserialize(");
1957 if(param->kind == 8 && !strcmp(param->_class->string, "String"))
1958 {
1959 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1960 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "(StaticString)");
1961 }
1962 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(f, param->name);
1963 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1964 }
1965 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            ");
1966 if(method->dataType->returnType->kind != 0)
1967 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "__ecereResult = ");
1968 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "((%s)instance).%s(", _class->fullName, method->name);
1969 for(param = method->dataType->params.first; param; param = param->next)
1970 {
1971 if(param->prev)
1972 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ", ");
1973 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s", param->name);
1974 }
1975 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
1976 for(param = method->dataType->params.first; param; param = param->next)
1977 {
1978 if(param->kind == 8 && ((param->_class && param->_class->registered && param->_class->registered->type == 1) || !strcmp(param->_class->string, "String")) && !param->constant)
1979 {
1980 if(!strcmp(param->_class->string, "String"))
1981 {
1982 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
1983 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize((StaticString)%s);\n", param->name);
1984 }
1985 else
1986 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(%s);\n", param->name);
1987 }
1988 }
1989 if(method->dataType->returnType->kind != 0)
1990 {
1991 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            __ecereBuffer.Serialize(__ecereResult);\n");
1992 }
1993 for(param = method->dataType->params.first; param; param = param->next)
1994 {
1995 if(param->kind == 8 && strcmp(param->_class->string, "String") && param->_class->registered && (param->_class->registered->type == 0 || param->_class->registered->type == 5))
1996 {
1997 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete %s;\n", param->name);
1998 }
1999 }
2000 if(method->dataType->returnType->kind == 8 && strcmp(method->dataType->returnType->_class->string, "String") && method->dataType->returnType->_class->registered && (method->dataType->returnType->_class->registered->type == 0 || method->dataType->returnType->_class->registered->type == 5))
2001 {
2002 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            delete __ecereResult;\n");
2003 }
2004 }
2005 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            break;\n");
2006 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         }\n");
2007 }
2008 }
2009 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
2010 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      delete inst;\n");
2011 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
2012 for(vid = _class->base->vTblSize; vid < _class->vTblSize; vid++)
2013 {
2014 struct __ecereNameSpace__ecere__com__Method * method;
2015 struct Type * param;
2016
2017 for(method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BinaryTree_Get_first(&_class->methods); method; method = (struct __ecereNameSpace__ecere__com__Method *)__ecereProp___ecereNameSpace__ecere__sys__BTNode_Get_next(((struct __ecereNameSpace__ecere__sys__BTNode *)method)))
2018 if(method->type == 1 && method->_class == _class && method->vid == vid)
2019 break;
2020 if(method)
2021 {
2022 if(!mutexDeclared)
2023 {
2024 DeclareClass(FindClass("ecere::sys::Mutex"), "__ecereClass___ecereNameSpace__ecere__sys__Mutex");
2025 DeclareMethod(__ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::sys::Mutex"), "Wait", privateModule), "__ecereMethod___ecereNameSpace__ecere__sys__Mutex_Wait");
2026 DeclareMethod(__ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::sys::Mutex"), "Release", privateModule), "__ecereMethod___ecereNameSpace__ecere__sys__Mutex_Release");
2027 mutexDeclared = 0x1;
2028 }
2029 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "\n");
2030 if(!method->dataType)
2031 method->dataType = ProcessTypeString(method->dataTypeString, 0x0);
2032 if(method->dataType->name)
2033 {
2034 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   virtual %s\n", method->dataTypeString);
2035 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   {\n");
2036 if(method->dataType)
2037 {
2038 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      DCOM%s __ecereObject = (void *)_vTbl[-1];\n", _class->fullName);
2039 if(method->dataType->returnType->kind != 0)
2040 {
2041 struct TypeName * resultType;
2042 struct __ecereNameSpace__ecere__sys__OldList * specs = MkList();
2043 struct Declarator * decl;
2044 char type[1024] = "";
2045 char className[1024];
2046 struct Symbol * classSym;
2047
2048 if(method->dataType->returnType->kind == 8)
2049 classSym = method->dataType->returnType->_class;
2050 else
2051 {
2052 PrintType(method->dataType->returnType, type, 0x0, 0x1);
2053 classSym = FindClass(type);
2054 type[0] = (char)0;
2055 }
2056 strcpy(className, "__ecereClass_");
2057 FullClassNameCat(className, classSym->string, 0x1);
2058 MangleClassName(className);
2059 DeclareClass(classSym, className);
2060 PrintType(method->dataType->returnType, type, 0x1, 0x1);
2061 decl = SpecDeclFromString(type, specs, MkDeclaratorIdentifier(MkIdentifier("__ecereResult")));
2062 resultType = MkTypeName(specs, decl);
2063 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      ");
2064 OutputTypeName(resultType, f, 0x0);
2065 if(method->dataType->returnType->kind == 9)
2066 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = { 0 }");
2067 else if(method->dataType->returnType->kind == 8 && method->dataType->returnType->_class->registered && method->dataType->returnType->_class->registered->type == 1)
2068 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " { }");
2069 else
2070 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, " = 0");
2071 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ";\n\n");
2072 }
2073 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      incref __ecereObject;\n");
2074 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereMethod___ecereNameSpace__ecere__sys__Mutex_Wait(__ecereObject.mutex);\n");
2075 for(param = method->dataType->params.first; param; param = param->next)
2076 {
2077 char type[1024] = "";
2078 char className[1024];
2079 struct Symbol * classSym;
2080
2081 if(param->kind == 8)
2082 classSym = param->_class;
2083 else
2084 {
2085 PrintType(param, type, 0x0, 0x1);
2086 classSym = FindClass(type);
2087 type[0] = (char)0;
2088 }
2089 strcpy(className, "__ecereClass_");
2090 FullClassNameCat(className, classSym->string, 0x1);
2091 MangleClassName(className);
2092 DeclareClass(classSym, className);
2093 if(param->kind == 8 && !strcmp(param->_class->string, "String"))
2094 {
2095 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
2096 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereObject.argsBuffer.Serialize((StaticString)%s);\n", param->name);
2097 }
2098 else
2099 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereObject.argsBuffer.Serialize(%s);\n", param->name);
2100 }
2101 DeclareMethod(__ecereNameSpace__ecere__com__eClass_FindMethod(__ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, "ecere::net::DCOMServerObject"), "CallVirtualMethod", privateModule), "__ecereMethod___ecereNameSpace__ecere__net__DCOMServerObject_CallVirtualMethod");
2102 {
2103 unsigned int hasReturnValue = method->dataType->returnType->kind != 0;
2104
2105 if(!hasReturnValue)
2106 {
2107 for(param = method->dataType->params.first; param; param = param->next)
2108 {
2109 if(param->kind == 8 && ((param->_class && param->_class->registered && param->_class->registered->type == 1) || !strcmp(param->_class->string, "String")) && !param->constant)
2110 {
2111 hasReturnValue = 0x1;
2112 break;
2113 }
2114 }
2115 }
2116 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      if(__ecereObject.CallVirtualMethod(%d, %s))\n", vid - _class->base->vTblSize, hasReturnValue ? "true" : "false");
2117 }
2118 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      {\n");
2119 for(param = method->dataType->params.first; param; param = param->next)
2120 {
2121 if(param->kind == 8 && ((param->_class && param->_class->registered && param->_class->registered->type == 1) || !strcmp(param->_class->string, "String")) && !param->constant)
2122 {
2123 if(!strcmp(param->_class->string, "String"))
2124 {
2125 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
2126 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize((StaticString)%s);\n", param->name);
2127 }
2128 else
2129 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize(%s);\n", param->name);
2130 }
2131 }
2132 if(method->dataType->returnType->kind != 0)
2133 {
2134 if(method->dataType->returnType->kind == 8 && !strcmp(method->dataType->returnType->_class->string, "String"))
2135 {
2136 DeclareClass(FindClass("StaticString"), "__ecereClass_StaticString");
2137 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize((StaticString)__ecereResult);\n");
2138 }
2139 else
2140 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         __ecereObject.returnBuffer.Unserialize(__ecereResult);\n");
2141 }
2142 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      }\n");
2143 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      else\n");
2144 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         ((%s)this).%s::%s(", _class->fullName, _class->fullName, method->name);
2145 for(param = method->dataType->params.first; param; param = param->next)
2146 {
2147 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "%s", param->name);
2148 if(param->next)
2149 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ", ");
2150 }
2151 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, ");\n");
2152 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereObject.returnBuffer.Free();\n");
2153 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      __ecereMethod___ecereNameSpace__ecere__sys__Mutex_Release(__ecereObject.mutex);\n");
2154 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      delete __ecereObject;\n");
2155 if(method->dataType->returnType->kind != 0)
2156 {
2157 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      return __ecereResult;\n");
2158 }
2159 }
2160 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   }\n");
2161 }
2162 }
2163 }
2164 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "}\n");
2165 }
2166 }
2167 }
2168 }
2169
2170 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_SymbolgenApp;
2171
2172 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
2173
2174 extern int GetHostBits(void);
2175
2176 extern void SetSymbolsDir(char *  s);
2177
2178 extern int printf(char * , ...);
2179
2180 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
2181
2182 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
2183
2184 extern char *  __ecereNameSpace__ecere__sys__GetExtension(char *  string, char *  output);
2185
2186 extern void SetDefines(struct __ecereNameSpace__ecere__sys__OldList *  list);
2187
2188 extern void SetImports(struct __ecereNameSpace__ecere__sys__OldList *  list);
2189
2190 extern void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace);
2191
2192 extern void SetExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList *  list);
2193
2194 extern void SetGlobalContext(struct Context * context);
2195
2196 extern void SetTopContext(struct Context * context);
2197
2198 extern void SetCurrentContext(struct Context * context);
2199
2200 extern void SetTargetPlatform(int platform);
2201
2202 extern void SetTargetBits(int bits);
2203
2204 extern void SetInSymbolGen(unsigned int b);
2205
2206 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com____ecere_COM_Initialize(unsigned int guiApp, int argc, char *  argv[]);
2207
2208 extern void SetPrivateModule(struct __ecereNameSpace__ecere__com__Instance * module);
2209
2210 extern char *  GetSymbolsDir(void);
2211
2212 extern char *  __ecereNameSpace__ecere__sys__SearchString(char *  buffer, int start, char *  subStr, unsigned int matchCase, unsigned int matchWord);
2213
2214 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__IteratorPointer;
2215
2216 struct __ecereNameSpace__ecere__com__IteratorPointer;
2217
2218 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__MapIterator;
2219
2220 struct __ecereNameSpace__ecere__com__MapIterator
2221 {
2222 struct __ecereNameSpace__ecere__com__Instance * container;
2223 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
2224 } __attribute__ ((gcc_struct));
2225
2226 extern int strcasecmp(const char * , const char * );
2227
2228 extern unsigned int LoadSymbols(char *  fileName, int importType, unsigned int loadDllOnly);
2229
2230 extern void CheckDataRedefinitions(void);
2231
2232 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(char *  string, char *  ext, char *  output);
2233
2234 extern char *  strstr(const char * , const char * );
2235
2236 extern size_t strlen(const char * );
2237
2238 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ContextStringPair;
2239
2240 struct ContextStringPair
2241 {
2242 char * string;
2243 char * context;
2244 } __attribute__ ((gcc_struct));
2245
2246 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Iterator;
2247
2248 struct __ecereNameSpace__ecere__com__Iterator
2249 {
2250 struct __ecereNameSpace__ecere__com__Instance * container;
2251 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
2252 } __attribute__ ((gcc_struct));
2253
2254 extern void ComputeModuleClasses(struct __ecereNameSpace__ecere__com__Instance * module);
2255
2256 extern unsigned int __ecereNameSpace__ecere__sys__MakeDir(char *  path);
2257
2258 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, char *  addedPath);
2259
2260 extern void FreeContext(struct Context * context);
2261
2262 extern void FreeExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList * excludedSymbols);
2263
2264 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Definition;
2265
2266 struct Definition;
2267
2268 extern void FreeModuleDefine(struct Definition * def);
2269
2270 extern void FreeModuleImport(struct ModuleImport * imp);
2271
2272 extern void FreeTypeData(struct __ecereNameSpace__ecere__com__Instance * privateModule);
2273
2274 extern void FreeIncludeFiles(void);
2275
2276 extern void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList);
2277
2278 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_ContextStringPair__ecere__com__List_TPL_String___;
2279
2280 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_String_;
2281
2282 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Application;
2283
2284 struct __ecereNameSpace__ecere__com__Application
2285 {
2286 int argc;
2287 char * *  argv;
2288 int exitCode;
2289 unsigned int isGUIApp;
2290 struct __ecereNameSpace__ecere__sys__OldList allModules;
2291 char *  parsedCommand;
2292 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
2293 } __attribute__ ((gcc_struct));
2294
2295 char *  __ecereProp___ecereNameSpace__ecere__com__Platform_Get_char__PTR_(int this);
2296
2297 int __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(char *  value);
2298
2299 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Platform_char__PTR_;
2300
2301 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
2302
2303 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
2304
2305 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
2306
2307 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__MapIterator_map;
2308
2309 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
2310
2311 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 index, unsigned int create);
2312
2313 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
2314
2315 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
2316
2317 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Iterator_data;
2318
2319 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
2320
2321 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_RemoveAll;
2322
2323 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Free;
2324
2325 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__CustomAVLTree;
2326
2327 struct __ecereNameSpace__ecere__com__CustomAVLTree
2328 {
2329 struct __ecereNameSpace__ecere__com__AVLNode * root;
2330 int count;
2331 } __attribute__ ((gcc_struct));
2332
2333 uint64 __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_key(struct __ecereNameSpace__ecere__com__MapIterator * this);
2334
2335 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__MapIterator_key;
2336
2337 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
2338
2339 void __ecereMethod_SymbolgenApp_Main(struct __ecereNameSpace__ecere__com__Instance * this)
2340 {
2341 void * __ecereTemp1;
2342 int c;
2343 unsigned int valid = 0x1;
2344 char * output = (((void *)0));
2345
2346 targetPlatform = __ecereNameSpace__ecere__com__GetRuntimePlatform();
2347 targetBits = GetHostBits();
2348 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc; c++)
2349 {
2350 char * arg = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c];
2351
2352 if(arg[0] == '-')
2353 {
2354 if(!strcmp(arg + 1, "m32") || !strcmp(arg + 1, "m64"))
2355 {
2356 targetBits = !strcmp(arg + 1, "m32") ? 32 : 64;
2357 }
2358 else if(!strcmp(arg + 1, "o"))
2359 {
2360 if(!output && c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc)
2361 {
2362 output = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c + 1];
2363 c++;
2364 }
2365 else
2366 valid = 0x0;
2367 }
2368 else if(!strcmp(arg, "-name"))
2369 {
2370 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc)
2371 {
2372 strcpy(projectName, ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c + 1]);
2373 c++;
2374 }
2375 else
2376 valid = 0x0;
2377 }
2378 else if(!strcmp(arg, "-t"))
2379 {
2380 if(++c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc)
2381 targetPlatform = __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c]);
2382 else
2383 valid = 0x0;
2384 }
2385 else if(!strcmp(arg, "-console"))
2386 isConsole = 0x1;
2387 else if(!strcmp(arg, "-dynamiclib"))
2388 isDynamicLibrary = 0x1;
2389 else if(!strcmp(arg, "-staticlib"))
2390 {
2391 isDynamicLibrary = 0x1;
2392 isStaticLibrary = 0x1;
2393 }
2394 else if(!strcmp(arg, "-symbols"))
2395 {
2396 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc)
2397 {
2398 SetSymbolsDir(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c + 1]);
2399 c++;
2400 }
2401 else
2402 valid = 0x0;
2403 }
2404 }
2405 }
2406 if(!output)
2407 valid = 0x0;
2408 if(!valid)
2409 printf(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Syntax:\n   ecs [-t <target platform>] <input>[, <input>]* -o <output>\n", (((void *)0))));
2410 else
2411 {
2412 int c;
2413 char ext[17];
2414 char symbolModule[274];
2415
2416 __ecereNameSpace__ecere__sys__GetExtension(output, ext);
2417 __ecereNameSpace__ecere__sys__GetLastDirectory(output, symbolModule);
2418 SetDefines(&_defines);
2419 SetImports(&_imports);
2420 SetGlobalData(&globalData);
2421 SetExcludedSymbols(&_excludedSymbols);
2422 SetGlobalContext(theGlobalContext);
2423 SetTopContext(theGlobalContext);
2424 SetCurrentContext(theGlobalContext);
2425 SetTargetPlatform(targetPlatform);
2426 SetTargetBits(targetBits);
2427 SetInSymbolGen(0x1);
2428 privateModule = (struct __ecereNameSpace__ecere__com__Instance *)__ecereNameSpace__ecere__com____ecere_COM_Initialize(0x1 | (targetBits == sizeof(uintptr_t) * 8 ? (unsigned int)0 : targetBits == 64 ? (unsigned int)2 : targetBits == 32 ? (unsigned int)4 : (unsigned int)0) | (unsigned int)8, 1, (((void *)0)));
2429 SetPrivateModule(privateModule);
2430 mainModule = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport);
2431 SetMainModule(mainModule);
2432 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&_imports, mainModule);
2433 {
2434 char * symbolsDir = GetSymbolsDir();
2435 unsigned int outputPot = symbolsDir && __ecereNameSpace__ecere__sys__SearchString(symbolsDir, 0, "release.", 0x0, 0x0);
2436 struct __ecereNameSpace__ecere__com__Instance * intlStrings = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_ContextStringPair__ecere__com__List_TPL_String___);
2437 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, intlStrings), it);
2438
2439 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc; c++)
2440 {
2441 char * file = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c];
2442
2443 if(file[0] == '-')
2444 {
2445 if(!strcmp(file, "-c"))
2446 c++;
2447 }
2448 else
2449 {
2450 char ext[17];
2451
2452 __ecereNameSpace__ecere__sys__GetExtension(file, ext);
2453 if(!strcmp(ext, "imp"))
2454 LoadImports(file);
2455 }
2456 }
2457 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc; c++)
2458 {
2459 char * file = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c];
2460
2461 if(file[0] == '-')
2462 {
2463 if(!strcmp(file, "-c"))
2464 c++;
2465 }
2466 }
2467 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argc; c++)
2468 {
2469 char * file = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + structSize_Module)))->argv[c];
2470
2471 if(file[0] == '-')
2472 {
2473 if(!strcmp(file, "-c"))
2474 c++;
2475 }
2476 else
2477 {
2478 char ext[17];
2479 char moduleName[797];
2480
2481 __ecereNameSpace__ecere__sys__GetExtension(file, ext);
2482 __ecereNameSpace__ecere__sys__GetLastDirectory(file, moduleName);
2483 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
2484 strcat(moduleName, ".ec");
2485 if(((__ecereNameSpace__ecere__com__GetRuntimePlatform() == 1) ? (strcasecmp) : strcmp)(moduleName, symbolModule) && (!strcmp(ext, "sym") || !strcmp(ext, "ec")))
2486 {
2487 struct ImportedModule * importedModule;
2488 struct ModuleInfo * module = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleInfo);
2489 char fileName[274];
2490
2491 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&modules, module);
2492 __ecereNameSpace__ecere__sys__GetLastDirectory(file, fileName);
2493 module->name = __ecereNameSpace__ecere__sys__CopyString(fileName);
2494 __ecereNameSpace__ecere__sys__StripExtension(module->name);
2495 for(importedModule = _defines.first; importedModule; importedModule = importedModule->next)
2496 {
2497 if(importedModule->type == 0 && !(strcasecmp)(importedModule->name, module->name) && !(importedModule->importType == 2))
2498 break;
2499 }
2500 if(importedModule)
2501 module->globalInstance = importedModule->globalInstance;
2502 else
2503 {
2504 importedModule = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(module->name), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1)->importType = 0, ((struct ImportedModule *)__ecereTemp1));
2505 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&_defines, importedModule);
2506 module->globalInstance = LoadSymbols(file, 0, 0x0);
2507 CheckDataRedefinitions();
2508 }
2509 {
2510 struct __ecereNameSpace__ecere__com__Instance * f;
2511
2512 __ecereNameSpace__ecere__sys__ChangeExtension(file, "bowl", fileName);
2513 f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 1);
2514 if(f)
2515 {
2516 static char line[65536];
2517 struct __ecereNameSpace__ecere__com__Instance * comments = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_String_);
2518 char * msgid = (((void *)0)), * msgstr = (((void *)0)), * msgctxt = (((void *)0));
2519
2520 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))f->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(f))
2521 {
2522 if(__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof line))
2523 {
2524 int len;
2525
2526 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
2527 if(line[0] == '#')
2528 {
2529 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))comments->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(comments, (uint64)(__ecereNameSpace__ecere__sys__CopyString(line)));
2530 }
2531 else if(strstr(line, "msgid \"") == line)
2532 {
2533 (__ecereNameSpace__ecere__com__eSystem_Delete(msgid), msgid = 0);
2534 msgid = __ecereNameSpace__ecere__sys__CopyString(line + 7);
2535 len = strlen(msgid);
2536 if(len)
2537 msgid[len - 1] = (unsigned char)0;
2538 }
2539 else if(strstr(line, "msgctxt \"") == line)
2540 {
2541 (__ecereNameSpace__ecere__com__eSystem_Delete(msgctxt), msgctxt = 0);
2542 msgctxt = __ecereNameSpace__ecere__sys__CopyString(line + 9);
2543 len = strlen(msgctxt);
2544 if(len)
2545 msgctxt[len - 1] = (unsigned char)0;
2546 }
2547 else if(strstr(line, "msgstr \"") == line)
2548 {
2549 (__ecereNameSpace__ecere__com__eSystem_Delete(msgstr), msgstr = 0);
2550 msgstr = __ecereNameSpace__ecere__sys__CopyString(line + 8);
2551 len = strlen(msgstr);
2552 if(len)
2553 msgstr[len - 1] = (unsigned char)0;
2554 }
2555 if(msgid && msgstr)
2556 {
2557 struct ContextStringPair pair =
2558 {
2559 msgid, msgctxt
2560 };
2561
2562 i18n = 0x1;
2563 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&it, (&pair), 0x0))
2564 {
2565 msgid = (((void *)0));
2566 msgctxt = (((void *)0));
2567 __extension__ ({
2568 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
2569 {
2570 intlStrings, 0
2571 };
2572
2573 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, (((&pair))), 0x1);
2574 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, comments);
2575 });
2576 comments = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_String_);
2577 }
2578 else
2579 {
2580 {
2581 struct __ecereNameSpace__ecere__com__Iterator s =
2582 {
2583 (comments), 0
2584 };
2585
2586 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&s))
2587 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&it))->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&it)), __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&s));
2588 }
2589 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))comments->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_RemoveAll])(comments);
2590 }
2591 (__ecereNameSpace__ecere__com__eSystem_Delete(msgid), msgid = 0);
2592 (__ecereNameSpace__ecere__com__eSystem_Delete(msgctxt), msgctxt = 0);
2593 (__ecereNameSpace__ecere__com__eSystem_Delete(msgstr), msgstr = 0);
2594 }
2595 }
2596 }
2597 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))comments->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Free])(comments);
2598 (__ecereNameSpace__ecere__com__eInstance_DecRef(comments), comments = 0);
2599 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
2600 }
2601 }
2602 }
2603 }
2604 }
2605 ComputeModuleClasses(privateModule);
2606 if(!isDynamicLibrary)
2607 {
2608 thisAppClass = SearchAppClass_Module(privateModule);
2609 }
2610 WriteMain(output);
2611 if(outputPot && ((struct __ecereNameSpace__ecere__com__CustomAVLTree *)(((char *)intlStrings + structSize_Instance)))->count)
2612 {
2613 struct __ecereNameSpace__ecere__com__Instance * potFile;
2614 char potFileName[797];
2615
2616 strcpy(potFileName, "locale");
2617 __ecereNameSpace__ecere__sys__MakeDir(potFileName);
2618 __ecereNameSpace__ecere__sys__PathCat(potFileName, projectName);
2619 __ecereNameSpace__ecere__sys__ChangeExtension(potFileName, "pot", potFileName);
2620 potFile = __ecereNameSpace__ecere__sys__FileOpen(potFileName, 2);
2621 if(potFile)
2622 {
2623 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgid \"\"\n");
2624 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgstr \"\"\n");
2625 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Project-Id-Version: \\n\"\n");
2626 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"POT-Creation-Date: \\n\"\n");
2627 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"PO-Revision-Date: \\n\"\n");
2628 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Last-Translator: \\n\"\n");
2629 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Language-Team: \\n\"\n");
2630 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"MIME-Version: 1.0\\n\"\n");
2631 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Content-Type: text/plain; charset=iso-8859-1\\n\"\n");
2632 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"Content-Transfer-Encoding: 8bit\\n\"\n");
2633 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"X-Poedit-Basepath: ../\\n\"\n");
2634 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\n");
2635 {
2636 struct __ecereNameSpace__ecere__com__MapIterator i = (i.container = (void *)0, i.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&i, (intlStrings)), i);
2637
2638 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&i))
2639 {
2640 struct ContextStringPair pair = (*(struct ContextStringPair *)__ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_key(&i));
2641 struct __ecereNameSpace__ecere__com__Instance * comments = ((struct __ecereNameSpace__ecere__com__Instance *)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&i));
2642
2643 {
2644 struct __ecereNameSpace__ecere__com__Iterator s =
2645 {
2646 (comments), 0
2647 };
2648
2649 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&s))
2650 {
2651 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(potFile, __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&s));
2652 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\n");
2653 }
2654 }
2655 if(pair.context)
2656 {
2657 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgctxt \"");
2658 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, pair.context);
2659 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"\n");
2660 }
2661 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgid \"");
2662 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, pair.string);
2663 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"\n");
2664 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "msgstr \"");
2665 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, pair.string);
2666 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\"\n");
2667 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, const char *  string))potFile->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Puts])(potFile, "\n");
2668 }
2669 }
2670 ((void (*)(struct __ecereNameSpace__ecere__com__Instance *))intlStrings->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Free])(intlStrings);
2671 (__ecereNameSpace__ecere__com__eInstance_DecRef(intlStrings), intlStrings = 0);
2672 (__ecereNameSpace__ecere__com__eInstance_DecRef(potFile), potFile = 0);
2673 }
2674 }
2675 }
2676 FreeContext(theGlobalContext);
2677 FreeExcludedSymbols(&_excludedSymbols);
2678 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&_defines, FreeModuleDefine);
2679 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&_imports, FreeModuleImport);
2680 FreeTypeData(privateModule);
2681 FreeIncludeFiles();
2682 FreeGlobalData(&globalData);
2683 (__ecereNameSpace__ecere__com__eInstance_DecRef(privateModule), privateModule = 0);
2684 }
2685 SetSymbolsDir((((void *)0)));
2686 }
2687
2688 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);
2689
2690 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);
2691
2692 void __ecereRegisterModule_ecs(struct __ecereNameSpace__ecere__com__Instance * module)
2693 {
2694 struct __ecereNameSpace__ecere__com__Class * class;
2695
2696 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(5, "ModuleInfo", 0, sizeof(struct ModuleInfo), 0, 0, 0, module, 2, 1);
2697 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + structSize_Instance)))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + structSize_Instance)))->application && class)
2698 __ecereClass_ModuleInfo = class;
2699 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(0, "SymbolgenApp", "ecere::com::Application", 0, 0, 0, 0, module, 2, 1);
2700 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + structSize_Instance)))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + structSize_Instance)))->application && class)
2701 __ecereClass_SymbolgenApp = class;
2702 __ecereNameSpace__ecere__com__eClass_AddMethod(class, "Main", 0, __ecereMethod_SymbolgenApp_Main, 1);
2703 }
2704
2705 void __ecereUnregisterModule_ecs(struct __ecereNameSpace__ecere__com__Instance * module)
2706 {
2707
2708 }
2709
2710 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  a, char *  b);
2711
2712 void __ecereCreateModuleInstances_ecs()
2713 {
2714 (globalData.classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString);
2715 theGlobalContext = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
2716 }
2717
2718 void __ecereDestroyModuleInstances_ecs()
2719 {
2720 ((theGlobalContext ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(theGlobalContext) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(theGlobalContext)) : 0), theGlobalContext = 0);
2721 }
2722