namespace EightBit { using System.Text; public class Disassembly { private Bus bus; private M6502 processor; private Symbols symbols; private ushort address; public Disassembly(Bus bus, M6502 processor, Symbols symbols) { this.bus = bus; this.processor = processor; this.symbols = symbols; } public string Disassemble(ushort current) { address = current; var output = new StringBuilder(); var cell = bus.Peek(current); output.Append(Dump_ByteValue(cell)); output.Append(" "); var next = bus.Peek((ushort)(current + 1)); var relative = (ushort)(processor.PC + 2 + (sbyte)next); var aaa = (cell & 0b11100000) >> 5; var bbb = (cell & 0b00011100) >> 2; var cc = (cell & 0b00000011); switch (cc) { case 0b00: switch (aaa) { case 0b000: switch (bbb) { case 0b000: // BRK output.Append(Disassemble_Implied("BRK")); break; case 0b001: // DOP/NOP (0x04) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b010: // PHP output.Append(Disassemble_Implied("PHP")); break; case 0b011: // TOP/NOP (0b00001100, 0x0c) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b100: // BPL output.Append(Disassemble_Relative("BPL", relative)); break; case 0b101: // DOP/NOP (0x14) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b110: // CLC output.Append(Disassemble_Implied("CLC")); break; case 0b111: // TOP/NOP (0b00011100, 0x1c) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; default: throw new System.InvalidOperationException("Illegal instruction"); } break; case 0b001: switch (bbb) { case 0b000: // JSR output.Append(Disassemble_Absolute("JSR")); break; case 0b010: // PLP output.Append(Disassemble_Implied("PLP")); break; case 0b100: // BMI output.Append(Disassemble_Relative("BMI", relative)); break; case 0b101: // DOP/NOP (0x34) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b110: // SEC output.Append(Disassemble_Implied("SEC")); break; case 0b111: // TOP/NOP (0b00111100, 0x3c) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; default: // BIT output.Append(Disassemble_AM_00(bbb, "BIT")); break; } break; case 0b010: switch (bbb) { case 0b000: // RTI output.Append(Disassemble_Implied("RTI")); break; case 0b001: // DOP/NOP (0x44) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b010: // PHA output.Append(Disassemble_Implied("PHA")); break; case 0b011: // JMP output.Append(Disassemble_Absolute("JMP")); break; case 0b100: // BVC output.Append(Disassemble_Relative("BVC", relative)); break; case 0b101: // DOP/NOP (0x54) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b110: // CLI output.Append(Disassemble_Implied("CLI")); break; case 0b111: // TOP/NOP (0b01011100, 0x5c) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; default: throw new System.InvalidOperationException("Illegal addressing mode"); } break; case 0b011: switch (bbb) { case 0b000: // RTS output.Append(Disassemble_Implied("RTS")); break; case 0b001: // DOP/NOP (0x64) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b010: // PLA output.Append(Disassemble_Implied("PLA")); break; case 0b011: // JMP (abs) output.Append(Disassemble_Indirect("JMP")); break; case 0b100: // BVS output.Append(Disassemble_Relative("BVS", relative)); break; case 0b101: // DOP/NOP (0x74) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b110: // SEI output.Append(Disassemble_Implied("SEI")); break; case 0b111: // TOP/NOP (0b01111100, 0x7c) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; default: throw new System.InvalidOperationException("Illegal addressing mode"); } break; case 0b100: switch (bbb) { case 0b000: // DOP/NOP (0x80) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b010: // DEY output.Append(Disassemble_Implied("DEY")); break; case 0b100: // BCC output.Append(Disassemble_Relative("BCC", relative)); break; case 0b110: // TYA output.Append(Disassemble_Implied("TYA")); break; default: // STY output.Append(Disassemble_AM_00(bbb, "STY")); break; } break; case 0b101: switch (bbb) { case 0b010: // TAY output.Append(Disassemble_Implied("TAY")); break; case 0b100: // BCS output.Append(Disassemble_Relative("BCS", relative)); break; case 0b110: // CLV output.Append(Disassemble_Implied("CLV")); break; default: // LDY output.Append(Disassemble_AM_00(bbb, "LDY")); break; } break; case 0b110: switch (bbb) { case 0b010: // INY output.Append(Disassemble_Implied("INY")); break; case 0b100: // BNE output.Append(Disassemble_Relative("BNE", relative)); break; case 0b101: // DOP/NOP (0xd4) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b110: // CLD output.Append(Disassemble_Implied("CLD")); break; case 0b111: // TOP/NOP (0b11011100, 0xdc) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; default: // CPY output.Append(Disassemble_AM_00(bbb, "CPY")); break; } break; case 0b111: switch (bbb) { case 0b010: // INX output.Append(Disassemble_Implied("INX")); break; case 0b100: // BEQ output.Append(Disassemble_Relative("BEQ", relative)); break; case 0b101: // DOP/NOP (0xf4) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; case 0b110: // SED output.Append(Disassemble_Implied("SED")); break; case 0b111: // TOP/NOP (0b11111100, 0xfc) output.Append(Disassemble_AM_00(bbb, "*NOP")); break; default: // CPX output.Append(Disassemble_AM_00(bbb, "CPX")); break; } break; } break; case 0b01: switch (aaa) { case 0b000: // ORA output.Append(Disassemble_AM_01(bbb, "ORA")); break; case 0b001: // AND output.Append(Disassemble_AM_01(bbb, "AND")); break; case 0b010: // EOR output.Append(Disassemble_AM_01(bbb, "EOR")); break; case 0b011: // ADC output.Append(Disassemble_AM_01(bbb, "ADC")); break; case 0b100: // STA output.Append(Disassemble_AM_01(bbb, "STA")); break; case 0b101: // LDA output.Append(Disassemble_AM_01(bbb, "LDA")); break; case 0b110: // CMP output.Append(Disassemble_AM_01(bbb, "CMP")); break; case 0b111: // SBC output.Append(Disassemble_AM_01(bbb, "SBC")); break; default: throw new System.InvalidOperationException("Illegal addressing mode"); } break; case 0b10: switch (aaa) { case 0b000: // ASL switch (bbb) { case 0b110: // 0x1a output.Append(Disassemble_Implied("*NOP")); break; default: output.Append(Disassemble_AM_10(bbb, "ASL")); break; } break; case 0b001: // ROL switch (bbb) { case 0b110: // 0x3a output.Append(Disassemble_Implied("*NOP")); break; default: output.Append(Disassemble_AM_10(bbb, "ROL")); break; } break; case 0b010: // LSR switch (bbb) { case 0b110: // 0x5a output.Append(Disassemble_Implied("*NOP")); break; default: output.Append(Disassemble_AM_10(bbb, "LSR")); break; } break; case 0b011: // ROR switch (bbb) { case 0b110: // 0x7a output.Append(Disassemble_Implied("*NOP")); break; default: output.Append(Disassemble_AM_10(bbb, "ROR")); break; } break; case 0b100: switch (bbb) { case 0b010: // TXA output.Append(Disassemble_Implied("TXA")); break; case 0b110: // TXS output.Append(Disassemble_Implied("TXS")); break; default: // STX output.Append(Disassemble_AM_10_x(bbb, "STX")); break; } break; case 0b101: switch (bbb) { case 0b010: // TAX output.Append(Disassemble_Implied("TAX")); break; case 0b110: // TSX output.Append(Disassemble_Implied("TSX")); break; default: // LDX output.Append(Disassemble_AM_10_x(bbb, "LDX")); break; } break; case 0b110: switch (bbb) { case 0b010: // DEX output.Append(Disassemble_Implied("DEX")); break; case 0b110: // 0xda output.Append(Disassemble_Implied("*NOP")); break; default: // DEC output.Append(Disassemble_AM_10(bbb, "DEC")); break; } break; case 0b111: switch (bbb) { case 0b010: // NOP output.Append(Disassemble_Implied("NOP")); break; case 0b110: // 0xfa output.Append(Disassemble_Implied("*NOP")); break; default: // INC output.Append(Disassemble_AM_10(bbb, "INC")); break; } break; default: throw new System.InvalidOperationException("Illegal instruction"); } break; case 0b11: switch (aaa) { case 0b000: switch (bbb) { case 0b010: output.Append(Disassemble_Immediate("*AAC")); break; default: output.Append(Disassemble_AM_01(bbb, "*SLO")); break; } break; case 0b001: switch (bbb) { case 0b010: output.Append(Disassemble_Immediate("*AAC")); break; default: output.Append(Disassemble_AM_01(bbb, "*RLA")); break; } break; case 0b010: output.Append(Disassemble_AM_01(bbb, "*SRE")); break; case 0b011: output.Append(Disassemble_AM_01(bbb, "*RRA")); break; case 0b100: output.Append(Disassemble_AM_11(bbb, "*SAX")); break; case 0b101: output.Append(Disassemble_AM_11(bbb, "*LAX")); break; case 0b110: output.Append(Disassemble_AM_11_x(bbb, "*DCP")); break; case 0b111: switch (bbb) { case 0b000: // *ISB case 0b001: case 0b011: case 0b100: case 0b101: case 0b110: case 0b111: output.Append(Disassemble_AM_01(bbb, "*ISB")); break; case 0b010: output.Append(Disassemble_AM_11(bbb, "*SBC")); break; default: throw new System.InvalidOperationException("Impossible addressing mode"); } break; default: throw new System.InvalidOperationException("Illegal instruction group"); } break; default: throw new System.InvalidOperationException("Impossible instruction"); } return output.ToString(); } public static string Dump_Flags(byte value) { var returned = new StringBuilder(); returned.Append((value & (byte)StatusBits.NF) != 0 ? "N" : "-"); returned.Append((value & (byte)StatusBits.VF) != 0 ? "O" : "-"); returned.Append((value & (byte)StatusBits.RF) != 0 ? "R" : "-"); returned.Append((value & (byte)StatusBits.BF) != 0 ? "B" : "-"); returned.Append((value & (byte)StatusBits.DF) != 0 ? "D" : "-"); returned.Append((value & (byte)StatusBits.IF) != 0 ? "I" : "-"); returned.Append((value & (byte)StatusBits.ZF) != 0 ? "Z" : "-"); returned.Append((value & (byte)StatusBits.CF) != 0 ? "C" : "-"); return returned.ToString(); } public static string Dump_ByteValue(byte value) { return value.ToString("X2"); } public static string Dump_WordValue(ushort value) { return value.ToString("X4"); } // private string ConvertAddress(ushort absolute) { if (symbols.Labels.TryGetValue(absolute, out string label)) return label; return "$" + Dump_WordValue(absolute); } private string ConvertAddress(byte absolute) { if (symbols.Labels.TryGetValue(absolute, out string label)) return label; return "$" + Dump_ByteValue(absolute); } private string ConvertConstant(ushort constant) { if (symbols.Constants.TryGetValue(constant, out string label)) return label; return Dump_DByte(constant); } private string ConvertConstant(byte constant) { if (symbols.Constants.TryGetValue(constant, out string label)) return label; return Dump_ByteValue(constant); } // private byte GetByte(ushort absolute) { return bus.Peek(absolute); } private ushort GetWord(ushort absolute) { return processor.PeekWord(absolute); } // private string Dump_Byte(ushort absolute) { return Dump_ByteValue(GetByte(absolute)); } private string Dump_DByte(ushort absolute) { return Dump_Byte(absolute) + " " + Dump_Byte(++absolute); } private string Dump_Word(ushort absolute) { return Dump_WordValue(GetWord(absolute)); } // private string Disassemble_Implied(string instruction) { return "\t" + instruction; } private string Disassemble_Absolute(string instruction) { return AM_Absolute_dump() + "\t" + instruction + " " + AM_Absolute(); } private string Disassemble_Indirect(string instruction) { return AM_Absolute_dump() + "\t" + instruction + " (" + AM_Absolute() + ")"; } private string Disassemble_Relative(string instruction, ushort absolute) { return AM_Immediate_dump() + "\t" + instruction + " $" + Dump_WordValue(absolute); } private string Disassemble_Immediate(string instruction) { return AM_Immediate_dump() + "\t" + instruction + " " + AM_Immediate(); } private string Disassemble_AM_00(int bbb, string instruction) { return AM_00_dump(bbb) + "\t" + instruction + " " + AM_00(bbb); } private string Disassemble_AM_01(int bbb, string instruction) { return AM_01_dump(bbb) + "\t" + instruction + " " + AM_01(bbb); } private string Disassemble_AM_10(int bbb, string instruction) { return AM_10_dump(bbb) + "\t" + instruction + " " + AM_10(bbb); } private string Disassemble_AM_10_x(int bbb, string instruction) { return AM_10_x_dump(bbb) + "\t" + instruction + " " + AM_10_x(bbb); } private string Disassemble_AM_11(int bbb, string instruction) { return AM_11_dump(bbb) + "\t" + instruction + " " + AM_11(bbb); } private string Disassemble_AM_11_x(int bbb, string instruction) { return AM_11_x_dump(bbb) + "\t" + instruction + " " + AM_11_x(bbb); } private string AM_Immediate_dump() { return Dump_Byte((ushort)(address + 1)); } private string AM_Immediate() { return "#$" + AM_Immediate_dump(); } private string AM_Absolute_dump() { return Dump_DByte((ushort)(address + 1)); } private string AM_Absolute() { return "$" + Dump_Word((ushort)(address + 1)); } private string AM_ZeroPage_dump() { return Dump_Byte((ushort)(address + 1)); } private string AM_ZeroPage() { return "$" + Dump_Byte((ushort)(address + 1)); } private string AM_ZeroPageX_dump() { return AM_ZeroPage_dump(); } private string AM_ZeroPageX() { return AM_ZeroPage() + ",X"; } private string AM_ZeroPageY_dump() { return AM_ZeroPage_dump(); } private string AM_ZeroPageY() { return AM_ZeroPage() + ",Y"; } private string AM_AbsoluteX_dump() { return AM_Absolute_dump(); } private string AM_AbsoluteX() { return AM_Absolute() + ",X"; } private string AM_AbsoluteY_dump() { return AM_Absolute_dump(); } private string AM_AbsoluteY() { return AM_Absolute() + ",Y"; } private string AM_IndexedIndirectX_dump() { return AM_ZeroPage_dump(); } private string AM_IndexedIndirectX() { return "($" + Dump_Byte((ushort)(address + 1)) + ",X)"; } private string AM_IndirectIndexedY_dump() { return AM_ZeroPage_dump(); } private string AM_IndirectIndexedY() { return "($" + Dump_Byte((ushort)(address + 1)) + "),Y"; } // private string AM_00_dump(int bbb) { switch (bbb) { case 0b000: return AM_Immediate_dump(); case 0b001: return AM_ZeroPage_dump(); case 0b011: return AM_Absolute_dump(); case 0b101: return AM_ZeroPageX_dump(); case 0b111: return AM_AbsoluteX_dump(); case 0b010: case 0b100: case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_00(int bbb) { switch (bbb) { case 0b000: return AM_Immediate(); case 0b001: return AM_ZeroPage(); case 0b011: return AM_Absolute(); case 0b101: return AM_ZeroPageX(); case 0b111: return AM_AbsoluteX(); case 0b010: case 0b100: case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_01_dump(int bbb) { switch (bbb) { case 0b000: return AM_IndexedIndirectX_dump(); case 0b001: return AM_ZeroPage_dump(); case 0b010: return AM_Immediate_dump(); case 0b011: return AM_Absolute_dump(); case 0b100: return AM_IndirectIndexedY_dump(); case 0b101: return AM_ZeroPageX_dump(); case 0b110: return AM_AbsoluteY_dump(); case 0b111: return AM_AbsoluteX_dump(); default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_01(int bbb) { switch (bbb) { case 0b000: return AM_IndexedIndirectX(); case 0b001: return AM_ZeroPage(); case 0b010: return AM_Immediate(); case 0b011: return AM_Absolute(); case 0b100: return AM_IndirectIndexedY(); case 0b101: return AM_ZeroPageX(); case 0b110: return AM_AbsoluteY(); case 0b111: return AM_AbsoluteX(); default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_10_dump(int bbb) { switch (bbb) { case 0b000: return AM_Immediate_dump(); case 0b001: return AM_ZeroPage_dump(); case 0b010: return ""; case 0b011: return AM_Absolute_dump(); case 0b101: return AM_ZeroPageX_dump(); case 0b111: return AM_AbsoluteX_dump(); case 0b100: case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_10(int bbb) { switch (bbb) { case 0b000: return AM_Immediate(); case 0b001: return AM_ZeroPage(); case 0b010: return "A"; case 0b011: return AM_Absolute(); case 0b101: return AM_ZeroPageX(); case 0b111: return AM_AbsoluteX(); case 0b100: case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_10_x_dump(int bbb) { switch (bbb) { case 0b000: return AM_Immediate_dump(); case 0b001: return AM_ZeroPage_dump(); case 0b010: return ""; case 0b011: return AM_Absolute_dump(); case 0b101: return AM_ZeroPageY_dump(); case 0b111: return AM_AbsoluteY_dump(); case 0b100: case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_10_x(int bbb) { switch (bbb) { case 0b000: return AM_Immediate(); case 0b001: return AM_ZeroPage(); case 0b010: return "A"; case 0b011: return AM_Absolute(); case 0b101: return AM_ZeroPageY(); case 0b111: return AM_AbsoluteY(); case 0b100: case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_11_dump(int bbb) { switch (bbb) { case 0b000: return AM_IndexedIndirectX_dump(); case 0b001: return AM_ZeroPage_dump(); case 0b010: return AM_Immediate_dump(); case 0b011: return AM_Absolute_dump(); case 0b100: return AM_IndirectIndexedY_dump(); case 0b101: return AM_ZeroPageY_dump(); case 0b111: return AM_AbsoluteY_dump(); case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_11_x_dump(int bbb) { switch (bbb) { case 0b000: return AM_IndexedIndirectX_dump(); case 0b001: return AM_ZeroPage_dump(); case 0b010: return AM_Immediate_dump(); case 0b011: return AM_Absolute_dump(); case 0b100: return AM_IndirectIndexedY_dump(); case 0b101: return AM_ZeroPageX_dump(); case 0b110: return AM_AbsoluteY_dump(); case 0b111: return AM_AbsoluteX_dump(); default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_11(int bbb) { switch (bbb) { case 0b000: return AM_IndexedIndirectX(); case 0b001: return AM_ZeroPage(); case 0b010: return AM_Immediate(); case 0b011: return AM_Absolute(); case 0b100: return AM_IndirectIndexedY(); case 0b101: return AM_ZeroPageY(); case 0b111: return AM_AbsoluteY(); case 0b110: default: throw new System.InvalidOperationException("Illegal addressing mode"); } } private string AM_11_x(int bbb) { switch (bbb) { case 0b000: return AM_IndexedIndirectX(); case 0b001: return AM_ZeroPage(); case 0b010: return AM_Immediate(); case 0b011: return AM_Absolute(); case 0b100: return AM_IndirectIndexedY(); case 0b101: return AM_ZeroPageX(); case 0b110: return AM_AbsoluteY(); case 0b111: return AM_AbsoluteX(); default: throw new System.InvalidOperationException("Illegal addressing mode"); } } } }