BizHawk/BizHawk.Emulation.Cores/CPUs/Z80-GB/NewDisassembler.cs

588 lines
13 KiB
C#

using System;
using System.Collections.Generic;
using System.Text;
namespace BizHawk.Emulation.Common.Components.Z80GB
{
// adapted from the information at http://www.pastraiser.com/cpu/gameboy/gameboy_opcodes.html
public class NewDisassembler
{
static string[] table =
{
"NOP", // 00
"LD BC,d16", // 01
"LD (BC),A", // 02
"INC BC", // 03
"INC B", // 04
"DEC B", // 05
"LD B,d8", // 06
"RLCA", // 07
"LD (a16),SP", // 08
"ADD HL,BC", // 09
"LD A,(BC)", // 0a
"DEC BC", // 0b
"INC C", // 0c
"DEC C", // 0d
"LD C,d8", // 0e
"RRCA", // 0f
"STOP 0", // 10
"LD DE,d16", // 11
"LD (DE),A", // 12
"INC DE", // 13
"INC D", // 14
"DEC D", // 15
"LD D,d8", // 16
"RLA", // 17
"JR r8", // 18
"ADD HL,DE", // 19
"LD A,(DE)", // 1a
"DEC DE", // 1b
"INC E", // 1c
"DEC E", // 1d
"LD E,d8", // 1e
"RRA", // 1f
"JR NZ,r8", // 20
"LD HL,d16", // 21
"LD (HL+),A", // 22
"INC HL", // 23
"INC H", // 24
"DEC H", // 25
"LD H,d8", // 26
"DAA", // 27
"JR Z,r8", // 28
"ADD HL,HL", // 29
"LD A,(HL+)", // 2a
"DEC HL", // 2b
"INC L", // 2c
"DEC L", // 2d
"LD L,d8", // 2e
"CPL", // 2f
"JR NC,r8", // 30
"LD SP,d16", // 31
"LD (HL-),A", // 32
"INC SP", // 33
"INC (HL)", // 34
"DEC (HL)", // 35
"LD (HL),d8", // 36
"SCF", // 37
"JR C,r8", // 38
"ADD HL,SP", // 39
"LD A,(HL-)", // 3a
"DEC SP", // 3b
"INC A", // 3c
"DEC A", // 3d
"LD A,d8", // 3e
"CCF", // 3f
"LD B,B", // 40
"LD B,C", // 41
"LD B,D", // 42
"LD B,E", // 43
"LD B,H", // 44
"LD B,L", // 45
"LD B,(HL)", // 46
"LD B,A", // 47
"LD C,B", // 48
"LD C,C", // 49
"LD C,D", // 4a
"LD C,E", // 4b
"LD C,H", // 4c
"LD C,L", // 4d
"LD C,(HL)", // 4e
"LD C,A", // 4f
"LD D,B", // 50
"LD D,C", // 51
"LD D,D", // 52
"LD D,E", // 53
"LD D,H", // 54
"LD D,L", // 55
"LD D,(HL)", // 56
"LD D,A", // 57
"LD E,B", // 58
"LD E,C", // 59
"LD E,D", // 5a
"LD E,E", // 5b
"LD E,H", // 5c
"LD E,L", // 5d
"LD E,(HL)", // 5e
"LD E,A", // 5f
"LD H,B", // 60
"LD H,C", // 61
"LD H,D", // 62
"LD H,E", // 63
"LD H,H", // 64
"LD H,L", // 65
"LD H,(HL)", // 66
"LD H,A", // 67
"LD L,B", // 68
"LD L,C", // 69
"LD L,D", // 6a
"LD L,E", // 6b
"LD L,H", // 6c
"LD L,L", // 6d
"LD L,(HL)", // 6e
"LD L,A", // 6f
"LD (HL),B", // 70
"LD (HL),C", // 71
"LD (HL),D", // 72
"LD (HL),E", // 73
"LD (HL),H", // 74
"LD (HL),L", // 75
"HALT", // 76
"LD (HL),A", // 77
"LD A,B", // 78
"LD A,C", // 79
"LD A,D", // 7a
"LD A,E", // 7b
"LD A,H", // 7c
"LD A,L", // 7d
"LD A,(HL)", // 7e
"LD A,A", // 7f
"ADD A,B", // 80
"ADD A,C", // 81
"ADD A,D", // 82
"ADD A,E", // 83
"ADD A,H", // 84
"ADD A,L", // 85
"ADD A,(HL)", // 86
"ADD A,A", // 87
"ADC A,B", // 88
"ADC A,C", // 89
"ADC A,D", // 8a
"ADC A,E", // 8b
"ADC A,H", // 8c
"ADC A,L", // 8d
"ADC A,(HL)", // 8e
"ADC A,A", // 8f
"SUB B", // 90
"SUB C", // 91
"SUB D", // 92
"SUB E", // 93
"SUB H", // 94
"SUB L", // 95
"SUB (HL)", // 96
"SUB A", // 97
"SBC A,B", // 98
"SBC A,C", // 99
"SBC A,D", // 9a
"SBC A,E", // 9b
"SBC A,H", // 9c
"SBC A,L", // 9d
"SBC A,(HL)", // 9e
"SBC A,A", // 9f
"AND B", // a0
"AND C", // a1
"AND D", // a2
"AND E", // a3
"AND H", // a4
"AND L", // a5
"AND (HL)", // a6
"AND A", // a7
"XOR B", // a8
"XOR C", // a9
"XOR D", // aa
"XOR E", // ab
"XOR H", // ac
"XOR L", // ad
"XOR (HL)", // ae
"XOR A", // af
"OR B", // b0
"OR C", // b1
"OR D", // b2
"OR E", // b3
"OR H", // b4
"OR L", // b5
"OR (HL)", // b6
"OR A", // b7
"CP B", // b8
"CP C", // b9
"CP D", // ba
"CP E", // bb
"CP H", // bc
"CP L", // bd
"CP (HL)", // be
"CP A", // bf
"RET NZ", // c0
"POP BC", // c1
"JP NZ,a16", // c2
"JP a16", // c3
"CALL NZ,a16", // c4
"PUSH BC", // c5
"ADD A,d8", // c6
"RST 00H", // c7
"RET Z", // c8
"RET", // c9
"JP Z,a16", // ca
"PREFIX CB", // cb
"CALL Z,a16", // cc
"CALL a16", // cd
"ADC A,d8", // ce
"RST 08H", // cf
"RET NC", // d0
"POP DE", // d1
"JP NC,a16", // d2
"???", // d3
"CALL NC,a16", // d4
"PUSH DE", // d5
"SUB d8", // d6
"RST 10H", // d7
"RET C", // d8
"RETI", // d9
"JP C,a16", // da
"???", // db
"CALL C,a16", // dc
"???", // dd
"SBC A,d8", // de
"RST 18H", // df
"LDH (a8),A", // e0
"POP HL", // e1
"LD (C),A", // e2
"???", // e3
"???", // e4
"PUSH HL", // e5
"AND d8", // e6
"RST 20H", // e7
"ADD SP,r8", // e8
"JP (HL)", // e9
"LD (a16),A", // ea
"???", // eb
"???", // ec
"???", // ed
"XOR d8", // ee
"RST 28H", // ef
"LDH A,(a8)", // f0
"POP AF", // f1
"LD A,(C)", // f2
"DI", // f3
"???", // f4
"PUSH AF", // f5
"OR d8", // f6
"RST 30H", // f7
"LD HL,SP+r8", // f8
"LD SP,HL", // f9
"LD A,(a16)", // fa
"EI ", // fb
"???", // fc
"???", // fd
"CP d8", // fe
"RST 38H", // ff
"RLC B", // 00
"RLC C", // 01
"RLC D", // 02
"RLC E", // 03
"RLC H", // 04
"RLC L", // 05
"RLC (HL)", // 06
"RLC A", // 07
"RRC B", // 08
"RRC C", // 09
"RRC D", // 0a
"RRC E", // 0b
"RRC H", // 0c
"RRC L", // 0d
"RRC (HL)", // 0e
"RRC A", // 0f
"RL B", // 10
"RL C", // 11
"RL D", // 12
"RL E", // 13
"RL H", // 14
"RL L", // 15
"RL (HL)", // 16
"RL A", // 17
"RR B", // 18
"RR C", // 19
"RR D", // 1a
"RR E", // 1b
"RR H", // 1c
"RR L", // 1d
"RR (HL)", // 1e
"RR A", // 1f
"SLA B", // 20
"SLA C", // 21
"SLA D", // 22
"SLA E", // 23
"SLA H", // 24
"SLA L", // 25
"SLA (HL)", // 26
"SLA A", // 27
"SRA B", // 28
"SRA C", // 29
"SRA D", // 2a
"SRA E", // 2b
"SRA H", // 2c
"SRA L", // 2d
"SRA (HL)", // 2e
"SRA A", // 2f
"SWAP B", // 30
"SWAP C", // 31
"SWAP D", // 32
"SWAP E", // 33
"SWAP H", // 34
"SWAP L", // 35
"SWAP (HL)", // 36
"SWAP A", // 37
"SRL B", // 38
"SRL C", // 39
"SRL D", // 3a
"SRL E", // 3b
"SRL H", // 3c
"SRL L", // 3d
"SRL (HL)", // 3e
"SRL A", // 3f
"BIT 0,B", // 40
"BIT 0,C", // 41
"BIT 0,D", // 42
"BIT 0,E", // 43
"BIT 0,H", // 44
"BIT 0,L", // 45
"BIT 0,(HL)", // 46
"BIT 0,A", // 47
"BIT 1,B", // 48
"BIT 1,C", // 49
"BIT 1,D", // 4a
"BIT 1,E", // 4b
"BIT 1,H", // 4c
"BIT 1,L", // 4d
"BIT 1,(HL)", // 4e
"BIT 1,A", // 4f
"BIT 2,B", // 50
"BIT 2,C", // 51
"BIT 2,D", // 52
"BIT 2,E", // 53
"BIT 2,H", // 54
"BIT 2,L", // 55
"BIT 2,(HL)", // 56
"BIT 2,A", // 57
"BIT 3,B", // 58
"BIT 3,C", // 59
"BIT 3,D", // 5a
"BIT 3,E", // 5b
"BIT 3,H", // 5c
"BIT 3,L", // 5d
"BIT 3,(HL)", // 5e
"BIT 3,A", // 5f
"BIT 4,B", // 60
"BIT 4,C", // 61
"BIT 4,D", // 62
"BIT 4,E", // 63
"BIT 4,H", // 64
"BIT 4,L", // 65
"BIT 4,(HL)", // 66
"BIT 4,A", // 67
"BIT 5,B", // 68
"BIT 5,C", // 69
"BIT 5,D", // 6a
"BIT 5,E", // 6b
"BIT 5,H", // 6c
"BIT 5,L", // 6d
"BIT 5,(HL)", // 6e
"BIT 5,A", // 6f
"BIT 6,B", // 70
"BIT 6,C", // 71
"BIT 6,D", // 72
"BIT 6,E", // 73
"BIT 6,H", // 74
"BIT 6,L", // 75
"BIT 6,(HL)", // 76
"BIT 6,A", // 77
"BIT 7,B", // 78
"BIT 7,C", // 79
"BIT 7,D", // 7a
"BIT 7,E", // 7b
"BIT 7,H", // 7c
"BIT 7,L", // 7d
"BIT 7,(HL)", // 7e
"BIT 7,A", // 7f
"RES 0,B", // 80
"RES 0,C", // 81
"RES 0,D", // 82
"RES 0,E", // 83
"RES 0,H", // 84
"RES 0,L", // 85
"RES 0,(HL)", // 86
"RES 0,A", // 87
"RES 1,B", // 88
"RES 1,C", // 89
"RES 1,D", // 8a
"RES 1,E", // 8b
"RES 1,H", // 8c
"RES 1,L", // 8d
"RES 1,(HL)", // 8e
"RES 1,A", // 8f
"RES 2,B", // 90
"RES 2,C", // 91
"RES 2,D", // 92
"RES 2,E", // 93
"RES 2,H", // 94
"RES 2,L", // 95
"RES 2,(HL)", // 96
"RES 2,A", // 97
"RES 3,B", // 98
"RES 3,C", // 99
"RES 3,D", // 9a
"RES 3,E", // 9b
"RES 3,H", // 9c
"RES 3,L", // 9d
"RES 3,(HL)", // 9e
"RES 3,A", // 9f
"RES 4,B", // a0
"RES 4,C", // a1
"RES 4,D", // a2
"RES 4,E", // a3
"RES 4,H", // a4
"RES 4,L", // a5
"RES 4,(HL)", // a6
"RES 4,A", // a7
"RES 5,B", // a8
"RES 5,C", // a9
"RES 5,D", // aa
"RES 5,E", // ab
"RES 5,H", // ac
"RES 5,L", // ad
"RES 5,(HL)", // ae
"RES 5,A", // af
"RES 6,B", // b0
"RES 6,C", // b1
"RES 6,D", // b2
"RES 6,E", // b3
"RES 6,H", // b4
"RES 6,L", // b5
"RES 6,(HL)", // b6
"RES 6,A", // b7
"RES 7,B", // b8
"RES 7,C", // b9
"RES 7,D", // ba
"RES 7,E", // bb
"RES 7,H", // bc
"RES 7,L", // bd
"RES 7,(HL)", // be
"RES 7,A", // bf
"SET 0,B", // c0
"SET 0,C", // c1
"SET 0,D", // c2
"SET 0,E", // c3
"SET 0,H", // c4
"SET 0,L", // c5
"SET 0,(HL)", // c6
"SET 0,A", // c7
"SET 1,B", // c8
"SET 1,C", // c9
"SET 1,D", // ca
"SET 1,E", // cb
"SET 1,H", // cc
"SET 1,L", // cd
"SET 1,(HL)", // ce
"SET 1,A", // cf
"SET 2,B", // d0
"SET 2,C", // d1
"SET 2,D", // d2
"SET 2,E", // d3
"SET 2,H", // d4
"SET 2,L", // d5
"SET 2,(HL)", // d6
"SET 2,A", // d7
"SET 3,B", // d8
"SET 3,C", // d9
"SET 3,D", // da
"SET 3,E", // db
"SET 3,H", // dc
"SET 3,L", // dd
"SET 3,(HL)", // de
"SET 3,A", // df
"SET 4,B", // e0
"SET 4,C", // e1
"SET 4,D", // e2
"SET 4,E", // e3
"SET 4,H", // e4
"SET 4,L", // e5
"SET 4,(HL)", // e6
"SET 4,A", // e7
"SET 5,B", // e8
"SET 5,C", // e9
"SET 5,D", // ea
"SET 5,E", // eb
"SET 5,H", // ec
"SET 5,L", // ed
"SET 5,(HL)", // ee
"SET 5,A", // ef
"SET 6,B", // f0
"SET 6,C", // f1
"SET 6,D", // f2
"SET 6,E", // f3
"SET 6,H", // f4
"SET 6,L", // f5
"SET 6,(HL)", // f6
"SET 6,A", // f7
"SET 7,B", // f8
"SET 7,C", // f9
"SET 7,D", // fa
"SET 7,E", // fb
"SET 7,H", // fc
"SET 7,L", // fd
"SET 7,(HL)", // fe
"SET 7,A", // ff
};
public static string Disassemble(ushort addr, Func<ushort, byte> reader, out ushort size)
{
ushort origaddr = addr;
List<byte> bytes = new List<byte>();
bytes.Add(reader(addr++));
string result = table[bytes[0]];
if (bytes[0] == 0xcb)
{
bytes.Add(reader(addr++));
result = table[bytes[1] + 256];
}
if (result.Contains("d8"))
{
byte d = reader(addr++);
bytes.Add(d);
result = result.Replace("d8", string.Format("#{0:X2}h", d));
}
else if (result.Contains("d16"))
{
byte dlo = reader(addr++);
byte dhi = reader(addr++);
bytes.Add(dlo);
bytes.Add(dhi);
result = result.Replace("d16", string.Format("#{0:X2}{1:X2}h", dhi, dlo));
}
else if (result.Contains("a16"))
{
byte dlo = reader(addr++);
byte dhi = reader(addr++);
bytes.Add(dlo);
bytes.Add(dhi);
result = result.Replace("a16", string.Format("#{0:X2}{1:X2}h", dhi, dlo));
}
else if (result.Contains("a8"))
{
byte d = reader(addr++);
bytes.Add(d);
result = result.Replace("a8", string.Format("#FF{0:X2}h", d));
}
else if (result.Contains("r8"))
{
byte d = reader(addr++);
bytes.Add(d);
int offs = d;
if (offs >= 128)
offs -= 256;
result = result.Replace("r8", string.Format("{0:X4}h", (ushort)(addr + offs)));
}
StringBuilder ret = new StringBuilder();
ret.Append(string.Format("{0:X4}: ", origaddr));
foreach (var b in bytes)
ret.Append(string.Format("{0:X2} ", b));
while (ret.Length < 17)
ret.Append(' ');
ret.Append(result);
size = (ushort)(addr - origaddr);
return ret.ToString();
}
}
}