1 from nmigen
import Signal
, Module
, Record
2 from nmigen
.back
.pysim
import Simulator
, Delay
3 from nmigen
.compat
.sim
import run_simulation
, Settle
4 from nmutil
.formaltest
import FHDLTestCase
5 from nmigen
.cli
import rtlil
7 from soc
.config
.test
.test_loadstore
import TestMemPspec
8 from soc
.config
.loadstore
import ConfigMemoryPortInterface
9 from openpower
.exceptions
import LDSTExceptionTuple
12 def wait_busy(port
, no
=False, debug
=None):
15 busy
= yield port
.busy_o
16 print("busy", no
, busy
, cnt
, debug
)
23 def wait_addr(port
,debug
=None):
26 addr_ok
= yield port
.addr_ok_o
27 print("addrok", addr_ok
,cnt
,debug
)
37 ldok
= yield port
.ld
.ok
38 exc_happened
= yield port
.exc_o
.happened
39 print("ldok", ldok
, "exception", exc_happened
, "count", cnt
)
41 if ldok
or exc_happened
:
46 def pi_st(port1
, addr
, data
, datalen
, msr_pr
=0, is_dcbz
=0):
48 # have to wait until not busy
49 yield from wait_busy(port1
,debug
="pi_st_A") # wait while busy
51 # set up a ST on the port. address first:
52 yield port1
.is_dcbz_i
.eq(is_dcbz
) # reset dcbz too
53 yield port1
.is_st_i
.eq(1) # indicate ST
54 yield port1
.data_len
.eq(datalen
) # ST length (1/2/4/8)
55 yield port1
.msr_pr
.eq(msr_pr
) # MSR PR bit (1==>virt, 0==>real)
57 yield port1
.addr
.data
.eq(addr
) # set address
58 yield port1
.addr
.ok
.eq(1) # set ok
61 # must check exception even before waiting for address.
62 # XXX TODO: wait_addr should check for exception
63 exc_info
= yield from get_exception_info(port1
.exc_o
)
64 exc_happened
= exc_info
.happened
65 dar_o
= yield port1
.dar_o
67 print("print fast ST exception happened")
68 yield # MUST wait for one clock cycle before de-asserting these
69 yield port1
.is_st_i
.eq(0) # end
70 yield port1
.addr
.ok
.eq(0) # set !ok
71 yield port1
.is_dcbz_i
.eq(0) # reset dcbz too
72 return "fast", exc_info
, dar_o
74 yield from wait_addr(port1
) # wait until addr ok
76 exc_info
= yield from get_exception_info(port1
.exc_o
)
77 exc_happened
= exc_info
.happened
78 dar_o
= yield port1
.dar_o
80 print("print fast ST exception happened")
81 yield # MUST wait for one clock cycle before de-asserting these
82 yield port1
.is_st_i
.eq(0) # end
83 yield port1
.addr
.ok
.eq(0) # set !ok
84 yield port1
.is_dcbz_i
.eq(0) # reset dcbz too
85 return "fast", exc_info
, dar_o
88 # yield # not needed, just for checking
89 # yield # not needed, just for checking
90 # assert "ST" for one cycle (required by the API)
91 yield port1
.st
.data
.eq(data
)
92 yield port1
.st
.ok
.eq(1)
94 yield port1
.st
.ok
.eq(0)
95 exc_info
= yield from get_exception_info(port1
.exc_o
)
96 dar_o
= yield port1
.dar_o
97 exc_happened
= exc_info
.happened
99 print("print fast ST exception happened")
100 yield # MUST wait for one clock cycle before de-asserting these
101 yield port1
.is_st_i
.eq(0) # end
102 yield port1
.addr
.ok
.eq(0) # set !ok
103 yield port1
.is_dcbz_i
.eq(0) # reset dcbz too
104 return "fast", exc_info
, dar_o
106 yield from wait_busy(port1
,debug
="pi_st_E") # wait while busy
107 exc_info
= yield from get_exception_info(port1
.exc_o
)
108 dar_o
= yield port1
.dar_o
109 exc_happened
= exc_info
.happened
111 yield # needed if mmu/dache is used
112 yield port1
.is_st_i
.eq(0) # end
113 yield port1
.addr
.ok
.eq(0) # set !ok
114 yield port1
.is_dcbz_i
.eq(0) # reset dcbz too
115 yield # needed if mmu/dache is used
116 return "slow", exc_info
, dar_o
118 # can go straight to reset.
119 yield port1
.is_st_i
.eq(0) # end
120 yield port1
.addr
.ok
.eq(0) # set !ok
121 yield port1
.is_dcbz_i
.eq(0) # reset dcbz too
122 yield # needed if mmu/dache is used
124 return None, None, None
126 def get_exception_info(exc_o
):
128 for fname
in LDSTExceptionTuple
._fields
:
129 attr
= getattr(exc_o
, fname
)
132 return LDSTExceptionTuple(*attrs
)
135 # copy of pi_st removed
137 def pi_ld(port1
, addr
, datalen
, msr_pr
=0):
139 # have to wait until not busy
140 yield from wait_busy(port1
,debug
="pi_ld_A") # wait while busy
142 # set up a LD on the port. address first:
143 yield port1
.is_ld_i
.eq(1) # indicate LD
144 yield port1
.data_len
.eq(datalen
) # LD length (1/2/4/8)
145 yield port1
.msr_pr
.eq(msr_pr
) # MSR PR bit (1==>virt, 0==>real)
147 yield port1
.addr
.data
.eq(addr
) # set address
148 yield port1
.addr
.ok
.eq(1) # set ok
150 yield from wait_addr(port1
) # wait until addr ok
151 exc_info
= yield from get_exception_info(port1
.exc_o
)
152 dar_o
= yield port1
.dar_o
153 exc_happened
= exc_info
.happened
155 print("print fast LD exception happened")
156 yield # MUST wait for one clock cycle before de-asserting these
157 yield port1
.is_ld_i
.eq(0) # end
158 yield port1
.addr
.ok
.eq(0) # set !ok
159 return None, "fast", exc_info
, dar_o
162 yield from wait_ldok(port1
) # wait until ld ok
163 data
= yield port1
.ld
.data
164 exc_info
= yield from get_exception_info(port1
.exc_o
)
165 dar_o
= yield port1
.dar_o
166 exc_happened
= yield port1
.exc_o
.happened
167 exc_happened
= exc_info
.happened
170 yield port1
.is_ld_i
.eq(0) # end
171 yield port1
.addr
.ok
.eq(0) # set !ok
173 return None, "slow", exc_info
, dar_o
175 yield from wait_busy(port1
, debug
="pi_ld_E") # wait while busy
177 exc_info
= yield from get_exception_info(port1
.exc_o
)
178 dar_o
= yield port1
.dar_o
179 exc_happened
= exc_info
.happened
181 return None, "slow", exc_info
, dar_o
183 return data
, None, None, None
186 def pi_ldst(arg
, dut
, msr_pr
=0):
188 # do two half-word stores at consecutive addresses, then two loads
194 assert(yield from pi_st(dut
, addr1
, data
, 2, msr_pr
) is None)
195 assert(yield from pi_st(dut
, addr2
, data2
, 2, msr_pr
) is None)
196 result
, exc
= yield from pi_ld(dut
, addr1
, 2, msr_pr
)
197 result2
, exc2
= yield from pi_ld(dut
, addr2
, 2, msr_pr
)
200 arg
.assertEqual(data
, result
, "data %x != %x" % (result
, data
))
201 arg
.assertEqual(data2
, result2
, "data2 %x != %x" % (result2
, data2
))
203 # now load both in a 32-bit load to make sure they're really consecutive
204 data3
= data |
(data2
<< 16)
205 result3
, exc3
= yield from pi_ld(dut
, addr1
, 4, msr_pr
)
207 arg
.assertEqual(data3
, result3
, "data3 %x != %x" % (result3
, data3
))
210 def tst_config_pi(testcls
, ifacetype
):
211 """set up a configureable memory test of type ifacetype
214 pspec
= TestMemPspec(ldst_ifacetype
=ifacetype
,
219 cmpi
= ConfigMemoryPortInterface(pspec
)
220 dut
.submodules
.pi
= cmpi
.pi
221 if hasattr(cmpi
, 'lsmem'): # hmmm not happy about this
222 dut
.submodules
.lsmem
= cmpi
.lsmem
.lsi
223 vl
= rtlil
.convert(dut
, ports
=[]) # dut.ports())
224 with
open("test_pi_%s.il" % ifacetype
, "w") as f
:
227 run_simulation(dut
, {"sync": pi_ldst(testcls
, cmpi
.pi
.pi
)},
228 vcd_name
='test_pi_%s.vcd' % ifacetype
)
231 class TestPIMem(unittest
.TestCase
):
233 def test_pi_mem(self
):
234 tst_config_pi(self
, 'testpi')
236 def test_pi2ls(self
):
237 tst_config_pi(self
, 'testmem')
239 def test_pi2ls_bare_wb(self
):
240 tst_config_pi(self
, 'test_bare_wb')
243 if __name__
== '__main__':