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

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