2 // Consumes the order.xml file that contains a list of all the assemblies to build
3 // and produces a solution and the csproj files for it
5 // Currently this hardcodes a set of assemblies to build, the net-4.x series, but
6 // it can be extended to handle the command line tools.
9 // * This fails to find matches for "System" and "System.xml" when processing the
10 // RabbitMQ executable, likely, because we do not process executables yet
12 // * Has not been tested in a while with the command line tools
16 using System
.Collections
.Generic
;
18 using System
.Globalization
;
19 using System
.Xml
.Linq
;
20 using System
.Xml
.XPath
;
25 Library
, Exe
, Module
, WinExe
28 public enum LanguageVersion
{
38 public static readonly string NewLine
= "\r\n"; //Environment.NewLine; // "\n";
39 public SlnGenerator (string formatVersion
= "2012")
41 switch (formatVersion
) {
43 this.header
= MakeHeader ("10.00", "2008");
46 this.header
= MakeHeader ("12.00", "2012");
51 const string project_start
= "Project(\"{{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}}\") = \"{0}\", \"{1}\", \"{2}\""; // Note: No need to double up on {} around {2}
52 const string project_end
= "EndProject";
54 public List
<MsbuildGenerator
.VsCsproj
> libraries
= new List
<MsbuildGenerator
.VsCsproj
> ();
57 string MakeHeader (string formatVersion
, string yearTag
)
59 return string.Format ("Microsoft Visual Studio Solution File, Format Version {0}" + NewLine
+ "# Visual Studio {1}", formatVersion
, yearTag
);
62 public void Add (MsbuildGenerator
.VsCsproj vsproj
)
65 libraries
.Add (vsproj
);
66 } catch (Exception ex
) {
67 Console
.WriteLine (ex
);
71 public void Write (string filename
)
73 var fullPath
= Path
.GetDirectoryName (filename
) + "/";
75 using (var sln
= new StreamWriter (filename
)) {
77 sln
.WriteLine (header
);
78 foreach (var proj
in libraries
) {
79 var unixProjFile
= proj
.csProjFilename
.Replace ("\\", "/");
80 var fullProjPath
= Path
.GetFullPath (unixProjFile
);
81 sln
.WriteLine (project_start
, proj
.library
, MsbuildGenerator
.GetRelativePath (fullPath
, fullProjPath
), proj
.projectGuid
);
82 sln
.WriteLine (project_end
);
84 sln
.WriteLine ("Global");
86 sln
.WriteLine ("\tGlobalSection(SolutionConfigurationPlatforms) = preSolution");
87 sln
.WriteLine ("\t\tDebug|Any CPU = Debug|Any CPU");
88 sln
.WriteLine ("\t\tRelease|Any CPU = Release|Any CPU");
89 sln
.WriteLine ("\tEndGlobalSection");
91 sln
.WriteLine ("\tGlobalSection(ProjectConfigurationPlatforms) = postSolution");
92 foreach (var proj
in libraries
) {
93 var guid
= proj
.projectGuid
;
94 sln
.WriteLine ("\t\t{0}.Debug|Any CPU.ActiveCfg = Debug|Any CPU", guid
);
95 sln
.WriteLine ("\t\t{0}.Debug|Any CPU.Build.0 = Debug|Any CPU", guid
);
96 sln
.WriteLine ("\t\t{0}.Release|Any CPU.ActiveCfg = Release|Any CPU", guid
);
97 sln
.WriteLine ("\t\t{0}.Release|Any CPU.Build.0 = Release|Any CPU", guid
);
99 sln
.WriteLine ("\tEndGlobalSection");
101 sln
.WriteLine ("\tGlobalSection(SolutionProperties) = preSolution");
102 sln
.WriteLine ("\t\tHideSolutionNode = FALSE");
103 sln
.WriteLine ("\tEndGlobalSection");
105 sln
.WriteLine ("EndGlobal");
109 internal bool ContainsProjectIdentifier (string projId
)
111 return libraries
.FindIndex (x
=> (x
.library
== projId
)) >= 0;
114 public int Count { get { return libraries.Count; }
}
117 class MsbuildGenerator
{
118 static readonly string NewLine
= SlnGenerator
.NewLine
;
119 static XmlNamespaceManager xmlns
;
121 public const string profile_2_0
= "_2_0";
122 public const string profile_3_5
= "_3_5";
123 public const string profile_4_0
= "_4_0";
124 public const string profile_4_x
= "_4_x";
128 Console
.WriteLine ("Invalid argument");
131 static string template
;
132 static MsbuildGenerator ()
134 using (var input
= new StreamReader ("csproj.tmpl")) {
135 template
= input
.ReadToEnd ();
138 xmlns
= new XmlNamespaceManager (new NameTable ());
139 xmlns
.AddNamespace ("x", "http://schemas.microsoft.com/developer/msbuild/2003");
142 // The directory as specified in order.xml
149 public string CsprojFilename
;
152 // Our base directory, this is relative to our exectution point mono/msvc/scripts
156 public string LibraryOutput
, AbsoluteLibraryOutput
;
158 public MsbuildGenerator (XElement xproject
)
160 this.xproject
= xproject
;
161 dir
= xproject
.Attribute ("dir").Value
;
162 library
= xproject
.Attribute ("library").Value
;
163 CsprojFilename
= "..\\..\\mcs\\" + dir
+ "\\" + library
+ ".csproj";
164 LibraryOutput
= xproject
.Element ("library_output").Value
;
166 projectGuid
= LookupOrGenerateGuid ();
167 fx_version
= xproject
.Element ("fx_version").Value
;
168 Csproj
= new VsCsproj () {
169 csProjFilename
= this.CsprojFilename
,
170 projectGuid
= this.projectGuid
,
171 library_output
= this.LibraryOutput
,
172 fx_version
= double.Parse (fx_version
),
173 library
= this.library
,
174 MsbuildGenerator
= this
179 class_dir
= "../class/";
180 base_dir
= "../../mcs/mcs";
184 foreach (char c
in dir
) {
186 mcs_topdir
= "..//" + mcs_topdir
;
188 class_dir
= mcs_topdir
.Substring (3);
190 base_dir
= Path
.Combine ("..", "..", "mcs", dir
);
192 AbsoluteLibraryOutput
= Path
.GetFullPath (Path
.Combine (base_dir
, LibraryOutput
));
195 string LookupOrGenerateGuid ()
197 var projectFile
= NativeName (CsprojFilename
);
198 if (File
.Exists (projectFile
)){
199 var doc
= XDocument
.Load (projectFile
);
200 return doc
.XPathSelectElement ("x:Project/x:PropertyGroup/x:ProjectGuid", xmlns
).Value
;
202 return "{" + Guid.NewGuid ().ToString ().ToUpper () + "}";
207 StringBuilder defines
= new StringBuilder ();
208 bool Optimize
= true;
209 bool want_debugging_support
= false;
211 Dictionary
<string, string> embedded_resources
= new Dictionary
<string, string> ();
212 List
<string> warning_as_error
= new List
<string> ();
213 List
<int> ignore_warning
= new List
<int> ();
214 bool load_default_config
= true;
216 List
<string> references
= new List
<string> ();
217 List
<string> libs
= new List
<string> ();
218 List
<string> reference_aliases
= new List
<string> ();
219 bool showWarnings
= true;
222 #pragma warning disable 0219, 0414
223 int WarningLevel
= 4;
225 bool Checked
= false;
226 bool WarningsAreErrors
;
227 bool VerifyClsCompliance
= true;
228 string win32IconFile
;
229 string StrongNameKeyFile
;
230 bool copyLocal
= true;
231 Target Target
= Target
.Library
;
232 string TargetExt
= ".exe";
234 string StrongNameKeyContainer
;
235 bool StrongNameDelaySign
= false;
236 LanguageVersion Version
= LanguageVersion
.Default
;
239 // Class directory, relative to
241 #pragma warning restore 0219,414
243 readonly char [] argument_value_separator
= new char [] { ';', ',' }
;
246 // This parses the -arg and /arg options to the compiler, even if the strings
247 // in the following text use "/arg" on the strings.
249 bool CSCParseOption (string option
, ref string [] args
)
251 int idx
= option
.IndexOf (':');
258 arg
= option
.Substring (0, idx
);
260 value = option
.Substring (idx
+ 1);
263 switch (arg
.ToLower (CultureInfo
.InvariantCulture
)) {
275 Target
= Target
.WinExe
;
279 Target
= Target
.Library
;
284 Target
= Target
.Module
;
285 TargetExt
= ".netmodule";
294 if (value.Length
== 0) {
296 Environment
.Exit (1);
314 case "/incremental+":
315 case "/incremental-":
321 if (value.Length
== 0) {
323 Environment
.Exit (1);
326 foreach (string d
in value.Split (argument_value_separator
)) {
327 if (defines
.Length
!= 0)
328 defines
.Append (";");
337 // We should collect data, runtime, etc and store in the file specified
341 case "/linkresource":
344 bool embeded
= arg
[1] == 'r' || arg
[1] == 'R';
345 string [] s
= value.Split (argument_value_separator
);
348 if (s
[0].Length
== 0)
350 embedded_resources
[s
[0]] = Path
.GetFileName (s
[0]);
353 embedded_resources
[s
[0]] = s
[1];
356 Console
.WriteLine ("Does not support this method yet: {0}", arg
);
357 Environment
.Exit (1);
360 Console
.WriteLine ("Wrong number of arguments for option `{0}'", option
);
361 Environment
.Exit (1);
368 Console
.WriteLine ("/recurse not supported");
369 Environment
.Exit (1);
374 if (value.Length
== 0) {
375 Console
.WriteLine ("-reference requires an argument");
376 Environment
.Exit (1);
379 string [] refs
= value.Split (argument_value_separator
);
380 foreach (string r
in refs
) {
382 int index
= val
.IndexOf ('=');
384 reference_aliases
.Add (r
);
389 references
.Add (val
);
402 Console
.WriteLine ("{0} = not supported", arg
);
410 win32IconFile
= value;
414 want_debugging_support
= false;
419 want_debugging_support
= true;
436 VerifyClsCompliance
= false;
449 case "/warnaserror+":
450 if (value.Length
== 0) {
451 WarningsAreErrors
= true;
453 foreach (string wid
in value.Split (argument_value_separator
))
454 warning_as_error
.Add (wid
);
459 // Console.WriteLine ("Warning ignoring /runtime:v4");
462 case "/warnaserror-":
463 if (value.Length
== 0) {
464 WarningsAreErrors
= false;
466 foreach (string wid
in value.Split (argument_value_separator
))
467 warning_as_error
.Remove (wid
);
472 WarningLevel
= Int32
.Parse (value);
478 if (value.Length
== 0) {
479 Console
.WriteLine ("/nowarn requires an argument");
480 Environment
.Exit (1);
483 warns
= value.Split (argument_value_separator
);
484 foreach (string wc
in warns
) {
486 if (wc
.Trim ().Length
== 0)
489 int warn
= Int32
.Parse (wc
);
491 throw new ArgumentOutOfRangeException ("warn");
493 ignore_warning
.Add (warn
);
495 Console
.WriteLine (String
.Format ("`{0}' is not a valid warning number", wc
));
496 Environment
.Exit (1);
503 load_default_config
= false;
519 if (value == String
.Empty
) {
520 Console
.WriteLine ("{0} requires an argument", arg
);
521 Environment
.Exit (1);
523 StrongNameKeyFile
= value;
525 case "/keycontainer":
526 if (value == String
.Empty
) {
527 Console
.WriteLine ("{0} requires an argument", arg
);
528 Environment
.Exit (1);
530 StrongNameKeyContainer
= value;
534 StrongNameDelaySign
= true;
537 StrongNameDelaySign
= false;
541 switch (value.ToLower (CultureInfo
.InvariantCulture
)) {
543 Version
= LanguageVersion
.ISO_1
;
547 Version
= LanguageVersion
.Default
;
550 Version
= LanguageVersion
.ISO_2
;
553 Version
= LanguageVersion
.Future
;
556 Console
.WriteLine ("Invalid option `{0}' for /langversion. It must be either `ISO-1', `ISO-2' or `Default'", value);
557 Environment
.Exit (1);
567 case "/-getresourcestrings":
571 Console
.WriteLine ("Failing with : {0}", arg
);
575 static string [] LoadArgs (string file
)
578 var args
= new List
<string> ();
581 f
= new StreamReader (file
);
586 StringBuilder sb
= new StringBuilder ();
588 while ((line
= f
.ReadLine ()) != null) {
591 for (int i
= 0; i
< t
; i
++) {
594 if (c
== '"' || c
== '\'') {
597 for (i
++; i
< t
; i
++) {
604 } else if (c
== ' ') {
606 args
.Add (sb
.ToString ());
613 args
.Add (sb
.ToString ());
618 string [] ret_value
= new string [args
.Count
];
619 args
.CopyTo (ret_value
, 0);
624 static string Load (string f
)
626 var native
= NativeName (f
);
628 if (File
.Exists (native
)) {
629 using (var sr
= new StreamReader (native
)) {
630 return sr
.ReadToEnd ();
636 public static string NativeName (string path
)
638 if (System
.IO
.Path
.DirectorySeparatorChar
== '/')
639 return path
.Replace ("\\", "/");
641 return path
.Replace ("/", "\\");
644 public class VsCsproj
{
645 public string projectGuid
;
646 public string output
;
647 public string library_output
;
648 public string csProjFilename
;
649 public double fx_version
;
650 public List
<VsCsproj
> projReferences
= new List
<VsCsproj
> ();
651 public string library
;
652 public MsbuildGenerator MsbuildGenerator
;
655 public VsCsproj Csproj
;
657 public VsCsproj
Generate (string library_output
, Dictionary
<string,MsbuildGenerator
> projects
, bool showWarnings
= false)
659 var generatedProjFile
= NativeName (Csproj
.csProjFilename
);
660 //Console.WriteLine ("Generating: {0}", generatedProjFile);
662 string boot
, flags
, output_name
, built_sources
, response
, profile
;
664 boot
= xproject
.Element ("boot").Value
;
665 flags
= xproject
.Element ("flags").Value
;
666 output_name
= xproject
.Element ("output").Value
;
667 if (output_name
.EndsWith (".exe"))
669 built_sources
= xproject
.Element ("built_sources").Value
;
670 response
= xproject
.Element ("response").Value
;
672 profile
= xproject
.Element ("profile").Value
;
673 if (string.IsNullOrEmpty (response
)) {
674 // Address the issue where entries are missing the fx_version
675 // Should be fixed in the Makefile or elsewhere; this is a workaround
676 //<fx_version>basic</fx_version>
677 //<profile>./../build/deps/mcs.exe.sources.response</profile>
678 //<response></response>
680 profile
= fx_version
;
681 if (response
.Contains ("build") || response
.Contains ("basic") || response
.Contains (profile_2_0
)) {
683 if (response
.Contains (profile_2_0
)) profile
= "net_2_0";
684 } if (response
.Contains ("build") || response
.Contains ("basic") || response
.Contains (profile_2_0
)) {
686 } else if (response
.Contains (profile_3_5
)) {
689 } else if (response
.Contains (profile_4_0
)) {
692 } else if (response
.Contains (profile_4_x
)) {
698 // Prebuild code, might be in inputs, check:
699 // inputs/LIBRARY.pre
701 string prebuild
= GenerateStep (library
, ".pre", "PreBuildEvent");
702 string postbuild
= GenerateStep (library
, ".post", "PostBuildEvent");
704 var all_args
= new Queue
<string []> ();
705 all_args
.Enqueue (flags
.Split ());
706 while (all_args
.Count
> 0) {
707 string [] f
= all_args
.Dequeue ();
709 for (int i
= 0; i
< f
.Length
; i
++) {
710 if (f
[i
].Length
> 0 && f
[i
][0] == '-')
711 f
[i
] = "/" + f
[i
].Substring (1);
713 if (f
[i
] [0] == '@') {
714 string [] extra_args
;
715 string response_file
= f
[i
].Substring (1);
717 var resp_file_full
= Path
.Combine (base_dir
, response_file
);
718 extra_args
= LoadArgs (resp_file_full
);
719 if (extra_args
== null) {
720 Console
.WriteLine ($"{library_output}: Unable to open response file: {resp_file_full}");
721 Environment
.Exit (1);
724 all_args
.Enqueue (extra_args
);
728 if (CSCParseOption (f
[i
], ref f
))
730 Console
.WriteLine ("{library_output}: Failure with {0}", f
[i
]);
731 Environment
.Exit (1);
735 string [] source_files
;
736 using (var reader
= new StreamReader (NativeName (base_dir
+ "\\" + response
))) {
737 source_files
= reader
.ReadToEnd ().Split ();
740 Array
.Sort (source_files
);
742 StringBuilder sources
= new StringBuilder ();
743 foreach (string s
in source_files
) {
747 string src
= s
.Replace ("/", "\\");
748 if (src
.StartsWith (@"Test\..\"))
749 src
= src
.Substring (8, src
.Length
- 8);
751 sources
.AppendFormat (" <Compile Include=\"{0}\" />" + NewLine
, src
);
754 source_files
= built_sources
.Split ();
755 Array
.Sort (source_files
);
757 foreach (string s
in source_files
) {
761 string src
= s
.Replace ("/", "\\");
762 if (src
.StartsWith (@"Test\..\"))
763 src
= src
.Substring (8, src
.Length
- 8);
765 sources
.AppendFormat (" <Compile Include=\"{0}\" />" + NewLine
, src
);
767 sources
.Remove (sources
.Length
- 1, 1);
769 //if (library == "corlib-build") // otherwise, does not compile on fx_version == 4.0
771 // references.Add("System.dll");
772 // references.Add("System.Xml.dll");
775 //if (library == "System.Core-build") // otherwise, slow compile. May be a transient need.
777 // this.ignore_warning.Add(1685);
778 // this.ignore_warning.Add(0436);
781 var refs
= new StringBuilder ();
783 bool is_test
= response
.Contains ("_test_");
785 // F:\src\mono\mcs\class\lib\net_2_0\nunit.framework.dll
786 // F:\src\mono\mcs\class\SomeProject\SomeProject_test_-net_2_0.csproj
787 var nunitLibPath
= string.Format (@"..\lib\{0}\nunit.framework.dll", profile
);
788 refs
.Append (string.Format (" <Reference Include=\"{0}\" />" + NewLine
, nunitLibPath
));
791 var resources
= new StringBuilder ();
792 if (embedded_resources
.Count
> 0) {
793 resources
.AppendFormat (" <ItemGroup>" + NewLine
);
794 foreach (var dk
in embedded_resources
) {
796 if (source
.EndsWith (".resources"))
797 source
= source
.Replace (".resources", ".resx");
798 resources
.AppendFormat (" <EmbeddedResource Include=\"{0}\">" + NewLine
, source
);
799 resources
.AppendFormat (" <LogicalName>{0}</LogicalName>" + NewLine
, dk
.Value
);
800 resources
.AppendFormat (" </EmbeddedResource>" + NewLine
);
802 resources
.AppendFormat (" </ItemGroup>" + NewLine
);
806 if (references
.Count
> 0 || reference_aliases
.Count
> 0) {
807 // -r:mscorlib.dll -r:System.dll
808 //<ProjectReference Include="..\corlib\corlib-basic.csproj">
809 // <Project>{155aef28-c81f-405d-9072-9d52780e3e70}</Project>
810 // <Name>corlib-basic</Name>
811 //</ProjectReference>
812 //<ProjectReference Include="..\System\System-basic.csproj">
813 // <Project>{2094e859-db2f-481f-9630-f89d31d9ed48}</Project>
814 // <Name>System-basic</Name>
815 //</ProjectReference>
816 var refdistinct
= references
.Distinct ();
817 foreach (string reference
in refdistinct
) {
819 var match
= GetMatchingCsproj (library_output
, reference
, projects
);
821 AddProjectReference (refs
, Csproj
, match
, reference
, null);
824 Console
.WriteLine ("{0}: Could not find a matching project reference for {1}", library
, Path
.GetFileName (reference
));
825 Console
.WriteLine (" --> Adding reference with hintpath instead");
827 refs
.Append (" <Reference Include=\"" + reference
+ "\">" + NewLine
);
828 refs
.Append (" <SpecificVersion>False</SpecificVersion>" + NewLine
);
829 refs
.Append (" <HintPath>" + reference
+ "</HintPath>" + NewLine
);
830 refs
.Append (" <Private>False</Private>" + NewLine
);
831 refs
.Append (" </Reference>" + NewLine
);
835 foreach (string r
in reference_aliases
) {
836 int index
= r
.IndexOf ('=');
837 string alias = r
.Substring (0, index
);
838 string assembly
= r
.Substring (index
+ 1);
839 var match
= GetMatchingCsproj (library_output
, assembly
, projects
, explicitPath
: true);
841 AddProjectReference (refs
, Csproj
, match
, r
, alias);
843 throw new NotSupportedException (string.Format ("From {0}, could not find a matching project reference for {1}", library
, r
));
844 refs
.Append (" <Reference Include=\"" + assembly
+ "\">" + NewLine
);
845 refs
.Append (" <SpecificVersion>False</SpecificVersion>" + NewLine
);
846 refs
.Append (" <HintPath>" + r
+ "</HintPath>" + NewLine
);
847 refs
.Append (" <Aliases>" + alias + "</Aliases>" + NewLine
);
848 refs
.Append (" </Reference>" + NewLine
);
855 // ../class/lib/build/tmp/System.Xml.dll [No longer possible, we should be removing this from order.xml]
856 // /class/lib/basic/System.Core.dll
857 // <library_output>mcs.exe</library_output>
858 string build_output_dir
;
859 if (LibraryOutput
.Contains ("/"))
860 build_output_dir
= Path
.GetDirectoryName (LibraryOutput
);
862 build_output_dir
= "bin\\Debug\\" + library
;
864 bool basic_or_build
= (library
.Contains ("-basic") || library
.Contains ("-build"));
867 // Replace the template values
870 string strongNameSection
= "";
871 if (StrongNameKeyFile
!= null){
872 strongNameSection
= String
.Format (
873 " <PropertyGroup>" + NewLine
+
874 " <SignAssembly>true</SignAssembly>" + NewLine
+
876 " </PropertyGroup>" + NewLine
+
877 " <PropertyGroup>" + NewLine
+
878 " <AssemblyOriginatorKeyFile>{0}</AssemblyOriginatorKeyFile>" + NewLine
+
879 " </PropertyGroup>", StrongNameKeyFile
, StrongNameDelaySign
? " <DelaySign>true</DelaySign>" + NewLine
: "");
881 Csproj
.output
= template
.
882 Replace ("@OUTPUTTYPE@", Target
== Target
.Library
? "Library" : "Exe").
883 Replace ("@SIGNATURE@", strongNameSection
).
884 Replace ("@PROJECTGUID@", Csproj
.projectGuid
).
885 Replace ("@DEFINES@", defines
.ToString ()).
886 Replace ("@DISABLEDWARNINGS@", string.Join (",", (from i
in ignore_warning
select i
.ToString ()).ToArray ())).
887 //Replace("@NOSTDLIB@", (basic_or_build || (!StdLib)) ? "<NoStdLib>true</NoStdLib>" : string.Empty).
888 Replace ("@NOSTDLIB@", "<NoStdLib>" + (!StdLib
).ToString () + "</NoStdLib>").
889 Replace ("@NOCONFIG@", "<NoConfig>" + (!load_default_config
).ToString () + "</NoConfig>").
890 Replace ("@ALLOWUNSAFE@", Unsafe
? "<AllowUnsafeBlocks>true</AllowUnsafeBlocks>" : "").
891 Replace ("@FX_VERSION", fx_version
).
892 Replace ("@ASSEMBLYNAME@", Path
.GetFileNameWithoutExtension (output_name
)).
893 Replace ("@OUTPUTDIR@", build_output_dir
).
894 Replace ("@OUTPUTSUFFIX@", Path
.GetFileName (build_output_dir
)).
895 Replace ("@DEFINECONSTANTS@", defines
.ToString ()).
896 Replace ("@DEBUG@", want_debugging_support
? "true" : "false").
897 Replace ("@DEBUGTYPE@", want_debugging_support
? "full" : "pdbonly").
898 Replace ("@REFERENCES@", refs
.ToString ()).
899 Replace ("@PREBUILD@", prebuild
).
900 Replace ("@POSTBUILD@", postbuild
).
901 Replace ("@STARTUPOBJECT@", main
== null ? "" : $"<StartupObject>{main}</StartupObject>").
902 //Replace ("@ADDITIONALLIBPATHS@", String.Format ("<AdditionalLibPaths>{0}</AdditionalLibPaths>", string.Join (",", libs.ToArray ()))).
903 Replace ("@ADDITIONALLIBPATHS@", String
.Empty
).
904 Replace ("@RESOURCES@", resources
.ToString ()).
905 Replace ("@OPTIMIZE@", Optimize
? "true" : "false").
906 Replace ("@SOURCES@", sources
.ToString ());
908 //Console.WriteLine ("Generated {0}", ofile.Replace ("\\", "/"));
909 using (var o
= new StreamWriter (generatedProjFile
)) {
910 o
.WriteLine (Csproj
.output
);
916 string GenerateStep (string library
, string suffix
, string eventKey
)
918 string target
= Load (library
+ suffix
);
919 string target_windows
, target_unix
;
921 int q
= library
.IndexOf ("-");
923 target
= target
+ Load (library
.Substring (0, q
) + suffix
);
925 if (target
.IndexOf ("@MONO@") != -1){
926 target_unix
= target
.Replace ("@MONO@", "mono").Replace ("@CAT@", "cat");
927 target_windows
= target
.Replace ("@MONO@", "").Replace ("@CAT@", "type");
929 target_unix
= target
.Replace ("jay.exe", "jay");
930 target_windows
= target
;
932 const string condition_unix
= "Condition=\" '$(OS)' != 'Windows_NT' \"";
933 const string condition_windows
= "Condition=\" '$(OS)' == 'Windows_NT' \"";
935 $" <{eventKey} {condition_unix}>\n{target_unix}\n </{eventKey}>{NewLine}" +
936 $" <{eventKey} {condition_windows}>{NewLine}{target_windows}{NewLine} </{eventKey}>";
940 void AddProjectReference (StringBuilder refs
, VsCsproj result
, MsbuildGenerator match
, string r
, string alias)
942 refs
.AppendFormat (" <ProjectReference Include=\"{0}\">{1}", GetRelativePath (result
.csProjFilename
, match
.CsprojFilename
), NewLine
);
943 refs
.Append (" <Project>" + match
.projectGuid
+ "</Project>" + NewLine
);
944 refs
.Append (" <Name>" + Path
.GetFileNameWithoutExtension (match
.CsprojFilename
.Replace ('\\', Path
.DirectorySeparatorChar
)) + "</Name>" + NewLine
);
946 refs
.Append (" <Aliases>" + alias + "</Aliases>");
947 refs
.Append (" </ProjectReference>" + NewLine
);
948 if (!result
.projReferences
.Contains (match
.Csproj
))
949 result
.projReferences
.Add (match
.Csproj
);
952 public static string GetRelativePath (string from, string to
)
954 from = from.Replace ("\\", "/");
955 to
= to
.Replace ("\\", "/");
956 var fromUri
= new Uri (Path
.GetFullPath (from));
957 var toUri
= new Uri (Path
.GetFullPath (to
));
959 var ret
= fromUri
.MakeRelativeUri (toUri
).ToString ().Replace ("%5C", "\x5c");
963 MsbuildGenerator
GetMatchingCsproj (string library_output
, string dllReferenceName
, Dictionary
<string,MsbuildGenerator
> projects
, bool explicitPath
= false)
965 // libDir would be "./../../class/lib/net_4_x for example
967 if (!dllReferenceName
.EndsWith (".dll") && !dllReferenceName
.EndsWith (".exe"))
968 dllReferenceName
+= ".dll";
970 var probe
= Path
.GetFullPath (Path
.Combine (base_dir
, dllReferenceName
));
971 foreach (var project
in projects
){
972 if (probe
== project
.Value
.AbsoluteLibraryOutput
)
973 return project
.Value
;
976 // not explicit, search for the library in the lib path order specified
978 foreach (var libDir
in libs
) {
979 var abs
= Path
.GetFullPath (Path
.Combine (base_dir
, libDir
));
980 foreach (var project
in projects
){
981 probe
= Path
.Combine (abs
, dllReferenceName
);
983 if (probe
== project
.Value
.AbsoluteLibraryOutput
)
984 return project
.Value
;
988 // Last attempt, try to find the library in all the projects
989 foreach (var project
in projects
) {
990 if (project
.Value
.AbsoluteLibraryOutput
.EndsWith (dllReferenceName
))
991 return project
.Value
;
994 var ljoined
= String
.Join (", ", libs
);
995 Console
.WriteLine ($"{library_output}: did not find referenced {dllReferenceName} with libs={ljoined}");
996 foreach (var p
in projects
) {
997 Console
.WriteLine ("{0}", p
.Value
.AbsoluteLibraryOutput
);
1004 public class Driver
{
1006 static IEnumerable
<XElement
> GetProjects (bool full
= false)
1008 XDocument doc
= XDocument
.Load ("order.xml");
1009 foreach (XElement project
in doc
.Root
.Elements ()) {
1010 string dir
= project
.Attribute ("dir").Value
;
1011 string library
= project
.Attribute ("library").Value
;
1012 var profile
= project
.Element ("profile").Value
;
1015 // Skip facades for now, the tool doesn't know how to deal with them yet.
1016 if (dir
.Contains ("Facades"))
1019 // These are currently broken, skip until they're fixed.
1020 if (dir
.StartsWith ("mcs") || dir
.Contains ("apigen"))
1024 // Do only class libraries for now
1026 if (!(dir
.StartsWith ("class") || dir
.StartsWith ("mcs") || dir
.StartsWith ("basic")))
1030 if (!library
.Contains ("tests"))
1031 yield return project
;
1036 // Do not do 2.1, it is not working yet
1037 // Do not do basic, as there is no point (requires a system mcs to be installed).
1039 if (library
.Contains ("moonlight") || library
.Contains ("-basic") || library
.EndsWith ("bootstrap") || library
.Contains ("build"))
1042 // The next ones are to make debugging easier for now
1043 if (profile
== "basic")
1046 // For now -- problem is, our resolver currently only considers the assembly name, and we ahve
1047 // conflicing 2.0 and 2.4 versions so for now, we just skip the nunit20 versions
1048 if (dir
.Contains ("nunit20"))
1052 if (profile
!= "net_4_x" || library
.Contains ("tests"))
1055 //Console.WriteLine ("Going to handle {0}", library);
1056 yield return project
;
1060 static void Main (string [] args
)
1062 if (!File
.Exists ("genproj.cs")) {
1063 Console
.WriteLine ("This command must be executed from mono/msvc/scripts");
1064 Environment
.Exit (1);
1067 if (args
.Length
== 1 && args
[0].ToLower ().Contains ("-h")) {
1068 Console
.WriteLine ("Usage:");
1069 Console
.WriteLine ("genproj.exe [visual_studio_release] [output_full_solutions]");
1070 Console
.WriteLine ("If output_full_solutions is false, only the main System*.dll");
1071 Console
.WriteLine (" assemblies (and dependencies) is included in the solution.");
1072 Console
.WriteLine ("Example:");
1073 Console
.WriteLine ("genproj.exe 2012 false");
1074 Console
.WriteLine ("genproj.exe with no arguments is equivalent to 'genproj.exe 2012 true'\n\n");
1075 Console
.WriteLine ("genproj.exe deps");
1076 Console
.WriteLine ("Generates a Makefile dependency file from the projects input");
1077 Environment
.Exit (0);
1080 var slnVersion
= (args
.Length
> 0) ? args
[0] : "2012";
1081 bool fullSolutions
= (args
.Length
> 1) ? bool.Parse (args
[1]) : true;
1083 // To generate makefile depenedencies
1084 var makefileDeps
= (args
.Length
> 0 && args
[0] == "deps");
1086 var sln_gen
= new SlnGenerator (slnVersion
);
1087 var four_five_sln_gen
= new SlnGenerator (slnVersion
);
1088 var projects
= new Dictionary
<string,MsbuildGenerator
> ();
1090 var duplicates
= new List
<string> ();
1091 foreach (var project
in GetProjects (makefileDeps
)) {
1092 var library_output
= project
.Element ("library_output").Value
;
1093 projects
[library_output
] = new MsbuildGenerator (project
);
1095 foreach (var project
in GetProjects (makefileDeps
)){
1096 var library_output
= project
.Element ("library_output").Value
;
1097 //Console.WriteLine ("=== {0} ===", library_output);
1098 var gen
= projects
[library_output
];
1100 var csproj
= gen
.Generate (library_output
, projects
);
1101 var csprojFilename
= csproj
.csProjFilename
;
1102 if (!sln_gen
.ContainsProjectIdentifier (csproj
.library
)) {
1103 sln_gen
.Add (csproj
);
1105 duplicates
.Add (csprojFilename
);
1108 } catch (Exception e
) {
1109 Console
.WriteLine ("Error in {0}\n{1}", project
, e
);
1113 Func
<MsbuildGenerator
.VsCsproj
, bool> additionalFilter
;
1114 additionalFilter
= fullSolutions
? (Func
<MsbuildGenerator
.VsCsproj
, bool>)null : IsCommonLibrary
;
1116 FillSolution (four_five_sln_gen
, MsbuildGenerator
.profile_4_x
, projects
.Values
, additionalFilter
);
1118 if (duplicates
.Count () > 0) {
1119 var sb
= new StringBuilder ();
1120 sb
.AppendLine ("WARNING: Skipped some project references, apparent duplicates in order.xml:");
1121 foreach (var item
in duplicates
) {
1122 sb
.AppendLine (item
);
1124 Console
.WriteLine (sb
.ToString ());
1127 WriteSolution (four_five_sln_gen
, Path
.Combine ("..", "..", MakeSolutionName (MsbuildGenerator
.profile_4_x
)));
1130 const string classDirPrefix
= "./../../";
1131 Console
.WriteLine ("here {0}", sln_gen
.libraries
.Count
);
1132 foreach (var p
in sln_gen
.libraries
){
1133 string rebasedOutput
= RebaseToClassDirectory (MsbuildGenerator
.GetRelativePath ("../../mcs/class", p
.library_output
));
1135 Console
.Write ("{0}: ", rebasedOutput
);
1136 foreach (var r
in p
.projReferences
){
1137 var lo
= r
.library_output
;
1138 if (lo
.StartsWith (classDirPrefix
))
1139 lo
= lo
.Substring (classDirPrefix
.Length
);
1141 lo
= "<<ERROR-dependency is not a class library>>";
1142 Console
.Write ("{0} ", lo
);
1144 Console
.Write ("\n\t(cd {0}; make {1})", p
.MsbuildGenerator
.dir
, p
.library_output
);
1145 Console
.WriteLine ("\n");
1149 // A few other optional solutions
1150 // Solutions with 'everything' and the most common libraries used in development may be of interest
1151 //WriteSolution (sln_gen, "./mcs_full.sln");
1152 //WriteSolution (small_full_sln_gen, "small_full.sln");
1153 // The following may be useful if lacking visual studio or MonoDevelop, to bootstrap mono compiler self-hosting
1154 //WriteSolution (basic_sln_gen, "mcs_basic.sln");
1155 //WriteSolution (build_sln_gen, "mcs_build.sln");
1158 // Rebases a path, assuming that execution is taking place in the "class" subdirectory,
1159 // so it strips ../class/ from a path, which is a no-op
1160 static string RebaseToClassDirectory (string path
)
1162 const string prefix
= "../class/";
1163 int p
= path
.IndexOf (prefix
);
1166 return path
.Substring (0, p
) + path
.Substring (p
+prefix
.Length
);
1170 static string MakeSolutionName (string profileTag
)
1172 return "net" + profileTag
+ ".sln";
1175 static void FillSolution (SlnGenerator solution
, string profileString
, IEnumerable
<MsbuildGenerator
> projects
, Func
<MsbuildGenerator
.VsCsproj
, bool> additionalFilter
= null)
1177 foreach (var generator
in projects
) {
1178 var vsCsproj
= generator
.Csproj
;
1179 if (!vsCsproj
.library
.Contains (profileString
))
1181 if (additionalFilter
!= null && !additionalFilter (vsCsproj
))
1183 var csprojFilename
= vsCsproj
.csProjFilename
;
1184 if (!solution
.ContainsProjectIdentifier (vsCsproj
.library
)) {
1185 solution
.Add (vsCsproj
);
1186 RecursiveAddProj (solution
, vsCsproj
);
1191 static void RecursiveAddProj (SlnGenerator solution
, MsbuildGenerator
.VsCsproj vsCsproj
, int recursiveDepth
= 1)
1193 const int max_recursive
= 16;
1194 if (recursiveDepth
> max_recursive
) throw new Exception (string.Format ("Reached {0} levels of project dependency", max_recursive
));
1195 foreach (var projRef
in vsCsproj
.projReferences
) {
1196 if (!solution
.ContainsProjectIdentifier (projRef
.library
)) {
1197 solution
.Add (projRef
);
1198 RecursiveAddProj (solution
, projRef
, recursiveDepth
+ 1);
1203 static void WriteSolution (SlnGenerator sln_gen
, string slnfilename
)
1205 Console
.WriteLine (String
.Format ("Writing solution {1}, with {0} projects", sln_gen
.Count
, slnfilename
));
1206 sln_gen
.Write (slnfilename
);
1209 static bool IsCommonLibrary (MsbuildGenerator
.VsCsproj proj
)
1211 var library
= proj
.library
;
1212 //if (library.Contains ("-basic"))
1214 //if (library.Contains ("-build"))
1216 //if (library.StartsWith ("corlib"))
1218 if (library
.StartsWith ("System-"))
1220 if (library
.StartsWith ("System.Xml"))
1222 if (library
.StartsWith ("System.Secu"))
1224 if (library
.StartsWith ("System.Configuration"))
1226 if (library
.StartsWith ("System.Core"))
1228 //if (library.StartsWith ("Mono."))