The Ecere SDK - sdk/blob - compiler/bootstrap/ecc/bootstrap/ecc.c

   1 #if defined(__GNUC__)
   2 typedef long long int64;
   3 typedef unsigned long long uint64;
   4 #elif defined(__TINYC__)
   5 #include <stdarg.h>
   6 #define __builtin_va_list va_list
   7 #define __builtin_va_start va_start
   8 #define __builtin_va_end va_end
   9 #ifdef _WIN32
  10 #define strcasecmp stricmp
  11 #define strncasecmp strnicmp
  12 #define __declspec(x) __attribute__((x))
  13 #endif
  14 typedef long long int64;
  15 typedef unsigned long long uint64;
  16 #else
  17 typedef __int64 int64;
  18 typedef unsigned __int64 uint64;
  19 #endif
  20 #ifdef __BIG_ENDIAN__
  21 #define __ENDIAN_PAD(x) (8 - (x))
  22 #else
  23 #define __ENDIAN_PAD(x) 0
  24 #endif
  25 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BTNode;
  26
  27 struct __ecereNameSpace__ecere__sys__BTNode;
  28
  29 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__BinaryTree;
  30
  31 struct __ecereNameSpace__ecere__sys__BinaryTree
  32 {
  33 struct __ecereNameSpace__ecere__sys__BTNode * root;
  34 int count;
  35 int (*  CompareKey)(struct __ecereNameSpace__ecere__sys__BinaryTree * tree, unsigned int a, unsigned int b);
  36 void (*  FreeKey)(void *  key);
  37 };
  38
  39 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__OldList;
  40
  41 struct __ecereNameSpace__ecere__sys__OldList
  42 {
  43 void *  first;
  44 void *  last;
  45 int count;
  46 unsigned int offset;
  47 unsigned int circ;
  48 };
  49
  50 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Method;
  51
  52 struct __ecereNameSpace__ecere__com__Method
  53 {
  54 char *  name;
  55 struct __ecereNameSpace__ecere__com__Method * parent;
  56 struct __ecereNameSpace__ecere__com__Method * left;
  57 struct __ecereNameSpace__ecere__com__Method * right;
  58 int depth;
  59 int (*  function)();
  60 int vid;
  61 int type;
  62 struct __ecereNameSpace__ecere__com__Class * _class;
  63 void *  symbol;
  64 char *  dataTypeString;
  65 struct Type * dataType;
  66 int memberAccess;
  67 };
  68
  69 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Property;
  70
  71 struct __ecereNameSpace__ecere__com__Property
  72 {
  73 struct __ecereNameSpace__ecere__com__Property * prev;
  74 struct __ecereNameSpace__ecere__com__Property * next;
  75 char *  name;
  76 unsigned int isProperty;
  77 int memberAccess;
  78 int id;
  79 struct __ecereNameSpace__ecere__com__Class * _class;
  80 char *  dataTypeString;
  81 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
  82 struct Type * dataType;
  83 void (*  Set)();
  84 int (*  Get)();
  85 unsigned int (*  IsSet)();
  86 void *  data;
  87 void *  symbol;
  88 int vid;
  89 unsigned int conversion;
  90 unsigned int watcherOffset;
  91 char *  category;
  92 unsigned int compiled;
  93 unsigned int selfWatchable;
  94 unsigned int isWatchable;
  95 };
  96
  97 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_CodePosition;
  98
  99 struct CodePosition
 100 {
 101 int line;
 102 int charPos;
 103 int pos;
 104 unsigned int included;
 105 };
 106
 107 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Location;
 108
 109 struct Location
 110 {
 111 struct CodePosition start;
 112 struct CodePosition end;
 113 };
 114
 115 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Attrib;
 116
 117 struct Attrib;
 118
 119 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ExtDecl;
 120
 121 struct ExtDecl;
 122
 123 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassDefinition;
 124
 125 struct ClassDefinition;
 126
 127 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Context;
 128
 129 struct Context
 130 {
 131 struct Context * parent;
 132 struct __ecereNameSpace__ecere__sys__BinaryTree types;
 133 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 134 struct __ecereNameSpace__ecere__sys__BinaryTree symbols;
 135 struct __ecereNameSpace__ecere__sys__BinaryTree structSymbols;
 136 int nextID;
 137 int simpleID;
 138 struct __ecereNameSpace__ecere__sys__BinaryTree templateTypes;
 139 struct ClassDefinition * classDef;
 140 unsigned int templateTypesOnly;
 141 unsigned int hasNameSpace;
 142 };
 143
 144 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Instantiation;
 145
 146 struct Instantiation;
 147
 148 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declaration;
 149
 150 struct Declaration;
 151
 152 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Statement;
 153
 154 struct Statement;
 155
 156 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TypeName;
 157
 158 struct TypeName;
 159
 160 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Initializer;
 161
 162 struct Initializer;
 163
 164 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataValue;
 165
 166 struct __ecereNameSpace__ecere__com__DataValue
 167 {
 168 union
 169 {
 170 char c;
 171 unsigned char uc;
 172 short s;
 173 unsigned short us;
 174 int i;
 175 unsigned int ui;
 176 void *  p;
 177 float f;
 178 double d;
 179 long long i64;
 180 uint64 ui64;
 181 };
 182 };
 183
 184 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Expression;
 185
 186 struct Expression;
 187
 188 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateDatatype;
 189
 190 struct TemplateDatatype;
 191
 192 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateArgument;
 193
 194 struct TemplateArgument;
 195
 196 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_TemplateParameter;
 197
 198 struct TemplateParameter;
 199
 200 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Specifier;
 201
 202 struct Specifier;
 203
 204 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Identifier;
 205
 206 struct Identifier;
 207
 208 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Declarator;
 209
 210 struct Declarator;
 211
 212 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionDefinition;
 213
 214 struct FunctionDefinition;
 215
 216 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_DBTableDef;
 217
 218 struct DBTableDef;
 219
 220 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_External;
 221
 222 struct External;
 223
 224 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ModuleImport;
 225
 226 struct ModuleImport
 227 {
 228 struct ModuleImport * prev;
 229 struct ModuleImport * next;
 230 char *  name;
 231 struct __ecereNameSpace__ecere__sys__OldList classes;
 232 struct __ecereNameSpace__ecere__sys__OldList functions;
 233 int importType;
 234 int importAccess;
 235 };
 236
 237 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ClassImport;
 238
 239 struct ClassImport
 240 {
 241 struct ClassImport * prev;
 242 struct ClassImport * next;
 243 char *  name;
 244 struct __ecereNameSpace__ecere__sys__OldList methods;
 245 struct __ecereNameSpace__ecere__sys__OldList properties;
 246 unsigned int itself;
 247 unsigned int isRemote;
 248 };
 249
 250 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Symbol;
 251
 252 struct Symbol
 253 {
 254 char *  string;
 255 struct Symbol * parent;
 256 struct Symbol * left;
 257 struct Symbol * right;
 258 int depth;
 259 struct Type * type;
 260 union
 261 {
 262 struct __ecereNameSpace__ecere__com__Method * method;
 263 struct __ecereNameSpace__ecere__com__Property * _property;
 264 struct __ecereNameSpace__ecere__com__Class * registered;
 265 };
 266 int id;
 267 int idCode;
 268 union
 269 {
 270 struct
 271 {
 272 struct External * pointerExternal;
 273 struct External * structExternal;
 274 };
 275 struct
 276 {
 277 struct External * externalGet;
 278 struct External * externalSet;
 279 struct External * externalPtr;
 280 struct External * externalIsSet;
 281 };
 282 struct
 283 {
 284 struct External * methodExternal;
 285 struct External * methodCodeExternal;
 286 };
 287 };
 288 unsigned int imported;
 289 unsigned int declaredStructSym;
 290 struct __ecereNameSpace__ecere__com__Class * _class;
 291 unsigned int declaredStruct;
 292 unsigned int needConstructor;
 293 unsigned int needDestructor;
 294 char *  constructorName;
 295 char *  structName;
 296 char *  className;
 297 char *  destructorName;
 298 struct ModuleImport * module;
 299 struct ClassImport * _import;
 300 struct Location nameLoc;
 301 unsigned int isParam;
 302 unsigned int isRemote;
 303 unsigned int isStruct;
 304 unsigned int fireWatchersDone;
 305 int declaring;
 306 unsigned int classData;
 307 unsigned int isStatic;
 308 char *  shortName;
 309 struct __ecereNameSpace__ecere__sys__OldList *  templateParams;
 310 struct __ecereNameSpace__ecere__sys__OldList templatedClasses;
 311 struct Context * ctx;
 312 int isIterator;
 313 struct Expression * propCategory;
 314 };
 315
 316 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Type;
 317
 318 struct Type;
 319
 320 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Class;
 321
 322 struct __ecereNameSpace__ecere__com__Class
 323 {
 324 struct __ecereNameSpace__ecere__com__Class * prev;
 325 struct __ecereNameSpace__ecere__com__Class * next;
 326 char *  name;
 327 int offset;
 328 int structSize;
 329 int (* *  _vTbl)();
 330 int vTblSize;
 331 int (*  Constructor)(struct __ecereNameSpace__ecere__com__Instance *);
 332 void (*  Destructor)(struct __ecereNameSpace__ecere__com__Instance *);
 333 int offsetClass;
 334 int sizeClass;
 335 struct __ecereNameSpace__ecere__com__Class * base;
 336 struct __ecereNameSpace__ecere__sys__BinaryTree methods;
 337 struct __ecereNameSpace__ecere__sys__BinaryTree members;
 338 struct __ecereNameSpace__ecere__sys__BinaryTree prop;
 339 struct __ecereNameSpace__ecere__sys__OldList membersAndProperties;
 340 struct __ecereNameSpace__ecere__sys__BinaryTree classProperties;
 341 struct __ecereNameSpace__ecere__sys__OldList derivatives;
 342 int memberID;
 343 int startMemberID;
 344 int type;
 345 struct __ecereNameSpace__ecere__com__Instance * module;
 346 struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace;
 347 char *  dataTypeString;
 348 struct Type * dataType;
 349 int typeSize;
 350 int defaultAlignment;
 351 void (*  Initialize)();
 352 int memberOffset;
 353 struct __ecereNameSpace__ecere__sys__OldList selfWatchers;
 354 char *  designerClass;
 355 unsigned int noExpansion;
 356 char *  defaultProperty;
 357 unsigned int comRedefinition;
 358 int count;
 359 unsigned int isRemote;
 360 unsigned int internalDecl;
 361 void *  data;
 362 unsigned int computeSize;
 363 int structAlignment;
 364 int destructionWatchOffset;
 365 unsigned int fixed;
 366 struct __ecereNameSpace__ecere__sys__OldList delayedCPValues;
 367 int inheritanceAccess;
 368 char *  fullName;
 369 void *  symbol;
 370 struct __ecereNameSpace__ecere__sys__OldList conversions;
 371 struct __ecereNameSpace__ecere__sys__OldList templateParams;
 372 struct __ecereNameSpace__ecere__com__ClassTemplateArgument *  templateArgs;
 373 struct __ecereNameSpace__ecere__com__Class * templateClass;
 374 struct __ecereNameSpace__ecere__sys__OldList templatized;
 375 int numParams;
 376 };
 377
 378 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Instance;
 379
 380 struct __ecereNameSpace__ecere__com__Instance
 381 {
 382 int (* *  _vTbl)();
 383 struct __ecereNameSpace__ecere__com__Class * _class;
 384 int _refCount;
 385 };
 386
 387 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__DataMember;
 388
 389 struct __ecereNameSpace__ecere__com__DataMember
 390 {
 391 struct __ecereNameSpace__ecere__com__DataMember * prev;
 392 struct __ecereNameSpace__ecere__com__DataMember * next;
 393 char *  name;
 394 unsigned int isProperty;
 395 int memberAccess;
 396 int id;
 397 struct __ecereNameSpace__ecere__com__Class * _class;
 398 char *  dataTypeString;
 399 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 400 struct Type * dataType;
 401 int type;
 402 int offset;
 403 int memberID;
 404 struct __ecereNameSpace__ecere__sys__OldList members;
 405 struct __ecereNameSpace__ecere__sys__BinaryTree membersAlpha;
 406 int memberOffset;
 407 int structAlignment;
 408 };
 409
 410 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__SerialBuffer;
 411
 412 struct __ecereNameSpace__ecere__com__SerialBuffer
 413 {
 414 unsigned char *  _buffer;
 415 unsigned int count;
 416 unsigned int _size;
 417 unsigned int pos;
 418 };
 419
 420 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__ClassTemplateArgument;
 421
 422 struct __ecereNameSpace__ecere__com__ClassTemplateArgument
 423 {
 424 union
 425 {
 426 struct
 427 {
 428 char *  dataTypeString;
 429 struct __ecereNameSpace__ecere__com__Class * dataTypeClass;
 430 };
 431 struct __ecereNameSpace__ecere__com__DataValue expression;
 432 struct
 433 {
 434 char *  memberString;
 435 union
 436 {
 437 struct __ecereNameSpace__ecere__com__DataMember * member;
 438 struct __ecereNameSpace__ecere__com__Property * prop;
 439 struct __ecereNameSpace__ecere__com__Method * method;
 440 };
 441 };
 442 };
 443 };
 444
 445 typedef __builtin_va_list __gnuc_va_list;
 446
 447 typedef __gnuc_va_list va_list;
 448
 449 static struct Context * globalContext;
 450
 451 static struct __ecereNameSpace__ecere__com__Instance * privateModule;
 452
 453 static struct ModuleImport * mainModule;
 454
 455 struct __ecereNameSpace__ecere__sys__OldList _excludedSymbols =
 456 {
 457 0, 0, 0, (unsigned int)&((struct Symbol *)(void *)0)->left, 0
 458 };
 459
 460 static struct __ecereNameSpace__ecere__sys__OldList defines, imports;
 461
 462 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__NameSpace;
 463
 464 struct __ecereNameSpace__ecere__com__NameSpace
 465 {
 466 char *  name;
 467 struct __ecereNameSpace__ecere__com__NameSpace *  btParent;
 468 struct __ecereNameSpace__ecere__com__NameSpace *  left;
 469 struct __ecereNameSpace__ecere__com__NameSpace *  right;
 470 int depth;
 471 struct __ecereNameSpace__ecere__com__NameSpace *  parent;
 472 struct __ecereNameSpace__ecere__sys__BinaryTree nameSpaces;
 473 struct __ecereNameSpace__ecere__sys__BinaryTree classes;
 474 struct __ecereNameSpace__ecere__sys__BinaryTree defines;
 475 struct __ecereNameSpace__ecere__sys__BinaryTree functions;
 476 };
 477
 478 static struct __ecereNameSpace__ecere__com__NameSpace globalData;
 479
 480 static struct __ecereNameSpace__ecere__sys__OldList _precompDefines;
 481
 482 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__FileOpen(char *  fileName, int mode);
 483
 484 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_MethodImport;
 485
 486 struct MethodImport
 487 {
 488 struct MethodImport * prev;
 489 struct MethodImport * next;
 490 char *  name;
 491 unsigned int isVirtual;
 492 };
 493
 494 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_PropertyImport;
 495
 496 struct PropertyImport
 497 {
 498 struct PropertyImport * prev;
 499 struct PropertyImport * next;
 500 char *  name;
 501 unsigned int isVirtual;
 502 unsigned int hasSet;
 503 unsigned int hasGet;
 504 };
 505
 506 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_FunctionImport;
 507
 508 struct FunctionImport
 509 {
 510 struct FunctionImport * prev;
 511 struct FunctionImport * next;
 512 char *  name;
 513 };
 514
 515 int __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(struct __ecereNameSpace__ecere__com__Instance * this, char *  format, ...);
 516
 517 extern void __ecereNameSpace__ecere__com__eInstance_DecRef(struct __ecereNameSpace__ecere__com__Instance * instance);
 518
 519 static void OutputImports(char * fileName)
 520 {
 521 struct __ecereNameSpace__ecere__com__Instance * f = __ecereNameSpace__ecere__sys__FileOpen(fileName, 2);
 522
 523 if(f)
 524 {
 525 if(imports.first)
 526 {
 527 struct ModuleImport * module;
 528
 529 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "[Imported Modules]\n");
 530 for(module = imports.first; module; module = module->next)
 531 {
 532 struct ClassImport * _class;
 533 struct FunctionImport * function;
 534
 535 if(module->name)
 536 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   %s\n", module->name);
 537 else
 538 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   [This]\n");
 539 if(module->importType == 1)
 540 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Static]\n");
 541 else if(module->importType == 2)
 542 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Remote]\n");
 543 if(module->importAccess == 2)
 544 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Private]\n");
 545 else
 546 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Public]\n");
 547 if(module->classes.first)
 548 {
 549 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Imported Classes]\n");
 550 for(_class = module->classes.first; _class; _class = _class->next)
 551 {
 552 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         %s\n", _class->name);
 553 if(_class->itself)
 554 {
 555 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Instantiated]\n");
 556 }
 557 if(_class->isRemote)
 558 {
 559 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Remote]\n");
 560 }
 561 if(_class->methods.first)
 562 {
 563 struct MethodImport * method;
 564
 565 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Imported Methods]\n");
 566 for(method = _class->methods.first; method; method = method->next)
 567 {
 568 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               %s\n", method->name);
 569 if(method->isVirtual)
 570 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Virtual]\n");
 571 }
 572 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               .\n");
 573 }
 574 if(_class->properties.first)
 575 {
 576 struct PropertyImport * prop;
 577
 578 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "            [Imported Properties]\n");
 579 for(prop = _class->properties.first; prop; prop = prop->next)
 580 {
 581 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               %s\n", prop->name);
 582 if(prop->isVirtual)
 583 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Virtual]\n");
 584 if(prop->hasSet)
 585 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Set]\n");
 586 if(prop->hasGet)
 587 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "                  [Get]\n");
 588 }
 589 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "               .\n");
 590 }
 591 }
 592 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "        .\n");
 593 }
 594 if(module->functions.first)
 595 {
 596 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "      [Imported Functions]\n");
 597 for(function = module->functions.first; function; function = function->next)
 598 {
 599 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "         %s\n", function->name);
 600 }
 601 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "        .\n");
 602 }
 603 }
 604 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(f, "   .\n");
 605 }
 606 }
 607 (__ecereNameSpace__ecere__com__eInstance_DecRef(f), f = 0);
 608 }
 609
 610 static struct __ecereNameSpace__ecere__com__Class * __ecereClass_CompilerApp;
 611
 612 extern int __ecereNameSpace__ecere__com__GetRuntimePlatform(void);
 613
 614 extern void SetSymbolsDir(char *  s);
 615
 616 extern int strcmp(const char * , const char * );
 617
 618 extern int strlen(const char * );
 619
 620 extern char *  strcpy(char * , const char * );
 621
 622 extern void SetBuildingEcereCom(unsigned int b);
 623
 624 extern void SetBuildingEcereComModule(unsigned int b);
 625
 626 extern char *  __ecereNameSpace__ecere__sys__CopyString(char *  string);
 627
 628 extern char *  GetOutputFile(void);
 629
 630 extern void SetOutputFile(char *  s);
 631
 632 extern char *  GetSourceFile(void);
 633
 634 extern void SetSourceFile(char *  s);
 635
 636 extern void SetMemoryGuard(unsigned int b);
 637
 638 extern void SetDefaultNameSpace(char *  s);
 639
 640 extern void SetStrictNameSpaces(unsigned int b);
 641
 642 extern void SetOutputLineNumbers(unsigned int value);
 643
 644 extern char *  __ecereNameSpace__ecere__sys__PathCat(char *  string, char *  addedPath);
 645
 646 extern char *  __ecereNameSpace__ecere__sys__ChangeExtension(char *  string, char *  ext, char *  output);
 647
 648 extern int printf(char * , ...);
 649
 650 extern char *  __ecereNameSpace__ecere__GetTranslatedString(struct __ecereNameSpace__ecere__com__Instance * module, char *  string, char *  stringAndContext);
 651
 652 extern struct __ecereNameSpace__ecere__com__Instance * __thisModule;
 653
 654 extern void SetGlobalData(struct __ecereNameSpace__ecere__com__NameSpace *  nameSpace);
 655
 656 extern void SetExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList *  list);
 657
 658 extern void SetGlobalContext(struct Context * context);
 659
 660 extern void SetCurrentContext(struct Context * context);
 661
 662 extern void SetTopContext(struct Context * context);
 663
 664 extern void SetDefines(struct __ecereNameSpace__ecere__sys__OldList *  list);
 665
 666 extern void SetImports(struct __ecereNameSpace__ecere__sys__OldList *  list);
 667
 668 extern void SetInCompiler(unsigned int b);
 669
 670 extern void SetTargetPlatform(int platform);
 671
 672 extern void SetEchoOn(unsigned int b);
 673
 674 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com____ecere_COM_Initialize(unsigned int guiApp, int argc, char *  argv[]);
 675
 676 extern void SetPrivateModule(struct __ecereNameSpace__ecere__com__Instance * module);
 677
 678 extern struct Type * ProcessTypeString(char *  string, unsigned int staticMethod);
 679
 680 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_GlobalData;
 681
 682 struct GlobalData
 683 {
 684 unsigned int key;
 685 struct __ecereNameSpace__ecere__sys__BTNode * parent;
 686 struct __ecereNameSpace__ecere__sys__BTNode * left;
 687 struct __ecereNameSpace__ecere__sys__BTNode * right;
 688 int depth;
 689 struct __ecereNameSpace__ecere__com__Instance * module;
 690 char *  dataTypeString;
 691 struct Type * dataType;
 692 void *  symbol;
 693 char *  fullName;
 694 char __ecere_padding[20];
 695 };
 696
 697 extern int sprintf(char * , char * , ...);
 698
 699 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__sys__DualPipeOpen(unsigned int mode, char *  commandLine);
 700
 701 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__sys__TempFile;
 702
 703 struct __ecereNameSpace__ecere__sys__TempFile
 704 {
 705 char __ecere_padding[24];
 706 };
 707
 708 extern void SetFileInput(struct __ecereNameSpace__ecere__com__Instance * file);
 709
 710 extern void SetMainModule(struct ModuleImport * moduleImport);
 711
 712 extern char *  __ecereNameSpace__ecere__sys__GetLastDirectory(char *  string, char *  output);
 713
 714 extern unsigned int __ecereNameSpace__ecere__sys__StripExtension(char *  string);
 715
 716 extern void resetScanner(void);
 717
 718 extern char *  GetSymbolsDir(void);
 719
 720 extern unsigned int LoadSymbols(char *  fileName, int importType, unsigned int loadDllOnly);
 721
 722 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_ImportedModule;
 723
 724 struct ImportedModule
 725 {
 726 struct ImportedModule * prev;
 727 struct ImportedModule * next;
 728 char *  name;
 729 int type;
 730 int importType;
 731 unsigned int globalInstance;
 732 unsigned int dllOnly;
 733 int importAccess;
 734 };
 735
 736 extern int strcasecmp(const char * , const char * );
 737
 738 extern unsigned int GetEcereImported(void);
 739
 740 extern unsigned int GetBuildingEcereCom(void);
 741
 742 extern struct __ecereNameSpace__ecere__com__Instance * __ecereNameSpace__ecere__com__eModule_LoadStrict(struct __ecereNameSpace__ecere__com__Instance * fromModule, char *  name, int importAccess);
 743
 744 extern void ParseEc(void);
 745
 746 extern void CheckDataRedefinitions(void);
 747
 748 extern void SetYydebug(unsigned int b);
 749
 750 extern void SetCurrentNameSpace(char *  s);
 751
 752 extern void SetDeclMode(int accessMode);
 753
 754 extern struct __ecereNameSpace__ecere__sys__OldList *  GetAST(void);
 755
 756 extern void ProcessDBTableDefinitions(void);
 757
 758 extern void PrePreProcessClassDefinitions(void);
 759
 760 extern void ComputeModuleClasses(struct __ecereNameSpace__ecere__com__Instance * module);
 761
 762 extern void PreProcessClassDefinitions(void);
 763
 764 extern void ProcessClassDefinitions(void);
 765
 766 extern void ComputeDataTypes(void);
 767
 768 extern void ProcessInstantiations(void);
 769
 770 extern void ProcessMemberAccess(void);
 771
 772 extern void ProcessInstanceDeclarations(void);
 773
 774 extern void OutputTree(struct __ecereNameSpace__ecere__sys__OldList * ast, struct __ecereNameSpace__ecere__com__Instance * f);
 775
 776 extern void FreeASTTree(struct __ecereNameSpace__ecere__sys__OldList * ast);
 777
 778 extern void FreeContext(struct Context * context);
 779
 780 extern void FreeExcludedSymbols(struct __ecereNameSpace__ecere__sys__OldList * excludedSymbols);
 781
 782 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass_Definition;
 783
 784 struct Definition;
 785
 786 extern void FreeModuleDefine(struct Definition * def);
 787
 788 extern void FreeModuleImport(struct ModuleImport * imp);
 789
 790 extern void FreeTypeData(struct __ecereNameSpace__ecere__com__Instance * privateModule);
 791
 792 extern void FreeIncludeFiles(void);
 793
 794 extern void FreeGlobalData(struct __ecereNameSpace__ecere__com__NameSpace * globalDataList);
 795
 796 extern void OutputIntlStrings(void);
 797
 798 extern void *  __ecereNameSpace__ecere__com__eInstance_New(struct __ecereNameSpace__ecere__com__Class * _class);
 799
 800 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Application;
 801
 802 struct __ecereNameSpace__ecere__com__Application
 803 {
 804 int argc;
 805 char * *  argv;
 806 int exitCode;
 807 unsigned int isGUIApp;
 808 struct __ecereNameSpace__ecere__sys__OldList allModules;
 809 char *  parsedCommand;
 810 struct __ecereNameSpace__ecere__com__NameSpace systemNameSpace;
 811 };
 812
 813 char *  __ecereProp___ecereNameSpace__ecere__com__Platform_Get_char__PTR_(int this);
 814
 815 int __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(char *  value);
 816
 817 extern struct __ecereNameSpace__ecere__com__Property ** __ecereProp___ecereNameSpace__ecere__com__Platform_char__PTR_;
 818
 819 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(struct __ecereNameSpace__ecere__sys__BinaryTree * this, struct __ecereNameSpace__ecere__sys__BTNode * node);
 820
 821 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 822
 823 unsigned int __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 824
 825 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof;
 826
 827 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Read;
 828
 829 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Write;
 830
 831 int __ecereMethod___ecereNameSpace__ecere__sys__DualPipe_GetExitCode();
 832
 833 int __ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek;
 834
 835 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Delete(struct __ecereNameSpace__ecere__sys__OldList * this, void *  item);
 836
 837 void __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(struct __ecereNameSpace__ecere__sys__OldList * this, void (*  freeFn)(void * ));
 838
 839 void __ecereMethod_CompilerApp_Main(struct __ecereNameSpace__ecere__com__Instance * this)
 840 {
 841 void * __ecereTemp1;
 842 char * cppCommand = (((void *)0));
 843 char * cppOptions = (((void *)0));
 844 int cppOptionsLen = 0;
 845 int c;
 846 unsigned int valid = 0x1;
 847 char defaultOutputFile[797];
 848 int targetPlatform = __ecereNameSpace__ecere__com__GetRuntimePlatform();
 849
 850 SetSymbolsDir("");
 851 for(c = 1; c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc; c++)
 852 {
 853 char * arg = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c];
 854
 855 if(arg[0] == '-')
 856 {
 857 if(!strcmp(arg + 1, "m32"))
 858 {
 859 int argLen = strlen(arg);
 860 int newLen = cppOptionsLen + 1 + argLen;
 861
 862 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 863 cppOptions[cppOptionsLen] = ' ';
 864 strcpy(cppOptions + cppOptionsLen + 1, arg);
 865 cppOptionsLen = newLen;
 866 }
 867 else if(arg[1] == 'D')
 868 {
 869 int argLen = strlen(arg);
 870 int newLen = cppOptionsLen + 1 + argLen;
 871
 872 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 873 cppOptions[cppOptionsLen] = ' ';
 874 strcpy(cppOptions + cppOptionsLen + 1, arg);
 875 cppOptionsLen = newLen;
 876 if(!strcmp(arg, "-DBUILDING_ECERE_COM"))
 877 SetBuildingEcereCom(0x1);
 878 else if(!strcmp(arg, "-DECERE_COM_MODULE"))
 879 SetBuildingEcereComModule(0x1);
 880 }
 881 else if(arg[1] == 'I')
 882 {
 883 int argLen = strlen(arg);
 884 int newLen = cppOptionsLen + argLen + 3;
 885
 886 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 887 cppOptions[cppOptionsLen] = ' ';
 888 cppOptions[cppOptionsLen + 1] = '-';
 889 cppOptions[cppOptionsLen + 2] = 'I';
 890 cppOptions[cppOptionsLen + 3] = '"';
 891 strcpy(cppOptions + cppOptionsLen + 4, arg + 2);
 892 cppOptions[newLen - 1] = '\"';
 893 cppOptions[newLen] = '\0';
 894 cppOptionsLen = newLen;
 895 }
 896 else if(!strcmp(arg + 1, "t"))
 897 {
 898 if(++c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 899 targetPlatform = __ecereProp___ecereNameSpace__ecere__com__Platform_Set_char__PTR_(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c]);
 900 else
 901 valid = 0x0;
 902 }
 903 else if(!strcmp(arg + 1, "cpp"))
 904 {
 905 if(++c < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 906 cppCommand = __ecereNameSpace__ecere__sys__CopyString(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c]);
 907 else
 908 valid = 0x0;
 909 }
 910 else if(!strcmp(arg + 1, "o"))
 911 {
 912 if(!GetOutputFile() && c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 913 {
 914 SetOutputFile(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 915 c++;
 916 }
 917 else
 918 valid = 0x0;
 919 }
 920 else if(!strcmp(arg + 1, "c"))
 921 {
 922 if(!GetSourceFile() && c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 923 {
 924 SetSourceFile(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 925 c++;
 926 }
 927 else
 928 valid = 0x0;
 929 }
 930 else if(!strcmp(arg + 1, "isystem") || !strcmp(arg + 1, "isysroot"))
 931 {
 932 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 933 {
 934 int argLen = strlen(arg);
 935 int arg1Len = strlen(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 936 int newLen = cppOptionsLen + argLen + arg1Len + 4;
 937
 938 cppOptions = __ecereNameSpace__ecere__com__eSystem_Renew(cppOptions, sizeof(char) * (newLen + 1));
 939 cppOptions[cppOptionsLen] = ' ';
 940 strcpy(cppOptions + cppOptionsLen + 1, arg);
 941 cppOptions[cppOptionsLen + argLen + 1] = ' ';
 942 cppOptions[cppOptionsLen + argLen + 2] = '"';
 943 arg = ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[++c];
 944 strcpy(cppOptions + cppOptionsLen + argLen + 3, arg);
 945 cppOptions[newLen - 1] = '\"';
 946 cppOptions[newLen] = '\0';
 947 cppOptionsLen = newLen;
 948 }
 949 else
 950 valid = 0x0;
 951 }
 952 else if(!strcmp(arg + 1, "symbols"))
 953 {
 954 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 955 {
 956 SetSymbolsDir(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 957 c++;
 958 }
 959 else
 960 valid = 0x0;
 961 }
 962 else if(!strcmp(arg + 1, "memguard"))
 963 {
 964 SetMemoryGuard(0x1);
 965 }
 966 else if(!strcmp(arg + 1, "defaultns"))
 967 {
 968 if(c + 1 < ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argc)
 969 {
 970 SetDefaultNameSpace(((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->argv[c + 1]);
 971 c++;
 972 }
 973 else
 974 valid = 0x0;
 975 }
 976 else if(!strcmp(arg + 1, "strictns"))
 977 {
 978 SetStrictNameSpaces(0x1);
 979 }
 980 else if(!strcmp(arg + 1, "nolinenumbers"))
 981 {
 982 SetOutputLineNumbers(0x0);
 983 }
 984 }
 985 else
 986 valid = 0x0;
 987 }
 988 if(valid)
 989 {
 990 if(!cppCommand)
 991 cppCommand = __ecereNameSpace__ecere__sys__CopyString("gcc");
 992 if(!GetSourceFile())
 993 valid = 0x0;
 994 else if(!GetOutputFile())
 995 {
 996 strcpy(defaultOutputFile, "");
 997 __ecereNameSpace__ecere__sys__PathCat(defaultOutputFile, GetSourceFile());
 998 __ecereNameSpace__ecere__sys__ChangeExtension(defaultOutputFile, "c", defaultOutputFile);
 999 SetOutputFile(defaultOutputFile);
1000 }
1001 }
1002 if(!valid)
1003 printf(__ecereNameSpace__ecere__GetTranslatedString(__thisModule, "Syntax:\n   ecc [-t <target platform>] [-cpp <c preprocessor>] [-o <output>] [-symbols <outputdir>] [-I<includedir>]* [-isystem <sysincludedir>]* [-D<definition>]* -c <input>\n", (((void *)0))));
1004 else
1005 {
1006 struct __ecereNameSpace__ecere__com__Instance * cppOutput;
1007 char command[3075LL];
1008
1009 SetGlobalData(&globalData);
1010 SetExcludedSymbols(&_excludedSymbols);
1011 SetGlobalContext(globalContext);
1012 SetCurrentContext(globalContext);
1013 SetTopContext(globalContext);
1014 SetDefines(&defines);
1015 SetImports(&imports);
1016 SetInCompiler(0x1);
1017 SetTargetPlatform(targetPlatform);
1018 SetEchoOn(0x0);
1019 privateModule = (struct __ecereNameSpace__ecere__com__Instance *)__ecereNameSpace__ecere__com____ecere_COM_Initialize(0x1, 1, (((void *)0)));
1020 SetPrivateModule(privateModule);
1021 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned int", 0x0), ((struct Symbol *)__ecereTemp1)));
1022 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint64"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned int64", 0x0), ((struct Symbol *)__ecereTemp1)));
1023 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint32"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned int", 0x0), ((struct Symbol *)__ecereTemp1)));
1024 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("uint16"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned short", 0x0), ((struct Symbol *)__ecereTemp1)));
1025 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalContext->types, (struct __ecereNameSpace__ecere__sys__BTNode *)(__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Symbol), ((struct Symbol *)__ecereTemp1)->string = __ecereNameSpace__ecere__sys__CopyString("byte"), ((struct Symbol *)__ecereTemp1)->type = ProcessTypeString("unsigned char", 0x0), ((struct Symbol *)__ecereTemp1)));
1026 {
1027 struct GlobalData * data = (data = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_GlobalData), data->fullName = __ecereNameSpace__ecere__sys__CopyString("__thisModule"), data->dataTypeString = __ecereNameSpace__ecere__sys__CopyString("Module"), data->module = privateModule, data);
1028
1029 data->key = (unsigned int)data->fullName;
1030 __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_Add(&globalData.functions, (struct __ecereNameSpace__ecere__sys__BTNode *)data);
1031 }
1032 sprintf(command, "%s%s -x c -E \"%s\"", cppCommand, cppOptions ? cppOptions : "", GetSourceFile());
1033 if((cppOutput = __ecereNameSpace__ecere__sys__DualPipeOpen((((unsigned int)(0x1))), command)))
1034 {
1035 char impFile[797];
1036 struct ImportedModule * module;
1037 char mainModuleName[274];
1038 int exitCode;
1039 struct __ecereNameSpace__ecere__sys__OldList * ast;
1040 struct __ecereNameSpace__ecere__com__Instance * fileInput = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass___ecereNameSpace__ecere__sys__TempFile);
1041
1042 SetFileInput(fileInput);
1043 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Add(&imports, (mainModule = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ModuleImport)));
1044 SetMainModule(mainModule);
1045 __ecereNameSpace__ecere__sys__GetLastDirectory(GetSourceFile(), mainModuleName);
1046 __ecereNameSpace__ecere__sys__StripExtension(mainModuleName);
1047 module = (__ecereTemp1 = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_ImportedModule), ((struct ImportedModule *)__ecereTemp1)->name = __ecereNameSpace__ecere__sys__CopyString(mainModuleName), ((struct ImportedModule *)__ecereTemp1)->type = 0, ((struct ImportedModule *)__ecereTemp1));
1048 __ecereMethod___ecereNameSpace__ecere__sys__OldList_AddName(&defines, module);
1049 resetScanner();
1050 while(!((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *))cppOutput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Eof])(cppOutput))
1051 {
1052 char junk[4096];
1053 int count = ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))cppOutput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Read])(cppOutput, junk, 1, 4096);
1054
1055 ((int (*)(struct __ecereNameSpace__ecere__com__Instance *, void *  buffer, unsigned int size, unsigned int count))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Write])(fileInput, junk, 1, count);
1056 }
1057 exitCode = __ecereMethod___ecereNameSpace__ecere__sys__DualPipe_GetExitCode(cppOutput);
1058 (__ecereNameSpace__ecere__com__eInstance_DecRef(cppOutput), cppOutput = 0);
1059 ((unsigned int (*)(struct __ecereNameSpace__ecere__com__Instance *, int pos, int mode))fileInput->_vTbl[__ecereVMethodID___ecereNameSpace__ecere__sys__File_Seek])(fileInput, 0, 0);
1060 {
1061 char symFile[274];
1062 char symLocation[797];
1063 struct ImportedModule * module, * next;
1064
1065 __ecereNameSpace__ecere__sys__GetLastDirectory(GetSourceFile(), symFile);
1066 __ecereNameSpace__ecere__sys__ChangeExtension(symFile, "sym", symFile);
1067 strcpy(symLocation, GetSymbolsDir());
1068 __ecereNameSpace__ecere__sys__PathCat(symLocation, symFile);
1069 LoadSymbols(symLocation, 3, 0x0);
1070 for(module = defines.first; module; module = next)
1071 {
1072 next = module->next;
1073 if(module->type == 0 && (strcasecmp)(module->name, mainModuleName))
1074 {
1075 (__ecereNameSpace__ecere__com__eSystem_Delete(module->name), module->name = 0);
1076 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Delete(&defines, module);
1077 }
1078 }
1079 if(!GetEcereImported() && !GetBuildingEcereCom())
1080 __ecereNameSpace__ecere__com__eModule_LoadStrict(privateModule, "ecereCOM", 1);
1081 }
1082 ParseEc();
1083 CheckDataRedefinitions();
1084 SetYydebug(0x0);
1085 SetCurrentNameSpace((((void *)0)));
1086 SetDefaultNameSpace((((void *)0)));
1087 SetDeclMode(2);
1088 (__ecereNameSpace__ecere__com__eInstance_DecRef(fileInput), fileInput = 0);
1089 SetFileInput((((void *)0)));
1090 ast = GetAST();
1091 if(!exitCode)
1092 {
1093 ProcessDBTableDefinitions();
1094 PrePreProcessClassDefinitions();
1095 ComputeModuleClasses(privateModule);
1096 PreProcessClassDefinitions();
1097 ComputeModuleClasses(privateModule);
1098 ProcessClassDefinitions();
1099 ComputeDataTypes();
1100 ProcessInstantiations();
1101 ProcessMemberAccess();
1102 ProcessInstanceDeclarations();
1103 strcpy(impFile, GetSymbolsDir());
1104 {
1105 char fileName[274];
1106
1107 __ecereNameSpace__ecere__sys__GetLastDirectory(GetSourceFile(), fileName);
1108 __ecereNameSpace__ecere__sys__PathCat(impFile, fileName);
1109 __ecereNameSpace__ecere__sys__ChangeExtension(impFile, "imp", impFile);
1110 }
1111 if(imports.first)
1112 OutputImports(impFile);
1113 if(!((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->exitCode)
1114 {
1115 struct __ecereNameSpace__ecere__com__Instance * output = __ecereNameSpace__ecere__sys__FileOpen(GetOutputFile(), 2);
1116
1117 if(output)
1118 {
1119 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#if defined(__GNUC__)\n");
1120 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef long long int64;\n");
1121 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef unsigned long long uint64;\n");
1122 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#elif defined(__TINYC__)\n");
1123 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#include <stdarg.h>\n");
1124 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __builtin_va_list va_list\n");
1125 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __builtin_va_start va_start\n");
1126 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __builtin_va_end va_end\n");
1127 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#ifdef _WIN32\n");
1128 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define strcasecmp stricmp\n");
1129 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define strncasecmp strnicmp\n");
1130 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __declspec(x) __attribute__((x))\n");
1131 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#endif\n");
1132 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef long long int64;\n");
1133 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef unsigned long long uint64;\n");
1134 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#else\n");
1135 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef __int64 int64;\n");
1136 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "typedef unsigned __int64 uint64;\n");
1137 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#endif\n");
1138 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#ifdef __BIG_ENDIAN__\n");
1139 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __ENDIAN_PAD(x) (8 - (x))\n");
1140 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#else\n");
1141 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#define __ENDIAN_PAD(x) 0\n");
1142 __ecereMethod___ecereNameSpace__ecere__sys__File_Printf(output, "#endif\n");
1143 if(ast)
1144 OutputTree(ast, output);
1145 (__ecereNameSpace__ecere__com__eInstance_DecRef(output), output = 0);
1146 }
1147 }
1148 }
1149 else
1150 ((struct __ecereNameSpace__ecere__com__Application *)(((char *)this + 300)))->exitCode = exitCode;
1151 if(ast)
1152 {
1153 FreeASTTree(ast);
1154 }
1155 }
1156 FreeContext(globalContext);
1157 FreeExcludedSymbols(&_excludedSymbols);
1158 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&defines, FreeModuleDefine);
1159 __ecereMethod___ecereNameSpace__ecere__sys__OldList_Free(&imports, FreeModuleImport);
1160 FreeTypeData(privateModule);
1161 FreeIncludeFiles();
1162 FreeGlobalData(&globalData);
1163 (__ecereNameSpace__ecere__com__eInstance_DecRef(privateModule), privateModule = 0);
1164 }
1165 (__ecereNameSpace__ecere__com__eSystem_Delete(cppCommand), cppCommand = 0);
1166 (__ecereNameSpace__ecere__com__eSystem_Delete(cppOptions), cppOptions = 0);
1167 SetSymbolsDir((((void *)0)));
1168 OutputIntlStrings();
1169 }
1170
1171 extern struct __ecereNameSpace__ecere__com__Class * __ecereNameSpace__ecere__com__eSystem_RegisterClass(int type, char *  name, char *  baseName, int size, int sizeClass, unsigned int (* )(void * ), void (* )(void * ), struct __ecereNameSpace__ecere__com__Instance * module, int declMode, int inheritanceAccess);
1172
1173 extern struct __ecereNameSpace__ecere__com__Class * __ecereClass___ecereNameSpace__ecere__com__Module;
1174
1175 struct __ecereNameSpace__ecere__com__Module
1176 {
1177 struct __ecereNameSpace__ecere__com__Instance * application;
1178 struct __ecereNameSpace__ecere__sys__OldList classes;
1179 struct __ecereNameSpace__ecere__sys__OldList defines;
1180 struct __ecereNameSpace__ecere__sys__OldList functions;
1181 struct __ecereNameSpace__ecere__sys__OldList modules;
1182 struct __ecereNameSpace__ecere__com__Instance * prev;
1183 struct __ecereNameSpace__ecere__com__Instance * next;
1184 char *  name;
1185 void *  library;
1186 void *  Unload;
1187 int importType;
1188 int origImportType;
1189 struct __ecereNameSpace__ecere__com__NameSpace privateNameSpace;
1190 struct __ecereNameSpace__ecere__com__NameSpace publicNameSpace;
1191 };
1192
1193 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);
1194
1195 void __ecereRegisterModule_ecc(struct __ecereNameSpace__ecere__com__Instance * module)
1196 {
1197 struct __ecereNameSpace__ecere__com__Class * class;
1198
1199 class = __ecereNameSpace__ecere__com__eSystem_RegisterClass(0, "CompilerApp", "ecere::com::Application", 0, 0, 0, 0, module, 2, 1);
1200 if(((struct __ecereNameSpace__ecere__com__Module *)(((char *)module + 12)))->application == ((struct __ecereNameSpace__ecere__com__Module *)(((char *)__thisModule + 12)))->application && class)
1201 __ecereClass_CompilerApp = class;
1202 __ecereNameSpace__ecere__com__eClass_AddMethod(class, "Main", 0, __ecereMethod_CompilerApp_Main, 1);
1203 }
1204
1205 void __ecereUnregisterModule_ecc(struct __ecereNameSpace__ecere__com__Instance * module)
1206 {
1207
1208 }
1209
1210 int __ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString(struct __ecereNameSpace__ecere__sys__BinaryTree * this, char *  a, char *  b);
1211
1212 void __ecereCreateModuleInstances_ecc()
1213 {
1214 globalContext = __ecereNameSpace__ecere__com__eInstance_New(__ecereClass_Context);
1215 (globalData.classes.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.defines.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.functions.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString, globalData.nameSpaces.CompareKey = (void *)__ecereMethod___ecereNameSpace__ecere__sys__BinaryTree_CompareString);
1216 }
1217
1218 void __ecereDestroyModuleInstances_ecc()
1219 {
1220 ((globalContext ? (__ecereClass_Context->Destructor ? __ecereClass_Context->Destructor(globalContext) : 0, __ecereNameSpace__ecere__com__eSystem_Delete(globalContext)) : 0), globalContext = 0);
1221 }
1222