Implement more of PclExport.NetStandard

Author: mythz

src/ServiceStack.Text/PclExport.NetStandard.cs

@@ -6,18 +6,17 @@
 using System.Collections.Generic;
 using System.IO;
 using System.Linq;
-using System.Reflection;
 using ServiceStack.Text;
 using ServiceStack.Text.Common;
 using ServiceStack.Text.Json;
 using System.Globalization;
+using System.Reflection;
 using System.Reflection.Emit;
 
 #if NETSTANDARD1_3
 using System.Collections.Specialized;
 using System.Net;
 using System.Linq.Expressions;
-using System.Runtime.Serialization;
 #endif
 
 namespace ServiceStack
@@ -439,16 +438,6 @@ private static StringCollection ParseStringCollection<TSerializer>(string value)
             return result;
         }
 #endif
-
-        public override Type UseType(Type type)
-        {
-            if (type.IsInterface() || type.IsAbstract())
-            {
-                return DynamicProxy.GetInstanceFor(type).GetType();
-            }
-            return type;
-        }
-
         public override ParseStringDelegate GetJsReaderParseMethod<TSerializer>(Type type)
         {
             if (type.AssignableFrom(typeof(System.Dynamic.IDynamicMetaObjectProvider)) ||
@@ -495,6 +484,87 @@ public override string GetStackTrace()
         }
 #endif
 
+        public override SetPropertyDelegate GetSetPropertyMethod(PropertyInfo propertyInfo)
+        {
+            return CreateIlPropertySetter(propertyInfo);
+        }
+
+        public override SetPropertyDelegate GetSetFieldMethod(FieldInfo fieldInfo)
+        {
+            return CreateIlFieldSetter(fieldInfo);
+        }
+
+        public override SetPropertyDelegate GetSetMethod(PropertyInfo propertyInfo, FieldInfo fieldInfo)
+        {
+            return propertyInfo.CanWrite
+                ? CreateIlPropertySetter(propertyInfo)
+                : CreateIlFieldSetter(fieldInfo);
+        }
+
+        public override Type UseType(Type type)
+        {
+            if (type.IsInterface() || type.IsAbstract())
+            {
+                return DynamicProxy.GetInstanceFor(type).GetType();
+            }
+            return type;
+        }
+
+        public static SetPropertyDelegate CreateIlPropertySetter(PropertyInfo propertyInfo)
+        {
+            var propSetMethod = propertyInfo.SetMethod;
+            if (propSetMethod == null)
+                return null;
+
+            var setter = CreateDynamicSetMethod(propertyInfo);
+
+            var generator = setter.GetILGenerator();
+            generator.Emit(OpCodes.Ldarg_0);
+            generator.Emit(OpCodes.Castclass, propertyInfo.DeclaringType);
+            generator.Emit(OpCodes.Ldarg_1);
+
+            generator.Emit(propertyInfo.PropertyType.IsClass()
+                               ? OpCodes.Castclass
+                               : OpCodes.Unbox_Any,
+                           propertyInfo.PropertyType);
+
+            generator.EmitCall(OpCodes.Callvirt, propSetMethod, (Type[])null);
+            generator.Emit(OpCodes.Ret);
+
+            return (SetPropertyDelegate)setter.CreateDelegate(typeof(SetPropertyDelegate));
+        }
+
+        public static SetPropertyDelegate CreateIlFieldSetter(FieldInfo fieldInfo)
+        {
+            var setter = CreateDynamicSetMethod(fieldInfo);
+
+            var generator = setter.GetILGenerator();
+            generator.Emit(OpCodes.Ldarg_0);
+            generator.Emit(OpCodes.Castclass, fieldInfo.DeclaringType);
+            generator.Emit(OpCodes.Ldarg_1);
+
+            generator.Emit(fieldInfo.FieldType.IsClass()
+                               ? OpCodes.Castclass
+                               : OpCodes.Unbox_Any,
+                           fieldInfo.FieldType);
+
+            generator.Emit(OpCodes.Stfld, fieldInfo);
+            generator.Emit(OpCodes.Ret);
+
+            return (SetPropertyDelegate)setter.CreateDelegate(typeof(SetPropertyDelegate));
+        }
+
+        private static DynamicMethod CreateDynamicSetMethod(MemberInfo memberInfo)
+        {
+            var args = new[] { typeof(object), typeof(object) };
+            var name = string.Format("_{0}{1}_", "Set", memberInfo.Name);
+            var returnType = typeof(void);
+
+            return !memberInfo.DeclaringType.IsInterface()
+                       ? new DynamicMethod(name, returnType, args, memberInfo.DeclaringType, true)
+                       : new DynamicMethod(name, returnType, args, memberInfo.Module, true);
+        }
+
         public static void InitForAot()
         {
         }

src/ServiceStack.Text/project.json

@@ -29,6 +29,8 @@
         "System.Dynamic.Runtime": "4.0.11",
         "Microsoft.CSharp": "4.0.1-*",
         "System.Reflection.Emit": "4.0.1",
+        "System.Reflection.Emit.LightWeight" : "4.0.1",
+        "System.Reflection.Extensions": "4.0.1",
         "System.Linq.Expressions": "4.1.0"
       }
     },
@@ -44,10 +46,16 @@
         "System.Net.Requests": "4.0.11",
         "System.Dynamic.Runtime": "4.0.11",
         "Microsoft.CSharp": "4.0.1-*",
+        "System.Linq.Expressions": "4.1.0",
+        "System.Collections": "4.0.11",
+        "System.Collections.Concurrent": "4.0.12",
+        "System.Collections.NonGeneric": "4.0.1",
+        "System.Collections.Specialized": "4.0.1",
+        "System.Reflection": "4.1.0",
         "System.Reflection.Emit": "4.0.1",
+        "System.Reflection.Emit.Lightweight": "4.0.1",
         "System.Reflection.Extensions": "4.0.1",
-        "System.Linq.Expressions": "4.1.0",
-        "System.Collections.Specialized": "4.0.1"
+        "System.Reflection.TypeExtensions": "4.1.0"
       }
     },
     ".NETPortable,Version=v4.5,Profile=Profile7": {