205
|
1 import struct, types
|
206
|
2 from target import Register, Instruction, Target, Imm8, Label, Imm3
|
219
|
3 from asmnodes import ASymbol, ANumber, AUnop, ABinop, ALabel
|
202
|
4 from ppci import CompilerError
|
205
|
5 import ir
|
202
|
6
|
218
|
7 # TODO: encode this in DSL (domain specific language)
|
|
8
|
202
|
9 def u16(h):
|
|
10 return struct.pack('<H', h)
|
|
11
|
205
|
12 def u32(x):
|
|
13 return struct.pack('<I', x)
|
|
14
|
202
|
15 armtarget = Target('arm')
|
|
16
|
|
17 class ArmReg(Register):
|
|
18 def __init__(self, num, name):
|
|
19 super().__init__(name)
|
|
20 self.num = num
|
206
|
21 def __repr__(self):
|
|
22 return self.name
|
202
|
23
|
203
|
24 class RegOp:
|
|
25 def __init__(self, num):
|
206
|
26 assert num < 16
|
203
|
27 self.num = num
|
|
28
|
|
29 @classmethod
|
|
30 def Create(cls, vop):
|
|
31 if type(vop) is ASymbol:
|
|
32 name = vop.name
|
|
33 regs = {}
|
|
34 for r in armtarget.registers:
|
|
35 regs[r.name] = r
|
|
36 if name in regs:
|
|
37 r = regs[name]
|
|
38 return cls(r.num)
|
219
|
39
|
|
40 class Reg8Op:
|
|
41 def __init__(self, num):
|
|
42 assert num < 8
|
|
43 self.num = num
|
|
44
|
|
45 @classmethod
|
|
46 def Create(cls, vop):
|
|
47 if type(vop) is ASymbol:
|
|
48 name = vop.name
|
|
49 regs = {}
|
|
50 for r in armtarget.registers:
|
|
51 regs[r.name] = r
|
|
52 if name in regs:
|
|
53 r = regs[name]
|
|
54 if r.num < 8:
|
|
55 return cls(r.num)
|
203
|
56
|
206
|
57 def getRegNum(n):
|
|
58 for r in armtarget.registers:
|
|
59 if r.num == n:
|
|
60 return r
|
203
|
61
|
206
|
62 def getRegisterRange(n1, n2):
|
|
63 regs = []
|
|
64 if n1.num < n2.num:
|
|
65 for n in range(n1.num, n2.num + 1):
|
|
66 r = getRegNum(n)
|
|
67 assert r
|
|
68 regs.append(r)
|
|
69 return regs
|
203
|
70
|
212
|
71 class MemoryOp:
|
|
72 def __init__(self, basereg, offset):
|
|
73 assert type(basereg) is ArmReg
|
|
74 self.basereg = basereg
|
|
75 self.offset = offset
|
|
76
|
219
|
77 def __repr__(self):
|
|
78 return '[{}, #{}]'.format(self.basereg, self.offset)
|
|
79
|
212
|
80 @classmethod
|
|
81 def Create(cls, vop):
|
|
82 if type(vop) is AUnop and vop.operation == '[]':
|
|
83 vop = vop.arg # descent
|
|
84 if type(vop) is ABinop:
|
|
85 if vop.op == '+' and type(vop.arg1) is ASymbol and type(vop.arg2) is ANumber:
|
|
86 offset = vop.arg2.number
|
|
87 basereg = RegOp.Create(vop.arg1)
|
|
88 if not basereg:
|
|
89 return
|
|
90 else:
|
|
91 return
|
|
92 elif type(vop) is ASymbol:
|
|
93 offset = 0
|
|
94 basereg = RegOp.Create(vop)
|
|
95 if not basereg:
|
|
96 return
|
|
97 else:
|
|
98 return
|
|
99 return cls(getRegNum(basereg.num), offset)
|
219
|
100
|
|
101 class MemoryOpReg8Imm5:
|
|
102 def __init__(self, basereg, offset):
|
|
103 assert type(basereg) is ArmReg
|
|
104 self.basereg = basereg
|
|
105 self.offset = offset
|
|
106
|
|
107 def __repr__(self):
|
|
108 return '[{}, #{}]'.format(self.basereg, self.offset)
|
|
109
|
|
110 @classmethod
|
|
111 def Create(cls, vop):
|
|
112 if type(vop) is AUnop and vop.operation == '[]':
|
|
113 vop = vop.arg # descent
|
|
114 if type(vop) is ABinop:
|
|
115 if vop.op == '+' and type(vop.arg1) is ASymbol and type(vop.arg2) is ANumber:
|
|
116 offset = vop.arg2.number
|
|
117 if offset > 120:
|
|
118 return
|
|
119 basereg = Reg8Op.Create(vop.arg1)
|
|
120 if not basereg:
|
|
121 return
|
|
122 else:
|
|
123 return
|
|
124 elif type(vop) is ASymbol:
|
|
125 offset = 0
|
|
126 basereg = Reg8Op.Create(vop)
|
|
127 if not basereg:
|
|
128 return
|
|
129 else:
|
|
130 return
|
|
131 return cls(getRegNum(basereg.num), offset)
|
212
|
132
|
205
|
133 class RegisterSet:
|
|
134 def __init__(self, regs):
|
206
|
135 assert type(regs) is set
|
|
136 self.regs = regs
|
|
137 def __repr__(self):
|
|
138 return ','.join([str(r) for r in self.regs])
|
|
139 @classmethod
|
|
140 def Create(cls, vop):
|
|
141 assert type(vop) is AUnop and vop.operation == '{}'
|
|
142 assert type(vop.arg) is list
|
|
143 regs = set()
|
|
144 for arg in vop.arg:
|
|
145 if type(arg) is ASymbol:
|
|
146 reg = RegOp.Create(arg)
|
|
147 if not reg:
|
|
148 return
|
|
149 regs.add(reg)
|
|
150 elif type(arg) is ABinop and arg.op == '-':
|
|
151 reg1 = RegOp.Create(arg.arg1)
|
|
152 reg2 = RegOp.Create(arg.arg2)
|
|
153 if not reg1:
|
|
154 return
|
|
155 if not reg2:
|
|
156 return
|
|
157 for r in getRegisterRange(reg1, reg2):
|
|
158 regs.add(r)
|
|
159 else:
|
|
160 raise Exception('Cannot be')
|
|
161 return cls(regs)
|
|
162
|
|
163 def registerNumbers(self):
|
|
164 return [r.num for r in self.regs]
|
205
|
165
|
202
|
166 # 8 bit registers:
|
205
|
167 r0 = ArmReg(0, 'r0')
|
|
168 armtarget.registers.append(r0)
|
206
|
169 r1 = ArmReg(1, 'r1')
|
|
170 armtarget.registers.append(r1)
|
|
171 r2 = ArmReg(2, 'r2')
|
|
172 armtarget.registers.append(r2)
|
|
173 r3 = ArmReg(3, 'r3')
|
|
174 armtarget.registers.append(r3)
|
202
|
175 r4 = ArmReg(4, 'r4')
|
|
176 armtarget.registers.append(r4)
|
203
|
177 r5 = ArmReg(5, 'r5')
|
|
178 armtarget.registers.append(r5)
|
|
179 r6 = ArmReg(6, 'r6')
|
|
180 armtarget.registers.append(r6)
|
|
181 r7 = ArmReg(7, 'r7')
|
|
182 armtarget.registers.append(r7)
|
206
|
183 # Other registers:
|
|
184 # TODO
|
|
185 sp = ArmReg(13, 'sp')
|
|
186 armtarget.registers.append(sp)
|
|
187 lr = ArmReg(14, 'lr')
|
|
188 armtarget.registers.append(lr)
|
|
189 pc = ArmReg(15, 'pc')
|
|
190 armtarget.registers.append(pc)
|
202
|
191
|
|
192 class ArmInstruction(Instruction):
|
|
193 pass
|
|
194
|
205
|
195 class dcd_ins(ArmInstruction):
|
|
196 mnemonic = 'dcd'
|
|
197 def __init__(self, expr):
|
|
198 self.expr = expr
|
219
|
199
|
205
|
200 def encode(self):
|
|
201 return u32(self.expr)
|
202
|
202
|
219
|
203 def __repr__(self):
|
|
204 return 'DCD 0x{0:X}'.format(self.expr)
|
|
205
|
|
206
|
|
207
|
|
208 # Memory related
|
|
209
|
|
210 class LS_imm5_base(ArmInstruction):
|
|
211 """ ??? Rt, [Rn, imm5] """
|
|
212 operands = (Reg8Op, MemoryOpReg8Imm5)
|
212
|
213 def __init__(self, rt, memop):
|
|
214 assert memop.offset % 4 == 0
|
|
215 self.imm5 = memop.offset >> 2
|
|
216 self.rn = memop.basereg.num
|
|
217 self.rt = rt.num
|
219
|
218 self.memloc = memop
|
|
219 assert self.rn < 8
|
|
220 assert self.rt < 8
|
212
|
221
|
|
222 def encode(self):
|
|
223 Rn = self.rn
|
|
224 Rt = self.rt
|
|
225 imm5 = self.imm5
|
219
|
226
|
|
227 h = (self.opcode << 11) | (imm5 << 6) | (Rn << 3) | Rt
|
|
228 return u16(h)
|
|
229 def __repr__(self):
|
|
230 return '{} {}, {}'.format(self.mnemonic, self.rt, self.memloc)
|
|
231
|
|
232 @armtarget.instruction
|
|
233 class storeimm5_ins(LS_imm5_base):
|
|
234 mnemonic = 'STR'
|
|
235 opcode = 0xC
|
|
236
|
|
237 @armtarget.instruction
|
|
238 class loadimm5_ins(LS_imm5_base):
|
|
239 mnemonic = 'LDR'
|
|
240 opcode = 0xD
|
|
241
|
|
242 class ls_sp_base_imm8(ArmInstruction):
|
|
243 operands = (Reg8Op, MemoryOp)
|
|
244 def __init__(self, rt, memop):
|
|
245 self.rt = rt
|
|
246 assert memop.basereg.num == 13
|
|
247 self.offset = memop.offset
|
|
248
|
|
249 def encode(self):
|
|
250 rt = self.rt.num
|
|
251 assert rt < 8
|
|
252 imm8 = self.offset >> 2
|
|
253 assert imm8 < 256
|
|
254 h = (self.opcode << 8) | (rt << 8) | imm8
|
212
|
255 return u16(h)
|
|
256
|
219
|
257 def __repr__(self):
|
|
258 return '{} {}, [sp,#{}]'.format(self.mnemonic, self.rt, self.offset)
|
|
259
|
212
|
260 @armtarget.instruction
|
219
|
261 class ldr_pcrel(ArmInstruction):
|
|
262 """ ldr Rt, [PC, imm8], store value into memory """
|
212
|
263 mnemonic = 'ldr'
|
|
264 operands = (RegOp, MemoryOp)
|
219
|
265 def __init__(self, rt, label):
|
|
266 self.rt = rt
|
|
267 self.label = label
|
|
268 self.offset = 0
|
212
|
269
|
|
270 def encode(self):
|
219
|
271 rt = self.rt.num
|
|
272 assert rt < 8
|
|
273 imm8 = self.offset >> 2
|
|
274 assert imm8 < 256
|
|
275 h = (0x9 << 11) | (rt << 8) | imm8
|
212
|
276 return u16(h)
|
|
277
|
219
|
278 def __repr__(self):
|
|
279 return 'LDR {}, [pc,#{}]'.format(self.rt, self.offset)
|
|
280
|
|
281 @armtarget.instruction
|
|
282 class ldr_sprel(ls_sp_base_imm8):
|
|
283 """ ldr Rt, [SP, imm8] """
|
|
284 mnemonic = 'LDR'
|
|
285 opcode = 0x98
|
|
286
|
|
287 @armtarget.instruction
|
|
288 class str_sprel(ls_sp_base_imm8):
|
|
289 """ str Rt, [SP, imm8] """
|
|
290 mnemonic = 'STR'
|
|
291 opcode = 0x90
|
|
292
|
212
|
293 @armtarget.instruction
|
202
|
294 class mov_ins(ArmInstruction):
|
|
295 """ mov Rd, imm8, move immediate value into register """
|
|
296 mnemonic = 'mov'
|
203
|
297 opcode = 4 # 00100 Rd(3) imm8
|
|
298 operands = (RegOp, Imm8)
|
205
|
299 irpattern = ir.ImmLoad
|
203
|
300 def __init__(self, rd, imm):
|
|
301 self.imm = imm.imm
|
|
302 self.r = rd.num
|
205
|
303
|
202
|
304 def encode(self):
|
|
305 rd = self.r
|
|
306 opcode = self.opcode
|
|
307 imm8 = self.imm
|
|
308 h = (opcode << 11) | (rd << 8) | imm8
|
|
309 return u16(h)
|
219
|
310 def __repr__(self):
|
|
311 return 'MOV {0}, xx?'.format(self.r)
|
202
|
312
|
203
|
313 @armtarget.instruction
|
|
314 class movregreg_ins(ArmInstruction):
|
|
315 """ mov Rd, Rm """
|
|
316 mnemonic = 'mov'
|
|
317 operands = (RegOp, RegOp)
|
|
318 def __init__(self, rd, rm):
|
|
319 self.rd = rd
|
|
320 self.rm = rm
|
|
321 def encode(self):
|
|
322 rd = self.rd.num
|
|
323 D = (rd & 0x8) >> 3
|
|
324 assert D < 2
|
|
325 rd = rd & 0x7
|
|
326 rm = self.rm.num
|
|
327 assert rm < 16
|
|
328 opcode = self.opcode
|
219
|
329 h = (1 << 14) | (3 << 9) | (D << 7) | (rm << 3) | rd
|
203
|
330 return u16(h)
|
|
331
|
219
|
332
|
|
333
|
|
334 # Arithmatics:
|
|
335
|
203
|
336 @armtarget.instruction
|
|
337 class addregregimm3_ins(ArmInstruction):
|
|
338 """ add Rd, Rn, imm3 """
|
|
339 mnemonic = 'add'
|
|
340 opcode = 3 # 00011
|
|
341 operands = (RegOp, RegOp, Imm3)
|
205
|
342 irpattern = 3
|
203
|
343 def __init__(self, rd, rn, imm3):
|
|
344 self.rd = rd
|
|
345 self.rn = rn
|
|
346 self.imm3 = imm3
|
|
347 def encode(self):
|
|
348 rd = self.rd.num
|
|
349 rn = self.rn.num
|
|
350 imm3 = self.imm3.imm
|
|
351 opcode = self.opcode
|
|
352 h = (opcode << 11) | (1 << 10) | (imm3 << 6) | (rn << 3) | rd
|
|
353 return u16(h)
|
|
354
|
219
|
355 class regregreg_base(ArmInstruction):
|
|
356 """ ??? Rd, Rn, Rm """
|
|
357 operands = (Reg8Op, Reg8Op, Reg8Op)
|
|
358 def __init__(self, rd, rn, rm):
|
|
359 self.rd = rd
|
|
360 self.rn = rn
|
|
361 self.rm = rm
|
|
362 def encode(self):
|
|
363 rd = self.rd.num
|
|
364 rn = self.rn.num
|
|
365 rm = self.rm.num
|
|
366 h = (self.opcode << 9) | (rm << 6) | (rn << 3) | rd
|
|
367 return u16(h)
|
|
368 def __repr__(self):
|
|
369 return '{} {}, {}, {}'.format(self.mnemonic, self.rd, self.rn, self.rm)
|
|
370
|
|
371 @armtarget.instruction
|
|
372 class addregs_ins(regregreg_base):
|
|
373 mnemonic = 'ADD'
|
|
374 opcode = 0b0001100
|
|
375
|
|
376 @armtarget.instruction
|
|
377 class subregs_ins(regregreg_base):
|
|
378 mnemonic = 'SUB'
|
|
379 opcode = 0b0001101
|
|
380
|
|
381 class regreg_base(ArmInstruction):
|
|
382 """ ??? Rdn, Rm """
|
|
383 operands = (Reg8Op, Reg8Op)
|
|
384 def __init__(self, rdn, rm):
|
|
385 self.rdn = rdn
|
|
386 self.rm = rm
|
|
387 def encode(self):
|
|
388 rdn = self.rdn.num
|
|
389 rm = self.rm.num
|
|
390 h = (self.opcode << 6) | (rm << 3) | rdn
|
|
391 return u16(h)
|
|
392 def __repr__(self):
|
|
393 return '{} {}, {}'.format(self.mnemonic, self.rdn, self.rm)
|
|
394
|
|
395 @armtarget.instruction
|
|
396 class andregs_ins(regreg_base):
|
|
397 mnemonic = 'AND'
|
|
398 opcode = 0b0100000000
|
|
399
|
|
400 @armtarget.instruction
|
|
401 class orrregs_ins(regreg_base):
|
|
402 mnemonic = 'ORR'
|
|
403 opcode = 0b0100001100
|
|
404
|
|
405 @armtarget.instruction
|
|
406 class cmp_ins(regreg_base):
|
|
407 mnemonic = 'CMP'
|
|
408 opcode = 0b0100001010
|
|
409
|
203
|
410 @armtarget.instruction
|
|
411 class cmpregimm8_ins(ArmInstruction):
|
|
412 """ cmp Rn, imm8 """
|
|
413 mnemonic = 'cmp'
|
|
414 opcode = 5 # 00101
|
|
415 operands = (RegOp, Imm8)
|
|
416 def __init__(self, rn, imm):
|
|
417 self.rn = rn
|
|
418 self.imm = imm
|
|
419 def encode(self):
|
|
420 rn = self.rn.num
|
|
421 imm = self.imm.imm
|
|
422 opcode = self.opcode
|
|
423 h = (opcode << 11) | (rn << 8) | imm
|
|
424 return u16(h)
|
202
|
425
|
219
|
426 # Jumping:
|
218
|
427
|
|
428 @armtarget.instruction
|
205
|
429 class jmp_ins(ArmInstruction):
|
219
|
430 operands = (ALabel,)
|
205
|
431 mnemonic = 'jmp'
|
|
432 def __init__(self, target_label):
|
219
|
433 assert type(target_label) is ALabel
|
205
|
434 self.target = target_label
|
|
435 def fixUp(self):
|
|
436 pass
|
|
437 def encode(self):
|
219
|
438 h = 0 # TODO
|
205
|
439 return u16(h)
|
219
|
440 def __repr__(self):
|
|
441 return 'B {0}'.format(self.target.name)
|
|
442
|
|
443 @armtarget.instruction
|
|
444 class beq_ins(ArmInstruction):
|
|
445 operands = (ALabel,)
|
|
446 mnemonic = 'beq'
|
|
447 def __init__(self, target_label):
|
|
448 assert type(target_label) is ALabel
|
|
449 self.target = target_label
|
|
450 def fixUp(self):
|
|
451 pass
|
|
452 def encode(self):
|
|
453 h = 0 # TODO
|
|
454 return u16(h)
|
|
455 def __repr__(self):
|
|
456 return 'BEQ {0}'.format(self.target.name)
|
205
|
457
|
|
458 @armtarget.instruction
|
|
459 class push_ins(ArmInstruction):
|
206
|
460 operands = (RegisterSet,)
|
205
|
461 mnemonic = 'push'
|
|
462 def __init__(self, regs):
|
206
|
463 assert (type(regs),) == self.operands, (type(regs),)
|
205
|
464 self.regs = regs
|
206
|
465 def __repr__(self):
|
|
466 return '{0} {{{1}}}'.format(self.mnemonic, self.regs)
|
205
|
467 def encode(self):
|
206
|
468 reg_list = 0
|
|
469 M = 0
|
|
470 for n in self.regs.registerNumbers():
|
|
471 if n < 8:
|
|
472 reg_list |= (1 << n)
|
|
473 elif n == 14:
|
|
474 M = 1
|
|
475 else:
|
|
476 raise NotImplementedError('not implemented for this register')
|
|
477 h = (0x5a << 9) | (M << 8) | reg_list
|
|
478 return u16(h)
|
205
|
479
|
|
480 @armtarget.instruction
|
|
481 class pop_ins(ArmInstruction):
|
206
|
482 operands = (RegisterSet,)
|
205
|
483 mnemonic = 'pop'
|
|
484 def __init__(self, regs):
|
|
485 self.regs = regs
|
207
|
486 def __repr__(self):
|
|
487 return '{0} {{{1}}}'.format(self.mnemonic, self.regs)
|
205
|
488 def encode(self):
|
206
|
489 reg_list = 0
|
|
490 P = 0
|
|
491 for n in self.regs.registerNumbers():
|
|
492 if n < 8:
|
|
493 reg_list |= (1 << n)
|
|
494 elif n == 15:
|
|
495 P = 1
|
|
496 else:
|
|
497 raise NotImplementedError('not implemented for this register')
|
|
498 h = (0x5E << 9) | (P << 8) | reg_list
|
|
499 return u16(h)
|
205
|
500
|
|
501 @armtarget.instruction
|
202
|
502 class yield_ins(ArmInstruction):
|
|
503 operands = ()
|
|
504 mnemonic = 'yield'
|
|
505 def encode(self):
|
|
506 return u16(0xbf10)
|
|
507
|
206
|
508 armtarget.check()
|
|
509
|