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