Cosmos/source/Indy.IL2CPU.Assembler.X86.Native/Assembler.cs
2008-03-23 17:22:29 +00:00

253 lines
No EOL
11 KiB
C#

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;
namespace Indy.IL2CPU.Assembler.X86.Native {
public class Assembler: X86.Assembler {
public const string BreakMethodName = "_CODE_REQUESTED_BREAK_";
private byte? mComNumber;
public Assembler(Func<string, string> aGetStreamForGroup, bool aInMetalMode, byte? aComNumber)
: base(aGetStreamForGroup, aInMetalMode) {
mComNumber = aComNumber;
}
public Assembler(Func<string, string> aGetStreamForGroup)
: base(aGetStreamForGroup) {
}
protected override void EmitCodeSectionHeader(string aGroup, StreamWriter aOutputWriter) {
base.EmitCodeSectionHeader(aGroup, aOutputWriter);
aOutputWriter.WriteLine("section .text");
if (aGroup == MainGroup) {
aOutputWriter.WriteLine("global Kernel_Start");
aOutputWriter.WriteLine("Kernel_Start: ");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine("; MultiBoot-compliant loader (e.g. GRUB or X.exe) provides info in registers: ");
aOutputWriter.WriteLine("; EBX=multiboot_info ");
aOutputWriter.WriteLine("; EAX=0x2BADB002 - check if it's really Multiboot loader ");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine(" ;- copy mb info - some stuff for you ");
//aOutputWriter.WriteLine(" mov mb_info, ebx");
aOutputWriter.WriteLine(" add ebx, 4");
aOutputWriter.WriteLine(" mov dword eax, [ebx]");
aOutputWriter.WriteLine(" mov dword [MultiBootInfo_Memory_Low], eax");
aOutputWriter.WriteLine(" add ebx, 4");
aOutputWriter.WriteLine(" mov dword eax, [ebx]");
aOutputWriter.WriteLine(" mov dword [MultiBootInfo_Memory_High], eax");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine(" mov esp,Kernel_Stack ");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine("; some more startups todo");
aOutputWriter.WriteLine(" cli");
//aOutputWriter.WriteLine(" push ebx");
if (mComNumber != null) {
int xComAddr = 0;
switch (mComNumber.Value) {
case 1:
xComAddr = 0x3F8;
break;
case 2:
xComAddr = 0x2F8;
break;
case 3:
xComAddr = 0x3E8;
break;
case 4:
xComAddr = 0x2E8;
break;
default:
throw new Exception("Com " + mComNumber + " not supported!");
}
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 1).ToString("X"));
aOutputWriter.WriteLine("mov al, 0x00");
aOutputWriter.WriteLine("out DX, AL"); // disable all interrupts
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 3).ToString("X"));
aOutputWriter.WriteLine("mov al, 0x80");
aOutputWriter.WriteLine("out DX, AL"); // Enable DLAB (set baud rate divisor)
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 0).ToString("X"));
aOutputWriter.WriteLine("mov al, 0x01");
aOutputWriter.WriteLine("out DX, AL"); // Set divisor (lo byte)
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 1).ToString("X"));
aOutputWriter.WriteLine("mov al, 0x00");
aOutputWriter.WriteLine("out DX, AL"); // (hi byte)
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 3).ToString("X"));
aOutputWriter.WriteLine("mov al, 0x03");
aOutputWriter.WriteLine("out DX, AL"); // 8 bits, no parity, one stop bit
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 2).ToString("X"));
aOutputWriter.WriteLine("mov al, 0xC7");
aOutputWriter.WriteLine("out DX, AL"); // Enable FIFO, clear them, with 14-byte threshold
aOutputWriter.WriteLine("mov dx, 0x{0}", (xComAddr + 4).ToString("X"));
aOutputWriter.WriteLine("mov al, 0x03");
aOutputWriter.WriteLine("out DX, AL"); // IRQ-s enabled, RTS/DSR set
}
aOutputWriter.WriteLine(" call " + EntryPointName);
aOutputWriter.WriteLine(" .loop:");
aOutputWriter.WriteLine(" cli");
aOutputWriter.WriteLine(" hlt");
aOutputWriter.WriteLine(" jmp .loop");
aOutputWriter.WriteLine(" ");
aOutputWriter.WriteLine(" " + BreakMethodName + ":");
aOutputWriter.WriteLine(" ret");
aOutputWriter.WriteLine(" ");
if (mComNumber != null) {
int xComAddr = 0;
switch (mComNumber.Value) {
case 1:
xComAddr = 0x3F8;
break;
case 2:
xComAddr = 0x2F8;
break;
case 3:
xComAddr = 0x3E8;
break;
case 4:
xComAddr = 0x2E8;
break;
default:
throw new Exception("Com " + mComNumber + " not supported!");
}
aOutputWriter.WriteLine("DebugPoint__:");
aOutputWriter.WriteLine(" .Wait1:");
aOutputWriter.WriteLine(" mov dx, " + (xComAddr + 5));
aOutputWriter.WriteLine(" mov al, 0");
aOutputWriter.WriteLine(" in al, dx");
aOutputWriter.WriteLine(" test al, 0x20");
aOutputWriter.WriteLine(" je .Wait1");
aOutputWriter.WriteLine(" mov dx, " + xComAddr);
aOutputWriter.WriteLine(" mov al, [esp+3]");
aOutputWriter.WriteLine(" out dx, al");
aOutputWriter.WriteLine(" .Wait2:");
aOutputWriter.WriteLine(" mov dx, " + (xComAddr + 5));
aOutputWriter.WriteLine(" mov al, 0");
aOutputWriter.WriteLine(" in al, dx");
aOutputWriter.WriteLine(" test al, 0x20");
aOutputWriter.WriteLine(" je .Wait2");
aOutputWriter.WriteLine(" mov dx, " + xComAddr);
aOutputWriter.WriteLine(" mov al, [esp+2]");
aOutputWriter.WriteLine(" out dx, al");
aOutputWriter.WriteLine(" .Wait3:");
aOutputWriter.WriteLine(" mov dx, " + (xComAddr + 5));
aOutputWriter.WriteLine(" mov al, 0");
aOutputWriter.WriteLine(" in al, dx");
aOutputWriter.WriteLine(" test al, 0x20");
aOutputWriter.WriteLine(" je .Wait3");
aOutputWriter.WriteLine(" mov dx, " + xComAddr);
aOutputWriter.WriteLine(" mov al, [esp+1]");
aOutputWriter.WriteLine(" out dx, al");
aOutputWriter.WriteLine(" .Wait4:");
aOutputWriter.WriteLine(" mov dx, " + (xComAddr + 5));
aOutputWriter.WriteLine(" mov al, 0");
aOutputWriter.WriteLine(" in al, dx");
aOutputWriter.WriteLine(" test al, 0x20");
aOutputWriter.WriteLine(" je .Wait4");
aOutputWriter.WriteLine(" mov dx, " + xComAddr);
aOutputWriter.WriteLine(" mov al, [esp]");
aOutputWriter.WriteLine(" out dx, al");
aOutputWriter.WriteLine(" ret");
}
}
}
protected override void EmitDataSectionHeader(string aGroup, StreamWriter aOutputWriter) {
base.EmitDataSectionHeader(aGroup, aOutputWriter);
if (aGroup == MainGroup) {
aOutputWriter.WriteLine("section .data");
aOutputWriter.WriteLine("_start: ");
aOutputWriter.WriteLine("; multiboot header ");
aOutputWriter.WriteLine("MBFLAGS equ 0x03 ; 4KB aligned modules etc., full memory info, ");
aOutputWriter.WriteLine(" ; use special header (see below) ");
aOutputWriter.WriteLine("dd 0x1BADB002 ; multiboot signature ");
aOutputWriter.WriteLine("dd MBFLAGS ; 4kb page aligment for modules, supply memory info ");
aOutputWriter.WriteLine("dd -0x1BADB002-MBFLAGS ; checksum=-(FLAGS+0x1BADB002) ");
aOutputWriter.WriteLine("; other data - that is the additional (optional) header which helps to load ");
aOutputWriter.WriteLine("; the kernel. ");
//aOutputWriter.WriteLine(" dd _start ; header_addr ");
//aOutputWriter.WriteLine(" dd _start ; load_addr ");
//aOutputWriter.WriteLine(" dd _end_data ; load_end_addr ");
//aOutputWriter.WriteLine(" dd _end ; bss_end_addr ");
//aOutputWriter.WriteLine(" dd Kernel_Start ; entry ");
aOutputWriter.WriteLine("; end of header ");
//aOutputWriter.WriteLine("mb_info multiboot_info");
aOutputWriter.WriteLine("MultiBootInfo_Memory_High dd 0");
aOutputWriter.WriteLine("MultiBootInfo_Memory_Low dd 0");
if (Signature != null && Signature.Length > 0) {
aOutputWriter.WriteLine("{0} db {1}", SignatureLabelName, Signature.Aggregate<byte, string>("", (r, b) => r + b + ",") + "0");
}
}
}
protected override void EmitIDataSectionHeader(string aGroup, StreamWriter aOutputWriter) {
}
protected override void EmitDataSectionFooter(string aGroup, StreamWriter aOutputWriter) {
base.EmitDataSectionFooter(aGroup, aOutputWriter);
if (aGroup == MainGroup) {
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine(";--- bss --- place r*, d* ? directives here, so that you'll have a BSS. ");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine("Before_Kernel_Stack:");
//aOutputWriter.WriteLine("times 50000 resb 0 ; our own stack ");
aOutputWriter.WriteLine("TIMES 0x50000 db 0");
aOutputWriter.WriteLine("Kernel_Stack: ");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine("");
aOutputWriter.WriteLine("_end: ; end of BSS - here's the virtual and logical end.");
}
}
protected override void EmitFooter(string aGroup, StreamWriter aOutputWriter) {
if (aGroup == MainGroup) {
aOutputWriter.WriteLine("_end_data: ; -- end of CODE+DATA ");
}
base.EmitFooter(aGroup, aOutputWriter);
}
protected override void EmitHeader(string aGroup, StreamWriter aOutputWriter) {
base.EmitHeader(aGroup, aOutputWriter);
//mOutputWriter.WriteLine("format ms coff ");
//mOutputWriter.WriteLine("org 0220000h ; the best place to load our kernel to. ");
//mOutputWriter.WriteLine("use32 ; the kernel will be run in 32-bit protected mode, ");
aOutputWriter.WriteLine("");
// List<string> xTheLabels = new List<string>();
// string mLastRealLabel = "";
// foreach (IL2CPU.Assembler.Instruction x in mInstructions) {
// Label xLabel = x as Label;
// if (xLabel != null) {
// if (!xLabel.Name.StartsWith(".")) {
// mLastRealLabel = xLabel.Name;
// xTheLabels.Add(xLabel.Name);
// } else {
// xTheLabels.Add(mLastRealLabel + "@@" + xLabel.Name.Substring(1));
// }
// }
// }
// if (xTheLabels.Count > 0) {
// mOutputWriter.WriteLine("include 'export.inc'");
// mOutputWriter.WriteLine("section '.edata' export data readable");
// mOutputWriter.WriteLine("");
// mOutputWriter.WriteLine("\texport 'OUTPUT.dll', \\");
// for (int i = 0; i < xTheLabels.Count; i++) {
// if (i == (xTheLabels.Count - 1)) {
// mOutputWriter.WriteLine("\t\t {0},'{1}'", xTheLabels[i].Replace("@@", "."), xTheLabels[i]);
// } else {
// mOutputWriter.WriteLine("\t\t{0},'{1}', \\", xTheLabels[i].Replace("@@", "."), xTheLabels[i]);
// }
// public entry as 'entry'
//mOutputWriter.WriteLine("\tpublic {0} as '{0}'", xTheLabels[i].Replace("@@", "."), xTheLabels[i]);
// }
// }
//mOutputWriter.WriteLine("section '.code' code readable executable");
aOutputWriter.WriteLine("");
}
protected override void EmitImportMembers(string aGroup, StreamWriter aOutputWriter) {
if (ImportMembers.Count > 0) {
throw new Exception("You can't use P/Invoke in OS kernels");
}
}
}
}