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