Cosmos/source/Indy.IL2CPU.IL.X86/X86MethodFooterOp.cs
2007-11-18 14:53:26 +00:00

100 lines
No EOL
3.9 KiB
C#

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Indy.IL2CPU.Assembler;
using Mono.Cecil;
using CPU = Indy.IL2CPU.Assembler.X86;
using Instruction = Mono.Cecil.Cil.Instruction;
namespace Indy.IL2CPU.IL.X86 {
public class X86MethodFooterOp: MethodFooterOp {
public readonly int TotalArgsSize = 0;
public readonly int ReturnSize = 0;
public readonly MethodInformation.Variable[] Locals;
public readonly MethodInformation.Argument[] Args;
public X86MethodFooterOp(Instruction aInstruction, MethodInformation aMethodInfo)
: base(aInstruction, aMethodInfo) {
if (aMethodInfo != null) {
// if (aMethodInfo.Locals.Length > 0) {
// TotalLocalsSize += aMethodInfo.Locals[aMethodInfo.Locals.Length - 1].Offset + aMethodInfo.Locals[aMethodInfo.Locals.Length - 1].Size;
// }
Locals = aMethodInfo.Locals.ToArray();
Args = aMethodInfo.Arguments.ToArray();
ReturnSize = aMethodInfo.ReturnSize;
}
}
public override void DoAssemble() {
AssembleFooter(ReturnSize, Assembler, Locals, Args, (from item in Args
select item.Size).Sum());
}
public static void AssembleFooter(int aReturnSize, Assembler.Assembler aAssembler, MethodInformation.Variable[] aLocals, MethodInformation.Argument[] aArgs, int aTotalArgsSize) {
new Label(".END__OF__METHOD");
if (!aAssembler.InMetalMode) {
Engine.QueueMethodRef(GCImplementationRefs.DecRefCountRef);
foreach (MethodInformation.Variable xLocal in aLocals) {
if (xLocal.IsReferenceType && xLocal.VariableType.FullName != "System.String") {
// System.Diagnostics.Debugger.Break();
TypeSpecification xTypeSpec = xLocal.VariableType as TypeSpecification;
if (xTypeSpec != null) {
TypeDefinition xElementDef = Engine.GetDefinitionFromTypeReference(xTypeSpec.ElementType);
if ((!xElementDef.IsValueType) && xElementDef.FullName != "System.String") {
Op.Ldloc(aAssembler, xLocal, false);
new CPU.Push("8");
Op.Add(aAssembler);
new CPU.Pop("edx"); // total item count address
new CPU.Move("ebx", "[edx]");
new CPU.Add("edx", "4");
new CPU.Move("ecx", "0"); // counter
new Label(".GC_LOCAL_CLEANUP_ENTRY_VAR_" + xLocal.Offset);
new CPU.Compare("ebx", "ecx");
new CPU.JumpIfEquals(".GC_LOCAL_CLEANUP_ENTRY_VAR_" + xLocal.Offset + "_END");
new CPU.Push("edx");
new CPU.Push("ecx");
new CPU.Push("ebx");
new CPU.Push("dword [edx]");
new CPU.Call(Label.GenerateLabelName(GCImplementationRefs.DecRefCountRef));
new CPU.Pop("ebx");
new CPU.Pop("ecx");
new CPU.Pop("edx");
new CPU.Add("edx", "4");
new CPU.Add("ecx", "1");
new CPU.JumpAlways(".GC_LOCAL_CLEANUP_ENTRY_VAR_" + xLocal.Offset);
new Label(".GC_LOCAL_CLEANUP_ENTRY_VAR_" + xLocal.Offset + "_END");
// label
// item pushen
// ecx ophogen
// ecx en eax vergelijken
// als ecx kleiner is, naar label
}
}
Op.Ldloc(aAssembler, xLocal, false);
new CPU.Call(Label.GenerateLabelName(GCImplementationRefs.DecRefCountRef));
}
}
foreach (MethodInformation.Argument xArg in aArgs) {
if (xArg.IsReferenceType && xArg.ArgumentType.FullName != "System.String") {
Op.Ldarg(aAssembler, xArg, false);
new CPU.Call(Label.GenerateLabelName(GCImplementationRefs.DecRefCountRef));
}
}
}
if (aReturnSize > 0) {
if (aReturnSize > 4) {
throw new Exception("ReturnValue sizes larger than 4 not supported yet");
} else {
new Assembler.X86.Pop("eax");
}
}
for (int j = aLocals.Length - 1; j >= 0; j--) {
int xLocalSize = aLocals[j].Size;
new CPU.Add("esp", "0x" + xLocalSize.ToString("X"));
}
new CPU.Popd("ebp");
new CPU.Ret(aTotalArgsSize == 0 ? "" : aTotalArgsSize.ToString());
}
}
}