b5d8672c580b062d17cea6dfafab545605ea6a5d
[mono.git] / mcs / class / Microsoft.Build.Tasks / Microsoft.Build.Tasks / AssemblyResolver.cs
1 //
2 // AssemblyResolver.cs
3 //
4 // Author:
5 //   Marek Sieradzki (marek.sieradzki@gmail.com)
6 //   Ankit Jain (jankit@novell.com)
7 // 
8 // (C) 2006 Marek Sieradzki
9 // Copyright 2009 Novell, Inc (http://www.novell.com)
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 //
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 //
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29
30 #if NET_2_0
31
32 using System;
33 using System.Collections.Generic;
34 using System.IO;
35 using System.Linq;
36 using System.Reflection;
37 using System.Security;
38 using Microsoft.Build.Framework;
39 using Microsoft.Build.Utilities;
40 using Mono.PkgConfig;
41
42 namespace Microsoft.Build.Tasks {
43         internal class AssemblyResolver {
44
45                 // name -> (version -> assemblypath)
46                 Dictionary<string, TargetFrameworkAssemblies> target_framework_cache;
47                 Dictionary<string, Dictionary<Version, string>> gac;
48                 TaskLoggingHelper log;
49                 StringWriter sw;
50                 List<string> search_log;
51
52                 static LibraryPcFileCache cache;
53
54                 public AssemblyResolver ()
55                 {
56                         gac = new Dictionary<string, Dictionary<Version, string>> ();
57                         target_framework_cache = new Dictionary <string, TargetFrameworkAssemblies> ();
58
59                         GatherGacAssemblies ();
60                 }
61
62                 public void ResetSearchLogger ()
63                 {
64                         if (search_log == null)
65                                 search_log = new List<string> ();
66                         else
67                                 search_log.Clear ();
68                 }
69
70                 string GetGacPath ()
71                 {
72                         // NOTE: code from mcs/tools/gacutil/driver.cs
73                         PropertyInfo gac = typeof (System.Environment).GetProperty ("GacPath", BindingFlags.Static | BindingFlags.NonPublic);
74
75                         if (gac == null)
76                                 return null;
77
78                         MethodInfo get_gac = gac.GetGetMethod (true);
79                         return (string) get_gac.Invoke (null, null);
80                 }
81
82                 void GatherGacAssemblies ()
83                 {
84                         string gac_path = GetGacPath ();
85                         if (gac_path == null)
86                                 throw new InvalidOperationException ("XBuild must be run on Mono runtime");
87                         if (!Directory.Exists (gac_path))
88                                 return; // in case mono isn't "installed".
89
90                         Version version;
91                         DirectoryInfo version_info, assembly_info;
92
93                         foreach (string assembly_name in Directory.GetDirectories (gac_path)) {
94                                 assembly_info = new DirectoryInfo (assembly_name);
95                                 foreach (string version_token in Directory.GetDirectories (assembly_name)) {
96                                         foreach (string file in Directory.GetFiles (version_token, "*.dll")) {
97                                                 version_info = new DirectoryInfo (version_token);
98                                                 version = new Version (version_info.Name.Split (
99                                                         new char [] {'_'}, StringSplitOptions.RemoveEmptyEntries) [0]);
100
101                                                 Dictionary<Version, string> assembliesByVersion = new Dictionary <Version, string> ();
102                                                 if (!gac.TryGetValue (assembly_info.Name, out assembliesByVersion)) {
103                                                         assembliesByVersion = new Dictionary <Version, string> ();
104                                                         gac.Add (assembly_info.Name, assembliesByVersion);
105                                                 }
106
107                                                 string found_file;
108                                                 if (assembliesByVersion.TryGetValue (version, out found_file) &&
109                                                         File.GetLastWriteTime (file) <= File.GetLastWriteTime (found_file))
110                                                                 // Duplicate found, take the newer file
111                                                                 continue;
112
113                                                 assembliesByVersion [version] = file;
114                                         }
115                                 }
116                         }
117                 }
118
119                 public ResolvedReference FindInTargetFramework (ITaskItem reference, string framework_dir, bool specific_version)
120                 {
121                         if (!Directory.Exists (framework_dir))
122                                 return null;
123                         
124                         AssemblyName key_aname;
125                         if (!TryGetAssemblyNameFromFullName (reference.ItemSpec, out key_aname))
126                                 return null;
127
128                         TargetFrameworkAssemblies gac_asm;
129                         if (!target_framework_cache.TryGetValue (framework_dir, out gac_asm)) {
130                                 // fill gac_asm
131                                 gac_asm = target_framework_cache [framework_dir] = PopulateTargetFrameworkAssemblies (framework_dir);
132                         }
133
134                         KeyValuePair<AssemblyName, string> pair;
135                         if (gac_asm.NameToAssemblyNameCache.TryGetValue (key_aname.Name, out pair)) {
136                                 if (AssemblyNamesCompatible (key_aname, pair.Key, specific_version)) {
137                                         // gac and tgt frmwk refs are not copied private
138                                         return GetResolvedReference (reference, pair.Value, pair.Key, false,
139                                                         SearchPath.TargetFrameworkDirectory);
140                                 }
141
142                                 LogSearchMessage ("Considered target framework dir {0}, assembly name '{1}' did not " +
143                                                 "match the expected '{2}' (SpecificVersion={3})",
144                                                 framework_dir, pair.Key, key_aname, specific_version);
145                         } else {
146                                 LogSearchMessage ("Considered target framework dir {0}, assembly named '{1}' not found.",
147                                                 framework_dir, key_aname.Name);
148                         }
149                         return null;
150                 }
151
152                 // Look for %(Identity).{dll|exe|..}
153                 // if specific_version==true
154                 //      resolve if assembly names match
155                 // else
156                 //      resolve the valid assembly
157                 public ResolvedReference FindInDirectory (ITaskItem reference, string directory, string [] file_extensions, bool specific_version)
158                 {
159                         string filename = reference.ItemSpec;
160                         int comma_pos = filename.IndexOf (',');
161                         if (comma_pos >= 0)
162                                 filename = filename.Substring (0, comma_pos);
163
164                         // Try as a filename
165                         string path = Path.GetFullPath (Path.Combine (directory, filename));
166                         AssemblyName aname = null;
167                         if (specific_version && !TryGetAssemblyNameFromFullName (reference.ItemSpec, out aname))
168                                 return null;
169
170                         ResolvedReference resolved_ref = ResolveReferenceForPath (path, reference, aname, null, SearchPath.Directory, specific_version);
171                         if (resolved_ref != null)
172                                 return resolved_ref;
173
174                         // try path + Include + {.dll|.exe|..}
175                         foreach (string extn in file_extensions) {
176                                 resolved_ref = ResolveReferenceForPath (path + extn, reference, aname, null, SearchPath.Directory, specific_version);
177                                 if (resolved_ref != null)
178                                         return resolved_ref;
179                         }
180
181                         return null;
182                 }
183
184                 // tries to resolve reference from the given file path, and compares assembly names
185                 // if @specific_version == true, and logs accordingly
186                 ResolvedReference ResolveReferenceForPath (string filename, ITaskItem reference, AssemblyName aname,
187                                         string error_message, SearchPath spath, bool specific_version)
188                 {
189                         AssemblyName found_aname;
190                         if (!TryGetAssemblyNameFromFile (filename, out found_aname)) {
191                                 if (error_message != null)
192                                         log.LogMessage (MessageImportance.Low, error_message);
193                                 return null;
194                         }
195
196                         if (!specific_version || AssemblyNamesCompatible (aname, found_aname, specific_version)) {
197                                 // Check compatibility only if specific_version == true
198                                 return GetResolvedReference (reference, filename, found_aname, true, spath);
199                         } else {
200                                 LogSearchMessage ("Considered '{0}', but assembly name '{1}' did not match the " +
201                                                 "expected '{2}' (SpecificVersion={3})", filename, found_aname, aname, specific_version);
202                                 log.LogMessage (MessageImportance.Low, "Assembly names are not compatible.");
203                         }
204
205                         return null;
206                 }
207
208                 TargetFrameworkAssemblies PopulateTargetFrameworkAssemblies (string directory)
209                 {
210                         TargetFrameworkAssemblies gac_asm = new TargetFrameworkAssemblies (directory);
211                         foreach (string file in Directory.GetFiles (directory, "*.dll")) {
212                                 AssemblyName aname;
213                                 if (TryGetAssemblyNameFromFile (file, out aname))
214                                         gac_asm.NameToAssemblyNameCache [aname.Name] =
215                                                 new KeyValuePair<AssemblyName, string> (aname, file);
216                         }
217
218                         return gac_asm;
219                 }
220
221                 public ResolvedReference ResolveGacReference (ITaskItem reference, bool specific_version)
222                 {
223                         AssemblyName name;
224                         if (!TryGetAssemblyNameFromFullName (reference.ItemSpec, out name))
225                                 return null;
226
227                         if (!gac.ContainsKey (name.Name)) {
228                                 LogSearchMessage ("Considered {0}, but could not find in the GAC.",
229                                                 reference.ItemSpec);
230                                 return null;
231                         }
232
233                         if (name.Version != null) {
234                                 string ret;
235                                 if (gac [name.Name].TryGetValue (name.Version, out ret))
236                                         return GetResolvedReference (reference, ret, name, false, SearchPath.Gac);
237
238                                 // not found
239                                 if (specific_version) {
240                                         LogSearchMessage ("Considered '{0}', but an assembly with the specific version not found.",
241                                                         reference.ItemSpec);
242                                         return null;
243                                 }
244                         }
245
246                         Version [] versions = new Version [gac [name.Name].Keys.Count];
247                         gac [name.Name].Keys.CopyTo (versions, 0);
248                         Array.Sort (versions, (IComparer <Version>) null);
249                         Version highest = versions [versions.Length - 1];
250                         //FIXME: the aname being used here isn't correct, its version should
251                         //       actually match "highest"
252                         return GetResolvedReference (reference, gac [name.Name] [highest], name, false, SearchPath.Gac);
253                 }
254
255                 public ResolvedReference ResolvePkgConfigReference (ITaskItem reference, bool specific_version)
256                 {
257                         PackageAssemblyInfo pkg = null;
258
259                         if (specific_version) {
260                                 pkg = PcCache.GetAssemblyLocation (reference.ItemSpec);
261                         } else {
262                                 // if not specific version, then just match simple name
263                                 string name = reference.ItemSpec;
264                                 if (name.IndexOf (',') > 0)
265                                         name = name.Substring (0, name.IndexOf (','));
266                                 pkg = PcCache.ResolveAssemblyName (name).FirstOrDefault ();
267                         }
268
269                         if (pkg == null) {
270                                 LogSearchMessage ("Considered {0}, but could not find in any pkg-config files.",
271                                                 reference.ItemSpec);
272                                 return null;
273                         }
274
275                         AssemblyName aname;
276                         if (!TryGetAssemblyNameFromFullName (pkg.FullName, out aname))
277                                 return null;
278
279                         ResolvedReference rr = GetResolvedReference (reference, pkg.File, aname,
280                                                 false, SearchPath.PkgConfig);
281                         rr.FoundInSearchPathAsString = String.Format ("{{PkgConfig}} provided by package named {0}",
282                                                         pkg.ParentPackage.Name);
283
284                         return rr;
285                 }
286
287                 // HintPath has a valid assembly
288                 // if specific_version==true
289                 //      resolve if assembly names match
290                 // else
291                 //      resolve the valid assembly
292                 public ResolvedReference ResolveHintPathReference (ITaskItem reference, bool specific_version)
293                 {
294                         string hintpath = reference.GetMetadata ("HintPath");
295                         if (String.IsNullOrEmpty (hintpath)) {
296                                 LogSearchMessage ("HintPath attribute not found");
297                                 return null;
298                         }
299
300                         if (!File.Exists (hintpath)) {
301                                 log.LogMessage (MessageImportance.Low, "HintPath {0} does not exist.", hintpath);
302                                 LogSearchMessage ("Considered {0}, but it does not exist.", hintpath);
303                                 return null;
304                         }
305
306                         AssemblyName aname;
307                         if (!TryGetAssemblyNameFromFullName (reference.ItemSpec, out aname))
308                                 return null;
309
310                         return ResolveReferenceForPath (hintpath, reference, aname,
311                                                 String.Format ("File at HintPath {0}, is either an invalid assembly or the file does not exist.", hintpath),
312                                                 SearchPath.HintPath, specific_version);
313                 }
314
315                 public bool TryGetAssemblyNameFromFile (string filename, out AssemblyName aname)
316                 {
317                         aname = null;
318                         filename = Path.GetFullPath (filename);
319                         try {
320                                 aname = AssemblyName.GetAssemblyName (filename);
321                         } catch (FileNotFoundException) {
322                                 LogSearchMessage ("Considered '{0}' as a file, but the file does not exist",
323                                                 filename);
324                         } catch (BadImageFormatException) {
325                                 LogSearchMessage ("Considered '{0}' as a file, but it is an invalid assembly",
326                                                 filename);
327                         }
328
329                         return aname != null;
330                 }
331
332                 bool TryGetAssemblyNameFromFullName (string full_name, out AssemblyName aname)
333                 {
334                         aname = null;
335                         try {
336                                 aname = new AssemblyName (full_name);
337                         } catch (FileLoadException) {
338                                 LogSearchMessage ("Considered '{0}' as an assembly name, but it is invalid.", full_name);
339                         }
340
341                         return aname != null;
342                 }
343
344                 internal static bool AssemblyNamesCompatible (AssemblyName a, AssemblyName b, bool specificVersion)
345                 {
346                         return AssemblyNamesCompatible (a, b, specificVersion, true);
347                 }
348
349                 // if @specificVersion is true then match full name, else just the simple name
350                 internal static bool AssemblyNamesCompatible (AssemblyName a, AssemblyName b, bool specificVersion,
351                                 bool ignoreCase)
352                 {
353                         if (String.Compare (a.Name, b.Name, ignoreCase) != 0)
354                                 return false;
355
356                         if (!specificVersion)
357                                 // ..and simple names match
358                                 return true;
359
360                         if (a.CultureInfo != null && !a.CultureInfo.Equals (b.CultureInfo))
361                                 return false;
362
363                         if (a.Version != null && a.Version != b.Version)
364                                 return false;
365
366                         byte [] a_bytes = a.GetPublicKeyToken ();
367                         byte [] b_bytes = b.GetPublicKeyToken ();
368
369                         bool a_is_empty = (a_bytes == null || a_bytes.Length == 0);
370                         bool b_is_empty = (b_bytes == null || b_bytes.Length == 0);
371
372                         if (a_is_empty && b_is_empty)
373                                 return true;
374
375                         if (a_is_empty || b_is_empty)
376                                 return false;
377
378                         for (int i = 0; i < a_bytes.Length; i++)
379                                 if (a_bytes [i] != b_bytes [i])
380                                         return false;
381
382                         return true;
383                 }
384
385                 public bool IsStrongNamed (AssemblyName name)
386                 {
387                         return (name.Version != null &&
388                                         name.GetPublicKeyToken () != null &&
389                                         name.GetPublicKeyToken ().Length != 0);
390                 }
391
392                 // FIXME: to get default values of CopyLocal, compare with TargetFrameworkDirectories
393
394                 // If metadata 'Private' is present then use that or use @default_copy_local_value
395                 // as the value for CopyLocal
396                 internal ResolvedReference GetResolvedReference (ITaskItem reference, string filename,
397                                 AssemblyName aname, bool default_copy_local_value, SearchPath search_path)
398                 {
399                         string pvt = reference.GetMetadata ("Private");
400
401                         bool copy_local = default_copy_local_value;
402                         if (!String.IsNullOrEmpty (pvt))
403                                 //FIXME: log a warning for invalid value
404                                 Boolean.TryParse (pvt, out copy_local);
405
406                         ITaskItem new_item = new TaskItem (reference);
407                         new_item.ItemSpec = filename;
408                         return new ResolvedReference (new_item, aname, copy_local, search_path, reference.ItemSpec);
409                 }
410
411                 public void LogSearchMessage (string msg, params object [] args)
412                 {
413                         search_log.Add (String.Format (msg, args));
414                 }
415
416                 public void LogSearchLoggerMessages (MessageImportance importance)
417                 {
418                         foreach (string msg in search_log)
419                                 log.LogMessage (importance, msg);
420                 }
421
422                 public TaskLoggingHelper Log {
423                         set {
424                                 log = value;
425                                 PcFileCacheContext.Log = value;
426                         }
427                 }
428
429                 static LibraryPcFileCache PcCache  {
430                         get {
431                                 if (cache == null) {
432                                         var context = new PcFileCacheContext ();
433                                         cache = new LibraryPcFileCache (context);
434                                         cache.Update ();
435                                 }
436
437                                 return cache;
438                         }
439                 }
440         }
441
442         class TargetFrameworkAssemblies {
443                 public string Path;
444
445                 // assembly (simple) name -> (AssemblyName, file path)
446                 public Dictionary <string, KeyValuePair<AssemblyName, string>> NameToAssemblyNameCache;
447
448                 public TargetFrameworkAssemblies (string path)
449                 {
450                         this.Path = path;
451                         NameToAssemblyNameCache = new Dictionary<string, KeyValuePair<AssemblyName, string>> (
452                                         StringComparer.InvariantCultureIgnoreCase);
453                 }
454         }
455
456         class PcFileCacheContext : IPcFileCacheContext<LibraryPackageInfo>
457         {
458                 public static TaskLoggingHelper Log;
459
460                 // In the implementation of this method, the host application can extract
461                 // information from the pc file and store it in the PackageInfo object
462                 public void StoreCustomData (PcFile pcfile, LibraryPackageInfo pkg)
463                 {
464                 }
465
466                 // Should return false if the provided package does not have required
467                 // custom data
468                 public bool IsCustomDataComplete (string pcfile, LibraryPackageInfo pkg)
469                 {
470                         return true;
471                 }
472
473                 // Called to report errors
474                 public void ReportError (string message, Exception ex)
475                 {
476                         Log.LogMessage (MessageImportance.Low, "Error loading pkg-config files: {0} : {1}",
477                                         message, ex.ToString ());
478                 }
479         }
480
481         enum SearchPath
482         {
483                 Gac,
484                 TargetFrameworkDirectory,
485                 CandidateAssemblies,
486                 HintPath,
487                 Directory,
488                 RawFileName,
489                 PkgConfig
490         }
491 }
492
493
494
495 #endif