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