5 // Jb Evain (jbevain@novell.com)
7 // (C) 2007 Novell, Inc.
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:
17 // The above copyright notice and this permission notice shall be
18 // included in all copies or substantial portions of the Software.
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.
30 using System
.Collections
;
33 using Mono
.Linker
.Steps
;
37 namespace Mono
.Tuner
{
39 public class PrintStatus
: BaseStep
{
41 static string display_internalized
= "display_internalized";
43 protected override void ProcessAssembly (AssemblyDefinition assembly
)
45 if (Annotations
.GetAction (assembly
) != AssemblyAction
.Link
)
48 Console
.WriteLine ("Assembly `{0}' ({1}) tuned", assembly
.Name
, assembly
.MainModule
.Image
.FileInformation
);
50 if (!DisplayInternalized ())
53 foreach (TypeDefinition type
in assembly
.MainModule
.Types
)
57 bool DisplayInternalized ()
60 return bool.Parse (Context
.GetParameter (display_internalized
));
66 static void ProcessType (TypeDefinition type
)
68 ProcessCollection (type
.Fields
);
69 ProcessCollection (type
.Constructors
);
70 ProcessCollection (type
.Methods
);
73 static void ProcessCollection (ICollection collection
)
75 foreach (IAnnotationProvider provider
in collection
)
76 ProcessProvider (provider
);
79 static void ProcessProvider (IAnnotationProvider provider
)
81 if (!TunerAnnotations
.IsInternalized (provider
))
84 Console
.WriteLine ("[internalized] {0}", provider
);