public override object[] Call(params object[] args)
        {
            Types types = new Types();

            if (args != null)
            {
                for (int i = 0; i < args.Length; ++i)
                {
                    var type = args[i].UnwrapDynamic() as Type;
                    if (type == null)
                    {
                        return(null);
                    }
                    types.Add(type);
                }
            }
            var core = _Core.BindTypes(types);

            if (core != null)
            {
                var rv = ObjectPool.GetReturnValueFromPool(1);
                rv[0] = ClrCallable.GetFromPool(core, Target);
                return(rv);
            }
            return(null);
        }
Exemplo n.º 2
0
        public override object[] Call(params object[] args)
        {
            Types types = new Types();

            if (args != null)
            {
                for (int i = 0; i < args.Length; ++i)
                {
                    types.Add(args[i].UnwrapDynamic() as Type);
                    if (types[i] == null)
                    {
                        return(null);
                    }
                }
            }
            UniqueCallableCore ucore = _Core.FindAppropriate(types);

            if (ucore == null)
            {
                if (GLog.IsLogInfoEnabled)
                {
                    GLog.LogInfo("Cann't find method with appropriate params.");
                }
                return(null);
            }
            else
            {
                var rv = ObjectPool.GetReturnValueFromPool(1);
                rv[0] = ClrCallable.GetFromPool(ucore, Target);
                return(rv);
            }
        }
        public override object[] Call(object target, params object[] args)
        {
            if (args == null || args.Length <= 0)
            {
                if (GLog.IsLogInfoEnabled)
                {
                    GLog.LogInfo("Unable to determine types of the generic method from the calling args - empty args.");
                }
            }
            else
            {
                if (args.Length == _GenericParams.Count)
                {
                    Types types    = new Types();
                    bool  allTypes = true;
                    foreach (var arg in args)
                    {
                        if (!(arg is Type))
                        {
                            allTypes = false;
                            break;
                        }
                    }
                    if (allTypes)
                    {
                        for (int i = 0; i < args.Length; ++i)
                        {
                            types.Add(args[i] as Type);
                        }
                        ICallableCore core = BindTypes(types);
                        if (core != null)
                        {
                            var rv = ObjectPool.GetReturnValueFromPool(1);
                            rv[0] = ClrCallable.GetFromPool(core, target);
                            return(rv);
                        }
                    }
                }

                // try to determine generic type params.
                var cored = this.DetermineGenericTypeArg(args);
                if (cored != null)
                {
                    return(cored.Call(target, args));
                }
                else
                {
                    if (GLog.IsLogInfoEnabled)
                    {
                        GLog.LogInfo("Unable to determine types of the generic method from the calling args.");
                    }
                }
            }
            return(null);
        }
Exemplo n.º 4
0
 public override object[] Call(params object[] args)
 {
     if (BindingCore != null)
     {
         var callable = ClrCallable.GetFromPool(BindingCore, null);
         var rv       = callable.Call(args);
         callable.ReturnToPool();
         return(rv);
     }
     return(null);
 }
Exemplo n.º 5
0
 public override object[] Call(params object[] args)
 {
     if (args != null && args.Length > 0)
     {
         var target = args[0].UnwrapDynamic();
         var rv     = ObjectPool.GetReturnValueFromPool(1);
         rv[0] = ClrCallable.GetFromPool(_Core, target);
         return(rv);
     }
     return(null);
 }
Exemplo n.º 6
0
        public static ClrCallable WrapDelegate(this Delegate del)
        {
            if (del != null)
            {
#if NETFX_CORE
                var core = new UniqueCallableCore(del.GetType().GetMethod("Invoke"));
                var rv   = ClrCallable.GetFromPool(core, del);
#else
                var core = new UniqueCallableCore(del.GetDelegateMethod());
                var rv   = ClrCallable.GetFromPool(core, del.Target);
#endif
                rv.Binding = del;
                return(rv);
            }
            return(null);
        }
        public object[] Call(object target, params object[] args)
        {
            if (_GenericCore != null && args != null)
            {
                Types types    = new Types();
                bool  allTypes = true;
                foreach (var arg in args)
                {
                    if (!(arg is Type))
                    {
                        allTypes = false;
                        break;
                    }
                }
                if (allTypes)
                {
                    for (int i = 0; i < args.Length; ++i)
                    {
                        types.Add(args[i] as Type);
                    }
                    ICallableCore core = BindTypes(types);
                    if (core != null)
                    {
                        var rv = ObjectPool.GetReturnValueFromPool(1);
                        rv[0] = ClrCallable.GetFromPool(core, target);
                        return(rv);
                    }
                }
            }

            if (_NormalCore != null)
            {
                var rv = _NormalCore.Call(target, args);
                if (rv != null)
                {
                    return(rv);
                }
            }
            if (_GenericCore != null)
            {
                return(_GenericCore.Call(target, args));
            }
            return(null);
        }
Exemplo n.º 8
0
        public override object[] Call(params object[] args)
        {
            Types types = new Types();

            if (args != null)
            {
                for (int i = 0; i < args.Length; ++i)
                {
                    types.Add(args[i].UnwrapDynamic() as Type);
                }
            }
            if (types.Equals(_Core._MethodParamTypes))
            {
                var rv = ObjectPool.GetReturnValueFromPool(1);
                rv[0] = ClrCallable.GetFromPool(_Core, Target);
                return(rv);
            }
            return(null);
        }
Exemplo n.º 9
0
 protected internal override object GetFieldImp(object key)
 {
     if (BindingCore != null)
     {
         string strkey = key.UnwrapDynamic <string>();
         if ("___ol" == strkey)
         {
             return(BindingCore.CreateOverloadSelector(null));
         }
         else if ("___ctor" == strkey)
         {
             return(ClrCallable.GetFromPool(BindingCore, null));
         }
         var rv = BindingCore.GetFieldFor(null, key);
         if (rv != null)
         {
             return(rv);
         }
     }
     return(TypeObjectWrapper.GetFieldImp(key));
 }
        public override object[] Call(params object[] args)
        {
            Types types    = new Types();
            bool  allTypes = true;

            if (args != null)
            {
                for (int i = 0; i < args.Length; ++i)
                {
                    var type = args[i].UnwrapDynamic() as Type;
                    if (type == null)
                    {
                        allTypes = false;
                        break;
                    }
                    types.Add(type);
                }
            }
            if (allTypes)
            {
                var core = _Core.BindTypes(types);
                if (core != null)
                {
                    var rv = ObjectPool.GetReturnValueFromPool(1);
                    rv[0] = ClrCallable.GetFromPool(core, Target);
                    return(rv);
                }
            }
            if (_Core._NormalCore != null)
            {
                return(_Core._NormalCore.CreateOverloadSelector(Target).Call(args));
            }
            else
            {
                return(null);
            }
        }
Exemplo n.º 11
0
        public bool SetFieldFor(object tar, object key, object val)
        {
            if (_BindingType == null)
            {
                return(false);
            }
            tar = tar.UnwrapDynamic();
            key = key.UnwrapDynamic();
            var rval = val.UnwrapDynamic();

            var fields = _ExpandedFields;

            if (tar == null)
            {
                fields = _StaticFields;
            }
            object finfo = null;

            if (key is string)
            {
                finfo = GetFieldDescFor(tar, key as string);
                if (finfo is PropertyInfo)
                {
                    var pmethod = ((PropertyInfo)finfo).GetSetMethod();
                    if (pmethod != null)
                    {
                        try
                        {
                            Type type = ((PropertyInfo)finfo).PropertyType;
                            if (type.IsSubclassOf(typeof(Delegate)) && rval is BaseDynamic)
                            {
                                rval = Capstones.LuaWrap.CapsLuaDelegateGenerator.CreateDelegate(type, rval as BaseDynamic);
                            }
                            if (rval.CanConvertRawObj(type))
                            {
                                //((PropertyInfo)finfo).SetValue(tar, rval.ConvertType(type), null);
                                var args = ObjectPool.GetParamsFromPool(1);
                                args[0] = rval.ConvertType(type);
                                pmethod.Invoke(tar, args);
                                ObjectPool.ReturnParamsToPool(args);
                                return(true);
                            }
                        }
                        catch (Exception e)
                        {
                            // TODO: the debug info will decrease the performance. we should develop a generic lua-call-clr log.
                            // perhaps we should make a Call and a TryCall. perhaps we should show which lua-state is doing the log. perhaps we should show lua-stack
                            if (GLog.IsLogInfoEnabled)
                            {
                                GLog.LogInfo("Unable to set property: " + key + '\n' + e.ToString());
                            }
                            throw;
                        }
                    }
                    else
                    {
                        return(true);
                    }
                }
                else if (finfo is FieldInfo)
                {
                    Type type = ((FieldInfo)finfo).FieldType;
                    if (type.IsSubclassOf(typeof(Delegate)) && rval is BaseDynamic)
                    {
                        rval = Capstones.LuaWrap.CapsLuaDelegateGenerator.CreateDelegate(type, rval as BaseDynamic);
                    }
                    if (rval.CanConvertRawObj(type))
                    {
                        try
                        {
                            ((FieldInfo)finfo).SetValue(tar, rval.ConvertType(type));
                            return(true);
                        }
                        catch
                        {
                            if (GLog.IsLogInfoEnabled)
                            {
                                GLog.LogInfo("Unable to set field: " + key);
                            }
                            throw;
                        }
                    }
                    return(true);
                }
                //else if (finfo is ICallableCore)
                //{
                //    // can't set a method;
                //    return true;
                //}
                else if (finfo is EventInfo)
                {
                    // we should only use +/- on EventInfo
                    return(true);
                }
            }
            if (finfo == null)
            {
                object indexmethod = null;
                if (fields.TryGetValue("set_Item", out indexmethod))
                {
                    if (indexmethod is ICallableCore)
                    {
                        var callable = ClrCallable.GetFromPool((ICallableCore)indexmethod, tar);
                        var rv       = callable.Call(key, rval);
                        callable.ReturnToPool();
                        if (rv != null)
                        {
                            return(true);
                        }
                        return(false);
                    }
                }
                else if (tar is IList)
                { // special treat to array.
                    var ikey = key.ConvertType(typeof(int));
                    if (ikey != null)
                    {
                        try
                        {
                            var cval = rval;
                            if (tar.GetType().HasElementType)
                            {
                                cval = rval.ConvertType(tar.GetType().GetElementType());
                            }

                            ((IList)tar)[(int)ikey] = cval;
                            return(true);
                        }
                        catch { }
                    }
                }
            }
            return(false);
        }
Exemplo n.º 12
0
        public object GetFieldFor(object tar, object key)
        {
            if (_BindingType == null)
            {
                return(null);
            }
            tar = tar.UnwrapDynamic();
            key = key.UnwrapDynamic();

            var fields = _ExpandedFields;

            if (tar == null)
            {
                fields = _StaticFields;
            }
            object finfo = null;

            if (key is string)
            {
                finfo = GetFieldDescFor(tar, key as string);
                if (finfo is PropertyInfo)
                {
                    var pmethod = ((PropertyInfo)finfo).GetGetMethod();
                    if (pmethod != null)
                    {
                        try
                        {
                            //return ((PropertyInfo)finfo).GetValue(tar, null).WrapDynamic();
                            var args = ObjectPool.GetParamsFromPool(0);
                            var rv   = pmethod.Invoke(tar, args);
                            ObjectPool.ReturnParamsToPool(args);
                            return(rv);
                        }
                        catch
                        {
                            if (GLog.IsLogErrorEnabled)
                            {
                                GLog.LogError("Unable to get property: " + key);
                            }
                            throw;
                        }
                    }
                    else
                    {
                        return(null);
                    }
                }
                else if (finfo is FieldInfo)
                {
                    return(((FieldInfo)finfo).GetValue(tar));
                }
                else if (finfo is ICallableCore)
                {
                    var core     = finfo as ICallableCore;
                    var callable = ClrCallable.GetFromPool(core, tar);
                    return(callable);
                }
                else if (finfo is EventInfo)
                {
                    return(ClrEventWrapper.GetFromPool(finfo as EventInfo, tar));
                }
            }
            if (finfo == null)
            {
                object indexmethod = null;
                if (fields.TryGetValue("get_Item", out indexmethod))
                {
                    if (indexmethod is ICallableCore)
                    {
                        var callable = ClrCallable.GetFromPool((ICallableCore)indexmethod, tar);
                        var rv       = callable.Call(key);
                        callable.ReturnToPool();
                        if (rv != null && rv.Length > 0)
                        {
                            return(rv[0]);
                        }
                    }
                }
                else if (tar is IList)
                { // special treat to array.
                    var ikey = key.ConvertType(typeof(int));
                    if (ikey != null)
                    {
                        try
                        {
                            var rv = ((IList)tar)[(int)ikey];
                            return(rv);
                        }
                        catch { }
                    }
                }
            }
            return(finfo);
        }