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