Esempio n. 1
0
        /// <summary>
        /// Tries to convert a CLR object to a MoonSharp value, using "trivial" logic.
        /// Skips on custom conversions, etc.
        /// Does NOT throw on failure.
        /// </summary>
        internal static DynValue TryObjectToTrivialDynValue(Script script, object obj)
        {
            if (obj == null)
            {
                return(DynValue.Nil);
            }

            if (obj is DynValue)
            {
                return((DynValue)obj);
            }

            Type t = obj.GetType();

            if (obj is bool)
            {
                return(DynValue.NewBoolean((bool)obj));
            }

            if (obj is string || obj is StringBuilder || obj is char)
            {
                return(DynValue.NewString(obj.ToString()));
            }

            if (NumericConversions.NumericTypes.Contains(t))
            {
                return(DynValue.NewNumber(NumericConversions.TypeToDouble(t, obj)));
            }

            if (obj is Table)
            {
                return(DynValue.NewTable((Table)obj));
            }

            return(null);
        }
Esempio n. 2
0
        /// <summary>
        /// Tries to convert a CLR object to a MoonSharp value, using "simple" logic.
        /// Does NOT throw on failure.
        /// </summary>
        internal static DynValue TryObjectToSimpleDynValue(Script script, object obj)
        {
            if (obj == null)
            {
                return(DynValue.Nil);
            }

            if (obj is DynValue)
            {
                return((DynValue)obj);
            }


            var converter = Script.GlobalOptions.CustomConverters.GetClrToScriptCustomConversion(obj.GetType());

            if (converter != null)
            {
                var v = converter(script, obj);
                if (v != null)
                {
                    return(v);
                }
            }

            Type t = obj.GetType();

            if (obj is bool)
            {
                return(DynValue.NewBoolean((bool)obj));
            }

            if (obj is string || obj is StringBuilder || obj is char)
            {
                return(DynValue.NewString(obj.ToString()));
            }

            if (obj is Closure)
            {
                return(DynValue.NewClosure((Closure)obj));
            }

            if (NumericConversions.NumericTypes.Contains(t))
            {
                return(DynValue.NewNumber(NumericConversions.TypeToDouble(t, obj)));
            }

            if (obj is Table)
            {
                return(DynValue.NewTable((Table)obj));
            }

            if (obj is CallbackFunction)
            {
                return(DynValue.NewCallback((CallbackFunction)obj));
            }

            if (obj is Delegate)
            {
                Delegate d = (Delegate)obj;


#if NETFX_CORE
                MethodInfo mi = d.GetMethodInfo();
#else
                MethodInfo mi = d.Method;
#endif

                if (CallbackFunction.CheckCallbackSignature(mi, false))
                {
                    return(DynValue.NewCallback((Func <ScriptExecutionContext, CallbackArguments, DynValue>)d));
                }
            }

            return(null);
        }
Esempio n. 3
0
        /// <summary>
        /// Tries to convert a CLR object to a MoonSharp value, using more in-depth analysis
        /// </summary>
        internal static DynValue ObjectToDynValue(Script script, object obj)
        {
            DynValue v = TryObjectToSimpleDynValue(script, obj);

            if (v != null)
            {
                return(v);
            }

            v = UserData.Create(obj);
            if (v != null)
            {
                return(v);
            }

            if (obj is Type)
            {
                v = UserData.CreateStatic(obj as Type);
            }

            // unregistered enums go as integers
            if (obj is Enum)
            {
                return(DynValue.NewNumber(NumericConversions.TypeToDouble(Enum.GetUnderlyingType(obj.GetType()), obj)));
            }

            if (v != null)
            {
                return(v);
            }

            if (obj is Delegate)
            {
                return(DynValue.NewCallback(CallbackFunction.FromDelegate(script, (Delegate)obj)));
            }

            if (obj is MethodInfo)
            {
                MethodInfo mi = (MethodInfo)obj;

                if (mi.IsStatic)
                {
                    return(DynValue.NewCallback(CallbackFunction.FromMethodInfo(script, mi)));
                }
            }

            if (obj is System.Collections.IList)
            {
                Table t = TableConversions.ConvertIListToTable(script, (System.Collections.IList)obj);
                return(DynValue.NewTable(t));
            }

            if (obj is System.Collections.IDictionary)
            {
                Table t = TableConversions.ConvertIDictionaryToTable(script, (System.Collections.IDictionary)obj);
                return(DynValue.NewTable(t));
            }

            var enumerator = EnumerationToDynValue(script, obj);

            if (enumerator != null)
            {
                return(enumerator);
            }


            throw ScriptRuntimeException.ConvertObjectFailed(obj);
        }