public void WriteCodeToOutput(CodeOutput bodySb, MethodInterpreter interpreter)
{
bodySb.Append("\n");
if (Returning == null)
{
bodySb.Append("return;");
}
else
{
//Need to expand this for more cases
if (Returning is ConstValue)
{
var retType = interpreter.Method.GetReturnType();
if (retType == typeof(string))
{
bodySb.AppendFormat("return {0};", Returning.ComputedValue());
}
else
{
bodySb.AppendFormat("return {0};", Returning.Name);
}
}
else
{
bodySb.AppendFormat("return {0};", Returning.Name);
}
}
}
static void HandleReadArrayItem(LocalOperation operation, CodeOutput bodySb,
MethodInterpreter interpreter, ClosureEntities closureEntities)
{
var valueSrc = (GetArrayElement)operation;
var parentType = valueSrc.Instance.ComputedType();
var variableData = interpreter.AnalyzeProperties.GetVariableData(valueSrc.AssignedTo);
switch (variableData)
{
case EscapingMode.Smart:
bodySb.AppendFormat(
(parentType.GetClrType(closureEntities).IsClass ||
parentType.GetClrType(closureEntities).IsInterface)
? "{0} = (*{1})[{2}];"
: "{0} = {1}[{2}];",
valueSrc.AssignedTo.Name, valueSrc.Instance.Name, valueSrc.Index.Name);
return;
case EscapingMode.Pointer:
bodySb.AppendFormat(
(parentType.GetClrType(closureEntities).IsClass ||
parentType.GetClrType(closureEntities).IsInterface)
? "{0} = ((*{1})[{2}]).get();"
: "{0} = ({1}[{2}]).get();",
valueSrc.AssignedTo.Name, valueSrc.Instance.Name, valueSrc.Index.Name);
return;
}
}
public static string WritePlatformInvokeMethod(this PlatformInvokeMethod platformInvoke,
ClosureEntities crRuntime)
{
var methodId = Import(platformInvoke.LibraryName,
platformInvoke.MethodName,
platformInvoke.CallingConvention,
platformInvoke.EntryPoint);
var codeOutput = new CodeOutput();
codeOutput.AppendFormat(platformInvoke.WritePInvokeDefinition(methodId));
codeOutput.BlankLine();
codeOutput.Append(platformInvoke.Method.WriteHeaderMethod(crRuntime, false));
// write PInvoke implementation
codeOutput.BracketOpen();
var argumentsCall = platformInvoke.Method.GetParameters()
.Select(CallMarshallerFactory.CreateMarshaller)
.Each(marshaller => { codeOutput.Append(marshaller.GetTransformationCode()); })
.Once(marshallers => { codeOutput.BlankLine(); })
.Select(p => p.GetParameterString())
.Join(", ");
if (!platformInvoke.Method.GetReturnType().IsVoid())
{
codeOutput.Append("return ");
}
codeOutput.AppendFormat("{0}({1});", methodId, argumentsCall);
codeOutput.BracketClose();
return(codeOutput.ToString());
}
public static void HandleCallRuntime(LocalOperation operation, CodeOutput sb, ClosureEntities crRuntime)
{
var operationData = (CallMethodStatic)operation;
var methodInfo = operationData.Info;
if (methodInfo.IsConstructor)
{
return; //don't call constructor for now
}
var isVoidMethod = methodInfo.GetReturnType().IsVoid();
if (isVoidMethod)
{
sb.AppendFormat("{0}", methodInfo.ClangMethodSignature(crRuntime));
}
else
{
sb.AppendFormat("{1} = {0}", methodInfo.ClangMethodSignature(crRuntime),
operationData.Result.Name);
}
var identifierValues = operationData.Parameters;
var argumentsCall = string.Join(", ", identifierValues.Select(p => p.Name));
sb.AppendFormat("({0});", argumentsCall);
}
static void WriteStructWithFields(CodeOutput codeOutput, ClosureEntities crRuntime, Type type)
{
if (DelegateManager.IsTypeDelegate(type))
return;
var mappedType = type.GetMappedType(crRuntime);
type = mappedType.GetReversedMappedType(crRuntime);
if (!type.IsValueType && type.BaseType != null)
{
//Not Necessary
// codeOutput.AppendFormat("struct {0} : public {1} {2} {{", type.ToCppMangling(), type.BaseType.ToCppMangling(),type.GetInterfaces().Any()? " ,"+type.GetInterfaces().Select(j=>j.ToCppMangling()).Aggregate((a,b)=>a + " , " + b):"");
codeOutput.AppendFormat(
"struct {0} : public {1}",
type.ToCppMangling(),
type.BaseType.ToCppMangling())
.BracketOpen();
}
else if (!type.IsValueType && type.IsInterface)
{
codeOutput.AppendFormat("struct {0} : public {1}",
type.ToCppMangling(),
typeof(object).ToCppMangling())
.BracketOpen();
}
else
{
codeOutput.AppendFormat("struct {0}", type.ToCppMangling())
.BracketOpen();
}
if (type == typeof(object))
{
codeOutput.Append("int _typeId;\n");
}
//String Support
if (type == typeof(string))
{
crRuntime.AddType(typeof(string));
var usedTypes = crRuntime.MappedTypes.Values.ToList();
var typeTable = new TypeDescriptionTable(usedTypes, crRuntime);
codeOutput.Append("System_String()")
.BracketOpen()
.AppendFormat("_typeId = {0};\n", typeTable.GetTypeId(typeof(string)))
.BracketClose()
.BlankLine();
}
WriteClassFieldsBody(codeOutput, mappedType, crRuntime);
codeOutput.BracketClose(true)
.Append(";\n")
.BlankLine();
var typedesc = UsedTypeList.Set(type, crRuntime);
typedesc.WriteStaticFieldInitialization(codeOutput);
}
static void HandleAdd(BinaryOperator localVar, CodeOutput sb, ClosureEntities closureEntities)
{
string right, left, local;
GetBinaryOperandNames(localVar, out right, out left, out local);
if (localVar.Right.ComputedType().GetClrType(closureEntities) == typeof(IntPtr))
{
sb.AppendFormat("{0} = {1}+(size_t){2};", local, left, right);
return;
}
sb.AppendFormat("{0} = {1}+{2};", local, left, right);
}
static void WriteCppMethods(List <MethodInterpreter> closure, CodeOutput sb, ClosureEntities crRuntime)
{
var cppMethods = closure
.Where(m => m.Kind == MethodKind.RuntimeCppMethod)
.ToArray();
var methodInterpreter = cppMethods.FirstOrDefault();
if (methodInterpreter == null)
{
return;
}
foreach (var interpreter in cppMethods)
{
var cppInterpreter = (CppMethodInterpreter)interpreter;
var runtimeLibrary = cppInterpreter.CppRepresentation;
if (LinkingData.SetInclude(runtimeLibrary.Header))
{
sb.AppendFormat("#include \"{0}\"\n", runtimeLibrary.Header);
}
CppWriteSignature.WriteSignature(sb, interpreter, crRuntime, false);
sb.BracketOpen()
.Append(runtimeLibrary.Source)
.BracketClose();
}
}
static void WriteMainBody(MethodInterpreter interpreter, CodeOutput sb, ClosureEntities crRuntime)
{
sb.Append("System_Void initializeRuntime();\n");
sb.Append("int main(int argc, char**argv)").BracketOpen();
sb.Append("auto argsAsList = System_getArgumentsAsList(argc, argv);\n");
sb.Append("initializeRuntime();\n");
var entryPoint = interpreter.Method as MethodInfo;
if (entryPoint.ReturnType != typeof(void))
{
sb.Append("return ");
}
var parameterInfos = entryPoint.GetParameters();
var args = string.Empty;
if (parameterInfos.Length != 0)
{
args = "argsAsList";
}
sb.AppendFormat("{0}({1});\n", entryPoint.ClangMethodSignature(crRuntime), args);
sb.BlankLine();
sb.Append("return 0;");
sb.BracketClose();
}
public static string LoadDllMethods()
{
var sb = new CodeOutput();
sb.BlankLine()
.Append("System_Void mapLibs()")
.BracketOpen();
var pos = 0;
foreach (var library in LinkingData.Libraries)
{
sb.Append("//---------------------------------------------------------\n")
.AppendFormat("// {0} methods\n", library.DllName)
.Append("//---------------------------------------------------------\n")
.AppendFormat("auto lib_{0} = LoadNativeLibrary(L\"{1}\");\n", pos, library.DllName)
.BlankLine();
foreach (var method in library.Methods.Values)
{
sb.AppendFormat("{0} = ({0}_type)LoadNativeMethod(lib_{2}, \"{1}\");\n", method.FormattedName(),
method.EntryPoint, pos);
}
pos++;
}
return(sb.BracketClose()
.BlankLine()
.ToString());
}
static void HandleSizeOf(LocalOperation operation, CodeOutput bodySb)
{
var assign = (SizeOfAssignment)operation;
var leftData = (IdentifierValue)assign.AssignedTo;
var rightData = assign.Right.ToCppName();
bodySb.AppendFormat("{0} = sizeof({1});", leftData.Name, rightData);
}
static void HandleDerefAssignment(LocalOperation operation, CodeOutput bodySb)
{
var assign = (DerefAssignment)operation;
var leftData = (IdentifierValue)assign.Left;
var rightData = (IdentifierValue)assign.Right;
bodySb.AppendFormat("{0} = *{1};", leftData.Name, rightData.Name);
}
static void HandleNot(UnaryOperator localVar, CodeOutput sb)
{
var local = localVar.AssignedTo.Name;
string left;
GetUnaryOperandNames(localVar, out left);
sb.AppendFormat("{0} = !{1};", local, left);
}
static void HandleSub(BinaryOperator localVar, CodeOutput sb)
{
string right, left, local;
GetBinaryOperandNames(localVar, out right, out left, out local);
sb.AppendFormat("{0} = {1}-{2};", local, left, right);
}
static void HandleLoadArrayRef(BinaryOperator binaryOperator, CodeOutput sb)
{
string right, left, local;
GetBinaryOperandNames(binaryOperator, out right, out left, out local);
sb.AppendFormat("{0}={1}[{2}];", local, right, left);
}
public static void WriteCompareBranch(IdentifierValue localVar, IdentifierValue secondVar, CodeOutput sb,
int jumpAddress,
string comparisonOperator)
{
var local = localVar.Name;
var second = secondVar.Name;
sb.AppendFormat("if({0}{3}{1}) goto label_{2};", local, second, jumpAddress.ToHex(), comparisonOperator);
}
static void HandleLoadFunction(LocalOperation operation, CodeOutput bodySb, ClosureEntities crRuntime)
{
var assign = (FunctionPointerStore)operation;
var leftData = assign.AssignedTo;
var info = assign.FunctionPointer;
var methodName = info.ClangMethodSignature(crRuntime);
bodySb.AppendFormat("{0}=&({1});", leftData.Name, methodName);
}
static void HandleSwitch(LocalOperation operation, CodeOutput bodySb)
{
var assign = (Assignment)operation;
var instructionTable = (int[])((ConstValue)assign.Right).Value;
var instructionLabelIds = instructionTable;
bodySb.AppendFormat("switch({0})", assign.AssignedTo.Name);
bodySb.BracketOpen();
var pos = 0;
foreach (var instructionLabelId in instructionLabelIds)
{
bodySb.AppendFormat("case {0}:", pos++);
bodySb.AppendFormat("\tgoto label_{0};", instructionLabelId.ToHex());
}
bodySb.BracketClose();
}
static void HandleFieldRefAssignment(LocalOperation operation, CodeOutput bodySb)
{
var assign = (FieldRefAssignment)operation;
var leftData = assign.Left;
var rightData = assign.Right;
var fieldName = assign.Field.Name;
bodySb.AppendFormat("{0} = &({1}->{2});", leftData.Name, rightData.Name, fieldName);
}
public void SetIdOfInstance(CodeOutput sb, LocalVariable variable, Type type, bool isStack)
{
int typeId;
if (!_result.TryGetValue(type, out typeId))
{
throw new InvalidDataException(
$"Type id for type: '{type.ToCppMangling()}' is not defined ");
}
if (isStack)
{
sb.AppendFormat("{0}._typeId = {1};", variable.Name, typeId);
}
else
{
sb.AppendFormat("{0}->_typeId = {1};", variable.Name, typeId);
}
}
static void HandleSetStaticField(LocalOperation operation, CodeOutput bodySb)
{
var assign = (Assignment)operation;
var rightData = (StaticFieldSetter)assign.AssignedTo;
bodySb.AppendFormat("{1}::{2} = {0};", assign.Right.Name,
rightData.DeclaringType.ToCppMangling(),
rightData.FieldName.ValidName());
}
static void HandleUnbox(Unboxing unboxing, CodeOutput bodySb, ClosureEntities closureEntities)
{
var typeDescription = unboxing.AssignedTo.ComputedType();
bodySb
.AppendFormat("{0} = unbox_value<{2}>({1});",
unboxing.AssignedTo.Name,
unboxing.Right.Name,
typeDescription.GetClrType(closureEntities).ToDeclaredVariableType(EscapingMode.Stack));
}
static void HandleLoadStaticField(LocalOperation operation, CodeOutput bodySb,
ClosureEntities closureEntities)
{
var assign = (Assignment)operation;
var rightData = (StaticFieldGetter)assign.Right;
bodySb.AppendFormat("{0} = {1}::{2};", assign.AssignedTo.Name,
rightData.DeclaringType.GetClrType(closureEntities).ToCppMangling(),
rightData.FieldName.ValidName());
}
static void HandleCastClass(ClassCasting casting, CodeOutput bodySb, ClosureEntities closureEntities)
{
var typeDescription = casting.AssignedTo.ComputedType();
bodySb
.AppendFormat("{0} = std::static_pointer_cast<{2}>({1});",
casting.AssignedTo.Name,
casting.Value.Name,
typeDescription.GetClrType(closureEntities).ToDeclaredVariableType(EscapingMode.Stack));
}
static void HandleBox(Boxing boxing, CodeOutput bodySb, TypeDescriptionTable typeTable,
ClosureEntities closureEntities)
{
var typeDescription = boxing.Right.ComputedType();
bodySb
.AppendFormat("{0} = box_value<{2}>({1}, {3});",
boxing.AssignedTo.Name,
boxing.Right.Name,
typeDescription.GetClrType(closureEntities).ToDeclaredVariableType(EscapingMode.Stack),
typeTable.GetTypeId(typeDescription.GetClrType(closureEntities)));
}
static void GenerateForwardTypes(Type[] typeDatas, CodeOutput sb, ClosureEntities crRuntime)
{
foreach (var typeData in typeDatas)
{
var mappedType = typeData.GetMappedType(crRuntime);
if (ShouldSkipType(typeData))
continue;
if (!mappedType.IsGenericType)
{
sb.AppendFormat("struct {0};\n", mappedType.ToCppMangling());
}
}
}
static void HandleCopyArrayInitializer(LocalOperation operation, CodeOutput sb)
{
var assignment = (Assignment)operation;
var left = assignment.AssignedTo;
var right = (ConstByteArrayValue)assignment.Right;
var rightArrayData = (ConstByteArrayData)right.Value;
var rightArray = rightArrayData.Data;
sb.AppendFormat("{0} = std::make_shared<Array<System::Byte> >(" +
"{1}, RuntimeHelpers_GetBytes({2}) ); ",
left.Name,
rightArray.Length,
right.Id);
}
static void HandleSetArrayValue(LocalOperation operation, CodeOutput sb,
MethodInterpreter interpreter)
{
var arrayItem = (SetArrayElement)operation;
var variableData = interpreter.AnalyzeProperties.GetVariableData(arrayItem.Instance);
switch (variableData)
{
case EscapingMode.Stack:
sb.AppendFormat("{0}[{1}] = {2}; ",
arrayItem.Instance.Name,
arrayItem.Index.Name,
arrayItem.Right.ComputedValue());
return;
default:
sb.AppendFormat("(*{0})[{1}] = {2}; ",
arrayItem.Instance.Name,
arrayItem.Index.Name,
arrayItem.Right.ComputedValue());
return;
}
}
static void HandleNewObject(LocalOperation operation, CodeOutput bodySb, TypeDescriptionTable typeTable,
MethodInterpreter interpreter, ClosureEntities crRuntime)
{
var value = (NewConstructedObject)operation;
var rightValue = value;
var localValue = rightValue.Info;
var declaringType = localValue.DeclaringType;
var targetType = declaringType.GetMappedType(crRuntime);
var cppName = declaringType.ToDeclaredVariableType(EscapingMode.Stack);
var assignedData = interpreter.AnalyzeProperties.GetVariableData(value.AssignedTo);
var isStack = assignedData == EscapingMode.Stack;
if (isStack)
{
bodySb
.AppendFormat("{1} {0};", value.AssignedTo.Name, cppName);
}
else
{
bodySb.AppendFormat("{0} = std::make_shared<{1}>();", value.AssignedTo.Name, cppName);
}
typeTable.SetIdOfInstance(bodySb, value.AssignedTo, targetType, isStack);
}
static void WriteFieldListToLayout(CodeOutput codeOutput, List <FieldDescription> fields)
{
foreach (var fieldData in fields)
{
if (fieldData.TypeDescription.ContainsGenericParameters)
{
}
var staticString = fieldData.IsStatic ? "static " : "";
codeOutput.AppendFormat("{2}{0} {1};\n",
fieldData.TypeDescription.ClrType.ToCppName(),
fieldData.Name.ValidName(),
staticString
);
}
}
static void HandleNewArray(LocalOperation operation, CodeOutput bodySb, MethodInterpreter interpreter)
{
var assignment = (NewArrayObject)operation;
var arrayData = assignment;
var assignedData = interpreter.AnalyzeProperties.GetVariableData(assignment.AssignedTo);
switch (assignedData)
{
case EscapingMode.Stack:
bodySb.AppendFormat("Array <{1}> {0} ({2}); ",
assignment.AssignedTo.Name,
arrayData.TypeArray.ToCppName(),
arrayData.ArrayLength.Name);
break;
default:
bodySb.AppendFormat("{0} = std::make_shared< Array <{1}> >({2}); ",
assignment.AssignedTo.Name,
arrayData.TypeArray.ToCppName(),
arrayData.ArrayLength.Name);
break;
}
}