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

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