1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
// See LICENSE for license details.
package firrtl
package passes
import firrtl.ir._
import firrtl.PrimOps._
import firrtl.Mappers._
// Makes all implicit width extensions and truncations explicit
object PadWidths extends Pass {
private def width(t: Type): Int = bitWidth(t).toInt
private def width(e: Expression): Int = width(e.tpe)
// Returns an expression with the correct integer width
private def fixup(i: Int)(e: Expression) = {
def tx = e.tpe match {
case t: UIntType => UIntType(IntWidth(i))
case t: SIntType => SIntType(IntWidth(i))
// default case should never be reached
}
width(e) match {
case j if i > j => DoPrim(Pad, Seq(e), Seq(i), tx)
case j if i < j =>
val e2 = DoPrim(Bits, Seq(e), Seq(i - 1, 0), UIntType(IntWidth(i)))
// Bit Select always returns UInt, cast if selecting from SInt
e.tpe match {
case UIntType(_) => e2
case SIntType(_) => DoPrim(AsSInt, Seq(e2), Seq.empty, SIntType(IntWidth(i)))
}
case _ => e
}
}
// Recursive, updates expression so children exp's have correct widths
private def onExp(e: Expression): Expression = e map onExp match {
case Mux(cond, tval, fval, tpe) =>
Mux(cond, fixup(width(tpe))(tval), fixup(width(tpe))(fval), tpe)
case ex: ValidIf => ex copy (value = fixup(width(ex.tpe))(ex.value))
case ex: DoPrim => ex.op match {
case Lt | Leq | Gt | Geq | Eq | Neq | Not | And | Or | Xor |
Add | Sub | Mul | Div | Rem | Shr =>
// sensitive ops
ex map fixup((ex.args map width foldLeft 0)(math.max))
case Dshl =>
// special case as args aren't all same width
ex copy (op = Dshlw, args = Seq(fixup(width(ex.tpe))(ex.args.head), ex.args(1)))
case Shl =>
// special case as arg should be same width as result
ex copy (op = Shlw, args = Seq(fixup(width(ex.tpe))(ex.args.head)))
case _ => ex
}
case ex => ex
}
// Recursive. Fixes assignments and register initialization widths
private def onStmt(s: Statement): Statement = s map onExp match {
case sx: Connect =>
sx copy (expr = fixup(width(sx.loc))(sx.expr))
case sx: DefRegister =>
sx copy (init = fixup(width(sx.tpe))(sx.init))
case sx => sx map onStmt
}
def run(c: Circuit): Circuit = c copy (modules = c.modules map (_ map onStmt))
}
|