The Ecere SDK - sdk/blob - ide/src/project/Project.ec

   1 #ifdef ECERE_STATIC
   2 public import static "ecere"
   3 #else
   4 public import "ecere"
   5 #endif
   6
   7 import "DynamicString"
   8
   9 #ifndef MAKEFILE_GENERATOR
  10 import "ide"
  11 // We should have the .sln/.vcproj generation even on other platforms
  12 // e.g. detect from an environment variable pointing to a Windows drive
  13 #ifdef __WIN32__
  14 import "vsSupport"
  15 #endif
  16 #endif
  17
  18 import "ProjectConfig"
  19 import "ProjectNode"
  20 import "IDESettings"
  21
  22 default:
  23
  24 static void DummyFunction()
  25 {
  26 int a;
  27 a.OnFree();
  28 }
  29
  30 private:
  31
  32 extern int __ecereVMethodID_class_OnCompare;
  33 extern int __ecereVMethodID_class_OnFree;
  34
  35 IDESettings ideSettings;
  36
  37 IDESettingsContainer settingsContainer
  38 {
  39    driver = "JSON";
  40    dataOwner = &ideSettings;
  41    dataClass = class(IDESettings);
  42
  43    void OnLoad(GlobalSettingsData data)
  44    {
  45       IDESettings settings = (IDESettings)data;
  46 #ifndef MAKEFILE_GENERATOR
  47       globalSettingsDialog.ideSettings = settings;
  48       ide.UpdateRecentMenus();
  49 #endif
  50    }
  51 };
  52
  53 #ifdef MAKEFILE_GENERATOR
  54 CompilerConfig defaultCompiler;
  55 #endif
  56
  57 // LEGACY BINARY EPJ LOADING
  58
  59 SetBool ParseTrueFalseValue(char * string)
  60 {
  61    if(!strcmpi(string, "True")) return true;
  62    return false;
  63 }
  64
  65 void ParseArrayValue(Array<String> array, char * equal)
  66 {
  67    char * start, * comma;
  68    char * string;
  69    string = CopyString(equal);
  70    start = string;
  71    while(start)
  72    {
  73       comma = strstr(start, ",");
  74       if(comma)
  75          comma[0] = '\0';
  76       array.Add(CopyString(start));
  77       if(comma)
  78          comma++;
  79       if(comma)
  80          comma++;
  81       start = comma;
  82    }
  83    delete string;
  84 }
  85
  86 void ProjectNode::LegacyBinaryLoadNode(File f)
  87 {
  88    int len, count, c;
  89    int fileNameLen;
  90
  91    f.Read(&len, sizeof(len), 1);
  92    name = new char[len+1];
  93    fileNameLen = len;
  94    f.Read(name, sizeof(char), len+1);
  95    f.Read(&len, sizeof(len), 1);
  96    fileNameLen += len;
  97    path = new char[len+1];
  98    f.Read(path, sizeof(char), len+1);
  99
 100    /*
 101    fileName = new char[fileNameLen+2];
 102    strcpy(fileName, path);
 103    if(fileName[0]) strcat(fileName, "/");
 104    strcat(fileName, name);
 105    */
 106
 107    f.Read(&type, sizeof(type), 1);
 108    f.Read(&count, sizeof(count), 1);
 109
 110    if(type == file)
 111    {
 112       nodeType = file;
 113       icon = NodeIcons::SelectFileIcon(name);
 114    }
 115    else
 116    {
 117       nodeType = folder;
 118       icon = NodeIcons::SelectNodeIcon(type);
 119    }
 120
 121    if(count && !files) files = { };
 122    for(c = 0; c < count; c++)
 123    {
 124       ProjectNode child { };
 125       files.Add(child);
 126       child.parent = this;
 127       child.indent = indent + 1;
 128       LegacyBinaryLoadNode(child, f);
 129    }
 130 }
 131
 132 /*void LegacyBinarySaveNode(File f)
 133 {
 134    int len;
 135    ProjectNode child;
 136    len = strlen(name);
 137    f.Write(&len, sizeof(len), 1);
 138    f.Write(name, sizeof(char), len+1);
 139
 140    if(type == project)
 141    {
 142       // Projects Absolute Path Are Not Saved
 143       len = 0;
 144       f.Write(&len, sizeof(len), 1);
 145       f.Write(&len, sizeof(char), 1);
 146    }
 147    else
 148    {
 149       len = strlen(path);
 150       f.Write(&len, sizeof(len), 1);
 151       f.Write(path, sizeof(char), len+1);
 152    }
 153    f.Write(&type, sizeof(type), 1);
 154    f.Write(&children.count, sizeof(children.count), 1);
 155    for(child = children.first; child; child.next)
 156       child.SaveNode(f);
 157 }*/
 158
 159 void ProjectNode::LegacyAsciiSaveNode(File f, char * indentation, char * insidePath)
 160 {
 161    int len;
 162    char printPath[MAX_LOCATION];
 163
 164    if(type == project && (files.count /*|| preprocessorDefs.first*/))
 165    {
 166       f.Printf("\n   Files\n");
 167    }
 168    else if(type == file)
 169    {
 170       if(!strcmp(path, insidePath))
 171          f.Printf("%s - %s\n", indentation, name);
 172       else
 173       {
 174          strcpy(printPath, path);
 175          len = strlen(printPath);
 176          if(len)
 177             if(printPath[len-1] != '/')
 178                strcat(printPath, "/");
 179          strcat(printPath, name);
 180          f.Printf("%s = %s\n", indentation, printPath);
 181       }
 182       if(files.count)
 183          f.Printf("\nError\n\n");
 184    }
 185    else if(type == folder)
 186    {
 187       f.Printf("%s + %s\n", indentation, name);
 188    }
 189    else if(type == resources && files.count)
 190    {
 191       PathCatSlash(insidePath, path);
 192       f.Printf("\n%sResources\n", indentation);
 193       if(path && path[0])
 194          f.Printf("%s   Path = %s\n", indentation, path);
 195    }
 196
 197    /*if(buildExclusions.first && type != project)
 198    {
 199       for(item = buildExclusions.first; item; item = item.next)
 200       {
 201          if(item == buildExclusions.first)
 202             f.Printf("%s      Build Exclusions = %s", indentation, item.name);
 203          else
 204             f.Printf(", %s", item.name);
 205       }
 206       f.Printf("\n");
 207    }
 208
 209    if(preprocessorDefs.first && (type == project || ((type == file || type == folder) && !isInResources)))
 210    {
 211       for(item = preprocessorDefs.first; item; item = item.next)
 212       {
 213          if(item == preprocessorDefs.first)
 214             f.Printf("%s%s   Preprocessor Definitions = %s", indentation, type == project ? "" : "   ", item.name);
 215          else
 216             f.Printf(", %s", item.name);
 217       }
 218       f.Printf("\n");
 219    }
 220    */
 221
 222    if(type == project && (files.count /*|| preprocessorDefs.first*/))
 223    {
 224       f.Printf("\n");
 225       for(child : files)
 226          LegacyAsciiSaveNode(child, f, indentation, insidePath);
 227    }
 228    else if(type == folder)
 229    {
 230       strcat(indentation, "   ");
 231       // WHAT WAS THIS: strcpy(printPath, path);
 232       // TOCHECK: why is Unix/PathCat not used here
 233       len = strlen(insidePath);
 234       if(len)
 235          if(insidePath[len-1] != '/')
 236             strcat(insidePath, "/");
 237       strcat(insidePath, name);
 238
 239       for(child : files)
 240          LegacyAsciiSaveNode(child, f, indentation, insidePath);
 241       f.Printf("%s -\n", indentation);
 242       indentation[strlen(indentation) - 3] = '\0';
 243       StripLastDirectory(insidePath, insidePath);
 244    }
 245    else if(type == resources && files.count)
 246    {
 247       f.Printf("\n");
 248       for(child : files)
 249          LegacyAsciiSaveNode(child, f, indentation, insidePath);
 250       StripLastDirectory(insidePath, insidePath);
 251    }
 252 }
 253
 254 /*
 255 void ProjectConfig::LegacyProjectConfigSave(File f)
 256 {
 257    char * indentation = "      ";
 258    //if(isCommonConfig)
 259       //f.Printf("\n * Common\n");
 260    //else
 261       f.Printf("\n + %s\n", name);
 262    f.Printf("\n   Compiler\n\n");
 263    if(objDir.expression[0])
 264       f.Printf("%sIntermediate Directory = %s\n", indentation, objDir.expression);
 265    f.Printf("%sDebug = %s\n", indentation, (options.debug == true) ? "True" : "False");
 266    switch(options.optimization)
 267    {
 268       // case none:   f.Printf("%sOptimize = %s\n", indentation, "None"); break;
 269       case speed: f.Printf("%sOptimize = %s\n", indentation, "Speed"); break;
 270       case size:  f.Printf("%sOptimize = %s\n", indentation, "Size");  break;
 271    }
 272    f.Printf("%sAllWarnings = %s\n", indentation, (options.warnings == all) ? "True" : "False");
 273    if(options.profile)
 274       f.Printf("%sProfile = %s\n", indentation, (options.profile == true) ? "True" : "False");
 275    if(options.memoryGuard == true)
 276       f.Printf("%sMemoryGuard = %s\n", indentation, (options.memoryGuard == true) ? "True" : "False");
 277    if(options.strictNameSpaces == true)
 278       f.Printf("%sStrict Name Spaces = %s\n", indentation, (options.strictNameSpaces == true) ? "True" : "False");
 279    if(options.defaultNameSpace && strlen(options.defaultNameSpace))
 280       f.Printf("%sDefault Name Space = %s\n", indentation, options.defaultNameSpace);
 281     TOFIX: Compiler Bug {
 282       if(options.preprocessorDefinitions.count)
 283       {
 284          bool isFirst = true;
 285          for(item : options.preprocessorDefinitions)
 286          {
 287             if(isFirst)
 288             {
 289                f.Printf("\n%sPreprocessor Definitions = %s", indentation, item);
 290                isFirst = false;
 291             }
 292             else
 293                f.Printf(", %s", item);
 294          }
 295          f.Printf("\n");
 296       }
 297    }
 298    if(options.includeDirs.count)
 299    {
 300       f.Printf("\n%sInclude Directories\n", indentation);
 301       for(item : options.includeDirs)
 302          f.Printf("%s - %s\n", indentation, name);
 303       f.Printf("\n");
 304    }
 305
 306    f.Printf("\n%sLinker\n\n", indentation);
 307    f.Printf("%sTarget Name = %s\n", indentation, options.targetFileName);
 308    switch(options.targetType)
 309    {
 310       case executable:     f.Printf("%sTarget Type = %s\n", indentation, "Executable"); break;
 311       case sharedLibrary:  f.Printf("%sTarget Type = %s\n", indentation, "Shared");     break;
 312       case staticLibrary:  f.Printf("%sTarget Type = %s\n", indentation, "Static");     break;
 313    }
 314    if(targetDir.expression[0])
 315       f.Printf("%sTarget Directory = %s\n", indentation, targetDir.expression);
 316    if(options.console)
 317       f.Printf("%sConsole = %s\n", indentation, options.console ? "True" : "False");
 318    if(options.compress)
 319       f.Printf("%sCompress = %s\n", indentation, options.compress ? "True" : "False");
 320    if(options.libraries.count)
 321    {
 322       bool isFirst = true;
 323       for(item : options.libraries)
 324       {
 325          if(isFirst)
 326          {
 327             f.Printf("\n%sLibraries = %s", indentation, name);
 328             isFirst = false;
 329          }
 330          else
 331             f.Printf(", %s", item);
 332       }
 333       f.Printf("\n");
 334    }
 335    if(options.libraryDirs.count)
 336    {
 337       f.Printf("\n%sLibrary Directories\n\n", indentation);
 338       for(item : options.libraryDirs)
 339          f.Printf("       - %s\n", indentation, item);
 340    }
 341 }
 342
 343 void LegacyAsciiSaveProject(File f, Project project)
 344 {
 345    char indentation[128*3];
 346    char path[MAX_LOCATION];
 347
 348    f.Printf("\nECERE Project File : Format Version 0.1b\n");
 349    f.Printf("\nDescription\n%s\n.\n", project.description);
 350    f.Printf("\nLicense\n%s\n.\n", project.license);
 351    f.Printf("\nModule Name = %s\n", project.moduleName);
 352    f.Printf("\n   Configurations\n");
 353    //////////////////////////////////////commonConfig.Save(f, true);
 354    for(cfg : project.configurations)
 355       LegacyProjectConfigSave(cfg, f);
 356
 357    strcpy(indentation, "   ");
 358    path[0] = '\0';
 359    LegacyAsciiSaveNode(project.topNode, f, indentation, path);
 360    // f.Printf("\n");
 361    delete f;
 362 }
 363 */
 364
 365 // *** NEW JSON PROJECT FORMAT ***
 366 public enum ProjectNodeType { file, folder };
 367
 368 // *******************************
 369
 370 define PEEK_RESOLUTION = (18.2 * 10);
 371
 372 // On Windows & UNIX
 373 #define SEPS    "/"
 374 #define SEP     '/'
 375
 376 static byte epjSignature[] = { 'E', 'P', 'J', 0x04, 0x01, 0x12, 0x03, 0x12 };
 377
 378 enum GenMakefilePrintTypes { objects, cObjects, symbols, imports, sources, resources, eCsources };
 379
 380 define WorkspaceExtension = "ews";
 381 define ProjectExtension = "epj";
 382
 383 define stringInFileIncludedFrom = "In file included from ";
 384
 385 void ReplaceSpaces(char * output, char * source)
 386 {
 387    int c, dc;
 388    char ch, pch = 0;
 389
 390    for(c = 0, dc = 0; (ch = source[c]); c++, dc++)
 391    {
 392       if(ch == ' ') output[dc++] = '\\';
 393       if(pch != '$')
 394       {
 395          if(ch == '(' || ch == ')') output[dc++] = '\\';
 396          pch = ch;
 397       }
 398       else if(ch == ')')
 399          pch = 0;
 400       output[dc] = ch;
 401    }
 402    output[dc] = '\0';
 403 }
 404
 405 void ReplaceUnwantedMakeChars(char * output, char * source)
 406 {
 407    int c, dc;
 408    char ch, pch = 0;
 409
 410    for(c = 0, dc = 0; (ch = source[c]); c++, dc++)
 411    {
 412       if(pch != '$')
 413       {
 414          if(ch == '(' || ch == ')') output[dc++] = '\\';
 415          pch = ch;
 416       }
 417       else if(ch == ')')
 418          pch = 0;
 419       if(ch == ' ')
 420          output[dc] = 127;
 421       else
 422          output[dc] = ch;
 423    }
 424    output[dc] = '\0';
 425 }
 426
 427 static void OutputNoSpace(File f, char * source)
 428 {
 429    char * output = new char[strlen(source)+1024];
 430    ReplaceSpaces(output, source);
 431    f.Puts(output);
 432    delete output;
 433 }
 434
 435 enum ListOutputMethod { inPlace, newLine, lineEach };
 436
 437 int OutputFileList(File f, char * name, Array<String> list, Map<String, int> varStringLenDiffs, char * prefix)
 438 {
 439    int numOfBreaks = 0;
 440    const int breakListLength = 1536;
 441    const int breakLineLength = 78; // TODO: turn this into an option.
 442
 443    int c, len, itemCount = 0;
 444    Array<int> breaks { };
 445    if(list.count)
 446    {
 447       int charCount = 0;
 448       MapNode<String, int> mn;
 449       for(c=0; c<list.count; c++)
 450       {
 451          len = strlen(list[c]) + 3;
 452          if(strstr(list[c], "$(") && varStringLenDiffs && varStringLenDiffs.count)
 453          {
 454             for(mn = varStringLenDiffs.root.minimum; mn; mn = mn.next)
 455             {
 456                if(strstr(list[c], mn.key))
 457                   len += mn.value;
 458             }
 459          }
 460          if(charCount + len > breakListLength)
 461          {
 462             breaks.Add(itemCount);
 463             itemCount = 0;
 464             charCount = len;
 465          }
 466          itemCount++;
 467          charCount += len;
 468       }
 469       if(itemCount)
 470          breaks.Add(itemCount);
 471       numOfBreaks = breaks.count;
 472    }
 473
 474    if(numOfBreaks > 1)
 475    {
 476       f.Printf("%s =%s%s", name, prefix ? " " : "", prefix ? prefix : "");
 477       for(c=0; c<numOfBreaks; c++)
 478          f.Printf(" $(%s%d)", name, c+1);
 479       f.Puts("\n");
 480    }
 481    else
 482       f.Printf("%s =%s%s", name, prefix ? " " : "", prefix ? prefix : "");
 483
 484    if(numOfBreaks)
 485    {
 486       int n, offset = 0;
 487
 488       for(c=0; c<numOfBreaks; c++)
 489       {
 490          if(numOfBreaks > 1)
 491             f.Printf("%s%d =", name, c+1);
 492
 493          len = 3;
 494          itemCount = breaks[c];
 495          for(n=offset; n<offset+itemCount; n++)
 496          {
 497             if(false) // TODO: turn this into an option.
 498             {
 499                int itemLen = strlen(list[n]);
 500                if(len > 3 && len + itemLen > breakLineLength)
 501                {
 502                   f.Printf(" \\\n\t%s", list[n]);
 503                   len = 3;
 504                }
 505                else
 506                {
 507                   len += itemLen;
 508                   f.Printf(" %s", list[n]);
 509                }
 510             }
 511             else
 512                f.Printf(" \\\n\t%s", list[n]);
 513          }
 514          offset += itemCount;
 515          f.Puts("\n");
 516       }
 517       list.Free();
 518       list.count = 0;
 519    }
 520    else
 521       f.Puts("\n");
 522    f.Puts("\n");
 523    delete breaks;
 524    return numOfBreaks;
 525 }
 526
 527 void OutputCleanActions(File f, char * name, int parts)
 528 {
 529    if(parts > 1)
 530    {
 531       int c;
 532       for(c=0; c<parts; c++)
 533          f.Printf("\t$(call rmq,$(%s%d))\n", name, c+1);
 534    }
 535    else
 536       f.Printf("\t$(call rmq,$(%s))\n", name);
 537 }
 538
 539 void OutputListOption(File f, char * option, Array<String> list, ListOutputMethod method, bool noSpace)
 540 {
 541    if(list.count)
 542    {
 543       if(method == newLine)
 544          f.Puts(" \\\n\t");
 545       for(item : list)
 546       {
 547          if(method == lineEach)
 548             f.Puts(" \\\n\t");
 549          f.Printf(" -%s", option);
 550          if(noSpace)
 551             OutputNoSpace(f, item);
 552          else
 553             f.Printf("%s", item);
 554       }
 555    }
 556 }
 557
 558 void StringNoSpaceToDynamicString(DynamicString s, char * path)
 559 {
 560    char * output = new char[strlen(path)+1024];
 561    ReplaceSpaces(output, path);
 562    s.concat(output);
 563    delete output;
 564 }
 565
 566 static void OutputLibraries(File f, Array<String> libraries)
 567 {
 568    for(item : libraries)
 569    {
 570       char ext[MAX_EXTENSION];
 571       char temp[MAX_LOCATION];
 572       char * s = item;
 573       bool usedFunction = false;
 574       GetExtension(item, ext);
 575       if(!strcmp(ext, "o") || !strcmp(ext, "a"))
 576          f.Puts(" ");
 577       else
 578       {
 579          if(!strcmp(ext, "so") || !strcmp(ext, "dylib"))
 580          {
 581             if(!strncmp(item, "lib", 3))
 582                strcpy(temp, item + 3);
 583             else
 584                strcpy(temp, item);
 585             StripExtension(temp);
 586             s = temp;
 587          }
 588          f.Puts(" \\\n\t$(call _L,");
 589          usedFunction = true;
 590       }
 591       OutputNoSpace(f, s);
 592       if(usedFunction)
 593          f.Puts(")");
 594    }
 595 }
 596
 597 void CamelCase(char * string)
 598 {
 599    int c, len = strlen(string);
 600    for(c=0; c<len && string[c] >= 'A' && string[c] <= 'Z'; c++)
 601       string[c] = (char)tolower(string[c]);
 602 }
 603
 604 CompilerConfig GetCompilerConfig()
 605 {
 606 #ifndef MAKEFILE_GENERATOR
 607    CompilerConfig compiler = null;
 608    if(ide && ide.workspace)
 609       compiler = ideSettings.GetCompilerConfig(ide.workspace.compiler);
 610    return compiler;
 611 #else
 612    incref defaultCompiler;
 613    return defaultCompiler;
 614 #endif
 615 }
 616
 617 define localTargetType = config && config.options && config.options.targetType ?
 618             config.options.targetType : options && options.targetType ?
 619             options.targetType : TargetTypes::executable;
 620 define localWarnings = config && config.options && config.options.warnings ?
 621             config.options.warnings : options && options.warnings ?
 622             options.warnings : WarningsOption::unset;
 623 define localDebug = config && config.options && config.options.debug ?
 624             config.options.debug : options && options.debug ?
 625             options.debug : SetBool::unset;
 626 define localMemoryGuard = config && config.options && config.options.memoryGuard ?
 627             config.options.memoryGuard : options && options.memoryGuard ?
 628             options.memoryGuard : SetBool::unset;
 629 define localNoLineNumbers = config && config.options && config.options.noLineNumbers ?
 630             config.options.noLineNumbers : options && options.noLineNumbers ?
 631             options.noLineNumbers : SetBool::unset;
 632 define localProfile = config && config.options && config.options.profile ?
 633             config.options.profile : options && options.profile ?
 634             options.profile : SetBool::unset;
 635 define localOptimization = config && config.options && config.options.optimization ?
 636             config.options.optimization : options && options.optimization ?
 637             options.optimization : OptimizationStrategy::none;
 638 define localFastMath = config && config.options && config.options.fastMath ?
 639             config.options.fastMath : options && options.fastMath ?
 640             options.fastMath : SetBool::unset;
 641 define localDefaultNameSpace = config && config.options && config.options.defaultNameSpace ?
 642             config.options.defaultNameSpace : options && options.defaultNameSpace ?
 643             options.defaultNameSpace : null;
 644 define localStrictNameSpaces = config && config.options && config.options.strictNameSpaces ?
 645             config.options.strictNameSpaces : options && options.strictNameSpaces ?
 646             options.strictNameSpaces : SetBool::unset;
 647 // TODO: I would rather have null here, check if it'll be ok, have the property return "" if required
 648 define localTargetFileName = config && config.options && config.options.targetFileName ?
 649             config.options.targetFileName : options && options.targetFileName ?
 650             options.targetFileName : "";
 651 define localTargetDirectory = config && config.options && config.options.targetDirectory && config.options.targetDirectory[0] ?
 652             config.options.targetDirectory : options && options.targetDirectory && options.targetDirectory[0] ?
 653             options.targetDirectory : null;
 654 define settingsTargetDirectory = ideSettings && ideSettings.projectDefaultIntermediateObjDir &&
 655             ideSettings.projectDefaultIntermediateObjDir[0] ?
 656             ideSettings.projectDefaultIntermediateObjDir : defaultObjDirExpression;
 657 define localObjectsDirectory = config && config.options && config.options.objectsDirectory && config.options.objectsDirectory[0] ?
 658             config.options.objectsDirectory : options && options.objectsDirectory && options.objectsDirectory[0] ?
 659             options.objectsDirectory : null;
 660 define settingsObjectsDirectory = ideSettings && ideSettings.projectDefaultIntermediateObjDir &&
 661             ideSettings.projectDefaultIntermediateObjDir[0] ?
 662             ideSettings.projectDefaultIntermediateObjDir : defaultObjDirExpression;
 663 define localConsole = config && config.options && config.options.console ?
 664             config.options.console : options && options.console ?
 665             options.console : SetBool::unset;
 666 define localCompress = config && config.options && config.options.compress ?
 667             config.options.compress : options && options.compress ?
 668             options.compress : SetBool::unset;
 669
 670 define platformTargetType =
 671          configPOs && configPOs.options && configPOs.options.targetType && configPOs.options.targetType != localTargetType ?
 672                configPOs.options.targetType :
 673          projectPOs && projectPOs.options && projectPOs.options.targetType && projectPOs.options.targetType != localTargetType ?
 674                projectPOs.options.targetType : TargetTypes::unset;
 675
 676
 677 char * PlatformToMakefileTargetVariable(Platform platform)
 678 {
 679    return platform == win32 ? "WINDOWS_TARGET" :
 680           platform == tux   ? "LINUX_TARGET"   :
 681           platform == apple ? "OSX_TARGET"     :
 682                               "ERROR_BAD_TARGET";
 683 }
 684
 685 char * TargetTypeToMakefileVariable(TargetTypes targetType)
 686 {
 687    return targetType == executable    ? "executable" :
 688           targetType == sharedLibrary ? "sharedlib"  :
 689           targetType == staticLibrary ? "staticlib"  :
 690                                         "unknown";
 691 }
 692
 693 // Move this to ProjectConfig? null vs Common to consider...
 694 char * GetConfigName(ProjectConfig config)
 695 {
 696    return config ? config.name : "Common";
 697 }
 698
 699 class Project : struct
 700 {
 701    class_no_expansion;  // To use Find on the Container<Project> in Workspace::projects
 702                         // We might want to tweak this default behavior of regular classes ?
 703                         // Expansion/the current default kind of Find matching we want for things like BitmapResource, FontResource (Also regular classes)
 704 public:
 705    float version;
 706    String moduleName;
 707
 708    property ProjectOptions options { get { return options; } set { options = value; } isset { return options && !options.isEmpty; } }
 709    property Array<PlatformOptions> platforms
 710    {
 711       get { return platforms; }
 712       set
 713       {
 714          if(platforms) { platforms.Free(); delete platforms; }
 715          if(value)
 716          {
 717             List<PlatformOptions> empty { };
 718             Iterator<PlatformOptions> it { value };
 719             platforms = value;
 720             for(p : platforms; !p.options || p.options.isEmpty) empty.Add(p);
 721             for(p : empty; it.Find(p)) platforms.Delete(it.pointer);
 722             delete empty;
 723          }
 724       }
 725       isset
 726       {
 727          if(platforms)
 728          {
 729             for(p : platforms)
 730             {
 731                if(p.options && !p.options.isEmpty)
 732                   return true;
 733             }
 734          }
 735          return false;
 736       }
 737    }
 738    List<ProjectConfig> configurations;
 739    LinkList<ProjectNode> files;
 740    String resourcesPath;
 741    LinkList<ProjectNode> resources;
 742
 743    property char * description
 744    {
 745       set { delete description; if(value && value[0]) description = CopyString(value); }
 746       get { return description ? description : ""; }
 747       isset { return description != null && description[0]; }
 748    }
 749
 750    property char * license
 751    {
 752       set { delete license; if(value && value[0]) license = CopyString(value); }
 753       get { return license ? license : ""; }
 754       isset { return license != null && license[0]; }
 755    }
 756
 757    property char * compilerConfigsDir
 758    {
 759       set { delete compilerConfigsDir; if(value && value[0]) compilerConfigsDir = CopyString(value); }
 760       get { return compilerConfigsDir ? compilerConfigsDir : ""; }
 761       isset { return compilerConfigsDir && compilerConfigsDir[0]; }
 762    }
 763
 764 private:
 765    // topNode.name holds the file name (.epj)
 766    ProjectOptions options;
 767    Array<PlatformOptions> platforms;
 768    ProjectNode topNode { type = project, icon = epjFile, files = LinkList<ProjectNode>{ }, project = this };
 769    ProjectNode resNode;
 770
 771    ProjectConfig config;
 772    String filePath;
 773    // This is the file name stripped of the epj extension
 774    // It should NOT be edited, saved or loaded anywhere
 775    String name;
 776
 777    String description;
 778    String license;
 779    String compilerConfigsDir;
 780 #ifndef MAKEFILE_GENERATOR
 781    FileMonitor fileMonitor
 782    {
 783       this, FileChange { modified = true };
 784       bool OnFileNotify(FileChange action, char * param)
 785       {
 786          fileMonitor.StopMonitoring();
 787          if(OnProjectModified(action, param))
 788             fileMonitor.StartMonitoring();
 789          return true;
 790       }
 791    };
 792
 793    bool StartMonitoring()
 794    {
 795       fileMonitor.fileName = filePath;
 796       fileMonitor.StartMonitoring();
 797       return true;
 798    }
 799
 800    bool StopMonitoring()
 801    {
 802       fileMonitor.StopMonitoring();
 803       return true;
 804    }
 805
 806    bool OnProjectModified(FileChange fileChange, char * param)
 807    {
 808       char temp[4096];
 809       sprintf(temp, $"The project %s was modified by another application.\n"
 810             "Would you like to reload it and lose your changes?", name);
 811       if(MessageBox { type = yesNo, master = ide,
 812             text = $"Project has been modified", contents = temp }.Modal() == yes)
 813       {
 814          Project project = LoadProject(filePath, config.name);
 815          if(project)
 816          {
 817             ProjectView projectView = ide.projectView;
 818             DataRow prev = topNode.row ? topNode.row.previous : null;
 819             FileMonitor fm = fileMonitor;
 820
 821             if(projectView) projectView.DeleteNode(topNode);
 822
 823             *this = *project;
 824             delete fileMonitor;
 825             fileMonitor = fm;
 826             topNode.project = this;
 827
 828             if(projectView)
 829             {
 830                CompilerConfig compiler = ideSettings.GetCompilerConfig(projectView.workspace.compiler);
 831                projectView.AddNode(topNode, null);
 832                topNode.row.Move(prev);
 833
 834                projectView.ShowOutputBuildLog(true);
 835                projectView.DisplayCompiler(compiler, false);
 836                projectView.ProjectUpdateMakefileForAllConfigs(this);
 837                delete compiler;
 838             }
 839             eSystem_Delete(project);
 840          }
 841          return true;
 842       }
 843       return true;
 844    }
 845
 846 #endif
 847
 848    // This frees contents without freeing the instance
 849    // For use from destructor and for file monitor reloading
 850    // (To work around JSON loader (LoadProject) always returning a new instance)
 851    void Free()
 852    {
 853       if(platforms) { platforms.Free(); delete platforms; }
 854       if(configurations) { configurations.Free(); delete configurations; }
 855       if(files) { files.Free(); delete files; }
 856       if(resources) { resources.Free(); delete resources; }
 857       delete options;
 858       delete resourcesPath;
 859
 860       delete description;
 861       delete license;
 862       delete compilerConfigsDir;
 863       delete moduleName;
 864       delete filePath;
 865       delete topNode;
 866       delete name;
 867    }
 868
 869    ~Project()
 870    {
 871       /* // THIS IS NOW AUTOMATED WITH A project CHECK IN ProjectNode
 872       topNode.configurations = null;
 873       topNode.platforms = null;
 874       topNode.options = null;
 875       */
 876       Free();
 877    }
 878
 879    property ProjectConfig config
 880    {
 881       set
 882       {
 883          config = value;
 884          delete topNode.info;
 885          topNode.info = CopyString(GetConfigName(config));
 886       }
 887    }
 888    property char * filePath
 889    {
 890       set
 891       {
 892          if(value)
 893          {
 894             char string[MAX_LOCATION];
 895             GetLastDirectory(value, string);
 896             delete topNode.name;
 897             topNode.name = CopyString(string);
 898             StripExtension(string);
 899             delete name;
 900             name = CopyString(string);
 901             StripLastDirectory(value, string);
 902             delete topNode.path;
 903             topNode.path = CopyString(string);
 904             delete filePath;
 905             filePath = CopyString(value);
 906          }
 907       }
 908    }
 909
 910    TargetTypes GetTargetType(ProjectConfig config)
 911    {
 912       TargetTypes targetType = localTargetType;
 913       return targetType;
 914    }
 915
 916    bool GetTargetTypeIsSetByPlatform(ProjectConfig config)
 917    {
 918       Platform platform;
 919       for(platform = (Platform)1; platform < Platform::enumSize; platform++)
 920       {
 921          PlatformOptions projectPOs, configPOs;
 922          MatchProjectAndConfigPlatformOptions(config, platform, &projectPOs, &configPOs);
 923          if(platformTargetType)
 924             return true;
 925       }
 926       return false;
 927    }
 928
 929
 930    char * GetObjDirExpression(ProjectConfig config)
 931    {
 932       // TODO: Support platform options
 933       char * expression = localObjectsDirectory;
 934       if(!expression)
 935          expression = settingsObjectsDirectory;
 936       return expression;
 937    }
 938
 939    DirExpression GetObjDir(CompilerConfig compiler, ProjectConfig config)
 940    {
 941       char * expression = GetObjDirExpression(config);
 942       DirExpression objDir { type = intermediateObjectsDir };
 943       objDir.Evaluate(expression, this, compiler, config);
 944       return objDir;
 945    }
 946
 947    char * GetTargetDirExpression(ProjectConfig config)
 948    {
 949       // TODO: Support platform options
 950       char * expression = localTargetDirectory;
 951       if(!expression)
 952          expression = settingsTargetDirectory;
 953       return expression;
 954    }
 955
 956    DirExpression GetTargetDir(CompilerConfig compiler, ProjectConfig config)
 957    {
 958       char * expression = GetTargetDirExpression(config);
 959       DirExpression targetDir { type = DirExpressionType::targetDir /*intermediateObjectsDir*/};
 960       targetDir.Evaluate(expression, this, compiler, config);
 961       return targetDir;
 962    }
 963
 964    WarningsOption GetWarnings(ProjectConfig config)
 965    {
 966       WarningsOption warnings = localWarnings;
 967       return warnings;
 968    }
 969
 970    bool GetDebug(ProjectConfig config)
 971    {
 972       SetBool debug = localDebug;
 973       return debug == true;
 974    }
 975
 976    bool GetMemoryGuard(ProjectConfig config)
 977    {
 978       SetBool memoryGuard = localMemoryGuard;
 979       return memoryGuard == true;
 980    }
 981
 982    bool GetNoLineNumbers(ProjectConfig config)
 983    {
 984       SetBool noLineNumbers = localNoLineNumbers;
 985       return noLineNumbers == true;
 986    }
 987
 988    bool GetProfile(ProjectConfig config)
 989    {
 990       SetBool profile = localProfile;
 991       return profile == true;
 992    }
 993
 994    OptimizationStrategy GetOptimization(ProjectConfig config)
 995    {
 996       OptimizationStrategy optimization = localOptimization;
 997       return optimization;
 998    }
 999
1000    bool GetFastMath(ProjectConfig config)
1001    {
1002       SetBool fastMath = localFastMath;
1003       return fastMath == true;
1004    }
1005
1006    String GetDefaultNameSpace(ProjectConfig config)
1007    {
1008       String defaultNameSpace = localDefaultNameSpace;
1009       return defaultNameSpace;
1010    }
1011
1012    bool GetStrictNameSpaces(ProjectConfig config)
1013    {
1014       SetBool strictNameSpaces = localStrictNameSpaces;
1015       return strictNameSpaces == true;
1016    }
1017
1018    String GetTargetFileName(ProjectConfig config)
1019    {
1020       String targetFileName = localTargetFileName;
1021       return targetFileName;
1022    }
1023
1024    //String targetDirectory;
1025    //String objectsDirectory;
1026    bool GetConsole(ProjectConfig config)
1027    {
1028       SetBool console = localConsole;
1029       return console == true;
1030    }
1031
1032    bool GetCompress(ProjectConfig config)
1033    {
1034       SetBool compress = localCompress;
1035       return compress == true;
1036    }
1037    //SetBool excludeFromBuild;
1038
1039    bool GetConfigIsInActiveDebugSession(ProjectConfig config)
1040    {
1041 #ifndef MAKEFILE_GENERATOR
1042       return ide.project == this && ide.debugger && ide.debugger.prjConfig == config && ide.debugger.isActive;
1043 #endif
1044    }
1045
1046    bool GetConfigIsInDebugSession(ProjectConfig config)
1047    {
1048 #ifndef MAKEFILE_GENERATOR
1049       return ide.project == this && ide.debugger && ide.debugger.prjConfig == config && ide.debugger.isPrepared;
1050 #endif
1051    }
1052
1053    void SetPath(bool projectsDirs, CompilerConfig compiler, ProjectConfig config)
1054    {
1055 #ifndef MAKEFILE_GENERATOR
1056       ide.SetPath(projectsDirs, compiler, config);
1057 #endif
1058    }
1059
1060 #ifndef MAKEFILE_GENERATOR
1061    bool Save(char * fileName)
1062    {
1063       File f;
1064       /*char output[MAX_LOCATION];
1065        ChangeExtension(fileName, "json", output);
1066       f = FileOpen(output, write);*/
1067       f = FileOpen(fileName, write);
1068       if(f)
1069       {
1070          files = topNode.files;
1071          resources = resNode.files;
1072          resourcesPath = resNode.path;
1073
1074          files.Remove(resNode);
1075          version = 0.2f;
1076
1077          WriteJSONObject(f, class(Project), this, 0);
1078
1079          files.Add(resNode);
1080
1081          files = null;
1082          resources = null;
1083          resourcesPath = null;
1084          delete f;
1085       }
1086       return true;
1087    }
1088 #endif
1089
1090    // This method is only called from Debugger, should be moved to Debugger class?
1091 #ifndef MAKEFILE_GENERATOR
1092    bool GetRelativePath(char * filePath, char * relativePath)
1093    {
1094       ProjectNode node;
1095       char moduleName[MAX_FILENAME];
1096       GetLastDirectory(filePath, moduleName);
1097       // try with workspace dir first?
1098       if((node = topNode.Find(moduleName, false)))
1099       {
1100          strcpy(relativePath, strcmp(node.path, ".") ? node.path : "");
1101          PathCatSlash(relativePath, node.name);
1102          return true;
1103       }
1104       else
1105       {
1106          // Tweak for automatically resolving symbol loader modules
1107          char * sl = strstr(moduleName, ".main.ec");
1108          if(sl && (*sl = 0, !strcmpi(moduleName, name)))
1109          {
1110             char objDir[MAX_LOCATION];
1111             DirExpression objDirExp;
1112             CompilerConfig compiler = ide.debugger.currentCompiler;
1113             ProjectConfig config = ide.debugger.prjConfig;
1114             // This is not perfect, as multiple source files exist for the symbol loader module...
1115             // We try to set it in the debug config object directory.
1116             if(!compiler || !config)
1117             {
1118                // If we're not currently debugging, set a breakpoint in the active compiler/config
1119                compiler = GetCompilerConfig();
1120                config = this.config;
1121                // If the current config is not debuggable, set it in the first debuggable config found
1122                if(config && !config.options.debug)
1123                {
1124                   for(c : configurations; c.options.debug)
1125                   {
1126                      config = c;
1127                      break;
1128                   }
1129                }
1130             }
1131             objDirExp = GetObjDir(compiler, config);
1132             strcpy(objDir, objDirExp.dir);
1133             delete objDirExp;
1134             ChangeCh(objDir, '\\', '/'); // TODO: this is a hack, paths should never include win32 path seperators - fix this in ProjectSettings and ProjectLoad instead
1135             ReplaceSpaces(objDir, objDir);
1136             strcpy(relativePath, objDir);
1137             *sl = '.';
1138             PathCatSlash(relativePath, moduleName);
1139             return true;
1140          }
1141       }
1142       // WARNING: On failure, relative path is uninitialized
1143       return false;
1144    }
1145 #endif
1146
1147    void CatTargetFileName(char * string, CompilerConfig compiler, ProjectConfig config)
1148    {
1149       TargetTypes targetType = GetTargetType(config);
1150       String targetFileName = GetTargetFileName(config);
1151       if(targetType == staticLibrary)
1152       {
1153          PathCatSlash(string, "lib");
1154          strcat(string, targetFileName);
1155       }
1156       else if(compiler.targetPlatform != win32 && targetType == sharedLibrary)
1157       {
1158          PathCatSlash(string, "lib");
1159          strcat(string, targetFileName);
1160       }
1161       else
1162          PathCatSlash(string, targetFileName);
1163
1164       switch(targetType)
1165       {
1166          case executable:
1167             if(compiler.targetPlatform == win32)
1168                strcat(string, ".exe");
1169             break;
1170          case sharedLibrary:
1171             if(compiler.targetPlatform == win32)
1172                strcat(string, ".dll");
1173             else if(compiler.targetPlatform == apple)
1174                strcat(string, ".dylib");
1175             else
1176                strcat(string, ".so");
1177             break;
1178          case staticLibrary:
1179             strcat(string, ".a");
1180             break;
1181       }
1182    }
1183
1184    bool GetProjectCompilerConfigsDir(char * cfDir, bool replaceSpaces, bool makeRelative)
1185    {
1186       bool result = false;
1187       char temp[MAX_LOCATION];
1188       strcpy(cfDir, topNode.path);
1189       if(compilerConfigsDir && compilerConfigsDir[0])
1190       {
1191          PathCatSlash(cfDir, compilerConfigsDir);
1192          result = true;
1193       }
1194       if(makeRelative)
1195       {
1196          strcpy(temp, cfDir);
1197          // Using a relative path makes it less likely to run into spaces issues
1198          // Even with escaped spaces, there still seems to be issues including a config file
1199          // in a path containing spaces
1200
1201          MakePathRelative(temp, topNode.path, cfDir);
1202       }
1203
1204       if(cfDir && cfDir[0] && cfDir[strlen(cfDir)-1] != '/')
1205          strcat(cfDir, "/");
1206       if(replaceSpaces)
1207       {
1208          strcpy(temp, cfDir);
1209          ReplaceSpaces(cfDir, temp);
1210       }
1211       return result;
1212    }
1213
1214    bool GetIDECompilerConfigsDir(char * cfDir, bool replaceSpaces, bool makeRelative)
1215    {
1216       char temp[MAX_LOCATION];
1217       bool result = false;
1218       strcpy(cfDir, topNode.path);
1219       if(ideSettings.compilerConfigsDir && ideSettings.compilerConfigsDir[0])
1220       {
1221          PathCatSlash(cfDir, ideSettings.compilerConfigsDir);
1222          result = true;
1223       }
1224       else
1225       {
1226          // Default to <ProjectDir>/.configs if unset
1227          PathCatSlash(cfDir, ".configs");
1228          result = true;
1229       }
1230       if(makeRelative)
1231       {
1232          strcpy(temp, cfDir);
1233          // Using a relative path makes it less likely to run into spaces issues
1234          // Even with escaped spaces, there still seems to be issues including a config file
1235          // in a path containing spaces
1236          if(IsPathInsideOf(cfDir, topNode.path))
1237             MakePathRelative(temp, topNode.path, cfDir);
1238       }
1239       if(cfDir && cfDir[0] && cfDir[strlen(cfDir)-1] != '/')
1240          strcat(cfDir, "/");
1241       if(replaceSpaces)
1242       {
1243          strcpy(temp, cfDir);
1244          ReplaceSpaces(cfDir, temp);
1245       }
1246       return result;
1247    }
1248
1249    void CatMakeFileName(char * string, ProjectConfig config)
1250    {
1251       char projectName[MAX_LOCATION];
1252       strcpy(projectName, name);
1253       sprintf(string, "%s%s%s.Makefile", projectName, config ? "-" : "", config ? config.name : "");
1254    }
1255
1256 #ifndef MAKEFILE_GENERATOR
1257    void MarkChanges(ProjectNode node)
1258    {
1259       for(cfg : topNode.configurations)
1260       {
1261          ProjectConfig c = null;
1262          for(i : node.configurations; !strcmpi(i.name, cfg.name)) { c = i; break; }
1263
1264          if(c && ((c.options && cfg.options && cfg.options.console != c.options.console) ||
1265                (!c.options || !cfg.options)))
1266             cfg.symbolGenModified = true;
1267
1268          cfg.makingModified = true;
1269       }
1270    }
1271
1272    void ModifiedAllConfigs(bool making, bool compiling, bool linking, bool symbolGen)
1273    {
1274       for(cfg : configurations)
1275       {
1276          if(making)
1277             cfg.makingModified = true;
1278          if(compiling)
1279             cfg.compilingModified = true;
1280          if(linking)
1281             cfg.linkingModified = true;
1282          if(symbolGen)
1283             cfg.symbolGenModified = true;
1284       }
1285       if(compiling || linking)
1286       {
1287          ide.projectView.modifiedDocument = true;
1288          ide.workspace.modified = true;
1289       }
1290    }
1291
1292    void RotateActiveConfig(bool forward)
1293    {
1294       if(configurations.first && configurations.last != configurations.first)
1295       {
1296          Iterator<ProjectConfig> cfg { configurations };
1297          while(forward ? cfg.Next() : cfg.Prev())
1298             if(cfg.data == config)
1299                break;
1300
1301          if(forward)
1302          {
1303             if(!cfg.Next())
1304                cfg.Next();
1305          }
1306          else
1307          {
1308             if(!cfg.Prev())
1309                cfg.Prev();
1310          }
1311
1312          property::config = cfg.data;
1313          ide.workspace.modified = true;
1314          ide.projectView.Update(null);
1315       }
1316    }
1317
1318    void ProcessPipeOutputRaw(DualPipe f)
1319    {
1320       char line[65536];
1321       while(!f.Eof() && !ide.ShouldStopBuild())
1322       {
1323          bool result = true;
1324          double lastTime = GetTime();
1325          bool wait = true;
1326          while(result)
1327          {
1328             if((result = f.Peek()) && (result = f.GetLine(line, sizeof(line)-1)))
1329             {
1330                ide.outputView.buildBox.Logf("%s\n", line);
1331             }
1332             if(GetTime() - lastTime > 1.0 / PEEK_RESOLUTION) break;
1333          }
1334          //printf("Processing Input...\n");
1335          if(app.ProcessInput(true))
1336             wait = false;
1337          app.UpdateDisplay();
1338          if(wait)
1339          {
1340             //printf("Waiting...\n");
1341             app.Wait();
1342          }
1343          //if(!result) Sleep(1.0 / PEEK_RESOLUTION);
1344       }
1345       if(ide.ShouldStopBuild())
1346       {
1347          ide.outputView.buildBox.Logf($"\nBuild cancelled by user.\n", line);
1348          f.Terminate();
1349       }
1350    }
1351
1352    bool ProcessBuildPipeOutput(DualPipe f, DirExpression objDirExp, bool isARun, ProjectNode onlyNode,
1353       CompilerConfig compiler, ProjectConfig config)
1354    {
1355       char line[65536];
1356       bool compiling = false, linking = false, precompiling = false;
1357       int compilingEC = 0;
1358       int numErrors = 0, numWarnings = 0;
1359       bool loggedALine = false;
1360       char * configName = config ? config.name : "Common";
1361       int lenMakeCommand = strlen(compiler.makeCommand);
1362
1363       char cppCommand[MAX_LOCATION];
1364       char ccCommand[MAX_LOCATION];
1365       char cxxCommand[MAX_LOCATION];
1366       char stripCommand[MAX_LOCATION];
1367       char ecpCommand[MAX_LOCATION];
1368       char eccCommand[MAX_LOCATION];
1369       char ecsCommand[MAX_LOCATION];
1370       char earCommand[MAX_LOCATION];
1371
1372       char * cc = compiler.ccCommand;
1373       char * cxx = compiler.cxxCommand;
1374       char * cpp = compiler.cppCommand;
1375       char * strip = compiler.cppCommand;
1376       sprintf(cppCommand, "%s%s%s%s ",
1377             compiler.ccacheEnabled ? "ccache " : "",
1378             compiler.distccEnabled ? "distcc " : "",
1379             compiler.gccPrefix ? compiler.gccPrefix : "",
1380             compiler.cppCommand);
1381       sprintf(ccCommand, "%s%s%s%s ",
1382             compiler.ccacheEnabled ? "ccache " : "",
1383             compiler.distccEnabled ? "distcc " : "",
1384             compiler.gccPrefix ? compiler.gccPrefix : "",
1385             compiler.ccCommand);
1386       sprintf(cxxCommand, "%s%s%s%s ",
1387             compiler.ccacheEnabled ? "ccache " : "",
1388             compiler.distccEnabled ? "distcc " : "",
1389             compiler.gccPrefix ? compiler.gccPrefix : "",
1390             compiler.cxxCommand);
1391
1392       sprintf(stripCommand, "%sstrip ",
1393             compiler.gccPrefix ? compiler.gccPrefix : "");
1394
1395       sprintf(ecpCommand, "%s ", compiler.ecpCommand);
1396       sprintf(eccCommand, "%s ", compiler.eccCommand);
1397       sprintf(ecsCommand, "%s ", compiler.ecsCommand);
1398       sprintf(earCommand, "%s ", compiler.earCommand);
1399
1400       while(!f.Eof() && !ide.ShouldStopBuild())
1401       {
1402          bool result = true;
1403          double lastTime = GetTime();
1404          bool wait = true;
1405          while(result)
1406          {
1407             //printf("Peeking and GetLine...\n");
1408             if((result = f.Peek()) && (result = f.GetLine(line, sizeof(line)-1)))
1409             {
1410                char * inFileIncludedFrom = strstr(line, stringInFileIncludedFrom);
1411                if(strstr(line, compiler.makeCommand) == line && line[lenMakeCommand] == ':')
1412                {
1413                   char * module = strstr(line, "No rule to make target `");
1414                   if(module)
1415                   {
1416                      char * end;
1417                      module = strchr(module, '`') + 1;
1418                      end = strchr(module, '\'');
1419                      if(end)
1420                      {
1421                         *end = '\0';
1422                         ide.outputView.buildBox.Logf($"   %s: No such file or directory\n", module);
1423                         // ide.outputView.buildBox.Logf("error: %s\n   No such file or directory\n", module);
1424                         numErrors++;
1425                      }
1426                   }
1427                   //else
1428                   //{
1429                      //ide.outputView.buildBox.Logf("error: %s\n", line);
1430                      //numErrors++;
1431                   //}
1432                }
1433                else if(strstr(line, "ear ") == line);
1434                else if(strstr(line, stripCommand) == line);
1435                else if(strstr(line, ccCommand) == line || strstr(line, cxxCommand) == line || strstr(line, ecpCommand) == line || strstr(line, eccCommand) == line)
1436                {
1437                   char moduleName[MAX_FILENAME];
1438                   byte * tokens[1];
1439                   char * module;
1440                   bool isPrecomp = false;
1441
1442                   if(strstr(line, ccCommand) == line || strstr(line, cxxCommand) == line)
1443                   {
1444                      module = strstr(line, " -c ");
1445                      if(module) module += 4;
1446                   }
1447                   else if(strstr(line, eccCommand) == line)
1448                   {
1449                      module = strstr(line, " -c ");
1450                      if(module) module += 4;
1451                      //module = line + 3;
1452                      // Don't show GCC warnings about generated C code because it does not compile clean yet...
1453                      compilingEC = 3;//2;
1454                   }
1455                   else if(strstr(line, ecpCommand) == line)
1456                   {
1457                      // module = line + 8;
1458                      module = strstr(line, " -c ");
1459                      if(module) module += 4;
1460                      isPrecomp = true;
1461                      compilingEC = 0;
1462                   }
1463
1464                   loggedALine = true;
1465
1466                   if(module)
1467                   {
1468                      if(!compiling && !isPrecomp)
1469                      {
1470                         ide.outputView.buildBox.Logf($"Compiling...\n");
1471                         compiling = true;
1472                      }
1473                      else if(!precompiling && isPrecomp)
1474                      {
1475                         ide.outputView.buildBox.Logf($"Generating symbols...\n");
1476                         precompiling = true;
1477                      }
1478                      // Changed escapeBackSlashes here to handle paths with spaces
1479                      Tokenize(module, 1, tokens, true); // false);
1480                      GetLastDirectory(module, moduleName);
1481                      ide.outputView.buildBox.Logf("%s\n", moduleName);
1482                   }
1483                   else if((module = strstr(line, " -o ")))
1484                   {
1485                      compiling = false;
1486                      precompiling = false;
1487                      linking = true;
1488                      ide.outputView.buildBox.Logf($"Linking...\n");
1489                   }
1490                   else
1491                   {
1492                      ide.outputView.buildBox.Logf("%s\n", line);
1493                      numErrors++;
1494                   }
1495
1496                   if(compilingEC) compilingEC--;
1497                }
1498                else if(strstr(line, "ar rcs") == line)
1499                   ide.outputView.buildBox.Logf($"Building library...\n");
1500                else if(strstr(line, ecsCommand) == line)
1501                   ide.outputView.buildBox.Logf($"Writing symbol loader...\n");
1502                else
1503                {
1504                   if(linking || compiling || precompiling)
1505                   {
1506                      char * colon = strstr(line, ":"); //, * bracket;
1507                      if(colon && (colon[1] == '/' || colon[1] == '\\'))
1508                         colon = strstr(colon + 1, ":");
1509                      if(colon)
1510                      {
1511                         char moduleName[MAX_LOCATION], temp[MAX_LOCATION];
1512                         char * pointer;
1513                         char * error;
1514                         char * start = inFileIncludedFrom ? line + strlen(stringInFileIncludedFrom) : line;
1515                         int len = (int)(colon - start);
1516                         len = Min(len, MAX_LOCATION-1);
1517                         // Don't be mistaken by the drive letter colon
1518                         // Cut module name
1519                         // TODO: need to fix colon - line gives char *
1520                         // warning: incompatible expression colon - line (char *); expected int
1521                         /*
1522                         strncpy(moduleName, line, (int)(colon - line));
1523                         moduleName[colon - line] = '\0';
1524                         */
1525                         strncpy(moduleName, start, len);
1526                         moduleName[len] = '\0';
1527                         // Remove stuff in brackets
1528                         //bracket = strstr(moduleName, "(");
1529                         //if(bracket) *bracket = '\0';
1530
1531                         GetLastDirectory(moduleName, temp);
1532                         if(linking && (!strcmp(temp, "ld") || !strcmp(temp, "ld.exe")))
1533                         {
1534                            numErrors++;
1535                            strcpy(moduleName, $"Linker Error");
1536                         }
1537                         else
1538                         {
1539                            strcpy(temp, topNode.path);
1540                            PathCatSlash(temp, moduleName);
1541                            MakePathRelative(temp, topNode.path, moduleName);
1542                         }
1543                         if(strstr(line, "error:"))
1544                            numErrors ++;
1545                         else
1546                         {
1547                            // Silence warnings for compiled EC
1548                            char * objDir = strstr(moduleName, objDirExp.dir);
1549
1550                            if(linking)
1551                            {
1552                               if((pointer = strstr(line, "undefined"))  ||
1553                                    (pointer = strstr(line, "No such file")) ||
1554                                    (pointer = strstr(line, "token")))
1555                               {
1556                                  strncat(moduleName, colon, pointer - colon);
1557                                  strcat(moduleName, "error: ");
1558                                  colon = pointer;
1559                                  numErrors ++;
1560                               }
1561                            }
1562                            else if((pointer = strstr(line, "No such file")))
1563                            {
1564                               strncat(moduleName, colon, pointer - colon);
1565                               strcat(moduleName, "error: ");
1566                               colon = pointer;
1567                               numErrors ++;
1568                            }
1569                            else if(compilingEC == 1 || (objDir && objDir == moduleName))
1570                               continue;
1571                            else if(strstr(line, "warning:"))
1572                            {
1573                               numWarnings++;
1574                            }
1575                         }
1576                         if(this == ide.workspace.projects.firstIterator.data)
1577                            ide.outputView.buildBox.Logf("   %s%s\n", moduleName, colon);
1578                         else
1579                         {
1580                            char fullModuleName[MAX_LOCATION];
1581                            strcpy(fullModuleName, topNode.path);
1582                            PathCat(fullModuleName, moduleName);
1583                            MakePathRelative(fullModuleName, ide.workspace.projects.firstIterator.data.topNode.path, fullModuleName);
1584                            MakeSystemPath(fullModuleName);
1585                            ide.outputView.buildBox.Logf("   %s%s%s\n", inFileIncludedFrom ? stringInFileIncludedFrom : "", fullModuleName, colon);
1586                         }
1587                      }
1588                      else
1589                      {
1590                         ide.outputView.buildBox.Logf("%s\n", line);
1591                         linking = compiling = precompiling = false;
1592                      }
1593                   }
1594                   else
1595                      ide.outputView.buildBox.Logf("%s\n", line);
1596                }
1597                wait = false;
1598             }
1599             //printf("Done getting line\n");
1600             if(GetTime() - lastTime > 1.0 / PEEK_RESOLUTION) break;
1601          }
1602          //printf("Processing Input...\n");
1603          if(app.ProcessInput(true))
1604             wait = false;
1605          app.UpdateDisplay();
1606          if(wait)
1607          {
1608             //printf("Waiting...\n");
1609             app.Wait();
1610          }
1611          //if(!result) Sleep(1.0 / PEEK_RESOLUTION);
1612       }
1613       if(ide.ShouldStopBuild())
1614       {
1615          ide.outputView.buildBox.Logf($"\nBuild cancelled by user.\n", line);
1616          f.Terminate();
1617       }
1618       else if(loggedALine || !isARun)
1619       {
1620          if(f.GetExitCode() && !numErrors)
1621          {
1622             bool result = f.GetLine(line, sizeof(line)-1);
1623             ide.outputView.buildBox.Logf($"Fatal Error: child process terminated unexpectedly\n");
1624          }
1625          else
1626          {
1627             if(!onlyNode)
1628                ide.outputView.buildBox.Logf("\n%s (%s) - ", GetTargetFileName(config), configName);
1629             if(numErrors)
1630                ide.outputView.buildBox.Logf("%d %s, ", numErrors, (numErrors > 1) ? $"errors" : $"error");
1631             else
1632                ide.outputView.buildBox.Logf($"no error, ");
1633
1634             if(numWarnings)
1635                ide.outputView.buildBox.Logf("%d %s\n", numWarnings, (numWarnings > 1) ? $"warnings" : $"warning");
1636             else
1637                ide.outputView.buildBox.Logf($"no warning\n");
1638          }
1639       }
1640       return numErrors == 0;
1641    }
1642
1643    void ProcessCleanPipeOutput(DualPipe f, CompilerConfig compiler, ProjectConfig config)
1644    {
1645       char line[65536];
1646       int lenMakeCommand = strlen(compiler.makeCommand);
1647       while(!f.Eof())
1648       {
1649          bool result = true;
1650          bool wait = true;
1651          double lastTime = GetTime();
1652          while(result)
1653          {
1654             if((result = f.Peek()) && (result = f.GetLine(line, sizeof(line)-1)))
1655             {
1656                if(strstr(line, compiler.makeCommand) == line && line[lenMakeCommand] == ':');
1657                else if(strstr(line, "del") == line);
1658                else if(strstr(line, "rm") == line);
1659                else if(strstr(line, "Could Not Find") == line);
1660                else
1661                {
1662                   ide.outputView.buildBox.Logf(line);
1663                   ide.outputView.buildBox.Logf("\n");
1664                }
1665                wait = false;
1666             }
1667             if(GetTime() - lastTime > 1.0 / PEEK_RESOLUTION) break;
1668          }
1669          if(app.ProcessInput(true))
1670             wait = false;
1671          app.UpdateDisplay();
1672          if(wait)
1673             app.Wait();
1674          //Sleep(1.0 / PEEK_RESOLUTION);
1675       }
1676    }
1677
1678    bool Build(bool isARun, ProjectNode onlyNode, CompilerConfig compiler, ProjectConfig config)
1679    {
1680       bool result = false;
1681       DualPipe f;
1682       char targetFileName[MAX_LOCATION] = "";
1683       char makeTarget[MAX_LOCATION] = "";
1684       char makeFile[MAX_LOCATION];
1685       char makeFilePath[MAX_LOCATION];
1686       char configName[MAX_LOCATION];
1687       DirExpression objDirExp = GetObjDir(compiler, config);
1688       PathBackup pathBackup { };
1689       bool crossCompiling = (compiler.targetPlatform != GetRuntimePlatform());
1690       char * targetPlatform = crossCompiling ? (char *)compiler.targetPlatform : "";
1691
1692       int numJobs = compiler.numJobs;
1693       char command[MAX_LOCATION];
1694       char * compilerName;
1695
1696       compilerName = CopyString(compiler.name);
1697       CamelCase(compilerName);
1698
1699       strcpy(configName, config ? config.name : "Common");
1700
1701       SetPath(false, compiler, config); //true
1702       CatTargetFileName(targetFileName, compiler, config);
1703
1704       strcpy(makeFilePath, topNode.path);
1705       CatMakeFileName(makeFile, config);
1706       PathCatSlash(makeFilePath, makeFile);
1707
1708       // TODO: TEST ON UNIX IF \" around makeTarget is ok
1709       if(onlyNode)
1710       {
1711          if(compiler.type.isVC)
1712          {
1713             PrintLn("compiling a single file is not yet supported");
1714          }
1715          else
1716          {
1717             int len;
1718             char pushD[MAX_LOCATION];
1719             char cfDir[MAX_LOCATION];
1720             GetIDECompilerConfigsDir(cfDir, true, true);
1721             GetWorkingDir(pushD, sizeof(pushD));
1722             ChangeWorkingDir(topNode.path);
1723             // Create object dir if it does not exist already
1724             if(!FileExists(objDirExp.dir).isDirectory)
1725             {
1726                sprintf(command, "%s CF_DIR=\"%s\"%s%s COMPILER=%s objdir -C \"%s\" -f \"%s\"",
1727                      compiler.makeCommand, cfDir,
1728                      crossCompiling ? " TARGET_PLATFORM=" : "", targetPlatform,
1729                      compilerName, topNode.path, makeFilePath);
1730 #ifdef _DEBUG
1731                PrintLn(command);
1732                ide.outputView.buildBox.Logf("command: %s\n", command);
1733 #endif
1734                Execute(command);
1735             }
1736
1737             ChangeWorkingDir(pushD);
1738
1739             PathCatSlash(makeTarget+1, objDirExp.dir);
1740             PathCatSlash(makeTarget+1, onlyNode.name);
1741             StripExtension(makeTarget+1);
1742             strcat(makeTarget+1, ".o");
1743             makeTarget[0] = '\"';
1744             len = strlen(makeTarget);
1745             makeTarget[len++] = '\"';
1746             makeTarget[len++] = '\0';
1747          }
1748       }
1749
1750       if(compiler.type.isVC)
1751       {
1752          bool result = false;
1753          char oldwd[MAX_LOCATION];
1754          GetWorkingDir(oldwd, sizeof(oldwd));
1755          ChangeWorkingDir(topNode.path);
1756
1757          sprintf(command, "%s /useenv /nologo /logcommands %s.sln %s|Win32", compiler.makeCommand, name, config.name);
1758          ide.outputView.buildBox.Logf("command: %s\n", command);
1759 #ifdef _DEBUG
1760          PrintLn(command);
1761          ide.outputView.buildBox.Logf("command: %s\n", command);
1762 #endif
1763          if((f = DualPipeOpen(PipeOpenMode { output = true, error = true, input = true }, command)))
1764          {
1765             ProcessPipeOutputRaw(f);
1766             delete f;
1767             result = true;
1768          }
1769          ChangeWorkingDir(oldwd);
1770       }
1771       else
1772       {
1773          char cfDir[MAX_LOCATION];
1774          GetIDECompilerConfigsDir(cfDir, true, true);
1775          sprintf(command, "%s CF_DIR=\"%s\"%s%s COMPILER=%s -j%d %s%s%s -C \"%s\" -f \"%s\"",
1776                compiler.makeCommand, cfDir,
1777                crossCompiling ? " TARGET_PLATFORM=" : "", targetPlatform,
1778                compilerName, numJobs,
1779                compiler.ccacheEnabled ? "CCACHE=y " : "",
1780                compiler.distccEnabled ? "DISTCC=y " : "",
1781                makeTarget, topNode.path, makeFilePath);
1782 #ifdef _DEBUG
1783          PrintLn(command);
1784          ide.outputView.buildBox.Logf("command: %s\n", command);
1785 #endif
1786          if((f = DualPipeOpen(PipeOpenMode { output = true, error = true, input = true }, command)))
1787          {
1788             result = ProcessBuildPipeOutput(f, objDirExp, isARun, onlyNode, compiler, config);
1789             delete f;
1790          }
1791          else
1792          {
1793             ide.outputView.buildBox.Logf($"Error executing make (%s) command\n", compiler.makeCommand);
1794 #ifndef _DEBUG
1795             ide.outputView.buildBox.Logf("command: %s\n", command);
1796 #endif
1797          }
1798       }
1799
1800       delete pathBackup;
1801       delete objDirExp;
1802       delete compilerName;
1803       return result;
1804    }
1805
1806    void Clean(CompilerConfig compiler, ProjectConfig config, bool realclean)
1807    {
1808       char makeFile[MAX_LOCATION];
1809       char makeFilePath[MAX_LOCATION];
1810       char command[MAX_LOCATION];
1811       char * compilerName;
1812       DualPipe f;
1813       PathBackup pathBackup { };
1814       bool crossCompiling = (compiler.targetPlatform != GetRuntimePlatform());
1815       char * targetPlatform = crossCompiling ? (char *)compiler.targetPlatform : "";
1816
1817       compilerName = CopyString(compiler.name);
1818       CamelCase(compilerName);
1819
1820       SetPath(false, compiler, config);
1821
1822       strcpy(makeFilePath, topNode.path);
1823       CatMakeFileName(makeFile, config);
1824       PathCatSlash(makeFilePath, makeFile);
1825
1826       if(compiler.type.isVC)
1827       {
1828          bool result = false;
1829          char oldwd[MAX_LOCATION];
1830          GetWorkingDir(oldwd, sizeof(oldwd));
1831          ChangeWorkingDir(topNode.path);
1832
1833          sprintf(command, "%s /useenv /clean /nologo /logcommands %s.sln %s|Win32", compiler.makeCommand, name, config.name);
1834          ide.outputView.buildBox.Logf("command: %s\n", command);
1835 #ifdef _DEBUG
1836          PrintLn(command);
1837          ide.outputView.buildBox.Logf("command: %s\n", command);
1838 #endif
1839          if((f = DualPipeOpen(PipeOpenMode { output = true, error = true, input = true }, command)))
1840          {
1841             ProcessPipeOutputRaw(f);
1842             delete f;
1843             result = true;
1844          }
1845          ChangeWorkingDir(oldwd);
1846          return result;
1847       }
1848       else
1849       {
1850          char cfDir[MAX_LOCATION];
1851          GetIDECompilerConfigsDir(cfDir, true, true);
1852          sprintf(command, "%s CF_DIR=\"%s\"%s%s COMPILER=%s %sclean -C \"%s\" -f \"%s\"",
1853                compiler.makeCommand, cfDir,
1854                crossCompiling ? " TARGET_PLATFORM=" : "", targetPlatform,
1855                compilerName, realclean ? "real" : "", topNode.path, makeFilePath);
1856 #ifdef _DEBUG
1857          PrintLn(command);
1858          ide.outputView.buildBox.Logf("command: %s\n", command);
1859 #endif
1860          if((f = DualPipeOpen(PipeOpenMode { output = 1, error = 1, input = 2 }, command)))
1861          {
1862             ide.outputView.buildBox.Tell($"Deleting target and object files...");
1863             ProcessCleanPipeOutput(f, compiler, config);
1864             delete f;
1865
1866             ide.outputView.buildBox.Logf($"Target and object files deleted\n");
1867          }
1868       }
1869
1870       delete pathBackup;
1871       delete compilerName;
1872    }
1873
1874    void Run(char * args, CompilerConfig compiler, ProjectConfig config)
1875    {
1876       String target = new char[maxPathLen];
1877       char oldDirectory[MAX_LOCATION];
1878       DirExpression targetDirExp = GetTargetDir(compiler, config);
1879       PathBackup pathBackup { };
1880
1881       // Build(project, ideMain, true, null);
1882
1883    #if defined(__WIN32__)
1884       strcpy(target, topNode.path);
1885    #else
1886       strcpy(target, "");
1887    #endif
1888       PathCatSlash(target, targetDirExp.dir);
1889       CatTargetFileName(target, compiler, config);
1890       sprintf(target, "%s %s", target, args);
1891       GetWorkingDir(oldDirectory, MAX_LOCATION);
1892
1893       if(strlen(ide.workspace.debugDir))
1894       {
1895          char temp[MAX_LOCATION];
1896          strcpy(temp, topNode.path);
1897          PathCatSlash(temp, ide.workspace.debugDir);
1898          ChangeWorkingDir(temp);
1899       }
1900       else
1901          ChangeWorkingDir(topNode.path);
1902       // ChangeWorkingDir(topNode.path);
1903       SetPath(true, compiler, config);
1904       if(compiler.execPrefixCommand)
1905       {
1906          char * prefixedTarget = new char[strlen(compiler.execPrefixCommand) + strlen(target) + 2];
1907          prefixedTarget[0] = '\0';
1908          strcat(prefixedTarget, compiler.execPrefixCommand);
1909          strcat(prefixedTarget, " ");
1910          strcat(prefixedTarget, target);
1911          Execute(prefixedTarget);
1912          delete prefixedTarget;
1913       }
1914       else
1915          Execute(target);
1916
1917       ChangeWorkingDir(oldDirectory);
1918       delete pathBackup;
1919
1920       delete targetDirExp;
1921       delete target;
1922    }
1923
1924    void Compile(ProjectNode node, CompilerConfig compiler, ProjectConfig config)
1925    {
1926       Build(false, node, compiler, config);
1927    }
1928 #endif
1929
1930    void GetMakefileTargetFileName(TargetTypes targetType, char * fileName, ProjectConfig config)
1931    {
1932       fileName[0] = '\0';
1933       if(targetType == staticLibrary || targetType == sharedLibrary)
1934          strcat(fileName, "$(LP)");
1935       // !!! ReplaceSpaces must be done after all PathCat calls !!!
1936       // ReplaceSpaces(s, GetTargetFileName(config));
1937       strcat(fileName, GetTargetFileName(config));
1938       switch(targetType)
1939       {
1940          case executable:
1941             strcat(fileName, "$(E)");
1942             break;
1943          case sharedLibrary:
1944             strcat(fileName, "$(SO)");
1945             break;
1946          case staticLibrary:
1947             strcat(fileName, "$(A)");
1948             break;
1949       }
1950    }
1951
1952    bool GenerateCrossPlatformMk()
1953    {
1954       bool result = false;
1955       char path[MAX_LOCATION];
1956
1957       if(!GetProjectCompilerConfigsDir(path, false, false))
1958          GetIDECompilerConfigsDir(path, false, false);
1959
1960       if(!FileExists(path).isDirectory)
1961       {
1962          MakeDir(path);
1963          {
1964             char dirName[MAX_FILENAME];
1965             GetLastDirectory(path, dirName);
1966             if(!strcmp(dirName, ".configs"))
1967                FileSetAttribs(path, FileAttribs { isHidden = true });
1968          }
1969       }
1970       PathCatSlash(path, "crossplatform.mk");
1971
1972       if(FileExists(path))
1973          DeleteFile(path);
1974       {
1975          File include = FileOpen(":crossplatform.mk", read);
1976          if(include)
1977          {
1978             File f = FileOpen(path, write);
1979             if(f)
1980             {
1981                for(; !include.Eof(); )
1982                {
1983                   char buffer[4096];
1984                   int count = include.Read(buffer, 1, 4096);
1985                   f.Write(buffer, 1, count);
1986                }
1987                delete f;
1988
1989                result = true;
1990             }
1991             delete include;
1992          }
1993       }
1994       return result;
1995    }
1996
1997    bool GenerateCompilerCf(CompilerConfig compiler)
1998    {
1999       bool result = false;
2000       char path[MAX_LOCATION];
2001       char * name;
2002       char * compilerName;
2003       bool gccCompiler = compiler.ccCommand && (strstr(compiler.ccCommand, "gcc") != null || strstr(compiler.ccCommand, "g++") != null);
2004       Platform platform = compiler.targetPlatform;
2005
2006       compilerName = CopyString(compiler.name);
2007       CamelCase(compilerName);
2008       name = PrintString(platform, "-", compilerName, ".cf");
2009
2010       if(!GetProjectCompilerConfigsDir(path, false, false))
2011          GetIDECompilerConfigsDir(path, false, false);
2012
2013       if(!FileExists(path).isDirectory)
2014       {
2015          MakeDir(path);
2016          {
2017             char dirName[MAX_FILENAME];
2018             GetLastDirectory(path, dirName);
2019             if(!strcmp(dirName, ".configs"))
2020                FileSetAttribs(path, FileAttribs { isHidden = true });
2021          }
2022       }
2023       PathCatSlash(path, name);
2024
2025       if(FileExists(path))
2026          DeleteFile(path);
2027       {
2028          File f = FileOpen(path, write);
2029          if(f)
2030          {
2031             f.Puts("# TOOLCHAIN\n");
2032             f.Puts("\n");
2033
2034             if(compiler.gccPrefix && compiler.gccPrefix[0])
2035             {
2036                f.Printf("GCC_PREFIX := %s\n", compiler.gccPrefix);
2037                f.Puts("\n");
2038             }
2039             if(compiler.sysroot && compiler.sysroot[0])
2040             {
2041                f.Printf("SYSROOT := %s\n", compiler.sysroot);
2042                f.Puts("_SYSROOT := $(space)--sysroot=$(SYSROOT)\n");
2043                f.Puts("\n");
2044             }
2045
2046             //f.Printf("SHELL := %s\n", "sh"/*compiler.shellCommand*/); // is this really needed?
2047             f.Printf("CPP := $(CCACHE_COMPILE)$(DISTCC_COMPILE)$(GCC_PREFIX)%s$(_SYSROOT)\n", compiler.cppCommand);
2048             f.Printf("CC := $(CCACHE_COMPILE)$(DISTCC_COMPILE)$(GCC_PREFIX)%s$(_SYSROOT)\n", compiler.ccCommand);
2049             f.Printf("CXX := $(CCACHE_COMPILE)$(DISTCC_COMPILE)$(GCC_PREFIX)%s$(_SYSROOT)\n", compiler.cxxCommand);
2050             f.Printf("ECP := %s\n", compiler.ecpCommand);
2051             f.Printf("ECC := %s$(if $(CROSS_TARGET), -t $(TARGET_PLATFORM),)\n", compiler.eccCommand);
2052             f.Printf("ECS := %s$(if $(CROSS_TARGET), -t $(TARGET_PLATFORM),)\n", compiler.ecsCommand);
2053             f.Printf("EAR := %s\n", compiler.earCommand);
2054
2055             f.Puts("AS := $(GCC_PREFIX)as\n");
2056             f.Puts("LD := $(GCC_PREFIX)ld\n");
2057             f.Puts("AR := $(GCC_PREFIX)ar\n");
2058             f.Puts("STRIP := $(GCC_PREFIX)strip\n");
2059             f.Puts("UPX := upx\n");
2060             f.Puts("\n");
2061
2062             if(compiler.environmentVars && compiler.environmentVars.count)
2063             {
2064                f.Puts("# ENVIRONMENT VARIABLES\n");
2065                f.Puts("\n");
2066                for(e : compiler.environmentVars)
2067                {
2068                   f.Printf("export %s := %s\n", e.name, e.string);
2069                }
2070             }
2071
2072             f.Puts("UPXFLAGS = -9\n"); // TOFEAT: Compression Level Option? Other UPX Options?
2073             f.Puts("\n");
2074
2075             f.Puts("EARFLAGS = aw\n");
2076             f.Puts("\n");
2077
2078             f.Puts("# HARD CODED TARGET_PLATFORM-SPECIFIC OPTIONS\n");
2079             f.Printf("LDFLAGS +=$(if $(%s), -Wl,--no-undefined,)\n", PlatformToMakefileTargetVariable(tux));
2080             f.Puts("\n");
2081
2082             // JF's
2083             f.Printf("LDFLAGS +=$(if $(%s), -framework cocoa -framework OpenGL,)\n", PlatformToMakefileTargetVariable(apple));
2084
2085             if(gccCompiler)
2086             {
2087                f.Puts("\nCFLAGS += -fmessage-length=0\n");
2088             }
2089
2090             if(compiler.includeDirs && compiler.includeDirs.count)
2091             {
2092                f.Puts("\nCFLAGS +=");
2093                OutputListOption(f, gccCompiler ? "isystem " : "I", compiler.includeDirs, lineEach, true);
2094                f.Puts("\n");
2095             }
2096             if(compiler.prepDirectives && compiler.prepDirectives.count)
2097             {
2098                f.Puts("\nCFLAGS +=");
2099                OutputListOption(f, "D", compiler.prepDirectives, inPlace, true);
2100                f.Puts("\n");
2101             }
2102             if(compiler.libraryDirs && compiler.libraryDirs.count)
2103             {
2104                f.Puts("\nLDFLAGS +=");
2105                OutputListOption(f, "L", compiler.libraryDirs, lineEach, true);
2106                // We would need a bool option to know whether we want to add to rpath as well...
2107                // OutputListOption(f, "Wl,-rpath ", compiler.libraryDirs, lineEach, true);
2108                f.Puts("\n");
2109             }
2110             if(compiler.excludeLibs && compiler.excludeLibs.count)
2111             {
2112                f.Puts("\nEXCLUDED_LIBS =");
2113                for(l : compiler.excludeLibs)
2114                {
2115                   f.Puts(" ");
2116                   f.Puts(l);
2117                }
2118             }
2119             if(compiler.linkerFlags && compiler.linkerFlags.count)
2120             {
2121                f.Puts("\nLDFLAGS +=");
2122                OutputListOption(f, "Wl,", compiler.linkerFlags, inPlace, true);
2123                f.Puts("\n");
2124             }
2125             f.Printf("\nFORCE_64_BIT := %s", compiler.supportsBitDepth ? "-m64" : "");
2126             f.Printf("\nFORCE_32_BIT := %s", compiler.supportsBitDepth ? "-m32" : "");
2127             f.Puts("\n");
2128
2129             delete f;
2130          }
2131       }
2132       delete name;
2133       delete compilerName;
2134       return result;
2135    }
2136
2137    bool GenerateMakefile(char * altMakefilePath, bool noResources, char * includemkPath, ProjectConfig config)
2138    {
2139       bool result = false;
2140       char filePath[MAX_LOCATION];
2141       char makeFile[MAX_LOCATION];
2142       // PathBackup pathBackup { };
2143       // char oldDirectory[MAX_LOCATION];
2144       File f = null;
2145
2146       if(!altMakefilePath)
2147       {
2148          strcpy(filePath, topNode.path);
2149          CatMakeFileName(makeFile, config);
2150          PathCatSlash(filePath, makeFile);
2151       }
2152
2153       f = FileOpen(altMakefilePath ? altMakefilePath : filePath, write);
2154
2155       /*SetPath(false, compiler, config);
2156       GetWorkingDir(oldDirectory, MAX_LOCATION);
2157       ChangeWorkingDir(topNode.path);*/
2158
2159       if(f)
2160       {
2161          bool test;
2162          int ifCount;
2163          Platform platform;
2164          char targetDir[MAX_LOCATION];
2165          char objDirExpNoSpaces[MAX_LOCATION];
2166          char objDirNoSpaces[MAX_LOCATION];
2167          char resDirNoSpaces[MAX_LOCATION];
2168          char targetDirExpNoSpaces[MAX_LOCATION];
2169          char fixedModuleName[MAX_FILENAME];
2170          char fixedConfigName[MAX_FILENAME];
2171          int c, len;
2172          // Non-zero if we're building eC code
2173          // We'll have to be careful with this when merging configs where eC files can be excluded in some configs and included in others
2174          int numCObjects = 0;
2175          int numObjects = 0;
2176          bool containsCXX = false; // True if the project contains a C++ file
2177          bool sameObjTargetDirs;
2178          String objDirExp = GetObjDirExpression(config);
2179          TargetTypes targetType = GetTargetType(config);
2180
2181          char cfDir[MAX_LOCATION];
2182          int objectsParts = 0, eCsourcesParts = 0;
2183          Array<String> listItems { };
2184          Map<String, int> varStringLenDiffs { };
2185          Map<String, NameCollisionInfo> namesInfo { };
2186          bool forceBitDepth = false;
2187
2188          Map<String, int> cflagsVariations { };
2189          Map<int, int> nodeCFlagsMapping { };
2190
2191          Map<String, int> ecflagsVariations { };
2192          Map<int, int> nodeECFlagsMapping { };
2193
2194          ReplaceSpaces(objDirNoSpaces, objDirExp);
2195          strcpy(targetDir, GetTargetDirExpression(config));
2196          ReplaceSpaces(targetDirExpNoSpaces, targetDir);
2197
2198          strcpy(objDirExpNoSpaces, GetObjDirExpression(config));
2199          ChangeCh(objDirExpNoSpaces, '\\', '/'); // TODO: this is a hack, paths should never include win32 path seperators - fix this in ProjectSettings and ProjectLoad instead
2200          ReplaceSpaces(objDirExpNoSpaces, objDirExpNoSpaces);
2201          ReplaceSpaces(resDirNoSpaces, resNode.path ? resNode.path : "");
2202          ReplaceSpaces(fixedModuleName, moduleName);
2203          ReplaceSpaces(fixedConfigName, GetConfigName(config));
2204          CamelCase(fixedConfigName);
2205
2206          sameObjTargetDirs = !fstrcmp(objDirExpNoSpaces, targetDirExpNoSpaces);
2207
2208          f.Printf(".PHONY: all objdir%s clean realclean distclean\n\n", sameObjTargetDirs ? "" : " targetdir");
2209
2210          f.Puts("# CORE VARIABLES\n\n");
2211
2212          f.Printf("MODULE := %s\n", fixedModuleName);
2213          //f.Printf("VERSION = %s\n", version);
2214          f.Printf("CONFIG := %s\n", fixedConfigName);
2215          f.Puts("ifndef COMPILER\n" "COMPILER := default\n" "endif\n");
2216          f.Puts("\n");
2217
2218          test = GetTargetTypeIsSetByPlatform(config);
2219          if(test)
2220          {
2221             ifCount = 0;
2222             for(platform = (Platform)1; platform < Platform::enumSize; platform++)
2223             {
2224                TargetTypes targetType;
2225                PlatformOptions projectPOs, configPOs;
2226                MatchProjectAndConfigPlatformOptions(config, platform, &projectPOs, &configPOs);
2227                targetType = platformTargetType;
2228                if(targetType)
2229                {
2230                   if(ifCount)
2231                      f.Puts("else\n");
2232                   ifCount++;
2233                   f.Printf("ifdef %s\n", PlatformToMakefileTargetVariable(platform));
2234                   f.Printf("TARGET_TYPE = %s\n", TargetTypeToMakefileVariable(targetType));
2235                }
2236             }
2237             f.Puts("else\n");
2238          }
2239          f.Printf("TARGET_TYPE = %s\n", TargetTypeToMakefileVariable(targetType));
2240          if(test)
2241          {
2242             if(ifCount)
2243             {
2244                for(c = 0; c < ifCount; c++)
2245                   f.Puts("endif\n");
2246             }
2247          }
2248          f.Puts("\n");
2249
2250          f.Puts("# FLAGS\n\n");
2251
2252          f.Puts("ECFLAGS =\n");
2253          f.Puts("ifndef DEBIAN_PACKAGE\n" "CFLAGS =\n" "endif\n");
2254          f.Puts("CECFLAGS =\n");
2255          f.Puts("OFLAGS =\n");
2256          f.Puts("LDFLAGS =\n");
2257          f.Puts("LIBS =\n");
2258          f.Puts("\n");
2259
2260          f.Puts("ifdef DEBUG\n" "NOSTRIP := y\n" "endif\n");
2261          f.Puts("\n");
2262
2263          // Important: We cannot use this ifdef anymore, EXECUTABLE_TARGET is not yet defined. It's embedded in the crossplatform.mk EXECUTABLE
2264          //f.Puts("ifdef EXECUTABLE_TARGET\n");
2265          f.Printf("CONSOLE = %s\n", GetConsole(config) ? "-mconsole" : "-mwindows");
2266          //f.Puts("endif\n");
2267          f.Puts("\n");
2268
2269          f.Puts("# INCLUDES\n\n");
2270
2271          if(compilerConfigsDir && compilerConfigsDir[0])
2272          {
2273             strcpy(cfDir, compilerConfigsDir);
2274             if(cfDir && cfDir[0] && cfDir[strlen(cfDir)-1] != '/')
2275                strcat(cfDir, "/");
2276          }
2277          else
2278          {
2279             GetIDECompilerConfigsDir(cfDir, true, true);
2280             // Use CF_DIR environment variable for absolute paths only
2281             if(cfDir[0] == '/' || (cfDir[0] && cfDir[1] == ':'))
2282                strcpy(cfDir, "$(CF_DIR)");
2283          }
2284
2285          f.Printf("_CF_DIR = %s\n", cfDir);
2286          f.Puts("\n");
2287
2288          f.Printf("include %s\n", includemkPath ? includemkPath : "$(_CF_DIR)crossplatform.mk");
2289          f.Puts("include $(_CF_DIR)$(TARGET_PLATFORM)-$(COMPILER).cf\n");
2290          f.Puts("\n");
2291
2292          f.Puts("# POST-INCLUDES VARIABLES\n\n");
2293
2294          f.Printf("OBJ = %s%s\n", objDirExpNoSpaces, objDirExpNoSpaces[0] ? "/" : "");
2295          f.Puts("\n");
2296
2297          f.Printf("RES = %s%s\n", resDirNoSpaces, resDirNoSpaces[0] ? "/" : "");
2298          f.Puts("\n");
2299
2300          // test = GetTargetTypeIsSetByPlatform(config);
2301          {
2302             char target[MAX_LOCATION];
2303             char targetNoSpaces[MAX_LOCATION];
2304             if(test)
2305             {
2306                TargetTypes type;
2307                ifCount = 0;
2308                for(type = (TargetTypes)1; type < TargetTypes::enumSize; type++)
2309                {
2310                   if(type != targetType)
2311                   {
2312                      if(ifCount)
2313                         f.Puts("else\n");
2314                      ifCount++;
2315                      f.Printf("ifeq \"$(TARGET_TYPE)\" \"%s\"\n", TargetTypeToMakefileVariable(type));
2316
2317                      GetMakefileTargetFileName(type, target, config);
2318                      strcpy(targetNoSpaces, targetDir);
2319                      PathCatSlash(targetNoSpaces, target);
2320                      ReplaceSpaces(targetNoSpaces, targetNoSpaces);
2321                      f.Printf("TARGET = %s\n", targetNoSpaces);
2322                   }
2323                }
2324                f.Puts("else\n");
2325             }
2326             GetMakefileTargetFileName(targetType, target, config);
2327             strcpy(targetNoSpaces, targetDir);
2328             PathCatSlash(targetNoSpaces, target);
2329             ReplaceSpaces(targetNoSpaces, targetNoSpaces);
2330             f.Printf("TARGET = %s\n", targetNoSpaces);
2331
2332             if(test)
2333             {
2334                if(ifCount)
2335                {
2336                   for(c = 0; c < ifCount; c++)
2337                      f.Puts("endif\n");
2338                }
2339             }
2340          }
2341          f.Puts("\n");
2342
2343          // Use something fixed here, to not cause Makefile differences across compilers...
2344          varStringLenDiffs["$(OBJ)"] = 30; // strlen("obj/memoryGuard.android.gcc-4.6.2") - 6;
2345          // varStringLenDiffs["$(OBJ)"] = strlen(objDirNoSpaces) - 6;
2346
2347          topNode.GenMakefileGetNameCollisionInfo(namesInfo, config);
2348
2349          {
2350             int c;
2351             char * map[5][2] = { { "COBJECTS", "C" }, { "SYMBOLS", "S" }, { "IMPORTS", "I" }, { "ECOBJECTS", "O" }, { "BOWLS", "B" } };
2352
2353             numCObjects = topNode.GenMakefilePrintNode(f, this, eCsources, namesInfo, listItems, config, null);
2354             if(numCObjects)
2355             {
2356                eCsourcesParts = OutputFileList(f, "_ECSOURCES", listItems, varStringLenDiffs, null);
2357
2358                f.Puts("ECSOURCES = $(call shwspace,$(_ECSOURCES))\n");
2359                if(eCsourcesParts > 1)
2360                {
2361                   for(c = 1; c <= eCsourcesParts; c++)
2362                      f.Printf("ECSOURCES%d = $(call shwspace,$(_ECSOURCES%d))\n", c, c);
2363                }
2364                f.Puts("\n");
2365
2366                for(c = 0; c < 5; c++)
2367                {
2368                   if(eCsourcesParts > 1)
2369                   {
2370                      int n;
2371                      f.Printf("%s =", map[c][0]);
2372                      for(n = 1; n <= eCsourcesParts; n++)
2373                         f.Printf(" $(%s%d)", map[c][0], n);
2374                      f.Puts("\n");
2375                      for(n = 1; n <= eCsourcesParts; n++)
2376                         f.Printf("%s%d = $(call shwspace,$(addprefix $(OBJ),$(patsubst %%.ec,%%$(%s),$(notdir $(_ECSOURCES%d)))))\n", map[c][0], n, map[c][1], n);
2377                   }
2378                   else if(eCsourcesParts == 1)
2379                      f.Printf("%s = $(call shwspace,$(addprefix $(OBJ),$(patsubst %%.ec,%%$(%s),$(notdir $(_ECSOURCES)))))\n", map[c][0], map[c][1]);
2380                   f.Puts("\n");
2381                }
2382             }
2383          }
2384
2385          numObjects = topNode.GenMakefilePrintNode(f, this, objects, namesInfo, listItems, config, &containsCXX);
2386          if(numObjects)
2387             objectsParts = OutputFileList(f, "_OBJECTS", listItems, varStringLenDiffs, null);
2388          f.Printf("OBJECTS =%s%s%s\n", numObjects ? " $(_OBJECTS)" : "", numCObjects ? " $(ECOBJECTS)" : "", numCObjects ? " $(OBJ)$(MODULE).main$(O)" : "");
2389          f.Puts("\n");
2390
2391          topNode.GenMakefilePrintNode(f, this, sources, null, listItems, config, null);
2392          OutputFileList(f, "SOURCES", listItems, varStringLenDiffs, numCObjects ? "$(ECSOURCES)" : null);
2393
2394          if(!noResources)
2395             resNode.GenMakefilePrintNode(f, this, resources, null, listItems, config, null);
2396          OutputFileList(f, "RESOURCES", listItems, varStringLenDiffs, null);
2397
2398          f.Puts("LIBS += $(SHAREDLIB) $(EXECUTABLE) $(LINKOPT)\n");
2399          f.Puts("\n");
2400          if((config && config.options && config.options.libraries) ||
2401                (options && options.libraries))
2402          {
2403             f.Puts("ifndef STATIC_LIBRARY_TARGET\n");
2404             f.Puts("LIBS +=");
2405             if(config && config.options && config.options.libraries)
2406                OutputLibraries(f, config.options.libraries);
2407             else if(options && options.libraries)
2408                OutputLibraries(f, options.libraries);
2409             f.Puts("\n");
2410             f.Puts("endif\n");
2411             f.Puts("\n");
2412          }
2413
2414          topNode.GenMakeCollectAssignNodeFlags(config, numCObjects,
2415                cflagsVariations, nodeCFlagsMapping,
2416                ecflagsVariations, nodeECFlagsMapping, null);
2417
2418          GenMakePrintCustomFlags(f, "CFLAGS", false, cflagsVariations);
2419          GenMakePrintCustomFlags(f, "ECFLAGS", true, ecflagsVariations);
2420
2421          if(platforms || (config && config.platforms))
2422          {
2423             ifCount = 0;
2424             //for(platform = firstPlatform; platform <= lastPlatform; platform++)
2425             //for(platform = win32; platform <= apple; platform++)
2426
2427             f.Puts("# PLATFORM-SPECIFIC OPTIONS\n\n");
2428             for(platform = (Platform)1; platform < Platform::enumSize; platform++)
2429             {
2430                PlatformOptions projectPlatformOptions, configPlatformOptions;
2431                MatchProjectAndConfigPlatformOptions(config, platform, &projectPlatformOptions, &configPlatformOptions);
2432
2433                if(projectPlatformOptions || configPlatformOptions)
2434                {
2435                   if(ifCount)
2436                      f.Puts("else\n");
2437                   ifCount++;
2438                   f.Printf("ifdef %s\n", PlatformToMakefileTargetVariable(platform));
2439                   f.Puts("\n");
2440
2441                   if((projectPlatformOptions && projectPlatformOptions.options.linkerOptions && projectPlatformOptions.options.linkerOptions.count) ||
2442                      (configPlatformOptions && configPlatformOptions.options.linkerOptions && configPlatformOptions.options.linkerOptions.count))
2443                   {
2444                      f.Puts("CFLAGS +=");
2445                      // tocheck: does any of that -Wl stuff from linkerOptions have any business being in CFLAGS?
2446                      if(projectPlatformOptions && projectPlatformOptions.options.linkerOptions && projectPlatformOptions.options.linkerOptions.count)
2447                      {
2448                         f.Puts(" \\\n\t -Wl");
2449                         for(s : projectPlatformOptions.options.linkerOptions)
2450                            f.Printf(",%s", s);
2451                      }
2452                      if(configPlatformOptions && configPlatformOptions.options.linkerOptions && configPlatformOptions.options.linkerOptions.count)
2453                      {
2454                         f.Puts(" \\\n\t -Wl");
2455                         for(s : configPlatformOptions.options.linkerOptions)
2456                            f.Printf(",%s", s);
2457                      }
2458                      f.Puts("\n");
2459                      f.Puts("\n");
2460                   }
2461
2462                   if((projectPlatformOptions && projectPlatformOptions.options.libraryDirs && projectPlatformOptions.options.libraryDirs.count) ||
2463                         (configPlatformOptions && configPlatformOptions.options.libraryDirs && configPlatformOptions.options.libraryDirs.count) ||
2464                         (projectPlatformOptions && projectPlatformOptions.options.libraries && projectPlatformOptions.options.libraries.count) ||
2465                         (configPlatformOptions && configPlatformOptions.options.libraries && configPlatformOptions.options.libraries.count))
2466                   {
2467                      f.Puts("ifndef STATIC_LIBRARY_TARGET\n");
2468                      if((projectPlatformOptions && projectPlatformOptions.options.libraryDirs && projectPlatformOptions.options.libraryDirs.count) ||
2469                         (configPlatformOptions && configPlatformOptions.options.libraryDirs && configPlatformOptions.options.libraryDirs.count))
2470                      {
2471                         f.Puts("OFLAGS +=");
2472                         if(configPlatformOptions && configPlatformOptions.options.libraryDirs)
2473                            OutputListOption(f, "L", configPlatformOptions.options.libraryDirs, lineEach, true);
2474                         if(projectPlatformOptions && projectPlatformOptions.options.libraryDirs)
2475                            OutputListOption(f, "L", projectPlatformOptions.options.libraryDirs, lineEach, true);
2476                         f.Puts("\n");
2477                      }
2478
2479                      if((configPlatformOptions && configPlatformOptions.options.libraries))
2480                      {
2481                         if(configPlatformOptions.options.libraries.count)
2482                         {
2483                            f.Puts("LIBS +=");
2484                            OutputLibraries(f, configPlatformOptions.options.libraries);
2485                            f.Puts("\n");
2486                         }
2487                      }
2488                      else if(projectPlatformOptions && projectPlatformOptions.options.libraries)
2489                      {
2490                         if(projectPlatformOptions.options.libraries.count)
2491                         {
2492                            f.Puts("LIBS +=");
2493                            OutputLibraries(f, projectPlatformOptions.options.libraries);
2494                            f.Puts("\n");
2495                         }
2496                      }
2497                      f.Puts("endif\n");
2498                      f.Puts("\n");
2499                   }
2500                }
2501             }
2502             if(ifCount)
2503             {
2504                for(c = 0; c < ifCount; c++)
2505                   f.Puts("endif\n");
2506             }
2507             f.Puts("\n");
2508          }
2509
2510          // tocheck: does any of that -Wl stuff from linkerOptions have any business being in CFLAGS?
2511          if(options && options.linkerOptions && options.linkerOptions.count)
2512          {
2513             f.Puts("CFLAGS +=");
2514             f.Puts(" \\\n\t -Wl");
2515             for(s : options.linkerOptions)
2516                f.Printf(",%s", s);
2517          }
2518          f.Puts("\n");
2519          f.Puts("\n");
2520
2521          f.Puts("CECFLAGS += -cpp $(_CPP)");
2522          f.Puts("\n");
2523          f.Puts("\n");
2524
2525          f.Puts("ifndef STATIC_LIBRARY_TARGET\n");
2526          f.Puts("OFLAGS +=");
2527          forceBitDepth = (options && options.buildBitDepth) || numCObjects;
2528          if(forceBitDepth)
2529             f.Puts((!options || !options.buildBitDepth || options.buildBitDepth == bits32) ? " $(FORCE_32_BIT)" : " $(FORCE_64_BIT) \\\n");
2530
2531          if(GetProfile(config))
2532             f.Puts(" -pg");
2533          if(config && config.options && config.options.libraryDirs)
2534             OutputListOption(f, "L", config.options.libraryDirs, lineEach, true);
2535          if(options && options.libraryDirs)
2536             OutputListOption(f, "L", options.libraryDirs, lineEach, true);
2537          f.Puts("\n");
2538          f.Puts("OFLAGS += $(LDFLAGS)\n");
2539          f.Puts("endif\n");
2540          f.Puts("\n");
2541
2542          f.Puts("# TARGETS\n");
2543          f.Puts("\n");
2544
2545          f.Printf("all: objdir%s $(TARGET)\n", sameObjTargetDirs ? "" : " targetdir");
2546          f.Puts("\n");
2547
2548          f.Puts("objdir:\n");
2549             f.Puts("\t$(if $(wildcard $(OBJ)),,$(call mkdirq,$(OBJ)))\n");
2550          //f.Puts("# PRE-BUILD COMMANDS\n");
2551          if(options && options.prebuildCommands)
2552          {
2553             for(s : options.prebuildCommands)
2554                if(s && s[0]) f.Printf("\t%s\n", s);
2555          }
2556          if(config && config.options && config.options.prebuildCommands)
2557          {
2558             for(s : config.options.prebuildCommands)
2559                if(s && s[0]) f.Printf("\t%s\n", s);
2560          }
2561          if(platforms || (config && config.platforms))
2562          {
2563             ifCount = 0;
2564             //f.Puts("# TARGET_PLATFORM-SPECIFIC PRE-BUILD COMMANDS\n");
2565             for(platform = (Platform)1; platform < Platform::enumSize; platform++)
2566             {
2567                PlatformOptions projectPOs, configPOs;
2568                MatchProjectAndConfigPlatformOptions(config, platform, &projectPOs, &configPOs);
2569
2570                if((projectPOs && projectPOs.options.prebuildCommands && projectPOs.options.prebuildCommands.count) ||
2571                      (configPOs && configPOs.options.prebuildCommands && configPOs.options.prebuildCommands.count))
2572                {
2573                   if(ifCount)
2574                      f.Puts("else\n");
2575                   ifCount++;
2576                   f.Printf("ifdef %s\n", PlatformToMakefileTargetVariable(platform));
2577
2578                   if(projectPOs && projectPOs.options.prebuildCommands && projectPOs.options.prebuildCommands.count)
2579                   {
2580                      for(s : projectPOs.options.prebuildCommands)
2581                         if(s && s[0]) f.Printf("\t%s\n", s);
2582                   }
2583                   if(configPOs && configPOs.options.prebuildCommands && configPOs.options.prebuildCommands.count)
2584                   {
2585                      for(s : configPOs.options.prebuildCommands)
2586                         if(s && s[0]) f.Printf("\t%s\n", s);
2587                   }
2588                }
2589             }
2590             if(ifCount)
2591             {
2592                int c;
2593                for(c = 0; c < ifCount; c++)
2594                   f.Puts("endif\n");
2595             }
2596          }
2597          f.Puts("\n");
2598
2599          if(!sameObjTargetDirs)
2600          {
2601             f.Puts("targetdir:\n");
2602                f.Printf("\t$(if $(wildcard %s),,$(call mkdirq,%s))\n", targetDirExpNoSpaces, targetDirExpNoSpaces);
2603             f.Puts("\n");
2604          }
2605
2606          if(numCObjects)
2607          {
2608             // Main Module (Linking) for ECERE C modules
2609             f.Puts("$(OBJ)$(MODULE).main.ec: $(SYMBOLS) $(COBJECTS)\n");
2610             // use of objDirExpNoSpaces used instead of $(OBJ) to prevent problematic joining of arguments in ecs
2611             f.Printf("\t$(ECS)%s $(ECSLIBOPT) $(SYMBOLS) $(IMPORTS) -symbols %s -o $(OBJ)$(MODULE).main.ec\n",
2612                GetConsole(config) ? " -console" : "", objDirExpNoSpaces);
2613             f.Puts("\n");
2614             // Main Module (Linking) for ECERE C modules
2615             f.Puts("$(OBJ)$(MODULE).main.c: $(OBJ)$(MODULE).main.ec\n");
2616             f.Puts("\t$(ECP) $(CECFLAGS) $(ECFLAGS) $(CFLAGS)"
2617                   " -c $(OBJ)$(MODULE).main.ec -o $(OBJ)$(MODULE).main.sym -symbols $(OBJ)\n");
2618             f.Puts("\t$(ECC) $(CECFLAGS) $(ECFLAGS) $(CFLAGS) $(FVISIBILITY)"
2619                   " -c $(OBJ)$(MODULE).main.ec -o $(OBJ)$(MODULE).main.c -symbols $(OBJ)\n");
2620             f.Puts("\n");
2621          }
2622
2623          // *** Target ***
2624
2625          // This would not rebuild the target on updated objects
2626          // f.Printf("$(TARGET): $(SOURCES) $(RESOURCES) | objdir $(SYMBOLS) $(OBJECTS)%s\n", sameObjTargetDirs ? "" : " targetdir");
2627
2628          // This should fix it for good!
2629          f.Puts("$(SYMBOLS): | objdir\n");
2630          f.Puts("$(OBJECTS): | objdir\n");
2631
2632          // This alone was breaking the tarball, object directory does not get created first (order-only rules happen last it seems!)
2633          f.Printf("$(TARGET): $(SOURCES) $(RESOURCES) $(SYMBOLS) $(OBJECTS) | objdir%s\n", sameObjTargetDirs ? "" : " targetdir");
2634
2635          f.Puts("ifndef STATIC_LIBRARY_TARGET\n");
2636          f.Printf("\t$(%s) $(OFLAGS) $(OBJECTS) $(LIBS) %s-o $(TARGET) $(INSTALLNAME)\n", containsCXX ? "CXX" : "CC", containsCXX ? "-lstdc++ " : "");
2637          if(!GetDebug(config))
2638          {
2639             f.Puts("ifndef NOSTRIP\n");
2640             f.Puts("\t$(STRIP) $(STRIPOPT) $(TARGET)\n");
2641             f.Puts("endif\n");
2642
2643             if(GetCompress(config))
2644             {
2645                f.Printf("ifndef %s\n", PlatformToMakefileTargetVariable(win32));
2646                f.Puts("ifdef EXECUTABLE_TARGET\n");
2647                   f.Puts("\t$(UPX) $(UPXFLAGS) $(TARGET)\n");
2648                f.Puts("endif\n");
2649                f.Puts("else\n");
2650                   f.Puts("\t$(UPX) $(UPXFLAGS) $(TARGET)\n");
2651                f.Puts("endif\n");
2652             }
2653          }
2654          if(resNode.files && resNode.files.count && !noResources)
2655             resNode.GenMakefileAddResources(f, resNode.path, config);
2656          f.Puts("else\n");
2657          f.Puts("\t$(AR) rcs $(TARGET) $(OBJECTS) $(LIBS)\n");
2658          f.Puts("endif\n");
2659
2660          //f.Puts("# POST-BUILD COMMANDS\n");
2661          if(options && options.postbuildCommands)
2662          {
2663             for(s : options.postbuildCommands)
2664                if(s && s[0]) f.Printf("\t%s\n", s);
2665          }
2666          if(config && config.options && config.options.postbuildCommands)
2667          {
2668             for(s : config.options.postbuildCommands)
2669                if(s && s[0]) f.Printf("\t%s\n", s);
2670          }
2671          if(platforms || (config && config.platforms))
2672          {
2673             ifCount = 0;
2674             //f.Puts("# TARGET_PLATFORM-SPECIFIC POST-BUILD COMMANDS\n");
2675             for(platform = (Platform)1; platform < Platform::enumSize; platform++)
2676             {
2677                PlatformOptions projectPOs, configPOs;
2678                MatchProjectAndConfigPlatformOptions(config, platform, &projectPOs, &configPOs);
2679
2680                if((projectPOs && projectPOs.options.postbuildCommands && projectPOs.options.postbuildCommands.count) ||
2681                      (configPOs && configPOs.options.postbuildCommands && configPOs.options.postbuildCommands.count))
2682                {
2683                   if(ifCount)
2684                      f.Puts("else\n");
2685                   ifCount++;
2686                   f.Printf("ifdef %s\n", PlatformToMakefileTargetVariable(platform));
2687
2688                   if(projectPOs && projectPOs.options.postbuildCommands && projectPOs.options.postbuildCommands.count)
2689                   {
2690                      for(s : projectPOs.options.postbuildCommands)
2691                         if(s && s[0]) f.Printf("\t%s\n", s);
2692                   }
2693                   if(configPOs && configPOs.options.postbuildCommands && configPOs.options.postbuildCommands.count)
2694                   {
2695                      for(s : configPOs.options.postbuildCommands)
2696                         if(s && s[0]) f.Printf("\t%s\n", s);
2697                   }
2698                }
2699             }
2700             if(ifCount)
2701             {
2702                int c;
2703                for(c = 0; c < ifCount; c++)
2704                   f.Puts("endif\n");
2705             }
2706          }
2707          f.Puts("\n");
2708
2709          f.Puts("# SYMBOL RULES\n");
2710          f.Puts("\n");
2711          {
2712             Map<Platform, bool> excludedPlatforms { };
2713             topNode.GenMakefilePrintSymbolRules(f, this, config, excludedPlatforms,
2714                   nodeCFlagsMapping, nodeECFlagsMapping);
2715             delete excludedPlatforms;
2716          }
2717
2718          f.Puts("# C OBJECT RULES\n");
2719          f.Puts("\n");
2720          {
2721             Map<Platform, bool> excludedPlatforms { };
2722             topNode.GenMakefilePrintCObjectRules(f, this, config, excludedPlatforms,
2723                   nodeCFlagsMapping, nodeECFlagsMapping);
2724             delete excludedPlatforms;
2725          }
2726
2727          f.Puts("# OBJECT RULES\n");
2728          f.Puts("\n");
2729          // todo call this still but only generate rules whith specific options
2730          // see we-have-file-specific-options in ProjectNode.ec
2731          {
2732             Map<Platform, bool> excludedPlatforms { };
2733             topNode.GenMakefilePrintObjectRules(f, this, namesInfo, config, excludedPlatforms,
2734                   nodeCFlagsMapping, nodeECFlagsMapping);
2735             delete excludedPlatforms;
2736          }
2737
2738          if(numCObjects)
2739             GenMakefilePrintMainObjectRule(f, config);
2740
2741          f.Printf("clean: objdir%s\n", sameObjTargetDirs ? "" : " targetdir");
2742          f.Printf("\t$(call rmq,%s$(TARGET))\n", numCObjects ? "$(OBJ)$(MODULE).main.o $(OBJ)$(MODULE).main.c $(OBJ)$(MODULE).main.ec $(OBJ)$(MODULE).main$(I) $(OBJ)$(MODULE).main$(S) " : "");
2743          OutputCleanActions(f, "_OBJECTS", objectsParts);
2744          if(numCObjects)
2745          {
2746             OutputCleanActions(f, "ECOBJECTS", eCsourcesParts);
2747             OutputCleanActions(f, "COBJECTS", eCsourcesParts);
2748             OutputCleanActions(f, "BOWLS", eCsourcesParts);
2749             OutputCleanActions(f, "IMPORTS", eCsourcesParts);
2750             OutputCleanActions(f, "SYMBOLS", eCsourcesParts);
2751          }
2752          f.Puts("\n");
2753
2754          f.Puts("realclean: clean\n");
2755          f.Puts("\t$(call rmrq,$(OBJ))\n");
2756          if(!sameObjTargetDirs)
2757             f.Printf("\t$(call rmdirq,%s)\n", targetDirExpNoSpaces);
2758          f.Puts("\n");
2759
2760          f.Puts("distclean:\n");
2761          f.Puts("\t$(call rmrq,obj/)\n");
2762          f.Puts("\n");
2763
2764          delete f;
2765
2766          listItems.Free();
2767          delete listItems;
2768          varStringLenDiffs.Free();
2769          delete varStringLenDiffs;
2770          namesInfo.Free();
2771          delete namesInfo;
2772
2773          delete cflagsVariations;
2774          delete nodeCFlagsMapping;
2775          delete ecflagsVariations;
2776          delete nodeECFlagsMapping;
2777
2778          result = true;
2779       }
2780
2781       // ChangeWorkingDir(oldDirectory);
2782       // delete pathBackup;
2783
2784       if(config)
2785          config.makingModified = false;
2786       return result;
2787    }
2788
2789    void GenMakefilePrintMainObjectRule(File f, ProjectConfig config)
2790    {
2791       char extension[MAX_EXTENSION] = "c";
2792       char modulePath[MAX_LOCATION];
2793       char fixedModuleName[MAX_FILENAME];
2794       DualPipe dep;
2795       char command[2048];
2796       char objDirNoSpaces[MAX_LOCATION];
2797       String objDirExp = GetObjDirExpression(config);
2798
2799       ReplaceSpaces(objDirNoSpaces, objDirExp);
2800       ReplaceSpaces(fixedModuleName, moduleName);
2801
2802       //sprintf(fixedModuleName, "%s.main", fixedPrjName);
2803       //strcat(fixedModuleName, ".main");
2804
2805 #if 0       // TODO: Fix nospaces stuff
2806       // *** Dependency command ***
2807       sprintf(command, "gcc -MT $(OBJ)%s$(O) -MM $(OBJ)%s.c", fixedModuleName, fixedModuleName);
2808
2809       // System Includes (from global settings)
2810       for(item : compiler.dirs[Includes])
2811       {
2812          strcat(command, " -isystem ");
2813          if(strchr(item.name, ' '))
2814          {
2815             strcat(command, "\"");
2816             strcat(command, item);
2817             strcat(command, "\"");
2818          }
2819          else
2820             strcat(command, item);
2821       }
2822
2823       for(item = includeDirs.first; item; item = item.next)
2824       {
2825          strcat(command, " -I");
2826          if(strchr(item.name, ' '))
2827          {
2828             strcat(command, "\"");
2829             strcat(command, item.name);
2830             strcat(command, "\"");
2831          }
2832          else
2833             strcat(command, item.name);
2834       }
2835       for(item = preprocessorDefs.first; item; item = item.next)
2836       {
2837          strcat(command, " -D");
2838          strcat(command, item.name);
2839       }
2840
2841       // Execute it
2842       if((dep = DualPipeOpen(PipeOpenMode { output = 1, error = 1, input = 2 }, command)))
2843       {
2844          char line[1024];
2845          bool result = true;
2846          bool firstLine = true;
2847
2848          // To do some time: auto save external dependencies?
2849          while(!dep.Eof())
2850          {
2851             if(dep.GetLine(line, sizeof(line)-1))
2852             {
2853                if(firstLine)
2854                {
2855                   char * colon = strstr(line, ":");
2856                   if(strstr(line, "No such file") || strstr(line, ",") || (colon && strstr(colon+1, ":")))
2857                   {
2858                      result = false;
2859                      break;
2860                   }
2861                   firstLine = false;
2862                }
2863                f.Puts(line);
2864                f.Puts("\n");
2865             }
2866             if(!result) break;
2867          }
2868          delete dep;
2869
2870          // If we failed to generate dependencies...
2871          if(!result)
2872          {
2873 #endif
2874             f.Puts("$(OBJ)$(MODULE).main$(O): $(OBJ)$(MODULE).main.c\n");
2875 #if 0
2876          }
2877       }
2878 #endif
2879
2880       f.Printf("\t$(CC) $(CFLAGS) $(FVISIBILITY) -c $(OBJ)$(MODULE).main.%s -o $(OBJ)$(MODULE).main$(O)\n", extension);
2881       f.Puts("\n");
2882    }
2883
2884    void GenMakePrintCustomFlags(File f, String variableName, bool printNonCustom, Map<String, int> cflagsVariations)
2885    {
2886       int c;
2887       for(c = printNonCustom ? 0 : 1; c <= cflagsVariations.count; c++)
2888       {
2889          for(v : cflagsVariations)
2890          {
2891             if(v == c)
2892             {
2893                if(v == 1)
2894                   f.Printf("%s +=", variableName);
2895                else
2896                   f.Printf("CUSTOM%d_%s =", v-1, variableName);
2897                f.Puts(&v ? &v : "");
2898                f.Puts("\n");
2899                f.Puts("\n");
2900                break;
2901             }
2902          }
2903       }
2904       f.Puts("\n");
2905    }
2906
2907    void MatchProjectAndConfigPlatformOptions(ProjectConfig config, Platform platform,
2908          PlatformOptions * projectPlatformOptions, PlatformOptions * configPlatformOptions)
2909    {
2910       *projectPlatformOptions = null;
2911       *configPlatformOptions = null;
2912       if(platforms)
2913       {
2914          for(p : platforms)
2915          {
2916             if(!strcmpi(p.name, platform))
2917             {
2918                *projectPlatformOptions = p;
2919                break;
2920             }
2921          }
2922       }
2923       if(config && config.platforms)
2924       {
2925          for(p : config.platforms)
2926          {
2927             if(!strcmpi(p.name, platform))
2928             {
2929                *configPlatformOptions = p;
2930                break;
2931             }
2932          }
2933       }
2934    }
2935 }
2936
2937 Project LegacyBinaryLoadProject(File f, char * filePath)
2938 {
2939    Project project = null;
2940    char signature[sizeof(epjSignature)];
2941
2942    f.Read(signature, sizeof(signature), 1);
2943    if(!strncmp(signature, (char *)epjSignature, sizeof(epjSignature)))
2944    {
2945       char topNodePath[MAX_LOCATION];
2946       /*ProjectConfig newConfig
2947       {
2948          name = CopyString("Default");
2949          makingModified = true;
2950          compilingModified = true;
2951          linkingModified = true;
2952          options = { };
2953       };*/
2954
2955       project = Project { options = { } };
2956       LegacyBinaryLoadNode(project.topNode, f);
2957       delete project.topNode.path;
2958       GetWorkingDir(topNodePath, sizeof(topNodePath)-1);
2959       MakeSlashPath(topNodePath);
2960
2961       PathCatSlash(topNodePath, filePath);
2962       project.filePath = topNodePath;
2963
2964       /* THIS IS ALREADY DONE BY filePath property
2965       StripLastDirectory(topNodePath, topNodePath);
2966       project.topNode.path = CopyString(topNodePath);
2967       */
2968       // Shouldn't this be done BEFORE the StripLastDirectory? project.filePath = topNodePath;
2969
2970       // newConfig.options.defaultNameSpace = "";
2971       /*newConfig.objDir.dir = "obj";
2972       newConfig.targetDir.dir = "";*/
2973
2974       //project.configurations = { [ newConfig ] };
2975       //project.config = newConfig;
2976
2977       // Project Settings
2978       if(!f.Eof())
2979       {
2980          int temp;
2981          int len,c, count;
2982          String targetFileName, targetDirectory, objectsDirectory;
2983
2984          // { executable = 0, sharedLibrary = 1, staticLibrary = 2 };
2985          f.Read(&temp, sizeof(int),1);
2986          switch(temp)
2987          {
2988             case 0: project.options.targetType = executable; break;
2989             case 1: project.options.targetType = sharedLibrary; break;
2990             case 2: project.options.targetType = staticLibrary; break;
2991          }
2992
2993          f.Read(&len, sizeof(int),1);
2994          targetFileName = new char[len+1];
2995          f.Read(targetFileName, sizeof(char), len+1);
2996          project.options.targetFileName = targetFileName;
2997          delete targetFileName;
2998
2999          f.Read(&len, sizeof(int),1);
3000          targetDirectory = new char[len+1];
3001          f.Read(targetDirectory, sizeof(char), len+1);
3002          project.options.targetDirectory = targetDirectory;
3003          delete targetDirectory;
3004
3005          f.Read(&len, sizeof(int),1);
3006          objectsDirectory = new byte[len+1];
3007          f.Read(objectsDirectory, sizeof(char), len+1);
3008          project.options.objectsDirectory = objectsDirectory;
3009          delete objectsDirectory;
3010
3011          f.Read(&temp, sizeof(int),1);
3012          project./*config.*/options.debug = temp ? true : false;
3013          f.Read(&temp, sizeof(int),1);
3014          project./*config.*/options.optimization = temp ? speed : none;
3015          f.Read(&temp, sizeof(int),1);
3016          project./*config.*/options.profile = temp ? true : false;
3017          f.Read(&temp, sizeof(int),1);
3018          project.options.warnings = temp ? all : unset;
3019
3020          f.Read(&count, sizeof(int),1);
3021          if(count)
3022          {
3023             project.options.includeDirs = { };
3024             for(c = 0; c < count; c++)
3025             {
3026                char * name;
3027                f.Read(&len, sizeof(int),1);
3028                name = new char[len+1];
3029                f.Read(name, sizeof(char), len+1);
3030                project.options.includeDirs.Add(name);
3031             }
3032          }
3033
3034          f.Read(&count, sizeof(int),1);
3035          if(count)
3036          {
3037             project.options.libraryDirs = { };
3038             for(c = 0; c < count; c++)
3039             {
3040                char * name;
3041                f.Read(&len, sizeof(int),1);
3042                name = new char[len+1];
3043                f.Read(name, sizeof(char), len+1);
3044                project.options.libraryDirs.Add(name);
3045             }
3046          }
3047
3048          f.Read(&count, sizeof(int),1);
3049          if(count)
3050          {
3051             project.options.libraries = { };
3052             for(c = 0; c < count; c++)
3053             {
3054                char * name;
3055                f.Read(&len, sizeof(int),1);
3056                name = new char[len+1];
3057                f.Read(name, sizeof(char), len+1);
3058                project.options.libraries.Add(name);
3059             }
3060          }
3061
3062          f.Read(&count, sizeof(int),1);
3063          if(count)
3064          {
3065             project.options.preprocessorDefinitions = { };
3066             for(c = 0; c < count; c++)
3067             {
3068                char * name;
3069                f.Read(&len, sizeof(int),1);
3070                name = new char[len+1];
3071                f.Read(name, sizeof(char), len+1);
3072                project.options.preprocessorDefinitions.Add(name);
3073             }
3074          }
3075
3076          f.Read(&temp, sizeof(int),1);
3077          project.options.console = temp ? true : false;
3078       }
3079
3080       for(node : project.topNode.files)
3081       {
3082          if(node.type == resources)
3083          {
3084             project.resNode = node;
3085             break;
3086          }
3087       }
3088    }
3089    else
3090       f.Seek(0, start);
3091    return project;
3092 }
3093
3094 void ProjectConfig::LegacyProjectConfigLoad(File f)
3095 {
3096    delete options;
3097    options = { };
3098    while(!f.Eof())
3099    {
3100       char buffer[65536];
3101       char section[128];
3102       char subSection[128];
3103       char * equal;
3104       int len;
3105       uint pos;
3106
3107       pos = f.Tell();
3108       f.GetLine(buffer, 65536 - 1);
3109       TrimLSpaces(buffer, buffer);
3110       TrimRSpaces(buffer, buffer);
3111       if(strlen(buffer))
3112       {
3113          if(buffer[0] == '-')
3114          {
3115             equal = &buffer[0];
3116             equal[0] = ' ';
3117             TrimLSpaces(equal, equal);
3118             if(!strcmpi(subSection, "LibraryDirs"))
3119             {
3120                if(!options.libraryDirs)
3121                   options.libraryDirs = { [ CopyString(equal) ] };
3122                else
3123                   options.libraryDirs.Add(CopyString(equal));
3124             }
3125             else if(!strcmpi(subSection, "IncludeDirs"))
3126             {
3127                if(!options.includeDirs)
3128                   options.includeDirs = { [ CopyString(equal) ] };
3129                else
3130                   options.includeDirs.Add(CopyString(equal));
3131             }
3132          }
3133          else if(buffer[0] == '+')
3134          {
3135             if(name)
3136             {
3137                f.Seek(pos, start);
3138                break;
3139             }
3140             else
3141             {
3142                equal = &buffer[0];
3143                equal[0] = ' ';
3144                TrimLSpaces(equal, equal);
3145                delete name; name = CopyString(equal); // property::name = equal;
3146             }
3147          }
3148          else if(!strcmpi(buffer, "Compiler Options"))
3149             strcpy(section, buffer);
3150          else if(!strcmpi(buffer, "IncludeDirs"))
3151             strcpy(subSection, buffer);
3152          else if(!strcmpi(buffer, "Linker Options"))
3153             strcpy(section, buffer);
3154          else if(!strcmpi(buffer, "LibraryDirs"))
3155             strcpy(subSection, buffer);
3156          else if(!strcmpi(buffer, "Files") || !strcmpi(buffer, "Resources"))
3157          {
3158             f.Seek(pos, start);
3159             break;
3160          }
3161          else
3162          {
3163             equal = strstr(buffer, "=");
3164             if(equal)
3165             {
3166                equal[0] = '\0';
3167                TrimRSpaces(buffer, buffer);
3168                equal++;
3169                TrimLSpaces(equal, equal);
3170                if(!strcmpi(buffer, "Target Name"))
3171                   options.targetFileName = /*CopyString(*/equal/*)*/;
3172                else if(!strcmpi(buffer, "Target Type"))
3173                {
3174                   if(!strcmpi(equal, "Executable"))
3175                      options.targetType = executable;
3176                   else if(!strcmpi(equal, "Shared"))
3177                      options.targetType = sharedLibrary;
3178                   else if(!strcmpi(equal, "Static"))
3179                      options.targetType = staticLibrary;
3180                   else
3181                      options.targetType = executable;
3182                }
3183                else if(!strcmpi(buffer, "Target Directory"))
3184                   options.targetDirectory = /*CopyString(*/equal/*)*/;
3185                else if(!strcmpi(buffer, "Console"))
3186                   options.console = ParseTrueFalseValue(equal);
3187                else if(!strcmpi(buffer, "Libraries"))
3188                {
3189                   if(!options.libraries) options.libraries = { };
3190                   ParseArrayValue(options.libraries, equal);
3191                }
3192                else if(!strcmpi(buffer, "Intermediate Directory"))
3193                   options.objectsDirectory = /*CopyString(*/equal/*)*/; //objDir.expression = equal;
3194                else if(!strcmpi(buffer, "Debug"))
3195                   options.debug = ParseTrueFalseValue(equal);
3196                else if(!strcmpi(buffer, "Optimize"))
3197                {
3198                   if(!strcmpi(equal, "None"))
3199                      options.optimization = none;
3200                   else if(!strcmpi(equal, "Speed") || !strcmpi(equal, "True"))
3201                      options.optimization = speed;
3202                   else if(!strcmpi(equal, "Size"))
3203                      options.optimization = size;
3204                   else
3205                      options.optimization = none;
3206                }
3207                else if(!strcmpi(buffer, "Compress"))
3208                   options.compress = ParseTrueFalseValue(equal);
3209                else if(!strcmpi(buffer, "Profile"))
3210                   options.profile = ParseTrueFalseValue(equal);
3211                else if(!strcmpi(buffer, "AllWarnings"))
3212                   options.warnings = ParseTrueFalseValue(equal) ? all : unset;
3213                else if(!strcmpi(buffer, "MemoryGuard"))
3214                   options.memoryGuard = ParseTrueFalseValue(equal);
3215                else if(!strcmpi(buffer, "Default Name Space"))
3216                   options.defaultNameSpace = CopyString(equal);
3217                else if(!strcmpi(buffer, "Strict Name Spaces"))
3218                   options.strictNameSpaces = ParseTrueFalseValue(equal);
3219                else if(!strcmpi(buffer, "Preprocessor Definitions"))
3220                {
3221                   if(!options.preprocessorDefinitions) options.preprocessorDefinitions = { };
3222                   ParseArrayValue(options.preprocessorDefinitions, equal);
3223                }
3224             }
3225          }
3226       }
3227    }
3228    if(!options.targetDirectory && options.objectsDirectory)
3229       options.targetDirectory = /*CopyString(*/options.objectsDirectory/*)*/;
3230    //if(!objDir.dir) objDir.dir = "obj";
3231    //if(!targetDir.dir) targetDir.dir = "";
3232    // if(!targetName) property::targetName = "";   // How can a targetFileName be nothing???
3233    // if(!defaultNameSpace) property::defaultNameSpace = "";
3234    makingModified = true;
3235 }
3236
3237 Project LegacyAsciiLoadProject(File f, char * filePath)
3238 {
3239    Project project = null;
3240    ProjectNode node = null;
3241    int pos;
3242    char parentPath[MAX_LOCATION];
3243    char section[128] = "";
3244    char subSection[128] = "";
3245    ProjectNode parent;
3246    bool configurationsPresent = false;
3247
3248    f.Seek(0, start);
3249    while(!f.Eof())
3250    {
3251       char buffer[65536];
3252       //char version[16];
3253       char * equal;
3254       int len;
3255       pos = f.Tell();
3256       f.GetLine(buffer, 65536 - 1);
3257       TrimLSpaces(buffer, buffer);
3258       TrimRSpaces(buffer, buffer);
3259       if(strlen(buffer))
3260       {
3261          if(buffer[0] == '-' || buffer[0] == '=')
3262          {
3263             bool simple = buffer[0] == '-';
3264             equal = &buffer[0];
3265             equal[0] = ' ';
3266             TrimLSpaces(equal, equal);
3267             if(!strcmpi(section, "Target") && !strcmpi(subSection, "LibraryDirs"))
3268             {
3269                if(!project.config.options.libraryDirs)
3270                   project.config.options.libraryDirs = { [ CopyString(equal) ] };
3271                else
3272                   project.config.options.libraryDirs.Add(CopyString(equal));
3273             }
3274             else if(!strcmpi(section, "Target") && !strcmpi(subSection, "IncludeDirs"))
3275             {
3276                if(!project.config.options.includeDirs)
3277                   project.config.options.includeDirs = { [ CopyString(equal) ] };
3278                else
3279                   project.config.options.includeDirs.Add(CopyString(equal));
3280             }
3281             else if(!strcmpi(section, "Target") && (!strcmpi(subSection, "Files") || !strcmpi(subSection, "Resources")))
3282             {
3283                len = strlen(equal);
3284                if(len)
3285                {
3286                   char temp[MAX_LOCATION];
3287                   ProjectNode child { };
3288                   // We don't need to do this anymore, fileName is just a property that sets name & path
3289                   // child.fileName = CopyString(equal);
3290                   if(simple)
3291                   {
3292                      child.name = CopyString(equal);
3293                      child.path = CopyString(parentPath);
3294                   }
3295                   else
3296                   {
3297                      GetLastDirectory(equal, temp);
3298                      child.name = CopyString(temp);
3299                      StripLastDirectory(equal, temp);
3300                      child.path = CopyString(temp);
3301                   }
3302                   child.nodeType = file;
3303                   child.parent = parent;
3304                   child.indent = parent.indent + 1;
3305                   child.type = file;
3306                   child.icon = NodeIcons::SelectFileIcon(child.name);
3307                   parent.files.Add(child);
3308                   node = child;
3309                   //child = null;
3310                }
3311                else
3312                {
3313                   StripLastDirectory(parentPath, parentPath);
3314                   parent = parent.parent;
3315                }
3316             }
3317          }
3318          else if(buffer[0] == '+')
3319          {
3320             equal = &buffer[0];
3321             equal[0] = ' ';
3322             TrimLSpaces(equal, equal);
3323             if(!strcmpi(section, "Target") && (!strcmpi(subSection, "Files") || !strcmpi(subSection, "Resources")))
3324             {
3325                char temp[MAX_LOCATION];
3326                ProjectNode child { };
3327                // NEW: Folders now have a path set like files
3328                child.name = CopyString(equal);
3329                strcpy(temp, parentPath);
3330                PathCatSlash(temp, child.name);
3331                child.path = CopyString(temp);
3332
3333                child.parent = parent;
3334                child.indent = parent.indent + 1;
3335                child.type = folder;
3336                child.nodeType = folder;
3337                child.files = { };
3338                child.icon = folder;
3339                PathCatSlash(parentPath, child.name);
3340                parent.files.Add(child);
3341                parent = child;
3342                node = child;
3343                //child = null;
3344             }
3345             else if(!strcmpi(section, "Configurations"))
3346             {
3347                ProjectConfig newConfig
3348                {
3349                   makingModified = true;
3350                   options = { };
3351                };
3352                f.Seek(pos, start);
3353                LegacyProjectConfigLoad(newConfig, f);
3354                project.configurations.Add(newConfig);
3355             }
3356          }
3357          else if(!strcmpi(buffer, "ECERE Project File"));
3358          else if(!strcmpi(buffer, "Version 0a"))
3359             ; //strcpy(version, "0a");
3360          else if(!strcmpi(buffer, "Version 0.1a"))
3361             ; //strcpy(version, "0.1a");
3362          else if(!strcmpi(buffer, "Configurations"))
3363          {
3364             project.configurations.Free();
3365             project.config = null;
3366             strcpy(section, buffer);
3367             configurationsPresent = true;
3368          }
3369          else if(!strcmpi(buffer, "Target") || !strnicmp(buffer, "Target \"", strlen("Target \"")))
3370          {
3371             ProjectConfig newConfig { name = CopyString("Default"), options = { } };
3372             char topNodePath[MAX_LOCATION];
3373             // newConfig.defaultNameSpace = "";
3374             //newConfig.objDir.dir = "obj";
3375             //newConfig.targetDir.dir = "";
3376             project = Project { /*options = { }*/ };
3377             project.configurations = { [ newConfig ] };
3378             project.config = newConfig;
3379             // if(project.topNode.path) delete project.topNode.path;
3380             GetWorkingDir(topNodePath, sizeof(topNodePath)-1);
3381             MakeSlashPath(topNodePath);
3382             PathCatSlash(topNodePath, filePath);
3383             project.filePath = topNodePath;
3384             parentPath[0] = '\0';
3385             parent = project.topNode;
3386             node = parent;
3387             strcpy(section, "Target");
3388             equal = &buffer[6];
3389             if(equal[0] == ' ')
3390             {
3391                equal++;
3392                if(equal[0] == '\"')
3393                {
3394                   StripQuotes(equal, equal);
3395                   delete project.moduleName; project.moduleName = CopyString(equal);
3396                }
3397             }
3398          }
3399          else if(!strcmpi(buffer, "Compiler Options"));
3400          else if(!strcmpi(buffer, "IncludeDirs"))
3401             strcpy(subSection, buffer);
3402          else if(!strcmpi(buffer, "Linker Options"));
3403          else if(!strcmpi(buffer, "LibraryDirs"))
3404             strcpy(subSection, buffer);
3405          else if(!strcmpi(buffer, "Files"))
3406          {
3407             strcpy(section, "Target");
3408             strcpy(subSection, buffer);
3409          }
3410          else if(!strcmpi(buffer, "Resources"))
3411          {
3412             ProjectNode child { };
3413             parent.files.Add(child);
3414             child.parent = parent;
3415             child.indent = parent.indent + 1;
3416             child.name = CopyString(buffer);
3417             child.path = CopyString("");
3418             child.type = resources;
3419             child.files = { };
3420             child.icon = archiveFile;
3421             project.resNode = child;
3422             parent = child;
3423             node = child;
3424             strcpy(subSection, buffer);
3425          }
3426          else
3427          {
3428             equal = strstr(buffer, "=");
3429             if(equal)
3430             {
3431                equal[0] = '\0';
3432                TrimRSpaces(buffer, buffer);
3433                equal++;
3434                TrimLSpaces(equal, equal);
3435
3436                if(!strcmpi(section, "Target"))
3437                {
3438                   if(!strcmpi(buffer, "Build Exclusions"))
3439                   {
3440                      if(!strcmpi(section, "Target") && !strcmpi(subSection, "Files"))
3441                      {
3442                         /*if(node && node.type != NodeTypes::project)
3443                            ParseListValue(node.buildExclusions, equal);*/
3444                      }
3445                   }
3446                   else if(!strcmpi(buffer, "Path") && !strcmpi(subSection, "Resources"))
3447                   {
3448                      delete project.resNode.path;
3449                      project.resNode.path = CopyString(equal);
3450                      PathCatSlash(parentPath, equal);
3451                   }
3452
3453                   // Config Settings
3454                   else if(!strcmpi(buffer, "Intermediate Directory"))
3455                      project.config.options.objectsDirectory = /*CopyString(*/equal/*)*/; //objDir.expression = equal;
3456                   else if(!strcmpi(buffer, "Debug"))
3457                      project.config.options.debug = ParseTrueFalseValue(equal);
3458                   else if(!strcmpi(buffer, "Optimize"))
3459                   {
3460                      if(!strcmpi(equal, "None"))
3461                         project.config.options.optimization = none;
3462                      else if(!strcmpi(equal, "Speed") || !strcmpi(equal, "True"))
3463                         project.config.options.optimization = speed;
3464                      else if(!strcmpi(equal, "Size"))
3465                         project.config.options.optimization = size;
3466                      else
3467                         project.config.options.optimization = none;
3468                   }
3469                   else if(!strcmpi(buffer, "Profile"))
3470                      project.config.options.profile = ParseTrueFalseValue(equal);
3471                   else if(!strcmpi(buffer, "MemoryGuard"))
3472                      project.config.options.memoryGuard = ParseTrueFalseValue(equal);
3473                   else
3474                   {
3475                      if(!project.options) project.options = { };
3476
3477                      // Project Wide Settings (All configs)
3478                      if(!strcmpi(buffer, "Target Name"))
3479                         project.options.targetFileName = /*CopyString(*/equal/*)*/;
3480                      else if(!strcmpi(buffer, "Target Type"))
3481                      {
3482                         if(!strcmpi(equal, "Executable"))
3483                            project.options.targetType = executable;
3484                         else if(!strcmpi(equal, "Shared"))
3485                            project.options.targetType = sharedLibrary;
3486                         else if(!strcmpi(equal, "Static"))
3487                            project.options.targetType = staticLibrary;
3488                         else
3489                            project.options.targetType = executable;
3490                      }
3491                      else if(!strcmpi(buffer, "Target Directory"))
3492                         project.options.targetDirectory = /*CopyString(*/equal/*)*/;
3493                      else if(!strcmpi(buffer, "Console"))
3494                         project.options.console = ParseTrueFalseValue(equal);
3495                      else if(!strcmpi(buffer, "Libraries"))
3496                      {
3497                         if(!project.options.libraries) project.options.libraries = { };
3498                         ParseArrayValue(project.options.libraries, equal);
3499                      }
3500                      else if(!strcmpi(buffer, "AllWarnings"))
3501                         project.options.warnings = ParseTrueFalseValue(equal) ? all : unset;
3502                      else if(!strcmpi(buffer, "Preprocessor Definitions"))
3503                      {
3504                         if(!strcmpi(section, "Target") && !strcmpi(subSection, "Files"))
3505                         {
3506                            /*if(node && (node.type == NodeTypes::project || (node.type == file && !node.isInResources) || node.type == folder))
3507                               ParseListValue(node.preprocessorDefs, equal);*/
3508                         }
3509                         else
3510                         {
3511                            if(!project.options.preprocessorDefinitions) project.options.preprocessorDefinitions = { };
3512                            ParseArrayValue(project.options.preprocessorDefinitions, equal);
3513                         }
3514                      }
3515                   }
3516                }
3517             }
3518          }
3519       }
3520    }
3521    parent = null;
3522
3523    SplitPlatformLibraries(project);
3524
3525    if(configurationsPresent)
3526       CombineIdenticalConfigOptions(project);
3527    return project;
3528 }
3529
3530 void SplitPlatformLibraries(Project project)
3531 {
3532    if(project && project.configurations)
3533    {
3534       for(cfg : project.configurations)
3535       {
3536          if(cfg.options.libraries && cfg.options.libraries.count)
3537          {
3538             Iterator<String> it { cfg.options.libraries };
3539             while(it.Next())
3540             {
3541                String l = it.data;
3542                char * platformName = strstr(l, ":");
3543                if(platformName)
3544                {
3545                   PlatformOptions platform = null;
3546                   platformName++;
3547                   if(!cfg.platforms) cfg.platforms = { };
3548                   for(p : cfg.platforms)
3549                   {
3550                      if(!strcmpi(platformName, p.name))
3551                      {
3552                         platform = p;
3553                         break;
3554                      }
3555                   }
3556                   if(!platform)
3557                   {
3558                      platform = { name = CopyString(platformName), options = { libraries = { } } };
3559                      cfg.platforms.Add(platform);
3560                   }
3561                   *(platformName-1) = 0;
3562                   platform.options.libraries.Add(CopyString(l));
3563
3564                   cfg.options.libraries.Delete(it.pointer);
3565                   it.pointer = null;
3566                }
3567             }
3568          }
3569       }
3570    }
3571 }
3572
3573 void CombineIdenticalConfigOptions(Project project)
3574 {
3575    if(project && project.configurations && project.configurations.count)
3576    {
3577       DataMember member;
3578       ProjectOptions nullOptions { };
3579       ProjectConfig firstConfig = null;
3580       for(cfg : project.configurations)
3581       {
3582          if(cfg.options.targetType != staticLibrary)
3583          {
3584             firstConfig = cfg;
3585             break;
3586          }
3587       }
3588       if(!firstConfig)
3589          firstConfig = project.configurations.firstIterator.data;
3590
3591       for(member = class(ProjectOptions).membersAndProperties.first; member; member = member.next)
3592       {
3593          if(!member.isProperty)
3594          {
3595             Class type = eSystem_FindClass(__thisModule, member.dataTypeString);
3596             if(type)
3597             {
3598                bool same = true;
3599
3600                for(cfg : project.configurations)
3601                {
3602                   if(cfg != firstConfig)
3603                   {
3604                      if(cfg.options.targetType != staticLibrary)
3605                      {
3606                         int result;
3607
3608                         if(type.type == noHeadClass || type.type == normalClass)
3609                         {
3610                            result = type._vTbl[__ecereVMethodID_class_OnCompare](type,
3611                               *(void **)((byte *)firstConfig.options + member.offset + member._class.offset),
3612                               *(void **)((byte *)cfg.options         + member.offset + member._class.offset));
3613                         }
3614                         else
3615                         {
3616                            result = type._vTbl[__ecereVMethodID_class_OnCompare](type,
3617                               (byte *)firstConfig.options + member.offset + member._class.offset,
3618                               (byte *)cfg.options         + member.offset + member._class.offset);
3619                         }
3620                         if(result)
3621                         {
3622                            same = false;
3623                            break;
3624                         }
3625                      }
3626                   }
3627                }
3628                if(same)
3629                {
3630                   if(type.type == noHeadClass || type.type == normalClass)
3631                   {
3632                      if(!type._vTbl[__ecereVMethodID_class_OnCompare](type,
3633                         *(void **)((byte *)firstConfig.options + member.offset + member._class.offset),
3634                         *(void **)((byte *)nullOptions         + member.offset + member._class.offset)))
3635                         continue;
3636                   }
3637                   else
3638                   {
3639                      if(!type._vTbl[__ecereVMethodID_class_OnCompare](type,
3640                         (byte *)firstConfig.options + member.offset + member._class.offset,
3641                         (byte *)nullOptions         + member.offset + member._class.offset))
3642                         continue;
3643                   }
3644
3645                   if(!project.options) project.options = { };
3646
3647                   /*if(type.type == noHeadClass || type.type == normalClass)
3648                   {
3649                      type._vTbl[__ecereVMethodID_class_OnCopy](type,
3650                         (byte *)project.options + member.offset + member._class.offset,
3651                         *(void **)((byte *)firstConfig.options + member.offset + member._class.offset));
3652                   }
3653                   else
3654                   {
3655                      void * address = (byte *)firstConfig.options + member.offset + member._class.offset;
3656                      // TOFIX: ListBox::SetData / OnCopy mess
3657                      type._vTbl[__ecereVMethodID_class_OnCopy](type,
3658                         (byte *)project.options + member.offset + member._class.offset,
3659                         (type.typeSize > 4) ? address :
3660                            ((type.typeSize == 4) ? (void *)*(uint32 *)address :
3661                               ((type.typeSize == 2) ? (void *)*(uint16*)address :
3662                                  (void *)*(byte *)address )));
3663                   }*/
3664                   memcpy(
3665                      (byte *)project.options + member.offset + member._class.offset,
3666                      (byte *)firstConfig.options + member.offset + member._class.offset, type.typeSize);
3667
3668                   for(cfg : project.configurations)
3669                   {
3670                      if(cfg.options.targetType == staticLibrary)
3671                      {
3672                         int result;
3673
3674                         if(type.type == noHeadClass || type.type == normalClass)
3675                         {
3676                            result = type._vTbl[__ecereVMethodID_class_OnCompare](type,
3677                               *(void **)((byte *)firstConfig.options + member.offset + member._class.offset),
3678                               *(void **)((byte *)cfg.options         + member.offset + member._class.offset));
3679                         }
3680                         else
3681                         {
3682                            result = type._vTbl[__ecereVMethodID_class_OnCompare](type,
3683                               (byte *)firstConfig.options + member.offset + member._class.offset,
3684                               (byte *)cfg.options         + member.offset + member._class.offset);
3685                         }
3686                         if(result)
3687                            continue;
3688                      }
3689                      if(cfg != firstConfig)
3690                      {
3691                         if(type.type == noHeadClass || type.type == normalClass)
3692                         {
3693                            type._vTbl[__ecereVMethodID_class_OnFree](type,
3694                               *(void **)((byte *)cfg.options + member.offset + member._class.offset));
3695                         }
3696                         else
3697                         {
3698                            type._vTbl[__ecereVMethodID_class_OnFree](type,
3699                               (byte *)cfg.options + member.offset + member._class.offset);
3700                         }
3701                         memset((byte *)cfg.options + member.offset + member._class.offset, 0, type.typeSize);
3702                      }
3703                   }
3704                   memset((byte *)firstConfig.options + member.offset + member._class.offset, 0, type.typeSize);
3705                }
3706             }
3707          }
3708       }
3709       delete nullOptions;
3710
3711       // Compare Platform Specific Settings
3712       {
3713          bool same = true;
3714          for(cfg : project.configurations)
3715          {
3716             if(cfg != firstConfig && cfg.options.targetType != staticLibrary && (firstConfig.platforms || cfg.platforms) &&
3717                ((!firstConfig.platforms && cfg.platforms) || firstConfig.platforms.OnCompare(cfg.platforms)))
3718             {
3719                same = false;
3720                break;
3721             }
3722          }
3723          if(same && firstConfig.platforms)
3724          {
3725             for(cfg : project.configurations)
3726             {
3727                if(cfg.options.targetType == staticLibrary && firstConfig.platforms.OnCompare(cfg.platforms))
3728                   continue;
3729                if(cfg != firstConfig)
3730                {
3731                   cfg.platforms.Free();
3732                   delete cfg.platforms;
3733                }
3734             }
3735             project.platforms = firstConfig.platforms;
3736             firstConfig.platforms = null;
3737          }
3738       }
3739
3740       // Static libraries can't contain libraries
3741       for(cfg : project.configurations)
3742       {
3743          if(cfg.options.targetType == staticLibrary)
3744          {
3745             if(!cfg.options.libraries) cfg.options.libraries = { };
3746             cfg.options.libraries.Free();
3747          }
3748       }
3749    }
3750 }
3751
3752 Project LoadProject(char * filePath, char * activeConfigName)
3753 {
3754    Project project = null;
3755    File f = FileOpen(filePath, read);
3756    if(f)
3757    {
3758       project = LegacyBinaryLoadProject(f, filePath);
3759       if(!project)
3760       {
3761          JSONParser parser { f = f };
3762          JSONResult result = parser.GetObject(class(Project), &project);
3763          if(project)
3764          {
3765             char insidePath[MAX_LOCATION];
3766
3767             delete project.topNode.files;
3768             if(!project.files) project.files = { };
3769             project.topNode.files = project.files;
3770             project.resNode = project.topNode.Add(project, "Resources", project.topNode.files.last, resources, archiveFile, false);
3771             delete project.resNode.path;
3772             project.resNode.path = project.resourcesPath;
3773             project.resourcesPath = null;
3774             project.resNode.nodeType = (ProjectNodeType)-1;
3775             delete project.resNode.files;
3776             project.resNode.files = project.resources;
3777             project.files = null;
3778             project.resources = null;
3779             if(!project.configurations) project.configurations = { };
3780
3781             {
3782                char topNodePath[MAX_LOCATION];
3783                GetWorkingDir(topNodePath, sizeof(topNodePath)-1);
3784                MakeSlashPath(topNodePath);
3785                PathCatSlash(topNodePath, filePath);
3786                project.filePath = topNodePath;//filePath;
3787             }
3788
3789             project.topNode.FixupNode(insidePath);
3790          }
3791          delete parser;
3792       }
3793       if(!project)
3794          project = LegacyAsciiLoadProject(f, filePath);
3795
3796       delete f;
3797
3798       if(project)
3799       {
3800          if(!project.options) project.options = { };
3801          if(activeConfigName && activeConfigName[0] && project.configurations)
3802          {
3803             for(cfg : project.configurations)
3804             {
3805                if(!strcmpi(cfg.name, activeConfigName))
3806                {
3807                   project.config = cfg;
3808                   break;
3809                }
3810             }
3811          }
3812          if(!project.config && project.configurations)
3813             project.config = project.configurations.firstIterator.data;
3814
3815          if(!project.resNode)
3816          {
3817             project.resNode = project.topNode.Add(project, "Resources", project.topNode.files.last, resources, archiveFile, false);
3818          }
3819
3820          if(!project.moduleName)
3821             project.moduleName = CopyString(project.name);
3822          if(project.config &&
3823             (!project.options || !project.options.targetFileName || !project.options.targetFileName[0]) &&
3824             (!project.config.options.targetFileName || !project.config.options.targetFileName[0]))
3825          {
3826             //delete project.config.options.targetFileName;
3827
3828             project.options.targetFileName = /*CopyString(*/project.moduleName/*)*/;
3829             project.config.options.optimization = none;
3830             project.config.options.debug = true;
3831             //project.config.options.warnings = unset;
3832             project.config.options.memoryGuard = false;
3833             project.config.compilingModified = true;
3834             project.config.linkingModified = true;
3835          }
3836          else if(!project.topNode.name && project.config)
3837          {
3838             project.topNode.name = CopyString(project.config.options.targetFileName);
3839          }
3840
3841          /* // THIS IS NOW AUTOMATED WITH A project CHECK IN ProjectNode
3842          project.topNode.configurations = project.configurations;
3843          project.topNode.platforms = project.platforms;
3844          project.topNode.options = project.options;*/
3845       }
3846    }
3847    return project;
3848 }