1 /* Self tests for disassembler for GDB, the GNU debugger.
3 Copyright (C) 2017-2020 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
24 #include "gdbsupport/selftest.h"
25 #include "selftest-arch.h"
30 /* Test disassembly of one instruction. */
33 print_one_insn_test (struct gdbarch
*gdbarch
)
36 const gdb_byte
*insn
= NULL
;
38 switch (gdbarch_bfd_arch_info (gdbarch
)->arch
)
42 static const gdb_byte bfin_insn
[] = {0x17, 0xe1, 0xff, 0xff};
45 len
= sizeof (bfin_insn
);
49 static const gdb_byte arm_insn
[] = {0x0, 0x0, 0xa0, 0xe3};
52 len
= sizeof (arm_insn
);
62 static const gdb_byte s390_insn
[] = {0x07, 0x07};
65 len
= sizeof (s390_insn
);
67 case bfd_arch_xstormy16
:
69 static const gdb_byte xstormy16_insn
[] = {0x0, 0x0};
71 insn
= xstormy16_insn
;
72 len
= sizeof (xstormy16_insn
);
76 if (gdbarch_bfd_arch_info (gdbarch
)->mach
== bfd_mach_arc_arc601
)
82 /* nios2, riscv, and score need to know the current instruction
83 to select breakpoint instruction. Give the breakpoint
84 instruction kind explicitly. */
87 insn
= gdbarch_sw_breakpoint_from_kind (gdbarch
, 4, &bplen
);
93 /* Test disassemble breakpoint instruction. */
95 int kind
= gdbarch_breakpoint_kind_from_pc (gdbarch
, &pc
);
98 insn
= gdbarch_sw_breakpoint_from_kind (gdbarch
, kind
, &bplen
);
104 SELF_CHECK (len
> 0);
106 /* Test gdb_disassembler for a given gdbarch by reading data from a
107 pre-allocated buffer. If you want to see the disassembled
108 instruction printed to gdb_stdout, set verbose to true. */
109 static const bool verbose
= false;
111 class gdb_disassembler_test
: public gdb_disassembler
115 explicit gdb_disassembler_test (struct gdbarch
*gdbarch
,
116 const gdb_byte
*insn
,
118 : gdb_disassembler (gdbarch
,
119 (verbose
? gdb_stdout
: &null_stream
),
120 gdb_disassembler_test::read_memory
),
121 m_insn (insn
), m_len (len
)
126 print_insn (CORE_ADDR memaddr
)
130 fprintf_unfiltered (stream (), "%s ",
131 gdbarch_bfd_arch_info (arch ())->arch_name
);
134 int len
= gdb_disassembler::print_insn (memaddr
);
137 fprintf_unfiltered (stream (), "\n");
143 /* A buffer contain one instruction. */
144 const gdb_byte
*m_insn
;
146 /* Length of the buffer. */
149 static int read_memory (bfd_vma memaddr
, gdb_byte
*myaddr
,
150 unsigned int len
, struct disassemble_info
*info
)
152 gdb_disassembler_test
*self
153 = static_cast<gdb_disassembler_test
*>(info
->application_data
);
155 /* The disassembler in opcodes may read more data than one
156 instruction. Supply infinite consecutive copies
157 of the same instruction. */
158 for (size_t i
= 0; i
< len
; i
++)
159 myaddr
[i
] = self
->m_insn
[(memaddr
+ i
) % self
->m_len
];
165 gdb_disassembler_test
di (gdbarch
, insn
, len
);
167 SELF_CHECK (di
.print_insn (0) == len
);
170 /* Test disassembly on memory error. */
173 memory_error_test (struct gdbarch
*gdbarch
)
175 class gdb_disassembler_test
: public gdb_disassembler
178 gdb_disassembler_test (struct gdbarch
*gdbarch
)
179 : gdb_disassembler (gdbarch
, &null_stream
,
180 gdb_disassembler_test::read_memory
)
184 static int read_memory (bfd_vma memaddr
, gdb_byte
*myaddr
,
186 struct disassemble_info
*info
)
188 /* Always return an error. */
193 gdb_disassembler_test
di (gdbarch
);
194 bool saw_memory_error
= false;
200 catch (const gdb_exception_error
&ex
)
202 if (ex
.error
== MEMORY_ERROR
)
203 saw_memory_error
= true;
206 /* Expect MEMORY_ERROR. */
207 SELF_CHECK (saw_memory_error
);
210 } // namespace selftests
211 #endif /* GDB_SELF_TEST */
214 _initialize_disasm_selftests (void)
217 selftests::register_test_foreach_arch ("print_one_insn",
218 selftests::print_one_insn_test
);
219 selftests::register_test_foreach_arch ("memory_error",
220 selftests::memory_error_test
);