mirror of
https://github.com/danbulant/Cosmos
synced 2026-05-27 14:02:19 +00:00
382 lines
19 KiB
C#
382 lines
19 KiB
C#
// uncomment the next line to enable LFB access, for now hardcoded at 1024x768x8b
|
|
//#define LFB_1024_8
|
|
using System;
|
|
using System.Collections.Generic;
|
|
using System.IO;
|
|
using System.Linq;
|
|
using CPU = Cosmos.IL2CPU.X86;
|
|
using Cosmos.IL2CPU.X86;
|
|
using System.Reflection;
|
|
using Cosmos.IL2CPU.ILOpCodes;
|
|
using Cosmos.IL2CPU;
|
|
|
|
namespace Cosmos.IL2CPU.X86
|
|
{
|
|
// TODO: I think we need to later elminate this class
|
|
// Much of it is left over from the old build stuff, and info
|
|
// here actually belongs else where, not in the assembler
|
|
public abstract class CosmosAssembler : Cosmos.IL2CPU.Assembler
|
|
{
|
|
//TODO: COM Port info - should be in assembler? Assembler should not know about comports...
|
|
protected byte mComNumber = 0;
|
|
protected UInt16[] mComPortAddresses = { 0x3F8, 0x2F8, 0x3E8, 0x2E8 };
|
|
|
|
public CosmosAssembler(byte aComNumber)
|
|
{
|
|
mComNumber = aComNumber;
|
|
|
|
}
|
|
|
|
private static string GetValidGroupName(string aGroup)
|
|
{
|
|
return aGroup.Replace('-', '_').Replace('.', '_');
|
|
}
|
|
public const string EntryPointName = "__ENGINE_ENTRYPOINT__";
|
|
public override void Initialize()
|
|
{
|
|
base.Initialize();
|
|
if (mComNumber > 0)
|
|
{
|
|
new Define("DEBUGSTUB");
|
|
}
|
|
new Label("Kernel_Start") { IsGlobal = true };
|
|
new Comment(this, "MultiBoot-compliant loader (e.g. GRUB or X.exe) provides info in registers: ");
|
|
new Comment(this, "EBX=multiboot_info ");
|
|
new Comment(this, "EAX=0x2BADB002 - check if it's really Multiboot loader ");
|
|
new Comment(this, " ;- copy mb info - some stuff for you ");
|
|
//new Move { DestinationReg = Registers.ESI, SourceReg = Registers.EBX };
|
|
//new Move { DestinationReg = Registers.EDI, SourceRef = ElementReference.New("MultiBootInfo_Structure") };
|
|
//new Move { DestinationReg = Registers.ECX, SourceValue = 0x58 };
|
|
//new Movs { Prefixes = InstructionPrefixes.Repeat, Size = 8 };
|
|
|
|
//new Move { DestinationReg = Registers.EBX, SourceRef = ElementReference.New("MultiBootInfo_Structure") };
|
|
new Move { DestinationRef = ElementReference.New("MultiBootInfo_Structure"), DestinationIsIndirect = true, SourceReg = Registers.EBX };
|
|
new Add { DestinationReg = Registers.EBX, SourceValue = 4 };
|
|
new Move
|
|
{
|
|
DestinationReg = Registers.EAX,
|
|
SourceReg = Registers.EBX,
|
|
SourceIsIndirect = true
|
|
};
|
|
new Move { DestinationRef = ElementReference.New("MultiBootInfo_Memory_Low"), DestinationIsIndirect = true, SourceReg = Registers.EAX };
|
|
new Add { DestinationReg = Registers.EBX, SourceValue = 4 };
|
|
new Move
|
|
{
|
|
DestinationReg = Registers.EAX,
|
|
SourceReg = Registers.EBX,
|
|
SourceIsIndirect = true
|
|
};
|
|
new Move { DestinationRef = ElementReference.New("MultiBootInfo_Memory_High"), DestinationIsIndirect = true, SourceReg = Registers.EAX };
|
|
new Move
|
|
{
|
|
DestinationReg = Registers.ESP,
|
|
SourceRef = ElementReference.New("Kernel_Stack")
|
|
};
|
|
#if LFB_1024_8
|
|
new Comment("Set graphics fields");
|
|
new Move { DestinationReg = Registers.EBX, SourceRef = ElementReference.New("MultiBootInfo_Structure"), SourceIsIndirect = true };
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.EBX, SourceIsIndirect = true, SourceDisplacement = 72 };
|
|
new Move { DestinationRef = ElementReference.New("MultibootGraphicsRuntime_VbeControlInfoAddr"), DestinationIsIndirect = true, SourceReg = Registers.EAX };
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.EBX, SourceIsIndirect = true, SourceDisplacement = 76 };
|
|
new Move { DestinationRef = ElementReference.New("MultibootGraphicsRuntime_VbeModeInfoAddr"), DestinationIsIndirect = true, SourceReg = Registers.EAX };
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.EBX, SourceIsIndirect = true, SourceDisplacement = 80 };
|
|
new Move { DestinationRef = ElementReference.New("MultibootGraphicsRuntime_VbeMode"), DestinationIsIndirect = true, SourceReg = Registers.EAX };
|
|
#endif
|
|
new Comment(this, "some more startups todo");
|
|
new ClrInterruptFlag();
|
|
if (mComNumber > 0)
|
|
{
|
|
UInt16 xComAddr = mComPortAddresses[mComNumber - 1];
|
|
// 9600 baud, 8 databits, no parity, 1 stopbit
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr + 1 };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0 };
|
|
new Out { DestinationReg = Registers.AL }; // disable interrupts for serial stuff
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr + 3 };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0x80 };
|
|
new Out { DestinationReg = Registers.AL }; // Enable DLAB (set baud rate divisor)
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0xC };
|
|
new Out { DestinationReg = Registers.AL }; // Set divisor (lo byte)
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr + 1 };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0x0 };
|
|
new Out { DestinationReg = Registers.AL }; // (hi byte)
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr + 3 };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0x3 };
|
|
new Out { DestinationReg = Registers.AL }; // 8 bits, no parity, one stop bit
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr + 2 };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0xC7 };
|
|
new Out { DestinationReg = Registers.AL }; // Enable FIFO, clear them, with 14-byte threshold
|
|
new Move { DestinationReg = Registers.DX, SourceValue = (uint)xComAddr + 4 };
|
|
new Move { DestinationReg = Registers.AL, SourceValue = 0x3 };
|
|
new Out { DestinationReg = Registers.AL }; // IRQ-s enabled, RTS/DSR set
|
|
}
|
|
|
|
// SSE init
|
|
// CR4[bit 9]=1, CR4[bit 10]=1, CR0[bit 2]=0, CR0[bit 1]=1
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.CR4 };
|
|
new Or { DestinationReg = Registers.EAX, SourceValue = 0x100 };
|
|
new Move { DestinationReg = Registers.CR4, SourceReg = Registers.EAX };
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.CR4 };
|
|
new Or { DestinationReg = Registers.EAX, SourceValue = 0x200 };
|
|
new Move { DestinationReg = Registers.CR4, SourceReg = Registers.EAX };
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.CR0 };
|
|
|
|
new And { DestinationReg = Registers.EAX, SourceValue = 0xfffffffd };
|
|
new Move { DestinationReg = Registers.CR0, SourceReg = Registers.EAX };
|
|
new Move { DestinationReg = Registers.EAX, SourceReg = Registers.CR0 };
|
|
|
|
new And { DestinationReg = Registers.EAX, SourceValue = 1 };
|
|
new Move { DestinationReg = Registers.CR0, SourceReg = Registers.EAX };
|
|
|
|
// END SSE INIT
|
|
|
|
new Call { DestinationLabel = EntryPointName };
|
|
new Label(".loop");
|
|
new ClrInterruptFlag();
|
|
new Halt();
|
|
new Jump { DestinationLabel = ".loop" };
|
|
if (mComNumber > 0)
|
|
{
|
|
var xStub = new DebugStub();
|
|
xStub.Main(mComPortAddresses[mComNumber - 1]);
|
|
}
|
|
else
|
|
{
|
|
new Label("DebugStub_Step");
|
|
new Return();
|
|
}
|
|
#if !LFB_1024_8
|
|
DataMembers.Add(new DataIfNotDefined("NASM_COMPILATION"));
|
|
uint xFlags = 0x10003;
|
|
DataMembers.Add(new DataMember("MultibootSignature",
|
|
new uint[] { 0x1BADB002 }));
|
|
DataMembers.Add(new DataMember("MultibootFlags",
|
|
xFlags));
|
|
DataMembers.Add(new DataMember("MultibootChecksum",
|
|
(int)(0 - (xFlags + 0x1BADB002))));
|
|
DataMembers.Add(new DataMember("MultibootHeaderAddr", ElementReference.New("MultibootSignature")));
|
|
DataMembers.Add(new DataMember("MultibootLoadAddr", ElementReference.New("MultibootSignature")));
|
|
DataMembers.Add(new DataMember("MultibootLoadEndAddr", ElementReference.New("_end_code")));
|
|
DataMembers.Add(new DataMember("MultibootBSSEndAddr", ElementReference.New("_end_code")));
|
|
DataMembers.Add(new DataMember("MultibootEntryAddr", ElementReference.New("Kernel_Start")));
|
|
DataMembers.Add(new DataEndIfDefined());
|
|
DataMembers.Add(new DataIfDefined("NASM_COMPILATION"));
|
|
xFlags = 0x00003;
|
|
DataMembers.Add(new DataMember("MultibootSignature",
|
|
new uint[] { 0x1BADB002 }));
|
|
DataMembers.Add(new DataMember("MultibootFlags",
|
|
xFlags));
|
|
DataMembers.Add(new DataMember("MultibootChecksum",
|
|
(int)(0 - (xFlags + 0x1BADB002))));
|
|
DataMembers.Add(new DataEndIfDefined());
|
|
#else
|
|
DataMembers.Add(new DataIfNotDefined("NASM_COMPILATION"));
|
|
uint xFlags = 0x10007;
|
|
DataMembers.Add(new DataMember("MultibootSignature",
|
|
new uint[] { 0x1BADB002 }));
|
|
DataMembers.Add(new DataMember("MultibootFlags",
|
|
xFlags));
|
|
DataMembers.Add(new DataMember("MultibootChecksum",
|
|
(int)(0 - (xFlags + 0x1BADB002))));
|
|
DataMembers.Add(new DataMember("MultibootHeaderAddr", ElementReference.New("MultibootSignature")));
|
|
DataMembers.Add(new DataMember("MultibootLoadAddr", ElementReference.New("MultibootSignature")));
|
|
DataMembers.Add(new DataMember("MultibootLoadEndAddr", ElementReference.New("_end_code")));
|
|
DataMembers.Add(new DataMember("MultibootBSSEndAddr", ElementReference.New("_end_code")));
|
|
DataMembers.Add(new DataMember("MultibootEntryAddr", ElementReference.New("Kernel_Start")));
|
|
// graphics fields
|
|
DataMembers.Add(new DataMember("MultibootGraphicsMode", 0));
|
|
DataMembers.Add(new DataMember("MultibootGraphicsWidth", 1024));
|
|
DataMembers.Add(new DataMember("MultibootGraphicsHeight", 768));
|
|
DataMembers.Add(new DataMember("MultibootGraphicsDepth", 8));
|
|
DataMembers.Add(new DataEndIfDefined());
|
|
DataMembers.Add(new DataIfDefined("NASM_COMPILATION"));
|
|
xFlags = 0x00003;
|
|
DataMembers.Add(new DataMember("MultibootSignature",
|
|
new uint[] { 0x1BADB002 }));
|
|
DataMembers.Add(new DataMember("MultibootFlags",
|
|
xFlags));
|
|
DataMembers.Add(new DataMember("MultibootChecksum",
|
|
(int)(0 - (xFlags + 0x1BADB002))));
|
|
DataMembers.Add(new DataEndIfDefined());
|
|
|
|
#endif
|
|
// graphics info fields
|
|
DataMembers.Add(new DataMember("MultibootGraphicsRuntime_VbeModeInfoAddr", Int32.MaxValue));
|
|
DataMembers.Add(new DataMember("MultibootGraphicsRuntime_VbeControlInfoAddr", Int32.MaxValue));
|
|
DataMembers.Add(new DataMember("MultibootGraphicsRuntime_VbeMode", Int32.MaxValue));
|
|
// memory
|
|
DataMembers.Add(new DataMember("MultiBootInfo_Memory_High", 0));
|
|
DataMembers.Add(new DataMember("MultiBootInfo_Memory_Low", 0));
|
|
DataMembers.Add(new DataMember("Before_Kernel_Stack",
|
|
new byte[0x50000]));
|
|
DataMembers.Add(new DataMember("Kernel_Stack",
|
|
new byte[0]));
|
|
DataMembers.Add(new DataMember("MultiBootInfo_Structure", new uint[1]));
|
|
DebugStub.EmitDataSection();
|
|
}
|
|
|
|
protected override void OnBeforeFlush()
|
|
{
|
|
base.OnBeforeFlush();
|
|
DataMembers.AddRange(new DataMember[]{
|
|
new DataMember("_end_data",
|
|
new byte[0])});
|
|
new Label("_end_code");
|
|
}
|
|
|
|
public override void FlushText(TextWriter aOutput)
|
|
{
|
|
base.FlushText(aOutput);
|
|
}
|
|
|
|
protected override void Move(string aDestLabelName, int aValue)
|
|
{
|
|
new Move
|
|
{
|
|
DestinationRef = ElementReference.New(aDestLabelName),
|
|
DestinationIsIndirect = true,
|
|
SourceValue = (uint)aValue
|
|
};
|
|
}
|
|
|
|
protected override void Push(uint aValue)
|
|
{
|
|
new Push
|
|
{
|
|
DestinationValue = aValue
|
|
};
|
|
}
|
|
|
|
protected override void Pop()
|
|
{
|
|
new Add { DestinationReg = Registers.ESP, SourceValue = (uint)Stack.Pop().Size };
|
|
}
|
|
|
|
protected override void Push(string aLabelName)
|
|
{
|
|
new Push
|
|
{
|
|
DestinationRef = ElementReference.New(aLabelName)
|
|
};
|
|
}
|
|
|
|
protected override void Call(MethodBase aMethod)
|
|
{
|
|
new IL2CPU.X86.Call
|
|
{
|
|
DestinationLabel = MethodInfoLabelGenerator.GenerateLabelName(aMethod)
|
|
};
|
|
}
|
|
|
|
protected override void Jump(string aLabelName)
|
|
{
|
|
new IL2CPU.X86.Jump
|
|
{
|
|
DestinationLabel = aLabelName
|
|
};
|
|
}
|
|
|
|
protected override int GetVTableEntrySize()
|
|
{
|
|
return 16; // todo: retrieve from actual type info
|
|
}
|
|
|
|
private const string InitStringIDsLabel = "___INIT__STRINGS_TYPE_ID_S___";
|
|
|
|
|
|
public override void EmitEntrypoint(MethodBase aEntrypoint, IEnumerable<MethodBase> aMethods)
|
|
{
|
|
#region Literal strings fixup code
|
|
// at the time the datamembers for literal strings are created, the type id for string is not yet determined.
|
|
// for now, we fix this at runtime.
|
|
new Label(InitStringIDsLabel);
|
|
new Push { DestinationReg = Registers.EBP };
|
|
new Move { DestinationReg = Registers.EBP, SourceReg = Registers.ESP };
|
|
new Move { DestinationReg = Registers.EAX, SourceRef = ElementReference.New(ILOp.GetTypeIDLabel(typeof(String))), SourceIsIndirect = true };
|
|
foreach (var xDataMember in DataMembers)
|
|
{
|
|
if (!xDataMember.Name.StartsWith("StringLiteral"))
|
|
{
|
|
continue;
|
|
}
|
|
if (xDataMember.Name.EndsWith("__Contents"))
|
|
{
|
|
continue;
|
|
}
|
|
new Move { DestinationRef = ElementReference.New(xDataMember.Name), DestinationIsIndirect = true, SourceReg = Registers.EAX };
|
|
}
|
|
new Pop { DestinationReg = Registers.EBP };
|
|
new Return();
|
|
#endregion
|
|
new Label(EntryPointName);
|
|
new Push { DestinationReg = Registers.EBP };
|
|
new Move { DestinationReg = Registers.EBP, SourceReg = Registers.ESP };
|
|
new Call { DestinationLabel = InitVMTCodeLabel };
|
|
new Call { DestinationLabel = InitStringIDsLabel };
|
|
|
|
foreach (var xCctor in aMethods)
|
|
{
|
|
if (xCctor.Name == ".cctor"
|
|
&& xCctor.IsStatic
|
|
&& xCctor is ConstructorInfo)
|
|
{
|
|
Call(xCctor);
|
|
}
|
|
}
|
|
Call(aEntrypoint);
|
|
new Pop { DestinationReg = Registers.EBP };
|
|
new Return();
|
|
}
|
|
|
|
protected override void Ldarg(MethodInfo aMethod, int aIndex)
|
|
{
|
|
IL.Ldarg.DoExecute(this, aMethod, (ushort)aIndex);
|
|
}
|
|
|
|
protected override void Call(MethodInfo aMethod, MethodInfo aTargetMethod)
|
|
{
|
|
var xSize = IL.Call.GetStackSizeToReservate(aTargetMethod.MethodBase);
|
|
if (xSize > 0)
|
|
{
|
|
new CPU.Sub { DestinationReg = Registers.ESP, SourceValue = xSize };
|
|
}
|
|
new CPU.Call { DestinationLabel = ILOp.GetMethodLabel(aTargetMethod) };
|
|
}
|
|
|
|
protected override void Ldflda(MethodInfo aMethod, string aFieldId)
|
|
{
|
|
IL.Ldflda.DoExecute(this, aMethod, aMethod.MethodBase.DeclaringType, aFieldId, false);
|
|
}
|
|
|
|
//// todo: remove when everything goes fine
|
|
//protected override void AfterOp(MethodInfo aMethod, ILOpCode aOpCode) {
|
|
// base.AfterOp(aMethod, aOpCode);
|
|
// new Move { DestinationReg = Registers.EAX, SourceReg = Registers.EBP };
|
|
// var xTotalTransitionalStackSize = (from item in Stack
|
|
// select (int)ILOp.Align((uint)item.Size, 4)).Sum();
|
|
// // include locals too
|
|
// if (aMethod.MethodBase.DeclaringType.Name == "GCImplementationImpl"
|
|
// && aMethod.MethodBase.Name == "AllocNewObject") {
|
|
// Console.Write("");
|
|
// }
|
|
// var xLocalsValue = (from item in aMethod.MethodBase.GetMethodBody().LocalVariables
|
|
// select (int)ILOp.Align(ILOp.SizeOfType(item.LocalType), 4)).Sum();
|
|
// var xExtraSize = xLocalsValue + xTotalTransitionalStackSize;
|
|
|
|
// new Sub { DestinationReg = Registers.EAX, SourceValue = (uint)xExtraSize };
|
|
// new Compare { DestinationReg = Registers.EAX, SourceReg = Registers.ESP };
|
|
// var xLabel = ILOp.GetLabel(aMethod, aOpCode) + "___TEMP__STACK_CHECK";
|
|
// new ConditionalJump { Condition = ConditionalTestEnum.Equal, DestinationLabel = xLabel };
|
|
// new Xchg { DestinationReg = Registers.BX, SourceReg = Registers.BX, Size = 16 };
|
|
// new Halt();
|
|
|
|
// new Label(xLabel);
|
|
|
|
//}
|
|
|
|
public override uint GetSizeOfType(Type aType)
|
|
{
|
|
return ILOp.SizeOfType(aType);
|
|
}
|
|
}
|
|
}
|