add OP_SC
[soc.git] / src / soc / decoder / power_pseudo.py
1 # Based on GardenSnake - a parser generator demonstration program
2 # GardenSnake was released into the Public Domain by Andrew Dalke.
3
4 # Portions of this work are derived from Python's Grammar definition
5 # and may be covered under the Python copyright and license
6 #
7 # Andrew Dalke / Dalke Scientific Software, LLC
8 # 30 August 2006 / Cape Town, South Africa
9
10 # Modifications for inclusion in PLY distribution
11 import sys
12 from pprint import pprint
13 from copy import copy
14 from ply import lex, yacc
15 import astor
16 import ast
17
18 from soc.decoder.power_decoder import create_pdecode
19 from nmigen.back.pysim import Simulator, Delay
20 from nmigen import Module, Signal
21
22 from soc.decoder.pseudo.parser import GardenSnakeCompiler
23 from soc.decoder.selectable_int import SelectableInt, selectconcat
24 from soc.decoder.isa.caller import GPR, Mem
25
26
27 ####### Test code #######
28
29 bpermd = r"""
30 perm <- [0] * 8
31 if index < 64:
32 index <- (RS)[8*i:8*i+7]
33 RA <- [0]*56 || perm[0:7]
34 print (RA)
35 """
36
37 bpermd = r"""
38 if index < 64 then index <- 0
39 else index <- 5
40 do while index < 5
41 index <- 0
42 leave
43 for i = 0 to 7
44 index <- 0
45 """
46
47 _bpermd = r"""
48 for i = 0 to 7
49 index <- (RS)[8*i:8*i+7]
50 if index < 64 then
51 permi <- (RB)[index]
52 else
53 permi <- 0
54 RA <- [0]*56|| perm[0:7]
55 """
56
57 cnttzd = """
58 n <- 0
59 do while n < 64
60 print (n)
61 if (RS)[63-n] = 0b1 then
62 leave
63 n <- n + 1
64 RA <- EXTZ64(n)
65 print (RA)
66 """
67
68 cmpi = """
69 if a < EXTS(SI) then
70 c <- 0b100
71 else if a > EXTS(SI) then
72 c <- 0b010
73 """
74
75 cmpi = """
76 RA[0:1] <- 0b11
77 """
78
79 cmpi = """
80 in_range <- ((x | y) &
81 (a | b))
82 in_range <- (x + y) - (a + b)
83 """
84
85 cmpi = """
86 (RA)[0:1] <- 1
87 src1 <- EXTZ((RA)[56:63])
88 CR[4*BF+32] <- 0b0
89 in_range <- src21lo <= src1 & src1 <= src21hi
90 """
91
92 cmpeqb = """
93 src1 <- GPR[RA]
94 src1 <- src1[0:56]
95 """
96
97 addpcis = """
98 D <- d0||d1||d2
99 """
100
101 testmul = """
102 x <- [0] * 16
103 RT <- (RA) + EXTS(SI || [0]*16)
104 """
105
106 testgetzero = """
107 RS <- (RA|0)
108 RS <- RS + 1
109 print(RS)
110 """
111
112 testcat = """
113 RT <- (load_data[56:63] || load_data[48:55]
114 || load_data[40:47] || load_data[32:39]
115 || load_data[24:31] || load_data[16:23]
116 || load_data[8:15] || load_data[0:7])
117 """
118
119 testgpr = """
120 GPR(5) <- x
121 """
122 testmem = """
123 a <- (RA|0)
124 b <- (RB|0)
125 RA <- MEM(RB, 2)
126 EA <- a + 1
127 MEM(EA, 1) <- (RS)[56:63]
128 RB <- RA
129 RA <- EA
130 """
131
132 testgprslice = """
133 MEM(EA, 4) <- GPR(r)[32:63]
134 #x <- x[0][32:63]
135 """
136
137 testdo = r"""
138 do i = 0 to 7
139 print(i)
140 """
141
142 testcond = """
143 ctr_ok <- BO[2] | ((CTR[M:63] != 0) ^ BO[3])
144 cond_ok <- BO[0] | ¬(CR[BI+32] ^ BO[1])
145 """
146
147 lswx = """
148 if RA = 0 then EA <- 0
149 else EA <- (RA)
150 if NB = 0 then n <- 32
151 else n <- NB
152 r <- RT - 1
153 i <- 32
154 do while n > 0
155 if i = 32 then
156 r <- (r + 1) % 32
157 GPR(r) <- 0
158 GPR(r)[i:i+7] <- MEM(EA, 1)
159 i <- i + 8
160 if i = 64 then i <- 32
161 EA <- EA + 1
162 n <- n - 1
163 """
164
165 _lswx = """
166 GPR(r)[x] <- 1
167 """
168
169 switchtest = """
170 switch (n)
171 case(1): x <- 5
172 case(2): fallthrough
173 case(3):
174 x <- 3
175 case(4): fallthrough
176 default:
177 x <- 9
178 """
179
180 hextest = """
181 RT <- 0x0001_a000_0000_0000
182 """
183
184 code = hextest
185 #code = lswx
186 #code = testcond
187 #code = testdo
188 #code = _bpermd
189 #code = testmul
190 #code = testgetzero
191 #code = testcat
192 #code = testgpr
193 #code = testmem
194 #code = testgprslice
195 #code = testreg
196 #code = cnttzd
197 #code = cmpi
198 #code = cmpeqb
199 #code = addpcis
200 #code = bpermd
201
202
203 def tolist(num):
204 l = []
205 for i in range(64):
206 l.append(1 if (num & (1 << i)) else 0)
207 l.reverse()
208 return l
209
210
211 def get_reg_hex(reg):
212 return hex(reg.value)
213
214 def convert_to_python(pcode, form, incl_carry):
215
216 print ("form", form)
217 gsc = GardenSnakeCompiler(form=form, incl_carry=incl_carry)
218
219 tree = gsc.compile(pcode, mode="exec", filename="string")
220 tree = ast.fix_missing_locations(tree)
221 regsused = {'read_regs': gsc.parser.read_regs,
222 'write_regs': gsc.parser.write_regs,
223 'uninit_regs': gsc.parser.uninit_regs,
224 'special_regs': gsc.parser.special_regs,
225 'op_fields': gsc.parser.op_fields }
226 return astor.to_source(tree), regsused
227
228
229 def test():
230
231 gsc = GardenSnakeCompiler(debug=True)
232
233 gsc.regfile = {}
234 for i in range(32):
235 gsc.regfile[i] = i
236 gsc.gpr = GPR(gsc.parser.sd, gsc.regfile)
237 gsc.mem = Mem()
238
239 _compile = gsc.compile
240
241 tree = _compile(code, mode="single", filename="string")
242 tree = ast.fix_missing_locations(tree)
243 print(ast.dump(tree))
244
245 print("astor dump")
246 print(astor.dump_tree(tree))
247 print("to source")
248 source = astor.to_source(tree)
249 print(source)
250
251 # sys.exit(0)
252
253 # Set up the GardenSnake run-time environment
254 def print_(*args):
255 print("args", args)
256 print("-->", " ".join(map(str, args)))
257
258 from soc.decoder.helpers import (EXTS64, EXTZ64, ROTL64, ROTL32, MASK,
259 trunc_div, trunc_rem)
260
261 d = {}
262 d["print"] = print_
263 d["EXTS64"] = EXTS64
264 d["EXTZ64"] = EXTZ64
265 d["trunc_div"] = trunc_div
266 d["trunc_rem"] = trunc_rem
267 d["SelectableInt"] = SelectableInt
268 d["concat"] = selectconcat
269 d["GPR"] = gsc.gpr
270 d["MEM"] = gsc.mem
271 d["memassign"] = gsc.mem.memassign
272
273 form = 'X'
274 gsc.gpr.set_form(form)
275 getform = gsc.parser.sd.sigforms[form]._asdict()
276 #print ("getform", form)
277 # for k, f in getform.items():
278 #print (k, f)
279 #d[k] = getform[k]
280
281 compiled_code = compile(source, mode="exec", filename="<string>")
282
283 m = Module()
284 comb = m.d.comb
285 instruction = Signal(32)
286
287 m.submodules.decode = decode = gsc.parser.sd
288 comb += decode.raw_opcode_in.eq(instruction)
289 sim = Simulator(m)
290
291 instr = [0x11111117]
292
293 def process():
294 for ins in instr:
295 print("0x{:X}".format(ins & 0xffffffff))
296
297 # ask the decoder to decode this binary data (endian'd)
298 yield decode.bigendian.eq(0) # little / big?
299 yield instruction.eq(ins) # raw binary instr.
300 yield Delay(1e-6)
301
302 # uninitialised regs, drop them into dict for function
303 for rname in gsc.parser.uninit_regs:
304 d[rname] = SelectableInt(0, 64) # uninitialised (to zero)
305 print("uninitialised", rname, hex(d[rname].value))
306
307 # read regs, drop them into dict for function
308 for rname in gsc.parser.read_regs:
309 regidx = yield getattr(decode.sigforms['X'], rname)
310 d[rname] = gsc.gpr[regidx] # contents of regfile
311 d["_%s" % rname] = regidx # actual register value
312 print("read reg", rname, regidx, hex(d[rname].value))
313
314 exec(compiled_code, d) # code gets executed here in dict "d"
315 print("Done")
316
317 print(d.keys()) # shows the variables that may have been created
318
319 print(decode.sigforms['X'])
320 x = yield decode.sigforms['X'].RS
321 ra = yield decode.sigforms['X'].RA
322 rb = yield decode.sigforms['X'].RB
323 print("RA", ra, d['RA'])
324 print("RB", rb, d['RB'])
325 print("RS", x)
326
327 for wname in gsc.parser.write_regs:
328 reg = getform[wname]
329 regidx = yield reg
330 print("write regs", regidx, wname, d[wname], reg)
331 gsc.gpr[regidx] = d[wname]
332
333 sim.add_process(process)
334 with sim.write_vcd("simulator.vcd", "simulator.gtkw",
335 traces=decode.ports()):
336 sim.run()
337
338 gsc.gpr.dump()
339
340 for i in range(0, len(gsc.mem.mem), 16):
341 hexstr = []
342 for j in range(16):
343 hexstr.append("%02x" % gsc.mem.mem[i+j])
344 hexstr = ' '.join(hexstr)
345 print ("mem %4x" % i, hexstr)
346
347 if __name__ == '__main__':
348 test()