Merge pull request #3290 from mpasternacki/bugfix/freebsd-build
[yosys.git] / kernel / consteval.h
index 5836cdd5b9448e8fe67c99f3c0026e02e44ea92d..642eb42b25d0f7d0692865f9a3e49e40a8f230ac 100644 (file)
@@ -1,12 +1,12 @@
 /*
  *  yosys -- Yosys Open SYnthesis Suite
  *
- *  Copyright (C) 2012  Clifford Wolf <clifford@clifford.at>
- *  
+ *  Copyright (C) 2012  Claire Xenia Wolf <claire@yosyshq.com>
+ *
  *  Permission to use, copy, modify, and/or distribute this software for any
  *  purpose with or without fee is hereby granted, provided that the above
  *  copyright notice and this permission notice appear in all copies.
- *  
+ *
  *  THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  *  WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  *  MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
@@ -23,6 +23,9 @@
 #include "kernel/rtlil.h"
 #include "kernel/sigtools.h"
 #include "kernel/celltypes.h"
+#include "kernel/macc.h"
+
+YOSYS_NAMESPACE_BEGIN
 
 struct ConstEval
 {
@@ -33,17 +36,18 @@ struct ConstEval
        SigSet<RTLIL::Cell*> sig2driver;
        std::set<RTLIL::Cell*> busy;
        std::vector<SigMap> stack;
+       RTLIL::State defaultval;
 
-       ConstEval(RTLIL::Module *module) : module(module), assign_map(module)
+       ConstEval(RTLIL::Module *module, RTLIL::State defaultval = RTLIL::State::Sm) : module(module), assign_map(module), defaultval(defaultval)
        {
                CellTypes ct;
                ct.setup_internals();
                ct.setup_stdcells();
 
-               for (auto &it : module->cells) {
+               for (auto &it : module->cells_) {
                        if (!ct.cell_known(it.second->type))
                                continue;
-                       for (auto &it2 : it.second->connections)
+                       for (auto &it2 : it.second->connections())
                                if (ct.cell_output(it.second->type, it2.first))
                                        sig2driver.insert(assign_map(it2.second), it.second);
                }
@@ -71,11 +75,8 @@ struct ConstEval
                assign_map.apply(sig);
 #ifndef NDEBUG
                RTLIL::SigSpec current_val = values_map(sig);
-               current_val.expand();
-               for (size_t i = 0; i < current_val.chunks().size(); i++) {
-                       const RTLIL::SigChunk &chunk = current_val.chunks()[i];
-                       assert(chunk.wire != NULL || chunk.data.bits[0] == value.bits[i]);
-               }
+               for (int i = 0; i < GetSize(current_val); i++)
+                       log_assert(current_val[i].wire != NULL || current_val[i] == value.bits[i]);
 #endif
                values_map.add(sig, RTLIL::SigSpec(value));
        }
@@ -88,31 +89,69 @@ struct ConstEval
 
        bool eval(RTLIL::Cell *cell, RTLIL::SigSpec &undef)
        {
+               if (cell->type == ID($lcu))
+               {
+                       RTLIL::SigSpec sig_p = cell->getPort(ID::P);
+                       RTLIL::SigSpec sig_g = cell->getPort(ID::G);
+                       RTLIL::SigSpec sig_ci = cell->getPort(ID::CI);
+                       RTLIL::SigSpec sig_co = values_map(assign_map(cell->getPort(ID::CO)));
+
+                       if (sig_co.is_fully_const())
+                               return true;
+
+                       if (!eval(sig_p, undef, cell))
+                               return false;
+
+                       if (!eval(sig_g, undef, cell))
+                               return false;
+
+                       if (!eval(sig_ci, undef, cell))
+                               return false;
+
+                       if (sig_p.is_fully_def() && sig_g.is_fully_def() && sig_ci.is_fully_def())
+                       {
+                               RTLIL::Const coval(RTLIL::Sx, GetSize(sig_co));
+                               bool carry = sig_ci.as_bool();
+
+                               for (int i = 0; i < GetSize(coval); i++) {
+                                       carry = (sig_g[i] == State::S1) || (sig_p[i] == RTLIL::S1 && carry);
+                                       coval.bits[i] = carry ? State::S1 : State::S0;
+                               }
+
+                               set(sig_co, coval);
+                       }
+                       else
+                               set(sig_co, RTLIL::Const(RTLIL::Sx, GetSize(sig_co)));
+
+                       return true;
+               }
+
                RTLIL::SigSpec sig_a, sig_b, sig_s, sig_y;
 
-               assert(cell->connections.count("\\Y") > 0);
-               sig_y = values_map(assign_map(cell->connections["\\Y"]));
+               log_assert(cell->hasPort(ID::Y));
+               sig_y = values_map(assign_map(cell->getPort(ID::Y)));
                if (sig_y.is_fully_const())
                        return true;
 
-               if (cell->connections.count("\\S") > 0) {
-                       sig_s = cell->connections["\\S"];
-                       if (!eval(sig_s, undef, cell))
-                               return false;
+               if (cell->hasPort(ID::S)) {
+                       sig_s = cell->getPort(ID::S);
                }
 
-               if (cell->connections.count("\\A") > 0)
-                       sig_a = cell->connections["\\A"];
+               if (cell->hasPort(ID::A))
+                       sig_a = cell->getPort(ID::A);
 
-               if (cell->connections.count("\\B") > 0)
-                       sig_b = cell->connections["\\B"];
+               if (cell->hasPort(ID::B))
+                       sig_b = cell->getPort(ID::B);
 
-               if (cell->type == "$mux" || cell->type == "$pmux" || cell->type == "$safe_pmux" || cell->type == "$_MUX_")
+               if (cell->type.in(ID($mux), ID($pmux), ID($_MUX_), ID($_NMUX_)))
                {
                        std::vector<RTLIL::SigSpec> y_candidates;
                        int count_maybe_set_s_bits = 0;
                        int count_set_s_bits = 0;
 
+                       if (!eval(sig_s, undef, cell))
+                               return false;
+
                        for (int i = 0; i < sig_s.size(); i++)
                        {
                                RTLIL::State s_bit = sig_s.extract(i, 1).as_const().bits.at(0);
@@ -128,19 +167,19 @@ struct ConstEval
                                        count_set_s_bits++;
                        }
 
-                       if (cell->type == "$safe_pmux" && count_set_s_bits > 1)
-                               y_candidates.clear();
-
-                       if ((cell->type == "$safe_pmux" && count_maybe_set_s_bits > 1) || count_set_s_bits == 0)
+                       if (count_set_s_bits == 0)
                                y_candidates.push_back(sig_a);
 
                        std::vector<RTLIL::Const> y_values;
 
-                       assert(y_candidates.size() > 0);
+                       log_assert(y_candidates.size() > 0);
                        for (auto &yc : y_candidates) {
                                if (!eval(yc, undef, cell))
                                        return false;
-                               y_values.push_back(yc.as_const());
+                               if (cell->type == ID($_NMUX_))
+                                       y_values.push_back(RTLIL::const_not(yc.as_const(), Const(), false, false, GetSize(yc)));
+                               else
+                                       y_values.push_back(yc.as_const());
                        }
 
                        if (y_values.size() > 1)
@@ -149,7 +188,7 @@ struct ConstEval
 
                                for (size_t i = 1; i < y_values.size(); i++) {
                                        std::vector<RTLIL::State> &slave_bits = y_values.at(i).bits;
-                                       assert(master_bits.size() == slave_bits.size());
+                                       log_assert(master_bits.size() == slave_bits.size());
                                        for (size_t j = 0; j < master_bits.size(); j++)
                                                if (master_bits[j] != slave_bits[j])
                                                        master_bits[j] = RTLIL::State::Sx;
@@ -160,13 +199,169 @@ struct ConstEval
                        else
                                set(sig_y, y_values.front());
                }
+               else if (cell->type == ID($bmux))
+               {
+                       if (!eval(sig_s, undef, cell))
+                               return false;
+
+                       if (sig_s.is_fully_def()) {
+                               int sel = sig_s.as_int();
+                               int width = GetSize(sig_y);
+                               SigSpec res = sig_a.extract(sel * width, width);
+                               if (!eval(res, undef, cell))
+                                       return false;
+                               set(sig_y, res.as_const());
+                       } else {
+                               if (!eval(sig_a, undef, cell))
+                                       return false;
+                               set(sig_y, const_bmux(sig_a.as_const(), sig_s.as_const()));
+                       }
+               }
+               else if (cell->type == ID($demux))
+               {
+                       if (!eval(sig_a, undef, cell))
+                               return false;
+                       if (sig_a.is_fully_zero()) {
+                               set(sig_y, Const(0, GetSize(sig_y)));
+                       } else {
+                               if (!eval(sig_s, undef, cell))
+                                       return false;
+                               set(sig_y, const_demux(sig_a.as_const(), sig_s.as_const()));
+                       }
+               }
+               else if (cell->type == ID($fa))
+               {
+                       RTLIL::SigSpec sig_c = cell->getPort(ID::C);
+                       RTLIL::SigSpec sig_x = cell->getPort(ID::X);
+                       int width = GetSize(sig_c);
+
+                       if (!eval(sig_a, undef, cell))
+                               return false;
+
+                       if (!eval(sig_b, undef, cell))
+                               return false;
+
+                       if (!eval(sig_c, undef, cell))
+                               return false;
+
+                       RTLIL::Const t1 = const_xor(sig_a.as_const(), sig_b.as_const(), false, false, width);
+                       RTLIL::Const val_y = const_xor(t1, sig_c.as_const(), false, false, width);
+
+                       RTLIL::Const t2 = const_and(sig_a.as_const(), sig_b.as_const(), false, false, width);
+                       RTLIL::Const t3 = const_and(sig_c.as_const(), t1, false, false, width);
+                       RTLIL::Const val_x = const_or(t2, t3, false, false, width);
+
+                       for (int i = 0; i < GetSize(val_y); i++)
+                               if (val_y.bits[i] == RTLIL::Sx)
+                                       val_x.bits[i] = RTLIL::Sx;
+
+                       set(sig_y, val_y);
+                       set(sig_x, val_x);
+               }
+               else if (cell->type == ID($alu))
+               {
+                       bool signed_a = cell->parameters.count(ID::A_SIGNED) > 0 && cell->parameters[ID::A_SIGNED].as_bool();
+                       bool signed_b = cell->parameters.count(ID::B_SIGNED) > 0 && cell->parameters[ID::B_SIGNED].as_bool();
+
+                       RTLIL::SigSpec sig_ci = cell->getPort(ID::CI);
+                       RTLIL::SigSpec sig_bi = cell->getPort(ID::BI);
+
+                       if (!eval(sig_a, undef, cell))
+                               return false;
+
+                       if (!eval(sig_b, undef, cell))
+                               return false;
+
+                       if (!eval(sig_ci, undef, cell))
+                               return false;
+
+                       if (!eval(sig_bi, undef, cell))
+                               return false;
+
+                       RTLIL::SigSpec sig_x = cell->getPort(ID::X);
+                       RTLIL::SigSpec sig_co = cell->getPort(ID::CO);
+
+                       bool any_input_undef = !(sig_a.is_fully_def() && sig_b.is_fully_def() && sig_ci.is_fully_def() && sig_bi.is_fully_def());
+                       sig_a.extend_u0(GetSize(sig_y), signed_a);
+                       sig_b.extend_u0(GetSize(sig_y), signed_b);
+
+                       bool carry = sig_ci[0] == State::S1;
+                       bool b_inv = sig_bi[0] == State::S1;
+
+                       for (int i = 0; i < GetSize(sig_y); i++)
+                       {
+                               RTLIL::SigSpec x_inputs = { sig_a[i], sig_b[i], sig_bi[0] };
+
+                               if (!x_inputs.is_fully_def()) {
+                                       set(sig_x[i], RTLIL::Sx);
+                               } else {
+                                       bool bit_a = sig_a[i] == State::S1;
+                                       bool bit_b = (sig_b[i] == State::S1) != b_inv;
+                                       bool bit_x = bit_a != bit_b;
+                                       set(sig_x[i], bit_x ? State::S1 : State::S0);
+                               }
+
+                               if (any_input_undef) {
+                                       set(sig_y[i], RTLIL::Sx);
+                                       set(sig_co[i], RTLIL::Sx);
+                               } else {
+                                       bool bit_a = sig_a[i] == State::S1;
+                                       bool bit_b = (sig_b[i] == State::S1) != b_inv;
+                                       bool bit_y = (bit_a != bit_b) != carry;
+                                       carry = (bit_a && bit_b) || (bit_a && carry) || (bit_b && carry);
+                                       set(sig_y[i], bit_y ? State::S1 : State::S0);
+                                       set(sig_co[i], carry ? State::S1 : State::S0);
+                               }
+                       }
+               }
+               else if (cell->type == ID($macc))
+               {
+                       Macc macc;
+                       macc.from_cell(cell);
+
+                       if (!eval(macc.bit_ports, undef, cell))
+                               return false;
+
+                       for (auto &port : macc.ports) {
+                               if (!eval(port.in_a, undef, cell))
+                                       return false;
+                               if (!eval(port.in_b, undef, cell))
+                                       return false;
+                       }
+
+                       RTLIL::Const result(0, GetSize(cell->getPort(ID::Y)));
+                       if (!macc.eval(result))
+                               log_abort();
+
+                       set(cell->getPort(ID::Y), result);
+               }
                else
                {
+                       RTLIL::SigSpec sig_c, sig_d;
+
+                       if (cell->type.in(ID($_AOI3_), ID($_OAI3_), ID($_AOI4_), ID($_OAI4_))) {
+                               if (cell->hasPort(ID::C))
+                                       sig_c = cell->getPort(ID::C);
+                               if (cell->hasPort(ID::D))
+                                       sig_d = cell->getPort(ID::D);
+                       }
+
                        if (sig_a.size() > 0 && !eval(sig_a, undef, cell))
                                return false;
                        if (sig_b.size() > 0 && !eval(sig_b, undef, cell))
                                return false;
-                       set(sig_y, CellTypes::eval(cell, sig_a.as_const(), sig_b.as_const()));
+                       if (sig_c.size() > 0 && !eval(sig_c, undef, cell))
+                               return false;
+                       if (sig_d.size() > 0 && !eval(sig_d, undef, cell))
+                               return false;
+
+                       bool eval_err = false;
+                       RTLIL::Const eval_ret = CellTypes::eval(cell, sig_a.as_const(), sig_b.as_const(), sig_c.as_const(), sig_d.as_const(), &eval_err);
+
+                       if (eval_err)
+                               return false;
+
+                       set(sig_y, eval_ret);
                }
 
                return true;
@@ -210,9 +405,15 @@ struct ConstEval
                if (sig.is_fully_const())
                        return true;
 
-               for (size_t i = 0; i < sig.chunks().size(); i++)
-                       if (sig.chunks()[i].wire != NULL)
-                               undef.append(sig.chunks()[i]);
+               if (defaultval != RTLIL::State::Sm) {
+                       for (auto &bit : sig)
+                               if (bit.wire) bit = defaultval;
+                       return true;
+               }
+
+               for (auto &c : sig.chunks())
+                       if (c.wire != NULL)
+                               undef.append(c);
                return false;
        }
 
@@ -223,4 +424,6 @@ struct ConstEval
        }
 };
 
+YOSYS_NAMESPACE_END
+
 #endif