| bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame^] | 1 | /* General "disassemble this chunk" code. Used for debugging. */ |
| 2 | #include "dis-asm.h" |
| 3 | #include "disas.h" |
| 4 | #include "elf.h" |
| 5 | |
| 6 | /* Filled in by elfload.c. Simplistic, but will do for now. */ |
| 7 | unsigned int disas_num_syms; |
| 8 | void *disas_symtab; |
| 9 | const char *disas_strtab; |
| 10 | |
| 11 | /* Disassemble this for me please... (debugging). */ |
| 12 | void disas(FILE *out, void *code, unsigned long size, enum disas_type type) |
| 13 | { |
| 14 | uint8_t *pc; |
| 15 | int count; |
| 16 | struct disassemble_info disasm_info; |
| 17 | int (*print_insn)(bfd_vma pc, disassemble_info *info); |
| 18 | |
| 19 | INIT_DISASSEMBLE_INFO(disasm_info, out, fprintf); |
| 20 | |
| 21 | disasm_info.buffer = code; |
| 22 | disasm_info.buffer_vma = (unsigned long)code; |
| 23 | disasm_info.buffer_length = size; |
| 24 | |
| 25 | if (type == DISAS_TARGET) { |
| 26 | #ifdef WORDS_BIGENDIAN |
| 27 | disasm_info.endian = BFD_ENDIAN_BIG; |
| 28 | #else |
| 29 | disasm_info.endian = BFD_ENDIAN_LITTLE; |
| 30 | #endif |
| 31 | #ifdef __i386__ |
| 32 | disasm_info.mach = bfd_mach_i386_i386; |
| 33 | print_insn = print_insn_i386; |
| 34 | #elif defined(__powerpc__) |
| 35 | print_insn = print_insn_ppc; |
| 36 | #else |
| 37 | fprintf(out, "Asm output not supported on this arch\n"); |
| 38 | return; |
| 39 | #endif |
| 40 | } else { |
| 41 | /* Currently only source supported in x86. */ |
| 42 | disasm_info.endian = BFD_ENDIAN_LITTLE; |
| 43 | if (type == DISAS_I386_I386) |
| 44 | disasm_info.mach = bfd_mach_i386_i386; |
| 45 | else |
| 46 | disasm_info.mach = bfd_mach_i386_i8086; |
| 47 | print_insn = print_insn_i386; |
| 48 | } |
| 49 | |
| 50 | for (pc = code; pc < (uint8_t *)code + size; pc += count) { |
| 51 | fprintf(out, "0x%08lx: ", (long)pc); |
| 52 | count = print_insn((long)pc, &disasm_info); |
| 53 | fprintf(out, "\n"); |
| 54 | if (count < 0) |
| 55 | break; |
| 56 | } |
| 57 | } |
| 58 | |
| 59 | /* Look up symbol for debugging purpose. Returns "" if unknown. */ |
| 60 | const char *lookup_symbol(void *orig_addr) |
| 61 | { |
| 62 | unsigned int i; |
| 63 | /* Hack, because we know this is x86. */ |
| 64 | Elf32_Sym *sym = disas_symtab; |
| 65 | |
| 66 | for (i = 0; i < disas_num_syms; i++) { |
| 67 | if (sym[i].st_shndx == SHN_UNDEF |
| 68 | || sym[i].st_shndx >= SHN_LORESERVE) |
| 69 | continue; |
| 70 | |
| 71 | if (ELF_ST_TYPE(sym[i].st_info) != STT_FUNC) |
| 72 | continue; |
| 73 | |
| 74 | if ((long)orig_addr >= sym[i].st_value |
| 75 | && (long)orig_addr < sym[i].st_value + sym[i].st_size) |
| 76 | return disas_strtab + sym[i].st_name; |
| 77 | } |
| 78 | return ""; |
| 79 | } |