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

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