1c0d691abSRichard Henderson /*
2c0d691abSRichard Henderson * Routines for target instruction disassembly.
3c0d691abSRichard Henderson * SPDX-License-Identifier: GPL-2.0-or-later
4c0d691abSRichard Henderson */
5c0d691abSRichard Henderson
6c0d691abSRichard Henderson #include "qemu/osdep.h"
7c0d691abSRichard Henderson #include "disas/disas.h"
8c0d691abSRichard Henderson #include "disas/capstone.h"
9*4c833c60SRichard Henderson #include "exec/translator.h"
10c0d691abSRichard Henderson #include "disas-internal.h"
11c0d691abSRichard Henderson
12c0d691abSRichard Henderson
translator_read_memory(bfd_vma memaddr,bfd_byte * myaddr,int length,struct disassemble_info * info)13*4c833c60SRichard Henderson static int translator_read_memory(bfd_vma memaddr, bfd_byte *myaddr,
14*4c833c60SRichard Henderson int length, struct disassemble_info *info)
15c0d691abSRichard Henderson {
16*4c833c60SRichard Henderson const DisasContextBase *db = info->application_data;
17*4c833c60SRichard Henderson return translator_st(db, myaddr, memaddr, length) ? 0 : EIO;
18*4c833c60SRichard Henderson }
19*4c833c60SRichard Henderson
target_disas(FILE * out,CPUState * cpu,const struct DisasContextBase * db)20*4c833c60SRichard Henderson void target_disas(FILE *out, CPUState *cpu, const struct DisasContextBase *db)
21*4c833c60SRichard Henderson {
22*4c833c60SRichard Henderson uint64_t code = db->pc_first;
23*4c833c60SRichard Henderson size_t size = translator_st_len(db);
24c0d691abSRichard Henderson uint64_t pc;
25c0d691abSRichard Henderson int count;
26c0d691abSRichard Henderson CPUDebug s;
27c0d691abSRichard Henderson
28c0d691abSRichard Henderson disas_initialize_debug_target(&s, cpu);
29*4c833c60SRichard Henderson s.info.read_memory_func = translator_read_memory;
30*4c833c60SRichard Henderson s.info.application_data = (void *)db;
31c0d691abSRichard Henderson s.info.fprintf_func = fprintf;
32c0d691abSRichard Henderson s.info.stream = out;
33c0d691abSRichard Henderson s.info.buffer_vma = code;
34c0d691abSRichard Henderson s.info.buffer_length = size;
35c0d691abSRichard Henderson s.info.show_opcodes = true;
36c0d691abSRichard Henderson
37c0d691abSRichard Henderson if (s.info.cap_arch >= 0 && cap_disas_target(&s.info, code, size)) {
38c0d691abSRichard Henderson return;
39c0d691abSRichard Henderson }
40c0d691abSRichard Henderson
41c0d691abSRichard Henderson if (s.info.print_insn == NULL) {
42c0d691abSRichard Henderson s.info.print_insn = print_insn_od_target;
43c0d691abSRichard Henderson }
44c0d691abSRichard Henderson
45c0d691abSRichard Henderson for (pc = code; size > 0; pc += count, size -= count) {
46c0d691abSRichard Henderson fprintf(out, "0x%08" PRIx64 ": ", pc);
47c0d691abSRichard Henderson count = s.info.print_insn(pc, &s.info);
48c0d691abSRichard Henderson fprintf(out, "\n");
49c0d691abSRichard Henderson if (count < 0) {
50c0d691abSRichard Henderson break;
51c0d691abSRichard Henderson }
52c0d691abSRichard Henderson if (size < count) {
53c0d691abSRichard Henderson fprintf(out,
54c0d691abSRichard Henderson "Disassembler disagrees with translator over instruction "
55c0d691abSRichard Henderson "decoding\n"
56c0d691abSRichard Henderson "Please report this to qemu-devel@nongnu.org\n");
57c0d691abSRichard Henderson break;
58c0d691abSRichard Henderson }
59c0d691abSRichard Henderson }
60c0d691abSRichard Henderson }
61c0d691abSRichard Henderson
62c0d691abSRichard Henderson #ifdef CONFIG_PLUGIN
plugin_print_address(bfd_vma addr,struct disassemble_info * info)63c0d691abSRichard Henderson static void plugin_print_address(bfd_vma addr, struct disassemble_info *info)
64c0d691abSRichard Henderson {
65c0d691abSRichard Henderson /* does nothing */
66c0d691abSRichard Henderson }
67c0d691abSRichard Henderson
68c0d691abSRichard Henderson /*
69c0d691abSRichard Henderson * We should only be dissembling one instruction at a time here. If
70c0d691abSRichard Henderson * there is left over it usually indicates the front end has read more
71c0d691abSRichard Henderson * bytes than it needed.
72c0d691abSRichard Henderson */
plugin_disas(CPUState * cpu,const DisasContextBase * db,uint64_t addr,size_t size)73*4c833c60SRichard Henderson char *plugin_disas(CPUState *cpu, const DisasContextBase *db,
74*4c833c60SRichard Henderson uint64_t addr, size_t size)
75c0d691abSRichard Henderson {
76c0d691abSRichard Henderson CPUDebug s;
77c0d691abSRichard Henderson GString *ds = g_string_new(NULL);
78c0d691abSRichard Henderson
79c0d691abSRichard Henderson disas_initialize_debug_target(&s, cpu);
80*4c833c60SRichard Henderson s.info.read_memory_func = translator_read_memory;
81*4c833c60SRichard Henderson s.info.application_data = (void *)db;
82c0d691abSRichard Henderson s.info.fprintf_func = disas_gstring_printf;
83c0d691abSRichard Henderson s.info.stream = (FILE *)ds; /* abuse this slot */
84c0d691abSRichard Henderson s.info.buffer_vma = addr;
85c0d691abSRichard Henderson s.info.buffer_length = size;
86c0d691abSRichard Henderson s.info.print_address_func = plugin_print_address;
87c0d691abSRichard Henderson
88c0d691abSRichard Henderson if (s.info.cap_arch >= 0 && cap_disas_plugin(&s.info, addr, size)) {
89c0d691abSRichard Henderson ; /* done */
90c0d691abSRichard Henderson } else if (s.info.print_insn) {
91c0d691abSRichard Henderson s.info.print_insn(addr, &s.info);
92c0d691abSRichard Henderson } else {
93c0d691abSRichard Henderson ; /* cannot disassemble -- return empty string */
94c0d691abSRichard Henderson }
95c0d691abSRichard Henderson
96c0d691abSRichard Henderson /* Return the buffer, freeing the GString container. */
97c0d691abSRichard Henderson return g_string_free(ds, false);
98c0d691abSRichard Henderson }
99c0d691abSRichard Henderson #endif /* CONFIG_PLUGIN */
100