13 from testlib
import assertEqual
, assertNotEqual
, assertIn
, assertNotIn
14 from testlib
import assertGreater
, assertRegexpMatches
, assertLess
15 from testlib
import GdbTest
17 MSTATUS_UIE
= 0x00000001
18 MSTATUS_SIE
= 0x00000002
19 MSTATUS_HIE
= 0x00000004
20 MSTATUS_MIE
= 0x00000008
21 MSTATUS_UPIE
= 0x00000010
22 MSTATUS_SPIE
= 0x00000020
23 MSTATUS_HPIE
= 0x00000040
24 MSTATUS_MPIE
= 0x00000080
25 MSTATUS_SPP
= 0x00000100
26 MSTATUS_HPP
= 0x00000600
27 MSTATUS_MPP
= 0x00001800
28 MSTATUS_FS
= 0x00006000
29 MSTATUS_XS
= 0x00018000
30 MSTATUS_MPRV
= 0x00020000
31 MSTATUS_PUM
= 0x00040000
32 MSTATUS_MXR
= 0x00080000
33 MSTATUS_VM
= 0x1F000000
34 MSTATUS32_SD
= 0x80000000
35 MSTATUS64_SD
= 0x8000000000000000
37 # pylint: disable=abstract-method
39 def ihex_line(address
, record_type
, data
):
40 assert len(data
) < 128
41 line
= ":%02X%04X%02X" % (len(data
), address
, record_type
)
43 check
+= address
% 256
49 line
+= "%02X" % value
50 line
+= "%02X\n" % ((256-check
)%256)
54 assert line
.startswith(":")
56 data_len
= int(line
[:2], 16)
57 address
= int(line
[2:6], 16)
58 record_type
= int(line
[6:8], 16)
60 for i
in range(data_len
):
61 data
+= "%c" % int(line
[8+2*i
:10+2*i
], 16)
62 return record_type
, address
, data
64 def readable_binary_string(s
):
65 return "".join("%02x" % ord(c
) for c
in s
)
67 class SimpleRegisterTest(GdbTest
):
68 def check_reg(self
, name
):
69 a
= random
.randrange(1<<self
.target
.xlen
)
70 b
= random
.randrange(1<<self
.target
.xlen
)
71 self
.gdb
.p("$%s=0x%x" % (name
, a
))
73 assertEqual(self
.gdb
.p("$%s" % name
), a
)
74 self
.gdb
.p("$%s=0x%x" % (name
, b
))
76 assertEqual(self
.gdb
.p("$%s" % name
), b
)
80 self
.gdb
.command("p *((int*) 0x%x)=0x13" % self
.target
.ram
)
81 self
.gdb
.command("p *((int*) 0x%x)=0x13" % (self
.target
.ram
+ 4))
82 self
.gdb
.command("p *((int*) 0x%x)=0x13" % (self
.target
.ram
+ 8))
83 self
.gdb
.command("p *((int*) 0x%x)=0x13" % (self
.target
.ram
+ 12))
84 self
.gdb
.command("p *((int*) 0x%x)=0x13" % (self
.target
.ram
+ 16))
85 self
.gdb
.p("$pc=0x%x" % self
.target
.ram
)
87 class SimpleS0Test(SimpleRegisterTest
):
91 class SimpleS1Test(SimpleRegisterTest
):
95 class SimpleT0Test(SimpleRegisterTest
):
99 class SimpleT1Test(SimpleRegisterTest
):
103 class SimpleF18Test(SimpleRegisterTest
):
104 def check_reg(self
, name
):
105 self
.gdb
.p_raw("$mstatus=$mstatus | 0x00006000")
109 self
.gdb
.p_raw("$%s=%f" % (name
, a
))
111 assertLess(abs(float(self
.gdb
.p_raw("$%s" % name
)) - a
), .001)
112 self
.gdb
.p_raw("$%s=%f" % (name
, b
))
114 assertLess(abs(float(self
.gdb
.p_raw("$%s" % name
)) - b
), .001)
116 def early_applicable(self
):
117 return self
.target
.extensionSupported('F')
120 self
.check_reg("f18")
122 class SimpleMemoryTest(GdbTest
):
123 def access_test(self
, size
, data_type
):
124 assertEqual(self
.gdb
.p("sizeof(%s)" % data_type
), size
)
125 a
= 0x86753095555aaaa & ((1<<(size
*8))-1)
126 b
= 0xdeadbeef12345678 & ((1<<(size
*8))-1)
127 self
.gdb
.p("*((%s*)0x%x) = 0x%x" % (data_type
, self
.target
.ram
, a
))
128 self
.gdb
.p("*((%s*)0x%x) = 0x%x" % (data_type
, self
.target
.ram
+ size
,
130 assertEqual(self
.gdb
.p("*((%s*)0x%x)" % (data_type
, self
.target
.ram
)),
132 assertEqual(self
.gdb
.p("*((%s*)0x%x)" % (
133 data_type
, self
.target
.ram
+ size
)), b
)
135 class MemTest8(SimpleMemoryTest
):
137 self
.access_test(1, 'char')
139 class MemTest16(SimpleMemoryTest
):
141 self
.access_test(2, 'short')
143 class MemTest32(SimpleMemoryTest
):
145 self
.access_test(4, 'int')
147 class MemTest64(SimpleMemoryTest
):
149 self
.access_test(8, 'long long')
151 # FIXME: I'm not passing back invalid addresses correctly in read/write memory.
152 #class MemTestReadInvalid(SimpleMemoryTest):
154 # # This test relies on 'gdb_report_data_abort enable' being executed in
155 # # the openocd.cfg file.
157 # self.gdb.p("*((int*)0xdeadbeef)")
158 # assert False, "Read should have failed."
159 # except testlib.CannotAccess as e:
160 # assertEqual(e.address, 0xdeadbeef)
161 # self.gdb.p("*((int*)0x%x)" % self.target.ram)
163 #class MemTestWriteInvalid(SimpleMemoryTest):
165 # # This test relies on 'gdb_report_data_abort enable' being executed in
166 # # the openocd.cfg file.
168 # self.gdb.p("*((int*)0xdeadbeef)=8675309")
169 # assert False, "Write should have failed."
170 # except testlib.CannotAccess as e:
171 # assertEqual(e.address, 0xdeadbeef)
172 # self.gdb.p("*((int*)0x%x)=6874742" % self.target.ram)
174 class MemTestBlock(GdbTest
):
178 a
= tempfile
.NamedTemporaryFile(suffix
=".ihex")
180 for i
in range(length
/ line_length
):
181 line_data
= "".join(["%c" % random
.randrange(256)
182 for _
in range(line_length
)])
184 a
.write(ihex_line(i
* line_length
, 0, line_data
))
187 self
.gdb
.command("restore %s 0x%x" % (a
.name
, self
.target
.ram
))
188 for offset
in range(0, length
, 19*4) + [length
-4]:
189 value
= self
.gdb
.p("*((int*)0x%x)" % (self
.target
.ram
+ offset
))
190 written
= ord(data
[offset
]) | \
191 (ord(data
[offset
+1]) << 8) | \
192 (ord(data
[offset
+2]) << 16) | \
193 (ord(data
[offset
+3]) << 24)
194 assertEqual(value
, written
)
196 b
= tempfile
.NamedTemporaryFile(suffix
=".ihex")
197 self
.gdb
.command("dump ihex memory %s 0x%x 0x%x" % (b
.name
,
198 self
.target
.ram
, self
.target
.ram
+ length
))
200 record_type
, address
, line_data
= ihex_parse(line
)
202 assertEqual(readable_binary_string(line_data
),
203 readable_binary_string(
204 data
[address
:address
+len(line_data
)]))
206 class InstantHaltTest(GdbTest
):
208 assertEqual(self
.target
.reset_vector
, self
.gdb
.p("$pc"))
209 # mcycle and minstret have no defined reset value.
210 mstatus
= self
.gdb
.p("$mstatus")
211 assertEqual(mstatus
& (MSTATUS_MIE | MSTATUS_MPRV |
214 class InstantChangePc(GdbTest
):
216 """Change the PC right as we come out of reset."""
218 self
.gdb
.command("p *((int*) 0x%x)=0x13" % self
.target
.ram
)
219 self
.gdb
.command("p *((int*) 0x%x)=0x13" % (self
.target
.ram
+ 4))
220 self
.gdb
.command("p *((int*) 0x%x)=0x13" % (self
.target
.ram
+ 8))
221 self
.gdb
.p("$pc=0x%x" % self
.target
.ram
)
223 assertEqual((self
.target
.ram
+ 4), self
.gdb
.p("$pc"))
225 assertEqual((self
.target
.ram
+ 8), self
.gdb
.p("$pc"))
227 class DebugTest(GdbTest
):
228 # Include malloc so that gdb can make function calls. I suspect this malloc
229 # will silently blow through the memory set aside for it, so be careful.
230 compile_args
= ("programs/debug.c", "programs/checksum.c",
231 "programs/tiny-malloc.c", "-DDEFINE_MALLOC", "-DDEFINE_FREE")
237 def exit(self
, expected_result
=0xc86455d4):
238 output
= self
.gdb
.c()
239 assertIn("Breakpoint", output
)
240 assertIn("_exit", output
)
241 assertEqual(self
.gdb
.p("status"), expected_result
)
243 class DebugCompareSections(DebugTest
):
245 output
= self
.gdb
.command("compare-sections")
247 for line
in output
.splitlines():
248 if line
.startswith("Section"):
249 assert line
.endswith("matched.")
251 assertGreater(matched
, 1)
253 class DebugFunctionCall(DebugTest
):
255 self
.gdb
.b("main:start")
257 assertEqual(self
.gdb
.p('fib(6)'), 8)
258 assertEqual(self
.gdb
.p('fib(7)'), 13)
261 class DebugChangeString(DebugTest
):
263 text
= "This little piggy went to the market."
264 self
.gdb
.b("main:start")
266 self
.gdb
.p('fox = "%s"' % text
)
267 self
.exit(0x43b497b8)
269 class DebugTurbostep(DebugTest
):
271 """Single step a bunch of times."""
272 self
.gdb
.b("main:start")
274 self
.gdb
.command("p i=0")
280 pc
= self
.gdb
.p("$pc")
281 assertNotEqual(last_pc
, pc
)
282 if last_pc
and pc
> last_pc
and pc
- last_pc
<= 4:
287 # Some basic sanity that we're not running between breakpoints or
289 assertGreater(jumps
, 1)
290 assertGreater(advances
, 5)
292 class DebugExit(DebugTest
):
296 class DebugSymbols(DebugTest
):
300 output
= self
.gdb
.c()
301 assertIn(", main ", output
)
302 output
= self
.gdb
.c()
303 assertIn(", rot13 ", output
)
305 class DebugBreakpoint(DebugTest
):
308 # The breakpoint should be hit exactly 2 times.
310 output
= self
.gdb
.c()
312 assertIn("Breakpoint ", output
)
313 assertIn("rot13 ", output
)
316 class Hwbp1(DebugTest
):
318 if self
.target
.instruction_hardware_breakpoint_count
< 1:
319 return 'not_applicable'
321 self
.gdb
.hbreak("rot13")
322 # The breakpoint should be hit exactly 2 times.
324 output
= self
.gdb
.c()
326 assertRegexpMatches(output
, r
"[bB]reakpoint")
327 assertIn("rot13 ", output
)
330 class Hwbp2(DebugTest
):
332 if self
.target
.instruction_hardware_breakpoint_count
< 2:
333 return 'not_applicable'
335 self
.gdb
.hbreak("main")
336 self
.gdb
.hbreak("rot13")
337 # We should hit 3 breakpoints.
338 for expected
in ("main", "rot13", "rot13"):
339 output
= self
.gdb
.c()
341 assertRegexpMatches(output
, r
"[bB]reakpoint")
342 assertIn("%s " % expected
, output
)
345 class TooManyHwbp(DebugTest
):
348 self
.gdb
.hbreak("*rot13 + %d" % (i
* 4))
350 output
= self
.gdb
.c()
351 assertIn("Cannot insert hardware breakpoint", output
)
352 # Clean up, otherwise the hardware breakpoints stay set and future
354 self
.gdb
.command("D")
356 class Registers(DebugTest
):
358 # Get to a point in the code where some registers have actually been
363 # Try both forms to test gdb.
364 for cmd
in ("info all-registers", "info registers all"):
365 output
= self
.gdb
.command(cmd
)
366 for reg
in ('zero', 'ra', 'sp', 'gp', 'tp'):
367 assertIn(reg
, output
)
370 # mcpuid is one of the few registers that should have the high bit set
372 # Leave this commented out until gdb and spike agree on the encoding of
373 # mcpuid (which is going to be renamed to misa in any case).
374 #assertRegexpMatches(output, ".*mcpuid *0x80")
377 # The instret register should always be changing.
380 # instret = self.gdb.p("$instret")
381 # assertNotEqual(instret, last_instret)
382 # last_instret = instret
387 class UserInterrupt(DebugTest
):
389 """Sending gdb ^C while the program is running should cause it to
391 self
.gdb
.b("main:start")
394 self
.gdb
.c(wait
=False)
396 output
= self
.gdb
.interrupt()
397 assert "main" in output
398 assertGreater(self
.gdb
.p("j"), 10)
402 class MulticoreTest(GdbTest
):
403 compile_args
= ("programs/infinite_loop.S", )
408 self
.gdb
.b("main_end")
409 self
.gdb
.command("set non-stop on")
413 threads
= self
.gdb
.threads()
415 return 'not_applicable'
416 # Run through the entire loop.
419 self
.gdb
.p("$pc=_start")
424 for t
in self
.gdb
.threads():
425 assertIn("main", t
.frame
)
431 for t
in self
.gdb
.threads():
432 assertIn("main_end", t
.frame
)
433 # Check register values.
435 hart_id
= self
.gdb
.p("$x1")
436 assertNotIn(hart_id
, hart_ids
)
437 hart_ids
.append(hart_id
)
438 for n
in range(2, 32):
439 value
= self
.gdb
.p("$x%d" % n
)
440 assertEqual(value
, hart_ids
[-1] + n
- 1)
442 # Confirmed that we read different register values for different harts.
443 # Write a new value to x1, and run through the add sequence again.
445 # This part isn't working right, because gdb doesn't resume Thread 2
446 # when asked. I don't know the root cause for that, but up to this
447 # point the test is still useful.
451 # self.gdb.p("$x1=0x%x" % (int(t.id) + 0x800))
452 # self.gdb.p("$pc=main_post_csrr")
456 # for t in self.gdb.threads():
457 # assertIn("main_end", t.frame)
458 # # Check register values.
460 # for n in range(1, 32):
461 # value = self.gdb.p("$x%d" % n)
462 # assertEqual(value, int(t.id) + 0x800 + n - 1)
464 class StepTest(GdbTest
):
465 compile_args
= ("programs/step.S", )
473 main_address
= self
.gdb
.p("$pc")
474 if self
.target
.extensionSupported("c"):
475 sequence
= (4, 8, 0xc, 0xe, 0x14, 0x18, 0x22, 0x1c, 0x24, 0x24)
477 sequence
= (4, 8, 0xc, 0x10, 0x18, 0x1c, 0x28, 0x20, 0x2c, 0x2c)
478 for expected
in sequence
:
480 pc
= self
.gdb
.p("$pc")
481 assertEqual("%x" % (pc
- main_address
), "%x" % expected
)
483 class TriggerTest(GdbTest
):
484 compile_args
= ("programs/trigger.S", )
492 output
= self
.gdb
.c()
493 assertIn("Breakpoint", output
)
494 assertIn("_exit", output
)
496 class TriggerExecuteInstant(TriggerTest
):
497 """Test an execute breakpoint on the first instruction executed out of
500 main_address
= self
.gdb
.p("$pc")
501 self
.gdb
.command("hbreak *0x%x" % (main_address
+ 4))
503 assertEqual(self
.gdb
.p("$pc"), main_address
+4)
505 # FIXME: Triggers aren't quite working yet
506 #class TriggerLoadAddress(TriggerTest):
508 # self.gdb.command("rwatch *((&data)+1)")
509 # output = self.gdb.c()
510 # assertIn("read_loop", output)
511 # assertEqual(self.gdb.p("$a0"),
512 # self.gdb.p("(&data)+1"))
515 class TriggerLoadAddressInstant(TriggerTest
):
516 """Test a load address breakpoint on the first instruction executed out of
519 self
.gdb
.command("b just_before_read_loop")
521 read_loop
= self
.gdb
.p("&read_loop")
522 self
.gdb
.command("rwatch data")
524 # Accept hitting the breakpoint before or after the load instruction.
525 assertIn(self
.gdb
.p("$pc"), [read_loop
, read_loop
+ 4])
526 assertEqual(self
.gdb
.p("$a0"), self
.gdb
.p("&data"))
528 # FIXME: Triggers aren't quite working yet
529 #class TriggerStoreAddress(TriggerTest):
531 # self.gdb.command("watch *((&data)+3)")
532 # output = self.gdb.c()
533 # assertIn("write_loop", output)
534 # assertEqual(self.gdb.p("$a0"),
535 # self.gdb.p("(&data)+3"))
538 class TriggerStoreAddressInstant(TriggerTest
):
540 """Test a store address breakpoint on the first instruction executed out
542 self
.gdb
.command("b just_before_write_loop")
544 write_loop
= self
.gdb
.p("&write_loop")
545 self
.gdb
.command("watch data")
547 # Accept hitting the breakpoint before or after the store instruction.
548 assertIn(self
.gdb
.p("$pc"), [write_loop
, write_loop
+ 4])
549 assertEqual(self
.gdb
.p("$a0"), self
.gdb
.p("&data"))
551 class TriggerDmode(TriggerTest
):
552 def check_triggers(self
, tdata1_lsbs
, tdata2
):
553 dmode
= 1 << (self
.target
.xlen
-5)
557 if self
.target
.xlen
== 32:
559 elif self
.target
.xlen
== 64:
560 xlen_type
= 'long long'
562 raise NotImplementedError
567 tdata1
= self
.gdb
.p("((%s *)&data)[%d]" % (xlen_type
, 2*i
))
570 tdata2
= self
.gdb
.p("((%s *)&data)[%d]" % (xlen_type
, 2*i
+1))
575 assertEqual(tdata1
& 0xffff, tdata1_lsbs
)
576 assertEqual(tdata2
, tdata2
)
579 assertEqual(dmode_count
, 1)
584 self
.gdb
.command("hbreak write_load_trigger")
585 self
.gdb
.b("clear_triggers")
586 self
.gdb
.p("$pc=write_store_trigger")
587 output
= self
.gdb
.c()
588 assertIn("write_load_trigger", output
)
589 self
.check_triggers((1<<6) |
(1<<1), 0xdeadbee0)
590 output
= self
.gdb
.c()
591 assertIn("clear_triggers", output
)
592 self
.check_triggers((1<<6) |
(1<<0), 0xfeedac00)
594 class RegsTest(GdbTest
):
595 compile_args
= ("programs/regs.S", )
599 self
.gdb
.b("handle_trap")
602 class WriteGprs(RegsTest
):
604 regs
= [("x%d" % n
) for n
in range(2, 32)]
606 self
.gdb
.p("$pc=write_regs")
607 for i
, r
in enumerate(regs
):
608 self
.gdb
.p("$%s=%d" % (r
, (0xdeadbeef<<i
)+17))
609 self
.gdb
.p("$x1=data")
610 self
.gdb
.command("b all_done")
611 output
= self
.gdb
.c()
612 assertIn("Breakpoint ", output
)
614 # Just to get this data in the log.
615 self
.gdb
.command("x/30gx data")
616 self
.gdb
.command("info registers")
617 for n
in range(len(regs
)):
618 assertEqual(self
.gdb
.x("data+%d" % (8*n
), 'g'),
619 ((0xdeadbeef<<n
)+17) & ((1<<self
.target
.xlen
)-1))
621 class WriteCsrs(RegsTest
):
623 # As much a test of gdb as of the simulator.
624 self
.gdb
.p("$mscratch=0")
626 assertEqual(self
.gdb
.p("$mscratch"), 0)
627 self
.gdb
.p("$mscratch=123")
629 assertEqual(self
.gdb
.p("$mscratch"), 123)
631 self
.gdb
.p("$pc=write_regs")
632 self
.gdb
.p("$x1=data")
633 self
.gdb
.command("b all_done")
634 self
.gdb
.command("c")
636 assertEqual(123, self
.gdb
.p("$mscratch"))
637 assertEqual(123, self
.gdb
.p("$x1"))
638 assertEqual(123, self
.gdb
.p("$csr832"))
640 class DownloadTest(GdbTest
):
642 # pylint: disable=attribute-defined-outside-init
643 length
= min(2**10, self
.target
.ram_size
- 2048)
644 self
.download_c
= tempfile
.NamedTemporaryFile(prefix
="download_",
645 suffix
=".c", delete
=False)
646 self
.download_c
.write("#include <stdint.h>\n")
647 self
.download_c
.write(
648 "unsigned int crc32a(uint8_t *message, unsigned int size);\n")
649 self
.download_c
.write("uint32_t length = %d;\n" % length
)
650 self
.download_c
.write("uint8_t d[%d] = {\n" % length
)
652 assert length
% 16 == 0
653 for i
in range(length
/ 16):
654 self
.download_c
.write(" /* 0x%04x */ " % (i
* 16))
656 value
= random
.randrange(1<<8)
657 self
.download_c
.write("0x%02x, " % value
)
658 self
.crc
= binascii
.crc32("%c" % value
, self
.crc
)
659 self
.download_c
.write("\n")
660 self
.download_c
.write("};\n")
661 self
.download_c
.write("uint8_t *data = &d[0];\n")
662 self
.download_c
.write(
663 "uint32_t main() { return crc32a(data, length); }\n")
664 self
.download_c
.flush()
669 self
.binary
= self
.target
.compile(self
.download_c
.name
,
670 "programs/checksum.c")
671 self
.gdb
.command("file %s" % self
.binary
)
675 self
.gdb
.command("b _exit")
676 self
.gdb
.c(timeout
=60)
677 assertEqual(self
.gdb
.p("status"), self
.crc
)
678 os
.unlink(self
.download_c
.name
)
680 # FIXME: PRIV isn't implemented in the current OpenOCD
681 #class MprvTest(GdbTest):
682 # compile_args = ("programs/mprv.S", )
687 # """Test that the debugger can access memory when MPRV is set."""
688 # self.gdb.c(wait=False)
690 # self.gdb.interrupt()
691 # output = self.gdb.command("p/x *(int*)(((char*)&data)-0x80000000)")
692 # assertIn("0xbead", output)
694 #class PrivTest(GdbTest):
695 # compile_args = ("programs/priv.S", )
697 # # pylint: disable=attribute-defined-outside-init
700 # misa = self.target.misa
701 # self.supported = set()
703 # self.supported.add(0)
705 # self.supported.add(1)
707 # self.supported.add(2)
708 # self.supported.add(3)
710 #class PrivRw(PrivTest):
712 # """Test reading/writing priv."""
713 # for privilege in range(4):
714 # self.gdb.p("$priv=%d" % privilege)
716 # actual = self.gdb.p("$priv")
717 # assertIn(actual, self.supported)
718 # if privilege in self.supported:
719 # assertEqual(actual, privilege)
721 #class PrivChange(PrivTest):
723 # """Test that the core's privilege level actually changes."""
725 # if 0 not in self.supported:
726 # return 'not_applicable'
732 # self.gdb.p("$priv=3")
733 # main_address = self.gdb.p("$pc")
735 # assertEqual("%x" % self.gdb.p("$pc"), "%x" % (main_address+4))
738 # self.gdb.p("$priv=0")
740 # # Should have taken an exception, so be nowhere near main.
741 # pc = self.gdb.p("$pc")
742 # assertTrue(pc < main_address or pc > main_address + 0x100)
746 parser
= argparse
.ArgumentParser(
747 description
="Test that gdb can talk to a RISC-V target.",
749 Example command line from the real world:
750 Run all RegsTest cases against a physical FPGA, with custom openocd command:
751 ./gdbserver.py --freedom-e300 --server_cmd "$HOME/SiFive/openocd/src/openocd -s $HOME/SiFive/openocd/tcl -d" Simple
753 targets
.add_target_options(parser
)
755 testlib
.add_test_run_options(parser
)
757 # TODO: remove global
758 global parsed
# pylint: disable=global-statement
759 parsed
= parser
.parse_args()
761 target
= parsed
.target(parsed
.server_cmd
, parsed
.sim_cmd
, parsed
.isolate
)
763 target
.xlen
= parsed
.xlen
765 module
= sys
.modules
[__name__
]
767 return testlib
.run_all_tests(module
, target
, parsed
)
769 # TROUBLESHOOTING TIPS
770 # If a particular test fails, run just that one test, eg.:
771 # ./gdbserver.py MprvTest.test_mprv
772 # Then inspect gdb.log and spike.log to see what happened in more detail.
774 if __name__
== '__main__':