3 // import "SelectorBar"
4 import "CompilersDetectionDialog"
7 FileDialog settingsFileDialog { type = selectDir, text = $"Select directory" };
9 FileDialog toolchainFileDialog { type = open, text = $"Open"; mayNotExist = true; };
11 class GlobalSettingsDialog : Window
15 background = formColor;
17 borderStyle = sizable;
18 text = $"Global Settings";
19 minClientSize = { 560, 506 };
20 nativeDecorations = true;
22 IDESettings ideSettings;
23 IDESettingsContainer settingsContainer;
24 String workspaceActiveCompiler;
26 TabControl tabControl { this, background = formColor, anchor = { left = 8, top = 8, right = 8, bottom = 40 } };
28 EditorTab editorTab { this, tabControl = tabControl };
29 CompilersTab compilersTab { this, tabControl = tabControl };
30 ProjectOptionsTab projectOptionsTab { this, tabControl = tabControl };
31 WorkspaceOptionsTab workspaceOptionsTab { this, tabControl = tabControl };
33 property bool settingsModified
37 return editorTab.modifiedDocument || compilersTab.modifiedDocument ||
38 projectOptionsTab.modifiedDocument || workspaceOptionsTab.modifiedDocument;
42 bool OnClose(bool parentClosing)
44 if(!settingsModified || MessageBox {
45 type = okCancel, master = ide,
46 text = $"Lose Changes?",
47 contents = $"Are you sure you wish to discard changes?"
55 parent = this, hotKey = escape, text = $"Cancel", id = DialogResult::cancel;
56 position = { 290, 290 }, size = { 80 };
57 anchor = { right = 8, bottom = 8 };
58 NotifyClicked = ButtonCloseDialog;
63 parent = this, isDefault = true, text = $"OK";
64 position = { 200, 290 }, size = { 90 };
65 anchor = { right = 96, bottom = 8 };
67 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
71 bool editorSettingsChanged = false;
72 bool compilerSettingsChanged = false;
73 bool projectOptionsChanged = false;
74 bool workspaceOptionsChanged = false;
76 if(editorTab.modifiedDocument)
78 if(editorTab.useFreeCaret.checked != ideSettings.useFreeCaret ||
79 editorTab.showLineNumbers.checked != ideSettings.showLineNumbers ||
80 editorTab.caretFollowsScrolling.checked != ideSettings.caretFollowsScrolling)
82 ideSettings.useFreeCaret = editorTab.useFreeCaret.checked;
83 ideSettings.showLineNumbers = editorTab.showLineNumbers.checked;
84 ideSettings.caretFollowsScrolling = editorTab.caretFollowsScrolling.checked;
85 editorSettingsChanged = true;
89 if(compilersTab.modifiedDocument)
91 Workspace workspace = ide.workspace;
92 if(strcmp(compilersTab.compilerConfigsDir.path, ideSettings.compilerConfigsDir))
93 ideSettings.compilerConfigsDir = compilersTab.compilerConfigsDir.path;
94 ideSettings.compilerConfigs.Free();
95 for(compiler : compilersTab.compilerConfigs)
97 ideSettings.compilerConfigs.Add(compiler.Copy());
100 compilerSettingsChanged = true;
103 if(projectOptionsTab.modifiedDocument)
105 if(strcmp(projectOptionsTab.defaultTargetDir.path, ideSettings.projectDefaultTargetDir)
106 || strcmp(projectOptionsTab.defaultIntermediateObjDir.path, ideSettings.projectDefaultIntermediateObjDir))
108 ideSettings.projectDefaultTargetDir = projectOptionsTab.defaultTargetDir.path;
109 ideSettings.projectDefaultIntermediateObjDir = projectOptionsTab.defaultIntermediateObjDir.path;
110 projectOptionsChanged = true;
114 if(workspaceOptionsTab.modifiedDocument)
116 DataRow row = workspaceOptionsTab.defaultCompilerDropBox.currentRow;
117 if(row && row.string)
119 if(!ideSettings.defaultCompiler || strcmp(row.string, ideSettings.defaultCompiler))
121 ideSettings.defaultCompiler = row.string;
122 workspaceOptionsChanged = true;
127 settingsContainer.Save();
129 if(compilerSettingsChanged)
130 OnGlobalSettingChange(GlobalSettingsChange::compilerSettings);
131 if(editorSettingsChanged)
132 OnGlobalSettingChange(GlobalSettingsChange::editorSettings);
133 if(projectOptionsChanged)
134 OnGlobalSettingChange(GlobalSettingsChange::projectOptions);
136 editorTab.modifiedDocument = false;
137 compilersTab.modifiedDocument = false;
138 projectOptionsTab.modifiedDocument = false;
139 workspaceOptionsTab.modifiedDocument = false;
142 Destroy(DialogResult::ok);
151 for(c = 0; c < DirTypes::enumSize; c++)
153 CompilerDir compilerDir;
155 for(systemDir : ideSettings.systemDirs[c])
157 compilerDir = CompilerDir { type = c; compilerConfig = null; path = CopyString(systemDir) };
158 dirs.Add(compilerDir);
161 row = compilersTab.dirs[c].AddRow();
162 row.SetData(null, "");
163 compilersTab.dirs[c].currentRow = compilersTab.dirs[c].firstRow;
164 compilersTab.dirs[c].modifiedDocument = false;
171 CompilerConfig activateCompiler = null;
172 CompilerConfig readonlyCompiler = null;
175 editorTab.useFreeCaret.checked = ideSettings.useFreeCaret;
176 editorTab.showLineNumbers.checked = ideSettings.showLineNumbers;
177 editorTab.caretFollowsScrolling.checked = ideSettings.caretFollowsScrolling;
180 if(workspaceActiveCompiler)
182 for(compiler : ideSettings.compilerConfigs)
184 if(!activateCompiler && !strcmp(workspaceActiveCompiler, compiler.name))
185 activateCompiler = compiler;
186 if(!readonlyCompiler && compiler.readOnly)
187 readonlyCompiler = compiler;
188 if(activateCompiler && readonlyCompiler)
192 if(!activateCompiler && readonlyCompiler)
193 activateCompiler = readonlyCompiler;
194 if(!activateCompiler && ideSettings.compilerConfigs.count)
195 activateCompiler = ideSettings.compilerConfigs[0];
197 for(compiler : ideSettings.compilerConfigs)
198 compilersTab.AddCompiler(compiler.Copy(), compiler == activateCompiler);
199 compilersTab.compilerConfigsDir.path = ideSettings.compilerConfigsDir;
202 projectOptionsTab.defaultTargetDir.path = ideSettings.projectDefaultTargetDir;
203 projectOptionsTab.defaultIntermediateObjDir.path = ideSettings.projectDefaultIntermediateObjDir;
210 editorTab.modifiedDocument = false;
211 compilersTab.modifiedDocument = false;
212 compilersTab.dirsTab.modifiedDocument = false;
213 compilersTab.toolchainTab.modifiedDocument = false;
214 compilersTab.optionsTab.modifiedDocument = false;
215 compilersTab.activeCompiler = null;
216 compilersTab.compilerConfigs.Free();
217 compilersTab.compilerSelector.Clear();
218 projectOptionsTab.modifiedDocument = false;
219 workspaceOptionsTab.modifiedDocument = false;
222 virtual void OnGlobalSettingChange(GlobalSettingsChange globalSettingsChange);
225 class EditorTab : GlobalSettingsSubTab
227 background = formColor;
232 this, text = $"Move code editor caret freely past end of line", position = { 16, 68 }, isCheckbox = true;
233 NotifyClicked = NotifyClickedModifiedDocument;
236 Button caretFollowsScrolling
238 this, text = $"Keep caret visible (move along) when scrolling", position = { 16, 88 }, isCheckbox = true;
239 NotifyClicked = NotifyClickedModifiedDocument;
242 Button showLineNumbers
244 this, text = $"Show line numbers in code editor", position = { 16, 108 }, isCheckbox = true;
245 NotifyClicked = NotifyClickedModifiedDocument;
248 bool NotifyClickedModifiedDocument(Button button, int x, int y, Modifiers mods)
250 modifiedDocument = true;
255 static void DrawStipple(Surface surface, Size clientSize)
259 int x2 = clientSize.w - 1;
260 int y2 = clientSize.h - 1;
261 if((x2 - x1) & 1) x2--;
262 if((y2 - y1) & 1) y2--;
264 surface.LineStipple(0x5555);
265 surface.Rectangle(x1, y1, x2, y2);
266 surface.LineStipple(0);
269 class CompilersTab : GlobalSettingsSubTab
271 background = formColor;
274 Label compilerConfigsDirLabel { this, position = { 8, 12 }, labeledWindow = compilerConfigsDir, tabCycle = false, inactive = true };
275 PathBox compilerConfigsDir
277 this, anchor = { left = 210, top = 8, right = 8 };
278 text = $"Compiler Configurations Directory", browseDialog = settingsFileDialog, NotifyModified = NotifyModifiedDocument;
281 SelectorBar compilerSelector
283 this, text = $"Compiler Configurations:", anchor = { left = 148, top = 38, right = 99 }; size = { 0, 26 };
285 direction = horizontal, scrollable = true;
287 bool OnKeyDown(Key key, unichar ch)
291 ((CompilersTab)parent).createCompiler.NotifyClicked(parent, ((CompilersTab)parent).createCompiler, 0, 0, 0);
296 ((CompilersTab)parent).deleteCompiler.NotifyClicked(parent, ((CompilersTab)parent).deleteCompiler, 0, 0, 0);
299 return SelectorBar::OnKeyDown(key, ch);
302 bool OnActivate(bool active, Window previous, bool * goOnWithActivation, bool direct)
304 ((CompilersTab)master).labelCompilers.Update(null);
310 CompilersTab compilers = (CompilersTab)parent;
311 SelectorBar::OnPostCreate();
312 if(compilers.selectedButton)
314 Button sb = compilers.selectedButton;
317 // Why was this being set to null? On going back to compilers the 2nd time, the selectedButton was lost and so was not made visible...
318 // compilers.selectedButton = null;
324 TabControl tabControl { this, background = formColor, anchor = { left = 8, top = 68, right = 8, bottom = 8 } };
326 CompilerDirectoriesTab dirsTab { this, tabControl = tabControl };
327 CompilerToolchainTab toolchainTab { this, tabControl = tabControl };
328 CompilerEnvironmentTab environmentTab { this, tabControl = tabControl };
329 CompilerOptionsTab optionsTab { this, tabControl = tabControl };
331 List<CompilerConfig> compilerConfigs { };
332 CompilerConfig activeCompiler;
336 this, anchor = { left = 8, top = 44 }, labeledWindow = compilerSelector;
338 void OnRedraw(Surface surface)
340 Label::OnRedraw(surface);
341 if(labeledWindow.active)
342 DrawStipple(surface, clientSize);
346 void FindUniqueCompilerName(char * baseName, CompilerConfig compiler/*, bool startWithNumber*/, char * output)
349 char tmp[MAX_F_STRING];
350 /*if(startWithNumber)
351 sprintf(tmp, "%s%d", baseName, num);
353 strcpy(tmp, baseName);
356 CompilerConfig matchingCompiler = null;
357 for(c : compilerConfigs)
358 { // TOFIX: Error when omitting these brackets, c not found
359 if((!compiler || c != compiler) && c.name && !strcmp(c.name, tmp))
361 matchingCompiler = c;
368 sprintf(tmp, "%s%d", baseName, num);
376 Button createCompiler
378 parent = this, bevelOver = true, inactive = true;
380 anchor = { top = 40, right = 77 };
381 hotKey = altC, bitmap = BitmapResource { fileName = ":actions/docNew.png", alphaBlend = true };
383 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
385 char compilerName[MAX_F_STRING];
386 CompilerConfig newCompiler;
387 FindUniqueCompilerName("New Compiler", null, compilerName);
388 newCompiler = MakeDefaultCompiler(compilerName, false);
389 AddCompiler(newCompiler, true);
390 modifiedDocument = true;
394 Button detectCompiler
396 parent = this, bevelOver = true, inactive = true;
398 anchor = { top = 40, right = 54 };
399 hotKey = altC, bitmap = BitmapResource { fileName = ":actions/attach.png", alphaBlend = true };
401 bool NotifyClicked(Button b, int x, int y, Modifiers mods)
403 CompilersDetectionDialog compilersDetectionDialog
408 if(compilersDetectionDialog.Modal())
410 if(compilersDetectionDialog.selectedCompilerType)
412 char uniqueName[MAX_F_STRING];
413 CompilerConfig newCompiler = compilersDetectionDialog.compilerConfig;
414 FindUniqueCompilerName(newCompiler.name, null, uniqueName);
415 newCompiler.name = uniqueName;
416 AddCompiler(newCompiler, true);
417 modifiedDocument = true;
423 Button duplicateCompiler
425 parent = this, bevelOver = true, inactive = true;
427 anchor = { top = 40, right = 31 };
428 hotKey = altU, bitmap = BitmapResource { fileName = ":actions/editCopy.png", alphaBlend = true };
430 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
432 char copyName[MAX_F_STRING];
433 CompilerConfig copyCompiler = activeCompiler.Copy();
434 FindUniqueCompilerName(copyCompiler.name, null, copyName);
435 copyCompiler.readOnly = false;
436 copyCompiler.name = copyName;
437 AddCompiler(copyCompiler, true);
438 modifiedDocument = true;
442 Button deleteCompiler
444 parent = this, bevelOver = true, inactive = true;
446 anchor = { top = 40, right = 8 };
447 hotKey = altD, bitmap = BitmapResource { fileName = ":actions/delete2.png", alphaBlend = true };
449 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
453 CompilerConfig compilerToDelete = activeCompiler;
454 String title = PrintString($"Delete ", compilerToDelete.name, $" Compiler Configuration");
455 String msg = PrintString($"Are you sure you wish to delete the ", compilerToDelete.name, $" compiler configuration?");
456 if(MessageBox { type = okCancel, text = title, contents = msg }.Modal() == ok)
458 SelectorButton button = compilerSelector.FindButtonByID((int64)compilerToDelete);
460 compilerSelector.RemoveButton(button);
461 //DeleteCompiler(compilerToDelete);
463 Iterator<CompilerConfig> it { compilerConfigs };
464 if(it.Find(compilerToDelete))
465 compilerConfigs.Delete(it.pointer);
467 modifiedDocument = true;
476 void AddCompiler(CompilerConfig compiler, bool load)
478 SelectorButton selectButton;
479 if(compiler.readOnly)
481 SelectorButton button
483 compilerSelector, master = this, text = compiler.name, id = (int64)compiler;
484 NotifyClicked = CompilerClicked;
486 selectButton = button;
490 EditableSelectorButton button
492 compilerSelector, master = this, renameable = true, text = compiler.name, id = (int64)compiler;
493 NotifyClicked = CompilerClicked;
495 bool OnRename(EditableSelectorButton button, char ** oldName, char ** newName)
497 if(*newName && (*newName)[0])
499 char compilerName[MAX_F_STRING];
500 FindUniqueCompilerName(*newName, activeCompiler, compilerName);
501 if(strcmp(*newName, compilerName))
504 *newName = CopyString(compilerName);
506 activeCompiler.name = compilerName;
507 modifiedDocument = true;
513 selectButton = (SelectorButton)button;
515 compilerConfigs.Add(compiler);
518 LoadCompiler(compiler);
519 selectedButton = selectButton;
520 compilerSelector.Select(selectedButton);
523 SelectorButton selectedButton;
525 void LoadCompiler(CompilerConfig compiler)
527 bool modified = modifiedDocument;
528 activeCompiler = compiler;
532 environmentTab.Load();
535 // Restore original modifiedDocument
536 modifiedDocument = modified;
538 deleteCompiler.disabled = compiler.readOnly;
541 bool CompilerClicked(Button clickedButton, int x, int y, Modifiers mods)
543 if(!eClass_IsDerived(clickedButton._class, class(EditableSelectorButton)) || !((EditableSelectorButton)clickedButton).editBox)
545 LoadCompiler((CompilerConfig)clickedButton.id);
546 selectedButton = (SelectorButton)clickedButton;
551 bool NotifyModifiedDocument(PathBox pathBox)
553 BasicValidatePathBoxPath(pathBox);
554 modifiedDocument = true;
559 Array<String> displayDirectoryNames
566 class CompilerDirectoriesTab : CompilersSubTab
568 background = formColor;
569 text = $"Directories";
571 Button dirTypeTglBtn[DirTypes];
572 DirectoriesBox dirs[DirTypes], currentDirs;
574 ~CompilerDirectoriesTab()
577 for(c = 0; c < DirTypes::enumSize; c++)
580 delete dirTypeTglBtn[c];
583 CompilerDirectoriesTab()
586 for(c = 0; c < DirTypes::enumSize; c++)
588 dirs[c] = DirectoriesBox
590 this;//, alwaysHighLight = true
591 anchor = { left = 8, top = 8, right = 8, bottom = 8 };
594 /* MAKE SURE THINGS ARE DONE PROPERLY IN THE NEW DIRECTORIES BOX WHEN BROWSING FOR A DIR?
595 settingsFileDialog.filePath = directory;
596 if(settingsFileDialog.Modal())
597 row.SetData(null, (s = CopyUnixPath(settingsFileDialog.filePath)));
600 bool NotifyModified(DirectoriesBox dirsBox)
602 CompilerConfig compiler = loadedCompiler;
605 DirTypes dirType = (DirTypes)dirsBox.id;
606 if(dirType == includes)
607 compiler.includeDirs = dirsBox.strings;
608 else if(dirType == libraries)
609 compiler.libraryDirs = dirsBox.strings;
610 else if(dirType == executables)
611 compiler.executableDirs = dirsBox.strings;
613 compilersTab.modifiedDocument = true;
617 bool NotifyPathBoxModified(DirectoriesBox dirsBox, PathBox pathBox)
619 BasicValidatePathBoxPath(pathBox);
626 dirs[c].visible = false;
628 // (width) Should be 324 for text...
629 //field[c] = { dataType = class(char *), editable = true };
630 //dirs[c].AddField(field[c]);
633 int v = (int)c * 100 + 8;
634 dirTypeTglBtn[c] = Button
636 this, inactive = true, text = displayDirectoryNames[c], bevelOver = true, isRadio = true, bitmap = null;
640 anchor = { left = v, top = 8 }; // ((int)c) * 100 + 8
642 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
644 DirTypes dirType = (DirTypes)button.id;
645 currentDirs.visible = false;
646 dirs[dirType].visible = true;
647 currentDirs = dirs[dirType];
651 incref dirTypeTglBtn[c];
654 dirTypeTglBtn[c].hotKey = altI;
655 else if(c == libraries)
656 dirTypeTglBtn[c].hotKey = altL;
657 else if(c == executables)
658 dirTypeTglBtn[c].hotKey = altE;
661 currentDirs = dirs[includes];
662 dirTypeTglBtn[includes].checked = true;
668 CompilerConfig compiler = loadedCompiler;
671 dirs[includes].strings = compiler.includeDirs;
672 dirs[libraries].strings = compiler.libraryDirs;
673 dirs[executables].strings = compiler.executableDirs;
674 dirs[includes].list.scroll = { 0, 0 };
675 dirs[libraries].list.scroll = { 0, 0 };
676 dirs[executables].list.scroll = { 0, 0 };
681 class CompilerToolchainTab : CompilersSubTab
683 background = formColor;
689 Label ecpLabel { this, position = { 8, 12 }, labeledWindow = ecp, tabCycle = false, inactive = true };
692 this, anchor = { left = margin, top = 8, right = 8 };
693 text = $"eC Precompiler", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
695 Label eccLabel { this, position = { 8, 38 }, labeledWindow = ecc, tabCycle = false, inactive = true };
698 this, anchor = { left = margin, top = 34, right = 8 };
699 text = $"eC Compiler", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
701 Label ecsLabel { this, position = { 8, 64 }, labeledWindow = ecs, tabCycle = false, inactive = true };
704 this, anchor = { left = margin, top = 60, right = 8 };
705 text = $"eC Symbol Loader", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
707 Label earLabel { this, position = { 8, 90 }, labeledWindow = ear, tabCycle = false, inactive = true };
710 this, anchor = { left = margin, top = 86, right = 8 };
711 text = $"Ecere Archiver", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
713 Label cppLabel { this, position = { 8, 116 }, labeledWindow = cpp, tabCycle = false, inactive = true };
716 this, anchor = { left = margin, top = 112, right = 8 };
717 text = $"C Preprocessor", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
719 Label ccLabel { this, position = { 8, 142 }, labeledWindow = cc, tabCycle = false, inactive = true };
722 this, anchor = { left = margin, top = 138, right = 8 };
723 text = $"C Compiler", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
725 Label cxxLabel { this, position = { 8, 168 }, labeledWindow = cxx, tabCycle = false, inactive = true };
728 this, anchor = { left = margin, top = 164, right = 8 };
729 text = $"C++ Compiler", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
731 Label makeLabel { this, position = { 8, 194 }, labeledWindow = make, tabCycle = false, inactive = true };
734 this, anchor = { left = margin, top = 190, right = 8 };
735 text = $"GNU Make", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
737 Label gnuToolchainPrefixLabel { this, position = { 8, 220 }, labeledWindow = gnuToolchainPrefix, tabCycle = false, inactive = true };
738 PathBox gnuToolchainPrefix
740 this, anchor = { left = margin, top = 216, right = 8 };
741 text = $"GNU Toolchain Prefix", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
743 Label sysrootLabel { this, position = { 8, 246 }, labeledWindow = sysroot, tabCycle = false, inactive = true };
746 this, anchor = { left = margin, top = 242, right = 8 };
747 text = $"SYSROOT", typeExpected = directory, browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
749 Label executableLauncherLabel { this, position = { 8, 272 }, labeledWindow = executableLauncher, tabCycle = false, inactive = true };
750 PathBox executableLauncher
752 this, anchor = { left = margin, top = 268, right = 8 };
753 text = $"Executable Launcher", browseDialog = toolchainFileDialog, NotifyModified = NotifyModifiedDocument;
756 bool NotifyModifiedDocument(PathBox pathBox)
758 CompilerConfig compiler = loadedCompiler;
761 BasicValidatePathBoxPath(pathBox);
763 compiler.ecpCommand = pathBox.slashPath;
764 else if(pathBox == ecc)
765 compiler.eccCommand = pathBox.slashPath;
766 else if(pathBox == ecs)
767 compiler.ecsCommand = pathBox.slashPath;
768 else if(pathBox == ear)
769 compiler.earCommand = pathBox.slashPath;
770 else if(pathBox == cpp)
771 compiler.cppCommand = pathBox.slashPath;
772 else if(pathBox == cc)
773 compiler.ccCommand = pathBox.slashPath;
774 else if(pathBox == cxx)
775 compiler.cxxCommand = pathBox.slashPath;
776 else if(pathBox == make)
777 compiler.makeCommand = pathBox.slashPath;
778 else if(pathBox == executableLauncher)
779 compiler.execPrefixCommand = pathBox.slashPath;
780 else if(pathBox == gnuToolchainPrefix)
781 compiler.gccPrefix = pathBox.slashPath;
782 else if(pathBox == sysroot)
783 compiler.sysroot = pathBox.slashPath;
784 modifiedDocument = true;
785 compilersTab.modifiedDocument = true;
792 CompilerConfig compiler = loadedCompiler;
795 bool disabled = compiler.readOnly;
796 bool isVC = compiler.type.isVC;
797 ecp.path = compiler.ecpCommand;
798 ecc.path = compiler.eccCommand;
799 ecs.path = compiler.ecsCommand;
800 ear.path = compiler.earCommand;
801 cpp.path = compiler.cppCommand;
802 cc.path = compiler.ccCommand;
803 cxx.path = compiler.cxxCommand;
804 make.path = compiler.makeCommand;
805 executableLauncher.path = compiler.executableLauncher;
806 gnuToolchainPrefix.path = compiler.gnuToolchainPrefix;
807 sysroot.path = compiler.sysroot;
809 ecpLabel.disabled = ecp.disabled = disabled;
810 eccLabel.disabled = ecc.disabled = disabled;
811 ecsLabel.disabled = ecs.disabled = disabled;
812 earLabel.disabled = ear.disabled = disabled;
813 cppLabel.disabled = cpp.disabled = isVC || disabled;
814 cxxLabel.disabled = cxx.disabled = isVC || disabled;
815 ccLabel.disabled = cc.disabled = isVC || disabled;
816 makeLabel.disabled = make.disabled = disabled;
817 executableLauncherLabel.disabled = executableLauncher.disabled = disabled;
818 gnuToolchainPrefixLabel.disabled = gnuToolchainPrefix.disabled = disabled;
819 sysrootLabel.disabled = sysroot.disabled = disabled;
821 modifiedDocument = false;
825 class CompilerEnvironmentTab : CompilersSubTab
827 background = formColor;
828 text = $"Environment";
830 Label labelEnvVars { envVars, labeledWindow = envVars, position = { 0, 6 }; };
831 NamedStringsBox envVars
833 this, size = { 290, 22 }, anchor = { left = 8, top = 8, right = 8, bottom = 8 };
834 text = $"Environment Variables", hotKey = altE; //, option = OPTION(postbuildCommands);
836 bool NotifyModified(NamedStringsBox stringsBox)
838 CompilerConfig compiler = loadedCompiler;
841 compiler.environmentVars = stringsBox.namedStrings;
842 modifiedDocument = true;
843 compilersTab.modifiedDocument = true;
849 CompilerEnvironmentTab()
855 CompilerConfig compiler = loadedCompiler;
858 envVars.namedStrings = compiler.environmentVars;
860 modifiedDocument = false;
865 class CompilerOptionsTab : CompilersSubTab
867 background = formColor;
870 Label labelTargetPlatform { this, position = { 8, 12 }, labeledWindow = targetPlatform }; // TOCHECK: nameless instances dissapear when selecting tabs?
871 DropBox targetPlatform
873 this, position = { 110, 8 }, size = { 160 };
874 text = $"Target Platform", hotKey = altT;
875 bool NotifySelect(DropBox dropBox, DataRow row, Modifiers mods)
877 CompilerConfig compiler = loadedCompiler;
880 compiler.targetPlatform = (Platform)row.tag;
881 modifiedDocument = true;
882 compilersTab.modifiedDocument = true;
889 Label numJobsLabel { this, position = { 8, 40 }, labeledWindow = numJobsBox };
892 this, text = $"Number of parallel build jobs", hotKey = altJ, borderStyle = deep;
893 position = { 184, 36 }, size = { 80, 20 }, type = class(int), data = &numJobs;
895 bool OnKeyDown(Key key, unichar ch)
897 if((SmartKey)key == enter)
899 DataBox::OnKeyDown(key, ch);
903 return DataBox::OnKeyDown(key, ch);
906 bool OnActivate(bool active, Window previous, bool * goOnWithActivation, bool direct)
916 bool NotifyChanged(bool closingDropDown)
918 CompilerConfig compiler = loadedCompiler;
921 compiler.numJobs = numJobs;
922 modifiedDocument = true;
923 compilersTab.modifiedDocument = true;
931 this, text = $"Use ccache", hotKey = altC, position = { 8, 68 };
934 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
936 CompilerConfig compiler = loadedCompiler;
939 compiler.ccacheEnabled = button.checked;
940 modifiedDocument = true;
941 compilersTab.modifiedDocument = true;
949 this, text = $"Use distcc", hotKey = altD, position = { 158, 68 };
952 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
954 CompilerConfig compiler = loadedCompiler;
957 distccHosts.disabled = !button.checked;
958 compiler.distccEnabled = button.checked;
959 modifiedDocument = true;
960 compilersTab.modifiedDocument = true;
966 Label distccHostsLabel { this, position = { 8, 96 }, labeledWindow = distccHosts };
969 this, text = $"distcc hosts", hotKey = altH;
970 position = { 88, 92 }, size = { 300 };
972 bool NotifyModified(EditBox editBox)
974 CompilerConfig compiler = loadedCompiler;
977 compiler.distccHosts = editBox.contents;
978 modifiedDocument = true;
979 compilersTab.modifiedDocument = true;
985 Label lblPrepDefs { this, position = { 8, 124 }, labeledWindow = prepDefs };
986 StringListBox prepDefs
988 this, text = $"Preprocessor directives:", hotKey = altP;
989 position = { 148, 124 }, size = { 300 };
991 bool NotifyModified(EditBox editBox)
995 CompilerConfig compiler = loadedCompiler;
996 compiler.prepDirectives = ((StringListBox)editBox).strings;
997 modifiedDocument = true;
998 compilersTab.modifiedDocument = true;
1004 Label lblCompilerFlags { this, position = { 8, 152 }, labeledWindow = compilerFlags };
1005 StringListBox compilerFlags
1007 this, text = $"Additional compiler flags:", hotKey = altL;
1008 position = { 148, 152 }, size = { 300 };
1010 bool NotifyModified(EditBox editBox)
1014 CompilerConfig compiler = loadedCompiler;
1015 compiler.compilerFlags = ((StringListBox)editBox).strings;
1016 modifiedDocument = true;
1017 compilersTab.modifiedDocument = true;
1023 Label lblLinkerFlags { this, position = { 8, 180 }, labeledWindow = linkerFlags };
1024 StringListBox linkerFlags
1026 this, text = $"Additional linker flags:", hotKey = altL;
1027 position = { 148, 180 }, size = { 300 };
1029 bool NotifyModified(EditBox editBox)
1033 CompilerConfig compiler = loadedCompiler;
1034 compiler.linkerFlags = ((StringListBox)editBox).strings;
1035 modifiedDocument = true;
1036 compilersTab.modifiedDocument = true;
1042 Label lblExcludedLibraries { this, position = { 8, 208 }, labeledWindow = excludedLibraries };
1043 StringListBox excludedLibraries
1045 this, text = $"Libraries to exclude:", hotKey = altX;
1046 position = { 148, 208 }, size = { 300 };
1048 bool NotifyModified(EditBox editBox)
1052 CompilerConfig compiler = loadedCompiler;
1053 compiler.excludeLibs = ((StringListBox)editBox).strings;
1054 modifiedDocument = true;
1055 compilersTab.modifiedDocument = true;
1061 CompilerOptionsTab()
1065 for(p = (Platform)1; p < Platform::enumSize; p++)
1067 row = targetPlatform.AddRow();
1075 CompilerConfig compiler = loadedCompiler;
1078 bool disabled = compiler.readOnly;
1079 targetPlatform.currentRow = targetPlatform.FindRow(compiler.targetPlatform);
1080 numJobs = compiler.numJobs;
1081 numJobsBox.Refresh();
1082 ccacheEnabled.checked = compiler.ccacheEnabled;
1083 distccEnabled.checked = compiler.distccEnabled;
1084 distccHosts.disabled = !compiler.distccEnabled;
1085 distccHosts.contents = compiler.distccHosts;
1086 prepDefs.strings = compiler.prepDirectives;
1087 excludedLibraries.strings = compiler.excludeLibs;
1088 compilerFlags.strings = compiler.compilerFlags;
1089 linkerFlags.strings = compiler.linkerFlags;
1091 labelTargetPlatform.disabled = disabled;
1092 targetPlatform.disabled = disabled;
1095 modifiedDocument = false;
1099 class CompilersSubTab : Tab
1101 property CompilersTab compilersTab
1105 CompilersTab tab = (CompilersTab)master;
1106 while(tab && tab._class != class(CompilersTab))
1107 tab = (CompilersTab)tab.master;
1112 property CompilerConfig loadedCompiler
1116 CompilersTab tab = compilersTab;
1117 return tab ? tab.activeCompiler : null;
1122 class ProjectOptionsTab : GlobalSettingsSubTab
1124 background = formColor;
1127 Label defaultTargetDirLabel { this, position = { 8, 34 }, labeledWindow = defaultTargetDir };
1128 PathBox defaultTargetDir
1130 this, size = { 160, 21 }, position = { 8, 52 }, anchor = { left = 8, top = 52, right = 8 };
1131 text = $"Default Target Directory", hotKey = altT;
1133 bool NotifyModified(PathBox pathBox)
1135 BasicValidatePathBoxPath(pathBox);
1136 modifiedDocument = true;
1141 Label defaultIntermediateObjDirLabel { this, position = { 8, 78 }, labeledWindow = defaultIntermediateObjDir };
1142 PathBox defaultIntermediateObjDir
1144 this, size = { 160, 21 }, position = { 8, 96 }, anchor = { left = 8, top = 96, right = 8 };
1145 text = $"Default Intermediate Objects Directory", hotKey = altI;
1147 bool NotifyModified(PathBox pathBox)
1149 BasicValidatePathBoxPath(pathBox);
1150 modifiedDocument = true;
1156 // COMPILER TOFIX: if class GlobalSettingsSubTab is after class WorkspaceOptionsTab the OnPostCreate
1157 // of WorkspaceOptionsTab will *not* be called!
1158 class GlobalSettingsSubTab : Tab
1160 property GlobalSettingsDialog dialog
1164 GlobalSettingsDialog dialog = (GlobalSettingsDialog)master;
1165 while(dialog && dialog._class != class(GlobalSettingsDialog))
1166 dialog = (GlobalSettingsDialog)dialog.master;
1172 class WorkspaceOptionsTab : GlobalSettingsSubTab
1174 background = formColor;
1175 text = $"Workspace";
1177 Label defaultCompilerLabel { this, position = { 8, 14 }, labeledWindow = defaultCompilerDropBox };
1178 DropBox defaultCompilerDropBox
1180 this, position = { 140, 8 }, size = { 220 };
1181 text = $"Default Compiler", hotKey = altA;
1183 bool NotifySelect(DropBox dropBox, DataRow row, Modifiers mods)
1185 modifiedDocument = true;
1192 GlobalSettingsDialog dialog = this.dialog;
1193 if(dialog && dialog.compilersTab.compilerConfigs && dialog.ideSettings)
1196 for(compiler : dialog.ideSettings.compilerConfigs)
1198 row = defaultCompilerDropBox.AddString(compiler.name);
1199 if(dialog.ideSettings.defaultCompiler && dialog.ideSettings.defaultCompiler[0] &&
1200 !strcmp(compiler.name, dialog.ideSettings.defaultCompiler))
1201 defaultCompilerDropBox.currentRow = row;
1203 if(!defaultCompilerDropBox.currentRow && defaultCompilerDropBox)
1204 defaultCompilerDropBox.currentRow = defaultCompilerDropBox.firstRow;
1211 // TOFIX: The selection will be lost upon changing tab...
1212 // Should either warn, or leave it modified and put in place
1213 // checks to save/find the compiler by name
1214 defaultCompilerDropBox.Clear();
1215 modifiedDocument = false;
1219 //static define app = ((GuiApplication)__thisModule);