using System;
using System.Collections.Generic;
using System.Linq;
using System.Reflection;
using System.Text;
using Indy.IL2CPU.IL;
using Indy.IL2CPU.Plugs;
using CPUx86 = Cosmos.IL2CPU.X86;
using Cosmos.IL2CPU.X86.IL;
using CPU = Cosmos.IL2CPU;
using MethodBase = System.Reflection.MethodBase;
using Cosmos.IL2CPU;
using CosmosAssembler = Cosmos.IL2CPU.X86.CosmosAssembler;

namespace Indy.IL2CPU.X86.Plugs.NEW_PLUGS {
  public class InvokeImplAssembler: AssemblerMethod {
    public override void Assemble(Indy.IL2CPU.Assembler.Assembler aAssembler) {
      throw new NotImplementedException();
    }

    private uint GetArgumentStartOffset(MethodBase aMethod, int aArgument) {
      return 0;
    }

    public override void AssembleNew(object aAssembler, object aMethodInfo) {
      var xAssembler = (CosmosAssembler)aAssembler;
      var xMethodInfo = (Cosmos.IL2CPU.MethodInfo) aMethodInfo;
      // param 0 is instance of eventhandler
      // param 1 is sender
      // param 2 is eventargs
      //Ldarg.Ldfld(aAssembler, aMethodInfo.TypeInfo, "System.Object System.Delegate._target");
      //new Label(".LoadMethodParams");
      //for (int i = 1; i < aMethodInfo.Arguments.Length; i++) {
      //    Ldarg.Ldarg(aAssembler, aMethodInfo.Arguments[i]);
      //}
      //new Label(".LoadMethodPointer");
      //Ldarg.Ldarg(aAssembler, aMethodInfo.Arguments[0]);
      //Ldarg.Ldfld(aAssembler, aMethodInfo.TypeInfo, "System.IntPtr System.Delegate._methodPtr");
      //new CPUx86.Pop("eax");
      //new CPUx86.Call(CPUx86.Registers_Old.EAX);
      //new CPUx86.Add("esp",
      //               "4");
      /*
       * EAX contains the GetInvocationList() array at the index at which it was last used
       * EDX contains the index at which the EAX is
       * EBX contains the number of items in the array
       * ECX contains the argument size
       */
      new CPU.Label("____DEBUG_FOR_MULTICAST___");
      //            new CPUx86.Cli();//DEBUG ONLY
      //#warning reenable interupts when issue is fixed!!!
      new CPU.Comment("push address of delgate to stack");
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);
      var xGetInvocationListMethod = typeof(MulticastDelegate).GetMethod("GetInvocationList");
      new CPUx86.Call { DestinationLabel = CPU.MethodInfoLabelGenerator.GenerateLabelName(xGetInvocationListMethod) };
      new CPU.Comment("get address from return value -> eax");
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.EAX };
      ;//list
      new CPU.Comment("eax+=8 is where the offset where an array's count is");
      new CPUx86.Add { DestinationReg = CPUx86.Registers.EAX, SourceValue = 8 };//addrof list.count??
      new CPU.Comment("store count in ebx");
      new CPUx86.Move { DestinationReg = CPUx86.Registers.EBX, SourceReg = CPUx86.Registers.EAX, SourceIsIndirect = true };//list.count
      new CPU.Comment("eax+=8 is where the offset where an array's items start");
      new CPUx86.Add { DestinationReg = CPUx86.Registers.EAX, SourceValue = 8 };//why? -- start of list i think? MtW: the array's .Length is at +8
      new CPUx86.Move { DestinationReg = CPUx86.Registers.EDI, SourceValue = 0 };
      new CPU.Comment("ecx = ptr to delegate object");
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.ECX };
      // make ecx point to the size of arguments
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);
      Ldfld.DoExecute(xAssembler, xMethodInfo.MethodBase.DeclaringType, "$$ArgSize$$");
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.ECX };
      new CPU.Comment("ecx points to the size of the delegated methods arguments");
      new CPUx86.Xor { DestinationReg = CPUx86.Registers.EDX, SourceReg = CPUx86.Registers.EDX };
      ;//make sure edx is 0
      new CPU.Label(".BEGIN_OF_LOOP");
      new CPUx86.Compare { DestinationReg = CPUx86.Registers.EDX, SourceReg = CPUx86.Registers.EBX };//are we at the end of this list
      new CPUx86.ConditionalJump { Condition = CPUx86.ConditionalTestEnum.Equal, DestinationLabel = ".END_OF_INVOKE_" };//then we better stop
      //new CPUx86.Compare("edx", 0);
      //new CPUx86.JumpIfLessOrEqual(".noreturnYet");
      //new CPUx86.Add("esp", 4);
      //new CPU.Label(".noreturnYet");
      //new CPU.Comment("space for the return value");
      //new CPUx86.Pushd("0");
      new CPUx86.Pushad();
      new CPU.Comment("esi points to where we will copy the methods arguments from");
      new CPUx86.Move { DestinationReg = CPUx86.Registers.ESI, SourceReg = CPUx86.Registers.ESP };
      new CPU.Comment("edi = ptr to delegate object");
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);                         
      Ldfld.DoExecute(xAssembler, xMethodInfo.MethodBase.DeclaringType, "System.Object System.Delegate._target");
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.EDI };
      new CPUx86.Compare { DestinationReg = CPUx86.Registers.EDI, SourceValue = 0 };
      new CPUx86.ConditionalJump { Condition = CPUx86.ConditionalTestEnum.Zero, DestinationLabel = ".NO_THIS" };
      new CPUx86.Push { DestinationReg = CPUx86.Registers.EDI };

      new CPU.Label(".NO_THIS");

      new CPU.Comment("make space for us to copy the arguments too");
      new CPUx86.Sub { DestinationReg = CPUx86.Registers.ESP, SourceReg = CPUx86.Registers.ECX };
      new CPU.Comment("move the current delegate to edi");
      new CPUx86.Move { DestinationReg = CPUx86.Registers.EDI, SourceReg = CPUx86.Registers.EAX, SourceIsIndirect = true };
      new CPU.Comment("move the methodptr from that delegate to the stack ");
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);
      Ldfld.DoExecute(xAssembler, xMethodInfo.MethodBase.DeclaringType, "System.IntPtr System.Delegate._methodPtr");
      new CPUx86.Move { DestinationReg = CPUx86.Registers.EDI, SourceReg = CPUx86.Registers.ESP };
      new CPU.Comment("get above the saved methodptr");
      new CPUx86.Add { DestinationReg = CPUx86.Registers.EDI, SourceValue = 4 };
      //we allocated the argsize on the stack once, and it we need to get above the original args
      new CPU.Comment("we allocated argsize on the stack once");
      new CPU.Comment("add 32 for the Pushad + 16 for the current stack + 4 for the return value");
      new CPUx86.Add { DestinationReg = CPUx86.Registers.ESI, SourceValue = 52 };
      new CPUx86.Movs { Size = 8, Prefixes = CPUx86.InstructionPrefixes.Repeat };
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.EDI };
      new CPUx86.Call { DestinationReg = CPUx86.Registers.EDI };
      new CPU.Comment("store return -- return stored into edi after popad");
      //new CPUx86.Move("edx", "[" + MethodInfo.Arguments[0].VirtualAddresses[0] + "]");//addrof the delegate
      //new CPUx86.Move("edx", "[edx+" + (MethodInfo.Arguments[0].TypeInfo.Fields["$$ReturnsValue$$"].Offset + 12) + "]");
      //new CPUx86.Compare(Registers_Old.EDX, 0);
      //new CPUx86.JumpIfEqual(".getReturn");
      //new CPUx86.Move(Registers_Old.EAX, "[esp]");
      //new CPUx86.Move("[esp+0x20]", Registers_Old.EAX);
      //new CPU.Label(".getReturn");
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);
      Ldfld.DoExecute(xAssembler, xMethodInfo.MethodBase.DeclaringType, "System.Object System.Delegate._target");
      // edi contains $this now
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.EDI };
      //new CPUx86.Compare ("edi", "0");
      //new CPUx86.JumpIfEqual(".noTHIStoPop");
      //new CPUx86.Move("edx", "[" + MethodInfo.Arguments[0].VirtualAddresses[0] + "]");//addrof the delegate
      //new CPUx86.Move("edx", "[edx+" + (MethodInfo.Arguments[0].TypeInfo.Fields["$$ReturnsValue$$"].Offset + 12) + "]");
      //new CPUx86.Compare(Registers_Old.EDX, 0);
      //new JumpIfNotEqual(".needToPopThis");
      //new CPU.Comment("ecx = ptr to delegate object");
      //new CPUx86.Move("ecx", "[" + MethodInfo.Arguments[0].VirtualAddresses[0] + "]");//addrof the delegate
      //new CPU.Comment("ecx points to the size of the delegated methods arguments");
      //new CPUx86.Move("ecx", "[ecx + " + (MethodInfo.Arguments[0].TypeInfo.Fields["$$ArgSize$$"].Offset + 12) + "]");//the size of the arguments to the method? + 12??? -- 12 is the size of the current call stack.. i think
      //new CPUx86.Compare("ecx", "0");
      //new CPUx86.JumpIfLessOrEqual(".noTHIStoPop");
      //new CPU.Label(".needToPopThis");
      //new CPUx86.Pop("edi");
      //new CPUx86.Move("[esp]", "edi");
      new CPU.Label(".noTHIStoPop");
      new CPUx86.Popad();
      new CPUx86.Inc { DestinationReg = CPUx86.Registers.EDX };
      new CPUx86.Add { DestinationReg = CPUx86.Registers.EAX, SourceValue = 4 };
      new CPUx86.Jump { DestinationLabel = ".BEGIN_OF_LOOP" };
      new CPU.Label(".END_OF_INVOKE_");
      new CPU.Comment("get the return value");
      //new CPUx86.Pop("eax");
      Ldarg.DoExecute(xAssembler, xMethodInfo, 0);
      Ldfld.DoExecute(xAssembler, xMethodInfo.MethodBase.DeclaringType, "$$ReturnsValue$$");
      new CPUx86.Pop { DestinationReg = CPUx86.Registers.EDX };
      new CPUx86.Compare { DestinationReg = CPUx86.Registers.EDX, SourceValue = 0 };
      new CPUx86.ConditionalJump { Condition = CPUx86.ConditionalTestEnum.Equal, DestinationLabel = ".noReturn" };
      //may have to expand the return... idk
      new CPUx86.Xchg { DestinationReg = CPUx86.Registers.EBP, DestinationIsIndirect = true, DestinationDisplacement = 8, SourceReg = CPUx86.Registers.EDX };
      new CPUx86.Xchg { DestinationReg = CPUx86.Registers.EBP, DestinationIsIndirect = true, DestinationDisplacement = 4, SourceReg = CPUx86.Registers.EDX };
      new CPUx86.Xchg { DestinationReg = CPUx86.Registers.EBP, DestinationIsIndirect = true, SourceReg = CPUx86.Registers.EDX };
      new CPUx86.Push { DestinationReg = CPUx86.Registers.EDX };//ebp
      new CPUx86.Move { DestinationReg = CPUx86.Registers.ESP, DestinationIsIndirect = true, DestinationDisplacement = 12, SourceReg = CPUx86.Registers.EDI };
      new CPU.Label(".noReturn");
      //            new CPUx86.Sti();
      //#warning remove this ^ sti call when issue is fixed!!!
      //MethodInfo.Arguments[0].
      //            new CPUx86.Move("ebx", "[eax + " + (MethodInfo.Arguments[0].TypeInfo.Fields["$$ArgSize$$"].Offset + 12) + "]");

      //new CPUx86.Move("eax", CPUx86.Registers_Old.
      //var xGetInvocationListMethod = typeof(MulticastDelegate).GetMethod("GetInvocationList");
      //xGetInvocationListMethod = typeof(Delegate).GetMethod("GetInvocationList");

      //							new CPUx86.Pop(CPUx86.Registers_Old.EAX);
      //new CPUx86.Move("esp", "ebp");
      
      //new CPUx86.Push {
      //  DestinationRef = ElementReference.New(LdStr.GetContentsArrayName("Events not yet implemented"))
      //};
      //new CPUx86.Call {
      //  DestinationLabel = MethodInfoLabelGenerator.GenerateLabelName(typeof(ExceptionHelper).GetMethod("ThrowNotImplemented", BindingFlags.Static | BindingFlags.Public))
      //};
      throw new NotImplementedException();

      }
  }
}