copied mono-api-diff.cs from mono-2-2 branch so new patch can be applied and history...
[mono.git] / mcs / tools / linker / Mono.Linker.Steps / ResolveFromAssemblyStep.cs
1 //
2 // ResolveFromAssemblyStep.cs
3 //
4 // Author:
5 //   Jb Evain (jbevain@gmail.com)
6 //
7 // (C) 2006 Jb Evain
8 //
9 // Permission is hereby granted, free of charge, to any person obtaining
10 // a copy of this software and associated documentation files (the
11 // "Software"), to deal in the Software without restriction, including
12 // without limitation the rights to use, copy, modify, merge, publish,
13 // distribute, sublicense, and/or sell copies of the Software, and to
14 // permit persons to whom the Software is furnished to do so, subject to
15 // the following conditions:
16 //
17 // The above copyright notice and this permission notice shall be
18 // included in all copies or substantial portions of the Software.
19 //
20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 //
28
29 using System.Collections;
30 using Mono.Cecil;
31
32 namespace Mono.Linker.Steps {
33
34         public class ResolveFromAssemblyStep : ResolveStep {
35
36                 AssemblyDefinition _assembly;
37                 string _file;
38
39                 public ResolveFromAssemblyStep (string assembly)
40                 {
41                         _file = assembly;
42                 }
43
44                 public ResolveFromAssemblyStep (AssemblyDefinition assembly)
45                 {
46                         _assembly = assembly;
47                 }
48
49                 public override void Process (LinkContext context)
50                 {
51                         if (_assembly != null) {
52                                 context.SafeLoadSymbols (_assembly);
53                                 context.Resolver.CacheAssembly (_assembly);
54                         }
55
56                         AssemblyDefinition assembly = _assembly ?? context.Resolve (_file);
57
58                         switch (assembly.Kind) {
59                         case AssemblyKind.Dll:
60                                 ProcessLibrary (assembly);
61                                 return;
62                         default:
63                                 ProcessExecutable (assembly);
64                                 return;
65                         }
66                 }
67
68                 public static void ProcessLibrary (AssemblyDefinition assembly)
69                 {
70                         Annotations.SetAction (assembly, AssemblyAction.Copy);
71
72                         foreach (TypeDefinition type in assembly.MainModule.Types) {
73                                 Annotations.Mark (type);
74
75                                 if (type.HasFields)
76                                         MarkFields (type.Fields);
77                                 if (type.HasMethods)
78                                         MarkMethods (type.Methods);
79                                 if (type.HasConstructors)
80                                         MarkMethods (type.Constructors);
81                         }
82                 }
83
84                 static void ProcessExecutable (AssemblyDefinition assembly)
85                 {
86                         Annotations.SetAction (assembly, AssemblyAction.Link);
87
88                         Annotations.Mark (assembly.EntryPoint.DeclaringType);
89                         MarkMethod (assembly.EntryPoint, MethodAction.Parse);
90                 }
91
92                 static void MarkFields (ICollection fields)
93                 {
94                         foreach (FieldDefinition field in fields)
95                                 Annotations.Mark (field);
96                 }
97
98                 static void MarkMethods (ICollection methods)
99                 {
100                         foreach (MethodDefinition method in methods)
101                                 MarkMethod (method, MethodAction.ForceParse);
102                 }
103
104                 static void MarkMethod (MethodDefinition method, MethodAction action)
105                 {
106                         Annotations.Mark (method);
107                         Annotations.SetAction (method, action);
108                 }
109         }
110 }