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