compiler/libec: Improved template type checks to avoid arguments mix-up
[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 usedInComparison;
481 unsigned int ambiguousUnits;
482 unsigned int parentOpDestType;
483 unsigned int needTemplateCast;
484 } ecere_gcc_struct;
485
486 extern void ProcessExpressionType(struct Expression * exp);
487
488 extern void ComputeExpression(struct Expression * exp);
489
490 extern void FreeExpression(struct Expression * exp);
491
492 struct __ecereNameSpace__ecere__com__Class;
493
494 struct __ecereNameSpace__ecere__com__Instance
495 {
496 void * *  _vTbl;
497 struct __ecereNameSpace__ecere__com__Class * _class;
498 int _refCount;
499 } ecere_gcc_struct;
500
501 extern long long __ecereNameSpace__ecere__com__eClass_GetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name);
502
503 extern void __ecereNameSpace__ecere__com__eClass_SetProperty(struct __ecereNameSpace__ecere__com__Class * _class, const char *  name, long long value);
504
505 extern void __ecereNameSpace__ecere__com__eClass_DestructionWatchable(struct __ecereNameSpace__ecere__com__Class * _class);
506
507 extern void __ecereNameSpace__ecere__com__eEnum_AddFixedValue(struct __ecereNameSpace__ecere__com__Class * _class, const char *  string, long long value);
508
509 extern long long __ecereNameSpace__ecere__com__eEnum_AddValue(struct __ecereNameSpace__ecere__com__Class * _class, const char *  string);
510
511 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);
512
513 extern void __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(struct __ecereNameSpace__ecere__com__Class * base);
514
515 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
516
517 extern void __ecereNameSpace__ecere__com__eInstance_SetMethod(struct __ecereNameSpace__ecere__com__Instance * instance, const char *  name, void *  function);
518
519 extern void __ecereNameSpace__ecere__com__eInstance_IncRef(struct __ecereNameSpace__ecere__com__Instance * instance);
520
521 struct __ecereNameSpace__ecere__com__Instance * sourceDirs;
522
523 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpenBuffered(const char *  fileName, int mode);
524
525 struct LexerBackup
526 {
527 struct Location yylloc;
528 struct Location type_yylloc;
529 struct Location expression_yylloc;
530 int declMode;
531 int defaultDeclMode;
532 struct __ecereNameSpace__ecere__com__Instance * fileInput;
533 struct yy_buffer_state *  include_stack[30];
534 struct __ecereNameSpace__ecere__com__Instance * fileStack[30];
535 char sourceFileStack[30][797];
536 struct Location locStack[30];
537 int declModeStack[30];
538 int include_stack_ptr;
539 struct yy_buffer_state *  buffer;
540 int yy_n_chars;
541 char *  yytext;
542 char *  yy_c_buf_p;
543 void *  yyin;
544 char yy_hold_char;
545 int yychar;
546 int yy_init;
547 int yy_start;
548 } ecere_gcc_struct;
549
550 struct __ecereNameSpace__ecere__com__MapIterator
551 {
552 struct __ecereNameSpace__ecere__com__Instance * container;
553 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
554 } ecere_gcc_struct;
555
556 struct __ecereNameSpace__ecere__com__Iterator
557 {
558 struct __ecereNameSpace__ecere__com__Instance * container;
559 struct __ecereNameSpace__ecere__com__IteratorPointer * pointer;
560 } ecere_gcc_struct;
561
562 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(const char *  fileName, int mode);
563
564 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(struct __ecereNameSpace__ecere__com__Instance * this, char *  s, int max);
565
566 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
567
568 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
569
570 int __ecereVMethodID___ecereNameSpace__ecere__com__Container_Add;
571
572 void SetSourceDirs(struct __ecereNameSpace__ecere__com__Instance * list)
573 {
574 sourceDirs = list;
575 }
576
577 extern struct __ecereNameSpace__ecere__com__Instance * pushLexer(void);
578
579 extern void popLexer(struct __ecereNameSpace__ecere__com__Instance * backup);
580
581 struct __ecereNameSpace__ecere__com__Instance * __ecereProp___ecereNameSpace__ecere__com__MapIterator_Get_map(struct __ecereNameSpace__ecere__com__MapIterator * this);
582
583 void __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(struct __ecereNameSpace__ecere__com__MapIterator * this, struct __ecereNameSpace__ecere__com__Instance * value);
584
585 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(struct __ecereNameSpace__ecere__com__Iterator * this, const uint64 index, unsigned int create);
586
587 uint64 __ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(struct __ecereNameSpace__ecere__com__Iterator * this);
588
589 void __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(struct __ecereNameSpace__ecere__com__Iterator * this, uint64 value);
590
591 unsigned int __ecereMethod___ecereNameSpace__ecere__com__Iterator_Next();
592
593 void __ecereDestroyModuleInstances_loadSymbols()
594 {
595 (__ecereNameSpace__ecere__com__eInstance_DecRef(loadedModules), loadedModules = 0);
596 }
597
598 struct __ecereNameSpace__ecere__sys__BTNode;
599
600 struct __ecereNameSpace__ecere__sys__BTNode
601 {
602 uintptr_t key;
603 struct __ecereNameSpace__ecere__sys__BTNode * parent;
604 struct __ecereNameSpace__ecere__sys__BTNode * left;
605 struct __ecereNameSpace__ecere__sys__BTNode * right;
606 int depth;
607 } ecere_gcc_struct;
608
609 struct __ecereNameSpace__ecere__com__DataMember;
610
611 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);
612
613 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);
614
615 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
616
617 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
618
619 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
620
621 struct Symbol;
622
623 extern struct Symbol * DeclClass(struct Specifier * _class, const char *  name);
624
625 extern struct Symbol * FindClass(const char *  name);
626
627 extern void FreeSymbol(struct Symbol * symbol);
628
629 struct __ecereNameSpace__ecere__sys__OldLink;
630
631 struct __ecereNameSpace__ecere__sys__OldLink
632 {
633 struct __ecereNameSpace__ecere__sys__OldLink * prev;
634 struct __ecereNameSpace__ecere__sys__OldLink * next;
635 void *  data;
636 } ecere_gcc_struct;
637
638 struct __ecereNameSpace__ecere__com__Property;
639
640 struct __ecereNameSpace__ecere__com__Property
641 {
642 struct __ecereNameSpace__ecere__com__Property * prev;
643 struct __ecereNameSpace__ecere__com__Property * next;
644 const char *  name;
645 unsigned int isProperty;
646 int memberAccess;
647 int id;
648 struct __ecereNameSpace__ecere__com__Class * _class;
649 const char *  dataTypeString;
650 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
651 struct Type * dataType;
652 void (*  Set)(void * , int);
653 int (*  Get)(void * );
654 unsigned int (*  IsSet)(void * );
655 void *  data;
656 void *  symbol;
657 int vid;
658 unsigned int conversion;
659 unsigned int watcherOffset;
660 const char *  category;
661 unsigned int compiled;
662 unsigned int selfWatchable;
663 unsigned int isWatchable;
664 } ecere_gcc_struct;
665
666 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
667
668 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);
669
670 extern void __ecereNameSpace__ecere__com__eInstance_Watch(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property, void *  object, void (*  callback)(void * , void * ));
671
672 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
673
674 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);
675
676 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
677
678 struct DataRedefinition;
679
680 struct DataRedefinition
681 {
682 struct DataRedefinition * prev;
683 struct DataRedefinition * next;
684 char name[1024];
685 char type1[1024];
686 char type2[1024];
687 } ecere_gcc_struct;
688
689 void CheckDataRedefinitions()
690 {
691 struct DataRedefinition * redefinition;
692
693 for(redefinition = dataRedefinitions.first; redefinition; redefinition = redefinition->next)
694 {
695 struct Type * type1 = ProcessTypeString(redefinition->type1, 0);
696 struct Type * type2 = ProcessTypeString(redefinition->type2, 0);
697 char type1String[1024] = "";
698 char type2String[1024] = "";
699
700 PrintType(type1, type1String, 0, 1);
701 PrintType(type2, type2String, 0, 1);
702 if(strcmp(type1String, type2String))
703 Compiler_Warning(__ecereNameSpace__ecere__GetTranslatedString("ec", "Redefinition of %s (defining as %s, already defined as %s)\n", (((void *)0))), redefinition->name, type1String, type2String);
704 FreeType(type1);
705 FreeType(type2);
706 }
707 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&dataRedefinitions, (((void *)0)));
708 }
709
710 struct ImportedModule;
711
712 struct ImportedModule
713 {
714 struct ImportedModule * prev;
715 struct ImportedModule * next;
716 char *  name;
717 int type;
718 int importType;
719 unsigned int globalInstance;
720 unsigned int dllOnly;
721 int importAccess;
722 } ecere_gcc_struct;
723
724 struct __ecereNameSpace__ecere__sys__NamedItem;
725
726 struct __ecereNameSpace__ecere__sys__NamedItem
727 {
728 struct __ecereNameSpace__ecere__sys__NamedItem * prev;
729 struct __ecereNameSpace__ecere__sys__NamedItem * next;
730 char *  name;
731 } ecere_gcc_struct;
732
733 struct __ecereNameSpace__ecere__com__Instance * OpenIncludeFile(char * includeFile)
734 {
735 struct __ecereNameSpace__ecere__com__Instance * file;
736 char location[274];
737
738 __ecereNameSpace__ecere__sys__StripLastDirectory(sourceFileStack[(include_stack_ptr >= 0) ? include_stack_ptr : 0], location);
739 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
740 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
741 if(file)
742 {
743 strcpy(sourceFileStack[include_stack_ptr + 1], location);
744 }
745 else if(inIDE)
746 {
747 struct __ecereNameSpace__ecere__sys__NamedItem * includeDir;
748
749 if(includeDirs)
750 {
751 for(includeDir = (*includeDirs).first; includeDir; includeDir = includeDir->next)
752 {
753 strcpy(location, includeDir->name);
754 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
755 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
756 if(file)
757 break;
758 }
759 }
760 if(!file && sysIncludeDirs)
761 {
762 for(includeDir = (*sysIncludeDirs).first; includeDir; includeDir = includeDir->next)
763 {
764 strcpy(location, includeDir->name);
765 __ecereNameSpace__ecere__sys__PathCat(location, includeFile);
766 file = __ecereNameSpace__ecere__sys__FileOpen(location, 1);
767 if(file)
768 break;
769 }
770 }
771 }
772 return file;
773 }
774
775 struct Operand;
776
777 struct OpTable
778 {
779 unsigned int (*  Add)(struct Expression *, struct Operand *, struct Operand *);
780 unsigned int (*  Sub)(struct Expression *, struct Operand *, struct Operand *);
781 unsigned int (*  Mul)(struct Expression *, struct Operand *, struct Operand *);
782 unsigned int (*  Div)(struct Expression *, struct Operand *, struct Operand *);
783 unsigned int (*  Mod)(struct Expression *, struct Operand *, struct Operand *);
784 unsigned int (*  Neg)(struct Expression *, struct Operand *);
785 unsigned int (*  Inc)(struct Expression *, struct Operand *);
786 unsigned int (*  Dec)(struct Expression *, struct Operand *);
787 unsigned int (*  Asign)(struct Expression *, struct Operand *, struct Operand *);
788 unsigned int (*  AddAsign)(struct Expression *, struct Operand *, struct Operand *);
789 unsigned int (*  SubAsign)(struct Expression *, struct Operand *, struct Operand *);
790 unsigned int (*  MulAsign)(struct Expression *, struct Operand *, struct Operand *);
791 unsigned int (*  DivAsign)(struct Expression *, struct Operand *, struct Operand *);
792 unsigned int (*  ModAsign)(struct Expression *, struct Operand *, struct Operand *);
793 unsigned int (*  BitAnd)(struct Expression *, struct Operand *, struct Operand *);
794 unsigned int (*  BitOr)(struct Expression *, struct Operand *, struct Operand *);
795 unsigned int (*  BitXor)(struct Expression *, struct Operand *, struct Operand *);
796 unsigned int (*  LShift)(struct Expression *, struct Operand *, struct Operand *);
797 unsigned int (*  RShift)(struct Expression *, struct Operand *, struct Operand *);
798 unsigned int (*  BitNot)(struct Expression *, struct Operand *);
799 unsigned int (*  AndAsign)(struct Expression *, struct Operand *, struct Operand *);
800 unsigned int (*  OrAsign)(struct Expression *, struct Operand *, struct Operand *);
801 unsigned int (*  XorAsign)(struct Expression *, struct Operand *, struct Operand *);
802 unsigned int (*  LShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
803 unsigned int (*  RShiftAsign)(struct Expression *, struct Operand *, struct Operand *);
804 unsigned int (*  Not)(struct Expression *, struct Operand *);
805 unsigned int (*  Equ)(struct Expression *, struct Operand *, struct Operand *);
806 unsigned int (*  Nqu)(struct Expression *, struct Operand *, struct Operand *);
807 unsigned int (*  And)(struct Expression *, struct Operand *, struct Operand *);
808 unsigned int (*  Or)(struct Expression *, struct Operand *, struct Operand *);
809 unsigned int (*  Grt)(struct Expression *, struct Operand *, struct Operand *);
810 unsigned int (*  Sma)(struct Expression *, struct Operand *, struct Operand *);
811 unsigned int (*  GrtEqu)(struct Expression *, struct Operand *, struct Operand *);
812 unsigned int (*  SmaEqu)(struct Expression *, struct Operand *, struct Operand *);
813 unsigned int (*  Cond)(struct Expression *, struct Operand *, struct Operand *, struct Operand *);
814 } ecere_gcc_struct;
815
816 struct Operand
817 {
818 int kind;
819 struct Type * type;
820 unsigned int ptrSize;
821 union
822 {
823 char c;
824 unsigned char uc;
825 short s;
826 unsigned short us;
827 int i;
828 unsigned int ui;
829 float f;
830 double d;
831 long long i64;
832 uint64 ui64;
833 } ecere_gcc_struct __anon1;
834 struct OpTable ops;
835 } ecere_gcc_struct;
836
837 extern struct Operand GetOperand(struct Expression * exp);
838
839 struct __ecereNameSpace__ecere__com__Method;
840
841 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
842 {
843 union
844 {
845 struct
846 {
847 const char *  dataTypeString;
848 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
849 } ecere_gcc_struct __anon1;
850 struct __ecereNameSpace__ecere__com__DataValue expression;
851 struct
852 {
853 const char *  memberString;
854 union
855 {
856 struct __ecereNameSpace__ecere__com__DataMember * member;
857 struct __ecereNameSpace__ecere__com__Property * prop;
858 struct __ecereNameSpace__ecere__com__Method * method;
859 } ecere_gcc_struct __anon1;
860 } ecere_gcc_struct __anon2;
861 } ecere_gcc_struct __anon1;
862 } ecere_gcc_struct;
863
864 struct __ecereNameSpace__ecere__com__Method
865 {
866 const char *  name;
867 struct __ecereNameSpace__ecere__com__Method * parent;
868 struct __ecereNameSpace__ecere__com__Method * left;
869 struct __ecereNameSpace__ecere__com__Method * right;
870 int depth;
871 int (*  function)();
872 int vid;
873 int type;
874 struct __ecereNameSpace__ecere__com__Class * _class;
875 void *  symbol;
876 const char *  dataTypeString;
877 struct Type * dataType;
878 int memberAccess;
879 } ecere_gcc_struct;
880
881 struct Symbol
882 {
883 char *  string;
884 struct Symbol * parent;
885 struct Symbol * left;
886 struct Symbol * right;
887 int depth;
888 struct Type * type;
889 union
890 {
891 struct __ecereNameSpace__ecere__com__Method * method;
892 struct __ecereNameSpace__ecere__com__Property * _property;
893 struct __ecereNameSpace__ecere__com__Class * registered;
894 } ecere_gcc_struct __anon1;
895 unsigned int notYetDeclared;
896 union
897 {
898 struct
899 {
900 struct External * pointerExternal;
901 struct External * structExternal;
902 } ecere_gcc_struct __anon1;
903 struct
904 {
905 struct External * externalGet;
906 struct External * externalSet;
907 struct External * externalPtr;
908 struct External * externalIsSet;
909 } ecere_gcc_struct __anon2;
910 struct
911 {
912 struct External * methodExternal;
913 struct External * methodCodeExternal;
914 } ecere_gcc_struct __anon3;
915 } ecere_gcc_struct __anon2;
916 unsigned int imported;
917 unsigned int declaredStructSym;
918 struct __ecereNameSpace__ecere__com__Class * _class;
919 unsigned int declaredStruct;
920 unsigned int needConstructor;
921 unsigned int needDestructor;
922 char *  constructorName;
923 char *  structName;
924 char *  className;
925 char *  destructorName;
926 struct ModuleImport * module;
927 struct ClassImport * _import;
928 struct Location nameLoc;
929 unsigned int isParam;
930 unsigned int isRemote;
931 unsigned int isStruct;
932 unsigned int fireWatchersDone;
933 int declaring;
934 unsigned int classData;
935 unsigned int isStatic;
936 char *  shortName;
937 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
938 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
939 struct Context * ctx;
940 int isIterator;
941 struct Expression * propCategory;
942 unsigned int mustRegister;
943 } ecere_gcc_struct;
944
945 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);
946
947 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);
948
949 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);
950
951 struct __ecereNameSpace__ecere__com__BitMember;
952
953 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);
954
955 struct __ecereNameSpace__ecere__com__BitMember
956 {
957 struct __ecereNameSpace__ecere__com__BitMember * prev;
958 struct __ecereNameSpace__ecere__com__BitMember * next;
959 const char *  name;
960 unsigned int isProperty;
961 int memberAccess;
962 int id;
963 struct __ecereNameSpace__ecere__com__Class * _class;
964 const char *  dataTypeString;
965 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
966 struct Type * dataType;
967 int type;
968 int size;
969 int pos;
970 uint64 mask;
971 } ecere_gcc_struct;
972
973 struct __ecereNameSpace__ecere__com__Module;
974
975 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_FindClass(struct __ecereNameSpace__ecere__com__Instance * module, const char *  name);
976
977 extern struct __ecereNameSpace__ecere__com__Instance * privateModule;
978
979 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);
980
981 extern struct ModuleImport * FindModule(struct __ecereNameSpace__ecere__com__Instance * moduleToFind);
982
983 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);
984
985 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);
986
987 struct GlobalData
988 {
989 uintptr_t key;
990 struct __ecereNameSpace__ecere__sys__BTNode * parent;
991 struct __ecereNameSpace__ecere__sys__BTNode * left;
992 struct __ecereNameSpace__ecere__sys__BTNode * right;
993 int depth;
994 struct __ecereNameSpace__ecere__com__Instance * module;
995 char *  dataTypeString;
996 struct Type * dataType;
997 void *  symbol;
998 char *  fullName;
999 } ecere_gcc_struct;
1000
1001 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com__eModule_LoadStrict(struct __ecereNameSpace__ecere__com__Instance * fromModule, const char *  name, int importAccess);
1002
1003 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
1004
1005 struct __ecereNameSpace__ecere__sys__BinaryTree;
1006
1007 struct __ecereNameSpace__ecere__sys__BinaryTree
1008 {
1009 struct __ecereNameSpace__ecere__sys__BTNode * root;
1010 int count;
1011 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, uintptr_t a, uintptr_t b);
1012 void (*  FreeKey)(void *  key);
1013 } ecere_gcc_struct;
1014
1015 struct __ecereNameSpace__ecere__com__NameSpace
1016 {
1017 const char *  name;
1018 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
1019 struct __ecereNameSpace__ecere__com__NameSpace *  left;
1020 struct __ecereNameSpace__ecere__com__NameSpace *  right;
1021 int depth;
1022 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
1023 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
1024 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
1025 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
1026 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
1027 } ecere_gcc_struct;
1028
1029 struct __ecereNameSpace__ecere__com__Class
1030 {
1031 struct __ecereNameSpace__ecere__com__Class * prev;
1032 struct __ecereNameSpace__ecere__com__Class * next;
1033 const char *  name;
1034 int offset;
1035 int structSize;
1036 void * *  _vTbl;
1037 int vTblSize;
1038 unsigned int (*  Constructor)(void * );
1039 void (*  Destructor)(void * );
1040 int offsetClass;
1041 int sizeClass;
1042 struct __ecereNameSpace__ecere__com__Class * base;
1043 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
1044 struct __ecereNameSpace__ecere__sys__BinaryTree members;
1045 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
1046 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
1047 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
1048 struct __ecereNameSpace__ecere__sys__OldList derivatives;
1049 int memberID;
1050 int startMemberID;
1051 int type;
1052 struct __ecereNameSpace__ecere__com__Instance * module;
1053 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
1054 const char *  dataTypeString;
1055 struct Type * dataType;
1056 int typeSize;
1057 int defaultAlignment;
1058 void (*  Initialize)();
1059 int memberOffset;
1060 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
1061 const char *  designerClass;
1062 unsigned int noExpansion;
1063 const char *  defaultProperty;
1064 unsigned int comRedefinition;
1065 int count;
1066 int isRemote;
1067 unsigned int internalDecl;
1068 void *  data;
1069 unsigned int computeSize;
1070 short structAlignment;
1071 short pointerAlignment;
1072 int destructionWatchOffset;
1073 unsigned int fixed;
1074 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
1075 int inheritanceAccess;
1076 const char *  fullName;
1077 void *  symbol;
1078 struct __ecereNameSpace__ecere__sys__OldList conversions;
1079 struct __ecereNameSpace__ecere__sys__OldList templateParams;
1080 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
1081 struct __ecereNameSpace__ecere__com__Class * templateClass;
1082 struct __ecereNameSpace__ecere__sys__OldList templatized;
1083 int numParams;
1084 unsigned int isInstanceClass;
1085 unsigned int byValueSystemClass;
1086 void *  bindingsClass;
1087 } ecere_gcc_struct;
1088
1089 struct __ecereNameSpace__ecere__com__DataMember
1090 {
1091 struct __ecereNameSpace__ecere__com__DataMember * prev;
1092 struct __ecereNameSpace__ecere__com__DataMember * next;
1093 const char *  name;
1094 unsigned int isProperty;
1095 int memberAccess;
1096 int id;
1097 struct __ecereNameSpace__ecere__com__Class * _class;
1098 const char *  dataTypeString;
1099 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
1100 struct Type * dataType;
1101 int type;
1102 int offset;
1103 int memberID;
1104 struct __ecereNameSpace__ecere__sys__OldList members;
1105 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
1106 int memberOffset;
1107 short structAlignment;
1108 short pointerAlignment;
1109 } ecere_gcc_struct;
1110
1111 struct __ecereNameSpace__ecere__sys__BTNode * __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  key);
1112
1113 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  a, const char *  b);
1114
1115 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1116
1117 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1118
1119 struct __ecereNameSpace__ecere__com__Application
1120 {
1121 int argc;
1122 const char * *  argv;
1123 int exitCode;
1124 unsigned int isGUIApp;
1125 struct __ecereNameSpace__ecere__sys__OldList allModules;
1126 char *  parsedCommand;
1127 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
1128 } ecere_gcc_struct;
1129
1130 void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace)
1131 {
1132 globalData = nameSpace;
1133 }
1134
1135 static void ReadDataMembers(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__com__Instance * f)
1136 {
1137 char line[1024];
1138 char name[1024];
1139 int size = 0, bitPos = -1;
1140 int memberAccess = 1;
1141
1142 for(; ; )
1143 {
1144 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1145 break;
1146 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1147 if(!strcmp(line, "."))
1148 break;
1149 if(line[0] == '[')
1150 {
1151 if(!strcmp(line, "[Size]"))
1152 {
1153 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1154 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1155 size = strtol(line, (((void *)0)), 0);
1156 }
1157 else if(!strcmp(line, "[Pos]"))
1158 {
1159 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1160 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1161 bitPos = strtol(line, (((void *)0)), 0);
1162 }
1163 else if(!strcmp(line, "[Public]"))
1164 memberAccess = 1;
1165 else if(!strcmp(line, "[Private]"))
1166 memberAccess = 2;
1167 else if(!strcmp(line, "[Type]"))
1168 {
1169 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1170 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1171 if(member)
1172 {
1173 if(!__ecereNameSpace__ecere__com__eMember_AddDataMember(member, name, line[0] ? line : 0, 0, 0, memberAccess))
1174 ;
1175 }
1176 else if(regClass && regClass->type == 2)
1177 {
1178 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess);
1179
1180 if(member)
1181 {
1182 member->size = size;
1183 member->pos = bitPos;
1184 }
1185 }
1186 else if(regClass)
1187 {
1188 if(!__ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess))
1189 ;
1190 }
1191 }
1192 else if(!strcmp(line, "[Struct]") || !strcmp(line, "[Union]"))
1193 {
1194 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (regClass || member) ? __ecereNameSpace__ecere__com__eMember_New((!strcmp(line, "[Union]")) ? 1 : 2, memberAccess) : (((void *)0));
1195
1196 ReadDataMembers((((void *)0)), dataMember, f);
1197 if(member)
1198 {
1199 if(!__ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember))
1200 ;
1201 }
1202 else if(regClass)
1203 {
1204 if(!__ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember))
1205 ;
1206 }
1207 }
1208 }
1209 else
1210 {
1211 size = 0;
1212 bitPos = -1;
1213 strcpy(name, line);
1214 memberAccess = 1;
1215 }
1216 }
1217 }
1218
1219 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
1220
1221 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DataRedefinition;
1222
1223 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
1224
1225 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_;
1226
1227 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___;
1228
1229 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__File;
1230
1231 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1232
1233 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List;
1234
1235 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
1236
1237 struct __ecereNameSpace__ecere__com__Module
1238 {
1239 struct __ecereNameSpace__ecere__com__Instance * application;
1240 struct __ecereNameSpace__ecere__sys__OldList classes;
1241 struct __ecereNameSpace__ecere__sys__OldList defines;
1242 struct __ecereNameSpace__ecere__sys__OldList functions;
1243 struct __ecereNameSpace__ecere__sys__OldList modules;
1244 struct __ecereNameSpace__ecere__com__Instance * prev;
1245 struct __ecereNameSpace__ecere__com__Instance * next;
1246 const char *  name;
1247 void *  library;
1248 void *  Unload;
1249 int importType;
1250 int origImportType;
1251 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1252 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1253 } ecere_gcc_struct;
1254
1255 void __ecereCreateModuleInstances_loadSymbols()
1256 {
1257 loadedModules = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___);
1258 __ecereNameSpace__ecere__com__eInstance_IncRef(loadedModules);
1259 }
1260
1261 void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList)
1262 {
1263 struct __ecereNameSpace__ecere__com__NameSpace * ns;
1264 struct GlobalData * data;
1265
1266 for(; (ns = (struct __ecereNameSpace__ecere__com__NameSpace *)globalDataList->nameSpaces.root); )
1267 {
1268 FreeGlobalData(ns);
1269 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)ns);
1270 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)(*ns).name), (*ns).name = 0);
1271 (__ecereNameSpace__ecere__com__eSystem_Delete(ns), ns = 0);
1272 }
1273 for(; (data = (struct GlobalData *)globalDataList->functions.root); )
1274 {
1275 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->functions, (void *)(data));
1276 if(data->symbol)
1277 FreeSymbol(data->symbol);
1278 FreeType(data->dataType);
1279 (__ecereNameSpace__ecere__com__eSystem_Delete(data->fullName), data->fullName = 0);
1280 (__ecereNameSpace__ecere__com__eSystem_Delete(data->dataTypeString), data->dataTypeString = 0);
1281 ((data ? __extension__ ({
1282 void * __ecerePtrToDelete = (data);
1283
1284 __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);
1285 }) : 0), data = 0);
1286 }
1287 }
1288
1289 void __ecereUnregisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
1290 {
1291
1292 }
1293
1294 void ImportModule(const char *  name, int importType, int importAccess, unsigned int loadDllOnly);
1295
1296 unsigned int LoadSymbols(const char * fileName, int importType, unsigned int loadDllOnly)
1297 {
1298 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpenBuffered(fileName, 1);
1299 unsigned int globalInstance = 0;
1300
1301 if(f)
1302 {
1303 unsigned int ecereCOMModule = 0;
1304 char moduleName[797];
1305
1306 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, moduleName);
1307 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")))
1308 ecereCOMModule = 1;
1309 for(; ; )
1310 {
1311 char line[1024];
1312
1313 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1314 break;
1315 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1316 if(line[0] == '[')
1317 {
1318 if(!strcmp(line, "[Global Instance]"))
1319 globalInstance = 1;
1320 else if(!strcmp(line, "[Defined Classes]"))
1321 {
1322 struct __ecereNameSpace__ecere__com__Class * regClass = (((void *)0));
1323 char name[1024];
1324 unsigned int isRemote = 0;
1325 unsigned int isStatic = 0;
1326 unsigned int isWatchable = 0;
1327 int classType = 0;
1328 unsigned int fixed = 0;
1329 unsigned int noExpansion = 0;
1330 int inheritanceAccess = 1;
1331
1332 for(; ; )
1333 {
1334 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1335 break;
1336 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1337 if(!strcmp(line, "."))
1338 break;
1339 if(line[0] == '[')
1340 {
1341 if(!strcmp(line, "[Remote]"))
1342 isRemote = 1;
1343 else if(!strcmp(line, "[Static]"))
1344 isStatic = 1;
1345 else if(!strcmp(line, "[Fixed]"))
1346 fixed = 1;
1347 else if(!strcmp(line, "[No Expansion]"))
1348 noExpansion = 1;
1349 else if(!strcmp(line, "[Watchable]"))
1350 isWatchable = 1;
1351 else if(!strcmp(line, "[Enum]"))
1352 classType = 4;
1353 else if(!strcmp(line, "[Bit]"))
1354 classType = 2;
1355 else if(!strcmp(line, "[Struct]"))
1356 classType = 1;
1357 else if(!strcmp(line, "[Unit]"))
1358 classType = 3;
1359 else if(!strcmp(line, "[NoHead]"))
1360 classType = 5;
1361 else if(!strcmp(line, "[Base]") || !strcmp(line, "[Private Base]"))
1362 {
1363 if(!strcmp(line, "[Private Base]"))
1364 inheritanceAccess = 2;
1365 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1366 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1367 if(importType == 3)
1368 DeclClass((((void *)0)), name);
1369 if(isStatic || loadDllOnly || importType == 3 || importType == 4)
1370 regClass = (((void *)0));
1371 else if(regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, name), !regClass || regClass->internalDecl || regClass->isRemote)
1372 {
1373 struct Symbol * existingClass = FindClass(name);
1374 const char * baseName = (classType == 0 && importType == 2 && isRemote) ? "DCOMClientObject" : (!strcmp(line, "[None]") ? (((void *)0)) : line);
1375
1376 if(!isRemote || (importType != 2) || (!sourceFile || !strstr(sourceFile, ".main.ec")))
1377 {
1378 if(!regClass || regClass->internalDecl)
1379 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, name, isRemote ? (((void *)0)) : baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1380 if(regClass && isRemote)
1381 regClass->isRemote = (importType == 2) ? 1 : 2;
1382 if(isRemote)
1383 {
1384 if(importType == 2)
1385 {
1386 char className[1024] = "DCOMClient_";
1387
1388 strcat(className, name);
1389 if(!existingClass)
1390 existingClass = DeclClass((((void *)0)), name);
1391 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, className, baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1392 }
1393 if(regClass)
1394 regClass->isRemote = (importType == 2) ? 1 : 3;
1395 }
1396 if(existingClass)
1397 {
1398 struct __ecereNameSpace__ecere__sys__OldLink * link;
1399
1400 for(link = existingClass->templatedClasses.first; link; link = link->next)
1401 {
1402 struct Symbol * symbol = link->data;
1403
1404 symbol->__anon1.registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1405 }
1406 }
1407 if(fixed)
1408 regClass->fixed = 1;
1409 if(noExpansion)
1410 regClass->noExpansion = 1;
1411 if(isWatchable)
1412 {
1413 __ecereNameSpace__ecere__com__eClass_DestructionWatchable(regClass);
1414 regClass->structSize = regClass->offset;
1415 }
1416 if(regClass && existingClass)
1417 {
1418 existingClass->__anon1.registered = regClass;
1419 regClass->symbol = existingClass;
1420 existingClass->notYetDeclared = 1;
1421 existingClass->imported = 1;
1422 if(regClass->module)
1423 existingClass->module = FindModule(regClass->module);
1424 else
1425 existingClass->module = mainModule;
1426 }
1427 }
1428 else
1429 regClass = (((void *)0));
1430 }
1431 else
1432 regClass = (((void *)0));
1433 isRemote = 0;
1434 isWatchable = 0;
1435 fixed = 0;
1436 isStatic = 0;
1437 }
1438 else if(!strcmp(line, "[Enum Values]"))
1439 {
1440 for(; ; )
1441 {
1442 char * equal;
1443
1444 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1445 break;
1446 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1447 if(!strcmp(line, "."))
1448 break;
1449 if(regClass)
1450 {
1451 equal = strchr(line, '=');
1452 if(equal)
1453 {
1454 char name[1024];
1455
1456 memcpy(name, line, (int)(equal - line));
1457 name[equal - line] = '\0';
1458 __ecereNameSpace__ecere__sys__TrimLSpaces(name, name);
1459 __ecereNameSpace__ecere__sys__TrimRSpaces(name, name);
1460 __ecereNameSpace__ecere__com__eEnum_AddFixedValue(regClass, name, strtoll(equal + 1, (((void *)0)), 0));
1461 }
1462 else
1463 {
1464 __ecereNameSpace__ecere__com__eEnum_AddValue(regClass, line);
1465 }
1466 }
1467 }
1468 }
1469 else if(!strcmp(line, "[Defined Methods]"))
1470 {
1471 char name[1024];
1472 unsigned int isVirtual = 0;
1473 int memberAccess = 1;
1474
1475 for(; ; )
1476 {
1477 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1478 break;
1479 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1480 if(!strcmp(line, "."))
1481 break;
1482 if(line[0] == '[')
1483 {
1484 if(!strcmp(line, "[Type]"))
1485 {
1486 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1487 if(regClass)
1488 {
1489 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1490 if(isVirtual)
1491 __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1492 else
1493 __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1494 }
1495 }
1496 else if(!strcmp(line, "[Virtual]"))
1497 isVirtual = 1;
1498 else if(!strcmp(line, "[Public]"))
1499 memberAccess = 1;
1500 else if(!strcmp(line, "[Private]"))
1501 memberAccess = 2;
1502 }
1503 else
1504 {
1505 strcpy(name, line);
1506 isVirtual = 0;
1507 memberAccess = 1;
1508 }
1509 }
1510 }
1511 else if(!strcmp(line, "[Defined Properties]"))
1512 {
1513 char name[1024];
1514 unsigned int setStmt = 0, getStmt = 0, isVirtual = 0, conversion = 0;
1515 unsigned int isWatchable = 0;
1516 int memberAccess = 1;
1517
1518 for(; ; )
1519 {
1520 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1521 break;
1522 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1523 if(!strcmp(line, "."))
1524 break;
1525 if(line[0] == '[')
1526 {
1527 if(!strcmp(line, "[Type]"))
1528 {
1529 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1530 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1531 if(regClass)
1532 {
1533 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);
1534
1535 if(prop)
1536 {
1537 prop->compiled = 0;
1538 if(isWatchable)
1539 {
1540 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1541 regClass->structSize = regClass->offset;
1542 }
1543 }
1544 }
1545 }
1546 else if(!strcmp(line, "[Set]"))
1547 setStmt = 1;
1548 else if(!strcmp(line, "[Get]"))
1549 getStmt = 1;
1550 else if(!strcmp(line, "[Watchable]"))
1551 isWatchable = 1;
1552 else if(!strcmp(line, "[Public]"))
1553 memberAccess = 1;
1554 else if(!strcmp(line, "[Private]"))
1555 memberAccess = 2;
1556 else if(!strcmp(line, "[Conversion]"))
1557 {
1558 conversion = 1;
1559 setStmt = getStmt = isVirtual = isWatchable = 0;
1560 }
1561 }
1562 else
1563 {
1564 strcpy(name, line);
1565 setStmt = getStmt = isVirtual = conversion = isWatchable = 0;
1566 memberAccess = 1;
1567 }
1568 }
1569 }
1570 else if(!strcmp(line, "[Defined Class Properties]"))
1571 {
1572 char name[1024];
1573 unsigned int setStmt = 0, getStmt = 0;
1574
1575 for(; ; )
1576 {
1577 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1578 break;
1579 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1580 if(!strcmp(line, "."))
1581 break;
1582 if(line[0] == '[')
1583 {
1584 if(!strcmp(line, "[Type]"))
1585 {
1586 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1587 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1588 if(regClass)
1589 {
1590 __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, name, line, (void *)(uintptr_t)setStmt, (void *)(uintptr_t)getStmt);
1591 }
1592 }
1593 else if(!strcmp(line, "[Set]"))
1594 setStmt = 1;
1595 else if(!strcmp(line, "[Get]"))
1596 getStmt = 1;
1597 }
1598 else
1599 {
1600 strcpy(name, line);
1601 setStmt = getStmt = 0;
1602 }
1603 }
1604 }
1605 else if(!strcmp(line, "[Defined Data Members]"))
1606 {
1607 ReadDataMembers(regClass, (((void *)0)), f);
1608 }
1609 else if(!strcmp(line, "[Template Parameters]"))
1610 {
1611 while(!(__extension__ ({
1612 unsigned int (*  __internal_VirtualMethod)(struct __ecereNameSpace__ecere__com__Instance *);
1613
1614 __internal_VirtualMethod = ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
1615 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1616
1617 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1618 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof]);
1619 __internal_VirtualMethod ? __internal_VirtualMethod(f) : (unsigned int)1;
1620 })))
1621 {
1622 char name[1024];
1623 int type = 0;
1624 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1625 {
1626
1627 .__anon1 = {
1628
1629 .__anon1 = {
1630 .dataTypeString = 0
1631 }
1632 }
1633 };
1634 void * info = (((void *)0));
1635
1636 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1637 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1638 if(line[0] == '.')
1639 break;
1640 strcpy(name, line);
1641 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1642 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1643 if(!strcmp(line, "[Expression]"))
1644 type = 2;
1645 else if(!strcmp(line, "[Identifier]"))
1646 type = 1;
1647 switch(type)
1648 {
1649 case 0:
1650 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1651 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1652 if(regClass && strcmp(line, "[None]"))
1653 {
1654 info = __ecereNameSpace__ecere__sys__CopyString(line);
1655 }
1656 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1657 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1658 if(regClass && strcmp(line, "[None]"))
1659 {
1660 defaultArg.__anon1.__anon1.dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line);
1661 }
1662 break;
1663 case 2:
1664 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1665 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1666 if(regClass && strcmp(line, "[None]"))
1667 {
1668 info = __ecereNameSpace__ecere__sys__CopyString(line);
1669 }
1670 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1671 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1672 if(regClass && strcmp(line, "[None]"))
1673 {
1674 struct __ecereNameSpace__ecere__com__Instance * backup = pushLexer();
1675 struct Operand op;
1676 struct Expression * exp;
1677
1678 skipErrors = 1;
1679 exp = ParseExpressionString(line);
1680 if(exp)
1681 {
1682 if(info)
1683 exp->destType = ProcessTypeString(info, 0);
1684 ProcessExpressionType(exp);
1685 ComputeExpression(exp);
1686 op = GetOperand(exp);
1687 defaultArg.__anon1.expression.__anon1.ui64 = op.__anon1.ui64;
1688 FreeExpression(exp);
1689 }
1690 skipErrors = 0;
1691 popLexer(backup);
1692 }
1693 break;
1694 case 1:
1695 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1696 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1697 if(!strcmp(line, "[Data member]"))
1698 info = (void *)0;
1699 else if(!strcmp(line, "[Method]"))
1700 info = (void *)1;
1701 else if(!strcmp(line, "[Property]"))
1702 info = (void *)2;
1703 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1704 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1705 if(regClass && strcmp(line, "[None]"))
1706 {
1707 defaultArg.__anon1.__anon2.memberString = __ecereNameSpace__ecere__sys__CopyString(line);
1708 }
1709 break;
1710 }
1711 if(regClass)
1712 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, name, type, info, &defaultArg);
1713 if(type == 0 || type == 2)
1714 (__ecereNameSpace__ecere__com__eSystem_Delete(info), info = 0);
1715 if(type == 0 || type == 1)
1716 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)defaultArg.__anon1.__anon1.dataTypeString), defaultArg.__anon1.__anon1.dataTypeString = 0);
1717 }
1718 if(regClass)
1719 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1720 }
1721 }
1722 else
1723 {
1724 inheritanceAccess = 1;
1725 classType = 0;
1726 isRemote = 0;
1727 strcpy(name, line);
1728 regClass = (((void *)0));
1729 }
1730 }
1731 }
1732 else if(!strcmp(line, "[Defined Expressions]"))
1733 {
1734 char name[1024];
1735
1736 for(; ; )
1737 {
1738 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1739 break;
1740 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1741 if(!strcmp(line, "."))
1742 break;
1743 if(!strcmp(line, "[Value]"))
1744 {
1745 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1746 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1747 if(!loadDllOnly && importType != 3 && importType != 4)
1748 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(name, line, privateModule, ecereCOMModule ? 4 : 1);
1749 }
1750 else if(line[0] != '[')
1751 {
1752 strcpy(name, line);
1753 }
1754 }
1755 }
1756 else if(!strcmp(line, "[Defined Functions]"))
1757 {
1758 char name[1024];
1759
1760 for(; ; )
1761 {
1762 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1763 break;
1764 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1765 if(!strcmp(line, "."))
1766 break;
1767 if(!strcmp(line, "[Type]"))
1768 {
1769 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1770 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1771 if(!loadDllOnly && importType != 3 && importType != 4)
1772 __ecereNameSpace__ecere__com__eSystem_RegisterFunction(name, line, (((void *)0)), privateModule, ecereCOMModule ? 4 : 1);
1773 }
1774 else if(line[0] != '[')
1775 {
1776 strcpy(name, line);
1777 }
1778 }
1779 }
1780 else if(!strcmp(line, "[Defined Data]"))
1781 {
1782 char name[1024];
1783
1784 for(; ; )
1785 {
1786 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1787 break;
1788 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1789 if(!strcmp(line, "."))
1790 break;
1791 if(!strcmp(line, "[Type]"))
1792 {
1793 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1794 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1795 if(!loadDllOnly && importType != 3 && importType != 4)
1796 {
1797 int start = 0, c;
1798 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace = globalData;
1799 struct GlobalData * data;
1800
1801 for(c = 0; name[c]; c++)
1802 {
1803 if(name[c] == '.' || (name[c] == ':' && name[c + 1] == ':'))
1804 {
1805 struct __ecereNameSpace__ecere__com__NameSpace * newSpace;
1806 char * spaceName = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (c - start + 1));
1807
1808 strncpy(spaceName, name + start, c - start);
1809 spaceName[c - start] = '\0';
1810 newSpace = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).nameSpaces, spaceName);
1811 if(!newSpace)
1812 {
1813 newSpace = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__com__NameSpace) * (1));
1814 (*newSpace).classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1815 (*newSpace).defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1816 (*newSpace).functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1817 (*newSpace).nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1818 (*newSpace).name = spaceName;
1819 (*newSpace).parent = nameSpace;
1820 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)newSpace);
1821 }
1822 else
1823 (__ecereNameSpace__ecere__com__eSystem_Delete(spaceName), spaceName = 0);
1824 nameSpace = newSpace;
1825 if(name[c] == ':')
1826 c++;
1827 start = c + 1;
1828 }
1829 }
1830 if(c - start)
1831 {
1832 data = (struct GlobalData *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).functions, name + start);
1833 if(!data)
1834 {
1835 data = __extension__ ({
1836 struct GlobalData * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData);
1837
1838 __ecereInstance1->fullName = __ecereNameSpace__ecere__sys__CopyString(name), __ecereInstance1->dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1->module = privateModule, __ecereInstance1;
1839 });
1840 data->key = (uintptr_t)(data->fullName + start);
1841 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1842 }
1843 else if(strcmp(data->dataTypeString, line))
1844 {
1845 struct DataRedefinition * redefinition = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DataRedefinition);
1846
1847 strcpy(redefinition->name, name);
1848 strcpy(redefinition->type1, data->dataTypeString);
1849 strcpy(redefinition->type2, line);
1850 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&dataRedefinitions, redefinition);
1851 }
1852 }
1853 }
1854 }
1855 else if(line[0] != '[')
1856 {
1857 strcpy(name, line);
1858 }
1859 }
1860 }
1861 else if(!strcmp(line, "[Imported Modules]"))
1862 {
1863 int moduleImportType = 0;
1864 int importAccess = 1;
1865
1866 for(; ; )
1867 {
1868 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1869 break;
1870 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1871 if(!strcmp(line, "."))
1872 break;
1873 if(!strcmp(line, "[Static]"))
1874 moduleImportType = 1;
1875 else if(!strcmp(line, "[Remote]"))
1876 moduleImportType = 2;
1877 else if(!strcmp(line, "[Private]"))
1878 importAccess = 2;
1879 else if(line[0] != '[')
1880 {
1881 if(importType != 3 && importType != 4)
1882 ImportModule(line, moduleImportType, importAccess, loadDllOnly);
1883 else
1884 ImportModule(line, 4, importAccess, loadDllOnly);
1885 if(!strcmp(line, "ecere"))
1886 ecereImported = 1;
1887 moduleImportType = 0;
1888 importAccess = 1;
1889 }
1890 }
1891 }
1892 }
1893 }
1894 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1895 }
1896 else if(importType != 4)
1897 {
1898 char sysFileName[797];
1899
1900 __ecereNameSpace__ecere__sys__GetSystemPathBuffer(sysFileName, fileName);
1901 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString("ec", "Couldn't open %s\n", (((void *)0))), sysFileName);
1902 }
1903 return globalInstance;
1904 }
1905
1906 void ImportModule(const char * name, int importType, int importAccess, unsigned int loadDllOnly)
1907 {
1908 struct ImportedModule * module = (((void *)0));
1909 char moduleName[797];
1910 unsigned int isSourceModule = 0;
1911
1912 if(sourceFile)
1913 {
1914 char sourceFileModule[274];
1915
1916 __ecereNameSpace__ecere__sys__GetLastDirectory(sourceFile, sourceFileModule);
1917 __ecereNameSpace__ecere__sys__StripExtension(sourceFileModule);
1918 if(!(strcasecmp)(sourceFileModule, name))
1919 isSourceModule = 1;
1920 }
1921 strncpy(moduleName, name, (797) - 1);
1922 moduleName[(797) - 1] = 0;
1923 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1924 for(module = (*defines).first; module; module = module->next)
1925 {
1926 if(module->type == 0 && !(strcasecmp)(module->name, moduleName) && ((importType == 2) == (module->importType == 2) || isSourceModule))
1927 break;
1928 }
1929 if((!module || (module->dllOnly && !loadDllOnly)) && strlen(name) < (274))
1930 {
1931 char ext[17];
1932 struct __ecereNameSpace__ecere__com__Instance * loadedModule = (((void *)0));
1933 char symFile[797];
1934
1935 symFile[0] = '\0';
1936 __ecereNameSpace__ecere__sys__GetExtension(name, ext);
1937 strcpy(symFile, symbolsDir ? symbolsDir : "");
1938 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1939 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1940 if(!strcmp(ext, "dll") || !strcmp(ext, "so") || !strcmp(ext, "dylib") || !ext[0])
1941 {
1942 if(importType != 4)
1943 {
1944 if(!module)
1945 {
1946 if(precompDefines)
1947 {
1948 module = __extension__ ({
1949 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1950
1951 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1952 });
1953 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1954 }
1955 module = __extension__ ({
1956 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1957
1958 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1959 });
1960 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1961 }
1962 module->dllOnly = loadDllOnly;
1963 if(ext[0] || !__ecereNameSpace__ecere__sys__FileExists(symFile))
1964 {
1965 unsigned int skipLoad = 0;
1966 struct __ecereNameSpace__ecere__com__Instance * list = (((void *)0));
1967
1968 if(!inCompiler && !inPreCompiler && !inSymbolGen && !inDocumentor)
1969 {
1970 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, loadedModules), it);
1971
1972 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index((void *)(&it), (uint64)(uintptr_t)(name), 0))
1973 {
1974 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);
1975
1976 if(firstModule)
1977 {
1978 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_);
1979 (__extension__ ({
1980 struct __ecereNameSpace__ecere__com__IteratorPointer * (*  __internal_VirtualMethod)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value);
1981
1982 __internal_VirtualMethod = ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1983 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
1984
1985 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
1986 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add]);
1987 __internal_VirtualMethod ? __internal_VirtualMethod(list, (uint64)(uintptr_t)(firstModule)) : (struct __ecereNameSpace__ecere__com__IteratorPointer *)1;
1988 }));
1989 __extension__ ({
1990 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1991 {
1992 loadedModules, 0
1993 };
1994
1995 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, ((uint64)(uintptr_t)(name)), 1);
1996 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, (uint64)(uintptr_t)(list));
1997 });
1998 }
1999 else
2000 skipLoad = 1;
2001 }
2002 else
2003 list = ((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&it)));
2004 }
2005 if(!skipLoad)
2006 {
2007 loadedModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, name, importAccess);
2008 if(loadedModule)
2009 {
2010 ((struct __ecereNameSpace__ecere__com__Module *)(((char *)loadedModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->importType = importType;
2011 module->dllOnly = 0;
2012 if(list)
2013 (__extension__ ({
2014 struct __ecereNameSpace__ecere__com__IteratorPointer * (*  __internal_VirtualMethod)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value);
2015
2016 __internal_VirtualMethod = ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
2017 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
2018
2019 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
2020 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add]);
2021 __internal_VirtualMethod ? __internal_VirtualMethod(list, (uint64)(uintptr_t)(loadedModule)) : (struct __ecereNameSpace__ecere__com__IteratorPointer *)1;
2022 }));
2023 }
2024 }
2025 }
2026 }
2027 }
2028 if(!loadedModule && (!strcmp(ext, "ec") || !strcmp(ext, "sym") || !ext[0]))
2029 {
2030 {
2031 if(!module)
2032 {
2033 if(precompDefines)
2034 {
2035 module = __extension__ ({
2036 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2037
2038 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2039 });
2040 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
2041 }
2042 module = __extension__ ({
2043 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2044
2045 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2046 });
2047 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
2048 }
2049 module->dllOnly = loadDllOnly;
2050 if(inPreCompiler)
2051 return ;
2052 if(inIDE && !__ecereNameSpace__ecere__sys__FileExists(symFile) && sourceDirs)
2053 {
2054 {
2055 struct __ecereNameSpace__ecere__com__Iterator dir =
2056 {
2057 (sourceDirs), 0
2058 };
2059
2060 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&dir))
2061 {
2062 char configDir[274];
2063
2064 strcpy(symFile, ((char * )((uintptr_t)(__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&dir)))));
2065 __ecereNameSpace__ecere__sys__PathCat(symFile, "obj");
2066 sprintf(configDir, "debug.%s", (__runtimePlatform == 1) ? "win32" : (__runtimePlatform == 3) ? "apple" : "linux");
2067 __ecereNameSpace__ecere__sys__PathCat(symFile, configDir);
2068 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
2069 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
2070 if(__ecereNameSpace__ecere__sys__FileExists(symFile))
2071 break;
2072 }
2073 }
2074 }
2075 if(!__ecereNameSpace__ecere__sys__FileExists(symFile))
2076 {
2077 char fileName[274];
2078
2079 __ecereNameSpace__ecere__sys__GetLastDirectory(symFile, fileName);
2080 strcpy(symFile, symbolsDir ? symbolsDir : "");
2081 __ecereNameSpace__ecere__sys__PathCat(symFile, fileName);
2082 }
2083 module->globalInstance = LoadSymbols(symFile, importType, loadDllOnly);
2084 }
2085 }
2086 }
2087 }
2088
2089 void __ecereRegisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2090 {
2091 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2092
2093 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetGlobalData", "void SetGlobalData(ecere::com::NameSpace * nameSpace)", SetGlobalData, module, 1);
2094 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInIDE", "void SetInIDE(bool b)", SetInIDE, module, 1);
2095 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSourceDirs", "void SetSourceDirs(ecere::com::List<String> list)", SetSourceDirs, module, 1);
2096 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetIncludeDirs", "void SetIncludeDirs(ecere::sys::OldList * list)", SetIncludeDirs, module, 1);
2097 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSysIncludeDirs", "void SetSysIncludeDirs(ecere::sys::OldList * list)", SetSysIncludeDirs, module, 1);
2098 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetEcereImported", "void SetEcereImported(bool b)", SetEcereImported, module, 1);
2099 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetEcereImported", "bool GetEcereImported(void)", GetEcereImported, module, 1);
2100 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInPreCompiler", "void SetInPreCompiler(bool b)", SetInPreCompiler, module, 1);
2101 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInSymbolGen", "void SetInSymbolGen(bool b)", SetInSymbolGen, module, 1);
2102 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInDocumentor", "void SetInDocumentor(bool b)", SetInDocumentor, module, 1);
2103 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetPrecompDefines", "void SetPrecompDefines(ecere::sys::OldList * list)", SetPrecompDefines, module, 1);
2104 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DummyMethod", "bool DummyMethod(void)", DummyMethod, module, 1);
2105 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("LoadSymbols", "bool LoadSymbols(const char * fileName, ecere::com::ImportType importType, bool loadDllOnly)", LoadSymbols, module, 1);
2106 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ImportModule", "void ImportModule(const char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess, bool loadDllOnly)", ImportModule, module, 1);
2107 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindIncludeFileID", "int FindIncludeFileID(char * includeFile)", FindIncludeFileID, module, 2);
2108 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileID", "int GetIncludeFileID(char * includeFile)", GetIncludeFileID, module, 2);
2109 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileFromID", "char * GetIncludeFileFromID(int id)", GetIncludeFileFromID, module, 2);
2110 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OpenIncludeFile", "ecere::sys::File OpenIncludeFile(char * includeFile)", OpenIncludeFile, module, 2);
2111 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIncludeFiles", "void FreeIncludeFiles(void)", FreeIncludeFiles, module, 1);
2112 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeGlobalData", "void FreeGlobalData(ecere::com::NameSpace globalDataList)", FreeGlobalData, module, 1);
2113 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckDataRedefinitions", "void CheckDataRedefinitions(void)", CheckDataRedefinitions, module, 1);
2114 }
2115