1 # Based on GardenSnake - a parser generator demonstration program
2 # GardenSnake was released into the Public Domain by Andrew Dalke.
4 # Portions of this work are derived from Python's Grammar definition
5 # and may be covered under the Python copyright and license
7 # Andrew Dalke / Dalke Scientific Software, LLC
8 # 30 August 2006 / Cape Town, South Africa
10 # Modifications for inclusion in PLY distribution
12 from pprint
import pprint
14 from ply
import lex
, yacc
18 from soc
.decoder
.power_decoder
import create_pdecode
19 from nmigen
.back
.pysim
import Simulator
, Delay
20 from nmigen
import Module
, Signal
22 from soc
.decoder
.pseudo
.parser
import GardenSnakeCompiler
23 from soc
.decoder
.selectable_int
import SelectableInt
, selectconcat
25 ####### Test code #######
30 index <- (RS)[8*i:8*i+7]
31 RA <- [0]*56 || perm[0:7]
36 if index < 64 then index <- 0
47 index <- (RS)[8*i:8*i+7]
52 RA <- [0]*56|| perm[0:7]
58 if (RS)[63-n] = 0b1 then
68 else if a > EXTS(SI) then
80 l
.append(1 if (num
& (1<<i
)) else 0)
90 def __init__(self
, sd
, regfile
):
93 self
.regfile
= regfile
95 self
[i
] = SelectableInt(0, 64)
97 def set_form(self
, form
):
100 def ___getitem__(self
, attr
):
101 print ("GPR getitem", attr
)
102 getform
= self
.sd
.sigforms
[self
.form
]
103 rnum
= getattr(getform
, attr
)
104 print ("GPR get", rnum
, rnum
, dir(rnum
))
106 print (l
[0]._as
_const
())
108 #print (x, x.value, dir(x))
109 #print (x.value, dir(x.value))
111 return self
.regfile
[rnum
]
114 def convert_to_python(pcode
):
116 gsc
= GardenSnakeCompiler()
118 tree
= gsc
.compile(pcode
, mode
="exec", filename
="string")
119 tree
= ast
.fix_missing_locations(tree
)
120 return astor
.to_source(tree
)
125 gsc
= GardenSnakeCompiler()
127 # XXX unused! see GPR instead
131 gsc
.gpr
= GPR(gsc
.parser
.sd
, gsc
.regfile
)
133 _compile
= gsc
.compile
135 tree
= _compile(code
, mode
="single", filename
="string")
136 tree
= ast
.fix_missing_locations(tree
)
137 print ( ast
.dump(tree
) )
140 print (astor
.dump_tree(tree
))
142 source
= astor
.to_source(tree
)
147 # Set up the GardenSnake run-time environment
150 print ("-->", " ".join(map(str,args
)))
152 from soc
.decoder
.helpers
import (EXTS64
, EXTZ64
, ROTL64
, ROTL32
, MASK
,)
158 d
["SelectableInt"] = SelectableInt
159 d
["concat"] = selectconcat
163 gsc
.gpr
.set_form(form
)
164 getform
= gsc
.parser
.sd
.sigforms
[form
]._asdict
()
165 #print ("getform", form)
166 #for k, f in getform.items():
170 compiled_code
= compile(source
, mode
="exec", filename
="<string>")
174 instruction
= Signal(32)
176 m
.submodules
.decode
= decode
= gsc
.parser
.sd
177 comb
+= decode
.raw_opcode_in
.eq(instruction
)
184 print("0x{:X}".format(ins
& 0xffffffff))
186 # ask the decoder to decode this binary data (endian'd)
187 yield decode
.bigendian
.eq(0) # little / big?
188 yield instruction
.eq(ins
) # raw binary instr.
191 # read regs, drop them into dict for function
192 for rname
in gsc
.parser
.read_regs
:
193 regidx
= yield getattr(decode
.sigforms
['X'], rname
)
194 d
[rname
] = gsc
.gpr
[regidx
]
195 print ("read reg", rname
, regidx
, get_reg_hex(d
[rname
]))
197 exec (compiled_code
, d
)
202 print (decode
.sigforms
['X'])
203 x
= yield decode
.sigforms
['X'].RS
204 ra
= yield decode
.sigforms
['X'].RA
205 print ("RA", ra
, d
['RA'])
208 for wname
in gsc
.parser
.write_regs
:
210 print ("write regs", wname
, d
[wname
], reg
)
212 gsc
.gpr
[regidx
] = d
[wname
]
214 sim
.add_process(process
)
215 with sim
.write_vcd("simulator.vcd", "simulator.gtkw",
216 traces
=decode
.ports()):
219 for i
in range(len(gsc
.gpr
)):
220 print ("regfile", i
, get_reg_hex(gsc
.gpr
[i
]))
223 if __name__
== '__main__':