New tests.
[mono.git] / mcs / class / corlib / System.Reflection / Binder.cs
index dcf3c703f1de15fe5759b574561fbf6f482967d5..615db74d7936d59b98fa795831711593b1e045b1 100644 (file)
@@ -36,9 +36,7 @@ using System.Runtime.InteropServices;
 
 namespace System.Reflection
 {
-#if NET_2_0
        [ComVisible (true)]
-#endif
        [Serializable]
        [ClassInterface(ClassInterfaceType.AutoDual)]
        public abstract class Binder
@@ -100,9 +98,33 @@ namespace System.Reflection
 
                        for (int current = 0; current < count; current++) 
                        {
-                               int level = GetDerivedLevel (match[current].DeclaringType);
+                               MethodBase m = match [current];
+                               int level = GetDerivedLevel (m.DeclaringType);
                                if (level == highLevel)
                                        throw new AmbiguousMatchException ();
+                               // If the argument types differ we
+                               // have an ambigous match, as well
+                               if (matchId >= 0) {
+                                       ParameterInfo[] p1 = m.GetParameters ();
+                                       ParameterInfo[] p2 = match [matchId].GetParameters ();
+                                       bool equal = true;
+
+                                       if (p1.Length != p2.Length)
+                                               equal = false;
+                                       else {
+                                               int i;
+
+                                               for (i = 0; i < p1.Length; ++i) {
+                                                       if (p1 [i].ParameterType != p2 [i].ParameterType) {
+                                                               equal = false;
+                                                               break;
+                                                       }
+                                               }
+                                       }
+
+                                       if (!equal)
+                                               throw new AmbiguousMatchException ();
+                               }
 
                                if (level > highLevel) 
                                {
@@ -141,13 +163,45 @@ namespace System.Reflection
                                                        types [i] = args [i].GetType ();
                                        }
                                }
-                               MethodBase selected = SelectMethod (bindingAttr, match, types, modifiers);
+                               MethodBase selected = SelectMethod (bindingAttr, match, types, modifiers, true);
                                state = null;
                                if (names != null)
                                        ReorderParameters (names, ref args, selected);
+
+                               if (selected != null) {
+                                       if (args == null)
+                                               args = new object [0];
+       
+                                       AdjustArguments (selected, ref args);
+                               }
+
                                return selected;
                        }
 
+                       // probably belongs in ReorderArgumentArray
+                       static void AdjustArguments (MethodBase selected, ref object [] args)
+                       {
+                               var parameters = selected.GetParameters ();
+                               if (parameters.Length == 0)
+                                       return;
+
+                               var last_parameter = parameters [parameters.Length - 1];
+                               if (!Attribute.IsDefined (last_parameter, typeof (ParamArrayAttribute)))
+                                       return;
+
+                               var adjusted = new object [parameters.Length];
+                               Array.Copy (args, adjusted, parameters.Length - 1);
+
+                               var param_args_count = args.Length + 1 - parameters.Length;
+                               var params_args = Array.CreateInstance (last_parameter.ParameterType.GetElementType (), param_args_count);
+
+                               for (int i = 0; i < param_args_count; i++)
+                                       params_args.SetValue (args [args.Length - param_args_count + i], i);
+
+                               adjusted [adjusted.Length - 1] = params_args;
+                               args = adjusted;
+                       }
+
                        void ReorderParameters (string [] names, ref object [] args, MethodBase selected)
                        {
                                object [] newArgs = new object [args.Length];
@@ -188,8 +242,20 @@ namespace System.Reflection
                                                return value;
                                }
 
-                               if (check_type (vtype, type))
+                               if (check_type (vtype, type)) {
+                                       // These are not supported by Convert
+                                       if (type.IsEnum)
+                                               return Enum.ToObject (type, value);
+                                       if (vtype == typeof (Char)) {
+                                               if (type == typeof (double))
+                                                       return (double)(char)value;
+                                               if (type == typeof (float))
+                                                       return (float)(char)value;
+                                       }
+                                       if (vtype == typeof (IntPtr) && type.IsPointer)
+                                               return value;
                                        return Convert.ChangeType (value, type);
+                               }
                                return null;
                        }
 
@@ -207,15 +273,24 @@ namespace System.Reflection
                                if (from == null)
                                        return true;
 
-                               TypeCode fromt = Type.GetTypeCode (from);
-                               TypeCode tot = Type.GetTypeCode (to);
-
                                if (to.IsByRef != from.IsByRef)
                                        return false;
 
                                if (to.IsInterface)
                                        return to.IsAssignableFrom (from);
 
+                               if (to.IsEnum) {
+                                       to = Enum.GetUnderlyingType (to);
+                                       if (from == to)
+                                               return true;
+                               }
+
+                               if (to.IsGenericType && to.GetGenericTypeDefinition () == typeof (Nullable<>) && to.GetGenericArguments ()[0] == from)
+                                       return true;
+
+                               TypeCode fromt = Type.GetTypeCode (from);
+                               TypeCode tot = Type.GetTypeCode (to);
+
                                switch (fromt) {
                                case TypeCode.Char:
                                        switch (tot) {
@@ -304,20 +379,34 @@ namespace System.Reflection
                                        /* TODO: handle valuetype -> byref */
                                        if (to == typeof (object) && from.IsValueType)
                                                return true;
+                                       if (to.IsPointer && from == typeof (IntPtr))
+                                               return true;
 
                                        return to.IsAssignableFrom (from);
                                }
                        }
 
-                       private static bool check_arguments (Type[] types, ParameterInfo[] args) {
+                       private static bool check_arguments (Type[] types, ParameterInfo[] args, bool allowByRefMatch) {
                                for (int i = 0; i < types.Length; ++i) {
-                                       if (!check_type (types [i], args [i].ParameterType))
+                                       bool match = check_type (types [i], args [i].ParameterType);
+                                       if (!match && allowByRefMatch) {
+                                               Type param_type = args [i].ParameterType;
+                                               if (param_type.IsByRef)
+                                                       match = check_type (types [i], param_type.GetElementType ());
+                                       }
+                                       if (!match)
                                                return false;
                                }
                                return true;
                        }
 
-                       public override MethodBase SelectMethod (BindingFlags bindingAttr, MethodBase[] match, Type[] types, ParameterModifier[] modifiers)
+                       public override MethodBase SelectMethod (BindingFlags bindingAttr, MethodBase [] match, Type [] types, ParameterModifier [] modifiers)
+                       {
+                               return SelectMethod (bindingAttr, match, types, modifiers,
+                                       false);
+                       }
+
+                       MethodBase SelectMethod (BindingFlags bindingAttr, MethodBase[] match, Type[] types, ParameterModifier[] modifiers, bool allowByRefMatch)
                        {
                                MethodBase m;
                                int i, j;
@@ -326,6 +415,7 @@ namespace System.Reflection
                                        throw new ArgumentNullException ("match");
 
                                /* first look for an exact match... */
+                               MethodBase exact_match = null;
                                for (i = 0; i < match.Length; ++i) {
                                        m = match [i];
                                        ParameterInfo[] args = m.GetParameters ();
@@ -335,6 +425,38 @@ namespace System.Reflection
                                                if (types [j] != args [j].ParameterType)
                                                        break;
                                        }
+                                       if (j == types.Length) {
+                                               if (exact_match != null) {
+                                                       exact_match = null;
+                                                       break;
+                                               } else {
+                                                       exact_match = m;
+                                               }
+                                       }
+                               }
+                               if (exact_match != null)
+                                       return exact_match;
+
+                               /* Try methods with ParamArray attribute */
+                               bool isdefParamArray = false;
+                               Type elementType = null;
+                               for (i = 0; i < match.Length; ++i) {
+                                       m = match [i];
+                                       ParameterInfo[] args = m.GetParameters ();
+                                       if (args.Length > types.Length + 1)
+                                               continue;
+                                       else if (args.Length == 0)
+                                               continue;
+                                       isdefParamArray = Attribute.IsDefined (args [args.Length - 1], typeof (ParamArrayAttribute));
+                                       if (!isdefParamArray)
+                                               continue;
+                                       elementType = args [args.Length - 1].ParameterType.GetElementType ();
+                                       for (j = 0; j < types.Length; ++j) {
+                                               if (j < (args.Length - 1) && types [j] != args [j].ParameterType)
+                                                       break;
+                                               else if (j >= (args.Length - 1) && types [j] != elementType) 
+                                                       break;
+                                       }
                                        if (j == types.Length)
                                                return m;
                                }
@@ -348,7 +470,7 @@ namespace System.Reflection
                                        ParameterInfo[] args = m.GetParameters ();
                                        if (args.Length != types.Length)
                                                continue;
-                                       if (!check_arguments (types, args))
+                                       if (!check_arguments (types, args, allowByRefMatch))
                                                continue;
 
                                        if (result != null)
@@ -362,15 +484,6 @@ namespace System.Reflection
 
                        MethodBase GetBetterMethod (MethodBase m1, MethodBase m2, Type [] types)
                        {
-#if NET_2_0
-                               if (m1.IsGenericMethodDefinition && 
-                                   !m2.IsGenericMethodDefinition)
-                                       return m2;
-                               if (m2.IsGenericMethodDefinition && 
-                                   !m1.IsGenericMethodDefinition)
-                                       return m1;
-#endif
-
                                ParameterInfo [] pl1 = m1.GetParameters ();
                                ParameterInfo [] pl2 = m2.GetParameters ();
                                int prev = 0;
@@ -384,8 +497,17 @@ namespace System.Reflection
                                if (prev != 0)
                                        return prev > 0 ? m2 : m1;
 
+                               Type dt1 = m1.DeclaringType;
+                               Type dt2 = m2.DeclaringType;
+                               if (dt1 != dt2) {
+                                       if (dt1.IsSubclassOf(dt2))
+                                               return m1;
+                                       if (dt2.IsSubclassOf(dt1))
+                                               return m2;
+                               }
+
                                bool va1 = (m1.CallingConvention & CallingConventions.VarArgs) != 0;
-                               bool va2 = (m1.CallingConvention & CallingConventions.VarArgs) != 0;
+                               bool va2 = (m2.CallingConvention & CallingConventions.VarArgs) != 0;
                                if (va1 && !va2)
                                        return m2;
                                if (va2 && !va1)
@@ -398,12 +520,10 @@ namespace System.Reflection
                        {
                                if (t1 == t2)
                                        return 0;
-#if NET_2_0
                                if (t1.IsGenericParameter && !t2.IsGenericParameter)
                                        return 1; // t2
                                if (!t1.IsGenericParameter && t2.IsGenericParameter)
                                        return -1; // t1
-#endif
                                if (t1.HasElementType && t2.HasElementType)
                                        return CompareCloserType (
                                                t1.GetElementType (),
@@ -442,7 +562,7 @@ namespace System.Reflection
                                        if (idxlen >= 0 && idxlen != args.Length)
                                                continue;
 
-                                       if (haveRet && !check_type (p.PropertyType, returnType))
+                                       if (haveRet && p.PropertyType != returnType)
                                                continue;
 
                                        int score = Int32.MaxValue - 1;