a182684e6793739fd29c52ffd4743e2a2eec018c
[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(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))__extension__ ({
1611 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = f;
1612
1613 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__sys__File->_vTbl;
1614 })[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(f))
1615 {
1616 char name[1024];
1617 int type = 0;
1618 struct __ecereNameSpace__ecere__com__ClassTemplateArgument defaultArg =
1619 {
1620
1621 .__anon1 = {
1622
1623 .__anon1 = {
1624 .dataTypeString = 0
1625 }
1626 }
1627 };
1628 void * info = (((void *)0));
1629
1630 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1631 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1632 if(line[0] == '.')
1633 break;
1634 strcpy(name, line);
1635 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1636 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1637 if(!strcmp(line, "[Expression]"))
1638 type = 2;
1639 else if(!strcmp(line, "[Identifier]"))
1640 type = 1;
1641 switch(type)
1642 {
1643 case 0:
1644 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1645 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1646 if(regClass && strcmp(line, "[None]"))
1647 {
1648 info = __ecereNameSpace__ecere__sys__CopyString(line);
1649 }
1650 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1651 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1652 if(regClass && strcmp(line, "[None]"))
1653 {
1654 defaultArg.__anon1.__anon1.dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line);
1655 }
1656 break;
1657 case 2:
1658 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1659 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1660 if(regClass && strcmp(line, "[None]"))
1661 {
1662 info = __ecereNameSpace__ecere__sys__CopyString(line);
1663 }
1664 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1665 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1666 if(regClass && strcmp(line, "[None]"))
1667 {
1668 struct __ecereNameSpace__ecere__com__Instance * backup = pushLexer();
1669 struct Operand op;
1670 struct Expression * exp;
1671
1672 skipErrors = 1;
1673 exp = ParseExpressionString(line);
1674 if(exp)
1675 {
1676 if(info)
1677 exp->destType = ProcessTypeString(info, 0);
1678 ProcessExpressionType(exp);
1679 ComputeExpression(exp);
1680 op = GetOperand(exp);
1681 defaultArg.__anon1.expression.__anon1.ui64 = op.__anon1.ui64;
1682 FreeExpression(exp);
1683 }
1684 skipErrors = 0;
1685 popLexer(backup);
1686 }
1687 break;
1688 case 1:
1689 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1690 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1691 if(!strcmp(line, "[Data member]"))
1692 info = (void *)0;
1693 else if(!strcmp(line, "[Method]"))
1694 info = (void *)1;
1695 else if(!strcmp(line, "[Property]"))
1696 info = (void *)2;
1697 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1698 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1699 if(regClass && strcmp(line, "[None]"))
1700 {
1701 defaultArg.__anon1.__anon2.memberString = __ecereNameSpace__ecere__sys__CopyString(line);
1702 }
1703 break;
1704 }
1705 if(regClass)
1706 __ecereNameSpace__ecere__com__eClass_AddTemplateParameter(regClass, name, type, info, &defaultArg);
1707 if(type == 0 || type == 2)
1708 (__ecereNameSpace__ecere__com__eSystem_Delete(info), info = 0);
1709 if(type == 0 || type == 1)
1710 (__ecereNameSpace__ecere__com__eSystem_Delete((void *)defaultArg.__anon1.__anon1.dataTypeString), defaultArg.__anon1.__anon1.dataTypeString = 0);
1711 }
1712 if(regClass)
1713 __ecereNameSpace__ecere__com__eClass_DoneAddingTemplateParameters(regClass);
1714 }
1715 }
1716 else
1717 {
1718 inheritanceAccess = 1;
1719 classType = 0;
1720 isRemote = 0;
1721 strcpy(name, line);
1722 regClass = (((void *)0));
1723 }
1724 }
1725 }
1726 else if(!strcmp(line, "[Defined Expressions]"))
1727 {
1728 char name[1024];
1729
1730 for(; ; )
1731 {
1732 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1733 break;
1734 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1735 if(!strcmp(line, "."))
1736 break;
1737 if(!strcmp(line, "[Value]"))
1738 {
1739 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1740 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1741 if(!loadDllOnly && importType != 3 && importType != 4)
1742 __ecereNameSpace__ecere__com__eSystem_RegisterDefine(name, line, privateModule, ecereCOMModule ? 4 : 1);
1743 }
1744 else if(line[0] != '[')
1745 {
1746 strcpy(name, line);
1747 }
1748 }
1749 }
1750 else if(!strcmp(line, "[Defined Functions]"))
1751 {
1752 char name[1024];
1753
1754 for(; ; )
1755 {
1756 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1757 break;
1758 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1759 if(!strcmp(line, "."))
1760 break;
1761 if(!strcmp(line, "[Type]"))
1762 {
1763 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1764 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1765 if(!loadDllOnly && importType != 3 && importType != 4)
1766 __ecereNameSpace__ecere__com__eSystem_RegisterFunction(name, line, (((void *)0)), privateModule, ecereCOMModule ? 4 : 1);
1767 }
1768 else if(line[0] != '[')
1769 {
1770 strcpy(name, line);
1771 }
1772 }
1773 }
1774 else if(!strcmp(line, "[Defined Data]"))
1775 {
1776 char name[1024];
1777
1778 for(; ; )
1779 {
1780 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1781 break;
1782 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1783 if(!strcmp(line, "."))
1784 break;
1785 if(!strcmp(line, "[Type]"))
1786 {
1787 __ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line));
1788 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1789 if(!loadDllOnly && importType != 3 && importType != 4)
1790 {
1791 int start = 0, c;
1792 struct __ecereNameSpace__ecere__com__NameSpace * nameSpace = globalData;
1793 struct GlobalData * data;
1794
1795 for(c = 0; name[c]; c++)
1796 {
1797 if(name[c] == '.' || (name[c] == ':' && name[c + 1] == ':'))
1798 {
1799 struct __ecereNameSpace__ecere__com__NameSpace * newSpace;
1800 char * spaceName = __ecereNameSpace__ecere__com__eSystem_New(sizeof(char) * (c - start + 1));
1801
1802 strncpy(spaceName, name + start, c - start);
1803 spaceName[c - start] = '\0';
1804 newSpace = (struct __ecereNameSpace__ecere__com__NameSpace *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).nameSpaces, spaceName);
1805 if(!newSpace)
1806 {
1807 newSpace = __ecereNameSpace__ecere__com__eSystem_New0(sizeof(struct __ecereNameSpace__ecere__com__NameSpace) * (1));
1808 (*newSpace).classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1809 (*newSpace).defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1810 (*newSpace).functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1811 (*newSpace).nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString;
1812 (*newSpace).name = spaceName;
1813 (*newSpace).parent = nameSpace;
1814 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).nameSpaces, (struct __ecereNameSpace__ecere__sys__BTNode *)newSpace);
1815 }
1816 else
1817 (__ecereNameSpace__ecere__com__eSystem_Delete(spaceName), spaceName = 0);
1818 nameSpace = newSpace;
1819 if(name[c] == ':')
1820 c++;
1821 start = c + 1;
1822 }
1823 }
1824 if(c - start)
1825 {
1826 data = (struct GlobalData *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_FindString(&(*nameSpace).functions, name + start);
1827 if(!data)
1828 {
1829 data = __extension__ ({
1830 struct GlobalData * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData);
1831
1832 __ecereInstance1->fullName = __ecereNameSpace__ecere__sys__CopyString(name), __ecereInstance1->dataTypeString = __ecereNameSpace__ecere__sys__CopyString(line), __ecereInstance1->module = privateModule, __ecereInstance1;
1833 });
1834 data->key = (uintptr_t)(data->fullName + start);
1835 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&(*nameSpace).functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1836 }
1837 else if(strcmp(data->dataTypeString, line))
1838 {
1839 struct DataRedefinition * redefinition = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_DataRedefinition);
1840
1841 strcpy(redefinition->name, name);
1842 strcpy(redefinition->type1, data->dataTypeString);
1843 strcpy(redefinition->type2, line);
1844 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&dataRedefinitions, redefinition);
1845 }
1846 }
1847 }
1848 }
1849 else if(line[0] != '[')
1850 {
1851 strcpy(name, line);
1852 }
1853 }
1854 }
1855 else if(!strcmp(line, "[Imported Modules]"))
1856 {
1857 int moduleImportType = 0;
1858 int importAccess = 1;
1859
1860 for(; ; )
1861 {
1862 if(!__ecereMethod___ecereNameSpace__ecere__sys__File_GetLine(f, line, sizeof (line)))
1863 break;
1864 __ecereNameSpace__ecere__sys__TrimLSpaces(line, line);
1865 if(!strcmp(line, "."))
1866 break;
1867 if(!strcmp(line, "[Static]"))
1868 moduleImportType = 1;
1869 else if(!strcmp(line, "[Remote]"))
1870 moduleImportType = 2;
1871 else if(!strcmp(line, "[Private]"))
1872 importAccess = 2;
1873 else if(line[0] != '[')
1874 {
1875 if(importType != 3 && importType != 4)
1876 ImportModule(line, moduleImportType, importAccess, loadDllOnly);
1877 else
1878 ImportModule(line, 4, importAccess, loadDllOnly);
1879 if(!strcmp(line, "ecere"))
1880 ecereImported = 1;
1881 moduleImportType = 0;
1882 importAccess = 1;
1883 }
1884 }
1885 }
1886 }
1887 }
1888 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
1889 }
1890 else if(importType != 4)
1891 {
1892 char sysFileName[797];
1893
1894 __ecereNameSpace__ecere__sys__GetSystemPathBuffer(sysFileName, fileName);
1895 Compiler_Error(__ecereNameSpace__ecere__GetTranslatedString("ec", "Couldn't open %s\n", (((void *)0))), sysFileName);
1896 }
1897 return globalInstance;
1898 }
1899
1900 void ImportModule(const char * name, int importType, int importAccess, unsigned int loadDllOnly)
1901 {
1902 struct ImportedModule * module = (((void *)0));
1903 char moduleName[797];
1904
1905 strncpy(moduleName, name, (797) - 1);
1906 moduleName[(797) - 1] = 0;
1907 __ecereNameSpace__ecere__sys__StripExtension(moduleName);
1908 for(module = (*defines).first; module; module = module->next)
1909 {
1910 if(module->type == 0 && !(strcasecmp)(module->name, moduleName))
1911 break;
1912 }
1913 if((!module || (module->dllOnly && !loadDllOnly)) && strlen(name) < (274))
1914 {
1915 char ext[17];
1916 struct __ecereNameSpace__ecere__com__Instance * loadedModule = (((void *)0));
1917 char symFile[797];
1918
1919 symFile[0] = '\0';
1920 __ecereNameSpace__ecere__sys__GetExtension(name, ext);
1921 strcpy(symFile, symbolsDir ? symbolsDir : "");
1922 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
1923 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1924 if(!strcmp(ext, "dll") || !strcmp(ext, "so") || !strcmp(ext, "dylib") || !ext[0])
1925 {
1926 if(importType != 4)
1927 {
1928 if(!module)
1929 {
1930 if(precompDefines)
1931 {
1932 module = __extension__ ({
1933 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1934
1935 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1936 });
1937 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
1938 }
1939 module = __extension__ ({
1940 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
1941
1942 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
1943 });
1944 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
1945 }
1946 module->dllOnly = loadDllOnly;
1947 if(ext[0] || !__ecereNameSpace__ecere__sys__FileExists(symFile))
1948 {
1949 unsigned int skipLoad = 0;
1950 struct __ecereNameSpace__ecere__com__Instance * list = (((void *)0));
1951
1952 if(!inCompiler && !inPreCompiler && !inSymbolGen && !inDocumentor)
1953 {
1954 struct __ecereNameSpace__ecere__com__MapIterator it = (it.container = (void *)0, it.pointer = (void *)0, __ecereProp___ecereNameSpace__ecere__com__MapIterator_Set_map(&it, loadedModules), it);
1955
1956 if(!__ecereMethod___ecereNameSpace__ecere__com__Iterator_Index((void *)(&it), (uint64)(uintptr_t)(name), 0))
1957 {
1958 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);
1959
1960 if(firstModule)
1961 {
1962 list = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__com__List_TPL_ecere__com__Module_);
1963 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1964 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
1965
1966 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
1967 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(uintptr_t)(firstModule));
1968 __extension__ ({
1969 struct __ecereNameSpace__ecere__com__Iterator __internalIterator =
1970 {
1971 loadedModules, 0
1972 };
1973
1974 __ecereMethod___ecereNameSpace__ecere__com__Iterator_Index(&__internalIterator, ((uint64)(uintptr_t)(name)), 1);
1975 __ecereProp___ecereNameSpace__ecere__com__Iterator_Set_data(&__internalIterator, (uint64)(uintptr_t)(list));
1976 });
1977 }
1978 else
1979 skipLoad = 1;
1980 }
1981 else
1982 list = ((struct __ecereNameSpace__ecere__com__Instance *)(uintptr_t)__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data((void *)(&it)));
1983 }
1984 if(!skipLoad)
1985 {
1986 loadedModule = __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, name, importAccess);
1987 if(loadedModule)
1988 {
1989 ((struct __ecereNameSpace__ecere__com__Module *)(((char *)loadedModule + sizeof(struct __ecereNameSpace__ecere__com__Instance))))->importType = importType;
1990 module->dllOnly = 0;
1991 if(list)
1992 ((struct __ecereNameSpace__ecere__com__IteratorPointer * (*)(struct __ecereNameSpace__ecere__com__Instance *, uint64 value))__extension__ ({
1993 struct __ecereNameSpace__ecere__com__Instance * __internal_ClassInst = list;
1994
1995 __internal_ClassInst ? __internal_ClassInst->_vTbl : __ecereClass___ecereNameSpace__ecere__com__List->_vTbl;
1996 })[__ecereVMethodID___ecereNameSpace__ecere__com__Container_Add])(list, (uint64)(uintptr_t)(loadedModule));
1997 }
1998 }
1999 }
2000 }
2001 }
2002 if(!loadedModule && (!strcmp(ext, "ec") || !strcmp(ext, "sym") || !ext[0]))
2003 {
2004 {
2005 if(!module)
2006 {
2007 if(precompDefines)
2008 {
2009 module = __extension__ ({
2010 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2011
2012 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2013 });
2014 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add((&*precompDefines), module);
2015 }
2016 module = __extension__ ({
2017 struct ImportedModule * __ecereInstance1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule);
2018
2019 __ecereInstance1->name = __ecereNameSpace__ecere__sys__CopyString(moduleName), __ecereInstance1->type = 0, __ecereInstance1->importType = importType, __ecereInstance1->importAccess = importAccess, __ecereInstance1;
2020 });
2021 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName((&*defines), module);
2022 }
2023 module->dllOnly = loadDllOnly;
2024 if(inPreCompiler)
2025 return ;
2026 if(inIDE && !__ecereNameSpace__ecere__sys__FileExists(symFile) && sourceDirs)
2027 {
2028 {
2029 struct __ecereNameSpace__ecere__com__Iterator dir =
2030 {
2031 (sourceDirs), 0
2032 };
2033
2034 while(__ecereMethod___ecereNameSpace__ecere__com__Iterator_Next(&dir))
2035 {
2036 char configDir[274];
2037
2038 strcpy(symFile, ((char * )((uintptr_t)(__ecereProp___ecereNameSpace__ecere__com__Iterator_Get_data(&dir)))));
2039 __ecereNameSpace__ecere__sys__PathCat(symFile, "obj");
2040 sprintf(configDir, "debug.%s", (__runtimePlatform == 1) ? "win32" : (__runtimePlatform == 3) ? "apple" : "linux");
2041 __ecereNameSpace__ecere__sys__PathCat(symFile, configDir);
2042 __ecereNameSpace__ecere__sys__PathCat(symFile, name);
2043 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
2044 if(__ecereNameSpace__ecere__sys__FileExists(symFile))
2045 break;
2046 }
2047 }
2048 }
2049 if(!__ecereNameSpace__ecere__sys__FileExists(symFile))
2050 {
2051 char fileName[274];
2052
2053 __ecereNameSpace__ecere__sys__GetLastDirectory(symFile, fileName);
2054 strcpy(symFile, symbolsDir ? symbolsDir : "");
2055 __ecereNameSpace__ecere__sys__PathCat(symFile, fileName);
2056 }
2057 module->globalInstance = LoadSymbols(symFile, importType, loadDllOnly);
2058 }
2059 }
2060 }
2061 }
2062
2063 void __ecereRegisterModule_loadSymbols(struct __ecereNameSpace__ecere__com__Instance * module)
2064 {
2065 struct __ecereNameSpace__ecere__com__Class __attribute__((unused)) * class;
2066
2067 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetGlobalData", "void SetGlobalData(ecere::com::NameSpace * nameSpace)", SetGlobalData, module, 1);
2068 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInIDE", "void SetInIDE(bool b)", SetInIDE, module, 1);
2069 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSourceDirs", "void SetSourceDirs(ecere::com::List<String> list)", SetSourceDirs, module, 1);
2070 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetIncludeDirs", "void SetIncludeDirs(ecere::sys::OldList * list)", SetIncludeDirs, module, 1);
2071 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetSysIncludeDirs", "void SetSysIncludeDirs(ecere::sys::OldList * list)", SetSysIncludeDirs, module, 1);
2072 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetEcereImported", "void SetEcereImported(bool b)", SetEcereImported, module, 1);
2073 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetEcereImported", "bool GetEcereImported(void)", GetEcereImported, module, 1);
2074 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInPreCompiler", "void SetInPreCompiler(bool b)", SetInPreCompiler, module, 1);
2075 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInSymbolGen", "void SetInSymbolGen(bool b)", SetInSymbolGen, module, 1);
2076 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetInDocumentor", "void SetInDocumentor(bool b)", SetInDocumentor, module, 1);
2077 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("SetPrecompDefines", "void SetPrecompDefines(ecere::sys::OldList * list)", SetPrecompDefines, module, 1);
2078 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("DummyMethod", "bool DummyMethod(void)", DummyMethod, module, 1);
2079 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("LoadSymbols", "bool LoadSymbols(const char * fileName, ecere::com::ImportType importType, bool loadDllOnly)", LoadSymbols, module, 1);
2080 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("ImportModule", "void ImportModule(const char * name, ecere::com::ImportType importType, ecere::com::AccessMode importAccess, bool loadDllOnly)", ImportModule, module, 1);
2081 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FindIncludeFileID", "int FindIncludeFileID(char * includeFile)", FindIncludeFileID, module, 2);
2082 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileID", "int GetIncludeFileID(char * includeFile)", GetIncludeFileID, module, 2);
2083 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("GetIncludeFileFromID", "char * GetIncludeFileFromID(int id)", GetIncludeFileFromID, module, 2);
2084 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("OpenIncludeFile", "ecere::sys::File OpenIncludeFile(char * includeFile)", OpenIncludeFile, module, 2);
2085 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeIncludeFiles", "void FreeIncludeFiles(void)", FreeIncludeFiles, module, 1);
2086 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("FreeGlobalData", "void FreeGlobalData(ecere::com::NameSpace globalDataList)", FreeGlobalData, module, 1);
2087 __ecereNameSpace__ecere__com__eSystem_RegisterFunction("CheckDataRedefinitions", "void CheckDataRedefinitions(void)", CheckDataRedefinitions, module, 1);
2088 }
2089