using System;
using System.IO;
using CPU = Indy.IL2CPU.Assembler;
using CPUx86 = Indy.IL2CPU.Assembler.X86;
using Indy.IL2CPU.Assembler;

namespace Indy.IL2CPU.IL.X86 {
	[OpCode(OpCodeEnum.Stelem_Ref, true)]
	public class Stelem_Ref: Op {
		public Stelem_Ref(ILReader aReader, MethodInformation aMethodInfo)
			: base(aReader, aMethodInfo) {
		}

		public static void Assemble(CPU.Assembler aAssembler, int aElementSize) {
			// stack - 3 == the array
			// stack - 2 == the index
			// stack - 1 == the new value
			int xStackSize = aElementSize;
			if (xStackSize % 4 != 0) {
				xStackSize += 4 - xStackSize % 4;
			}
			if (!aAssembler.InMetalMode) {
				new CPUx86.Pushd("[esp + " + (xStackSize + 4) + "]");
				Engine.QueueMethod(GCImplementationRefs.DecRefCountRef);
				new CPUx86.Call(IL2CPU.Assembler.Label.GenerateLabelName(GCImplementationRefs.DecRefCountRef));
			}
			new CPUx86.Move(CPUx86.Registers.EBX, "[esp + " + xStackSize + "]"); // the index
			new CPUx86.Move(CPUx86.Registers.ECX, "[esp + " + (xStackSize + 4) + "]"); // the array
			new CPUx86.Add(CPUx86.Registers.ECX, (ObjectImpl.FieldDataOffset + 4).ToString());
			new CPUx86.Push("0x" + aElementSize.ToString("X"));
			aAssembler.StackContents.Push(new StackContent(4, true, false, true));
			new CPUx86.Push(CPUx86.Registers.EBX);
			aAssembler.StackContents.Push(new StackContent(4, true, false, true));
			Multiply(aAssembler);
			new CPUx86.Push(CPUx86.Registers.ECX);
			aAssembler.StackContents.Push(new StackContent(4, true, false, true));
			Add(aAssembler);
			new CPUx86.Pop(CPUx86.Registers.ECX);
			aAssembler.StackContents.Pop();
			for (int i = (aElementSize / 4) - 1; i >= 0; i -= 1) {
				new CPU.Comment("Start 1 dword");
				new CPUx86.Pop(CPUx86.Registers.EBX);
				new CPUx86.Move(CPUx86.Registers.AtECX, CPUx86.Registers.EBX);
				new CPUx86.Add(CPUx86.Registers.ECX, "4");
			}
			switch (aElementSize % 4) {
				case 1: {
						new CPU.Comment("Start 1 byte");
						new CPUx86.Pop(CPUx86.Registers.EBX);
						new CPUx86.Move(CPUx86.Registers.AtECX, CPUx86.Registers.BL);
						break;
					}
				case 2: {
						new CPU.Comment("Start 1 word");
						new CPUx86.Pop(CPUx86.Registers.EBX);
						new CPUx86.Move(CPUx86.Registers.AtECX, CPUx86.Registers.BX);
						break;
					}
				case 0: {
						break;
					}
				default:
					throw new Exception("Remainder size " + (aElementSize % 4) + " not supported!");

			}
			new CPUx86.Add(CPUx86.Registers.ESP, "0x8");
			aAssembler.StackContents.Pop();
			aAssembler.StackContents.Pop();
			aAssembler.StackContents.Pop();
		}

		public override void DoAssemble() {
			Assemble(Assembler, 4);
		}
	}
}