2 // membercache.cs: A container for all member lookups
4 // Author: Miguel de Icaza (miguel@gnu.org)
5 // Marek Safar (marek.safar@gmail.com)
7 // Dual licensed under the terms of the MIT X11 or GNU GPL
9 // Copyright 2001 Ximian, Inc (http://www.ximian.com)
10 // Copyright 2004-2010 Novell, Inc
16 using System.Collections.Generic;
17 using System.Reflection;
20 namespace Mono.CSharp {
23 public enum MemberKind
39 TypeParameter = 1 << 16,
42 PointerType = 1 << 20,
43 InternalCompilerType = 1 << 21,
45 NestedMask = Class | Struct | Delegate | Enum | Interface,
46 GenericMask = Method | Class | Struct | Delegate | Interface,
47 MaskType = Constructor | Event | Field | Method | Property | Indexer | Operator | Destructor | NestedMask,
52 public enum BindingRestriction
56 // Inspect only queried type members
57 DeclaredOnly = 1 << 1,
60 InstanceOnly = 1 << 2,
64 // Member has to be override
68 public struct MemberFilter : IEquatable<MemberSpec>
70 public readonly string Name;
71 public readonly MemberKind Kind;
72 public readonly AParametersCollection Parameters;
73 public readonly TypeSpec MemberType;
75 int arity; // -1 to ignore the check
77 private MemberFilter (string name, MemberKind kind)
86 public MemberFilter (MethodSpec m)
89 Kind = MemberKind.Method;
90 Parameters = m.Parameters;
91 MemberType = m.ReturnType;
95 public MemberFilter (string name, int arity, MemberKind kind, AParametersCollection param, TypeSpec type)
104 public static MemberFilter Constructor (AParametersCollection param)
106 return new MemberFilter (System.Reflection.ConstructorInfo.ConstructorName, 0, MemberKind.Constructor, param, null);
109 public static MemberFilter Property (string name, TypeSpec type)
111 return new MemberFilter (name, 0, MemberKind.Property, null, type);
114 public static MemberFilter Field (string name, TypeSpec type)
116 return new MemberFilter (name, 0, MemberKind.Field, null, type);
119 public static MemberFilter Method (string name, int arity, AParametersCollection param, TypeSpec type)
121 return new MemberFilter (name, arity, MemberKind.Method, param, type);
124 #region IEquatable<MemberSpec> Members
126 public bool Equals (MemberSpec other)
128 // Is the member of the correct type ?
129 // TODO: Isn't this redundant ?
130 if ((other.Kind & Kind & MemberKind.MaskType) == 0)
133 // Check arity when not disabled
134 if (arity >= 0 && arity != other.Arity)
137 if (Parameters != null) {
138 if (other is IParametersMember) {
139 var other_param = ((IParametersMember) other).Parameters;
140 if (!TypeSpecComparer.Override.IsEqual (Parameters, other_param))
147 if (MemberType != null) {
148 if (other is IInterfaceMemberSpec) {
149 var other_type = ((IInterfaceMemberSpec) other).MemberType;
150 if (!TypeSpecComparer.Override.IsEqual (other_type, MemberType))
164 // The MemberCache is the main members container used by compiler. It contains
165 // all members imported or defined during compilation using on demand filling
166 // process. Inflated containers are also using MemberCache to make inflated
167 // members look like normal definition.
169 // All of the methods are performance and memory sensitive as the MemberCache
170 // is the underlying engine of all member based operations.
172 public class MemberCache
176 HasConversionOperator = 1 << 1,
177 HasUserOperator = 1 << 2
180 readonly Dictionary<string, IList<MemberSpec>> member_hash;
181 Dictionary<string, MemberSpec[]> locase_members;
182 IList<MethodSpec> missing_abstract;
185 public static readonly string IndexerNameAlias = "<this>";
187 public static readonly MemberCache Empty = new MemberCache (0);
189 public MemberCache ()
194 public MemberCache (int capacity)
196 member_hash = new Dictionary<string, IList<MemberSpec>> (capacity);
199 public MemberCache (MemberCache cache)
200 : this (cache.member_hash.Count)
202 this.state = cache.state;
206 // Creates a new MemberCache for the given `container'.
208 public MemberCache (TypeContainer container)
209 : this () // TODO: Optimize the size
214 // Member-cache does not contain base members but it does
215 // contain all base interface members, so the Lookup code
216 // can use simple inheritance rules.
218 public void AddInterface (TypeSpec iface)
220 var cache = iface.MemberCache;
222 IList<MemberSpec> list;
223 foreach (var entry in cache.member_hash) {
224 if (!member_hash.TryGetValue (entry.Key, out list)) {
225 if (entry.Value.Count == 1) {
228 list = new List<MemberSpec> (entry.Value);
231 member_hash.Add (entry.Key, list);
235 foreach (var ce in entry.Value) {
236 if (list.Contains (ce))
239 if (AddInterfaceMember (ce, ref list))
240 member_hash[entry.Key] = list;
244 // Add also all base interfaces
245 if (iface.Interfaces != null) {
246 foreach (var base_iface in iface.Interfaces)
247 AddInterface (base_iface);
251 public void AddMember (InterfaceMemberBase imb, string exlicitName, MemberSpec ms)
253 // Explicit names cannot be looked-up but can be used for
254 // collision checking (no name mangling needed)
255 if (imb.IsExplicitImpl)
256 AddMember (exlicitName, ms);
262 // Add non-explicit member to member cache
264 public void AddMember (MemberSpec ms)
266 AddMember (GetLookupName (ms), ms);
269 void AddMember (string name, MemberSpec member)
271 if (member.Kind == MemberKind.Operator) {
272 var dt = member.DeclaringType;
273 if (dt == TypeManager.string_type || dt == TypeManager.delegate_type || dt == TypeManager.multicast_delegate_type) {
274 // Some core types have user operators but they cannot be used as normal
275 // user operators as they are predefined and therefore having different
276 // rules (e.g. binary operators) by not setting the flag we hide them for
278 // TODO: Should I do this for all core types ?
279 } else if (name == Operator.GetMetadataName (Operator.OpType.Implicit) || name == Operator.GetMetadataName (Operator.OpType.Explicit)) {
280 state |= StateFlags.HasConversionOperator;
282 state |= StateFlags.HasUserOperator;
286 IList<MemberSpec> list;
287 if (!member_hash.TryGetValue (name, out list)) {
288 member_hash.Add (name, new MemberSpec[] { member });
292 if (member.DeclaringType.IsInterface) {
293 if (AddInterfaceMember (member, ref list))
294 member_hash[name] = list;
296 if (list is MemberSpec[]) {
297 list = new List<MemberSpec> () { list[0] };
298 member_hash[name] = list;
306 // Ignores any base interface member which can be hidden
309 static bool AddInterfaceMember (MemberSpec member, ref IList<MemberSpec> existing)
311 var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : ParametersCompiled.EmptyReadOnlyParameters;
314 // interface IA : IB { int Prop { set; } }
315 // interface IB { bool Prop { get; } }
317 // IB.Prop is never accessible from IA interface
319 for (int i = 0; i < existing.Count; ++i) {
320 var entry = existing[i];
322 if (entry.Arity != member.Arity)
325 if (entry is IParametersMember) {
326 var entry_param = ((IParametersMember) entry).Parameters;
327 if (!TypeSpecComparer.Override.IsEqual (entry_param, member_param))
331 if (member.DeclaringType.ImplementsInterface (entry.DeclaringType, false)) {
332 if (existing is MemberSpec[]) {
333 existing = new MemberSpec[] { member };
337 existing.RemoveAt (i--);
341 if ((entry.DeclaringType == member.DeclaringType && entry.IsAccessor == member.IsAccessor) ||
342 entry.DeclaringType.ImplementsInterface (member.DeclaringType, false))
346 if (existing is MemberSpec[]) {
347 existing = new List<MemberSpec> () { existing[0], member };
351 existing.Add (member);
355 public static MemberSpec FindMember (TypeSpec container, MemberFilter filter, BindingRestriction restrictions)
358 IList<MemberSpec> applicable;
359 if (container.MemberCache.member_hash.TryGetValue (filter.Name, out applicable)) {
360 // Start from the end because interface members are in reverse order
361 for (int i = applicable.Count - 1; i >= 0; i--) {
362 var entry = applicable [i];
364 if ((restrictions & BindingRestriction.InstanceOnly) != 0 && entry.IsStatic)
367 if ((restrictions & BindingRestriction.NoAccessors) != 0 && entry.IsAccessor)
370 if ((restrictions & BindingRestriction.OverrideOnly) != 0 && (entry.Modifiers & Modifiers.OVERRIDE) == 0)
373 if (!filter.Equals (entry))
376 if ((restrictions & BindingRestriction.DeclaredOnly) != 0 && container.IsInterface && entry.DeclaringType != container)
383 if ((restrictions & BindingRestriction.DeclaredOnly) != 0)
386 container = container.BaseType;
387 } while (container != null);
393 // A special method to work with member lookup only. It returns a list of all members named @name
394 // starting from @container. It's very performance sensitive
396 public static IList<MemberSpec> FindMembers (TypeSpec container, string name, bool declaredOnly)
398 IList<MemberSpec> applicable;
401 if (container.MemberCache.member_hash.TryGetValue (name, out applicable) || declaredOnly)
404 container = container.BaseType;
405 } while (container != null);
411 // Finds the nested type in container
413 public static TypeSpec FindNestedType (TypeSpec container, string name, int arity)
415 IList<MemberSpec> applicable;
416 TypeSpec best_match = null;
418 // TODO: Don't know how to handle this yet
419 // When resolving base type of nested type, parent type must have
420 // base type resolved to scan full hierarchy correctly
421 // Similarly MemberCacheTypes will inflate BaseType and Interfaces
422 // based on type definition
423 var tc = container.MemberDefinition as TypeContainer;
427 if (container.MemberCacheTypes.member_hash.TryGetValue (name, out applicable)) {
428 for (int i = applicable.Count - 1; i >= 0; i--) {
429 var entry = applicable[i];
430 if ((entry.Kind & MemberKind.NestedMask) == 0)
433 var ts = (TypeSpec) entry;
434 if (arity == ts.Arity)
438 if (best_match == null) {
440 } else if (System.Math.Abs (ts.Arity + arity) < System.Math.Abs (ts.Arity + arity)) {
447 container = container.BaseType;
448 } while (container != null);
454 // Looks for extension methods with defined name and extension type
456 public List<MethodSpec> FindExtensionMethods (TypeSpec invocationType, TypeSpec extensionType, string name, int arity)
458 IList<MemberSpec> entries;
459 if (!member_hash.TryGetValue (name, out entries))
462 List<MethodSpec> candidates = null;
463 foreach (var entry in entries) {
464 if (entry.Kind != MemberKind.Method || (arity > 0 && entry.Arity != arity))
467 var ms = (MethodSpec) entry;
468 if (!ms.IsExtensionMethod)
471 if (!ms.IsAccessible (invocationType))
474 // TODO: CodeGen.Assembly.Builder
475 if ((ms.DeclaringType.Modifiers & Modifiers.INTERNAL) != 0 &&
476 !TypeManager.IsThisOrFriendAssembly (CodeGen.Assembly.Builder, ms.Assembly))
479 if (candidates == null)
480 candidates = new List<MethodSpec> ();
488 // Returns base members of @member member if no exact match is found @bestCandidate returns
491 public static MemberSpec FindBaseMember (MemberCore member, out MemberSpec bestCandidate)
493 bestCandidate = null;
494 var container = member.Parent.PartialContainer.Definition;
495 if (!container.IsInterface) {
496 container = container.BaseType;
498 // It can happen for a user definition of System.Object
499 if (container == null)
503 string name = GetLookupName (member);
504 IList<MemberSpec> applicable;
505 var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : null;
507 var mkind = GetMemberCoreKind (member);
508 bool member_with_accessors = mkind == MemberKind.Indexer || mkind == MemberKind.Property;
511 if (container.MemberCache.member_hash.TryGetValue (name, out applicable)) {
512 for (int i = 0; i < applicable.Count; ++i) {
513 var entry = applicable [i];
515 if ((entry.Modifiers & Modifiers.PRIVATE) != 0)
518 if ((entry.Modifiers & Modifiers.AccessibilityMask) == Modifiers.INTERNAL) {
519 if (!TypeManager.IsThisOrFriendAssembly (member.Assembly, entry.Assembly))
524 // Is the member of same type ?
526 if ((entry.Kind & ~MemberKind.Destructor & mkind & MemberKind.MaskType) == 0) {
527 // Destructors are ignored as they cannot be overridden by user
528 if ((entry.Kind & MemberKind.Destructor) != 0)
531 // Only different arity methods hide
532 if (mkind != MemberKind.Method && member.MemberName.Arity != entry.Arity)
535 if ((member_param == null || !(entry is IParametersMember))) {
536 bestCandidate = entry;
543 if (entry.Kind != mkind) {
544 if (bestCandidate == null)
545 bestCandidate = entry;
550 if (member_param != null) {
552 int arity = member.MemberName.Arity;
553 if (arity != entry.Arity)
556 var pm = entry as IParametersMember;
557 AParametersCollection entry_parameters;
559 if (entry.Kind != MemberKind.Delegate)
562 // TODO: I don't have DelegateSpec
563 entry_parameters = Delegate.GetParameters (member.Compiler, (TypeSpec) entry);
565 entry_parameters = pm.Parameters;
568 if (entry.IsAccessor != member is AbstractPropertyEventMethod)
571 if (!TypeSpecComparer.Override.IsEqual (entry_parameters, member_param))
576 // Skip override members with accessors they may not fully implement the base member
578 if (member_with_accessors) {
579 if ((entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.SEALED)) == Modifiers.OVERRIDE) {
581 // Set candidate to member override to flag we found an implementation
583 bestCandidate = entry;
587 bestCandidate = null;
594 if (container.IsInterface)
597 container = container.BaseType;
598 } while (container != null);
604 // Returns inflated version of MemberSpec, it works similarly to
605 // SRE TypeBuilder.GetMethod
607 public static T GetMember<T> (TypeSpec container, T spec) where T : MemberSpec
609 IList<MemberSpec> applicable;
610 if (container.MemberCache.member_hash.TryGetValue (GetLookupName (spec), out applicable)) {
611 for (int i = applicable.Count - 1; i >= 0; i--) {
612 var entry = applicable[i];
613 if (entry.MemberDefinition == spec.MemberDefinition)
618 throw new InternalErrorException ("Missing member `{0}' on inflated type `{1}'",
619 spec.GetSignatureForError (), container.GetSignatureForError ());
622 static MemberKind GetMemberCoreKind (MemberCore member)
624 if (member is FieldBase)
625 return MemberKind.Field;
626 if (member is Indexer)
627 return MemberKind.Indexer;
629 return MemberKind.Class;
630 if (member is Struct)
631 return MemberKind.Struct;
632 if (member is Destructor)
633 return MemberKind.Destructor;
634 if (member is Method)
635 return MemberKind.Method;
636 if (member is Property)
637 return MemberKind.Property;
638 if (member is EventField)
639 return MemberKind.Event;
640 if (member is Interface)
641 return MemberKind.Interface;
642 if (member is EventProperty)
643 return MemberKind.Event;
644 if (member is Delegate)
645 return MemberKind.Delegate;
647 return MemberKind.Enum;
649 throw new NotImplementedException (member.GetType ().ToString ());
652 public static IList<MemberSpec> GetCompletitionMembers (TypeSpec container, string name)
654 var matches = new List<MemberSpec> ();
655 foreach (var entry in container.MemberCache.member_hash) {
656 foreach (var name_entry in entry.Value) {
657 if (name_entry.IsAccessor)
660 if ((name_entry.Kind & (MemberKind.Constructor | MemberKind.Destructor | MemberKind.Operator)) != 0)
663 if (!name_entry.IsAccessible (InternalType.FakeInternalType))
666 if (name == null || name_entry.Name.StartsWith (name)) {
667 matches.Add (name_entry);
676 // Returns members of @iface only, base members are ignored
678 public static IList<MethodSpec> GetInterfaceMethods (TypeSpec iface)
681 // MemberCache flatten interfaces, therefore in cases like this one
683 // interface IA : IB {}
684 // interface IB { void Foo () }
686 // we would return Foo inside IA which is not expected in this case
688 var methods = new List<MethodSpec> ();
689 foreach (var entry in iface.MemberCache.member_hash.Values) {
690 foreach (var name_entry in entry) {
691 if (iface == name_entry.DeclaringType) {
692 if (name_entry.Kind == MemberKind.Method) {
693 methods.Add ((MethodSpec) name_entry);
703 // Returns all not implememted abstract members inside abstract type
704 // NOTE: Returned list is shared and must not be modified
706 public static IList<MethodSpec> GetNotImplementedAbstractMethods (TypeSpec type)
708 if (type.MemberCache.missing_abstract != null)
709 return type.MemberCache.missing_abstract;
711 var abstract_methods = new List<MethodSpec> ();
712 List<TypeSpec> hierarchy = null;
715 // Stage 1: top-to-bottom scan for abstract members
717 var abstract_type = type;
719 foreach (var entry in abstract_type.MemberCache.member_hash) {
720 foreach (var name_entry in entry.Value) {
721 if ((name_entry.Modifiers & Modifiers.ABSTRACT) == 0)
724 if (name_entry.Kind != MemberKind.Method)
727 abstract_methods.Add ((MethodSpec) name_entry);
731 var base_type = abstract_type.BaseType;
732 if (!base_type.IsAbstract)
735 if (hierarchy == null)
736 hierarchy = new List<TypeSpec> ();
738 hierarchy.Add (abstract_type);
739 abstract_type = base_type;
742 int not_implemented_count = abstract_methods.Count;
743 if (not_implemented_count == 0 || hierarchy == null) {
744 type.MemberCache.missing_abstract = abstract_methods;
745 return type.MemberCache.missing_abstract;
749 // Stage 2: Remove already implemented methods
751 foreach (var type_up in hierarchy) {
752 var members = type_up.MemberCache.member_hash;
753 if (members.Count == 0)
756 for (int i = 0; i < abstract_methods.Count; ++i) {
757 var candidate = abstract_methods [i];
758 if (candidate == null)
761 IList<MemberSpec> applicable;
762 if (!members.TryGetValue (candidate.Name, out applicable))
765 var filter = new MemberFilter (candidate);
766 foreach (var item in applicable) {
767 if ((item.Modifiers & (Modifiers.OVERRIDE | Modifiers.VIRTUAL)) == 0)
770 if (filter.Equals (item)) {
771 --not_implemented_count;
772 abstract_methods [i] = null;
779 if (not_implemented_count == abstract_methods.Count) {
780 type.MemberCache.missing_abstract = abstract_methods;
781 return type.MemberCache.missing_abstract;
784 var not_implemented = new MethodSpec[not_implemented_count];
786 foreach (var m in abstract_methods) {
790 not_implemented[counter++] = m;
793 type.MemberCache.missing_abstract = not_implemented;
794 return type.MemberCache.missing_abstract;
797 static string GetLookupName (MemberSpec ms)
799 if (ms.Kind == MemberKind.Indexer)
800 return IndexerNameAlias;
802 if (ms.Kind == MemberKind.Constructor) {
804 return ConstructorInfo.TypeConstructorName;
806 return ConstructorInfo.ConstructorName;
812 static string GetLookupName (MemberCore mc)
815 return IndexerNameAlias;
817 if (mc is Constructor)
818 return ConstructorInfo.ConstructorName;
820 return mc.MemberName.Name;
824 // Returns all operators declared on container and its base types (until declaredOnly is used)
826 public static IList<MemberSpec> GetUserOperator (TypeSpec container, Operator.OpType op, bool declaredOnly)
828 IList<MemberSpec> found = null;
830 IList<MemberSpec> applicable;
832 var mc = container.MemberCache;
834 if (((op == Operator.OpType.Implicit || op == Operator.OpType.Explicit) && (mc.state & StateFlags.HasConversionOperator) != 0) ||
835 (mc.state & StateFlags.HasUserOperator) != 0) {
837 if (mc.member_hash.TryGetValue (Operator.GetMetadataName (op), out applicable)) {
839 for (int i = 0; i < applicable.Count; ++i) {
840 if (applicable[i].Kind == MemberKind.Operator) {
845 // Handles very rare case where a method exists with same name as operator (op_xxxx)
847 found = new List<MemberSpec> ();
848 found.Add (applicable [i]);
850 var prev = found as List<MemberSpec>;
852 prev = new List<MemberSpec> (found.Count + 1);
853 prev.AddRange (found);
856 prev.Add (applicable[i]);
860 if (match_count > 0 && match_count == applicable.Count) {
864 var merged = found as List<MemberSpec>;
865 if (merged == null) {
866 merged = new List<MemberSpec> (found.Count + applicable.Count);
867 merged.AddRange (found);
871 merged.AddRange (applicable);
877 // BaseType call can be expensive
881 container = container.BaseType;
882 } while (container != null);
888 // Inflates all member cache nested types
890 public void InflateTypes (MemberCache inflated_cache, TypeParameterInflator inflator)
892 foreach (var item in member_hash) {
893 IList<MemberSpec> inflated_members = null;
894 for (int i = 0; i < item.Value.Count; ++i ) {
895 var member = item.Value[i];
897 // FIXME: When inflating members refering nested types before they are inflated
901 if ((member.Kind & MemberKind.NestedMask) != 0 &&
902 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
903 if (inflated_members == null) {
904 inflated_members = new MemberSpec[item.Value.Count];
905 inflated_cache.member_hash.Add (item.Key, inflated_members);
908 inflated_members [i] = member.InflateMember (inflator);
915 // Inflates all open type members, requires InflateTypes to be called before
917 public void InflateMembers (MemberCache cacheToInflate, TypeSpec inflatedType, TypeParameterInflator inflator)
919 var inflated_member_hash = cacheToInflate.member_hash;
920 Dictionary<MethodSpec, MethodSpec> accessor_relation = null;
921 List<MemberSpec> accessor_members = null;
923 // Copy member specific flags when all members were added
924 cacheToInflate.state = state;
926 foreach (var item in member_hash) {
927 var members = item.Value;
928 IList<MemberSpec> inflated_members = null;
929 for (int i = 0; i < members.Count; ++i ) {
930 var member = members[i];
933 // All nested types have been inflated earlier except for
934 // compiler types which are created later and could miss InflateTypes
936 if ((member.Kind & MemberKind.NestedMask) != 0 &&
937 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
938 if (inflated_members == null)
939 inflated_members = inflated_member_hash[item.Key];
945 // Clone the container first
947 if (inflated_members == null) {
948 inflated_members = new MemberSpec [item.Value.Count];
949 inflated_member_hash.Add (item.Key, inflated_members);
952 var local_inflator = inflator;
954 if (member.DeclaringType != inflatedType) {
956 // Don't inflate non generic interface members
957 // merged into generic interface
959 if (!member.DeclaringType.IsGeneric) {
960 inflated_members [i] = member;
965 // Needed when inflating flatten interfaces. It inflates
966 // container type only, type parameters are already done
968 // Handles cases like:
971 // interface I<U, V> : I<U> {}
973 // class C: I<int, bool> {}
975 var inflated_parent = inflator.Inflate (member.DeclaringType);
976 if (inflated_parent != inflator.TypeInstance)
977 local_inflator = new TypeParameterInflator (inflator, inflated_parent);
981 // Inflate every member, its parent is now different
983 var inflated = member.InflateMember (local_inflator);
984 inflated_members [i] = inflated;
986 if (member is PropertySpec || member is EventSpec) {
987 if (accessor_members == null)
988 accessor_members = new List<MemberSpec> ();
990 accessor_members.Add (inflated);
994 if (member.IsAccessor) {
995 if (accessor_relation == null)
996 accessor_relation = new Dictionary<MethodSpec, MethodSpec> ();
997 accessor_relation.Add ((MethodSpec) member, (MethodSpec) inflated);
1002 if (accessor_members != null) {
1003 foreach (var member in accessor_members) {
1004 var prop = member as PropertySpec;
1006 if (prop.Get != null)
1007 prop.Get = accessor_relation[prop.Get];
1008 if (prop.Set != null)
1009 prop.Set = accessor_relation[prop.Set];
1014 var ev = (EventSpec) member;
1015 ev.AccessorAdd = accessor_relation[ev.AccessorAdd];
1016 ev.AccessorRemove = accessor_relation[ev.AccessorRemove];
1022 // Checks all appropriate container members for CLS compliance
1024 public void VerifyClsCompliance (TypeSpec container, Report report)
1026 if (locase_members != null)
1029 if (container.BaseType == null) {
1030 locase_members = new Dictionary<string, MemberSpec[]> (member_hash.Count); // StringComparer.OrdinalIgnoreCase);
1032 container.BaseType.MemberCache.VerifyClsCompliance (container.BaseType, report);
1033 locase_members = new Dictionary<string, MemberSpec[]> (container.BaseType.MemberCache.locase_members); //, StringComparer.OrdinalIgnoreCase);
1036 var is_imported_type = container.MemberDefinition.IsImported;
1037 foreach (var entry in container.MemberCache.member_hash) {
1038 for (int i = 0; i < entry.Value.Count; ++i ) {
1039 var name_entry = entry.Value[i];
1040 if ((name_entry.Modifiers & (Modifiers.PUBLIC | Modifiers.PROTECTED)) == 0)
1043 if ((name_entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.COMPILER_GENERATED)) != 0)
1046 if ((name_entry.Kind & MemberKind.MaskType) == 0)
1049 if (name_entry.MemberDefinition.IsNotCLSCompliant ())
1052 IParametersMember p_a = name_entry as IParametersMember;
1053 if (p_a != null && !name_entry.IsAccessor) {
1054 if (!is_imported_type) {
1055 var p_a_pd = p_a.Parameters;
1056 for (int ii = i + 1; ii < entry.Value.Count; ++ii) {
1057 var checked_entry = entry.Value[ii];
1058 IParametersMember p_b = checked_entry as IParametersMember;
1062 if (p_a_pd.Count != p_b.Parameters.Count)
1065 if (checked_entry.IsAccessor)
1068 var res = ParametersCompiled.IsSameClsSignature (p_a.Parameters, p_b.Parameters);
1070 var last = GetLaterDefinedMember (checked_entry, name_entry);
1071 if (last == checked_entry.MemberDefinition) {
1072 report.SymbolRelatedToPreviousError (name_entry);
1074 report.SymbolRelatedToPreviousError (checked_entry);
1077 if ((res & 1) != 0) {
1078 report.Warning (3006, 1, last.Location,
1079 "Overloaded method `{0}' differing only in ref or out, or in array rank, is not CLS-compliant",
1080 name_entry.GetSignatureForError ());
1083 if ((res & 2) != 0) {
1084 report.Warning (3007, 1, last.Location,
1085 "Overloaded method `{0}' differing only by unnamed array types is not CLS-compliant",
1086 name_entry.GetSignatureForError ());
1093 if (i > 0 || name_entry.Kind == MemberKind.Constructor || name_entry.Kind == MemberKind.Indexer)
1096 var name_entry_locase = name_entry.Name.ToLowerInvariant ();
1099 if (!locase_members.TryGetValue (name_entry_locase, out found)) {
1100 found = new MemberSpec[] { name_entry };
1101 locase_members.Add (name_entry_locase, found);
1103 bool same_names_only = true;
1104 foreach (var f in found) {
1105 if (f.Name == name_entry.Name)
1108 // if (f.IsAccessor && name_entry.IsAccessor)
1111 same_names_only = false;
1112 if (!is_imported_type) {
1113 var last = GetLaterDefinedMember (f, name_entry);
1114 if (last == f.MemberDefinition) {
1115 report.SymbolRelatedToPreviousError (name_entry);
1117 report.SymbolRelatedToPreviousError (f);
1120 report.Warning (3005, 1, last.Location,
1121 "Identifier `{0}' differing only in case is not CLS-compliant", last.GetSignatureForError ());
1125 if (!same_names_only) {
1126 Array.Resize (ref found, found.Length + 1);
1127 found[found.Length - 1] = name_entry;
1128 locase_members[name_entry_locase] = found;
1136 // Local report helper to issue correctly ordered members stored in hashtable
1138 static MemberCore GetLaterDefinedMember (MemberSpec a, MemberSpec b)
1140 var mc_a = a.MemberDefinition as MemberCore;
1141 var mc_b = b.MemberDefinition as MemberCore;
1148 if (mc_a.Location.File != mc_a.Location.File)
1151 return mc_b.Location.Row > mc_a.Location.Row ? mc_b : mc_a;
1154 public bool CheckExistingMembersOverloads (MemberCore member, AParametersCollection parameters)
1156 var name = GetLookupName (member);
1157 var imb = member as InterfaceMemberBase;
1158 if (imb != null && imb.IsExplicitImpl) {
1159 name = imb.GetFullName (name);
1162 return CheckExistingMembersOverloads (member, name, parameters);
1165 public bool CheckExistingMembersOverloads (MemberCore member, string name, AParametersCollection parameters)
1167 IList<MemberSpec> entries;
1168 if (!member_hash.TryGetValue (name, out entries))
1171 var Report = member.Compiler.Report;
1173 int method_param_count = parameters.Count;
1174 for (int i = entries.Count - 1; i >= 0; --i) {
1175 var ce = entries[i];
1176 var pm = ce as IParametersMember;
1177 var pd = pm == null ? ParametersCompiled.EmptyReadOnlyParameters : pm.Parameters;
1178 if (pd.Count != method_param_count)
1181 if (ce.Arity != member.MemberName.Arity)
1184 // Ignore merged interface members
1185 if (member.Parent.PartialContainer != ce.DeclaringType.MemberDefinition)
1188 var p_types = pd.Types;
1189 if (method_param_count > 0) {
1190 int ii = method_param_count - 1;
1191 TypeSpec type_a, type_b;
1193 type_a = parameters.Types [ii];
1194 type_b = p_types [ii];
1196 if ((pd.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF) !=
1197 (parameters.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF))
1200 } while (TypeSpecComparer.Override.IsEqual (type_a, type_b) && ii-- != 0);
1206 // Operators can differ in return type only
1208 if (member is Operator && ce.Kind == MemberKind.Operator && ((MethodSpec) ce).ReturnType != ((Operator) member).ReturnType)
1212 // Report difference in parameter modifiers only
1214 if (pd != null && member is MethodCore) {
1215 ii = method_param_count;
1216 while (ii-- != 0 && parameters.FixedParameters[ii].ModFlags == pd.FixedParameters[ii].ModFlags &&
1217 parameters.ExtensionMethodType == pd.ExtensionMethodType) ;
1220 var mc = ce as MethodSpec;
1221 member.Compiler.Report.SymbolRelatedToPreviousError (ce);
1222 if ((member.ModFlags & Modifiers.PARTIAL) != 0 && (mc.Modifiers & Modifiers.PARTIAL) != 0) {
1223 if (parameters.HasParams || pd.HasParams) {
1224 Report.Error (758, member.Location,
1225 "A partial method declaration and partial method implementation cannot differ on use of `params' modifier");
1227 Report.Error (755, member.Location,
1228 "A partial method declaration and partial method implementation must be both an extension method or neither");
1230 } else if (member is Constructor) {
1231 Report.Error (851, member.Location,
1232 "Overloaded contructor `{0}' cannot differ on use of parameter modifiers only",
1233 member.GetSignatureForError ());
1235 Report.Error (663, member.Location,
1236 "Overloaded method `{0}' cannot differ on use of parameter modifiers only",
1237 member.GetSignatureForError ());
1244 if ((ce.Kind & MemberKind.Method) != 0) {
1245 Method method_a = member as Method;
1246 Method method_b = ce.MemberDefinition as Method;
1247 if (method_a != null && method_b != null && (method_a.ModFlags & method_b.ModFlags & Modifiers.PARTIAL) != 0) {
1248 const Modifiers partial_modifiers = Modifiers.STATIC | Modifiers.UNSAFE;
1249 if (method_a.IsPartialDefinition == method_b.IsPartialImplementation) {
1250 if ((method_a.ModFlags & partial_modifiers) == (method_b.ModFlags & partial_modifiers) ||
1251 method_a.Parent.IsUnsafe && method_b.Parent.IsUnsafe) {
1252 if (method_a.IsPartialImplementation) {
1253 method_a.SetPartialDefinition (method_b);
1254 if (entries.Count == 1)
1255 member_hash.Remove (name);
1257 entries.RemoveAt (i);
1259 method_b.SetPartialDefinition (method_a);
1260 method_a.caching_flags |= MemberCore.Flags.PartialDefinitionExists;
1265 if (method_a.IsStatic != method_b.IsStatic) {
1266 Report.SymbolRelatedToPreviousError (ce);
1267 Report.Error (763, member.Location,
1268 "A partial method declaration and partial method implementation must be both `static' or neither");
1271 Report.SymbolRelatedToPreviousError (ce);
1272 Report.Error (764, member.Location,
1273 "A partial method declaration and partial method implementation must be both `unsafe' or neither");
1277 Report.SymbolRelatedToPreviousError (ce);
1278 if (method_a.IsPartialDefinition) {
1279 Report.Error (756, member.Location, "A partial method `{0}' declaration is already defined",
1280 member.GetSignatureForError ());
1283 Report.Error (757, member.Location, "A partial method `{0}' implementation is already defined",
1284 member.GetSignatureForError ());
1288 Report.SymbolRelatedToPreviousError (ce);
1290 bool is_reserved_a = member is AbstractPropertyEventMethod || member is Operator;
1291 bool is_reserved_b = ((MethodSpec) ce).IsReservedMethod;
1293 if (is_reserved_a || is_reserved_b) {
1294 Report.Error (82, member.Location, "A member `{0}' is already reserved",
1296 ce.GetSignatureForError () :
1297 member.GetSignatureForError ());
1301 Report.SymbolRelatedToPreviousError (ce);
1304 if (member is Operator && ce.Kind == MemberKind.Operator) {
1305 Report.Error (557, member.Location, "Duplicate user-defined conversion in type `{0}'",
1306 member.Parent.GetSignatureForError ());
1310 Report.Error (111, member.Location,
1311 "A member `{0}' is already defined. Rename this member or use different parameter types",
1312 member.GetSignatureForError ());