importing messaging-2008 branch to trunk [continued]
[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                 string _assembly;
37
38                 public ResolveFromAssemblyStep (string assembly)
39                 {
40                         _assembly = assembly;
41                 }
42
43                 public override void Process (LinkContext context)
44                 {
45                         AssemblyDefinition assembly = context.Resolve (_assembly);
46
47                         switch (assembly.Kind) {
48                         case AssemblyKind.Dll:
49                                 ProcessLibrary (assembly);
50                                 return;
51                         default:
52                                 ProcessExecutable (assembly);
53                                 return;
54                         }
55                 }
56
57                 static void ProcessLibrary (AssemblyDefinition assembly)
58                 {
59                         Annotations.SetAction (assembly, AssemblyAction.Copy);
60
61                         foreach (TypeDefinition type in assembly.MainModule.Types) {
62                                 Annotations.Mark (type);
63
64                                 if (type.HasMethods)
65                                         MarkMethods (type.Methods);
66                                 if (type.HasConstructors)
67                                         MarkMethods (type.Constructors);
68                         }
69                 }
70
71                 static void ProcessExecutable (AssemblyDefinition assembly)
72                 {
73                         Annotations.SetAction (assembly, AssemblyAction.Link);
74
75                         Annotations.Mark (assembly.EntryPoint.DeclaringType);
76                         MarkMethod (assembly.EntryPoint, MethodAction.Parse);
77                 }
78
79                 static void MarkMethods (ICollection methods)
80                 {
81                         foreach (MethodDefinition method in methods)
82                                 MarkMethod (method, MethodAction.ForceParse);
83                 }
84
85                 static void MarkMethod (MethodDefinition method, MethodAction action)
86                 {
87                         Annotations.Mark (method);
88                         Annotations.SetAction (method, action);
89                 }
90         }
91 }