7094cdb3077ba04532c22e25721ab8e18f7b6053
[sdk] / compiler / bootstrap / libec / bootstrap / loadSymbols.c
1 /* Code generated from eC source file: loadSymbols.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 #if defined(_WIN32)
39 #   if defined(__GNUC__) || defined(__TINYC__)
40 #      define ecere_stdcall __attribute__((__stdcall__))
41 #      define ecere_gcc_struct __attribute__((gcc_struct))
42 #   else
43 #      define ecere_stdcall __stdcall
44 #      define ecere_gcc_struct
45 #   endif
46 #else
47 #   define ecere_stdcall
48 #   define ecere_gcc_struct
49 #endif
50 #include <stdint.h>
51 #include <sys/types.h>
52 extern int yychar;
53
54 extern char sourceFileStack[30][797];
55
56 extern int include_stack_ptr;
57
58 static int numIncludes;
59
60 static char ** includes;
61
62 unsigned int inIDE = 0;
63
64 unsigned int ecereImported;
65
66 unsigned int inPreCompiler = 0;
67
68 unsigned int inSymbolGen = 0;
69
70 unsigned int inDocumentor = 0;
71
72 unsigned int DummyMethod()
73 {
74 return 1;
75 }
76
77 extern const char *  sourceFile;
78
79 extern unsigned int skipErrors;
80
81 struct __ecereNameSpace__ecere__com__Instance * loadedModules;
82
83 extern char *  symbolsDir;
84
85 extern unsigned int inCompiler;
86
87 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__com__MapIterator_map;
88
89 extern struct __ecereNameSpace__ecere__com__Property * __ecereProp___ecereNameSpace__ecere__com__Iterator_data;
90
91 struct __ecereNameSpace__ecere__sys__OldList
92 {
93 void *  first;
94 void *  last;
95 int count;
96 unsigned int offset;
97 unsigned int circ;
98 } ecere_gcc_struct;
99
100 struct Type;
101
102 struct __ecereNameSpace__ecere__com__DataValue
103 {
104 union
105 {
106 char c;
107 unsigned char uc;
108 short s;
109 unsigned short us;
110 int i;
111 unsigned int ui;
112 void *  p;
113 float f;
114 double d;
115 long long i64;
116 uint64 ui64;
117 } ecere_gcc_struct __anon1;
118 } ecere_gcc_struct;
119
120 struct __ecereNameSpace__ecere__com__SerialBuffer
121 {
122 unsigned char *  _buffer;
123 unsigned int count;
124 unsigned int _size;
125 unsigned int pos;
126 } ecere_gcc_struct;
127
128 extern void *  __ecereNameSpace__ecere__com__eSystem_New(unsigned int size);
129
130 extern void *  __ecereNameSpace__ecere__com__eSystem_New0(unsigned int size);
131
132 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew(void *  memory, unsigned int size);
133
134 extern void *  __ecereNameSpace__ecere__com__eSystem_Renew0(void *  memory, unsigned int size);
135
136 extern void __ecereNameSpace__ecere__com__eSystem_Delete(void *  memory);
137
138 extern char *  __ecereNameSpace__ecere__sys__TrimLSpaces(const char *  string, char *  output);
139
140 extern int strcmp(const char * , const char * );
141
142 extern int strtol(const char * , char * * , int base);
143
144 extern char *  strcpy(char * , const char * );
145
146 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(const char *  string, char *  output);
147
148 extern int strcasecmp(const char * , const char * );
149
150 struct Specifier;
151
152 extern char *  strstr(const char * , const char * );
153
154 extern char *  strcat(char * , const char * );
155
156 struct External;
157
158 struct ModuleImport;
159
160 struct ClassImport;
161
162 struct CodePosition
163 {
164 int line;
165 int charPos;
166 int pos;
167 int included;
168 } ecere_gcc_struct;
169
170 struct Context;
171
172 extern char *  strchr(const char * , int);
173
174 extern void *  memcpy(void * , const void * , size_t size);
175
176 extern char *  __ecereNameSpace__ecere__sys__TrimRSpaces(const char *  string, char *  output);
177
178 extern long long strtoll(const char *  nptr, char * *  endptr, int base);
179
180 struct __ecereNameSpace__ecere__com__ClassProperty;
181
182 extern char *  __ecereNameSpace__ecere__sys__CopyString(const char *  string);
183
184 struct yy_buffer_state
185 {
186 void *  yy_input_file;
187 char *  yy_ch_buf;
188 char *  yy_buf_pos;
189 unsigned int yy_buf_size;
190 int yy_n_chars;
191 int yy_is_our_buffer;
192 int yy_is_interactive;
193 int yy_at_bol;
194 int yy_fill_buffer;
195 int yy_buffer_status;
196 } ecere_gcc_struct;
197
198 struct Identifier;
199
200 struct Statement;
201
202 struct Instantiation;
203
204 struct Declarator;
205
206 struct TypeName;
207
208 struct Initializer;
209
210 struct __ecereNameSpace__ecere__com__ClassTemplateParameter;
211
212 struct __ecereNameSpace__ecere__com__DefinedExpression;
213
214 struct __ecereNameSpace__ecere__com__GlobalFunction;
215
216 extern char *  strncpy(char * , const char * , size_t n);
217
218 extern char *  __ecereNameSpace__ecere__sys__GetSystemPathBuffer(char *  d, const char *  p);
219
220 extern void Compiler_Error(const char *  format, ...);
221
222 extern const char *  __ecereNameSpace__ecere__GetTranslatedString(const char * name, const char *  string, const char *  stringAndContext);
223
224 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
225
226 extern size_t strlen(const char * );
227
228 extern char *  __ecereNameSpace__ecere__sys__GetExtension(const char *  string, char *  output);
229
230 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, const char *  addedPath);
231
232 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(const char *  string, const char *  ext, char *  output);
233
234 extern unsigned int __ecereNameSpace__ecere__sys__FileExists(const char *  fileName);
235
236 struct __ecereNameSpace__ecere__com__IteratorPointer;
237
238 extern int sprintf(char * , const char * , ...);
239
240 extern char *  __ecereNameSpace__ecere__sys__StripLastDirectory(const char *  string, char *  output);
241
242 extern void Compiler_Warning(const char *  format, ...);
243
244 char * GetIncludeFileFromID(int id)
245 {
246 return includes[id - 1];
247 }
248
249 void SetInIDE(unsigned int b)
250 {
251 inIDE = b;
252 }
253
254 void SetEcereImported(unsigned int b)
255 {
256 ecereImported = b;
257 }
258
259 unsigned int GetEcereImported()
260 {
261 return ecereImported;
262 }
263
264 void SetInPreCompiler(unsigned int b)
265 {
266 inPreCompiler = b;
267 }
268
269 void SetInSymbolGen(unsigned int b)
270 {
271 inSymbolGen = b;
272 }
273
274 void SetInDocumentor(unsigned int b)
275 {
276 inDocumentor = b;
277 }
278
279 struct __ecereNameSpace__ecere__sys__OldList dataRedefinitions;
280
281 struct __ecereNameSpace__ecere__sys__OldList * includeDirs, * sysIncludeDirs;
282
283 void SetIncludeDirs(struct __ecereNameSpace__ecere__sys__OldList * list)
284 {
285 includeDirs = list;
286 }
287
288 struct __ecereNameSpace__ecere__sys__OldList * precompDefines;
289
290 extern struct __ecereNameSpace__ecere__sys__OldList *  defines;
291
292 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
293
294 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
295
296 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
297
298 extern struct Type * ProcessTypeString(const char *  string, unsigned int staticMethod);
299
300 extern void FreeType(struct Type * type);
301
302 extern void PrintType(struct Type * type, char *  string, unsigned int printName, unsigned int fullName);
303
304 void FreeIncludeFiles()
305 {
306 int c;
307
308 for(c = 0; c < numIncludes; c++)
309 (__ecereNameSpace__ecere__com__eSystem_Delete(includes[c]), includes[c] = 0);
310 (__ecereNameSpace__ecere__com__eSystem_Delete(includes), includes = 0);
311 numIncludes = 0;
312 }
313
314 int FindIncludeFileID(char * includeFile)
315 {
316 int c;
317
318 for(c = 0; c < numIncludes; c++)
319 if(!((__runtimePlatform == 1) ? (strcasecmp) : strcmp)(includes[c], includeFile))
320 return c + 1;
321 return 0;
322 }
323
324 extern struct ModuleImport * mainModule;
325
326 struct Location
327 {
328 struct CodePosition start;
329 struct CodePosition end;
330 } ecere_gcc_struct;
331
332 void SetSysIncludeDirs(struct __ecereNameSpace__ecere__sys__OldList * list)
333 {
334 sysIncludeDirs = list;
335 }
336
337 void SetPrecompDefines(struct __ecereNameSpace__ecere__sys__OldList * list)
338 {
339 precompDefines = list;
340 }
341
342 int GetIncludeFileID(char * includeFile)
343 {
344 int found = FindIncludeFileID(includeFile);
345
346 if(found)
347 return found;
348 includes = __ecereNameSpace__ecere__com__eSystem_Renew(includes, sizeof(char *) * (numIncludes + 1));
349 includes[numIncludes++] = __ecereNameSpace__ecere__sys__CopyString(includeFile);
350 return numIncludes;
351 }
352
353 struct __ecereNameSpace__ecere__com__NameSpace;
354
355 struct __ecereNameSpace__ecere__com__NameSpace * globalData;
356
357 struct Expression;
358
359 extern struct Expression * ParseExpressionString(char *  expression);
360
361 struct Expression
362 {
363 struct Expression * prev;
364 struct Expression * next;
365 struct Location loc;
366 int type;
367 union
368 {
369 struct
370 {
371 char *  constant;
372 struct Identifier * identifier;
373 } ecere_gcc_struct __anon1;
374 struct Statement * compound;
375 struct Instantiation * instance;
376 struct
377 {
378 char *  string;
379 unsigned int intlString;
380 unsigned int wideString;
381 } ecere_gcc_struct __anon2;
382 struct __ecereNameSpace__ecere__sys__OldList *  list;
383 struct
384 {
385 struct __ecereNameSpace__ecere__sys__OldList * specifiers;
386 struct Declarator * decl;
387 } ecere_gcc_struct _classExp;
388 struct
389 {
390 struct Identifier * id;
391 } ecere_gcc_struct classData;
392 struct
393 {
394 struct Expression * exp;
395 struct __ecereNameSpace__ecere__sys__OldList * arguments;
396 struct Location argLoc;
397 } ecere_gcc_struct call;
398 struct
399 {
400 struct Expression * exp;
401 struct __ecereNameSpace__ecere__sys__OldList * index;
402 } ecere_gcc_struct index;
403 struct
404 {
405 struct Expression * exp;
406 struct Identifier * member;
407 int memberType;
408 unsigned int thisPtr;
409 } ecere_gcc_struct member;
410 struct
411 {
412 int op;
413 struct Expression * exp1;
414 struct Expression * exp2;
415 } ecere_gcc_struct op;
416 struct TypeName * typeName;
417 struct Specifier * _class;
418 struct
419 {
420 struct TypeName * typeName;
421 struct Expression * exp;
422 } ecere_gcc_struct cast;
423 struct
424 {
425 struct Expression * cond;
426 struct __ecereNameSpace__ecere__sys__OldList * exp;
427 struct Expression * elseExp;
428 } ecere_gcc_struct cond;
429 struct
430 {
431 struct TypeName * typeName;
432 struct Expression * size;
433 } ecere_gcc_struct _new;
434 struct
435 {
436 struct TypeName * typeName;
437 struct Expression * size;
438 struct Expression * exp;
439 } ecere_gcc_struct _renew;
440 struct
441 {
442 char * table;
443 struct Identifier * id;
444 } ecere_gcc_struct db;
445 struct
446 {
447 struct Expression * ds;
448 struct Expression * name;
449 } ecere_gcc_struct dbopen;
450 struct
451 {
452 struct TypeName * typeName;
453 struct Initializer * initializer;
454 } ecere_gcc_struct initializer;
455 struct
456 {
457 struct Expression * exp;
458 struct TypeName * typeName;
459 } ecere_gcc_struct vaArg;
460 struct
461 {
462 struct TypeName * typeName;
463 struct Identifier * id;
464 } ecere_gcc_struct offset;
465 } ecere_gcc_struct __anon1;
466 unsigned int debugValue;
467 struct __ecereNameSpace__ecere__com__DataValue val;
468 uint64 address;
469 unsigned int hasAddress;
470 struct Type * expType;
471 struct Type * destType;
472 unsigned int usage;
473 int tempCount;
474 unsigned int byReference;
475 unsigned int isConstant;
476 unsigned int addedThis;
477 unsigned int needCast;
478 unsigned int thisPtr;
479 unsigned int opDestType;
480 unsigned int needTemplateCast;
481 } ecere_gcc_struct;
482
483 extern void ProcessExpressionType(struct Expression * exp);
484
485 extern void ComputeExpression(struct Expression * exp);
486
487 extern void FreeExpression(struct Expression * exp);
488
489 struct __ecereNameSpace__ecere__com__Class;
490
491 struct __ecereNameSpace__ecere__com__Instance
492 {
493 void * *  _vTbl;
494 struct __ecereNameSpace__ecere__com__Class * _class;
495 int _refCount;
496 } ecere_gcc_struct;
497
498 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name);
499
500 extern void __ecereNameSpace__ecere__com__eClass_SetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, long long value);
501
502 extern void __ecereNameSpace__ecere__com__eClass_DestructionWatchable(struct __ecereNameSpace__ecere__com__Class * _class);
503
504 extern void __ecereNameSpace__ecere__com__eEnum_AddFixedValue(struct __ecereNameSpace__ecere__com__Class * _class, const char *  string, long long value);
505
506 extern long long __ecereNameSpace__ecere__com__eEnum_AddValue(struct __ecereNameSpace__ecere__com__Class * _class, const char *  string);
507
508 extern struct __ecereNameSpace__ecere__com__ClassProperty * __ecereNameSpace__ecere__com__eClass_AddClassProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, const char *  dataType, void *  setStmt, void *  getStmt);
509
510 extern void __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(struct __ecereNameSpace__ecere__com__Class * base);
511
512 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
513
514 extern void __ecereNameSpace__ecere__com__eInstance_SetMethod(struct __ecereNameSpace__ecere__com__Instance * instance, const char *  name, void *  function);
515
516 extern void __ecereNameSpace__ecere__com__eInstance_IncRef(struct __ecereNameSpace__ecere__com__Instance * instance);
517
518 struct __ecereNameSpace__ecere__com__Instance * sourceDirs;
519
520 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpenBuffered(const char *  fileName, int mode);
521
522 struct LexerBackup
523 {
524 struct Location yylloc;
525 struct Location type_yylloc;
526 struct Location expression_yylloc;
527 int declMode;
528 int defaultDeclMode;
529 struct __ecereNameSpace__ecere__com__Instance * fileInput;
530 struct yy_buffer_state *  include_stack[30];
531 struct __ecereNameSpace__ecere__com__Instance * fileStack[30];
532 char sourceFileStack[30][797];
533 struct Location locStack[30];
534 int declModeStack[30];
535 int include_stack_ptr;
536 struct yy_buffer_state *  buffer;
537 int yy_n_chars;
538 char *  yytext;
539 char *  yy_c_buf_p;
540 void *  yyin;
541 char yy_hold_char;
542 int yychar;
543 int yy_init;
544 int yy_start;
545 } ecere_gcc_struct;
546
547 struct __ecereNameSpace__ecere__com__MapIterator
548 {
549 struct __ecereNameSpace__ecere__com__Instance * container;
550 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
551 } ecere_gcc_struct;
552
553 struct __ecereNameSpace__ecere__com__Iterator
554 {
555 struct __ecereNameSpace__ecere__com__Instance * container;
556 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
557 } ecere_gcc_struct;
558
559 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(const char *  fileName, int mode);
560
561 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(struct __ecereNameSpace__ecere__com__Instance * this, char *  s, int max);
562
563 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
564
565 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
566
567 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
568
569 void SetSourceDirs(struct __ecereNameSpace__ecere__com__Instance * list)
570 {
571 sourceDirs = list;
572 }
573
574 extern struct __ecereNameSpace__ecere__com__Instance * pushLexer(void);
575
576 extern void popLexer(struct __ecereNameSpace__ecere__com__Instance * backup);
577
578 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
579
580 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
581
582 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, const uint64 index, unsigned int create);
583
584 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
585
586 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
587
588 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
589
590 void __ecereDestroyModuleInstances_loadSymbols()
591 {
592 (__ecereNameSpace__ecere__com__eInstance_DecRef(loadedModules), loadedModules = 0);
593 }
594
595 struct __ecereNameSpace__ecere__sys__BTNode;
596
597 struct __ecereNameSpace__ecere__sys__BTNode
598 {
599 uintptr_t key;
600 struct __ecereNameSpace__ecere__sys__BTNode * parent;
601 struct __ecereNameSpace__ecere__sys__BTNode * left;
602 struct __ecereNameSpace__ecere__sys__BTNode * right;
603 int depth;
604 } ecere_gcc_struct;
605
606 struct __ecereNameSpace__ecere__com__Property;
607
608 struct __ecereNameSpace__ecere__com__Property
609 {
610 struct __ecereNameSpace__ecere__com__Property * prev;
611 struct __ecereNameSpace__ecere__com__Property * next;
612 const char *  name;
613 unsigned int isProperty;
614 int memberAccess;
615 int id;
616 struct __ecereNameSpace__ecere__com__Class * _class;
617 const char *  dataTypeString;
618 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
619 struct Type * dataType;
620 void (*  Set)(void * , int);
621 int (*  Get)(void * );
622 unsigned int (*  IsSet)(void * );
623 void *  data;
624 void *  symbol;
625 int vid;
626 unsigned int conversion;
627 unsigned int watcherOffset;
628 const char *  category;
629 unsigned int compiled;
630 unsigned int selfWatchable;
631 unsigned int isWatchable;
632 } ecere_gcc_struct;
633
634 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
635
636 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);
637
638 extern void __ecereNameSpace__ecere__com__eInstance_Watch(void *  instance, struct __ecereNameSpace__ecere__com__Property * _property, void *  object, void (*  callback)(void * , void * ));
639
640 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
641
642 extern struct __ecereNameSpace__ecere__com__Property * __ecereNameSpace__ecere__com__eClass_AddProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, const char *  dataType, void *  setStmt, void *  getStmt, int declMode);
643
644 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
645
646 struct __ecereNameSpace__ecere__com__DataMember;
647
648 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_AddDataMember(struct __ecereNameSpace__ecere__com__DataMember * member, const char *  name, const char *  type, unsigned int size, unsigned int alignment, int declMode);
649
650 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eClass_AddDataMember(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, const char *  type, unsigned int size, unsigned int alignment, int declMode);
651
652 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
653
654 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
655
656 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
657
658 struct Symbol;
659
660 extern struct Symbol * DeclClass(struct Specifier * _class, const char *  name);
661
662 extern struct Symbol * FindClass(const char *  name);
663
664 extern void FreeSymbol(struct Symbol * symbol);
665
666 struct __ecereNameSpace__ecere__sys__OldLink;
667
668 struct __ecereNameSpace__ecere__sys__OldLink
669 {
670 struct __ecereNameSpace__ecere__sys__OldLink * prev;
671 struct __ecereNameSpace__ecere__sys__OldLink * next;
672 void *  data;
673 } ecere_gcc_struct;
674
675 struct DataRedefinition;
676
677 struct DataRedefinition
678 {
679 struct DataRedefinition * prev;
680 struct DataRedefinition * next;
681 char name[1024];
682 char type1[1024];
683 char type2[1024];
684 } ecere_gcc_struct;
685
686 void CheckDataRedefinitions()
687 {
688 struct DataRedefinition * redefinition;
689
690 for(redefinition = dataRedefinitions.first; redefinition; redefinition = redefinition->next)
691 {
692 struct Type * type1 = ProcessTypeString(redefinition->type1, 0);
693 struct Type * type2 = ProcessTypeString(redefinition->type2, 0);
694 char type1String[1024] = "";
695 char type2String[1024] = "";
696
697 PrintType(type1, type1String, 0, 1);
698 PrintType(type2, type2String, 0, 1);
699 if(strcmp(type1String, type2String))
700 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString("ec", "Redefinition of %s (defining as %s, already defined as %s)\n", (((void *)0))), redefinition->name, type1String, type2String);
701 FreeType(type1);
702 FreeType(type2);
703 }
704 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&dataRedefinitions, (((void *)0)));
705 }
706
707 struct ImportedModule;
708
709 struct ImportedModule
710 {
711 struct ImportedModule * prev;
712 struct ImportedModule * next;
713 char *  name;
714 int type;
715 int importType;
716 unsigned int globalInstance;
717 unsigned int dllOnly;
718 int importAccess;
719 } ecere_gcc_struct;
720
721 struct __ecereNameSpace__ecere__sys__NamedItem;
722
723 struct __ecereNameSpace__ecere__sys__NamedItem
724 {
725 struct __ecereNameSpace__ecere__sys__NamedItem * prev;
726 struct __ecereNameSpace__ecere__sys__NamedItem * next;
727 char *  name;
728 } ecere_gcc_struct;
729
730 struct __ecereNameSpace__ecere__com__Instance * OpenIncludeFile(char * includeFile)
731 {
732 struct __ecereNameSpace__ecere__com__Instance * file;
733 char location[274];
734
735 __ecereNameSpace__ecere__sys__StripLastDirectory(sourceFileStack[(include_stack_ptr >= 0) ? include_stack_ptr : 0], location);
736 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
737 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
738 if(file)
739 {
740 strcpy(sourceFileStack[include_stack_ptr + 1], location);
741 }
742 else if(inIDE)
743 {
744 struct __ecereNameSpace__ecere__sys__NamedItem * includeDir;
745
746 if(includeDirs)
747 {
748 for(includeDir = (*includeDirs).first; includeDir; includeDir = includeDir->next)
749 {
750 strcpy(location, includeDir->name);
751 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
752 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
753 if(file)
754 break;
755 }
756 }
757 if(!file && sysIncludeDirs)
758 {
759 for(includeDir = (*sysIncludeDirs).first; includeDir; includeDir = includeDir->next)
760 {
761 strcpy(location, includeDir->name);
762 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
763 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
764 if(file)
765 break;
766 }
767 }
768 }
769 return file;
770 }
771
772 struct Operand;
773
774 struct OpTable
775 {
776 unsigned int (*  Add)(struct Expression *, struct Operand *, struct Operand *);
777 unsigned int (*  Sub)(struct Expression *, struct Operand *, struct Operand *);
778 unsigned int (*  Mul)(struct Expression *, struct Operand *, struct Operand *);
779 unsigned int (*  Div)(struct Expression *, struct Operand *, struct Operand *);
780 unsigned int (*  Mod)(struct Expression *, struct Operand *, struct Operand *);
781 unsigned int (*  Neg)(struct Expression *, struct Operand *);
782 unsigned int (*  Inc)(struct Expression *, struct Operand *);
783 unsigned int (*  Dec)(struct Expression *, struct Operand *);
784 unsigned int (*  Asign)(struct Expression *, struct Operand *, struct Operand *);
785 unsigned int (*  AddAsign)(struct Expression *, struct Operand *, struct Operand *);
786 unsigned int (*  SubAsign)(struct Expression *, struct Operand *, struct Operand *);
787 unsigned int (*  MulAsign)(struct Expression *, struct Operand *, struct Operand *);
788 unsigned int (*  DivAsign)(struct Expression *, struct Operand *, struct Operand *);
789 unsigned int (*  ModAsign)(struct Expression *, struct Operand *, struct Operand *);
790 unsigned int (*  BitAnd)(struct Expression *, struct Operand *, struct Operand *);
791 unsigned int (*  BitOr)(struct Expression *, struct Operand *, struct Operand *);
792 unsigned int (*  BitXor)(struct Expression *, struct Operand *, struct Operand *);
793 unsigned int (*  LShift)(struct Expression *, struct Operand *, struct Operand *);
794 unsigned int (*  RShift)(struct Expression *, struct Operand *, struct Operand *);
795 unsigned int (*  BitNot)(struct Expression *, struct Operand *);
796 unsigned int (*  AndAsign)(struct Expression *, struct Operand *, struct Operand *);
797 unsigned int (*  OrAsign)(struct Expression *, struct Operand *, struct Operand *);
798 unsigned int (*  XorAsign)(struct Expression *, struct Operand *, struct Operand *);
799 unsigned int (*  LShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
800 unsigned int (*  RShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
801 unsigned int (*  Not)(struct Expression *, struct Operand *);
802 unsigned int (*  Equ)(struct Expression *, struct Operand *, struct Operand *);
803 unsigned int (*  Nqu)(struct Expression *, struct Operand *, struct Operand *);
804 unsigned int (*  And)(struct Expression *, struct Operand *, struct Operand *);
805 unsigned int (*  Or)(struct Expression *, struct Operand *, struct Operand *);
806 unsigned int (*  Grt)(struct Expression *, struct Operand *, struct Operand *);
807 unsigned int (*  Sma)(struct Expression *, struct Operand *, struct Operand *);
808 unsigned int (*  GrtEqu)(struct Expression *, struct Operand *, struct Operand *);
809 unsigned int (*  SmaEqu)(struct Expression *, struct Operand *, struct Operand *);
810 unsigned int (*  Cond)(struct Expression *, struct Operand *, struct Operand *, struct Operand *);
811 } ecere_gcc_struct;
812
813 struct Operand
814 {
815 int kind;
816 struct Type * type;
817 unsigned int ptrSize;
818 union
819 {
820 char c;
821 unsigned char uc;
822 short s;
823 unsigned short us;
824 int i;
825 unsigned int ui;
826 float f;
827 double d;
828 long long i64;
829 uint64 ui64;
830 } ecere_gcc_struct __anon1;
831 struct OpTable ops;
832 } ecere_gcc_struct;
833
834 extern struct Operand GetOperand(struct Expression * exp);
835
836 struct __ecereNameSpace__ecere__com__Method;
837
838 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
839 {
840 union
841 {
842 struct
843 {
844 const char *  dataTypeString;
845 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
846 } ecere_gcc_struct __anon1;
847 struct __ecereNameSpace__ecere__com__DataValue expression;
848 struct
849 {
850 const char *  memberString;
851 union
852 {
853 struct __ecereNameSpace__ecere__com__DataMember * member;
854 struct __ecereNameSpace__ecere__com__Property * prop;
855 struct __ecereNameSpace__ecere__com__Method * method;
856 } ecere_gcc_struct __anon1;
857 } ecere_gcc_struct __anon2;
858 } ecere_gcc_struct __anon1;
859 } ecere_gcc_struct;
860
861 struct __ecereNameSpace__ecere__com__Method
862 {
863 const char *  name;
864 struct __ecereNameSpace__ecere__com__Method * parent;
865 struct __ecereNameSpace__ecere__com__Method * left;
866 struct __ecereNameSpace__ecere__com__Method * right;
867 int depth;
868 int (*  function)();
869 int vid;
870 int type;
871 struct __ecereNameSpace__ecere__com__Class * _class;
872 void *  symbol;
873 const char *  dataTypeString;
874 struct Type * dataType;
875 int memberAccess;
876 } ecere_gcc_struct;
877
878 struct Symbol
879 {
880 char *  string;
881 struct Symbol * parent;
882 struct Symbol * left;
883 struct Symbol * right;
884 int depth;
885 struct Type * type;
886 union
887 {
888 struct __ecereNameSpace__ecere__com__Method * method;
889 struct __ecereNameSpace__ecere__com__Property * _property;
890 struct __ecereNameSpace__ecere__com__Class * registered;
891 } ecere_gcc_struct __anon1;
892 unsigned int notYetDeclared;
893 union
894 {
895 struct
896 {
897 struct External * pointerExternal;
898 struct External * structExternal;
899 } ecere_gcc_struct __anon1;
900 struct
901 {
902 struct External * externalGet;
903 struct External * externalSet;
904 struct External * externalPtr;
905 struct External * externalIsSet;
906 } ecere_gcc_struct __anon2;
907 struct
908 {
909 struct External * methodExternal;
910 struct External * methodCodeExternal;
911 } ecere_gcc_struct __anon3;
912 } ecere_gcc_struct __anon2;
913 unsigned int imported;
914 unsigned int declaredStructSym;
915 struct __ecereNameSpace__ecere__com__Class * _class;
916 unsigned int declaredStruct;
917 unsigned int needConstructor;
918 unsigned int needDestructor;
919 char *  constructorName;
920 char *  structName;
921 char *  className;
922 char *  destructorName;
923 struct ModuleImport * module;
924 struct ClassImport * _import;
925 struct Location nameLoc;
926 unsigned int isParam;
927 unsigned int isRemote;
928 unsigned int isStruct;
929 unsigned int fireWatchersDone;
930 int declaring;
931 unsigned int classData;
932 unsigned int isStatic;
933 char *  shortName;
934 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
935 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
936 struct Context * ctx;
937 int isIterator;
938 struct Expression * propCategory;
939 unsigned int mustRegister;
940 } ecere_gcc_struct;
941
942 extern struct __ecereNameSpace__ecere__com__Method * __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, const char *  type, void *  function, int declMode);
943
944 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);
945
946 extern struct __ecereNameSpace__ecere__com__ClassTemplateParameter * __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, int type, const void *  info, struct __ecereNameSpace__ecere__com__ClassTemplateArgument * defaultArg);
947
948 struct __ecereNameSpace__ecere__com__BitMember;
949
950 extern struct __ecereNameSpace__ecere__com__BitMember * __ecereNameSpace__ecere__com__eClass_AddBitMember(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, const char *  type, int bitSize, int bitPos, int declMode);
951
952 struct __ecereNameSpace__ecere__com__BitMember
953 {
954 struct __ecereNameSpace__ecere__com__BitMember * prev;
955 struct __ecereNameSpace__ecere__com__BitMember * next;
956 const char *  name;
957 unsigned int isProperty;
958 int memberAccess;
959 int id;
960 struct __ecereNameSpace__ecere__com__Class * _class;
961 const char *  dataTypeString;
962 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
963 struct Type * dataType;
964 int type;
965 int size;
966 int pos;
967 uint64 mask;
968 } ecere_gcc_struct;
969
970 struct __ecereNameSpace__ecere__com__Module;
971
972 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, const char *  name);
973
974 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
975
976 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);
977
978 extern struct ModuleImport * FindModule(struct __ecereNameSpace__ecere__com__Instance * moduleToFind);
979
980 extern struct __ecereNameSpace__ecere__com__DefinedExpression * __ecereNameSpace__ecere__com__eSystem_RegisterDefine(const char *  name, const char *  value, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
981
982 extern struct __ecereNameSpace__ecere__com__GlobalFunction * __ecereNameSpace__ecere__com__eSystem_RegisterFunction(const char *  name, const char *  type, void *  func, struct __ecereNameSpace__ecere__com__Instance * module, int declMode);
983
984 struct GlobalData
985 {
986 uintptr_t key;
987 struct __ecereNameSpace__ecere__sys__BTNode * parent;
988 struct __ecereNameSpace__ecere__sys__BTNode * left;
989 struct __ecereNameSpace__ecere__sys__BTNode * right;
990 int depth;
991 struct __ecereNameSpace__ecere__com__Instance * module;
992 char *  dataTypeString;
993 struct Type * dataType;
994 void *  symbol;
995 char *  fullName;
996 } ecere_gcc_struct;
997
998 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com__eModule_LoadStrict(struct __ecereNameSpace__ecere__com__Instance * fromModule, const char *  name, int importAccess);
999
1000 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
1001
1002 struct __ecereNameSpace__ecere__sys__BinaryTree;
1003
1004 struct __ecereNameSpace__ecere__sys__BinaryTree
1005 {
1006 struct __ecereNameSpace__ecere__sys__BTNode * root;
1007 int count;
1008 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
1009 void (*  FreeKey)(void *  key);
1010 } ecere_gcc_struct;
1011
1012 struct __ecereNameSpace__ecere__com__NameSpace
1013 {
1014 const char *  name;
1015 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
1016 struct __ecereNameSpace__ecere__com__NameSpace *  left;
1017 struct __ecereNameSpace__ecere__com__NameSpace *  right;
1018 int depth;
1019 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
1020 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
1021 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
1022 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
1023 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
1024 } ecere_gcc_struct;
1025
1026 struct __ecereNameSpace__ecere__com__Class
1027 {
1028 struct __ecereNameSpace__ecere__com__Class * prev;
1029 struct __ecereNameSpace__ecere__com__Class * next;
1030 const char *  name;
1031 int offset;
1032 int structSize;
1033 void * *  _vTbl;
1034 int vTblSize;
1035 unsigned int (*  Constructor)(void * );
1036 void (*  Destructor)(void * );
1037 int offsetClass;
1038 int sizeClass;
1039 struct __ecereNameSpace__ecere__com__Class * base;
1040 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
1041 struct __ecereNameSpace__ecere__sys__BinaryTree members;
1042 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
1043 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
1044 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
1045 struct __ecereNameSpace__ecere__sys__OldList derivatives;
1046 int memberID;
1047 int startMemberID;
1048 int type;
1049 struct __ecereNameSpace__ecere__com__Instance * module;
1050 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
1051 const char *  dataTypeString;
1052 struct Type * dataType;
1053 int typeSize;
1054 int defaultAlignment;
1055 void (*  Initialize)();
1056 int memberOffset;
1057 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
1058 const char *  designerClass;
1059 unsigned int noExpansion;
1060 const char *  defaultProperty;
1061 unsigned int comRedefinition;
1062 int count;
1063 int isRemote;
1064 unsigned int internalDecl;
1065 void *  data;
1066 unsigned int computeSize;
1067 short structAlignment;
1068 short pointerAlignment;
1069 int destructionWatchOffset;
1070 unsigned int fixed;
1071 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
1072 int inheritanceAccess;
1073 const char *  fullName;
1074 void *  symbol;
1075 struct __ecereNameSpace__ecere__sys__OldList conversions;
1076 struct __ecereNameSpace__ecere__sys__OldList templateParams;
1077 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
1078 struct __ecereNameSpace__ecere__com__Class * templateClass;
1079 struct __ecereNameSpace__ecere__sys__OldList templatized;
1080 int numParams;
1081 unsigned int isInstanceClass;
1082 unsigned int byValueSystemClass;
1083 } ecere_gcc_struct;
1084
1085 struct __ecereNameSpace__ecere__com__DataMember
1086 {
1087 struct __ecereNameSpace__ecere__com__DataMember * prev;
1088 struct __ecereNameSpace__ecere__com__DataMember * next;
1089 const char *  name;
1090 unsigned int isProperty;
1091 int memberAccess;
1092 int id;
1093 struct __ecereNameSpace__ecere__com__Class * _class;
1094 const char *  dataTypeString;
1095 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
1096 struct Type * dataType;
1097 int type;
1098 int offset;
1099 int memberID;
1100 struct __ecereNameSpace__ecere__sys__OldList members;
1101 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
1102 int memberOffset;
1103 short structAlignment;
1104 short pointerAlignment;
1105 } ecere_gcc_struct;
1106
1107 struct __ecereNameSpace__ecere__sys__BTNode * __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  key);
1108
1109 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  a, const char *  b);
1110
1111 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1112
1113 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1114
1115 struct __ecereNameSpace__ecere__com__Application
1116 {
1117 int argc;
1118 const char * *  argv;
1119 int exitCode;
1120 unsigned int isGUIApp;
1121 struct __ecereNameSpace__ecere__sys__OldList allModules;
1122 char *  parsedCommand;
1123 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
1124 } ecere_gcc_struct;
1125
1126 void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace)
1127 {
1128 globalData = nameSpace;
1129 }
1130
1131 static void ReadDataMembers(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__com__Instance * f)
1132 {
1133 char line[1024];
1134 char name[1024];
1135 int size = 0, bitPos = -1;
1136 int memberAccess = 1;
1137
1138 for(; ; )
1139 {
1140 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1141 break;
1142 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1143 if(!strcmp(line, "."))
1144 break;
1145 if(line[0] == '[')
1146 {
1147 if(!strcmp(line, "[Size]"))
1148 {
1149 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1150 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1151 size = strtol(line, (((void *)0)), 0);
1152 }
1153 else if(!strcmp(line, "[Pos]"))
1154 {
1155 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1156 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1157 bitPos = strtol(line, (((void *)0)), 0);
1158 }
1159 else if(!strcmp(line, "[Public]"))
1160 memberAccess = 1;
1161 else if(!strcmp(line, "[Private]"))
1162 memberAccess = 2;
1163 else if(!strcmp(line, "[Type]"))
1164 {
1165 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1166 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1167 if(member)
1168 {
1169 if(!__ecereNameSpace__ecere__com__eMember_AddDataMember(member, name, line[0] ? line : 0, 0, 0, memberAccess))
1170 ;
1171 }
1172 else if(regClass && regClass->type == 2)
1173 {
1174 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess);
1175
1176 member->size = size;
1177 member->pos = bitPos;
1178 }
1179 else if(regClass)
1180 {
1181 if(!__ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess))
1182 ;
1183 }
1184 }
1185 else if(!strcmp(line, "[Struct]") || !strcmp(line, "[Union]"))
1186 {
1187 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (regClass || member) ? __ecereNameSpace__ecere__com__eMember_New((!strcmp(line, "[Union]")) ? 1 : 2, memberAccess) : (((void *)0));
1188
1189 ReadDataMembers((((void *)0)), dataMember, f);
1190 if(member)
1191 {
1192 if(!__ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember))
1193 ;
1194 }
1195 else if(regClass)
1196 {
1197 if(!__ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember))
1198 ;
1199 }
1200 }
1201 }
1202 else
1203 {
1204 size = 0;
1205 bitPos = -1;
1206 strcpy(name, line);
1207 memberAccess = 1;
1208 }
1209 }
1210 }
1211
1212 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
1213
1214 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DataRedefinition;
1215
1216 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
1217
1218 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_;
1219
1220 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___;
1221
1222 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__File;
1223
1224 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1225
1226 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List;
1227
1228 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
1229
1230 struct __ecereNameSpace__ecere__com__Module
1231 {
1232 struct __ecereNameSpace__ecere__com__Instance * application;
1233 struct __ecereNameSpace__ecere__sys__OldList classes;
1234 struct __ecereNameSpace__ecere__sys__OldList defines;
1235 struct __ecereNameSpace__ecere__sys__OldList functions;
1236 struct __ecereNameSpace__ecere__sys__OldList modules;
1237 struct __ecereNameSpace__ecere__com__Instance * prev;
1238 struct __ecereNameSpace__ecere__com__Instance * next;
1239 const char *  name;
1240 void *  library;
1241 void *  Unload;
1242 int importType;
1243 int origImportType;
1244 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1245 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1246 } ecere_gcc_struct;
1247
1248 void __ecereCreateModuleInstances_loadSymbols()
1249 {
1250 loadedModules = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___);
1251 __ecereNameSpace__ecere__com__eInstance_IncRef(loadedModules);
1252 }
1253
1254 void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList)
1255 {
1256 struct __ecereNameSpace__ecere__com__NameSpace * ns;
1257 struct GlobalData * data;
1258
1259 for(; (ns = (struct __ecereNameSpace__ecere__com__NameSpace *)globalDataList->nameSpaces.root); )
1260 {
1261 FreeGlobalData(ns);
1262 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)ns);
1263 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)(*ns).name), (*ns).name = 0);
1264 (__ecereNameSpace__ecere__com__eSystem_Delete(ns), ns = 0);
1265 }
1266 for(; (data = (struct GlobalData *)globalDataList->functions.root); )
1267 {
1268 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->functions, (void *)(data));
1269 if(data->symbol)
1270 FreeSymbol(data->symbol);
1271 FreeType(data->dataType);
1272 (__ecereNameSpace__ecere__com__eSystem_Delete(data->fullName), data->fullName = 0);
1273 (__ecereNameSpace__ecere__com__eSystem_Delete(data->dataTypeString), data->dataTypeString = 0);
1274 ((data ? __extension__ ({
1275 void * __ecerePtrToDelete = (data);
1276
1277 __ecereClass_GlobalData->Destructor ? __ecereClass_GlobalData->Destructor((void *)__ecerePtrToDelete) : 0, __ecereClass___ecereNameSpace__ecere__sys__BTNode->Destructor ? __ecereClass___ecereNameSpace__ecere__sys__BTNode->Destructor((void *)__ecerePtrToDelete) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(__ecerePtrToDelete);
1278 }) : 0), data = 0);
1279 }
1280 }
1281
1282 void __ecereUnregisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
1283 {
1284
1285 }
1286
1287 void ImportModule(const char *  name, int importType, int importAccess, unsigned int loadDllOnly);
1288
1289 unsigned int LoadSymbols(const char * fileName, int importType, unsigned int loadDllOnly)
1290 {
1291 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpenBuffered(fileName, 1);
1292 unsigned int globalInstance = 0;
1293
1294 if(f)
1295 {
1296 unsigned int ecereCOMModule = 0;
1297 char moduleName[797];
1298
1299 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, moduleName);
1300 if(!((strcasecmp)(moduleName, "instance.sym") && (strcasecmp)(moduleName, "BinaryTree.sym") && (strcasecmp)(moduleName, "dataTypes.sym") && (strcasecmp)(moduleName, "OldList.sym") && (strcasecmp)(moduleName, "String.sym") && (strcasecmp)(moduleName, "BTNode.sym") && (strcasecmp)(moduleName, "Array.sym") && (strcasecmp)(moduleName, "AVLTree.sym") && (strcasecmp)(moduleName, "BuiltInContainer.sym") && (strcasecmp)(moduleName, "Container.sym") && (strcasecmp)(moduleName, "CustomAVLTree.sym") && (strcasecmp)(moduleName, "LinkList.sym") && (strcasecmp)(moduleName, "List.sym") && (strcasecmp)(moduleName, "Map.sym") && (strcasecmp)(moduleName, "Mutex.sym")))
1301 ecereCOMModule = 1;
1302 for(; ; )
1303 {
1304 char line[1024];
1305
1306 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1307 break;
1308 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1309 if(line[0] == '[')
1310 {
1311 if(!strcmp(line, "[Global Instance]"))
1312 globalInstance = 1;
1313 else if(!strcmp(line, "[Defined Classes]"))
1314 {
1315 struct __ecereNameSpace__ecere__com__Class * regClass = (((void *)0));
1316 char name[1024];
1317 unsigned int isRemote = 0;
1318 unsigned int isStatic = 0;
1319 unsigned int isWatchable = 0;
1320 int classType = 0;
1321 unsigned int fixed = 0;
1322 unsigned int noExpansion = 0;
1323 int inheritanceAccess = 1;
1324
1325 for(; ; )
1326 {
1327 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1328 break;
1329 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1330 if(!strcmp(line, "."))
1331 break;
1332 if(line[0] == '[')
1333 {
1334 if(!strcmp(line, "[Remote]"))
1335 isRemote = 1;
1336 else if(!strcmp(line, "[Static]"))
1337 isStatic = 1;
1338 else if(!strcmp(line, "[Fixed]"))
1339 fixed = 1;
1340 else if(!strcmp(line, "[No Expansion]"))
1341 noExpansion = 1;
1342 else if(!strcmp(line, "[Watchable]"))
1343 isWatchable = 1;
1344 else if(!strcmp(line, "[Enum]"))
1345 classType = 4;
1346 else if(!strcmp(line, "[Bit]"))
1347 classType = 2;
1348 else if(!strcmp(line, "[Struct]"))
1349 classType = 1;
1350 else if(!strcmp(line, "[Unit]"))
1351 classType = 3;
1352 else if(!strcmp(line, "[NoHead]"))
1353 classType = 5;
1354 else if(!strcmp(line, "[Base]") || !strcmp(line, "[Private Base]"))
1355 {
1356 if(!strcmp(line, "[Private Base]"))
1357 inheritanceAccess = 2;
1358 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1359 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1360 if(importType == 3)
1361 DeclClass((((void *)0)), name);
1362 if(isStatic || loadDllOnly || importType == 3 || importType == 4)
1363 regClass = (((void *)0));
1364 else if(regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, name), !regClass || regClass->internalDecl || regClass->isRemote)
1365 {
1366 struct Symbol * existingClass = FindClass(name);
1367 const char * baseName = (classType == 0 && importType == 2 && isRemote) ? "DCOMClientObject" : (!strcmp(line, "[None]") ? (((void *)0)) : line);
1368
1369 if(!isRemote || (importType != 2) || (!sourceFile || !strstr(sourceFile, ".main.ec")))
1370 {
1371 if(!regClass || regClass->internalDecl)
1372 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, name, isRemote ? (((void *)0)) : baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1373 if(regClass && isRemote)
1374 regClass->isRemote = (importType == 2) ? 1 : 2;
1375 if(isRemote)
1376 {
1377 if(importType == 2)
1378 {
1379 char className[1024] = "DCOMClient_";
1380
1381 strcat(className, name);
1382 if(!existingClass)
1383 existingClass = DeclClass((((void *)0)), name);
1384 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, className, baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1385 }
1386 if(regClass)
1387 regClass->isRemote = (importType == 2) ? 1 : 3;
1388 }
1389 if(existingClass)
1390 {
1391 struct __ecereNameSpace__ecere__sys__OldLink * link;
1392
1393 for(link = existingClass->templatedClasses.first; link; link = link->next)
1394 {
1395 struct Symbol * symbol = link->data;
1396
1397 symbol->__anon1.registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1398 }
1399 }
1400 if(fixed)
1401 regClass->fixed = 1;
1402 if(noExpansion)
1403 regClass->noExpansion = 1;
1404 if(isWatchable)
1405 {
1406 __ecereNameSpace__ecere__com__eClass_DestructionWatchable(regClass);
1407 regClass->structSize = regClass->offset;
1408 }
1409 if(regClass && existingClass)
1410 {
1411 existingClass->__anon1.registered = regClass;
1412 regClass->symbol = existingClass;
1413 existingClass->notYetDeclared = 1;
1414 existingClass->imported = 1;
1415 if(regClass->module)
1416 existingClass->module = FindModule(regClass->module);
1417 else
1418 existingClass->module = mainModule;
1419 }
1420 }
1421 else
1422 regClass = (((void *)0));
1423 }
1424 else
1425 regClass = (((void *)0));
1426 isRemote = 0;
1427 isWatchable = 0;
1428 fixed = 0;
1429 isStatic = 0;
1430 }
1431 else if(!strcmp(line, "[Enum Values]"))
1432 {
1433 for(; ; )
1434 {
1435 char * equal;
1436
1437 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1438 break;
1439 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1440 if(!strcmp(line, "."))
1441 break;
1442 if(regClass)
1443 {
1444 equal = strchr(line, '=');
1445 if(equal)
1446 {
1447 char name[1024];
1448
1449 memcpy(name, line, (int)(equal - line));
1450 name[equal - line] = '\0';
1451 __ecereNameSpace__ecere__sys__TrimLSpaces(name, name);
1452 __ecereNameSpace__ecere__sys__TrimRSpaces(name, name);
1453 __ecereNameSpace__ecere__com__eEnum_AddFixedValue(regClass, name, strtoll(equal + 1, (((void *)0)), 0));
1454 }
1455 else
1456 {
1457 __ecereNameSpace__ecere__com__eEnum_AddValue(regClass, line);
1458 }
1459 }
1460 }
1461 }
1462 else if(!strcmp(line, "[Defined Methods]"))
1463 {
1464 char name[1024];
1465 unsigned int isVirtual = 0;
1466 int memberAccess = 1;
1467
1468 for(; ; )
1469 {
1470 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1471 break;
1472 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1473 if(!strcmp(line, "."))
1474 break;
1475 if(line[0] == '[')
1476 {
1477 if(!strcmp(line, "[Type]"))
1478 {
1479 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1480 if(regClass)
1481 {
1482 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1483 if(isVirtual)
1484 __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1485 else
1486 __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1487 }
1488 }
1489 else if(!strcmp(line, "[Virtual]"))
1490 isVirtual = 1;
1491 else if(!strcmp(line, "[Public]"))
1492 memberAccess = 1;
1493 else if(!strcmp(line, "[Private]"))
1494 memberAccess = 2;
1495 }
1496 else
1497 {
1498 strcpy(name, line);
1499 isVirtual = 0;
1500 memberAccess = 1;
1501 }
1502 }
1503 }
1504 else if(!strcmp(line, "[Defined Properties]"))
1505 {
1506 char name[1024];
1507 unsigned int setStmt = 0, getStmt = 0, isVirtual = 0, conversion = 0;
1508 unsigned int isWatchable = 0;
1509 int memberAccess = 1;
1510
1511 for(; ; )
1512 {
1513 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1514 break;
1515 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1516 if(!strcmp(line, "."))
1517 break;
1518 if(line[0] == '[')
1519 {
1520 if(!strcmp(line, "[Type]"))
1521 {
1522 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1523 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1524 if(regClass)
1525 {
1526 struct __ecereNameSpace__ecere__com__Property * prop = __ecereNameSpace__ecere__com__eClass_AddProperty(regClass, conversion ? (((void *)0)) : name, line[0] ? line : 0, (void *)(uintptr_t)setStmt, (void *)(uintptr_t)getStmt, memberAccess);
1527
1528 if(prop)
1529 {
1530 prop->compiled = 0;
1531 if(isWatchable)
1532 {
1533 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1534 regClass->structSize = regClass->offset;
1535 }
1536 }
1537 }
1538 }
1539 else if(!strcmp(line, "[Set]"))
1540 setStmt = 1;
1541 else if(!strcmp(line, "[Get]"))
1542 getStmt = 1;
1543 else if(!strcmp(line, "[Watchable]"))
1544 isWatchable = 1;
1545 else if(!strcmp(line, "[Public]"))
1546 memberAccess = 1;
1547 else if(!strcmp(line, "[Private]"))
1548 memberAccess = 2;
1549 else if(!strcmp(line, "[Conversion]"))
1550 {
1551 conversion = 1;
1552 setStmt = getStmt = isVirtual = isWatchable = 0;
1553 }
1554 }
1555 else
1556 {
1557 strcpy(name, line);
1558 setStmt = getStmt = isVirtual = conversion = isWatchable = 0;
1559 memberAccess = 1;
1560 }
1561 }
1562 }
1563 else if(!strcmp(line, "[Defined Class Properties]"))
1564 {
1565 char name[1024];
1566 unsigned int setStmt = 0, getStmt = 0;
1567
1568 for(; ; )
1569 {
1570 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1571 break;
1572 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1573 if(!strcmp(line, "."))
1574 break;
1575 if(line[0] == '[')
1576 {
1577 if(!strcmp(line, "[Type]"))
1578 {
1579 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1580 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1581 if(regClass)
1582 {
1583 __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, name, line, (void *)(uintptr_t)setStmt, (void *)(uintptr_t)getStmt);
1584 }
1585 }
1586 else if(!strcmp(line, "[Set]"))
1587 setStmt = 1;
1588 else if(!strcmp(line, "[Get]"))
1589 getStmt = 1;
1590 }
1591 else
1592 {
1593 strcpy(name, line);
1594 setStmt = getStmt = 0;
1595 }
1596 }
1597 }
1598 else if(!strcmp(line, "[Defined Data Members]"))
1599 {
1600 ReadDataMembers(regClass, (((void *)0)), f);
1601 }
1602 else if(!strcmp(line, "[Template Parameters]"))
1603 {
1604 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
1605 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1606
1607 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1608 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(f))
1609 {
1610 char name[1024];
1611 int type = 0;
1612 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1613 {
1614
1615 .__anon1 = {
1616
1617 .__anon1 = {
1618 .dataTypeString = 0
1619 }
1620 }
1621 };
1622 void * info = (((void *)0));
1623
1624 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1625 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1626 if(line[0] == '.')
1627 break;
1628 strcpy(name, line);
1629 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1630 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1631 if(!strcmp(line, "[Expression]"))
1632 type = 2;
1633 else if(!strcmp(line, "[Identifier]"))
1634 type = 1;
1635 switch(type)
1636 {
1637 case 0:
1638 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1639 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1640 if(regClass && strcmp(line, "[None]"))
1641 {
1642 info = __ecereNameSpace__ecere__sys__CopyString(line);
1643 }
1644 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1645 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1646 if(regClass && strcmp(line, "[None]"))
1647 {
1648 defaultArg.__anon1.__anon1.dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line);
1649 }
1650 break;
1651 case 2:
1652 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1653 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1654 if(regClass && strcmp(line, "[None]"))
1655 {
1656 info = __ecereNameSpace__ecere__sys__CopyString(line);
1657 }
1658 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1659 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1660 if(regClass && strcmp(line, "[None]"))
1661 {
1662 struct __ecereNameSpace__ecere__com__Instance * backup = pushLexer();
1663 struct Operand op;
1664 struct Expression * exp;
1665
1666 skipErrors = 1;
1667 exp = ParseExpressionString(line);
1668 if(exp)
1669 {
1670 if(info)
1671 exp->destType = ProcessTypeString(info, 0);
1672 ProcessExpressionType(exp);
1673 ComputeExpression(exp);
1674 op = GetOperand(exp);
1675 defaultArg.__anon1.expression.__anon1.ui64 = op.__anon1.ui64;
1676 FreeExpression(exp);
1677 }
1678 skipErrors = 0;
1679 popLexer(backup);
1680 }
1681 break;
1682 case 1:
1683 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1684 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1685 if(!strcmp(line, "[Data member]"))
1686 info = (void *)0;
1687 else if(!strcmp(line, "[Method]"))
1688 info = (void *)1;
1689 else if(!strcmp(line, "[Property]"))
1690 info = (void *)2;
1691 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1692 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1693 if(regClass && strcmp(line, "[None]"))
1694 {
1695 defaultArg.__anon1.__anon2.memberString = __ecereNameSpace__ecere__sys__CopyString(line);
1696 }
1697 break;
1698 }
1699 if(regClass)
1700 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, name, type, info, &defaultArg);
1701 if(type == 0 || type == 2)
1702 (__ecereNameSpace__ecere__com__eSystem_Delete(info), info = 0);
1703 if(type == 0 || type == 1)
1704 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)defaultArg.__anon1.__anon1.dataTypeString), defaultArg.__anon1.__anon1.dataTypeString = 0);
1705 }
1706 if(regClass)
1707 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1708 }
1709 }
1710 else
1711 {
1712 inheritanceAccess = 1;
1713 classType = 0;
1714 isRemote = 0;
1715 strcpy(name, line);
1716 regClass = (((void *)0));
1717 }
1718 }
1719 }
1720 else if(!strcmp(line, "[Defined Expressions]"))
1721 {
1722 char name[1024];
1723
1724 for(; ; )
1725 {
1726 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1727 break;
1728 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1729 if(!strcmp(line, "."))
1730 break;
1731 if(!strcmp(line, "[Value]"))
1732 {
1733 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1734 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1735 if(!loadDllOnly && importType != 3 && importType != 4)
1736 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(name, line, privateModule, ecereCOMModule ? 4 : 1);
1737 }
1738 else if(line[0] != '[')
1739 {
1740 strcpy(name, line);
1741 }
1742 }
1743 }
1744 else if(!strcmp(line, "[Defined Functions]"))
1745 {
1746 char name[1024];
1747
1748 for(; ; )
1749 {
1750 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1751 break;
1752 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1753 if(!strcmp(line, "."))
1754 break;
1755 if(!strcmp(line, "[Type]"))
1756 {
1757 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1758 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1759 if(!loadDllOnly && importType != 3 && importType != 4)
1760 __ecereNameSpace__ecere__com__eSystem_RegisterFunction(name, line, (((void *)0)), privateModule, ecereCOMModule ? 4 : 1);
1761 }
1762 else if(line[0] != '[')
1763 {
1764 strcpy(name, line);
1765 }
1766 }
1767 }
1768 else if(!strcmp(line, "[Defined Data]"))
1769 {
1770 char name[1024];
1771
1772 for(; ; )
1773 {
1774 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1775 break;
1776 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1777 if(!strcmp(line, "."))
1778 break;
1779 if(!strcmp(line, "[Type]"))
1780 {
1781 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1782 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1783 if(!loadDllOnly && importType != 3 && importType != 4)
1784 {
1785 int start = 0, c;
1786 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace = globalData;
1787 struct GlobalData * data;
1788
1789 for(c = 0; name[c]; c++)
1790 {
1791 if(name[c] == '.' || (name[c] == ':' && name[c + 1] == ':'))
1792 {
1793 struct __ecereNameSpace__ecere__com__NameSpace * newSpace;
1794 char * spaceName = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (c - start + 1));
1795
1796 strncpy(spaceName, name + start, c - start);
1797 spaceName[c - start] = '\0';
1798 newSpace = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).nameSpaces, spaceName);
1799 if(!newSpace)
1800 {
1801 newSpace = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__com__NameSpace) * (1));
1802 (*newSpace).classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1803 (*newSpace).defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1804 (*newSpace).functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1805 (*newSpace).nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1806 (*newSpace).name = spaceName;
1807 (*newSpace).parent = nameSpace;
1808 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)newSpace);
1809 }
1810 else
1811 (__ecereNameSpace__ecere__com__eSystem_Delete(spaceName), spaceName = 0);
1812 nameSpace = newSpace;
1813 if(name[c] == ':')
1814 c++;
1815 start = c + 1;
1816 }
1817 }
1818 if(c - start)
1819 {
1820 data = (struct GlobalData *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).functions, name + start);
1821 if(!data)
1822 {
1823 data = __extension__ ({
1824 struct GlobalData * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData);
1825
1826 __ecereInstance1->fullName = __ecereNameSpace__ecere__sys__CopyString(name), __ecereInstance1->dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1->module = privateModule, __ecereInstance1;
1827 });
1828 data->key = (uintptr_t)(data->fullName + start);
1829 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1830 }
1831 else if(strcmp(data->dataTypeString, line))
1832 {
1833 struct DataRedefinition * redefinition = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DataRedefinition);
1834
1835 strcpy(redefinition->name, name);
1836 strcpy(redefinition->type1, data->dataTypeString);
1837 strcpy(redefinition->type2, line);
1838 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&dataRedefinitions, redefinition);
1839 }
1840 }
1841 }
1842 }
1843 else if(line[0] != '[')
1844 {
1845 strcpy(name, line);
1846 }
1847 }
1848 }
1849 else if(!strcmp(line, "[Imported Modules]"))
1850 {
1851 int moduleImportType = 0;
1852 int importAccess = 1;
1853
1854 for(; ; )
1855 {
1856 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1857 break;
1858 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1859 if(!strcmp(line, "."))
1860 break;
1861 if(!strcmp(line, "[Static]"))
1862 moduleImportType = 1;
1863 else if(!strcmp(line, "[Remote]"))
1864 moduleImportType = 2;
1865 else if(!strcmp(line, "[Private]"))
1866 importAccess = 2;
1867 else if(line[0] != '[')
1868 {
1869 if(importType != 3 && importType != 4)
1870 ImportModule(line, moduleImportType, importAccess, loadDllOnly);
1871 else
1872 ImportModule(line, 4, importAccess, loadDllOnly);
1873 if(!strcmp(line, "ecere"))
1874 ecereImported = 1;
1875 moduleImportType = 0;
1876 importAccess = 1;
1877 }
1878 }
1879 }
1880 }
1881 }
1882 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1883 }
1884 else if(importType != 4)
1885 {
1886 char sysFileName[797];
1887
1888 __ecereNameSpace__ecere__sys__GetSystemPathBuffer(sysFileName, fileName);
1889 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString("ec", "Couldn't open %s\n", (((void *)0))), sysFileName);
1890 }
1891 return globalInstance;
1892 }
1893
1894 void ImportModule(const char * name, int importType, int importAccess, unsigned int loadDllOnly)
1895 {
1896 struct ImportedModule * module = (((void *)0));
1897 char moduleName[797];
1898
1899 strncpy(moduleName, name, (797) - 1);
1900 moduleName[(797) - 1] = 0;
1901 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1902 for(module = (*defines).first; module; module = module->next)
1903 {
1904 if(module->type == 0 && !(strcasecmp)(module->name, moduleName))
1905 break;
1906 }
1907 if((!module || (module->dllOnly && !loadDllOnly)) && strlen(name) < (274))
1908 {
1909 char ext[17];
1910 struct __ecereNameSpace__ecere__com__Instance * loadedModule = (((void *)0));
1911 char symFile[797];
1912
1913 symFile[0] = '\0';
1914 __ecereNameSpace__ecere__sys__GetExtension(name, ext);
1915 strcpy(symFile, symbolsDir ? symbolsDir : "");
1916 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1917 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1918 if(!strcmp(ext, "dll") || !strcmp(ext, "so") || !strcmp(ext, "dylib") || !ext[0])
1919 {
1920 if(importType != 4)
1921 {
1922 if(!module)
1923 {
1924 if(precompDefines)
1925 {
1926 module = __extension__ ({
1927 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1928
1929 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1930 });
1931 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1932 }
1933 module = __extension__ ({
1934 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1935
1936 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1937 });
1938 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1939 }
1940 module->dllOnly = loadDllOnly;
1941 if(ext[0] || !__ecereNameSpace__ecere__sys__FileExists(symFile))
1942 {
1943 unsigned int skipLoad = 0;
1944 struct __ecereNameSpace__ecere__com__Instance * list = (((void *)0));
1945
1946 if(!inCompiler && !inPreCompiler && !inSymbolGen && !inDocumentor)
1947 {
1948 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, loadedModules), it);
1949
1950 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index((void *)(&it), (uint64)(uintptr_t)(name), 0))
1951 {
1952 struct __ecereNameSpace__ecere__com__Instance * firstModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->application, name, importAccess);
1953
1954 if(firstModule)
1955 {
1956 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_);
1957 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1958 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
1959
1960 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
1961 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(uintptr_t)(firstModule));
1962 __extension__ ({
1963 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1964 {
1965 loadedModules, 0
1966 };
1967
1968 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, ((uint64)(uintptr_t)(name)), 1);
1969 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, ((uint64)((uintptr_t)(list))));
1970 });
1971 }
1972 else
1973 skipLoad = 1;
1974 }
1975 else
1976 list = ((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&it)));
1977 }
1978 if(!skipLoad)
1979 {
1980 loadedModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, name, importAccess);
1981 if(loadedModule)
1982 {
1983 ((struct __ecereNameSpace__ecere__com__Module *)(((char *)loadedModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->importType = importType;
1984 module->dllOnly = 0;
1985 if(list)
1986 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1987 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
1988
1989 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
1990 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(uintptr_t)(loadedModule));
1991 }
1992 }
1993 }
1994 }
1995 }
1996 if(!loadedModule && (!strcmp(ext, "ec") || !strcmp(ext, "sym") || !ext[0]))
1997 {
1998 {
1999 if(!module)
2000 {
2001 if(precompDefines)
2002 {
2003 module = __extension__ ({
2004 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2005
2006 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2007 });
2008 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
2009 }
2010 module = __extension__ ({
2011 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2012
2013 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2014 });
2015 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
2016 }
2017 module->dllOnly = loadDllOnly;
2018 if(inPreCompiler)
2019 return ;
2020 if(inIDE && !__ecereNameSpace__ecere__sys__FileExists(symFile) && sourceDirs)
2021 {
2022 {
2023 struct __ecereNameSpace__ecere__com__Iterator dir =
2024 {
2025 (sourceDirs), 0
2026 };
2027
2028 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&dir))
2029 {
2030 char configDir[274];
2031
2032 strcpy(symFile, ((char * )((uintptr_t)(__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&dir)))));
2033 __ecereNameSpace__ecere__sys__PathCat(symFile, "obj");
2034 sprintf(configDir, "debug.%s", (__runtimePlatform == 1) ? "win32" : (__runtimePlatform == 3) ? "apple" : "linux");
2035 __ecereNameSpace__ecere__sys__PathCat(symFile, configDir);
2036 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
2037 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
2038 if(__ecereNameSpace__ecere__sys__FileExists(symFile))
2039 break;
2040 }
2041 }
2042 }
2043 if(!__ecereNameSpace__ecere__sys__FileExists(symFile))
2044 {
2045 char fileName[274];
2046
2047 __ecereNameSpace__ecere__sys__GetLastDirectory(symFile, fileName);
2048 strcpy(symFile, symbolsDir ? symbolsDir : "");
2049 __ecereNameSpace__ecere__sys__PathCat(symFile, fileName);
2050 }
2051 module->globalInstance = LoadSymbols(symFile, importType, loadDllOnly);
2052 }
2053 }
2054 }
2055 }
2056
2057 void __ecereRegisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2058 {
2059 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2060
2061 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetGlobalData", "void SetGlobalData(ecere::com::NameSpace * nameSpace)", SetGlobalData, module, 1);
2062 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInIDE", "void SetInIDE(bool b)", SetInIDE, module, 1);
2063 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSourceDirs", "void SetSourceDirs(ecere::com::List<String> list)", SetSourceDirs, module, 1);
2064 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetIncludeDirs", "void SetIncludeDirs(ecere::sys::OldList * list)", SetIncludeDirs, module, 1);
2065 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSysIncludeDirs", "void SetSysIncludeDirs(ecere::sys::OldList * list)", SetSysIncludeDirs, module, 1);
2066 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetEcereImported", "void SetEcereImported(bool b)", SetEcereImported, module, 1);
2067 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetEcereImported", "bool GetEcereImported(void)", GetEcereImported, module, 1);
2068 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInPreCompiler", "void SetInPreCompiler(bool b)", SetInPreCompiler, module, 1);
2069 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInSymbolGen", "void SetInSymbolGen(bool b)", SetInSymbolGen, module, 1);
2070 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInDocumentor", "void SetInDocumentor(bool b)", SetInDocumentor, module, 1);
2071 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetPrecompDefines", "void SetPrecompDefines(ecere::sys::OldList * list)", SetPrecompDefines, module, 1);
2072 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DummyMethod", "bool DummyMethod(void)", DummyMethod, module, 1);
2073 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("LoadSymbols", "bool LoadSymbols(const char * fileName, ecere::com::ImportType importType, bool loadDllOnly)", LoadSymbols, module, 1);
2074 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ImportModule", "void ImportModule(const char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess, bool loadDllOnly)", ImportModule, module, 1);
2075 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindIncludeFileID", "int FindIncludeFileID(char * includeFile)", FindIncludeFileID, module, 2);
2076 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileID", "int GetIncludeFileID(char * includeFile)", GetIncludeFileID, module, 2);
2077 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileFromID", "char * GetIncludeFileFromID(int id)", GetIncludeFileFromID, module, 2);
2078 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OpenIncludeFile", "ecere::sys::File OpenIncludeFile(char * includeFile)", OpenIncludeFile, module, 2);
2079 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIncludeFiles", "void FreeIncludeFiles(void)", FreeIncludeFiles, module, 1);
2080 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeGlobalData", "void FreeGlobalData(ecere::com::NameSpace globalDataList)", FreeGlobalData, module, 1);
2081 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckDataRedefinitions", "void CheckDataRedefinitions(void)", CheckDataRedefinitions, module, 1);
2082 }
2083