public void ConvertFromNullableBoolToBool()
{
using (var temp = DeclareLocal(typeof(bool?)))
{
Il.Stloc(temp);
Il.Ldloca(temp);
EmitValueAccess(typeof(bool?));
}
}
public void EmitLoadDefaultValue(Type type)
{
if (type == typeof(void))
{
return;
}
if (!type.IsValueType)
{
Il.Ldnull();
}
else
{
using (var temp = DeclareLocal(type))
{
Il.Ldloca(temp);
Il.Initobj(type);
Il.Ldloc(temp);
}
}
}
/// <summary>
/// Checks TypeCode and throws Exception if it is invalid
/// </summary>
public void CheckTypeCode()
{
LoadField(Context.Lengths);
Il.Ldloc(TypeCode); // stack: [lengths, typeCode]
Il.Ldelem(typeof(int)); // stack: [lengths[typeCode]]
var okLabel = Il.DefineLabel("ok");
Il.Brtrue(okLabel); // if(lengths[typeCode] != 0) goto ok;
Il.Ldstr("Unknown type code: ");
Il.Ldloca(TypeCode);
Il.Call(HackHelpers.GetMethodDefinition <int>(x => x.ToString()), typeof(int));
Il.Call(HackHelpers.GetMethodDefinition <string>(s => s + "zzz"));
var constructor = typeof(DataCorruptedException).GetConstructor(new[] { typeof(string) });
if (constructor == null)
{
throw new MissingConstructorException(typeof(DataCorruptedException), typeof(string));
}
Il.Newobj(constructor);
Il.Throw();
Il.MarkLabel(okLabel);
}
public void EmitConvert(Type from, Type to, bool check = false)
{
if (from == to)
{
return;
}
if (!from.IsValueType)
{
if (!to.IsValueType)
{
Il.Castclass(to);
}
else
{
if (from != typeof(object) && !(from == typeof(Enum) && to.IsEnum))
{
throw new InvalidCastException("Cannot cast an object of type '" + from + "' to type '" + to + "'");
}
Il.Unbox_Any(to);
}
}
else
{
if (!to.IsValueType)
{
if (to != typeof(object) && !(to == typeof(Enum) && from.IsEnum))
{
throw new InvalidCastException("Cannot cast an object of type '" + from + "' to type '" + to + "'");
}
Il.Box(from);
}
else
{
if (to.IsNullable())
{
var toArgument = to.GetGenericArguments()[0];
if (from.IsNullable())
{
var fromArgument = from.GetGenericArguments()[0];
using (var temp = DeclareLocal(from))
{
Il.Stloc(temp);
Il.Ldloca(temp);
EmitHasValueAccess(from);
var valueIsNullLabel = Il.DefineLabel("valueIsNull");
Il.Brfalse(valueIsNullLabel);
Il.Ldloca(temp);
EmitValueAccess(from);
if (toArgument != fromArgument)
{
EmitConvert(fromArgument, toArgument, check);
}
Il.Newobj(to.GetConstructor(new[] { toArgument }));
var doneLabel = Il.DefineLabel("done");
Il.Br(doneLabel);
MarkLabelAndSurroundWithSP(valueIsNullLabel);
EmitLoadDefaultValue(to);
MarkLabelAndSurroundWithSP(doneLabel);
}
}
else
{
if (toArgument != from)
{
EmitConvert(from, toArgument, check);
}
Il.Newobj(to.GetConstructor(new[] { toArgument }));
}
}
else if (from.IsNullable())
{
var fromArgument = from.GetGenericArguments()[0];
using (var temp = DeclareLocal(from))
{
Il.Stloc(temp);
Il.Ldloca(temp);
var valueIsNullLabel = Il.DefineLabel("valueIsNull");
Il.Brfalse(valueIsNullLabel);
Il.Ldloca(temp);
EmitValueAccess(from);
if (to != fromArgument)
{
EmitConvert(fromArgument, to, check);
}
var doneLabel = Il.DefineLabel("done");
Il.Br(doneLabel);
MarkLabelAndSurroundWithSP(valueIsNullLabel);
EmitLoadDefaultValue(to);
MarkLabelAndSurroundWithSP(doneLabel);
}
}
else if (to.IsEnum || to == typeof(Enum))
{
EmitConvert(from, typeof(int), check);
}
else if (from.IsEnum || from == typeof(Enum))
{
EmitConvert(typeof(int), to, check);
}
else
{
if (!check)
{
EmitConvertValue(Il, from, to);
}
else
{
EmitConvertValueChecked(Il, from, to);
}
}
}
}
}
public void EmitArithmeticOperation(ExpressionType nodeType, Type resultType, Type leftType, Type rightType, MethodInfo method)
{
if (!leftType.IsNullable() && !rightType.IsNullable())
{
if (method != null)
{
Il.Call(method);
}
else
{
if (leftType.IsStruct())
{
throw new InvalidOperationException("Unable to perfrom operation '" + nodeType + "' to a struct of type '" + leftType + "'");
}
if (rightType.IsStruct())
{
throw new InvalidOperationException("Unable to perfrom operation '" + nodeType + "' to a struct of type '" + rightType + "'");
}
EmitOp(Il, nodeType, resultType);
}
}
else
{
using (var localLeft = DeclareLocal(leftType))
using (var localRight = DeclareLocal(rightType))
{
Il.Stloc(localRight);
Il.Stloc(localLeft);
var returnNullLabel = Il.DefineLabel("returnNull");
if (leftType.IsNullable())
{
Il.Ldloca(localLeft);
EmitHasValueAccess(leftType);
Il.Brfalse(returnNullLabel);
}
if (rightType.IsNullable())
{
Il.Ldloca(localRight);
EmitHasValueAccess(rightType);
Il.Brfalse(returnNullLabel);
}
if (!leftType.IsNullable())
{
Il.Ldloc(localLeft);
}
else
{
Il.Ldloca(localLeft);
EmitValueAccess(leftType);
}
if (!rightType.IsNullable())
{
Il.Ldloc(localRight);
}
else
{
Il.Ldloca(localRight);
EmitValueAccess(rightType);
}
Type argumentType = resultType.GetGenericArguments()[0];
if (method != null)
{
Il.Call(method);
}
else
{
EmitOp(Il, nodeType, argumentType);
}
Il.Newobj(resultType.GetConstructor(new[] { argumentType }));
var doneLabel = Il.DefineLabel("done");
Il.Br(doneLabel);
MarkLabelAndSurroundWithSP(returnNullLabel);
EmitLoadDefaultValue(resultType);
MarkLabelAndSurroundWithSP(doneLabel);
}
}
}
public void EmitMemberAccess(Type type, MemberInfo member, ResultType whatReturn, out Type memberType)
{
switch (member.MemberType)
{
case MemberTypes.Property:
var property = (PropertyInfo)member;
var getter = property.GetGetMethod(SkipVisibility);
if (getter == null)
{
throw new MissingMemberException(member.DeclaringType.Name, member.Name + "_get");
}
Il.Call(getter, type);
Type propertyType = property.PropertyType;
switch (whatReturn)
{
case ResultType.ByRefValueTypesOnly:
if (!propertyType.IsValueType)
{
memberType = propertyType;
}
else
{
using (var temp = DeclareLocal(propertyType))
{
Il.Stloc(temp);
Il.Ldloca(temp);
memberType = propertyType.MakeByRefType();
}
}
break;
case ResultType.ByRefAll:
throw new InvalidOperationException("It's wierd to load a property by ref for a reference type");
default:
memberType = propertyType;
break;
}
break;
case MemberTypes.Field:
var field = (FieldInfo)member;
switch (whatReturn)
{
case ResultType.ByRefAll:
Il.Ldflda(field);
memberType = field.FieldType.MakeByRefType();
break;
case ResultType.ByRefValueTypesOnly:
if (field.FieldType.IsValueType)
{
Il.Ldflda(field);
memberType = field.FieldType.MakeByRefType();
}
else
{
Il.Ldfld(field);
memberType = field.FieldType;
}
break;
default:
Il.Ldfld(field);
memberType = field.FieldType;
break;
}
break;
default:
throw new NotSupportedException("Member type '" + member.MemberType + "' is not supported");
}
}
