← Back to branch summary

~ubuntu-branches/ubuntu/trusty/monodevelop/trusty-proposed

« back to all changes in this revision

Viewing changes to external/nrefactory/ICSharpCode.NRefactory.CSharp/TypeSystem/CSharpAssembly.cs

  • Committer: Package Import Robot
  • Author(s): Jo Shields
  • Date: 2013-05-12 09:46:03 UTC
  • mto: This revision was merged to the branch mainline in revision 29.
  • Revision ID: package-import@ubuntu.com-20130512094603-mad323bzcxvmcam0
Tags: upstream-4.0.5+dfsg
ImportĀ upstreamĀ versionĀ 4.0.5+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
external/nrefactory/ICSharpCode.NRefactory.CSharp/TypeSystem/CSharpAssembly.cs
 
1
ļ»æ// Copyright (c) 2010-2013 AlphaSierraPapa for the SharpDevelop Team
 
2
// 
 
3
// Permission is hereby granted, free of charge, to any person obtaining a copy of this
 
4
// software and associated documentation files (the "Software"), to deal in the Software
 
5
// without restriction, including without limitation the rights to use, copy, modify, merge,
 
6
// publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons
 
7
// to whom the Software is furnished to do so, subject to the following conditions:
 
8
// 
 
9
// The above copyright notice and this permission notice shall be included in all copies or
 
10
// substantial portions of the Software.
 
11
// 
 
12
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,
 
13
// INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
 
14
// PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE
 
15
// FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
 
16
// OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
 
17
// DEALINGS IN THE SOFTWARE.
 
18
 
 
19
using System;
 
20
using System.Collections.Generic;
 
21
using System.Diagnostics;
 
22
using System.Linq;
 
23
using System.Threading;
 
24
using ICSharpCode.NRefactory.TypeSystem;
 
25
using ICSharpCode.NRefactory.TypeSystem.Implementation;
 
26
using ICSharpCode.NRefactory.Utils;
 
27
 
 
28
namespace ICSharpCode.NRefactory.CSharp.TypeSystem
 
29
{
 
30
        public class CSharpAssembly : IAssembly
 
31
        {
 
32
                readonly ICompilation compilation;
 
33
                readonly ITypeResolveContext context;
 
34
                readonly CSharpProjectContent projectContent;
 
35
                IList<IAttribute> assemblyAttributes;
 
36
                IList<IAttribute> moduleAttributes;
 
37
                
 
38
                internal CSharpAssembly(ICompilation compilation, CSharpProjectContent projectContent)
 
39
                {
 
40
                        this.compilation = compilation;
 
41
                        this.projectContent = projectContent;
 
42
                        this.context = new SimpleTypeResolveContext(this);
 
43
                }
 
44
                
 
45
                public bool IsMainAssembly {
 
46
                        get { return compilation.MainAssembly == this; }
 
47
                }
 
48
                
 
49
                public IUnresolvedAssembly UnresolvedAssembly {
 
50
                        get { return projectContent; }
 
51
                }
 
52
                
 
53
                public string AssemblyName {
 
54
                        get { return projectContent.AssemblyName; }
 
55
                }
 
56
                
 
57
                public string FullAssemblyName {
 
58
                        get { return projectContent.FullAssemblyName; }
 
59
                }
 
60
                
 
61
                public IList<IAttribute> AssemblyAttributes {
 
62
                        get {
 
63
                                return GetAttributes(ref assemblyAttributes, true);
 
64
                        }
 
65
                }
 
66
                
 
67
                public IList<IAttribute> ModuleAttributes {
 
68
                        get {
 
69
                                return GetAttributes(ref moduleAttributes, false);
 
70
                        }
 
71
                }
 
72
                
 
73
                IList<IAttribute> GetAttributes(ref IList<IAttribute> field, bool assemblyAttributes)
 
74
                {
 
75
                        IList<IAttribute> result = LazyInit.VolatileRead(ref field);
 
76
                        if (result != null) {
 
77
                                return result;
 
78
                        } else {
 
79
                                result = new List<IAttribute>();
 
80
                                foreach (var unresolvedFile in projectContent.Files.OfType<CSharpUnresolvedFile>()) {
 
81
                                        var attributes = assemblyAttributes ? unresolvedFile.AssemblyAttributes : unresolvedFile.ModuleAttributes;
 
82
                                        var context = new CSharpTypeResolveContext(this, unresolvedFile.RootUsingScope.Resolve(compilation));
 
83
                                        foreach (var unresolvedAttr in attributes) {
 
84
                                                result.Add(unresolvedAttr.CreateResolvedAttribute(context));
 
85
                                        }
 
86
                                }
 
87
                                return LazyInit.GetOrSet(ref field, result);
 
88
                        }
 
89
                }
 
90
                
 
91
                NS rootNamespace;
 
92
                
 
93
                public INamespace RootNamespace {
 
94
                        get {
 
95
                                NS root = LazyInit.VolatileRead(ref this.rootNamespace);
 
96
                                if (root != null) {
 
97
                                        return root;
 
98
                                } else {
 
99
                                        root = new NS(this);
 
100
                                        Dictionary<string, NS> dict = new Dictionary<string, NS>(compilation.NameComparer);
 
101
                                        dict.Add(string.Empty, root);
 
102
                                        // Add namespaces declared in C# files, even if they're empty:
 
103
                                        foreach (var usingScope in projectContent.Files.OfType<CSharpUnresolvedFile>().SelectMany(f => f.UsingScopes)) {
 
104
                                                GetOrAddNamespace(dict, usingScope.NamespaceName);
 
105
                                        }
 
106
                                        foreach (var pair in GetTypes()) {
 
107
                                                NS ns = GetOrAddNamespace(dict, pair.Key.Namespace);
 
108
                                                if (ns.types != null)
 
109
                                                        ns.types[pair.Key] = pair.Value;
 
110
                                        }
 
111
                                        return LazyInit.GetOrSet(ref this.rootNamespace, root);
 
112
                                }
 
113
                        }
 
114
                }
 
115
                
 
116
                static NS GetOrAddNamespace(Dictionary<string, NS> dict, string fullName)
 
117
                {
 
118
                        NS ns;
 
119
                        if (dict.TryGetValue(fullName, out ns))
 
120
                                return ns;
 
121
                        int pos = fullName.LastIndexOf('.');
 
122
                        NS parent;
 
123
                        string name;
 
124
                        if (pos < 0) {
 
125
                                parent = dict[string.Empty]; // root
 
126
                                name = fullName;
 
127
                        } else {
 
128
                                parent = GetOrAddNamespace(dict, fullName.Substring(0, pos));
 
129
                                name = fullName.Substring(pos + 1);
 
130
                        }
 
131
                        ns = new NS(parent, fullName, name);
 
132
                        parent.childNamespaces.Add(ns);
 
133
                        dict.Add(fullName, ns);
 
134
                        return ns;
 
135
                }
 
136
                
 
137
                public ICompilation Compilation {
 
138
                        get { return compilation; }
 
139
                }
 
140
                
 
141
                public bool InternalsVisibleTo(IAssembly assembly)
 
142
                {
 
143
                        if (this == assembly)
 
144
                                return true;
 
145
                        foreach (string shortName in GetInternalsVisibleTo()) {
 
146
                                if (assembly.AssemblyName == shortName)
 
147
                                        return true;
 
148
                        }
 
149
                        return false;
 
150
                }
 
151
                
 
152
                volatile string[] internalsVisibleTo;
 
153
                
 
154
                string[] GetInternalsVisibleTo()
 
155
                {
 
156
                        var result = this.internalsVisibleTo;
 
157
                        if (result != null) {
 
158
                                return result;
 
159
                        } else {
 
160
                                using (var busyLock = BusyManager.Enter(this)) {
 
161
                                        Debug.Assert(busyLock.Success);
 
162
                                        if (!busyLock.Success) {
 
163
                                                return new string[0];
 
164
                                        }
 
165
                                        internalsVisibleTo = (
 
166
                                                from attr in this.AssemblyAttributes
 
167
                                                where attr.AttributeType.Name == "InternalsVisibleToAttribute"
 
168
                                                && attr.AttributeType.Namespace == "System.Runtime.CompilerServices"
 
169
                                                && attr.PositionalArguments.Count == 1
 
170
                                                select GetShortName(attr.PositionalArguments.Single().ConstantValue as string)
 
171
                                        ).ToArray();
 
172
                                }
 
173
                                return internalsVisibleTo;
 
174
                        }
 
175
                }
 
176
                
 
177
                static string GetShortName(string fullAssemblyName)
 
178
                {
 
179
                        if (fullAssemblyName == null)
 
180
                                return null;
 
181
                        int pos = fullAssemblyName.IndexOf(',');
 
182
                        if (pos < 0)
 
183
                                return fullAssemblyName;
 
184
                        else
 
185
                                return fullAssemblyName.Substring(0, pos);
 
186
                }
 
187
                
 
188
                Dictionary<TopLevelTypeName, ITypeDefinition> typeDict;
 
189
                
 
190
                Dictionary<TopLevelTypeName, ITypeDefinition> GetTypes()
 
191
                {
 
192
                        var dict = LazyInit.VolatileRead(ref this.typeDict);
 
193
                        if (dict != null) {
 
194
                                return dict;
 
195
                        } else {
 
196
                                // Always use the ordinal comparer for the main dictionary so that partial classes
 
197
                                // get merged correctly.
 
198
                                // The compilation's comparer will be used for the per-namespace dictionaries.
 
199
                                var comparer = TopLevelTypeNameComparer.Ordinal;
 
200
                                dict = projectContent.TopLevelTypeDefinitions
 
201
                                        .GroupBy(t => new TopLevelTypeName(t.Namespace, t.Name, t.TypeParameters.Count), comparer)
 
202
                                        .ToDictionary(g => g.Key, g => CreateResolvedTypeDefinition(g.ToArray()), comparer);
 
203
                                return LazyInit.GetOrSet(ref this.typeDict, dict);
 
204
                        }
 
205
                }
 
206
                
 
207
                ITypeDefinition CreateResolvedTypeDefinition(IUnresolvedTypeDefinition[] parts)
 
208
                {
 
209
                        return new DefaultResolvedTypeDefinition(context, parts);
 
210
                }
 
211
                
 
212
                public ITypeDefinition GetTypeDefinition(TopLevelTypeName topLevelTypeName)
 
213
                {
 
214
                        ITypeDefinition def;
 
215
                        if (GetTypes().TryGetValue(topLevelTypeName, out def))
 
216
                                return def;
 
217
                        else
 
218
                                return null;
 
219
                }
 
220
                
 
221
                public IEnumerable<ITypeDefinition> TopLevelTypeDefinitions {
 
222
                        get {
 
223
                                return GetTypes().Values;
 
224
                        }
 
225
                }
 
226
                
 
227
                public override string ToString()
 
228
                {
 
229
                        return "[CSharpAssembly " + this.AssemblyName + "]";
 
230
                }
 
231
                
 
232
                sealed class NS : INamespace
 
233
                {
 
234
                        readonly CSharpAssembly assembly;
 
235
                        readonly NS parentNamespace;
 
236
                        readonly string fullName;
 
237
                        readonly string name;
 
238
                        internal readonly List<NS> childNamespaces = new List<NS>();
 
239
                        internal readonly Dictionary<TopLevelTypeName, ITypeDefinition> types;
 
240
                        
 
241
                        public NS(CSharpAssembly assembly)
 
242
                        {
 
243
                                this.assembly = assembly;
 
244
                                this.fullName = string.Empty;
 
245
                                this.name = string.Empty;
 
246
                                // Our main dictionary for the CSharpAssembly is using an ordinal comparer.
 
247
                                // If the compilation's comparer isn't ordinal, we need to create a new dictionary with the compilation's comparer.
 
248
                                if (assembly.compilation.NameComparer != StringComparer.Ordinal) {
 
249
                                        this.types = new Dictionary<TopLevelTypeName, ITypeDefinition>(new TopLevelTypeNameComparer(assembly.compilation.NameComparer));
 
250
                                }
 
251
                        }
 
252
                        
 
253
                        public NS(NS parentNamespace, string fullName, string name)
 
254
                        {
 
255
                                this.assembly = parentNamespace.assembly;
 
256
                                this.parentNamespace = parentNamespace;
 
257
                                this.fullName = fullName;
 
258
                                this.name = name;
 
259
                                if (parentNamespace.types != null)
 
260
                                        this.types = new Dictionary<TopLevelTypeName, ITypeDefinition>(parentNamespace.types.Comparer);
 
261
                        }
 
262
                        
 
263
                        string INamespace.ExternAlias {
 
264
                                get { return null; }
 
265
                        }
 
266
                        
 
267
                        string INamespace.FullName {
 
268
                                get { return fullName; }
 
269
                        }
 
270
                        
 
271
                        string INamespace.Name {
 
272
                                get { return name; }
 
273
                        }
 
274
                        
 
275
                        INamespace INamespace.ParentNamespace {
 
276
                                get { return parentNamespace; }
 
277
                        }
 
278
                        
 
279
                        IEnumerable<INamespace> INamespace.ChildNamespaces {
 
280
                                get { return childNamespaces; }
 
281
                        }
 
282
                        
 
283
                        IEnumerable<ITypeDefinition> INamespace.Types {
 
284
                                get {
 
285
                                        if (types != null)
 
286
                                                return types.Values;
 
287
                                        else
 
288
                                                return (
 
289
                                                        from t in assembly.GetTypes()
 
290
                                                        where t.Key.Namespace == fullName
 
291
                                                        select t.Value
 
292
                                                );
 
293
                                }
 
294
                        }
 
295
                        
 
296
                        ICompilation ICompilationProvider.Compilation {
 
297
                                get { return assembly.Compilation; }
 
298
                        }
 
299
                        
 
300
                        IEnumerable<IAssembly> INamespace.ContributingAssemblies {
 
301
                                get { return new [] { assembly }; }
 
302
                        }
 
303
                        
 
304
                        INamespace INamespace.GetChildNamespace(string name)
 
305
                        {
 
306
                                var nameComparer = assembly.compilation.NameComparer;
 
307
                                foreach (NS childNamespace in childNamespaces) {
 
308
                                        if (nameComparer.Equals(name, childNamespace.name))
 
309
                                                return childNamespace;
 
310
                                }
 
311
                                return null;
 
312
                        }
 
313
                        
 
314
                        ITypeDefinition INamespace.GetTypeDefinition(string name, int typeParameterCount)
 
315
                        {
 
316
                                var key = new TopLevelTypeName(fullName, name, typeParameterCount);
 
317
                                if (types != null) {
 
318
                                        ITypeDefinition typeDef;
 
319
                                        if (types.TryGetValue(key, out typeDef))
 
320
                                                return typeDef;
 
321
                                        else
 
322
                                                return null;
 
323
                                } else {
 
324
                                        return assembly.GetTypeDefinition(key);
 
325
                                }
 
326
                        }
 
327
                }
 
328
        }
 
329
}