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