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