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