summaryrefslogtreecommitdiff
path: root/Assembler
diff options
context:
space:
mode:
Diffstat (limited to 'Assembler')
-rw-r--r--Assembler/Assembler.cs450
-rw-r--r--Assembler/Assembler.csproj19
-rw-r--r--Assembler/Extensions.cs15
-rw-r--r--Assembler/GlobalUsings.cs12
-rw-r--r--Assembler/Options.cs12
-rw-r--r--Assembler/Program.cs37
6 files changed, 0 insertions, 545 deletions
diff --git a/Assembler/Assembler.cs b/Assembler/Assembler.cs
deleted file mode 100644
index 71436c4..0000000
--- a/Assembler/Assembler.cs
+++ /dev/null
@@ -1,450 +0,0 @@
-namespace Q1.Assembler;
-
-using System.Diagnostics;
-using Emulator;
-using Emulator.Chip;
-
-public class Assembler
-{
- public static Dictionary<u16, string> RegisterLookup = new()
- {
- { 0x40, "AX" },
- { 0x41, "AH" },
- { 0x42, "AL" },
- { 0x43, "DX" },
- { 0x44, "DH" },
- { 0x45, "DL" },
- { 0x46, "LX" },
- { 0x50, "PC" },
- { 0x51, "SP" }
- };
- private readonly string[] InputLines;
-
- private readonly Dictionary<string, u16> _labels = new();
-
- public Assembler(string[] inputLines)
- {
- this.InputLines = inputLines;
- }
-
- private void ResolveLabels()
- {
- int offset = Q1Layout.ProgramStart;
- int pos = 0;
- foreach (string line in this.InputLines)
- {
- string trimmedLine = line.Split(";")[0].Trim();
- if (string.IsNullOrEmpty(trimmedLine) || trimmedLine.StartsWith(';'))
- continue;
-
- if (trimmedLine.StartsWith(".org"))
- {
- string orgValue = trimmedLine[5..].Trim();
- offset = this.GetConstant(orgValue);
- }
-
- else if (trimmedLine.StartsWith(".ascii"))
- {
- string asciiValue = trimmedLine[7..].Trim()
- [1..^1]; // Remove quotes
-
- for (int i = 0; i < asciiValue.Length; i++)
- {
- char c = asciiValue[i];
- if (c == '\\')
- {
- c = asciiValue[++i] switch
- {
- 'n' => '\n',
- 't' => '\t',
- '\\' => '\\',
- '\'' => '\'',
- '"' => '"',
- _ => throw new AssemblerException($"Unknown escape sequence: \\{asciiValue[i]}")
- };
- }
-
- pos++;
- }
- }
-
- else if (trimmedLine.StartsWith(".raw"))
- {
- string[] values = trimmedLine[5..].Split(',');
- pos += values.Length * 2; // Each value is 2 bytes
- }
-
- else if (trimmedLine.StartsWith(".include"))
- {
- string includeFile = trimmedLine[9..].Trim()[1..^1];
- if (!File.Exists(includeFile))
- throw new AssemblerException($"Include file '{includeFile}' not found");
-
- pos += File.ReadAllBytes(includeFile).Length;
- }
-
- else if (trimmedLine.EndsWith(":"))
- {
- string label = trimmedLine[..^1].Trim();
- if (this._labels.ContainsKey(label))
- throw new AssemblerException($"Label '{label}' already defined");
- this._labels[label] = (u16) (pos + offset);
- }
-
- else
- pos += this.GetInstructionLength(trimmedLine);
- }
- }
-
- public IEnumerable<byte> Assemble()
- {
- this.ResolveLabels();
-
- foreach (string line in this.InputLines)
- {
- string trimmedLine = line.Split(";")[0].Trim(); // Remove comments
- if (string.IsNullOrEmpty(trimmedLine) || trimmedLine.StartsWith(';'))
- continue;
-
- if (trimmedLine.StartsWith(".org"))
- {
- // Already handled in ResolveLabels
- }
-
- else if (trimmedLine.StartsWith(".ascii"))
- {
- string asciiValue = trimmedLine[7..].Trim()
- [1..^1]; // Remove quotes
-
- for (int i = 0; i < asciiValue.Length; i++)
- {
- char c = asciiValue[i];
- if (c == '\\')
- {
- c = asciiValue[++i] switch
- {
- 'n' => '\n',
- 't' => '\t',
- '\\' => '\\',
- '\'' => '\'',
- '"' => '"',
- _ => throw new AssemblerException($"Unknown escape sequence: \\{asciiValue[i]}")
- };
- }
-
- yield return (byte) c;
- }
- }
-
- else if (trimmedLine.StartsWith(".raw"))
- {
- string[] values = trimmedLine[5..].Split(',');
- foreach (string value in values)
- {
- u16 c = this.GetConstant(value.Trim());
-
- yield return c.High();
- yield return c.Low();
- }
- }
-
- else if (trimmedLine.StartsWith(".include"))
- {
- string includeFile = trimmedLine[9..].Trim()[1..^1];
- if (!File.Exists(includeFile))
- throw new AssemblerException($"Include file '{includeFile}' not found");
-
- foreach (byte b in File.ReadAllBytes(includeFile))
- yield return b;
- }
-
- else if (trimmedLine.EndsWith(":"))
- {
- // Handled in ResolveLabels
- }
-
- else
- foreach (byte b in this.GetInstructionBytes(trimmedLine))
- yield return b;
- }
- }
-
- private int GetInstructionLength(string instruction)
- {
- string[] parts = instruction.Split(' ', 2);
- string opcode = parts[0].ToUpperInvariant();
-
- parts = parts.Length > 1 ? parts[1].Split(',') : [];
- if (parts.Length > 2)
- throw new AssemblerException("Invalid instruction format");
-
- u8 opcodeValue = this.ResolveOpcode(opcode, parts.Length, out u8 addressingIndex);
- (u8 m1, u8 m2) = this.ResolveAddressingModes(addressingIndex, parts);
-
- int length = 2; // Opcode + mode byte
-
- if (parts.Length > 0)
- length += this.GetModeLength(m1);
-
- if (parts.Length > 1)
- length += this.GetModeLength(m2);
-
- return length;
- }
-
- private IEnumerable<byte> GetInstructionBytes(string instruction)
- {
- string[] parts = instruction.Split(' ', 2);
- string opcode = parts[0].ToUpperInvariant();
-
- parts = parts.Length > 1 ? parts[1].Split(',') : [];
- if (parts.Length > 2)
- throw new AssemblerException("Invalid instruction format");
-
- u8 opcodeValue = this.ResolveOpcode(opcode, parts.Length, out u8 addressingIndex);
- (u8 m1, u8 m2) = this.ResolveAddressingModes(addressingIndex, parts);
-
- yield return opcodeValue;
- yield return (u8) ((m1 << 4) | m2); // Combine m1 and m2 into a single byte
-
- if (parts.Length > 0)
- {
- foreach (byte b in this.GetModeBytes(m1, parts[0]))
- yield return b;
- }
-
- if (parts.Length > 1)
- {
- foreach (byte b in this.GetModeBytes(m2, parts[1]))
- yield return b;
- }
- }
- private (u8 m1, u8 m2) ResolveAddressingModes(u8 addressingIndex, string[] parts)
- {
- u8 m1, m2;
- switch (addressingIndex)
- {
- case 0: // Implicit
- if (parts.Length > 0)
- throw new AssemblerException("Implicit instruction should not have operands");
-
- m1 = 0x00;
- m2 = 0x00;
- break;
-
- case 1: // Simple addressing mode
- if (parts.Length > 2)
- throw new AssemblerException("Simple addressing mode should have at most one operand");
- if (parts.Length == 0)
- throw new AssemblerException("Simple addressing mode requires an operand");
-
- m1 = this.ResolveMode(parts[0]);
- m2 = 0x00;
- break;
-
- case 2: // Extended implicit
- if (parts.Length > 0)
- throw new AssemblerException("Extended implicit instruction should not have operands");
-
- m1 = 0x00;
- m2 = 0x01;
- break;
-
- case 3: // Dual addressing mode
- if (parts.Length != 2)
- throw new AssemblerException("Dual addressing mode requires exactly two operands");
-
- m1 = this.ResolveMode(parts[0]);
- m2 = this.ResolveMode(parts[1]);
- break;
-
- default:
- throw new UnreachableException("Invalid addressing index: " + addressingIndex);
- }
- return (m1, m2);
- }
-
- private u8 ResolveOpcode(string opcode, int parts, out u8 addressingIndex)
- {
- List<int> addressingIndices = new();
- u8? opCode = null;
- foreach ((u8 key, string[] value) in Q1Cpu.InstructionLookupStrings)
- {
- if (value.Contains(opcode))
- {
- addressingIndices.AddRange(value.AllIndexesOf(opcode));
- if (opCode is not null && opCode != key)
- throw new AssemblerException($"Ambiguous opcode '{opcode}' matches multiple instructions: {opCode:X4} and {key:X4}");
-
- opCode = key;
- }
- }
-
- if (opCode is null)
- throw new AssemblerException($"Unknown opcode '{opcode}'");
-
- int Parts(int index)
- => index switch
- {
- 0 => 0, // Implicit
- 1 => 1, // Simple addressing mode
- 2 => 0, // Extended implicit
- 3 => 2, // Dual addressing mode
- _ => throw new UnreachableException("Invalid addressing index: " + index)
- };
-
- if (addressingIndices.All(x => Parts(x) != parts))
- throw new AssemblerException($"Opcode '{opcode}' does not match the expected number of operands: {parts}");
-
- addressingIndex = (u8) addressingIndices.First(x => Parts(x) == parts);
- return opCode.Value;
- }
-
- private u8 ResolveMode(string mode)
- {
- mode = mode.Trim();
-
- bool IsRegister(string text)
- {
- if (text.Length > 1 && text[0] == 'V')
- return true;
-
- return Assembler.RegisterLookup.ContainsValue(text);
- }
-
- if (this._labels.ContainsKey(mode))
- return 0x01; // Immediate
-
- if (mode.StartsWith("@"))
- return 0x03; // Indirect
-
- if (mode.StartsWith("[") && mode.EndsWith("]"))
- {
- string inner = mode[1..^1].Trim();
- if (inner.Contains("+"))
- return 0x07; // Register indirect with offset
-
- if (IsRegister(inner))
- return 0x06; // Register indirect
-
- return 0x02; // Direct
- }
-
- if (IsRegister(mode))
- return 0x05; // Register
-
- return 0x01; // Immediate
- }
-
- private byte[] GetModeBytes(u8 mode, string operand)
- {
- operand = operand.Trim();
-
- switch (mode)
- {
- case 0x00: // Implicit
- // No additional data needed
- return [];
-
- case 0x01: // Immediate
- u16 immediateValue = this.GetConstant(operand);
- return [immediateValue.High(), immediateValue.Low()];
-
- case 0x02: // Direct
- u16 directAddress = this.GetConstant(operand); // Remove brackets
- return [directAddress.High(), directAddress.Low()];
-
- case 0x03: // Indirect
- u16 indirectAddress = this.GetConstant(operand); // Remove brackets and @
- return [indirectAddress.High(), indirectAddress.Low()];
-
- case 0x04: // Relative
- u16 relativeOffset = this.GetConstant(operand);
- return [relativeOffset.High(), relativeOffset.Low()];
-
- case 0x05: // Register
- u8 regIndex = this.GetRegisterIndex(operand);
- return [regIndex];
-
- case 0x06: // Register Indirect
- u8 indirectRegIndex = this.GetRegisterIndex(operand); // Remove brackets
- return [indirectRegIndex];
-
- case 0x07: // Register Indirect with Offset
- u8 offsetRegIndex = this.GetRegisterIndex(operand[1..^1].Split('+')[0].Trim());
- u16 offsetValue = this.GetConstant(operand[1..^1].Split('+')[1].Trim());
- return [offsetRegIndex, offsetValue.High(), offsetValue.Low()];
-
- default:
- throw new AssemblerException($"Unknown addressing mode: {mode:X2}");
- }
- }
-
- private int GetModeLength(u8 mode)
- {
- return mode switch
- {
- 0x00 => 0, // Implicit
- 0x01 => 2, // Immediate
- 0x02 => 2, // Direct
- 0x03 => 2, // Indirect
- 0x04 => 2, // Relative
- 0x05 => 1, // Register
- 0x06 => 1, // Register indirect
- 0x07 => 3, // Register indirect with offset
- _ => throw new AssemblerException($"Unknown addressing mode: {mode:X2}")
- };
- }
- private u8 GetRegisterIndex(string reg)
- {
- reg = this.Clean(reg);
-
- if (reg.StartsWith("V"))
- {
- if (u8.TryParse(reg[1..], out u8 index) && index < 0x3F)
- return index;
- }
-
- if (Assembler.RegisterLookup.ContainsValue(reg))
- {
- // Find the register index by value
- return (u8) Assembler.RegisterLookup.FirstOrDefault(x => x.Value == reg).Key;
- }
-
- throw new AssemblerException($"Invalid register: {reg}");
- }
- private u16 GetConstant(string value)
- {
- value = this.Clean(value);
-
- if (value.StartsWith("$"))
- {
- // Hexadecimal constant (backwards) $1FFF
- u16 x = Convert.ToUInt16(value[1..], 16);
- return x;
- }
- if (u16.TryParse(value, out u16 result))
- // Decimal constant
- return result;
-
- if (this._labels.TryGetValue(value, out u16 labelAddress))
- // Label reference
- return labelAddress;
-
- return 0;
- }
-
- private string Clean(string value)
- {
- if (value.StartsWith("@"))
- value = value[1..]; // Remove @ for indirect addressing
-
- if (value.StartsWith("[") && value.EndsWith("]"))
- value = value[1..^1].Trim(); // Remove brackets for direct addressing
-
- return value.Trim();
- }
-}
-
-public class AssemblerException(string message)
- : Exception(message); \ No newline at end of file
diff --git a/Assembler/Assembler.csproj b/Assembler/Assembler.csproj
deleted file mode 100644
index fd4f4fa..0000000
--- a/Assembler/Assembler.csproj
+++ /dev/null
@@ -1,19 +0,0 @@
-<Project Sdk="Microsoft.NET.Sdk">
-
- <PropertyGroup>
- <OutputType>Exe</OutputType>
- <TargetFramework>net9.0</TargetFramework>
- <ImplicitUsings>enable</ImplicitUsings>
- <Nullable>enable</Nullable>
- <RootNamespace>Q1.Assembler</RootNamespace>
- </PropertyGroup>
-
- <ItemGroup>
- <ProjectReference Include="..\Emulator\Emulator.csproj" />
- </ItemGroup>
-
- <ItemGroup>
- <PackageReference Include="CommandLineParser" Version="2.9.1" />
- </ItemGroup>
-
-</Project>
diff --git a/Assembler/Extensions.cs b/Assembler/Extensions.cs
deleted file mode 100644
index fd4ea1f..0000000
--- a/Assembler/Extensions.cs
+++ /dev/null
@@ -1,15 +0,0 @@
-namespace Q1.Assembler;
-
-public static class Extensions
-{
-
- public static u8 High(this u16 value)
- {
- return (u8)(value >> 8);
- }
-
- public static u8 Low(this u16 value)
- {
- return (u8)(value & 0xFF);
- }
-} \ No newline at end of file
diff --git a/Assembler/GlobalUsings.cs b/Assembler/GlobalUsings.cs
deleted file mode 100644
index ff38a75..0000000
--- a/Assembler/GlobalUsings.cs
+++ /dev/null
@@ -1,12 +0,0 @@
-// Integer type aliases
-global using i8 = sbyte; // -128 to 127
-global using u8 = byte; // 0 to 255
-global using i16 = short; // -32,768 to 32,767
-global using u16 = ushort; // 0 to 65,535
-global using i32 = int; // -2,147,483,648 to 2,147,483,647
-global using u32 = uint; // 0 to 4,294,967,295
-global using i64 = long; // -9,223,372,036,854,775,808 to 9,223,372,036,854,775,807
-global using u64 = ulong; // 0 to 18,446,744,073,709,551,615
-
-global using ref8 = System.Span<byte>;
-global using data8 = byte[];
diff --git a/Assembler/Options.cs b/Assembler/Options.cs
deleted file mode 100644
index 5b8c618..0000000
--- a/Assembler/Options.cs
+++ /dev/null
@@ -1,12 +0,0 @@
-namespace Q1.Assembler;
-
-using CommandLine;
-
-public class AssemblerOptions
-{
- [Option('i', "input", Required = true, HelpText = "Input file to assemble.")]
- public string InputFile { get; set; }
-
- [Option('o', "output", Required = true, HelpText = "Output file to write the assembled code.")]
- public string OutputFile { get; set; }
-} \ No newline at end of file
diff --git a/Assembler/Program.cs b/Assembler/Program.cs
deleted file mode 100644
index 0493057..0000000
--- a/Assembler/Program.cs
+++ /dev/null
@@ -1,37 +0,0 @@
-namespace Q1.Assembler;
-
-using CommandLine;
-
-public class Program
-{
- static void Main(string[] args)
- {
- Parser.Default.ParseArguments<AssemblerOptions>(args).WithParsed(Program.Main);
- }
-
- public static void Main(AssemblerOptions assemblerOptions)
- {
- assemblerOptions.InputFile = assemblerOptions.InputFile;
-
- string[] input = File.ReadAllLines(assemblerOptions.InputFile);
-
- try
- {
- Assembler assembler = new(input);
- byte[] bin = assembler.Assemble().ToArray();
- if (bin.Length > 8 * 1024)
- throw new AssemblerException("Assembled binary exceeds maximum size of 8KB.");
-
- File.WriteAllBytes(assemblerOptions.OutputFile, bin);
-
- Console.WriteLine($"Assembled {assemblerOptions.InputFile} -> {assemblerOptions.OutputFile}. ({bin.Length} bytes)");
- }
- catch (AssemblerException ex)
- {
- Console.ForegroundColor = ConsoleColor.Red;
- Console.Error.WriteLine($"Error: {ex.Message}");
- Console.ResetColor();
- Environment.Exit(1);
- }
- }
-} \ No newline at end of file
generated by cgit v1.3.1 (git 2.54.0) at 2026-10-31 16:34:11 +0000