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
15 using System.Collections.Generic;
17 namespace Mono.CSharp {
20 public enum MemberKind
36 TypeParameter = 1 << 16,
39 PointerType = 1 << 20,
40 InternalCompilerType = 1 << 21,
42 NestedMask = Class | Struct | Delegate | Enum | Interface,
43 GenericMask = Method | Class | Struct | Delegate | Interface,
44 MaskType = Constructor | Event | Field | Method | Property | Indexer | Operator | Destructor | NestedMask,
49 public enum BindingRestriction
53 // Inspect only queried type members
54 DeclaredOnly = 1 << 1,
57 InstanceOnly = 1 << 2,
61 // Member has to be override
65 public struct MemberFilter : IEquatable<MemberSpec>
67 public readonly string Name;
68 public readonly MemberKind Kind;
69 public readonly AParametersCollection Parameters;
70 public readonly TypeSpec MemberType;
72 int arity; // -1 to ignore the check
74 private MemberFilter (string name, MemberKind kind)
83 public MemberFilter (MethodSpec m)
86 Kind = MemberKind.Method;
87 Parameters = m.Parameters;
88 MemberType = m.ReturnType;
92 public MemberFilter (string name, int arity, MemberKind kind, AParametersCollection param, TypeSpec type)
101 public static MemberFilter Constructor (AParametersCollection param)
103 return new MemberFilter (Mono.CSharp.Constructor.ConstructorName, 0, MemberKind.Constructor, param, null);
106 public static MemberFilter Property (string name, TypeSpec type)
108 return new MemberFilter (name, 0, MemberKind.Property, null, type);
111 public static MemberFilter Field (string name, TypeSpec type)
113 return new MemberFilter (name, 0, MemberKind.Field, null, type);
116 public static MemberFilter Method (string name, int arity, AParametersCollection param, TypeSpec type)
118 return new MemberFilter (name, arity, MemberKind.Method, param, type);
121 #region IEquatable<MemberSpec> Members
123 public bool Equals (MemberSpec other)
125 // Is the member of the correct type ?
126 // TODO: Isn't this redundant ?
127 if ((other.Kind & Kind & MemberKind.MaskType) == 0)
130 // Check arity when not disabled
131 if (arity >= 0 && arity != other.Arity)
134 if (Parameters != null) {
135 if (other is IParametersMember) {
136 var other_param = ((IParametersMember) other).Parameters;
137 if (!TypeSpecComparer.Override.IsEqual (Parameters, other_param))
144 if (MemberType != null) {
145 if (other is IInterfaceMemberSpec) {
146 var other_type = ((IInterfaceMemberSpec) other).MemberType;
147 if (!TypeSpecComparer.Override.IsEqual (other_type, MemberType))
161 // The MemberCache is the main members container used by compiler. It contains
162 // all members imported or defined during compilation using on demand filling
163 // process. Inflated containers are also using MemberCache to make inflated
164 // members look like normal definition.
166 // All of the methods are performance and memory sensitive as the MemberCache
167 // is the underlying engine of all member based operations.
169 public class MemberCache
173 HasConversionOperator = 1 << 1,
174 HasUserOperator = 1 << 2
177 readonly Dictionary<string, IList<MemberSpec>> member_hash;
178 Dictionary<string, MemberSpec[]> locase_members;
179 IList<MethodSpec> missing_abstract;
182 public static readonly string IndexerNameAlias = "<this>";
184 public static readonly MemberCache Empty = new MemberCache (0);
186 public MemberCache ()
191 public MemberCache (int capacity)
193 member_hash = new Dictionary<string, IList<MemberSpec>> (capacity);
196 public MemberCache (MemberCache cache)
197 : this (cache.member_hash.Count)
199 this.state = cache.state;
203 // Creates a new MemberCache for the given `container'.
205 public MemberCache (TypeContainer container)
206 : this () // TODO: Optimize the size
211 // For cases where we need to union cache members
213 public void AddBaseType (TypeSpec baseType)
215 var cache = baseType.MemberCache;
217 IList<MemberSpec> list;
218 foreach (var entry in cache.member_hash) {
219 if (!member_hash.TryGetValue (entry.Key, out list)) {
220 if (entry.Value.Count == 1) {
223 list = new List<MemberSpec> (entry.Value);
226 member_hash.Add (entry.Key, list);
230 foreach (var ce in entry.Value) {
231 if (list.Contains (ce))
234 if (list is MemberSpec[]) {
235 list = new List<MemberSpec> () { list [0] };
236 member_hash[entry.Key] = list;
245 // Member-cache does not contain base members but it does
246 // contain all base interface members, so the Lookup code
247 // can use simple inheritance rules.
249 public void AddInterface (TypeSpec iface)
251 var cache = iface.MemberCache;
253 IList<MemberSpec> list;
254 foreach (var entry in cache.member_hash) {
255 if (!member_hash.TryGetValue (entry.Key, out list)) {
256 if (entry.Value.Count == 1) {
259 list = new List<MemberSpec> (entry.Value);
262 member_hash.Add (entry.Key, list);
266 foreach (var ce in entry.Value) {
267 if (list.Contains (ce))
270 if (AddInterfaceMember (ce, ref list))
271 member_hash[entry.Key] = list;
275 // Add also all base interfaces
276 if (iface.Interfaces != null) {
277 foreach (var base_iface in iface.Interfaces)
278 AddInterface (base_iface);
282 public void AddMember (InterfaceMemberBase imb, string exlicitName, MemberSpec ms)
284 // Explicit names cannot be looked-up but can be used for
285 // collision checking (no name mangling needed)
286 if (imb.IsExplicitImpl)
287 AddMember (exlicitName, ms);
293 // Add non-explicit member to member cache
295 public void AddMember (MemberSpec ms)
297 AddMember (GetLookupName (ms), ms);
300 void AddMember (string name, MemberSpec member)
302 if (member.Kind == MemberKind.Operator) {
303 var dt = member.DeclaringType;
304 if (dt == TypeManager.string_type || dt == TypeManager.delegate_type || dt == TypeManager.multicast_delegate_type) {
305 // Some core types have user operators but they cannot be used as normal
306 // user operators as they are predefined and therefore having different
307 // rules (e.g. binary operators) by not setting the flag we hide them for
309 // TODO: Should I do this for all core types ?
310 } else if (name == Operator.GetMetadataName (Operator.OpType.Implicit) || name == Operator.GetMetadataName (Operator.OpType.Explicit)) {
311 state |= StateFlags.HasConversionOperator;
313 state |= StateFlags.HasUserOperator;
317 IList<MemberSpec> list;
318 if (!member_hash.TryGetValue (name, out list)) {
319 member_hash.Add (name, new MemberSpec[] { member });
323 if (member.DeclaringType.IsInterface) {
324 if (AddInterfaceMember (member, ref list))
325 member_hash[name] = list;
327 if (list is MemberSpec[]) {
328 list = new List<MemberSpec> () { list[0] };
329 member_hash[name] = list;
337 // Ignores any base interface member which can be hidden
340 static bool AddInterfaceMember (MemberSpec member, ref IList<MemberSpec> existing)
342 var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : ParametersCompiled.EmptyReadOnlyParameters;
345 // interface IA : IB { int Prop { set; } }
346 // interface IB { bool Prop { get; } }
348 // IB.Prop is never accessible from IA interface
350 for (int i = 0; i < existing.Count; ++i) {
351 var entry = existing[i];
353 if (entry.Arity != member.Arity)
356 if (entry is IParametersMember) {
357 var entry_param = ((IParametersMember) entry).Parameters;
358 if (!TypeSpecComparer.Override.IsEqual (entry_param, member_param))
362 if (member.DeclaringType.ImplementsInterface (entry.DeclaringType, false)) {
363 if (existing is MemberSpec[]) {
364 existing = new MemberSpec[] { member };
368 existing.RemoveAt (i--);
372 if ((entry.DeclaringType == member.DeclaringType && entry.IsAccessor == member.IsAccessor) ||
373 entry.DeclaringType.ImplementsInterface (member.DeclaringType, false))
377 if (existing is MemberSpec[]) {
378 existing = new List<MemberSpec> () { existing[0], member };
382 existing.Add (member);
386 public static MemberSpec FindMember (TypeSpec container, MemberFilter filter, BindingRestriction restrictions)
389 IList<MemberSpec> applicable;
390 if (container.MemberCache.member_hash.TryGetValue (filter.Name, out applicable)) {
391 // Start from the end because interface members are in reverse order
392 for (int i = applicable.Count - 1; i >= 0; i--) {
393 var entry = applicable [i];
395 if ((restrictions & BindingRestriction.InstanceOnly) != 0 && entry.IsStatic)
398 if ((restrictions & BindingRestriction.NoAccessors) != 0 && entry.IsAccessor)
401 if ((restrictions & BindingRestriction.OverrideOnly) != 0 && (entry.Modifiers & Modifiers.OVERRIDE) == 0)
404 if (!filter.Equals (entry))
407 if ((restrictions & BindingRestriction.DeclaredOnly) != 0 && container.IsInterface && entry.DeclaringType != container)
414 if ((restrictions & BindingRestriction.DeclaredOnly) != 0)
417 container = container.BaseType;
418 } while (container != null);
424 // A special method to work with member lookup only. It returns a list of all members named @name
425 // starting from @container. It's very performance sensitive
427 public static IList<MemberSpec> FindMembers (TypeSpec container, string name, bool declaredOnly)
429 IList<MemberSpec> applicable;
432 if (container.MemberCache.member_hash.TryGetValue (name, out applicable) || declaredOnly)
435 container = container.BaseType;
436 } while (container != null);
442 // Finds the nested type in container
444 public static TypeSpec FindNestedType (TypeSpec container, string name, int arity)
446 IList<MemberSpec> applicable;
447 TypeSpec best_match = null;
449 // TODO: Don't know how to handle this yet
450 // When resolving base type of nested type, parent type must have
451 // base type resolved to scan full hierarchy correctly
452 // Similarly MemberCacheTypes will inflate BaseType and Interfaces
453 // based on type definition
454 var tc = container.MemberDefinition as TypeContainer;
458 if (container.MemberCacheTypes.member_hash.TryGetValue (name, out applicable)) {
459 for (int i = applicable.Count - 1; i >= 0; i--) {
460 var entry = applicable[i];
461 if ((entry.Kind & MemberKind.NestedMask) == 0)
464 var ts = (TypeSpec) entry;
465 if (arity == ts.Arity)
469 if (best_match == null) {
471 } else if (System.Math.Abs (ts.Arity + arity) < System.Math.Abs (ts.Arity + arity)) {
478 container = container.BaseType;
479 } while (container != null);
485 // Looks for extension methods with defined name and extension type
487 public List<MethodSpec> FindExtensionMethods (TypeContainer invocationType, TypeSpec extensionType, string name, int arity)
489 IList<MemberSpec> entries;
490 if (!member_hash.TryGetValue (name, out entries))
493 List<MethodSpec> candidates = null;
494 foreach (var entry in entries) {
495 if (entry.Kind != MemberKind.Method || (arity > 0 && entry.Arity != arity))
498 var ms = (MethodSpec) entry;
499 if (!ms.IsExtensionMethod)
502 if (!ms.IsAccessible (invocationType.CurrentType))
505 if ((ms.DeclaringType.Modifiers & Modifiers.INTERNAL) != 0 && !ms.DeclaringType.MemberDefinition.IsInternalAsPublic (invocationType.DeclaringAssembly))
508 if (candidates == null)
509 candidates = new List<MethodSpec> ();
517 // Returns base members of @member member if no exact match is found @bestCandidate returns
520 public static MemberSpec FindBaseMember (MemberCore member, out MemberSpec bestCandidate)
522 bestCandidate = null;
523 var container = member.Parent.PartialContainer.Definition;
524 if (!container.IsInterface) {
525 container = container.BaseType;
527 // It can happen for a user definition of System.Object
528 if (container == null)
532 string name = GetLookupName (member);
533 IList<MemberSpec> applicable;
534 var member_param = member is IParametersMember ? ((IParametersMember) member).Parameters : null;
536 var mkind = GetMemberCoreKind (member);
537 bool member_with_accessors = mkind == MemberKind.Indexer || mkind == MemberKind.Property;
540 if (container.MemberCache.member_hash.TryGetValue (name, out applicable)) {
541 for (int i = 0; i < applicable.Count; ++i) {
542 var entry = applicable [i];
544 if ((entry.Modifiers & Modifiers.PRIVATE) != 0)
547 if ((entry.Modifiers & Modifiers.AccessibilityMask) == Modifiers.INTERNAL &&
548 !entry.DeclaringType.MemberDefinition.IsInternalAsPublic (member.Module.DeclaringAssembly))
552 // Is the member of same kind ?
554 if ((entry.Kind & ~MemberKind.Destructor & mkind & MemberKind.MaskType) == 0) {
555 // Destructors are ignored as they cannot be overridden by user
556 if ((entry.Kind & MemberKind.Destructor) != 0)
559 // A method with different arity does not hide base member
560 if (mkind != MemberKind.Method && member.MemberName.Arity != entry.Arity)
563 bestCandidate = entry;
568 // Same kind of different arity is valid
570 if (member.MemberName.Arity != entry.Arity) {
574 if ((entry.Kind & mkind & (MemberKind.Method | MemberKind.Indexer)) != 0) {
575 if (entry.IsAccessor != member is AbstractPropertyEventMethod)
578 var pm = entry as IParametersMember;
579 if (!TypeSpecComparer.Override.IsEqual (pm.Parameters, member_param))
584 // Skip override members with accessors they may not fully implement the base member
586 if (member_with_accessors) {
587 if ((entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.SEALED)) == Modifiers.OVERRIDE) {
589 // Set candidate to member override to flag we found an implementation
591 bestCandidate = entry;
595 bestCandidate = null;
602 if (container.IsInterface)
605 container = container.BaseType;
606 } while (container != null);
612 // Returns inflated version of MemberSpec, it works similarly to
613 // SRE TypeBuilder.GetMethod
615 public static T GetMember<T> (TypeSpec container, T spec) where T : MemberSpec
617 IList<MemberSpec> applicable;
618 if (container.MemberCache.member_hash.TryGetValue (GetLookupName (spec), out applicable)) {
619 for (int i = applicable.Count - 1; i >= 0; i--) {
620 var entry = applicable[i];
621 if (entry.MemberDefinition == spec.MemberDefinition)
626 throw new InternalErrorException ("Missing member `{0}' on inflated type `{1}'",
627 spec.GetSignatureForError (), container.GetSignatureForError ());
630 static MemberKind GetMemberCoreKind (MemberCore member)
632 if (member is FieldBase)
633 return MemberKind.Field;
634 if (member is Indexer)
635 return MemberKind.Indexer;
637 return MemberKind.Class;
638 if (member is Struct)
639 return MemberKind.Struct;
640 if (member is Destructor)
641 return MemberKind.Destructor;
642 if (member is Method)
643 return MemberKind.Method;
644 if (member is Property)
645 return MemberKind.Property;
646 if (member is EventField)
647 return MemberKind.Event;
648 if (member is Interface)
649 return MemberKind.Interface;
650 if (member is EventProperty)
651 return MemberKind.Event;
652 if (member is Delegate)
653 return MemberKind.Delegate;
655 return MemberKind.Enum;
657 throw new NotImplementedException (member.GetType ().ToString ());
660 public static IList<MemberSpec> GetCompletitionMembers (TypeSpec container, string name)
662 var matches = new List<MemberSpec> ();
663 foreach (var entry in container.MemberCache.member_hash) {
664 foreach (var name_entry in entry.Value) {
665 if (name_entry.IsAccessor)
668 if ((name_entry.Kind & (MemberKind.Constructor | MemberKind.Destructor | MemberKind.Operator)) != 0)
671 if (!name_entry.IsAccessible (InternalType.FakeInternalType))
674 if (name == null || name_entry.Name.StartsWith (name)) {
675 matches.Add (name_entry);
684 // Returns members of @iface only, base members are ignored
686 public static IList<MethodSpec> GetInterfaceMethods (TypeSpec iface)
689 // MemberCache flatten interfaces, therefore in cases like this one
691 // interface IA : IB {}
692 // interface IB { void Foo () }
694 // we would return Foo inside IA which is not expected in this case
696 var methods = new List<MethodSpec> ();
697 foreach (var entry in iface.MemberCache.member_hash.Values) {
698 foreach (var name_entry in entry) {
699 if (iface == name_entry.DeclaringType) {
700 if (name_entry.Kind == MemberKind.Method) {
701 methods.Add ((MethodSpec) name_entry);
711 // Returns all not implememted abstract members inside abstract type
712 // NOTE: Returned list is shared and must not be modified
714 public static IList<MethodSpec> GetNotImplementedAbstractMethods (TypeSpec type)
716 if (type.MemberCache.missing_abstract != null)
717 return type.MemberCache.missing_abstract;
719 var abstract_methods = new List<MethodSpec> ();
720 List<TypeSpec> hierarchy = null;
723 // Stage 1: top-to-bottom scan for abstract members
725 var abstract_type = type;
727 foreach (var entry in abstract_type.MemberCache.member_hash) {
728 foreach (var name_entry in entry.Value) {
729 if ((name_entry.Modifiers & Modifiers.ABSTRACT) == 0)
732 if (name_entry.Kind != MemberKind.Method)
735 abstract_methods.Add ((MethodSpec) name_entry);
739 var base_type = abstract_type.BaseType;
740 if (!base_type.IsAbstract)
743 if (hierarchy == null)
744 hierarchy = new List<TypeSpec> ();
746 hierarchy.Add (abstract_type);
747 abstract_type = base_type;
750 int not_implemented_count = abstract_methods.Count;
751 if (not_implemented_count == 0 || hierarchy == null) {
752 type.MemberCache.missing_abstract = abstract_methods;
753 return type.MemberCache.missing_abstract;
757 // Stage 2: Remove already implemented methods
759 foreach (var type_up in hierarchy) {
760 var members = type_up.MemberCache.member_hash;
761 if (members.Count == 0)
764 for (int i = 0; i < abstract_methods.Count; ++i) {
765 var candidate = abstract_methods [i];
766 if (candidate == null)
769 IList<MemberSpec> applicable;
770 if (!members.TryGetValue (candidate.Name, out applicable))
773 var filter = new MemberFilter (candidate);
774 foreach (var item in applicable) {
775 if ((item.Modifiers & (Modifiers.OVERRIDE | Modifiers.VIRTUAL)) == 0)
778 if (filter.Equals (item)) {
779 --not_implemented_count;
780 abstract_methods [i] = null;
787 if (not_implemented_count == abstract_methods.Count) {
788 type.MemberCache.missing_abstract = abstract_methods;
789 return type.MemberCache.missing_abstract;
792 var not_implemented = new MethodSpec[not_implemented_count];
794 foreach (var m in abstract_methods) {
798 not_implemented[counter++] = m;
801 type.MemberCache.missing_abstract = not_implemented;
802 return type.MemberCache.missing_abstract;
805 static string GetLookupName (MemberSpec ms)
807 if (ms.Kind == MemberKind.Indexer)
808 return IndexerNameAlias;
810 if (ms.Kind == MemberKind.Constructor) {
812 return Constructor.TypeConstructorName;
814 return Constructor.ConstructorName;
820 static string GetLookupName (MemberCore mc)
823 return IndexerNameAlias;
825 if (mc is Constructor)
826 return Constructor.ConstructorName;
828 return mc.MemberName.Name;
832 // Returns all operators declared on container and its base types (until declaredOnly is used)
834 public static IList<MemberSpec> GetUserOperator (TypeSpec container, Operator.OpType op, bool declaredOnly)
836 IList<MemberSpec> found = null;
838 IList<MemberSpec> applicable;
840 var mc = container.MemberCache;
842 if (((op == Operator.OpType.Implicit || op == Operator.OpType.Explicit) && (mc.state & StateFlags.HasConversionOperator) != 0) ||
843 (mc.state & StateFlags.HasUserOperator) != 0) {
845 if (mc.member_hash.TryGetValue (Operator.GetMetadataName (op), out applicable)) {
847 for (i = 0; i < applicable.Count; ++i) {
848 if (applicable[i].Kind != MemberKind.Operator) {
854 // Handles very rare case where a method with same name as operator (op_xxxx) exists
855 // and we have to resize the applicable list
857 if (i != applicable.Count) {
858 for (i = 0; i < applicable.Count; ++i) {
859 if (applicable[i].Kind != MemberKind.Operator) {
864 found = new List<MemberSpec> ();
865 found.Add (applicable[i]);
867 var prev = found as List<MemberSpec>;
869 prev = new List<MemberSpec> (found.Count + 1);
870 prev.AddRange (found);
873 prev.Add (applicable[i]);
880 var merged = found as List<MemberSpec>;
881 if (merged == null) {
882 merged = new List<MemberSpec> (found.Count + applicable.Count);
883 merged.AddRange (found);
887 merged.AddRange (applicable);
893 // BaseType call can be expensive
897 container = container.BaseType;
898 } while (container != null);
904 // Inflates all member cache nested types
906 public void InflateTypes (MemberCache inflated_cache, TypeParameterInflator inflator)
908 foreach (var item in member_hash) {
909 IList<MemberSpec> inflated_members = null;
910 for (int i = 0; i < item.Value.Count; ++i ) {
911 var member = item.Value[i];
913 // FIXME: When inflating members refering nested types before they are inflated
917 if ((member.Kind & MemberKind.NestedMask) != 0 &&
918 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
919 if (inflated_members == null) {
920 inflated_members = new MemberSpec[item.Value.Count];
921 inflated_cache.member_hash.Add (item.Key, inflated_members);
924 inflated_members [i] = member.InflateMember (inflator);
931 // Inflates all open type members, requires InflateTypes to be called before
933 public void InflateMembers (MemberCache cacheToInflate, TypeSpec inflatedType, TypeParameterInflator inflator)
935 var inflated_member_hash = cacheToInflate.member_hash;
936 Dictionary<MemberSpec, MethodSpec> accessor_relation = null;
937 List<MemberSpec> accessor_members = null;
939 // Copy member specific flags when all members were added
940 cacheToInflate.state = state;
942 foreach (var item in member_hash) {
943 var members = item.Value;
944 IList<MemberSpec> inflated_members = null;
945 for (int i = 0; i < members.Count; ++i ) {
946 var member = members[i];
949 // All nested types have been inflated earlier except for
950 // compiler types which are created later and could miss InflateTypes
952 if ((member.Kind & MemberKind.NestedMask) != 0 &&
953 (member.Modifiers & Modifiers.COMPILER_GENERATED) == 0) {
954 if (inflated_members == null)
955 inflated_members = inflated_member_hash[item.Key];
961 // Clone the container first
963 if (inflated_members == null) {
964 inflated_members = new MemberSpec [item.Value.Count];
965 inflated_member_hash.Add (item.Key, inflated_members);
968 var local_inflator = inflator;
970 if (member.DeclaringType != inflatedType) {
972 // Don't inflate top-level non-generic interface members
973 // merged into generic interface
975 if (!member.DeclaringType.IsGeneric && !member.DeclaringType.IsNested) {
976 inflated_members [i] = member;
981 // Needed when inflating flatten interfaces. It inflates
982 // container type only, type parameters are already done
984 // Handles cases like:
987 // interface I<U, V> : I<U> {}
989 // class C: I<int, bool> {}
991 var inflated_parent = inflator.Inflate (member.DeclaringType);
992 if (inflated_parent != inflator.TypeInstance)
993 local_inflator = new TypeParameterInflator (inflator, inflated_parent);
997 // Inflate every member, its parent is now different
999 var inflated = member.InflateMember (local_inflator);
1000 inflated_members [i] = inflated;
1002 if (member is PropertySpec || member is EventSpec) {
1003 if (accessor_members == null)
1004 accessor_members = new List<MemberSpec> ();
1006 accessor_members.Add (inflated);
1010 if (member.IsAccessor) {
1011 if (accessor_relation == null)
1012 accessor_relation = new Dictionary<MemberSpec, MethodSpec> ();
1013 accessor_relation.Add (member, (MethodSpec) inflated);
1018 if (accessor_members != null) {
1019 foreach (var member in accessor_members) {
1020 var prop = member as PropertySpec;
1022 if (prop.Get != null)
1023 prop.Get = accessor_relation[prop.Get];
1024 if (prop.Set != null)
1025 prop.Set = accessor_relation[prop.Set];
1030 var ev = (EventSpec) member;
1031 ev.AccessorAdd = accessor_relation[ev.AccessorAdd];
1032 ev.AccessorRemove = accessor_relation[ev.AccessorRemove];
1038 // Checks all appropriate container members for CLS compliance
1040 public void VerifyClsCompliance (TypeSpec container, Report report)
1042 if (locase_members != null)
1045 if (container.BaseType == null) {
1046 locase_members = new Dictionary<string, MemberSpec[]> (member_hash.Count); // StringComparer.OrdinalIgnoreCase);
1048 container.BaseType.MemberCache.VerifyClsCompliance (container.BaseType, report);
1049 locase_members = new Dictionary<string, MemberSpec[]> (container.BaseType.MemberCache.locase_members); //, StringComparer.OrdinalIgnoreCase);
1052 var is_imported_type = container.MemberDefinition.IsImported;
1053 foreach (var entry in container.MemberCache.member_hash) {
1054 for (int i = 0; i < entry.Value.Count; ++i ) {
1055 var name_entry = entry.Value[i];
1056 if ((name_entry.Modifiers & (Modifiers.PUBLIC | Modifiers.PROTECTED)) == 0)
1059 if ((name_entry.Modifiers & (Modifiers.OVERRIDE | Modifiers.COMPILER_GENERATED)) != 0)
1062 if ((name_entry.Kind & MemberKind.MaskType) == 0)
1065 if (name_entry.MemberDefinition.IsNotCLSCompliant ())
1068 IParametersMember p_a = name_entry as IParametersMember;
1069 if (p_a != null && !name_entry.IsAccessor) {
1070 if (!is_imported_type) {
1071 var p_a_pd = p_a.Parameters;
1072 for (int ii = i + 1; ii < entry.Value.Count; ++ii) {
1073 var checked_entry = entry.Value[ii];
1074 IParametersMember p_b = checked_entry as IParametersMember;
1078 if (p_a_pd.Count != p_b.Parameters.Count)
1081 if (checked_entry.IsAccessor)
1084 var res = ParametersCompiled.IsSameClsSignature (p_a.Parameters, p_b.Parameters);
1086 var last = GetLaterDefinedMember (checked_entry, name_entry);
1087 if (last == checked_entry.MemberDefinition) {
1088 report.SymbolRelatedToPreviousError (name_entry);
1090 report.SymbolRelatedToPreviousError (checked_entry);
1093 if ((res & 1) != 0) {
1094 report.Warning (3006, 1, last.Location,
1095 "Overloaded method `{0}' differing only in ref or out, or in array rank, is not CLS-compliant",
1096 name_entry.GetSignatureForError ());
1099 if ((res & 2) != 0) {
1100 report.Warning (3007, 1, last.Location,
1101 "Overloaded method `{0}' differing only by unnamed array types is not CLS-compliant",
1102 name_entry.GetSignatureForError ());
1109 if (i > 0 || name_entry.Kind == MemberKind.Constructor || name_entry.Kind == MemberKind.Indexer)
1112 var name_entry_locase = name_entry.Name.ToLowerInvariant ();
1115 if (!locase_members.TryGetValue (name_entry_locase, out found)) {
1116 found = new MemberSpec[] { name_entry };
1117 locase_members.Add (name_entry_locase, found);
1119 bool same_names_only = true;
1120 foreach (var f in found) {
1121 if (f.Name == name_entry.Name)
1124 // if (f.IsAccessor && name_entry.IsAccessor)
1127 same_names_only = false;
1128 if (!is_imported_type) {
1129 var last = GetLaterDefinedMember (f, name_entry);
1130 if (last == f.MemberDefinition) {
1131 report.SymbolRelatedToPreviousError (name_entry);
1133 report.SymbolRelatedToPreviousError (f);
1136 report.Warning (3005, 1, last.Location,
1137 "Identifier `{0}' differing only in case is not CLS-compliant", last.GetSignatureForError ());
1141 if (!same_names_only) {
1142 Array.Resize (ref found, found.Length + 1);
1143 found[found.Length - 1] = name_entry;
1144 locase_members[name_entry_locase] = found;
1152 // Local report helper to issue correctly ordered members stored in hashtable
1154 static MemberCore GetLaterDefinedMember (MemberSpec a, MemberSpec b)
1156 var mc_a = a.MemberDefinition as MemberCore;
1157 var mc_b = b.MemberDefinition as MemberCore;
1164 if (mc_a.Location.File != mc_a.Location.File)
1167 return mc_b.Location.Row > mc_a.Location.Row ? mc_b : mc_a;
1170 public bool CheckExistingMembersOverloads (MemberCore member, AParametersCollection parameters)
1172 var name = GetLookupName (member);
1173 var imb = member as InterfaceMemberBase;
1174 if (imb != null && imb.IsExplicitImpl) {
1175 name = imb.GetFullName (name);
1178 return CheckExistingMembersOverloads (member, name, parameters);
1181 public bool CheckExistingMembersOverloads (MemberCore member, string name, AParametersCollection parameters)
1183 IList<MemberSpec> entries;
1184 if (!member_hash.TryGetValue (name, out entries))
1187 var Report = member.Compiler.Report;
1189 int method_param_count = parameters.Count;
1190 for (int i = entries.Count - 1; i >= 0; --i) {
1191 var ce = entries[i];
1192 var pm = ce as IParametersMember;
1193 var pd = pm == null ? ParametersCompiled.EmptyReadOnlyParameters : pm.Parameters;
1194 if (pd.Count != method_param_count)
1197 if (ce.Arity != member.MemberName.Arity)
1200 // Ignore merged interface members
1201 if (member.Parent.PartialContainer != ce.DeclaringType.MemberDefinition)
1204 var p_types = pd.Types;
1205 if (method_param_count > 0) {
1206 int ii = method_param_count - 1;
1207 TypeSpec type_a, type_b;
1209 type_a = parameters.Types [ii];
1210 type_b = p_types [ii];
1212 if ((pd.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF) !=
1213 (parameters.FixedParameters [ii].ModFlags & Parameter.Modifier.ISBYREF))
1216 } while (TypeSpecComparer.Override.IsEqual (type_a, type_b) && ii-- != 0);
1222 // Operators can differ in return type only
1224 if (member is Operator && ce.Kind == MemberKind.Operator && ((MethodSpec) ce).ReturnType != ((Operator) member).ReturnType)
1228 // Report difference in parameter modifiers only
1230 if (pd != null && member is MethodCore) {
1231 ii = method_param_count;
1232 while (ii-- != 0 && parameters.FixedParameters[ii].ModFlags == pd.FixedParameters[ii].ModFlags &&
1233 parameters.ExtensionMethodType == pd.ExtensionMethodType) ;
1236 var mc = ce as MethodSpec;
1237 member.Compiler.Report.SymbolRelatedToPreviousError (ce);
1238 if ((member.ModFlags & Modifiers.PARTIAL) != 0 && (mc.Modifiers & Modifiers.PARTIAL) != 0) {
1239 if (parameters.HasParams || pd.HasParams) {
1240 Report.Error (758, member.Location,
1241 "A partial method declaration and partial method implementation cannot differ on use of `params' modifier");
1243 Report.Error (755, member.Location,
1244 "A partial method declaration and partial method implementation must be both an extension method or neither");
1246 } else if (member is Constructor) {
1247 Report.Error (851, member.Location,
1248 "Overloaded contructor `{0}' cannot differ on use of parameter modifiers only",
1249 member.GetSignatureForError ());
1251 Report.Error (663, member.Location,
1252 "Overloaded method `{0}' cannot differ on use of parameter modifiers only",
1253 member.GetSignatureForError ());
1260 if ((ce.Kind & MemberKind.Method) != 0) {
1261 Method method_a = member as Method;
1262 Method method_b = ce.MemberDefinition as Method;
1263 if (method_a != null && method_b != null && (method_a.ModFlags & method_b.ModFlags & Modifiers.PARTIAL) != 0) {
1264 const Modifiers partial_modifiers = Modifiers.STATIC | Modifiers.UNSAFE;
1265 if (method_a.IsPartialDefinition == method_b.IsPartialImplementation) {
1266 if ((method_a.ModFlags & partial_modifiers) == (method_b.ModFlags & partial_modifiers) ||
1267 method_a.Parent.IsUnsafe && method_b.Parent.IsUnsafe) {
1268 if (method_a.IsPartialImplementation) {
1269 method_a.SetPartialDefinition (method_b);
1270 if (entries.Count == 1)
1271 member_hash.Remove (name);
1273 entries.RemoveAt (i);
1275 method_b.SetPartialDefinition (method_a);
1276 method_a.caching_flags |= MemberCore.Flags.PartialDefinitionExists;
1281 if (method_a.IsStatic != method_b.IsStatic) {
1282 Report.SymbolRelatedToPreviousError (ce);
1283 Report.Error (763, member.Location,
1284 "A partial method declaration and partial method implementation must be both `static' or neither");
1287 Report.SymbolRelatedToPreviousError (ce);
1288 Report.Error (764, member.Location,
1289 "A partial method declaration and partial method implementation must be both `unsafe' or neither");
1293 Report.SymbolRelatedToPreviousError (ce);
1294 if (method_a.IsPartialDefinition) {
1295 Report.Error (756, member.Location, "A partial method `{0}' declaration is already defined",
1296 member.GetSignatureForError ());
1299 Report.Error (757, member.Location, "A partial method `{0}' implementation is already defined",
1300 member.GetSignatureForError ());
1304 Report.SymbolRelatedToPreviousError (ce);
1306 bool is_reserved_a = member is AbstractPropertyEventMethod || member is Operator;
1307 bool is_reserved_b = ((MethodSpec) ce).IsReservedMethod;
1309 if (is_reserved_a || is_reserved_b) {
1310 Report.Error (82, member.Location, "A member `{0}' is already reserved",
1312 ce.GetSignatureForError () :
1313 member.GetSignatureForError ());
1317 Report.SymbolRelatedToPreviousError (ce);
1320 if (member is Operator && ce.Kind == MemberKind.Operator) {
1321 Report.Error (557, member.Location, "Duplicate user-defined conversion in type `{0}'",
1322 member.Parent.GetSignatureForError ());
1326 Report.Error (111, member.Location,
1327 "A member `{0}' is already defined. Rename this member or use different parameter types",
1328 member.GetSignatureForError ());