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;
19 namespace Mono.CSharp {
22 public enum MemberKind
38 TypeParameter = 1 << 16,
41 PointerType = 1 << 20,
42 InternalCompilerType = 1 << 21,
44 NestedMask = Class | Struct | Delegate | Enum | Interface,
45 GenericMask = Method | Class | Struct | Delegate | Interface,
46 MaskType = Constructor | Event | Field | Method | Property | Indexer | Operator | Destructor | NestedMask,
51 public enum BindingRestriction
55 // Inspect only queried type members
56 DeclaredOnly = 1 << 1,
59 InstanceOnly = 1 << 2,
63 // Member has to be override
67 public struct MemberFilter : IEquatable<MemberSpec>
69 public readonly string Name;
70 public readonly MemberKind Kind;
71 public readonly AParametersCollection Parameters;
72 public readonly TypeSpec MemberType;
74 int arity; // -1 to ignore the check
76 private MemberFilter (string name, MemberKind kind)
85 public MemberFilter (MethodSpec m)
88 Kind = MemberKind.Method;
89 Parameters = m.Parameters;
90 MemberType = m.ReturnType;
94 public MemberFilter (string name, int arity, MemberKind kind, AParametersCollection param, TypeSpec type)
103 public static MemberFilter Constructor (AParametersCollection param)
105 return new MemberFilter (System.Reflection.ConstructorInfo.ConstructorName, 0, MemberKind.Constructor, param, null);
108 public static MemberFilter Property (string name, TypeSpec type)
110 return new MemberFilter (name, 0, MemberKind.Property, null, type);
113 public static MemberFilter Field (string name, TypeSpec type)
115 return new MemberFilter (name, 0, MemberKind.Field, null, type);
118 public static MemberFilter Method (string name, int arity, AParametersCollection param, TypeSpec type)
120 return new MemberFilter (name, arity, MemberKind.Method, param, type);
123 #region IEquatable<MemberSpec> Members
125 public bool Equals (MemberSpec other)
127 // Is the member of the correct type ?
128 // TODO: Isn't this redundant ?
129 if ((other.Kind & Kind & MemberKind.MaskType) == 0)
132 // Check arity when not disabled
133 if (arity >= 0 && arity != other.Arity)
136 if (Parameters != null) {
137 if (other is IParametersMember) {
138 var other_param = ((IParametersMember) other).Parameters;
139 if (!TypeSpecComparer.Override.IsEqual (Parameters, other_param))
146 if (MemberType != null) {
147 if (other is IInterfaceMemberSpec) {
148 var other_type = ((IInterfaceMemberSpec) other).MemberType;
149 if (!TypeSpecComparer.Override.IsEqual (other_type, MemberType))
163 // The MemberCache is the main members container used by compiler. It contains
164 // all members imported or defined during compilation using on demand filling
165 // process. Inflated containers are also using MemberCache to make inflated
166 // members look like normal definition.
168 // All of the methods are performance and memory sensitive as the MemberCache
169 // is the underlying engine of all member based operations.
171 public class MemberCache
175 HasConversionOperator = 1 << 1,
176 HasUserOperator = 1 << 2
179 readonly Dictionary<string, IList<MemberSpec>> member_hash;
180 Dictionary<string, MemberSpec[]> locase_members;
181 IList<MethodSpec> missing_abstract;
184 public static readonly string IndexerNameAlias = "<this>";
186 public static readonly MemberCache Empty = new MemberCache (0);
188 public MemberCache ()
193 public MemberCache (int capacity)
195 member_hash = new Dictionary<string, IList<MemberSpec>> (capacity);
198 public MemberCache (MemberCache cache)
199 : this (cache.member_hash.Count)
201 this.state = cache.state;
205 // Creates a new MemberCache for the given `container'.
207 public MemberCache (TypeContainer container)
208 : this () // TODO: Optimize the size
213 // Member-cache does not contain base members but it does
214 // contain all base interface members, so the Lookup code
215 // can use simple inheritance rules.
217 public void AddInterface (TypeSpec iface)
219 var cache = iface.MemberCache;
221 IList<MemberSpec> list;
222 foreach (var entry in cache.member_hash) {
223 if (!member_hash.TryGetValue (entry.Key, out list)) {
224 if (entry.Value.Count == 1) {
227 list = new List<MemberSpec> (entry.Value);
230 member_hash.Add (entry.Key, list);
234 foreach (var ce in entry.Value) {
235 if (list.Contains (ce))
238 if (AddInterfaceMember (ce, ref list))
239 member_hash[entry.Key] = list;
243 // Add also all base interfaces
244 if (iface.Interfaces != null) {
245 foreach (var base_iface in iface.Interfaces)
246 AddInterface (base_iface);
250 public void AddMember (InterfaceMemberBase imb, string exlicitName, MemberSpec ms)
252 // Explicit names cannot be looked-up but can be used for
253 // collision checking (no name mangling needed)
254 if (imb.IsExplicitImpl)
255 AddMember (exlicitName, ms);
261 // Add non-explicit member to member cache
263 public void AddMember (MemberSpec ms)
265 AddMember (GetLookupName (ms), ms);
268 void AddMember (string name, MemberSpec member)
270 if (member.Kind == MemberKind.Operator) {
271 var dt = member.DeclaringType;
272 if (dt == TypeManager.string_type || dt == TypeManager.delegate_type || dt == TypeManager.multicast_delegate_type) {
273 // Some core types have user operators but they cannot be used as normal
274 // user operators as they are predefined and therefore having different
275 // rules (e.g. binary operators) by not setting the flag we hide them for
277 // TODO: Should I do this for all core types ?
278 } else if (name == Operator.GetMetadataName (Operator.OpType.Implicit) || name == Operator.GetMetadataName (Operator.OpType.Explicit)) {
279 state |= StateFlags.HasConversionOperator;
281 state |= StateFlags.HasUserOperator;
285 IList<MemberSpec> list;
286 if (!member_hash.TryGetValue (name, out list)) {
287 member_hash.Add (name, new MemberSpec[] { member });
291 if (member.DeclaringType.IsInterface) {
292 if (AddInterfaceMember (member, ref list))
293 member_hash[name] = list;
295 if (list is MemberSpec[]) {
296 list = new List<MemberSpec> () { list[0] };
297 member_hash[name] = list;
305 // Ignores any base interface member which can be hidden
308 static bool AddInterfaceMember (MemberSpec member, ref IList<MemberSpec> existing)
310 var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : ParametersCompiled.EmptyReadOnlyParameters;
313 // interface IA : IB { int Prop { set; } }
314 // interface IB { bool Prop { get; } }
316 // IB.Prop is never accessible from IA interface
318 for (int i = 0; i < existing.Count; ++i) {
319 var entry = existing[i];
321 if (entry.Arity != member.Arity)
324 if (entry is IParametersMember) {
325 var entry_param = ((IParametersMember) entry).Parameters;
326 if (!TypeSpecComparer.Override.IsEqual (entry_param, member_param))
330 if (member.DeclaringType.ImplementsInterface (entry.DeclaringType, false)) {
331 if (existing is MemberSpec[]) {
332 existing = new MemberSpec[] { member };
336 existing.RemoveAt (i--);
340 if ((entry.DeclaringType == member.DeclaringType && entry.IsAccessor == member.IsAccessor) ||
341 entry.DeclaringType.ImplementsInterface (member.DeclaringType, false))
345 if (existing is MemberSpec[]) {
346 existing = new List<MemberSpec> () { existing[0], member };
350 existing.Add (member);
354 public static MemberSpec FindMember (TypeSpec container, MemberFilter filter, BindingRestriction restrictions)
357 IList<MemberSpec> applicable;
358 if (container.MemberCache.member_hash.TryGetValue (filter.Name, out applicable)) {
359 // Start from the end because interface members are in reverse order
360 for (int i = applicable.Count - 1; i >= 0; i--) {
361 var entry = applicable [i];
363 if ((restrictions & BindingRestriction.InstanceOnly) != 0 && entry.IsStatic)
366 if ((restrictions & BindingRestriction.NoAccessors) != 0 && entry.IsAccessor)
369 if ((restrictions & BindingRestriction.OverrideOnly) != 0 && (entry.Modifiers & Modifiers.OVERRIDE) == 0)
372 if (!filter.Equals (entry))
375 if ((restrictions & BindingRestriction.DeclaredOnly) != 0 && container.IsInterface && entry.DeclaringType != container)
382 if ((restrictions & BindingRestriction.DeclaredOnly) != 0)
385 container = container.BaseType;
386 } while (container != null);
392 // A special method to work with member lookup only. It returns a list of all members named @name
393 // starting from @container. It's very performance sensitive
395 public static IList<MemberSpec> FindMembers (TypeSpec container, string name, bool declaredOnly)
397 IList<MemberSpec> applicable;
400 if (container.MemberCache.member_hash.TryGetValue (name, out applicable) || declaredOnly)
403 container = container.BaseType;
404 } while (container != null);
410 // Finds the nested type in container
412 public static TypeSpec FindNestedType (TypeSpec container, string name, int arity)
414 IList<MemberSpec> applicable;
415 TypeSpec best_match = null;
417 // TODO: Don't know how to handle this yet
418 // When resolving base type of nested type, parent type must have
419 // base type resolved to scan full hierarchy correctly
420 // Similarly MemberCacheTypes will inflate BaseType and Interfaces
421 // based on type definition
422 var tc = container.MemberDefinition as TypeContainer;
426 if (container.MemberCacheTypes.member_hash.TryGetValue (name, out applicable)) {
427 for (int i = applicable.Count - 1; i >= 0; i--) {
428 var entry = applicable[i];
429 if ((entry.Kind & MemberKind.NestedMask) == 0)
432 var ts = (TypeSpec) entry;
433 if (arity == ts.Arity)
437 if (best_match == null) {
439 } else if (System.Math.Abs (ts.Arity + arity) < System.Math.Abs (ts.Arity + arity)) {
446 container = container.BaseType;
447 } while (container != null);
453 // Looks for extension methods with defined name and extension type
455 public List<MethodSpec> FindExtensionMethods (TypeContainer invocationType, TypeSpec extensionType, string name, int arity)
457 IList<MemberSpec> entries;
458 if (!member_hash.TryGetValue (name, out entries))
461 List<MethodSpec> candidates = null;
462 foreach (var entry in entries) {
463 if (entry.Kind != MemberKind.Method || (arity > 0 && entry.Arity != arity))
466 var ms = (MethodSpec) entry;
467 if (!ms.IsExtensionMethod)
470 if (!ms.IsAccessible (invocationType.CurrentType))
473 if ((ms.DeclaringType.Modifiers & Modifiers.INTERNAL) != 0 && !ms.DeclaringType.MemberDefinition.IsInternalAsPublic (invocationType.DeclaringAssembly))
476 if (candidates == null)
477 candidates = new List<MethodSpec> ();
485 // Returns base members of @member member if no exact match is found @bestCandidate returns
488 public static MemberSpec FindBaseMember (MemberCore member, out MemberSpec bestCandidate)
490 bestCandidate = null;
491 var container = member.Parent.PartialContainer.Definition;
492 if (!container.IsInterface) {
493 container = container.BaseType;
495 // It can happen for a user definition of System.Object
496 if (container == null)
500 string name = GetLookupName (member);
501 IList<MemberSpec> applicable;
502 var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : null;
504 var mkind = GetMemberCoreKind (member);
505 bool member_with_accessors = mkind == MemberKind.Indexer || mkind == MemberKind.Property;
508 if (container.MemberCache.member_hash.TryGetValue (name, out applicable)) {
509 for (int i = 0; i < applicable.Count; ++i) {
510 var entry = applicable [i];
512 if ((entry.Modifiers & Modifiers.PRIVATE) != 0)
515 if ((entry.Modifiers & Modifiers.AccessibilityMask) == Modifiers.INTERNAL &&
516 !entry.DeclaringType.MemberDefinition.IsInternalAsPublic (member.Module.DeclaringAssembly))
520 // Is the member of same type ?
522 if ((entry.Kind & ~MemberKind.Destructor & mkind & MemberKind.MaskType) == 0) {
523 // Destructors are ignored as they cannot be overridden by user
524 if ((entry.Kind & MemberKind.Destructor) != 0)
527 // Only different arity methods hide
528 if (mkind != MemberKind.Method && member.MemberName.Arity != entry.Arity)
531 if ((member_param == null || !(entry is IParametersMember))) {
532 bestCandidate = entry;
539 if (entry.Kind != mkind) {
540 if (bestCandidate == null)
541 bestCandidate = entry;
546 if (member_param != null) {
548 int arity = member.MemberName.Arity;
549 if (arity != entry.Arity)
552 var pm = entry as IParametersMember;
553 AParametersCollection entry_parameters;
555 if (entry.Kind != MemberKind.Delegate)
558 // TODO: I don't have DelegateSpec
559 entry_parameters = Delegate.GetParameters (member.Compiler, (TypeSpec) entry);
561 entry_parameters = pm.Parameters;
564 if (entry.IsAccessor != member is AbstractPropertyEventMethod)
567 if (!TypeSpecComparer.Override.IsEqual (entry_parameters, member_param))
572 // Skip override members with accessors they may not fully implement the base member
574 if (member_with_accessors) {
575 if ((entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.SEALED)) == Modifiers.OVERRIDE) {
577 // Set candidate to member override to flag we found an implementation
579 bestCandidate = entry;
583 bestCandidate = null;
590 if (container.IsInterface)
593 container = container.BaseType;
594 } while (container != null);
600 // Returns inflated version of MemberSpec, it works similarly to
601 // SRE TypeBuilder.GetMethod
603 public static T GetMember<T> (TypeSpec container, T spec) where T : MemberSpec
605 IList<MemberSpec> applicable;
606 if (container.MemberCache.member_hash.TryGetValue (GetLookupName (spec), out applicable)) {
607 for (int i = applicable.Count - 1; i >= 0; i--) {
608 var entry = applicable[i];
609 if (entry.MemberDefinition == spec.MemberDefinition)
614 throw new InternalErrorException ("Missing member `{0}' on inflated type `{1}'",
615 spec.GetSignatureForError (), container.GetSignatureForError ());
618 static MemberKind GetMemberCoreKind (MemberCore member)
620 if (member is FieldBase)
621 return MemberKind.Field;
622 if (member is Indexer)
623 return MemberKind.Indexer;
625 return MemberKind.Class;
626 if (member is Struct)
627 return MemberKind.Struct;
628 if (member is Destructor)
629 return MemberKind.Destructor;
630 if (member is Method)
631 return MemberKind.Method;
632 if (member is Property)
633 return MemberKind.Property;
634 if (member is EventField)
635 return MemberKind.Event;
636 if (member is Interface)
637 return MemberKind.Interface;
638 if (member is EventProperty)
639 return MemberKind.Event;
640 if (member is Delegate)
641 return MemberKind.Delegate;
643 return MemberKind.Enum;
645 throw new NotImplementedException (member.GetType ().ToString ());
648 public static IList<MemberSpec> GetCompletitionMembers (TypeSpec container, string name)
650 var matches = new List<MemberSpec> ();
651 foreach (var entry in container.MemberCache.member_hash) {
652 foreach (var name_entry in entry.Value) {
653 if (name_entry.IsAccessor)
656 if ((name_entry.Kind & (MemberKind.Constructor | MemberKind.Destructor | MemberKind.Operator)) != 0)
659 if (!name_entry.IsAccessible (InternalType.FakeInternalType))
662 if (name == null || name_entry.Name.StartsWith (name)) {
663 matches.Add (name_entry);
672 // Returns members of @iface only, base members are ignored
674 public static IList<MethodSpec> GetInterfaceMethods (TypeSpec iface)
677 // MemberCache flatten interfaces, therefore in cases like this one
679 // interface IA : IB {}
680 // interface IB { void Foo () }
682 // we would return Foo inside IA which is not expected in this case
684 var methods = new List<MethodSpec> ();
685 foreach (var entry in iface.MemberCache.member_hash.Values) {
686 foreach (var name_entry in entry) {
687 if (iface == name_entry.DeclaringType) {
688 if (name_entry.Kind == MemberKind.Method) {
689 methods.Add ((MethodSpec) name_entry);
699 // Returns all not implememted abstract members inside abstract type
700 // NOTE: Returned list is shared and must not be modified
702 public static IList<MethodSpec> GetNotImplementedAbstractMethods (TypeSpec type)
704 if (type.MemberCache.missing_abstract != null)
705 return type.MemberCache.missing_abstract;
707 var abstract_methods = new List<MethodSpec> ();
708 List<TypeSpec> hierarchy = null;
711 // Stage 1: top-to-bottom scan for abstract members
713 var abstract_type = type;
715 foreach (var entry in abstract_type.MemberCache.member_hash) {
716 foreach (var name_entry in entry.Value) {
717 if ((name_entry.Modifiers & Modifiers.ABSTRACT) == 0)
720 if (name_entry.Kind != MemberKind.Method)
723 abstract_methods.Add ((MethodSpec) name_entry);
727 var base_type = abstract_type.BaseType;
728 if (!base_type.IsAbstract)
731 if (hierarchy == null)
732 hierarchy = new List<TypeSpec> ();
734 hierarchy.Add (abstract_type);
735 abstract_type = base_type;
738 int not_implemented_count = abstract_methods.Count;
739 if (not_implemented_count == 0 || hierarchy == null) {
740 type.MemberCache.missing_abstract = abstract_methods;
741 return type.MemberCache.missing_abstract;
745 // Stage 2: Remove already implemented methods
747 foreach (var type_up in hierarchy) {
748 var members = type_up.MemberCache.member_hash;
749 if (members.Count == 0)
752 for (int i = 0; i < abstract_methods.Count; ++i) {
753 var candidate = abstract_methods [i];
754 if (candidate == null)
757 IList<MemberSpec> applicable;
758 if (!members.TryGetValue (candidate.Name, out applicable))
761 var filter = new MemberFilter (candidate);
762 foreach (var item in applicable) {
763 if ((item.Modifiers & (Modifiers.OVERRIDE | Modifiers.VIRTUAL)) == 0)
766 if (filter.Equals (item)) {
767 --not_implemented_count;
768 abstract_methods [i] = null;
775 if (not_implemented_count == abstract_methods.Count) {
776 type.MemberCache.missing_abstract = abstract_methods;
777 return type.MemberCache.missing_abstract;
780 var not_implemented = new MethodSpec[not_implemented_count];
782 foreach (var m in abstract_methods) {
786 not_implemented[counter++] = m;
789 type.MemberCache.missing_abstract = not_implemented;
790 return type.MemberCache.missing_abstract;
793 static string GetLookupName (MemberSpec ms)
795 if (ms.Kind == MemberKind.Indexer)
796 return IndexerNameAlias;
798 if (ms.Kind == MemberKind.Constructor) {
800 return Constructor.TypeConstructorName;
802 return Constructor.ConstructorName;
808 static string GetLookupName (MemberCore mc)
811 return IndexerNameAlias;
813 if (mc is Constructor)
814 return Constructor.ConstructorName;
816 return mc.MemberName.Name;
820 // Returns all operators declared on container and its base types (until declaredOnly is used)
822 public static IList<MemberSpec> GetUserOperator (TypeSpec container, Operator.OpType op, bool declaredOnly)
824 IList<MemberSpec> found = null;
826 IList<MemberSpec> applicable;
828 var mc = container.MemberCache;
830 if (((op == Operator.OpType.Implicit || op == Operator.OpType.Explicit) && (mc.state & StateFlags.HasConversionOperator) != 0) ||
831 (mc.state & StateFlags.HasUserOperator) != 0) {
833 if (mc.member_hash.TryGetValue (Operator.GetMetadataName (op), out applicable)) {
835 for (i = 0; i < applicable.Count; ++i) {
836 if (applicable[i].Kind != MemberKind.Operator) {
842 // Handles very rare case where a method with same name as operator (op_xxxx) exists
843 // and we have to resize the applicable list
845 if (i != applicable.Count) {
846 for (i = 0; i < applicable.Count; ++i) {
847 if (applicable[i].Kind != MemberKind.Operator) {
852 found = new List<MemberSpec> ();
853 found.Add (applicable[i]);
855 var prev = found as List<MemberSpec>;
857 prev = new List<MemberSpec> (found.Count + 1);
858 prev.AddRange (found);
861 prev.Add (applicable[i]);
868 var merged = found as List<MemberSpec>;
869 if (merged == null) {
870 merged = new List<MemberSpec> (found.Count + applicable.Count);
871 merged.AddRange (found);
875 merged.AddRange (applicable);
881 // BaseType call can be expensive
885 container = container.BaseType;
886 } while (container != null);
892 // Inflates all member cache nested types
894 public void InflateTypes (MemberCache inflated_cache, TypeParameterInflator inflator)
896 foreach (var item in member_hash) {
897 IList<MemberSpec> inflated_members = null;
898 for (int i = 0; i < item.Value.Count; ++i ) {
899 var member = item.Value[i];
901 // FIXME: When inflating members refering nested types before they are inflated
905 if ((member.Kind & MemberKind.NestedMask) != 0 &&
906 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
907 if (inflated_members == null) {
908 inflated_members = new MemberSpec[item.Value.Count];
909 inflated_cache.member_hash.Add (item.Key, inflated_members);
912 inflated_members [i] = member.InflateMember (inflator);
919 // Inflates all open type members, requires InflateTypes to be called before
921 public void InflateMembers (MemberCache cacheToInflate, TypeSpec inflatedType, TypeParameterInflator inflator)
923 var inflated_member_hash = cacheToInflate.member_hash;
924 Dictionary<MemberSpec, MethodSpec> accessor_relation = null;
925 List<MemberSpec> accessor_members = null;
927 // Copy member specific flags when all members were added
928 cacheToInflate.state = state;
930 foreach (var item in member_hash) {
931 var members = item.Value;
932 IList<MemberSpec> inflated_members = null;
933 for (int i = 0; i < members.Count; ++i ) {
934 var member = members[i];
937 // All nested types have been inflated earlier except for
938 // compiler types which are created later and could miss InflateTypes
940 if ((member.Kind & MemberKind.NestedMask) != 0 &&
941 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
942 if (inflated_members == null)
943 inflated_members = inflated_member_hash[item.Key];
949 // Clone the container first
951 if (inflated_members == null) {
952 inflated_members = new MemberSpec [item.Value.Count];
953 inflated_member_hash.Add (item.Key, inflated_members);
956 var local_inflator = inflator;
958 if (member.DeclaringType != inflatedType) {
960 // Don't inflate top-level non-generic interface members
961 // merged into generic interface
963 if (!member.DeclaringType.IsGeneric && !member.DeclaringType.IsNested) {
964 inflated_members [i] = member;
969 // Needed when inflating flatten interfaces. It inflates
970 // container type only, type parameters are already done
972 // Handles cases like:
975 // interface I<U, V> : I<U> {}
977 // class C: I<int, bool> {}
979 var inflated_parent = inflator.Inflate (member.DeclaringType);
980 if (inflated_parent != inflator.TypeInstance)
981 local_inflator = new TypeParameterInflator (inflator, inflated_parent);
985 // Inflate every member, its parent is now different
987 var inflated = member.InflateMember (local_inflator);
988 inflated_members [i] = inflated;
990 if (member is PropertySpec || member is EventSpec) {
991 if (accessor_members == null)
992 accessor_members = new List<MemberSpec> ();
994 accessor_members.Add (inflated);
998 if (member.IsAccessor) {
999 if (accessor_relation == null)
1000 accessor_relation = new Dictionary<MemberSpec, MethodSpec> ();
1001 accessor_relation.Add (member, (MethodSpec) inflated);
1006 if (accessor_members != null) {
1007 foreach (var member in accessor_members) {
1008 var prop = member as PropertySpec;
1010 if (prop.Get != null)
1011 prop.Get = accessor_relation[prop.Get];
1012 if (prop.Set != null)
1013 prop.Set = accessor_relation[prop.Set];
1018 var ev = (EventSpec) member;
1019 ev.AccessorAdd = accessor_relation[ev.AccessorAdd];
1020 ev.AccessorRemove = accessor_relation[ev.AccessorRemove];
1026 // Checks all appropriate container members for CLS compliance
1028 public void VerifyClsCompliance (TypeSpec container, Report report)
1030 if (locase_members != null)
1033 if (container.BaseType == null) {
1034 locase_members = new Dictionary<string, MemberSpec[]> (member_hash.Count); // StringComparer.OrdinalIgnoreCase);
1036 container.BaseType.MemberCache.VerifyClsCompliance (container.BaseType, report);
1037 locase_members = new Dictionary<string, MemberSpec[]> (container.BaseType.MemberCache.locase_members); //, StringComparer.OrdinalIgnoreCase);
1040 var is_imported_type = container.MemberDefinition.IsImported;
1041 foreach (var entry in container.MemberCache.member_hash) {
1042 for (int i = 0; i < entry.Value.Count; ++i ) {
1043 var name_entry = entry.Value[i];
1044 if ((name_entry.Modifiers & (Modifiers.PUBLIC | Modifiers.PROTECTED)) == 0)
1047 if ((name_entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.COMPILER_GENERATED)) != 0)
1050 if ((name_entry.Kind & MemberKind.MaskType) == 0)
1053 if (name_entry.MemberDefinition.IsNotCLSCompliant ())
1056 IParametersMember p_a = name_entry as IParametersMember;
1057 if (p_a != null && !name_entry.IsAccessor) {
1058 if (!is_imported_type) {
1059 var p_a_pd = p_a.Parameters;
1060 for (int ii = i + 1; ii < entry.Value.Count; ++ii) {
1061 var checked_entry = entry.Value[ii];
1062 IParametersMember p_b = checked_entry as IParametersMember;
1066 if (p_a_pd.Count != p_b.Parameters.Count)
1069 if (checked_entry.IsAccessor)
1072 var res = ParametersCompiled.IsSameClsSignature (p_a.Parameters, p_b.Parameters);
1074 var last = GetLaterDefinedMember (checked_entry, name_entry);
1075 if (last == checked_entry.MemberDefinition) {
1076 report.SymbolRelatedToPreviousError (name_entry);
1078 report.SymbolRelatedToPreviousError (checked_entry);
1081 if ((res & 1) != 0) {
1082 report.Warning (3006, 1, last.Location,
1083 "Overloaded method `{0}' differing only in ref or out, or in array rank, is not CLS-compliant",
1084 name_entry.GetSignatureForError ());
1087 if ((res & 2) != 0) {
1088 report.Warning (3007, 1, last.Location,
1089 "Overloaded method `{0}' differing only by unnamed array types is not CLS-compliant",
1090 name_entry.GetSignatureForError ());
1097 if (i > 0 || name_entry.Kind == MemberKind.Constructor || name_entry.Kind == MemberKind.Indexer)
1100 var name_entry_locase = name_entry.Name.ToLowerInvariant ();
1103 if (!locase_members.TryGetValue (name_entry_locase, out found)) {
1104 found = new MemberSpec[] { name_entry };
1105 locase_members.Add (name_entry_locase, found);
1107 bool same_names_only = true;
1108 foreach (var f in found) {
1109 if (f.Name == name_entry.Name)
1112 // if (f.IsAccessor && name_entry.IsAccessor)
1115 same_names_only = false;
1116 if (!is_imported_type) {
1117 var last = GetLaterDefinedMember (f, name_entry);
1118 if (last == f.MemberDefinition) {
1119 report.SymbolRelatedToPreviousError (name_entry);
1121 report.SymbolRelatedToPreviousError (f);
1124 report.Warning (3005, 1, last.Location,
1125 "Identifier `{0}' differing only in case is not CLS-compliant", last.GetSignatureForError ());
1129 if (!same_names_only) {
1130 Array.Resize (ref found, found.Length + 1);
1131 found[found.Length - 1] = name_entry;
1132 locase_members[name_entry_locase] = found;
1140 // Local report helper to issue correctly ordered members stored in hashtable
1142 static MemberCore GetLaterDefinedMember (MemberSpec a, MemberSpec b)
1144 var mc_a = a.MemberDefinition as MemberCore;
1145 var mc_b = b.MemberDefinition as MemberCore;
1152 if (mc_a.Location.File != mc_a.Location.File)
1155 return mc_b.Location.Row > mc_a.Location.Row ? mc_b : mc_a;
1158 public bool CheckExistingMembersOverloads (MemberCore member, AParametersCollection parameters)
1160 var name = GetLookupName (member);
1161 var imb = member as InterfaceMemberBase;
1162 if (imb != null && imb.IsExplicitImpl) {
1163 name = imb.GetFullName (name);
1166 return CheckExistingMembersOverloads (member, name, parameters);
1169 public bool CheckExistingMembersOverloads (MemberCore member, string name, AParametersCollection parameters)
1171 IList<MemberSpec> entries;
1172 if (!member_hash.TryGetValue (name, out entries))
1175 var Report = member.Compiler.Report;
1177 int method_param_count = parameters.Count;
1178 for (int i = entries.Count - 1; i >= 0; --i) {
1179 var ce = entries[i];
1180 var pm = ce as IParametersMember;
1181 var pd = pm == null ? ParametersCompiled.EmptyReadOnlyParameters : pm.Parameters;
1182 if (pd.Count != method_param_count)
1185 if (ce.Arity != member.MemberName.Arity)
1188 // Ignore merged interface members
1189 if (member.Parent.PartialContainer != ce.DeclaringType.MemberDefinition)
1192 var p_types = pd.Types;
1193 if (method_param_count > 0) {
1194 int ii = method_param_count - 1;
1195 TypeSpec type_a, type_b;
1197 type_a = parameters.Types [ii];
1198 type_b = p_types [ii];
1200 if ((pd.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF) !=
1201 (parameters.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF))
1204 } while (TypeSpecComparer.Override.IsEqual (type_a, type_b) && ii-- != 0);
1210 // Operators can differ in return type only
1212 if (member is Operator && ce.Kind == MemberKind.Operator && ((MethodSpec) ce).ReturnType != ((Operator) member).ReturnType)
1216 // Report difference in parameter modifiers only
1218 if (pd != null && member is MethodCore) {
1219 ii = method_param_count;
1220 while (ii-- != 0 && parameters.FixedParameters[ii].ModFlags == pd.FixedParameters[ii].ModFlags &&
1221 parameters.ExtensionMethodType == pd.ExtensionMethodType) ;
1224 var mc = ce as MethodSpec;
1225 member.Compiler.Report.SymbolRelatedToPreviousError (ce);
1226 if ((member.ModFlags & Modifiers.PARTIAL) != 0 && (mc.Modifiers & Modifiers.PARTIAL) != 0) {
1227 if (parameters.HasParams || pd.HasParams) {
1228 Report.Error (758, member.Location,
1229 "A partial method declaration and partial method implementation cannot differ on use of `params' modifier");
1231 Report.Error (755, member.Location,
1232 "A partial method declaration and partial method implementation must be both an extension method or neither");
1234 } else if (member is Constructor) {
1235 Report.Error (851, member.Location,
1236 "Overloaded contructor `{0}' cannot differ on use of parameter modifiers only",
1237 member.GetSignatureForError ());
1239 Report.Error (663, member.Location,
1240 "Overloaded method `{0}' cannot differ on use of parameter modifiers only",
1241 member.GetSignatureForError ());
1248 if ((ce.Kind & MemberKind.Method) != 0) {
1249 Method method_a = member as Method;
1250 Method method_b = ce.MemberDefinition as Method;
1251 if (method_a != null && method_b != null && (method_a.ModFlags & method_b.ModFlags & Modifiers.PARTIAL) != 0) {
1252 const Modifiers partial_modifiers = Modifiers.STATIC | Modifiers.UNSAFE;
1253 if (method_a.IsPartialDefinition == method_b.IsPartialImplementation) {
1254 if ((method_a.ModFlags & partial_modifiers) == (method_b.ModFlags & partial_modifiers) ||
1255 method_a.Parent.IsUnsafe && method_b.Parent.IsUnsafe) {
1256 if (method_a.IsPartialImplementation) {
1257 method_a.SetPartialDefinition (method_b);
1258 if (entries.Count == 1)
1259 member_hash.Remove (name);
1261 entries.RemoveAt (i);
1263 method_b.SetPartialDefinition (method_a);
1264 method_a.caching_flags |= MemberCore.Flags.PartialDefinitionExists;
1269 if (method_a.IsStatic != method_b.IsStatic) {
1270 Report.SymbolRelatedToPreviousError (ce);
1271 Report.Error (763, member.Location,
1272 "A partial method declaration and partial method implementation must be both `static' or neither");
1275 Report.SymbolRelatedToPreviousError (ce);
1276 Report.Error (764, member.Location,
1277 "A partial method declaration and partial method implementation must be both `unsafe' or neither");
1281 Report.SymbolRelatedToPreviousError (ce);
1282 if (method_a.IsPartialDefinition) {
1283 Report.Error (756, member.Location, "A partial method `{0}' declaration is already defined",
1284 member.GetSignatureForError ());
1287 Report.Error (757, member.Location, "A partial method `{0}' implementation is already defined",
1288 member.GetSignatureForError ());
1292 Report.SymbolRelatedToPreviousError (ce);
1294 bool is_reserved_a = member is AbstractPropertyEventMethod || member is Operator;
1295 bool is_reserved_b = ((MethodSpec) ce).IsReservedMethod;
1297 if (is_reserved_a || is_reserved_b) {
1298 Report.Error (82, member.Location, "A member `{0}' is already reserved",
1300 ce.GetSignatureForError () :
1301 member.GetSignatureForError ());
1305 Report.SymbolRelatedToPreviousError (ce);
1308 if (member is Operator && ce.Kind == MemberKind.Operator) {
1309 Report.Error (557, member.Location, "Duplicate user-defined conversion in type `{0}'",
1310 member.Parent.GetSignatureForError ());
1314 Report.Error (111, member.Location,
1315 "A member `{0}' is already defined. Rename this member or use different parameter types",
1316 member.GetSignatureForError ());