The Ecere SDK - sdk/blob - compiler/bootstrap/ecs/bootstrap/ecs.c

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