bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 1 | /* General "disassemble this chunk" code. Used for debugging. */ |
bellard | 5bbe929 | 2003-06-09 19:38:38 +0000 | [diff] [blame] | 2 | #include "config.h" |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 3 | #include "dis-asm.h" |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 4 | #include "elf.h" |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 5 | #include <errno.h> |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 6 | |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 7 | #include "cpu.h" |
| 8 | #include "exec-all.h" |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 9 | #include "disas.h" |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 10 | |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 11 | /* Filled in by elfload.c. Simplistic, but will do for now. */ |
bellard | e80cfcf | 2004-12-19 23:18:01 +0000 | [diff] [blame] | 12 | struct syminfo *syminfos = NULL; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 13 | |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 14 | /* Get LENGTH bytes from info's buffer, at target address memaddr. |
| 15 | Transfer them to myaddr. */ |
| 16 | int |
pbrook | 3a742b7 | 2008-10-22 15:55:18 +0000 | [diff] [blame] | 17 | buffer_read_memory(bfd_vma memaddr, bfd_byte *myaddr, int length, |
| 18 | struct disassemble_info *info) |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 19 | { |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 20 | if (memaddr < info->buffer_vma |
| 21 | || memaddr + length > info->buffer_vma + info->buffer_length) |
| 22 | /* Out of bounds. Use EIO because GDB uses it. */ |
| 23 | return EIO; |
| 24 | memcpy (myaddr, info->buffer + (memaddr - info->buffer_vma), length); |
| 25 | return 0; |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 26 | } |
| 27 | |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 28 | /* Get LENGTH bytes from info's buffer, at target address memaddr. |
| 29 | Transfer them to myaddr. */ |
| 30 | static int |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 31 | target_read_memory (bfd_vma memaddr, |
| 32 | bfd_byte *myaddr, |
| 33 | int length, |
| 34 | struct disassemble_info *info) |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 35 | { |
Blue Swirl | e612a1f | 2009-05-07 17:14:07 +0000 | [diff] [blame] | 36 | cpu_memory_rw_debug(cpu_single_env, memaddr, myaddr, length, 0); |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 37 | return 0; |
| 38 | } |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 39 | |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 40 | /* Print an error message. We can assume that this is in response to |
| 41 | an error return from buffer_read_memory. */ |
| 42 | void |
pbrook | 3a742b7 | 2008-10-22 15:55:18 +0000 | [diff] [blame] | 43 | perror_memory (int status, bfd_vma memaddr, struct disassemble_info *info) |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 44 | { |
| 45 | if (status != EIO) |
| 46 | /* Can't happen. */ |
| 47 | (*info->fprintf_func) (info->stream, "Unknown error %d\n", status); |
| 48 | else |
| 49 | /* Actually, address between memaddr and memaddr + len was |
| 50 | out of bounds. */ |
| 51 | (*info->fprintf_func) (info->stream, |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 52 | "Address 0x%" PRIx64 " is out of bounds.\n", memaddr); |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 53 | } |
| 54 | |
| 55 | /* This could be in a separate file, to save miniscule amounts of space |
| 56 | in statically linked executables. */ |
| 57 | |
| 58 | /* Just print the address is hex. This is included for completeness even |
| 59 | though both GDB and objdump provide their own (to print symbolic |
| 60 | addresses). */ |
| 61 | |
| 62 | void |
pbrook | 3a742b7 | 2008-10-22 15:55:18 +0000 | [diff] [blame] | 63 | generic_print_address (bfd_vma addr, struct disassemble_info *info) |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 64 | { |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 65 | (*info->fprintf_func) (info->stream, "0x%" PRIx64, addr); |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 66 | } |
| 67 | |
| 68 | /* Just return the given address. */ |
| 69 | |
| 70 | int |
pbrook | 3a742b7 | 2008-10-22 15:55:18 +0000 | [diff] [blame] | 71 | generic_symbol_at_address (bfd_vma addr, struct disassemble_info *info) |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 72 | { |
| 73 | return 1; |
| 74 | } |
| 75 | |
Aurelien Jarno | 903ec55 | 2010-03-29 02:12:51 +0200 | [diff] [blame] | 76 | bfd_vma bfd_getl64 (const bfd_byte *addr) |
| 77 | { |
| 78 | unsigned long long v; |
| 79 | |
| 80 | v = (unsigned long long) addr[0]; |
| 81 | v |= (unsigned long long) addr[1] << 8; |
| 82 | v |= (unsigned long long) addr[2] << 16; |
| 83 | v |= (unsigned long long) addr[3] << 24; |
| 84 | v |= (unsigned long long) addr[4] << 32; |
| 85 | v |= (unsigned long long) addr[5] << 40; |
| 86 | v |= (unsigned long long) addr[6] << 48; |
| 87 | v |= (unsigned long long) addr[7] << 56; |
| 88 | return (bfd_vma) v; |
| 89 | } |
| 90 | |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 91 | bfd_vma bfd_getl32 (const bfd_byte *addr) |
| 92 | { |
| 93 | unsigned long v; |
| 94 | |
| 95 | v = (unsigned long) addr[0]; |
| 96 | v |= (unsigned long) addr[1] << 8; |
| 97 | v |= (unsigned long) addr[2] << 16; |
| 98 | v |= (unsigned long) addr[3] << 24; |
| 99 | return (bfd_vma) v; |
| 100 | } |
| 101 | |
| 102 | bfd_vma bfd_getb32 (const bfd_byte *addr) |
| 103 | { |
| 104 | unsigned long v; |
| 105 | |
| 106 | v = (unsigned long) addr[0] << 24; |
| 107 | v |= (unsigned long) addr[1] << 16; |
| 108 | v |= (unsigned long) addr[2] << 8; |
| 109 | v |= (unsigned long) addr[3]; |
| 110 | return (bfd_vma) v; |
| 111 | } |
| 112 | |
bellard | 6af0bf9 | 2005-07-02 14:58:51 +0000 | [diff] [blame] | 113 | bfd_vma bfd_getl16 (const bfd_byte *addr) |
| 114 | { |
| 115 | unsigned long v; |
| 116 | |
| 117 | v = (unsigned long) addr[0]; |
| 118 | v |= (unsigned long) addr[1] << 8; |
| 119 | return (bfd_vma) v; |
| 120 | } |
| 121 | |
| 122 | bfd_vma bfd_getb16 (const bfd_byte *addr) |
| 123 | { |
| 124 | unsigned long v; |
| 125 | |
| 126 | v = (unsigned long) addr[0] << 24; |
| 127 | v |= (unsigned long) addr[1] << 16; |
| 128 | return (bfd_vma) v; |
| 129 | } |
| 130 | |
bellard | c2d551f | 2005-04-27 20:15:00 +0000 | [diff] [blame] | 131 | #ifdef TARGET_ARM |
| 132 | static int |
| 133 | print_insn_thumb1(bfd_vma pc, disassemble_info *info) |
| 134 | { |
| 135 | return print_insn_arm(pc | 1, info); |
| 136 | } |
| 137 | #endif |
| 138 | |
ths | e91c8a7 | 2007-06-03 13:35:16 +0000 | [diff] [blame] | 139 | /* Disassemble this for me please... (debugging). 'flags' has the following |
bellard | c2d551f | 2005-04-27 20:15:00 +0000 | [diff] [blame] | 140 | values: |
| 141 | i386 - nonzero means 16 bit code |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 142 | arm - nonzero means thumb code |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 143 | ppc - nonzero means little endian |
bellard | c2d551f | 2005-04-27 20:15:00 +0000 | [diff] [blame] | 144 | other targets - unused |
| 145 | */ |
bellard | 83b34f8 | 2005-01-23 20:26:30 +0000 | [diff] [blame] | 146 | void target_disas(FILE *out, target_ulong code, target_ulong size, int flags) |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 147 | { |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 148 | target_ulong pc; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 149 | int count; |
| 150 | struct disassemble_info disasm_info; |
| 151 | int (*print_insn)(bfd_vma pc, disassemble_info *info); |
| 152 | |
| 153 | INIT_DISASSEMBLE_INFO(disasm_info, out, fprintf); |
| 154 | |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 155 | disasm_info.read_memory_func = target_read_memory; |
| 156 | disasm_info.buffer_vma = code; |
| 157 | disasm_info.buffer_length = size; |
| 158 | |
| 159 | #ifdef TARGET_WORDS_BIGENDIAN |
| 160 | disasm_info.endian = BFD_ENDIAN_BIG; |
| 161 | #else |
| 162 | disasm_info.endian = BFD_ENDIAN_LITTLE; |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 163 | #endif |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 164 | #if defined(TARGET_I386) |
| 165 | if (flags == 2) |
| 166 | disasm_info.mach = bfd_mach_x86_64; |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 167 | else if (flags == 1) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 168 | disasm_info.mach = bfd_mach_i386_i8086; |
| 169 | else |
| 170 | disasm_info.mach = bfd_mach_i386_i386; |
| 171 | print_insn = print_insn_i386; |
| 172 | #elif defined(TARGET_ARM) |
bellard | c2d551f | 2005-04-27 20:15:00 +0000 | [diff] [blame] | 173 | if (flags) |
| 174 | print_insn = print_insn_thumb1; |
| 175 | else |
| 176 | print_insn = print_insn_arm; |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 177 | #elif defined(TARGET_SPARC) |
| 178 | print_insn = print_insn_sparc; |
bellard | 3475187 | 2005-07-02 14:31:34 +0000 | [diff] [blame] | 179 | #ifdef TARGET_SPARC64 |
| 180 | disasm_info.mach = bfd_mach_sparc_v9b; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 181 | #endif |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 182 | #elif defined(TARGET_PPC) |
j_mayer | 237c0af | 2007-09-29 12:01:46 +0000 | [diff] [blame] | 183 | if (flags >> 16) |
bellard | 111bfab | 2005-04-23 18:16:07 +0000 | [diff] [blame] | 184 | disasm_info.endian = BFD_ENDIAN_LITTLE; |
j_mayer | 237c0af | 2007-09-29 12:01:46 +0000 | [diff] [blame] | 185 | if (flags & 0xFFFF) { |
| 186 | /* If we have a precise definitions of the instructions set, use it */ |
| 187 | disasm_info.mach = flags & 0xFFFF; |
| 188 | } else { |
bellard | a245862 | 2005-07-23 22:39:53 +0000 | [diff] [blame] | 189 | #ifdef TARGET_PPC64 |
j_mayer | 237c0af | 2007-09-29 12:01:46 +0000 | [diff] [blame] | 190 | disasm_info.mach = bfd_mach_ppc64; |
bellard | a245862 | 2005-07-23 22:39:53 +0000 | [diff] [blame] | 191 | #else |
j_mayer | 237c0af | 2007-09-29 12:01:46 +0000 | [diff] [blame] | 192 | disasm_info.mach = bfd_mach_ppc; |
bellard | a245862 | 2005-07-23 22:39:53 +0000 | [diff] [blame] | 193 | #endif |
j_mayer | 237c0af | 2007-09-29 12:01:46 +0000 | [diff] [blame] | 194 | } |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 195 | print_insn = print_insn_ppc; |
pbrook | e6e5906 | 2006-10-22 00:18:54 +0000 | [diff] [blame] | 196 | #elif defined(TARGET_M68K) |
| 197 | print_insn = print_insn_m68k; |
bellard | 6af0bf9 | 2005-07-02 14:58:51 +0000 | [diff] [blame] | 198 | #elif defined(TARGET_MIPS) |
bellard | 76b3030 | 2005-12-17 01:10:04 +0000 | [diff] [blame] | 199 | #ifdef TARGET_WORDS_BIGENDIAN |
bellard | 6af0bf9 | 2005-07-02 14:58:51 +0000 | [diff] [blame] | 200 | print_insn = print_insn_big_mips; |
bellard | 76b3030 | 2005-12-17 01:10:04 +0000 | [diff] [blame] | 201 | #else |
| 202 | print_insn = print_insn_little_mips; |
| 203 | #endif |
bellard | fdf9b3e | 2006-04-27 21:07:38 +0000 | [diff] [blame] | 204 | #elif defined(TARGET_SH4) |
| 205 | disasm_info.mach = bfd_mach_sh4; |
| 206 | print_insn = print_insn_sh; |
j_mayer | eddf68a | 2007-04-05 07:22:49 +0000 | [diff] [blame] | 207 | #elif defined(TARGET_ALPHA) |
| 208 | disasm_info.mach = bfd_mach_alpha; |
| 209 | print_insn = print_insn_alpha; |
ths | a25fd13 | 2007-10-08 12:46:58 +0000 | [diff] [blame] | 210 | #elif defined(TARGET_CRIS) |
| 211 | disasm_info.mach = bfd_mach_cris_v32; |
| 212 | print_insn = print_insn_crisv32; |
Edgar E. Iglesias | e90e390 | 2009-05-20 20:07:38 +0200 | [diff] [blame] | 213 | #elif defined(TARGET_MICROBLAZE) |
| 214 | disasm_info.mach = bfd_arch_microblaze; |
| 215 | print_insn = print_insn_microblaze; |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 216 | #else |
bellard | b8076a7 | 2005-04-07 22:20:31 +0000 | [diff] [blame] | 217 | fprintf(out, "0x" TARGET_FMT_lx |
| 218 | ": Asm output not supported on this arch\n", code); |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 219 | return; |
| 220 | #endif |
| 221 | |
blueswir1 | 7e000c2 | 2009-02-13 21:44:41 +0000 | [diff] [blame] | 222 | for (pc = code; size > 0; pc += count, size -= count) { |
bellard | fa15e03 | 2005-01-31 23:32:31 +0000 | [diff] [blame] | 223 | fprintf(out, "0x" TARGET_FMT_lx ": ", pc); |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 224 | count = print_insn(pc, &disasm_info); |
| 225 | #if 0 |
| 226 | { |
| 227 | int i; |
| 228 | uint8_t b; |
| 229 | fprintf(out, " {"); |
| 230 | for(i = 0; i < count; i++) { |
| 231 | target_read_memory(pc + i, &b, 1, &disasm_info); |
| 232 | fprintf(out, " %02x", b); |
| 233 | } |
| 234 | fprintf(out, " }"); |
| 235 | } |
| 236 | #endif |
| 237 | fprintf(out, "\n"); |
| 238 | if (count < 0) |
| 239 | break; |
malc | 754d00a | 2009-04-21 22:26:22 +0000 | [diff] [blame] | 240 | if (size < count) { |
| 241 | fprintf(out, |
| 242 | "Disassembler disagrees with translator over instruction " |
| 243 | "decoding\n" |
| 244 | "Please report this to qemu-devel@nongnu.org\n"); |
| 245 | break; |
| 246 | } |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 247 | } |
| 248 | } |
| 249 | |
| 250 | /* Disassemble this for me please... (debugging). */ |
| 251 | void disas(FILE *out, void *code, unsigned long size) |
| 252 | { |
| 253 | unsigned long pc; |
| 254 | int count; |
| 255 | struct disassemble_info disasm_info; |
| 256 | int (*print_insn)(bfd_vma pc, disassemble_info *info); |
| 257 | |
| 258 | INIT_DISASSEMBLE_INFO(disasm_info, out, fprintf); |
bellard | c6105c0 | 2003-10-27 21:13:58 +0000 | [diff] [blame] | 259 | |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 260 | disasm_info.buffer = code; |
| 261 | disasm_info.buffer_vma = (unsigned long)code; |
| 262 | disasm_info.buffer_length = size; |
| 263 | |
Juan Quintela | e2542fe | 2009-07-27 16:13:06 +0200 | [diff] [blame] | 264 | #ifdef HOST_WORDS_BIGENDIAN |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 265 | disasm_info.endian = BFD_ENDIAN_BIG; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 266 | #else |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 267 | disasm_info.endian = BFD_ENDIAN_LITTLE; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 268 | #endif |
bellard | bc51c5c | 2004-03-17 23:46:04 +0000 | [diff] [blame] | 269 | #if defined(__i386__) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 270 | disasm_info.mach = bfd_mach_i386_i386; |
| 271 | print_insn = print_insn_i386; |
bellard | bc51c5c | 2004-03-17 23:46:04 +0000 | [diff] [blame] | 272 | #elif defined(__x86_64__) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 273 | disasm_info.mach = bfd_mach_x86_64; |
| 274 | print_insn = print_insn_i386; |
malc | e58ffeb | 2009-01-14 18:39:49 +0000 | [diff] [blame] | 275 | #elif defined(_ARCH_PPC) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 276 | print_insn = print_insn_ppc; |
bellard | a993ba8 | 2003-05-11 12:25:45 +0000 | [diff] [blame] | 277 | #elif defined(__alpha__) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 278 | print_insn = print_insn_alpha; |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 279 | #elif defined(__sparc__) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 280 | print_insn = print_insn_sparc; |
blueswir1 | 6ecd453 | 2007-04-08 11:22:29 +0000 | [diff] [blame] | 281 | #if defined(__sparc_v8plus__) || defined(__sparc_v8plusa__) || defined(__sparc_v9__) |
| 282 | disasm_info.mach = bfd_mach_sparc_v9b; |
| 283 | #endif |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 284 | #elif defined(__arm__) |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 285 | print_insn = print_insn_arm; |
bellard | 6af0bf9 | 2005-07-02 14:58:51 +0000 | [diff] [blame] | 286 | #elif defined(__MIPSEB__) |
| 287 | print_insn = print_insn_big_mips; |
| 288 | #elif defined(__MIPSEL__) |
| 289 | print_insn = print_insn_little_mips; |
bellard | 48024e4 | 2005-11-06 16:52:11 +0000 | [diff] [blame] | 290 | #elif defined(__m68k__) |
| 291 | print_insn = print_insn_m68k; |
ths | 8f860bb | 2007-07-31 23:44:21 +0000 | [diff] [blame] | 292 | #elif defined(__s390__) |
| 293 | print_insn = print_insn_s390; |
aurel32 | f54b3f9 | 2008-04-12 20:14:54 +0000 | [diff] [blame] | 294 | #elif defined(__hppa__) |
| 295 | print_insn = print_insn_hppa; |
Aurelien Jarno | 903ec55 | 2010-03-29 02:12:51 +0200 | [diff] [blame] | 296 | #elif defined(__ia64__) |
| 297 | print_insn = print_insn_ia64; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 298 | #else |
bellard | b8076a7 | 2005-04-07 22:20:31 +0000 | [diff] [blame] | 299 | fprintf(out, "0x%lx: Asm output not supported on this arch\n", |
| 300 | (long) code); |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 301 | return; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 302 | #endif |
blueswir1 | 7e000c2 | 2009-02-13 21:44:41 +0000 | [diff] [blame] | 303 | for (pc = (unsigned long)code; size > 0; pc += count, size -= count) { |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 304 | fprintf(out, "0x%08lx: ", pc); |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 305 | #ifdef __arm__ |
pbrook | 4615218 | 2006-07-30 19:16:29 +0000 | [diff] [blame] | 306 | /* since data is included in the code, it is better to |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 307 | display code data too */ |
pbrook | 4615218 | 2006-07-30 19:16:29 +0000 | [diff] [blame] | 308 | fprintf(out, "%08x ", (int)bfd_getl32((const bfd_byte *)pc)); |
bellard | aa0aa4f | 2003-06-09 15:23:31 +0000 | [diff] [blame] | 309 | #endif |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 310 | count = print_insn(pc, &disasm_info); |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 311 | fprintf(out, "\n"); |
| 312 | if (count < 0) |
| 313 | break; |
| 314 | } |
| 315 | } |
| 316 | |
| 317 | /* Look up symbol for debugging purpose. Returns "" if unknown. */ |
bellard | c27004e | 2005-01-03 23:35:10 +0000 | [diff] [blame] | 318 | const char *lookup_symbol(target_ulong orig_addr) |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 319 | { |
pbrook | 49918a7 | 2008-10-22 15:11:31 +0000 | [diff] [blame] | 320 | const char *symbol = ""; |
bellard | e80cfcf | 2004-12-19 23:18:01 +0000 | [diff] [blame] | 321 | struct syminfo *s; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 322 | |
bellard | e80cfcf | 2004-12-19 23:18:01 +0000 | [diff] [blame] | 323 | for (s = syminfos; s; s = s->next) { |
pbrook | 49918a7 | 2008-10-22 15:11:31 +0000 | [diff] [blame] | 324 | symbol = s->lookup_symbol(s, orig_addr); |
| 325 | if (symbol[0] != '\0') { |
| 326 | break; |
| 327 | } |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 328 | } |
pbrook | 49918a7 | 2008-10-22 15:11:31 +0000 | [diff] [blame] | 329 | |
| 330 | return symbol; |
bellard | b9adb4a | 2003-04-29 20:41:16 +0000 | [diff] [blame] | 331 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 332 | |
| 333 | #if !defined(CONFIG_USER_ONLY) |
| 334 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 335 | #include "monitor.h" |
bellard | 3d2cfdf | 2004-08-01 21:49:07 +0000 | [diff] [blame] | 336 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 337 | static int monitor_disas_is_physical; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 338 | static CPUState *monitor_disas_env; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 339 | |
| 340 | static int |
blueswir1 | a5f1b96 | 2008-08-17 20:21:51 +0000 | [diff] [blame] | 341 | monitor_read_memory (bfd_vma memaddr, bfd_byte *myaddr, int length, |
| 342 | struct disassemble_info *info) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 343 | { |
| 344 | if (monitor_disas_is_physical) { |
| 345 | cpu_physical_memory_rw(memaddr, myaddr, length, 0); |
| 346 | } else { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 347 | cpu_memory_rw_debug(monitor_disas_env, memaddr,myaddr, length, 0); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 348 | } |
| 349 | return 0; |
| 350 | } |
| 351 | |
Stefan Weil | 8b7968f | 2010-09-23 21:28:05 +0200 | [diff] [blame] | 352 | static int GCC_FMT_ATTR(2, 3) |
| 353 | monitor_fprintf(FILE *stream, const char *fmt, ...) |
bellard | 3d2cfdf | 2004-08-01 21:49:07 +0000 | [diff] [blame] | 354 | { |
| 355 | va_list ap; |
| 356 | va_start(ap, fmt); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 357 | monitor_vprintf((Monitor *)stream, fmt, ap); |
bellard | 3d2cfdf | 2004-08-01 21:49:07 +0000 | [diff] [blame] | 358 | va_end(ap); |
| 359 | return 0; |
| 360 | } |
| 361 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 362 | void monitor_disas(Monitor *mon, CPUState *env, |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 363 | target_ulong pc, int nb_insn, int is_physical, int flags) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 364 | { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 365 | int count, i; |
| 366 | struct disassemble_info disasm_info; |
| 367 | int (*print_insn)(bfd_vma pc, disassemble_info *info); |
| 368 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 369 | INIT_DISASSEMBLE_INFO(disasm_info, (FILE *)mon, monitor_fprintf); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 370 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 371 | monitor_disas_env = env; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 372 | monitor_disas_is_physical = is_physical; |
| 373 | disasm_info.read_memory_func = monitor_read_memory; |
| 374 | |
| 375 | disasm_info.buffer_vma = pc; |
| 376 | |
| 377 | #ifdef TARGET_WORDS_BIGENDIAN |
| 378 | disasm_info.endian = BFD_ENDIAN_BIG; |
| 379 | #else |
| 380 | disasm_info.endian = BFD_ENDIAN_LITTLE; |
| 381 | #endif |
| 382 | #if defined(TARGET_I386) |
bellard | fa15e03 | 2005-01-31 23:32:31 +0000 | [diff] [blame] | 383 | if (flags == 2) |
| 384 | disasm_info.mach = bfd_mach_x86_64; |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 385 | else if (flags == 1) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 386 | disasm_info.mach = bfd_mach_i386_i8086; |
bellard | fa15e03 | 2005-01-31 23:32:31 +0000 | [diff] [blame] | 387 | else |
| 388 | disasm_info.mach = bfd_mach_i386_i386; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 389 | print_insn = print_insn_i386; |
| 390 | #elif defined(TARGET_ARM) |
| 391 | print_insn = print_insn_arm; |
ths | cbd669d | 2007-12-25 00:26:36 +0000 | [diff] [blame] | 392 | #elif defined(TARGET_ALPHA) |
| 393 | print_insn = print_insn_alpha; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 394 | #elif defined(TARGET_SPARC) |
| 395 | print_insn = print_insn_sparc; |
blueswir1 | 682c4f1 | 2007-04-09 15:14:57 +0000 | [diff] [blame] | 396 | #ifdef TARGET_SPARC64 |
| 397 | disasm_info.mach = bfd_mach_sparc_v9b; |
| 398 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 399 | #elif defined(TARGET_PPC) |
bellard | a245862 | 2005-07-23 22:39:53 +0000 | [diff] [blame] | 400 | #ifdef TARGET_PPC64 |
| 401 | disasm_info.mach = bfd_mach_ppc64; |
| 402 | #else |
| 403 | disasm_info.mach = bfd_mach_ppc; |
| 404 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 405 | print_insn = print_insn_ppc; |
pbrook | e6e5906 | 2006-10-22 00:18:54 +0000 | [diff] [blame] | 406 | #elif defined(TARGET_M68K) |
| 407 | print_insn = print_insn_m68k; |
bellard | 6af0bf9 | 2005-07-02 14:58:51 +0000 | [diff] [blame] | 408 | #elif defined(TARGET_MIPS) |
bellard | 76b3030 | 2005-12-17 01:10:04 +0000 | [diff] [blame] | 409 | #ifdef TARGET_WORDS_BIGENDIAN |
bellard | 6af0bf9 | 2005-07-02 14:58:51 +0000 | [diff] [blame] | 410 | print_insn = print_insn_big_mips; |
bellard | 76b3030 | 2005-12-17 01:10:04 +0000 | [diff] [blame] | 411 | #else |
| 412 | print_insn = print_insn_little_mips; |
| 413 | #endif |
Magnus Damm | b4e1f07 | 2009-11-13 18:54:22 +0900 | [diff] [blame] | 414 | #elif defined(TARGET_SH4) |
| 415 | disasm_info.mach = bfd_mach_sh4; |
| 416 | print_insn = print_insn_sh; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 417 | #else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 418 | monitor_printf(mon, "0x" TARGET_FMT_lx |
| 419 | ": Asm output not supported on this arch\n", pc); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 420 | return; |
| 421 | #endif |
| 422 | |
| 423 | for(i = 0; i < nb_insn; i++) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 424 | monitor_printf(mon, "0x" TARGET_FMT_lx ": ", pc); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 425 | count = print_insn(pc, &disasm_info); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 426 | monitor_printf(mon, "\n"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 427 | if (count < 0) |
| 428 | break; |
| 429 | pc += count; |
| 430 | } |
| 431 | } |
| 432 | #endif |