aboutsummaryrefslogtreecommitdiff
path: root/src/main/scala/firrtl/passes/ExpandWhens.scala
diff options
context:
space:
mode:
Diffstat (limited to 'src/main/scala/firrtl/passes/ExpandWhens.scala')
-rw-r--r--src/main/scala/firrtl/passes/ExpandWhens.scala208
1 files changed, 97 insertions, 111 deletions
diff --git a/src/main/scala/firrtl/passes/ExpandWhens.scala b/src/main/scala/firrtl/passes/ExpandWhens.scala
index 3d26298a..7c013b51 100644
--- a/src/main/scala/firrtl/passes/ExpandWhens.scala
+++ b/src/main/scala/firrtl/passes/ExpandWhens.scala
@@ -34,11 +34,6 @@ import firrtl.Mappers._
import firrtl.PrimOps._
import firrtl.WrappedExpression._
-// Datastructures
-import scala.collection.mutable.HashMap
-import scala.collection.mutable.LinkedHashMap
-import scala.collection.mutable.ArrayBuffer
-
import annotation.tailrec
/** Expand Whens
@@ -50,138 +45,129 @@ import annotation.tailrec
*/
object ExpandWhens extends Pass {
def name = "Expand Whens"
+ type NodeMap = collection.mutable.HashMap[MemoizedHash[Expression], String]
+ type Netlist = collection.mutable.LinkedHashMap[WrappedExpression, Expression]
+ type Simlist = collection.mutable.ArrayBuffer[Statement]
+ type Defaults = Seq[collection.mutable.Map[WrappedExpression, Expression]]
// ========== Expand When Utilz ==========
- private def getEntries(
- hash: LinkedHashMap[WrappedExpression, Expression],
- exps: Seq[Expression]): LinkedHashMap[WrappedExpression, Expression] = {
- val hashx = LinkedHashMap[WrappedExpression, Expression]()
- exps foreach (e => if (hash.contains(e)) hashx(e) = hash(e))
- hashx
- }
private def getFemaleRefs(n: String, t: Type, g: Gender): Seq[Expression] = {
def getGender(t: Type, i: Int, g: Gender): Gender = times(g, get_flip(t, i, Default))
val exps = create_exps(WRef(n, t, ExpKind(), g))
- val expsx = ArrayBuffer[Expression]()
- for (j <- 0 until exps.size) {
- getGender(t, j, g) match {
- case (BIGENDER | FEMALE) => expsx += exps(j)
- case _ =>
+ (exps.zipWithIndex foldLeft Seq[Expression]()){
+ case (expsx, (exp, j)) => getGender(t, j, g) match {
+ case (BIGENDER | FEMALE) => expsx :+ exp
+ case _ => expsx
}
}
- expsx
}
- private def expandNetlist(netlist: LinkedHashMap[WrappedExpression, Expression]) =
- netlist map { case (k, v) =>
- v match {
- case WInvalid() => IsInvalid(NoInfo, k.e1)
- case _ => Connect(NoInfo, k.e1, v)
- }
+ private def expandNetlist(netlist: Netlist) =
+ netlist map {
+ case (k, WInvalid()) => IsInvalid(NoInfo, k.e1)
+ case (k, v) => Connect(NoInfo, k.e1, v)
}
// Searches nested scopes of defaults for lvalue
// defaults uses mutable Map because we are searching LinkedHashMaps and conversion to immutable is VERY slow
@tailrec
- private def getDefault(
- lvalue: WrappedExpression,
- defaults: Seq[collection.mutable.Map[WrappedExpression, Expression]]): Option[Expression] = {
- if (defaults.isEmpty) None
- else if (defaults.head.contains(lvalue)) defaults.head.get(lvalue)
- else getDefault(lvalue, defaults.tail)
+ private def getDefault(lvalue: WrappedExpression, defaults: Defaults): Option[Expression] = {
+ defaults match {
+ case Nil => None
+ case head :: tail => head get lvalue match {
+ case Some(p) => Some(p)
+ case None => getDefault(lvalue, tail)
+ }
+ }
}
+ private def AND(e1: Expression, e2: Expression) =
+ DoPrim(And, Seq(e1, e2), Nil, UIntType(IntWidth(1)))
+ private def NOT(e: Expression) =
+ DoPrim(Eq, Seq(e, zero), Nil, UIntType(IntWidth(1)))
+
// ------------ Pass -------------------
def run(c: Circuit): Circuit = {
- def expandWhens(m: Module): (LinkedHashMap[WrappedExpression, Expression], ArrayBuffer[Statement], Statement) = {
+ def expandWhens(m: Module): (Netlist, Simlist, Statement) = {
val namespace = Namespace(m)
- val simlist = ArrayBuffer[Statement]()
+ val simlist = new Simlist
+ val nodes = new NodeMap
// defaults ideally would be immutable.Map but conversion from mutable.LinkedHashMap to mutable.Map is VERY slow
- def expandWhens(
- netlist: LinkedHashMap[WrappedExpression, Expression],
- defaults: Seq[collection.mutable.Map[WrappedExpression, Expression]],
- p: Expression)
- (s: Statement): Statement = {
- s match {
- case w: DefWire =>
- getFemaleRefs(w.name, w.tpe, BIGENDER) foreach (ref => netlist(ref) = WVoid())
- w
- case r: DefRegister =>
- getFemaleRefs(r.name, r.tpe, BIGENDER) foreach (ref => netlist(ref) = ref)
- r
- case c: Connect =>
- netlist(c.loc) = c.expr
- EmptyStmt
- case c: IsInvalid =>
- netlist(c.expr) = WInvalid()
- EmptyStmt
- case s: Conditionally =>
- val memos = ArrayBuffer[Statement]()
-
- val conseqNetlist = LinkedHashMap[WrappedExpression, Expression]()
- val altNetlist = LinkedHashMap[WrappedExpression, Expression]()
- val conseqStmt = expandWhens(conseqNetlist, netlist +: defaults, AND(p, s.pred))(s.conseq)
- val altStmt = expandWhens(altNetlist, netlist +: defaults, AND(p, NOT(s.pred)))(s.alt)
+ def expandWhens(netlist: Netlist,
+ defaults: Defaults,
+ p: Expression)
+ (s: Statement): Statement = s match {
+ case w: DefWire =>
+ netlist ++= (getFemaleRefs(w.name, w.tpe, BIGENDER) map (ref => we(ref) -> WVoid()))
+ w
+ case r: DefRegister =>
+ netlist ++= (getFemaleRefs(r.name, r.tpe, BIGENDER) map (ref => we(ref) -> ref))
+ r
+ case c: Connect =>
+ netlist(c.loc) = c.expr
+ EmptyStmt
+ case c: IsInvalid =>
+ netlist(c.expr) = WInvalid()
+ EmptyStmt
+ case s: Conditionally =>
+ val conseqNetlist = new Netlist
+ val altNetlist = new Netlist
+ val conseqStmt = expandWhens(conseqNetlist, netlist +: defaults, AND(p, s.pred))(s.conseq)
+ val altStmt = expandWhens(altNetlist, netlist +: defaults, AND(p, NOT(s.pred)))(s.alt)
- (conseqNetlist.keySet ++ altNetlist.keySet) foreach { lvalue =>
- // Defaults in netlist get priority over those in defaults
- val default = if (netlist.contains(lvalue)) netlist.get(lvalue) else getDefault(lvalue, defaults)
- val res = default match {
- case Some(defaultValue) =>
- val trueValue = conseqNetlist.getOrElse(lvalue, defaultValue)
- val falseValue = altNetlist.getOrElse(lvalue, defaultValue)
- (trueValue, falseValue) match {
- case (WInvalid(), WInvalid()) => WInvalid()
- case (WInvalid(), fv) => ValidIf(NOT(s.pred), fv, fv.tpe)
- case (tv, WInvalid()) => ValidIf(s.pred, tv, tv.tpe)
- case (tv, fv) => Mux(s.pred, tv, fv, mux_type_and_widths(tv, fv))
- }
- case None =>
- // Since not in netlist, lvalue must be declared in EXACTLY one of conseq or alt
- conseqNetlist.getOrElse(lvalue, altNetlist(lvalue))
- }
-
- val memoNode = DefNode(s.info, namespace.newTemp, res)
- val memoExpr = WRef(memoNode.name, res.tpe, NodeKind(), MALE)
- memos += memoNode
- netlist(lvalue) = memoExpr
+ val memos = (conseqNetlist.keys ++ altNetlist.keys) map { lvalue =>
+ // Defaults in netlist get priority over those in defaults
+ val default = netlist get lvalue match {
+ case Some(v) => Some(v)
+ case None => getDefault(lvalue, defaults)
}
- Block(Seq(conseqStmt, altStmt) ++ memos)
-
- case s: Print =>
- if(weq(p, one)) {
- simlist += s
- } else {
- simlist += Print(s.info, s.string, s.args, s.clk, AND(p, s.en))
+ val res = default match {
+ case Some(defaultValue) =>
+ val trueValue = conseqNetlist getOrElse (lvalue, defaultValue)
+ val falseValue = altNetlist getOrElse (lvalue, defaultValue)
+ (trueValue, falseValue) match {
+ case (WInvalid(), WInvalid()) => WInvalid()
+ case (WInvalid(), fv) => ValidIf(NOT(s.pred), fv, fv.tpe)
+ case (tv, WInvalid()) => ValidIf(s.pred, tv, tv.tpe)
+ case (tv, fv) => Mux(s.pred, tv, fv, mux_type_and_widths(tv, fv))
+ }
+ case None =>
+ // Since not in netlist, lvalue must be declared in EXACTLY one of conseq or alt
+ conseqNetlist getOrElse (lvalue, altNetlist(lvalue))
}
- EmptyStmt
- case s: Stop =>
- if (weq(p, one)) {
- simlist += s
- } else {
- simlist += Stop(s.info, s.ret, s.clk, AND(p, s.en))
+
+ nodes get res match {
+ case Some(name) =>
+ netlist(lvalue) = WRef(name, res.tpe, NodeKind(), MALE)
+ EmptyStmt
+ case None =>
+ val name = namespace.newTemp
+ nodes(res) = name
+ netlist(lvalue) = WRef(name, res.tpe, NodeKind(), MALE)
+ DefNode(s.info, name, res)
}
- EmptyStmt
- case s => s map expandWhens(netlist, defaults, p)
- }
+ }
+ Block(Seq(conseqStmt, altStmt) ++ memos)
+ case s: Print =>
+ simlist += (if (weq(p, one)) s else Print(s.info, s.string, s.args, s.clk, AND(p, s.en)))
+ EmptyStmt
+ case s: Stop =>
+ simlist += (if (weq(p, one)) s else Stop(s.info, s.ret, s.clk, AND(p, s.en)))
+ EmptyStmt
+ case s => s map expandWhens(netlist, defaults, p)
}
- val netlist = LinkedHashMap[WrappedExpression, Expression]()
-
+ val netlist = new Netlist
// Add ports to netlist
- m.ports foreach { port =>
- getFemaleRefs(port.name, port.tpe, to_gender(port.direction)) foreach (ref => netlist(ref) = WVoid())
- }
- val bodyx = expandWhens(netlist, Seq(netlist), one)(m.body)
-
- (netlist, simlist, bodyx)
+ netlist ++= (m.ports flatMap { case Port(_, name, dir, tpe) =>
+ getFemaleRefs(name, tpe, to_gender(dir)) map (ref => we(ref) -> WVoid())
+ })
+ (netlist, simlist, expandWhens(netlist, Seq(netlist), one)(m.body))
}
- val modulesx = c.modules map { m =>
- m match {
- case m: ExtModule => m
- case m: Module =>
- val (netlist, simlist, bodyx) = expandWhens(m)
- val newBody = Block(Seq(squashEmpty(bodyx)) ++ expandNetlist(netlist) ++ simlist)
- Module(m.info, m.name, m.ports, newBody)
- }
+ val modulesx = c.modules map {
+ case m: ExtModule => m
+ case m: Module =>
+ val (netlist, simlist, bodyx) = expandWhens(m)
+ val newBody = Block(Seq(squashEmpty(bodyx)) ++ expandNetlist(netlist) ++ simlist)
+ Module(m.info, m.name, m.ports, newBody)
}
Circuit(c.info, modulesx, c.main)
}