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