| @@ -3,6 +3,7 @@ | |||
| #include <stdio.h> | |||
| #include <stdlib.h> | |||
| #include <string.h> | |||
| #include <time.h> | |||
| #include "disassembler.h" | |||
| @@ -19,6 +20,7 @@ | |||
| #define NUM_BANKS(rom) \ | |||
| (((rom)->size + MMU_ROM_BANK_SIZE - 1) / MMU_ROM_BANK_SIZE) | |||
| #define MAX_BYTES_PER_LINE 16 | |||
| /* Structs and things */ | |||
| @@ -167,7 +169,7 @@ static void disassemble_header(Disassembly *dis, const ROM *rom) | |||
| DEBUG("Disassembling header") | |||
| WRITE_LINE(dis, ".rom_size\t\"%s\"\t\t; $%zX bytes in %zu banks", | |||
| size_to_string(buf, rom->size), rom->size, NUM_BANKS(rom)) | |||
| size_to_string(buf, rom->size), rom->size, NUM_BANKS(rom)) // TODO: fix alignment | |||
| WRITE_LINE(dis, ".rom_header\t$%04X", | |||
| rom->header_location) | |||
| WRITE_LINE(dis, ".rom_checksum\t%s", | |||
| @@ -225,21 +227,77 @@ static void mark_header(const ROM *rom, ROMBank *banks) | |||
| } | |||
| /* | |||
| Render a line of binary data within a block. | |||
| */ | |||
| static void render_binary(Disassembly *dis, size_t *idx, const ROMBank *bank) | |||
| { | |||
| size_t span = 1, i; | |||
| while (span < MAX_BYTES_PER_LINE && bank->types[*idx + span] == DT_BINARY) | |||
| span++; | |||
| char buf[4 * MAX_BYTES_PER_LINE + 1]; | |||
| for (i = 0; i < span; i++) | |||
| sprintf(buf + 4 * i, "$%02X ", bank->data[*idx + i]); | |||
| buf[4 * span - 1] = '\0'; | |||
| WRITE_LINE(dis, ".byte %s", buf) | |||
| (*idx) += span; | |||
| } | |||
| /* | |||
| Render a single instruction within a block. | |||
| */ | |||
| static void render_code(Disassembly *dis, size_t *idx, const ROMBank *bank) | |||
| { | |||
| DisasInstr *instr = disassemble_instruction(bank->data + *idx); | |||
| char padding[16], *split; | |||
| if ((split = strchr(instr->line, '\t'))) { | |||
| size_t tabs = (40 - (instr->line + strlen(instr->line) - split)) / 8; | |||
| padding[tabs] = '\0'; | |||
| while (tabs-- > 0) | |||
| padding[tabs] = '\t'; | |||
| } else { | |||
| strcpy(padding, "\t\t\t\t\t"); | |||
| } | |||
| WRITE_LINE(dis, "\t%s%s\t; %s", instr->line, padding, instr->bytestr) | |||
| (*idx) += instr->size; | |||
| disas_instr_free(instr); | |||
| } | |||
| /* | |||
| Render fully analyzed banks into lines of disassembly. | |||
| */ | |||
| static void render_banks(Disassembly *dis, ROMBank *banks) | |||
| static void render_banks(Disassembly *dis, const ROMBank *banks) | |||
| { | |||
| size_t bn = 0, i; | |||
| size_t bn = 0, idx; | |||
| DEBUG("Rendering lines") | |||
| while (banks[bn].data) { | |||
| TRACE("Rendering bank 0x%02zX (0x%06zX-0x%06zX)", bn, | |||
| bn * MMU_ROM_BANK_SIZE, bn * MMU_ROM_BANK_SIZE + banks[bn].size) | |||
| WRITE_LINE(dis, "") | |||
| WRITE_LINE(dis, ";; " HRULE) | |||
| WRITE_LINE(dis, "") | |||
| WRITE_LINE(dis, ".block $%02zX", bn) | |||
| for (i = 0; i < banks[bn].size; i++) { | |||
| if (banks[bn].types[i] == DT_BINARY) | |||
| WRITE_LINE(dis, ".byte $%02X", banks[bn].data[i]) | |||
| idx = 0; | |||
| while (idx < banks[bn].size) { | |||
| switch (banks[bn].types[idx]) { | |||
| case DT_BINARY: | |||
| render_binary(dis, &idx, &banks[bn]); | |||
| break; | |||
| case DT_CODE: | |||
| render_code(dis, &idx, &banks[bn]); | |||
| break; | |||
| case DT_HEADER: | |||
| idx += HEADER_SIZE; | |||
| break; | |||
| default: | |||
| FATAL("invalid data type %d at addr 0x%06zX", | |||
| banks[bn].types[idx], bn * MMU_ROM_BANK_SIZE + idx) | |||
| } | |||
| } | |||
| bn++; | |||
| } | |||
| @@ -261,7 +319,11 @@ char** disassemble(const ROM *rom) | |||
| ROMBank *banks = init_banks(rom); | |||
| mark_header(rom, banks); | |||
| // TODO: analyze(): set DT_CODE (future: make labels, slots) where appropriate | |||
| for (size_t i = 0; i < 0x1000; i++) | |||
| banks[0].types[i] = DT_CODE; | |||
| render_banks(&dis, banks); | |||
| free_banks(banks); | |||