diff options
Diffstat (limited to 'src/main/scala/firrtl/passes/ExpandWhens.scala')
| -rw-r--r-- | src/main/scala/firrtl/passes/ExpandWhens.scala | 208 |
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) } |
