compiler/libec: Map & AVLTree fixes with float/double values
[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__Property;
610
611 struct __ecereNameSpace__ecere__com__Property
612 {
613 struct __ecereNameSpace__ecere__com__Property * prev;
614 struct __ecereNameSpace__ecere__com__Property * next;
615 const char *  name;
616 unsigned int isProperty;
617 int memberAccess;
618 int id;
619 struct __ecereNameSpace__ecere__com__Class * _class;
620 const char *  dataTypeString;
621 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
622 struct Type * dataType;
623 void (*  Set)(void * , int);
624 int (*  Get)(void * );
625 unsigned int (*  IsSet)(void * );
626 void *  data;
627 void *  symbol;
628 int vid;
629 unsigned int conversion;
630 unsigned int watcherOffset;
631 const char *  category;
632 unsigned int compiled;
633 unsigned int selfWatchable;
634 unsigned int isWatchable;
635 } ecere_gcc_struct;
636
637 extern void __ecereNameSpace__ecere__com__eInstance_FireSelfWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
638
639 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);
640
641 extern void __ecereNameSpace__ecere__com__eInstance_Watch(void *  instance, struct __ecereNameSpace__ecere__com__Property * _property, void *  object, void (*  callback)(void * , void * ));
642
643 extern void __ecereNameSpace__ecere__com__eInstance_FireWatchers(struct __ecereNameSpace__ecere__com__Instance * instance, struct __ecereNameSpace__ecere__com__Property * _property);
644
645 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);
646
647 extern void __ecereNameSpace__ecere__com__eProperty_Watchable(struct __ecereNameSpace__ecere__com__Property * _property);
648
649 struct __ecereNameSpace__ecere__com__DataMember;
650
651 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);
652
653 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);
654
655 extern struct __ecereNameSpace__ecere__com__DataMember * __ecereNameSpace__ecere__com__eMember_New(int type, int declMode);
656
657 extern unsigned int __ecereNameSpace__ecere__com__eMember_AddMember(struct __ecereNameSpace__ecere__com__DataMember * addTo, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
658
659 extern unsigned int __ecereNameSpace__ecere__com__eClass_AddMember(struct __ecereNameSpace__ecere__com__Class * _class, struct __ecereNameSpace__ecere__com__DataMember * dataMember);
660
661 struct Symbol;
662
663 extern struct Symbol * DeclClass(struct Specifier * _class, const char *  name);
664
665 extern struct Symbol * FindClass(const char *  name);
666
667 extern void FreeSymbol(struct Symbol * symbol);
668
669 struct __ecereNameSpace__ecere__sys__OldLink;
670
671 struct __ecereNameSpace__ecere__sys__OldLink
672 {
673 struct __ecereNameSpace__ecere__sys__OldLink * prev;
674 struct __ecereNameSpace__ecere__sys__OldLink * next;
675 void *  data;
676 } ecere_gcc_struct;
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 } ecere_gcc_struct;
1087
1088 struct __ecereNameSpace__ecere__com__DataMember
1089 {
1090 struct __ecereNameSpace__ecere__com__DataMember * prev;
1091 struct __ecereNameSpace__ecere__com__DataMember * next;
1092 const char *  name;
1093 unsigned int isProperty;
1094 int memberAccess;
1095 int id;
1096 struct __ecereNameSpace__ecere__com__Class * _class;
1097 const char *  dataTypeString;
1098 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
1099 struct Type * dataType;
1100 int type;
1101 int offset;
1102 int memberID;
1103 struct __ecereNameSpace__ecere__sys__OldList members;
1104 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
1105 int memberOffset;
1106 short structAlignment;
1107 short pointerAlignment;
1108 } ecere_gcc_struct;
1109
1110 struct __ecereNameSpace__ecere__sys__BTNode * __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  key);
1111
1112 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, const char *  a, const char *  b);
1113
1114 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1115
1116 void __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
1117
1118 struct __ecereNameSpace__ecere__com__Application
1119 {
1120 int argc;
1121 const char * *  argv;
1122 int exitCode;
1123 unsigned int isGUIApp;
1124 struct __ecereNameSpace__ecere__sys__OldList allModules;
1125 char *  parsedCommand;
1126 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
1127 } ecere_gcc_struct;
1128
1129 void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * nameSpace)
1130 {
1131 globalData = nameSpace;
1132 }
1133
1134 static void ReadDataMembers(struct __ecereNameSpace__ecere__com__Class * regClass, struct __ecereNameSpace__ecere__com__DataMember * member, struct __ecereNameSpace__ecere__com__Instance * f)
1135 {
1136 char line[1024];
1137 char name[1024];
1138 int size = 0, bitPos = -1;
1139 int memberAccess = 1;
1140
1141 for(; ; )
1142 {
1143 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1144 break;
1145 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1146 if(!strcmp(line, "."))
1147 break;
1148 if(line[0] == '[')
1149 {
1150 if(!strcmp(line, "[Size]"))
1151 {
1152 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1153 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1154 size = strtol(line, (((void *)0)), 0);
1155 }
1156 else if(!strcmp(line, "[Pos]"))
1157 {
1158 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1159 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1160 bitPos = strtol(line, (((void *)0)), 0);
1161 }
1162 else if(!strcmp(line, "[Public]"))
1163 memberAccess = 1;
1164 else if(!strcmp(line, "[Private]"))
1165 memberAccess = 2;
1166 else if(!strcmp(line, "[Type]"))
1167 {
1168 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1169 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1170 if(member)
1171 {
1172 if(!__ecereNameSpace__ecere__com__eMember_AddDataMember(member, name, line[0] ? line : 0, 0, 0, memberAccess))
1173 ;
1174 }
1175 else if(regClass && regClass->type == 2)
1176 {
1177 struct __ecereNameSpace__ecere__com__BitMember * member = __ecereNameSpace__ecere__com__eClass_AddBitMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess);
1178
1179 if(member)
1180 {
1181 member->size = size;
1182 member->pos = bitPos;
1183 }
1184 }
1185 else if(regClass)
1186 {
1187 if(!__ecereNameSpace__ecere__com__eClass_AddDataMember(regClass, name, line[0] ? line : 0, 0, 0, memberAccess))
1188 ;
1189 }
1190 }
1191 else if(!strcmp(line, "[Struct]") || !strcmp(line, "[Union]"))
1192 {
1193 struct __ecereNameSpace__ecere__com__DataMember * dataMember = (regClass || member) ? __ecereNameSpace__ecere__com__eMember_New((!strcmp(line, "[Union]")) ? 1 : 2, memberAccess) : (((void *)0));
1194
1195 ReadDataMembers((((void *)0)), dataMember, f);
1196 if(member)
1197 {
1198 if(!__ecereNameSpace__ecere__com__eMember_AddMember(member, dataMember))
1199 ;
1200 }
1201 else if(regClass)
1202 {
1203 if(!__ecereNameSpace__ecere__com__eClass_AddMember(regClass, dataMember))
1204 ;
1205 }
1206 }
1207 }
1208 else
1209 {
1210 size = 0;
1211 bitPos = -1;
1212 strcpy(name, line);
1213 memberAccess = 1;
1214 }
1215 }
1216 }
1217
1218 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
1219
1220 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DataRedefinition;
1221
1222 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
1223
1224 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_;
1225
1226 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___;
1227
1228 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__File;
1229
1230 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1231
1232 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__List;
1233
1234 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
1235
1236 struct __ecereNameSpace__ecere__com__Module
1237 {
1238 struct __ecereNameSpace__ecere__com__Instance * application;
1239 struct __ecereNameSpace__ecere__sys__OldList classes;
1240 struct __ecereNameSpace__ecere__sys__OldList defines;
1241 struct __ecereNameSpace__ecere__sys__OldList functions;
1242 struct __ecereNameSpace__ecere__sys__OldList modules;
1243 struct __ecereNameSpace__ecere__com__Instance * prev;
1244 struct __ecereNameSpace__ecere__com__Instance * next;
1245 const char *  name;
1246 void *  library;
1247 void *  Unload;
1248 int importType;
1249 int origImportType;
1250 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1251 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1252 } ecere_gcc_struct;
1253
1254 void __ecereCreateModuleInstances_loadSymbols()
1255 {
1256 loadedModules = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__Map_TPL_String__ecere__com__List_TPL_ecere__com__Module___);
1257 __ecereNameSpace__ecere__com__eInstance_IncRef(loadedModules);
1258 }
1259
1260 void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList)
1261 {
1262 struct __ecereNameSpace__ecere__com__NameSpace * ns;
1263 struct GlobalData * data;
1264
1265 for(; (ns = (struct __ecereNameSpace__ecere__com__NameSpace *)globalDataList->nameSpaces.root); )
1266 {
1267 FreeGlobalData(ns);
1268 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)ns);
1269 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)(*ns).name), (*ns).name = 0);
1270 (__ecereNameSpace__ecere__com__eSystem_Delete(ns), ns = 0);
1271 }
1272 for(; (data = (struct GlobalData *)globalDataList->functions.root); )
1273 {
1274 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Remove(&globalDataList->functions, (void *)(data));
1275 if(data->symbol)
1276 FreeSymbol(data->symbol);
1277 FreeType(data->dataType);
1278 (__ecereNameSpace__ecere__com__eSystem_Delete(data->fullName), data->fullName = 0);
1279 (__ecereNameSpace__ecere__com__eSystem_Delete(data->dataTypeString), data->dataTypeString = 0);
1280 ((data ? __extension__ ({
1281 void * __ecerePtrToDelete = (data);
1282
1283 __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);
1284 }) : 0), data = 0);
1285 }
1286 }
1287
1288 void __ecereUnregisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
1289 {
1290
1291 }
1292
1293 void ImportModule(const char *  name, int importType, int importAccess, unsigned int loadDllOnly);
1294
1295 unsigned int LoadSymbols(const char * fileName, int importType, unsigned int loadDllOnly)
1296 {
1297 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpenBuffered(fileName, 1);
1298 unsigned int globalInstance = 0;
1299
1300 if(f)
1301 {
1302 unsigned int ecereCOMModule = 0;
1303 char moduleName[797];
1304
1305 __ecereNameSpace__ecere__sys__GetLastDirectory(fileName, moduleName);
1306 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")))
1307 ecereCOMModule = 1;
1308 for(; ; )
1309 {
1310 char line[1024];
1311
1312 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1313 break;
1314 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1315 if(line[0] == '[')
1316 {
1317 if(!strcmp(line, "[Global Instance]"))
1318 globalInstance = 1;
1319 else if(!strcmp(line, "[Defined Classes]"))
1320 {
1321 struct __ecereNameSpace__ecere__com__Class * regClass = (((void *)0));
1322 char name[1024];
1323 unsigned int isRemote = 0;
1324 unsigned int isStatic = 0;
1325 unsigned int isWatchable = 0;
1326 int classType = 0;
1327 unsigned int fixed = 0;
1328 unsigned int noExpansion = 0;
1329 int inheritanceAccess = 1;
1330
1331 for(; ; )
1332 {
1333 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1334 break;
1335 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1336 if(!strcmp(line, "."))
1337 break;
1338 if(line[0] == '[')
1339 {
1340 if(!strcmp(line, "[Remote]"))
1341 isRemote = 1;
1342 else if(!strcmp(line, "[Static]"))
1343 isStatic = 1;
1344 else if(!strcmp(line, "[Fixed]"))
1345 fixed = 1;
1346 else if(!strcmp(line, "[No Expansion]"))
1347 noExpansion = 1;
1348 else if(!strcmp(line, "[Watchable]"))
1349 isWatchable = 1;
1350 else if(!strcmp(line, "[Enum]"))
1351 classType = 4;
1352 else if(!strcmp(line, "[Bit]"))
1353 classType = 2;
1354 else if(!strcmp(line, "[Struct]"))
1355 classType = 1;
1356 else if(!strcmp(line, "[Unit]"))
1357 classType = 3;
1358 else if(!strcmp(line, "[NoHead]"))
1359 classType = 5;
1360 else if(!strcmp(line, "[Base]") || !strcmp(line, "[Private Base]"))
1361 {
1362 if(!strcmp(line, "[Private Base]"))
1363 inheritanceAccess = 2;
1364 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1365 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1366 if(importType == 3)
1367 DeclClass((((void *)0)), name);
1368 if(isStatic || loadDllOnly || importType == 3 || importType == 4)
1369 regClass = (((void *)0));
1370 else if(regClass = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, name), !regClass || regClass->internalDecl || regClass->isRemote)
1371 {
1372 struct Symbol * existingClass = FindClass(name);
1373 const char * baseName = (classType == 0 && importType == 2 && isRemote) ? "DCOMClientObject" : (!strcmp(line, "[None]") ? (((void *)0)) : line);
1374
1375 if(!isRemote || (importType != 2) || (!sourceFile || !strstr(sourceFile, ".main.ec")))
1376 {
1377 if(!regClass || regClass->internalDecl)
1378 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, name, isRemote ? (((void *)0)) : baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1379 if(regClass && isRemote)
1380 regClass->isRemote = (importType == 2) ? 1 : 2;
1381 if(isRemote)
1382 {
1383 if(importType == 2)
1384 {
1385 char className[1024] = "DCOMClient_";
1386
1387 strcat(className, name);
1388 if(!existingClass)
1389 existingClass = DeclClass((((void *)0)), name);
1390 regClass = __ecereNameSpace__ecere__com__eSystem_RegisterClass(classType, className, baseName, 0, 0, (((void *)0)), (((void *)0)), privateModule, ecereCOMModule ? 4 : 1, inheritanceAccess);
1391 }
1392 if(regClass)
1393 regClass->isRemote = (importType == 2) ? 1 : 3;
1394 }
1395 if(existingClass)
1396 {
1397 struct __ecereNameSpace__ecere__sys__OldLink * link;
1398
1399 for(link = existingClass->templatedClasses.first; link; link = link->next)
1400 {
1401 struct Symbol * symbol = link->data;
1402
1403 symbol->__anon1.registered = __ecereNameSpace__ecere__com__eSystem_FindClass(privateModule, symbol->string);
1404 }
1405 }
1406 if(fixed)
1407 regClass->fixed = 1;
1408 if(noExpansion)
1409 regClass->noExpansion = 1;
1410 if(isWatchable)
1411 {
1412 __ecereNameSpace__ecere__com__eClass_DestructionWatchable(regClass);
1413 regClass->structSize = regClass->offset;
1414 }
1415 if(regClass && existingClass)
1416 {
1417 existingClass->__anon1.registered = regClass;
1418 regClass->symbol = existingClass;
1419 existingClass->notYetDeclared = 1;
1420 existingClass->imported = 1;
1421 if(regClass->module)
1422 existingClass->module = FindModule(regClass->module);
1423 else
1424 existingClass->module = mainModule;
1425 }
1426 }
1427 else
1428 regClass = (((void *)0));
1429 }
1430 else
1431 regClass = (((void *)0));
1432 isRemote = 0;
1433 isWatchable = 0;
1434 fixed = 0;
1435 isStatic = 0;
1436 }
1437 else if(!strcmp(line, "[Enum Values]"))
1438 {
1439 for(; ; )
1440 {
1441 char * equal;
1442
1443 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1444 break;
1445 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1446 if(!strcmp(line, "."))
1447 break;
1448 if(regClass)
1449 {
1450 equal = strchr(line, '=');
1451 if(equal)
1452 {
1453 char name[1024];
1454
1455 memcpy(name, line, (int)(equal - line));
1456 name[equal - line] = '\0';
1457 __ecereNameSpace__ecere__sys__TrimLSpaces(name, name);
1458 __ecereNameSpace__ecere__sys__TrimRSpaces(name, name);
1459 __ecereNameSpace__ecere__com__eEnum_AddFixedValue(regClass, name, strtoll(equal + 1, (((void *)0)), 0));
1460 }
1461 else
1462 {
1463 __ecereNameSpace__ecere__com__eEnum_AddValue(regClass, line);
1464 }
1465 }
1466 }
1467 }
1468 else if(!strcmp(line, "[Defined Methods]"))
1469 {
1470 char name[1024];
1471 unsigned int isVirtual = 0;
1472 int memberAccess = 1;
1473
1474 for(; ; )
1475 {
1476 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1477 break;
1478 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1479 if(!strcmp(line, "."))
1480 break;
1481 if(line[0] == '[')
1482 {
1483 if(!strcmp(line, "[Type]"))
1484 {
1485 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1486 if(regClass)
1487 {
1488 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1489 if(isVirtual)
1490 __ecereNameSpace__ecere__com__eClass_AddVirtualMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1491 else
1492 __ecereNameSpace__ecere__com__eClass_AddMethod(regClass, name, line[0] ? line : 0, DummyMethod, memberAccess);
1493 }
1494 }
1495 else if(!strcmp(line, "[Virtual]"))
1496 isVirtual = 1;
1497 else if(!strcmp(line, "[Public]"))
1498 memberAccess = 1;
1499 else if(!strcmp(line, "[Private]"))
1500 memberAccess = 2;
1501 }
1502 else
1503 {
1504 strcpy(name, line);
1505 isVirtual = 0;
1506 memberAccess = 1;
1507 }
1508 }
1509 }
1510 else if(!strcmp(line, "[Defined Properties]"))
1511 {
1512 char name[1024];
1513 unsigned int setStmt = 0, getStmt = 0, isVirtual = 0, conversion = 0;
1514 unsigned int isWatchable = 0;
1515 int memberAccess = 1;
1516
1517 for(; ; )
1518 {
1519 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1520 break;
1521 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1522 if(!strcmp(line, "."))
1523 break;
1524 if(line[0] == '[')
1525 {
1526 if(!strcmp(line, "[Type]"))
1527 {
1528 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1529 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1530 if(regClass)
1531 {
1532 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);
1533
1534 if(prop)
1535 {
1536 prop->compiled = 0;
1537 if(isWatchable)
1538 {
1539 __ecereNameSpace__ecere__com__eProperty_Watchable(prop);
1540 regClass->structSize = regClass->offset;
1541 }
1542 }
1543 }
1544 }
1545 else if(!strcmp(line, "[Set]"))
1546 setStmt = 1;
1547 else if(!strcmp(line, "[Get]"))
1548 getStmt = 1;
1549 else if(!strcmp(line, "[Watchable]"))
1550 isWatchable = 1;
1551 else if(!strcmp(line, "[Public]"))
1552 memberAccess = 1;
1553 else if(!strcmp(line, "[Private]"))
1554 memberAccess = 2;
1555 else if(!strcmp(line, "[Conversion]"))
1556 {
1557 conversion = 1;
1558 setStmt = getStmt = isVirtual = isWatchable = 0;
1559 }
1560 }
1561 else
1562 {
1563 strcpy(name, line);
1564 setStmt = getStmt = isVirtual = conversion = isWatchable = 0;
1565 memberAccess = 1;
1566 }
1567 }
1568 }
1569 else if(!strcmp(line, "[Defined Class Properties]"))
1570 {
1571 char name[1024];
1572 unsigned int setStmt = 0, getStmt = 0;
1573
1574 for(; ; )
1575 {
1576 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1577 break;
1578 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1579 if(!strcmp(line, "."))
1580 break;
1581 if(line[0] == '[')
1582 {
1583 if(!strcmp(line, "[Type]"))
1584 {
1585 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1586 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1587 if(regClass)
1588 {
1589 __ecereNameSpace__ecere__com__eClass_AddClassProperty(regClass, name, line, (void *)(uintptr_t)setStmt, (void *)(uintptr_t)getStmt);
1590 }
1591 }
1592 else if(!strcmp(line, "[Set]"))
1593 setStmt = 1;
1594 else if(!strcmp(line, "[Get]"))
1595 getStmt = 1;
1596 }
1597 else
1598 {
1599 strcpy(name, line);
1600 setStmt = getStmt = 0;
1601 }
1602 }
1603 }
1604 else if(!strcmp(line, "[Defined Data Members]"))
1605 {
1606 ReadDataMembers(regClass, (((void *)0)), f);
1607 }
1608 else if(!strcmp(line, "[Template Parameters]"))
1609 {
1610 while(!(__extension__ ({
1611 unsigned int (*  __internal_VirtualMethod)(struct __ecereNameSpace__ecere__com__Instance *);
1612
1613 __internal_VirtualMethod = ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
1614 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1615
1616 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1617 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof]);
1618 __internal_VirtualMethod ? __internal_VirtualMethod(f) : (unsigned int)1;
1619 })))
1620 {
1621 char name[1024];
1622 int type = 0;
1623 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1624 {
1625
1626 .__anon1 = {
1627
1628 .__anon1 = {
1629 .dataTypeString = 0
1630 }
1631 }
1632 };
1633 void * info = (((void *)0));
1634
1635 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1636 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1637 if(line[0] == '.')
1638 break;
1639 strcpy(name, line);
1640 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1641 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1642 if(!strcmp(line, "[Expression]"))
1643 type = 2;
1644 else if(!strcmp(line, "[Identifier]"))
1645 type = 1;
1646 switch(type)
1647 {
1648 case 0:
1649 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1650 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1651 if(regClass && strcmp(line, "[None]"))
1652 {
1653 info = __ecereNameSpace__ecere__sys__CopyString(line);
1654 }
1655 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1656 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1657 if(regClass && strcmp(line, "[None]"))
1658 {
1659 defaultArg.__anon1.__anon1.dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line);
1660 }
1661 break;
1662 case 2:
1663 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1664 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1665 if(regClass && strcmp(line, "[None]"))
1666 {
1667 info = __ecereNameSpace__ecere__sys__CopyString(line);
1668 }
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 struct __ecereNameSpace__ecere__com__Instance * backup = pushLexer();
1674 struct Operand op;
1675 struct Expression * exp;
1676
1677 skipErrors = 1;
1678 exp = ParseExpressionString(line);
1679 if(exp)
1680 {
1681 if(info)
1682 exp->destType = ProcessTypeString(info, 0);
1683 ProcessExpressionType(exp);
1684 ComputeExpression(exp);
1685 op = GetOperand(exp);
1686 defaultArg.__anon1.expression.__anon1.ui64 = op.__anon1.ui64;
1687 FreeExpression(exp);
1688 }
1689 skipErrors = 0;
1690 popLexer(backup);
1691 }
1692 break;
1693 case 1:
1694 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1695 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1696 if(!strcmp(line, "[Data member]"))
1697 info = (void *)0;
1698 else if(!strcmp(line, "[Method]"))
1699 info = (void *)1;
1700 else if(!strcmp(line, "[Property]"))
1701 info = (void *)2;
1702 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1703 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1704 if(regClass && strcmp(line, "[None]"))
1705 {
1706 defaultArg.__anon1.__anon2.memberString = __ecereNameSpace__ecere__sys__CopyString(line);
1707 }
1708 break;
1709 }
1710 if(regClass)
1711 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, name, type, info, &defaultArg);
1712 if(type == 0 || type == 2)
1713 (__ecereNameSpace__ecere__com__eSystem_Delete(info), info = 0);
1714 if(type == 0 || type == 1)
1715 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)defaultArg.__anon1.__anon1.dataTypeString), defaultArg.__anon1.__anon1.dataTypeString = 0);
1716 }
1717 if(regClass)
1718 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1719 }
1720 }
1721 else
1722 {
1723 inheritanceAccess = 1;
1724 classType = 0;
1725 isRemote = 0;
1726 strcpy(name, line);
1727 regClass = (((void *)0));
1728 }
1729 }
1730 }
1731 else if(!strcmp(line, "[Defined Expressions]"))
1732 {
1733 char name[1024];
1734
1735 for(; ; )
1736 {
1737 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1738 break;
1739 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1740 if(!strcmp(line, "."))
1741 break;
1742 if(!strcmp(line, "[Value]"))
1743 {
1744 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1745 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1746 if(!loadDllOnly && importType != 3 && importType != 4)
1747 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(name, line, privateModule, ecereCOMModule ? 4 : 1);
1748 }
1749 else if(line[0] != '[')
1750 {
1751 strcpy(name, line);
1752 }
1753 }
1754 }
1755 else if(!strcmp(line, "[Defined Functions]"))
1756 {
1757 char name[1024];
1758
1759 for(; ; )
1760 {
1761 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1762 break;
1763 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1764 if(!strcmp(line, "."))
1765 break;
1766 if(!strcmp(line, "[Type]"))
1767 {
1768 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1769 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1770 if(!loadDllOnly && importType != 3 && importType != 4)
1771 __ecereNameSpace__ecere__com__eSystem_RegisterFunction(name, line, (((void *)0)), privateModule, ecereCOMModule ? 4 : 1);
1772 }
1773 else if(line[0] != '[')
1774 {
1775 strcpy(name, line);
1776 }
1777 }
1778 }
1779 else if(!strcmp(line, "[Defined Data]"))
1780 {
1781 char name[1024];
1782
1783 for(; ; )
1784 {
1785 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1786 break;
1787 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1788 if(!strcmp(line, "."))
1789 break;
1790 if(!strcmp(line, "[Type]"))
1791 {
1792 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1793 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1794 if(!loadDllOnly && importType != 3 && importType != 4)
1795 {
1796 int start = 0, c;
1797 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace = globalData;
1798 struct GlobalData * data;
1799
1800 for(c = 0; name[c]; c++)
1801 {
1802 if(name[c] == '.' || (name[c] == ':' && name[c + 1] == ':'))
1803 {
1804 struct __ecereNameSpace__ecere__com__NameSpace * newSpace;
1805 char * spaceName = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (c - start + 1));
1806
1807 strncpy(spaceName, name + start, c - start);
1808 spaceName[c - start] = '\0';
1809 newSpace = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).nameSpaces, spaceName);
1810 if(!newSpace)
1811 {
1812 newSpace = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__com__NameSpace) * (1));
1813 (*newSpace).classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1814 (*newSpace).defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1815 (*newSpace).functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1816 (*newSpace).nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1817 (*newSpace).name = spaceName;
1818 (*newSpace).parent = nameSpace;
1819 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)newSpace);
1820 }
1821 else
1822 (__ecereNameSpace__ecere__com__eSystem_Delete(spaceName), spaceName = 0);
1823 nameSpace = newSpace;
1824 if(name[c] == ':')
1825 c++;
1826 start = c + 1;
1827 }
1828 }
1829 if(c - start)
1830 {
1831 data = (struct GlobalData *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).functions, name + start);
1832 if(!data)
1833 {
1834 data = __extension__ ({
1835 struct GlobalData * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData);
1836
1837 __ecereInstance1->fullName = __ecereNameSpace__ecere__sys__CopyString(name), __ecereInstance1->dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1->module = privateModule, __ecereInstance1;
1838 });
1839 data->key = (uintptr_t)(data->fullName + start);
1840 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1841 }
1842 else if(strcmp(data->dataTypeString, line))
1843 {
1844 struct DataRedefinition * redefinition = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DataRedefinition);
1845
1846 strcpy(redefinition->name, name);
1847 strcpy(redefinition->type1, data->dataTypeString);
1848 strcpy(redefinition->type2, line);
1849 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&dataRedefinitions, redefinition);
1850 }
1851 }
1852 }
1853 }
1854 else if(line[0] != '[')
1855 {
1856 strcpy(name, line);
1857 }
1858 }
1859 }
1860 else if(!strcmp(line, "[Imported Modules]"))
1861 {
1862 int moduleImportType = 0;
1863 int importAccess = 1;
1864
1865 for(; ; )
1866 {
1867 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1868 break;
1869 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1870 if(!strcmp(line, "."))
1871 break;
1872 if(!strcmp(line, "[Static]"))
1873 moduleImportType = 1;
1874 else if(!strcmp(line, "[Remote]"))
1875 moduleImportType = 2;
1876 else if(!strcmp(line, "[Private]"))
1877 importAccess = 2;
1878 else if(line[0] != '[')
1879 {
1880 if(importType != 3 && importType != 4)
1881 ImportModule(line, moduleImportType, importAccess, loadDllOnly);
1882 else
1883 ImportModule(line, 4, importAccess, loadDllOnly);
1884 if(!strcmp(line, "ecere"))
1885 ecereImported = 1;
1886 moduleImportType = 0;
1887 importAccess = 1;
1888 }
1889 }
1890 }
1891 }
1892 }
1893 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1894 }
1895 else if(importType != 4)
1896 {
1897 char sysFileName[797];
1898
1899 __ecereNameSpace__ecere__sys__GetSystemPathBuffer(sysFileName, fileName);
1900 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString("ec", "Couldn't open %s\n", (((void *)0))), sysFileName);
1901 }
1902 return globalInstance;
1903 }
1904
1905 void ImportModule(const char * name, int importType, int importAccess, unsigned int loadDllOnly)
1906 {
1907 struct ImportedModule * module = (((void *)0));
1908 char moduleName[797];
1909
1910 strncpy(moduleName, name, (797) - 1);
1911 moduleName[(797) - 1] = 0;
1912 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1913 for(module = (*defines).first; module; module = module->next)
1914 {
1915 if(module->type == 0 && !(strcasecmp)(module->name, moduleName))
1916 break;
1917 }
1918 if((!module || (module->dllOnly && !loadDllOnly)) && strlen(name) < (274))
1919 {
1920 char ext[17];
1921 struct __ecereNameSpace__ecere__com__Instance * loadedModule = (((void *)0));
1922 char symFile[797];
1923
1924 symFile[0] = '\0';
1925 __ecereNameSpace__ecere__sys__GetExtension(name, ext);
1926 strcpy(symFile, symbolsDir ? symbolsDir : "");
1927 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1928 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1929 if(!strcmp(ext, "dll") || !strcmp(ext, "so") || !strcmp(ext, "dylib") || !ext[0])
1930 {
1931 if(importType != 4)
1932 {
1933 if(!module)
1934 {
1935 if(precompDefines)
1936 {
1937 module = __extension__ ({
1938 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1939
1940 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1941 });
1942 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1943 }
1944 module = __extension__ ({
1945 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1946
1947 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1948 });
1949 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1950 }
1951 module->dllOnly = loadDllOnly;
1952 if(ext[0] || !__ecereNameSpace__ecere__sys__FileExists(symFile))
1953 {
1954 unsigned int skipLoad = 0;
1955 struct __ecereNameSpace__ecere__com__Instance * list = (((void *)0));
1956
1957 if(!inCompiler && !inPreCompiler && !inSymbolGen && !inDocumentor)
1958 {
1959 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, loadedModules), it);
1960
1961 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index((void *)(&it), (uint64)(uintptr_t)(name), 0))
1962 {
1963 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);
1964
1965 if(firstModule)
1966 {
1967 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_);
1968 (__extension__ ({
1969 struct __ecereNameSpace__ecere__com__IteratorPointer * (*  __internal_VirtualMethod)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value);
1970
1971 __internal_VirtualMethod = ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1972 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
1973
1974 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
1975 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add]);
1976 __internal_VirtualMethod ? __internal_VirtualMethod(list, (uint64)(uintptr_t)(firstModule)) : (struct __ecereNameSpace__ecere__com__IteratorPointer *)1;
1977 }));
1978 __extension__ ({
1979 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1980 {
1981 loadedModules, 0
1982 };
1983
1984 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, ((uint64)(uintptr_t)(name)), 1);
1985 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, (uint64)(uintptr_t)(list));
1986 });
1987 }
1988 else
1989 skipLoad = 1;
1990 }
1991 else
1992 list = ((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&it)));
1993 }
1994 if(!skipLoad)
1995 {
1996 loadedModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, name, importAccess);
1997 if(loadedModule)
1998 {
1999 ((struct __ecereNameSpace__ecere__com__Module *)(((char *)loadedModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->importType = importType;
2000 module->dllOnly = 0;
2001 if(list)
2002 (__extension__ ({
2003 struct __ecereNameSpace__ecere__com__IteratorPointer * (*  __internal_VirtualMethod)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value);
2004
2005 __internal_VirtualMethod = ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
2006 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
2007
2008 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
2009 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add]);
2010 __internal_VirtualMethod ? __internal_VirtualMethod(list, (uint64)(uintptr_t)(loadedModule)) : (struct __ecereNameSpace__ecere__com__IteratorPointer *)1;
2011 }));
2012 }
2013 }
2014 }
2015 }
2016 }
2017 if(!loadedModule && (!strcmp(ext, "ec") || !strcmp(ext, "sym") || !ext[0]))
2018 {
2019 {
2020 if(!module)
2021 {
2022 if(precompDefines)
2023 {
2024 module = __extension__ ({
2025 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2026
2027 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2028 });
2029 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
2030 }
2031 module = __extension__ ({
2032 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2033
2034 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2035 });
2036 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
2037 }
2038 module->dllOnly = loadDllOnly;
2039 if(inPreCompiler)
2040 return ;
2041 if(inIDE && !__ecereNameSpace__ecere__sys__FileExists(symFile) && sourceDirs)
2042 {
2043 {
2044 struct __ecereNameSpace__ecere__com__Iterator dir =
2045 {
2046 (sourceDirs), 0
2047 };
2048
2049 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&dir))
2050 {
2051 char configDir[274];
2052
2053 strcpy(symFile, ((char * )((uintptr_t)(__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&dir)))));
2054 __ecereNameSpace__ecere__sys__PathCat(symFile, "obj");
2055 sprintf(configDir, "debug.%s", (__runtimePlatform == 1) ? "win32" : (__runtimePlatform == 3) ? "apple" : "linux");
2056 __ecereNameSpace__ecere__sys__PathCat(symFile, configDir);
2057 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
2058 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
2059 if(__ecereNameSpace__ecere__sys__FileExists(symFile))
2060 break;
2061 }
2062 }
2063 }
2064 if(!__ecereNameSpace__ecere__sys__FileExists(symFile))
2065 {
2066 char fileName[274];
2067
2068 __ecereNameSpace__ecere__sys__GetLastDirectory(symFile, fileName);
2069 strcpy(symFile, symbolsDir ? symbolsDir : "");
2070 __ecereNameSpace__ecere__sys__PathCat(symFile, fileName);
2071 }
2072 module->globalInstance = LoadSymbols(symFile, importType, loadDllOnly);
2073 }
2074 }
2075 }
2076 }
2077
2078 void __ecereRegisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2079 {
2080 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2081
2082 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetGlobalData", "void SetGlobalData(ecere::com::NameSpace * nameSpace)", SetGlobalData, module, 1);
2083 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInIDE", "void SetInIDE(bool b)", SetInIDE, module, 1);
2084 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSourceDirs", "void SetSourceDirs(ecere::com::List<String> list)", SetSourceDirs, module, 1);
2085 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetIncludeDirs", "void SetIncludeDirs(ecere::sys::OldList * list)", SetIncludeDirs, module, 1);
2086 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSysIncludeDirs", "void SetSysIncludeDirs(ecere::sys::OldList * list)", SetSysIncludeDirs, module, 1);
2087 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetEcereImported", "void SetEcereImported(bool b)", SetEcereImported, module, 1);
2088 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetEcereImported", "bool GetEcereImported(void)", GetEcereImported, module, 1);
2089 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInPreCompiler", "void SetInPreCompiler(bool b)", SetInPreCompiler, module, 1);
2090 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInSymbolGen", "void SetInSymbolGen(bool b)", SetInSymbolGen, module, 1);
2091 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInDocumentor", "void SetInDocumentor(bool b)", SetInDocumentor, module, 1);
2092 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetPrecompDefines", "void SetPrecompDefines(ecere::sys::OldList * list)", SetPrecompDefines, module, 1);
2093 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DummyMethod", "bool DummyMethod(void)", DummyMethod, module, 1);
2094 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("LoadSymbols", "bool LoadSymbols(const char * fileName, ecere::com::ImportType importType, bool loadDllOnly)", LoadSymbols, module, 1);
2095 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ImportModule", "void ImportModule(const char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess, bool loadDllOnly)", ImportModule, module, 1);
2096 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindIncludeFileID", "int FindIncludeFileID(char * includeFile)", FindIncludeFileID, module, 2);
2097 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileID", "int GetIncludeFileID(char * includeFile)", GetIncludeFileID, module, 2);
2098 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileFromID", "char * GetIncludeFileFromID(int id)", GetIncludeFileFromID, module, 2);
2099 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OpenIncludeFile", "ecere::sys::File OpenIncludeFile(char * includeFile)", OpenIncludeFile, module, 2);
2100 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIncludeFiles", "void FreeIncludeFiles(void)", FreeIncludeFiles, module, 1);
2101 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeGlobalData", "void FreeGlobalData(ecere::com::NameSpace globalDataList)", FreeGlobalData, module, 1);
2102 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckDataRedefinitions", "void CheckDataRedefinitions(void)", CheckDataRedefinitions, module, 1);
2103 }
2104