2 * yosys -- Yosys Open SYnthesis Suite
4 * Copyright (C) 2012 Clifford Wolf <clifford@clifford.at>
5 * 2019 Eddie Hung <eddie@fpgeh.com>
7 * Permission to use, copy, modify, and/or distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
22 // Berkeley Logic Synthesis and Verification Group, ABC: A System for Sequential Synthesis and Verification
23 // http://www.eecs.berkeley.edu/~alanmi/abc/
26 // Based on &flow3 - better QoR but more experimental
27 #define ABC_COMMAND_LUT "&st; &ps -l; &sweep -v; &scorr; " \
28 "&st; &if {W}; &save; &st; &syn2; &if {W} -v; &save; &load; "\
29 "&st; &if -g -K 6; &dch -f; &if {W} -v; &save; &load; "\
30 "&st; &if -g -K 6; &synch2; &if {W} -v; &save; &load; "\
33 #define ABC_COMMAND_LUT "&st; &scorr; &sweep; &dc2; &st; &dch -f; &ps; &if {W} {D} -v; &mfs; &ps -l"
37 #define ABC_FAST_COMMAND_LUT "&st; &if {W} {D}"
39 #include "kernel/register.h"
40 #include "kernel/sigtools.h"
41 #include "kernel/celltypes.h"
42 #include "kernel/cost.h"
43 #include "kernel/log.h"
56 #include "frontends/aiger/aigerparse.h"
57 #include "kernel/utils.h"
60 extern "C" int Abc_RealMain(int argc
, char *argv
[]);
64 PRIVATE_NAMESPACE_BEGIN
69 RTLIL::Module
*module
;
71 bool clk_polarity
, en_polarity
;
72 RTLIL::SigSpec clk_sig
, en_sig
;
74 inline std::string
remap_name(RTLIL::IdString abc_name
)
76 return stringf("$abc$%d$%s", map_autoidx
, abc_name
.c_str()+1);
79 void handle_loops(RTLIL::Design
*design
,
80 const dict
<IdString
,pool
<IdString
>> &scc_break_inputs
)
82 Pass::call(design
, "scc -set_attr abc_scc_id {}");
84 // For every unique SCC found, (arbitrarily) find the first
85 // cell in the component, and select (and mark) all its output
87 pool
<RTLIL::Const
> ids_seen
;
88 for (auto cell
: module
->cells()) {
89 auto it
= cell
->attributes
.find(ID(abc_scc_id
));
90 if (it
!= cell
->attributes
.end()) {
91 auto r
= ids_seen
.insert(it
->second
);
93 for (auto &c
: cell
->connections_
) {
94 if (c
.second
.is_fully_const()) continue;
95 if (cell
->output(c
.first
)) {
96 SigBit b
= c
.second
.as_bit();
98 log_assert(!w
->port_input
);
100 w
= module
->wire(stringf("%s.abci", w
->name
.c_str()));
102 w
= module
->addWire(stringf("%s.abci", b
.wire
->name
.c_str()), GetSize(b
.wire
));
103 w
->port_output
= true;
106 log_assert(w
->port_input
);
107 log_assert(b
.offset
< GetSize(w
));
109 w
->set_bool_attribute(ID(abc_scc_break
));
110 module
->swap_names(b
.wire
, w
);
111 c
.second
= RTLIL::SigBit(w
, b
.offset
);
115 cell
->attributes
.erase(it
);
118 auto jt
= scc_break_inputs
.find(cell
->type
);
119 if (jt
!= scc_break_inputs
.end())
120 for (auto port_name
: jt
->second
) {
122 auto &rhs
= cell
->connections_
.at(port_name
);
126 w
->port_output
= true;
127 w
->set_bool_attribute(ID(abc_scc_break
));
128 w
= module
->wire(stringf("%s.abci", w
->name
.c_str()));
130 w
= module
->addWire(stringf("%s.abci", b
.wire
->name
.c_str()), GetSize(b
.wire
));
131 w
->port_input
= true;
134 log_assert(b
.offset
< GetSize(w
));
135 log_assert(w
->port_input
);
137 sig
.append(RTLIL::SigBit(w
, b
.offset
));
143 module
->fixup_ports();
146 std::string
add_echos_to_abc_cmd(std::string str
)
148 std::string new_str
, token
;
149 for (size_t i
= 0; i
< str
.size(); i
++) {
152 while (i
+1 < str
.size() && str
[i
+1] == ' ')
154 new_str
+= "echo + " + token
+ " " + token
+ " ";
159 if (!token
.empty()) {
160 if (!new_str
.empty())
161 new_str
+= "echo + " + token
+ "; ";
168 std::string
fold_abc_cmd(std::string str
)
170 std::string token
, new_str
= " ";
171 int char_counter
= 10;
173 for (size_t i
= 0; i
<= str
.size(); i
++) {
176 if (i
== str
.size() || str
[i
] == ';') {
177 if (char_counter
+ token
.size() > 75)
178 new_str
+= "\n ", char_counter
= 14;
179 new_str
+= token
, char_counter
+= token
.size();
187 std::string
replace_tempdir(std::string text
, std::string tempdir_name
, bool show_tempdir
)
193 size_t pos
= text
.find(tempdir_name
);
194 if (pos
== std::string::npos
)
196 text
= text
.substr(0, pos
) + "<abc-temp-dir>" + text
.substr(pos
+ GetSize(tempdir_name
));
199 std::string selfdir_name
= proc_self_dirname();
200 if (selfdir_name
!= "/") {
202 size_t pos
= text
.find(selfdir_name
);
203 if (pos
== std::string::npos
)
205 text
= text
.substr(0, pos
) + "<yosys-exe-dir>/" + text
.substr(pos
+ GetSize(selfdir_name
));
212 struct abc_output_filter
215 int escape_seq_state
;
217 std::string tempdir_name
;
220 abc_output_filter(std::string tempdir_name
, bool show_tempdir
) : tempdir_name(tempdir_name
), show_tempdir(show_tempdir
)
223 escape_seq_state
= 0;
226 void next_char(char ch
)
228 if (escape_seq_state
== 0 && ch
== '\033') {
229 escape_seq_state
= 1;
232 if (escape_seq_state
== 1) {
233 escape_seq_state
= ch
== '[' ? 2 : 0;
236 if (escape_seq_state
== 2) {
237 if ((ch
< '0' || '9' < ch
) && ch
!= ';')
238 escape_seq_state
= 0;
241 escape_seq_state
= 0;
247 log("ABC: %s\n", replace_tempdir(linebuf
, tempdir_name
, show_tempdir
).c_str());
248 got_cr
= false, linebuf
.clear();
252 got_cr
= false, linebuf
.clear();
256 void next_line(const std::string
&line
)
259 //if (sscanf(line.c_str(), "Start-point = pi%d. End-point = po%d.", &pi, &po) == 2) {
260 // log("ABC: Start-point = pi%d (%s). End-point = po%d (%s).\n",
261 // pi, pi_map.count(pi) ? pi_map.at(pi).c_str() : "???",
262 // po, po_map.count(po) ? po_map.at(po).c_str() : "???");
271 void abc9_module(RTLIL::Design
*design
, RTLIL::Module
*current_module
, std::string script_file
, std::string exe_file
,
272 bool cleanup
, vector
<int> lut_costs
, bool dff_mode
, std::string clk_str
,
273 bool /*keepff*/, std::string delay_target
, std::string
/*lutin_shared*/, bool fast_mode
,
274 bool show_tempdir
, std::string box_file
, std::string lut_file
,
275 std::string wire_delay
, const dict
<int,IdString
> &box_lookup
,
276 const dict
<IdString
,pool
<IdString
>> &scc_break_inputs
279 module
= current_module
;
280 map_autoidx
= autoidx
++;
285 clk_sig
= RTLIL::SigSpec();
288 en_sig
= RTLIL::SigSpec();
291 if (!clk_str
.empty() && clk_str
!= "$")
293 if (clk_str
.find(',') != std::string::npos
) {
294 int pos
= clk_str
.find(',');
295 std::string en_str
= clk_str
.substr(pos
+1);
296 clk_str
= clk_str
.substr(0, pos
);
297 if (en_str
[0] == '!') {
299 en_str
= en_str
.substr(1);
301 if (module
->wires_
.count(RTLIL::escape_id(en_str
)) != 0)
302 en_sig
= assign_map(RTLIL::SigSpec(module
->wires_
.at(RTLIL::escape_id(en_str
)), 0));
304 if (clk_str
[0] == '!') {
305 clk_polarity
= false;
306 clk_str
= clk_str
.substr(1);
308 if (module
->wires_
.count(RTLIL::escape_id(clk_str
)) != 0)
309 clk_sig
= assign_map(RTLIL::SigSpec(module
->wires_
.at(RTLIL::escape_id(clk_str
)), 0));
312 if (dff_mode
&& clk_sig
.empty())
313 log_cmd_error("Clock domain %s not found.\n", clk_str
.c_str());
315 std::string tempdir_name
= "/tmp/yosys-abc-XXXXXX";
317 tempdir_name
[0] = tempdir_name
[4] = '_';
318 tempdir_name
= make_temp_dir(tempdir_name
);
319 log_header(design
, "Extracting gate netlist of module `%s' to `%s/input.xaig'..\n",
320 module
->name
.c_str(), replace_tempdir(tempdir_name
, tempdir_name
, show_tempdir
).c_str());
322 std::string abc_script
;
324 if (!lut_costs
.empty()) {
325 abc_script
+= stringf("read_lut %s/lutdefs.txt; ", tempdir_name
.c_str());
326 if (!box_file
.empty())
327 abc_script
+= stringf("read_box -v %s; ", box_file
.c_str());
330 if (!lut_file
.empty()) {
331 abc_script
+= stringf("read_lut %s; ", lut_file
.c_str());
332 if (!box_file
.empty())
333 abc_script
+= stringf("read_box -v %s; ", box_file
.c_str());
338 abc_script
+= stringf("&read %s/input.xaig; &ps; ", tempdir_name
.c_str());
340 if (!script_file
.empty()) {
341 if (script_file
[0] == '+') {
342 for (size_t i
= 1; i
< script_file
.size(); i
++)
343 if (script_file
[i
] == '\'')
344 abc_script
+= "'\\''";
345 else if (script_file
[i
] == ',')
348 abc_script
+= script_file
[i
];
350 abc_script
+= stringf("source %s", script_file
.c_str());
351 } else if (!lut_costs
.empty() || !lut_file
.empty()) {
352 //bool all_luts_cost_same = true;
353 //for (int this_cost : lut_costs)
354 // if (this_cost != lut_costs.front())
355 // all_luts_cost_same = false;
356 abc_script
+= fast_mode
? ABC_FAST_COMMAND_LUT
: ABC_COMMAND_LUT
;
357 //if (all_luts_cost_same && !fast_mode)
358 // abc_script += "; lutpack {S}";
362 //if (script_file.empty() && !delay_target.empty())
363 // for (size_t pos = abc_script.find("dretime;"); pos != std::string::npos; pos = abc_script.find("dretime;", pos+1))
364 // abc_script = abc_script.substr(0, pos) + "dretime; retime -o {D};" + abc_script.substr(pos+8);
366 for (size_t pos
= abc_script
.find("{D}"); pos
!= std::string::npos
; pos
= abc_script
.find("{D}", pos
))
367 abc_script
= abc_script
.substr(0, pos
) + delay_target
+ abc_script
.substr(pos
+3);
369 //for (size_t pos = abc_script.find("{S}"); pos != std::string::npos; pos = abc_script.find("{S}", pos))
370 // abc_script = abc_script.substr(0, pos) + lutin_shared + abc_script.substr(pos+3);
372 for (size_t pos
= abc_script
.find("{W}"); pos
!= std::string::npos
; pos
= abc_script
.find("{W}", pos
))
373 abc_script
= abc_script
.substr(0, pos
) + wire_delay
+ abc_script
.substr(pos
+3);
375 abc_script
+= stringf("; &write %s/output.aig", tempdir_name
.c_str());
376 abc_script
= add_echos_to_abc_cmd(abc_script
);
378 for (size_t i
= 0; i
+1 < abc_script
.size(); i
++)
379 if (abc_script
[i
] == ';' && abc_script
[i
+1] == ' ')
380 abc_script
[i
+1] = '\n';
382 FILE *f
= fopen(stringf("%s/abc.script", tempdir_name
.c_str()).c_str(), "wt");
383 fprintf(f
, "%s\n", abc_script
.c_str());
386 if (dff_mode
|| !clk_str
.empty())
388 if (clk_sig
.size() == 0)
389 log("No%s clock domain found. Not extracting any FF cells.\n", clk_str
.empty() ? "" : " matching");
391 log("Found%s %s clock domain: %s", clk_str
.empty() ? "" : " matching", clk_polarity
? "posedge" : "negedge", log_signal(clk_sig
));
392 if (en_sig
.size() != 0)
393 log(", enabled by %s%s", en_polarity
? "" : "!", log_signal(en_sig
));
398 bool count_output
= false;
399 for (auto port_name
: module
->ports
) {
400 RTLIL::Wire
*port_wire
= module
->wire(port_name
);
401 log_assert(port_wire
);
402 if (port_wire
->port_output
) {
412 design
->selection_stack
.emplace_back(false);
413 RTLIL::Selection
& sel
= design
->selection_stack
.back();
416 handle_loops(design
, scc_break_inputs
);
418 Pass::call(design
, "aigmap");
420 //log("Extracted %d gates and %d wires to a netlist network with %d inputs and %d outputs.\n",
421 // count_gates, GetSize(signal_list), count_input, count_output);
423 Pass::call(design
, stringf("write_xaiger -map %s/input.sym %s/input.xaig", tempdir_name
.c_str(), tempdir_name
.c_str()));
428 buffer
= stringf("%s/%s", tempdir_name
.c_str(), "input.xaig");
431 log_error("Can't open ABC output file `%s'.\n", buffer
.c_str());
432 buffer
= stringf("%s/%s", tempdir_name
.c_str(), "input.sym");
433 log_assert(!design
->module(ID($__abc9__
)));
435 AigerReader
reader(design
, ifs
, ID($__abc9__
), "" /* clk_name */, buffer
.c_str() /* map_filename */, true /* wideports */);
436 reader
.parse_xaiger();
439 Pass::call(design
, stringf("write_verilog -noexpr -norename"));
440 design
->remove(design
->module(ID($__abc9__
)));
443 design
->selection_stack
.pop_back();
445 // Now 'unexpose' those wires by undoing
446 // the expose operation -- remove them from PO/PI
447 // and re-connecting them back together
448 for (auto wire
: module
->wires()) {
449 auto it
= wire
->attributes
.find(ID(abc_scc_break
));
450 if (it
!= wire
->attributes
.end()) {
451 wire
->attributes
.erase(it
);
452 log_assert(wire
->port_output
);
453 wire
->port_output
= false;
454 RTLIL::Wire
*i_wire
= module
->wire(wire
->name
.str() + ".abci");
456 log_assert(i_wire
->port_input
);
457 i_wire
->port_input
= false;
458 module
->connect(i_wire
, wire
);
461 module
->fixup_ports();
463 log_header(design
, "Executing ABC9.\n");
465 if (!lut_costs
.empty()) {
466 buffer
= stringf("%s/lutdefs.txt", tempdir_name
.c_str());
467 f
= fopen(buffer
.c_str(), "wt");
469 log_error("Opening %s for writing failed: %s\n", buffer
.c_str(), strerror(errno
));
470 for (int i
= 0; i
< GetSize(lut_costs
); i
++)
471 fprintf(f
, "%d %d.00 1.00\n", i
+1, lut_costs
.at(i
));
475 buffer
= stringf("%s -s -f %s/abc.script 2>&1", exe_file
.c_str(), tempdir_name
.c_str());
476 log("Running ABC command: %s\n", replace_tempdir(buffer
, tempdir_name
, show_tempdir
).c_str());
478 #ifndef YOSYS_LINK_ABC
479 abc_output_filter
filt(tempdir_name
, show_tempdir
);
480 int ret
= run_command(buffer
, std::bind(&abc_output_filter::next_line
, filt
, std::placeholders::_1
));
482 // These needs to be mutable, supposedly due to getopt
484 string tmp_script_name
= stringf("%s/abc.script", tempdir_name
.c_str());
485 abc_argv
[0] = strdup(exe_file
.c_str());
486 abc_argv
[1] = strdup("-s");
487 abc_argv
[2] = strdup("-f");
488 abc_argv
[3] = strdup(tmp_script_name
.c_str());
490 int ret
= Abc_RealMain(4, abc_argv
);
497 log_error("ABC: execution of command \"%s\" failed: return code %d.\n", buffer
.c_str(), ret
);
499 buffer
= stringf("%s/%s", tempdir_name
.c_str(), "output.aig");
502 log_error("Can't open ABC output file `%s'.\n", buffer
.c_str());
504 buffer
= stringf("%s/%s", tempdir_name
.c_str(), "input.sym");
505 log_assert(!design
->module(ID($__abc9__
)));
507 AigerReader
reader(design
, ifs
, ID($__abc9__
), "" /* clk_name */, buffer
.c_str() /* map_filename */, true /* wideports */);
508 reader
.parse_xaiger(box_lookup
);
512 Pass::call(design
, stringf("write_verilog -noexpr -norename"));
515 log_header(design
, "Re-integrating ABC9 results.\n");
516 RTLIL::Module
*mapped_mod
= design
->module(ID($__abc9__
));
517 if (mapped_mod
== NULL
)
518 log_error("ABC output file does not contain a module `$__abc9__'.\n");
520 pool
<RTLIL::SigBit
> output_bits
;
521 for (auto &it
: mapped_mod
->wires_
) {
522 RTLIL::Wire
*w
= it
.second
;
523 RTLIL::Wire
*remap_wire
= module
->addWire(remap_name(w
->name
), GetSize(w
));
524 if (markgroups
) remap_wire
->attributes
[ID(abcgroup
)] = map_autoidx
;
525 if (w
->port_output
) {
526 RTLIL::Wire
*wire
= module
->wire(w
->name
);
528 for (int i
= 0; i
< GetSize(w
); i
++)
529 output_bits
.insert({wire
, i
});
533 for (auto &it
: module
->connections_
) {
534 auto &signal
= it
.first
;
535 auto bits
= signal
.bits();
537 if (output_bits
.count(b
))
538 b
= module
->addWire(NEW_ID
);
539 signal
= std::move(bits
);
542 dict
<IdString
, bool> abc_box
;
543 vector
<RTLIL::Cell
*> boxes
;
544 for (const auto &it
: module
->cells_
) {
545 auto cell
= it
.second
;
546 if (cell
->type
.in(ID($_AND_
), ID($_NOT_
))) {
547 module
->remove(cell
);
550 auto jt
= abc_box
.find(cell
->type
);
551 if (jt
== abc_box
.end()) {
552 RTLIL::Module
* box_module
= design
->module(cell
->type
);
553 jt
= abc_box
.insert(std::make_pair(cell
->type
, box_module
&& box_module
->attributes
.count(ID(abc_box_id
)))).first
;
556 boxes
.emplace_back(cell
);
559 dict
<SigBit
, pool
<IdString
>> bit_drivers
, bit_users
;
560 TopoSort
<IdString
, RTLIL::sort_by_id_str
> toposort
;
561 dict
<RTLIL::Cell
*,RTLIL::Cell
*> not2drivers
;
562 dict
<SigBit
, std::vector
<RTLIL::Cell
*>> bit2sinks
;
564 std::map
<IdString
, int> cell_stats
;
565 for (auto c
: mapped_mod
->cells())
567 toposort
.node(c
->name
);
569 RTLIL::Cell
*cell
= nullptr;
570 if (c
->type
== ID($_NOT_
)) {
571 RTLIL::SigBit a_bit
= c
->getPort(ID(A
));
572 RTLIL::SigBit y_bit
= c
->getPort(ID(Y
));
573 bit_users
[a_bit
].insert(c
->name
);
574 bit_drivers
[y_bit
].insert(c
->name
);
577 c
->setPort(ID(Y
), module
->addWire(NEW_ID
));
578 RTLIL::Wire
*wire
= module
->wire(remap_name(y_bit
.wire
->name
));
580 module
->connect(RTLIL::SigBit(wire
, y_bit
.offset
), State::S1
);
582 else if (!lut_costs
.empty() || !lut_file
.empty()) {
583 RTLIL::Cell
* driver_lut
= nullptr;
584 // ABC can return NOT gates that drive POs
585 if (!a_bit
.wire
->port_input
) {
586 // If it's not a NOT gate that that comes from a PI directly,
587 // find the driver LUT and clone that to guarantee that we won't
588 // increase the max logic depth
589 // (TODO: Optimise by not cloning unless will increase depth)
590 RTLIL::IdString driver_name
;
591 if (GetSize(a_bit
.wire
) == 1)
592 driver_name
= stringf("%s$lut", a_bit
.wire
->name
.c_str());
594 driver_name
= stringf("%s[%d]$lut", a_bit
.wire
->name
.c_str(), a_bit
.offset
);
595 driver_lut
= mapped_mod
->cell(driver_name
);
599 // If a driver couldn't be found (could be from PI or box CI)
600 // then implement using a LUT
601 cell
= module
->addLut(remap_name(stringf("%s$lut", c
->name
.c_str())),
602 RTLIL::SigBit(module
->wires_
.at(remap_name(a_bit
.wire
->name
)), a_bit
.offset
),
603 RTLIL::SigBit(module
->wires_
.at(remap_name(y_bit
.wire
->name
)), y_bit
.offset
),
604 RTLIL::Const::from_string("01"));
605 bit2sinks
[cell
->getPort(ID(A
))].push_back(cell
);
606 cell_stats
[ID($lut
)]++;
609 not2drivers
[c
] = driver_lut
;
614 if (cell
&& markgroups
) cell
->attributes
[ID(abcgroup
)] = map_autoidx
;
617 cell_stats
[c
->type
]++;
619 RTLIL::Cell
*existing_cell
= nullptr;
620 if (c
->type
== ID($lut
)) {
621 if (GetSize(c
->getPort(ID(A
))) == 1 && c
->getParam(ID(LUT
)) == RTLIL::Const::from_string("01")) {
622 SigSpec my_a
= module
->wires_
.at(remap_name(c
->getPort(ID(A
)).as_wire()->name
));
623 SigSpec my_y
= module
->wires_
.at(remap_name(c
->getPort(ID(Y
)).as_wire()->name
));
624 module
->connect(my_y
, my_a
);
625 if (markgroups
) c
->attributes
[ID(abcgroup
)] = map_autoidx
;
629 cell
= module
->addCell(remap_name(c
->name
), c
->type
);
632 existing_cell
= module
->cell(c
->name
);
633 log_assert(existing_cell
);
634 cell
= module
->addCell(remap_name(c
->name
), c
->type
);
635 module
->swap_names(cell
, existing_cell
);
638 if (markgroups
) cell
->attributes
[ID(abcgroup
)] = map_autoidx
;
640 cell
->parameters
= existing_cell
->parameters
;
641 cell
->attributes
= existing_cell
->attributes
;
644 cell
->parameters
= c
->parameters
;
645 cell
->attributes
= c
->attributes
;
647 for (auto &conn
: c
->connections()) {
648 RTLIL::SigSpec newsig
;
649 for (auto c
: conn
.second
.chunks()) {
652 //log_assert(c.width == 1);
654 c
.wire
= module
->wires_
.at(remap_name(c
.wire
->name
));
657 cell
->setPort(conn
.first
, newsig
);
659 if (cell
->input(conn
.first
)) {
660 for (auto i
: newsig
)
661 bit2sinks
[i
].push_back(cell
);
662 for (auto i
: conn
.second
)
663 bit_users
[i
].insert(c
->name
);
665 if (cell
->output(conn
.first
))
666 for (auto i
: conn
.second
)
667 bit_drivers
[i
].insert(c
->name
);
671 for (auto cell
: boxes
)
672 module
->remove(cell
);
674 // Copy connections (and rename) from mapped_mod to module
675 for (auto conn
: mapped_mod
->connections()) {
676 if (!conn
.first
.is_fully_const()) {
677 auto chunks
= conn
.first
.chunks();
678 for (auto &c
: chunks
)
679 c
.wire
= module
->wires_
.at(remap_name(c
.wire
->name
));
680 conn
.first
= std::move(chunks
);
682 if (!conn
.second
.is_fully_const()) {
683 auto chunks
= conn
.second
.chunks();
684 for (auto &c
: chunks
)
686 c
.wire
= module
->wires_
.at(remap_name(c
.wire
->name
));
687 conn
.second
= std::move(chunks
);
689 module
->connect(conn
);
692 for (auto &it
: cell_stats
)
693 log("ABC RESULTS: %15s cells: %8d\n", it
.first
.c_str(), it
.second
);
694 int in_wires
= 0, out_wires
= 0;
696 // Stitch in mapped_mod's inputs/outputs into module
697 for (auto &it
: mapped_mod
->wires_
) {
698 RTLIL::Wire
*w
= it
.second
;
699 if (!w
->port_input
&& !w
->port_output
)
701 RTLIL::Wire
*wire
= module
->wire(w
->name
);
703 RTLIL::Wire
*remap_wire
= module
->wire(remap_name(w
->name
));
704 RTLIL::SigSpec signal
= RTLIL::SigSpec(wire
, 0, GetSize(remap_wire
));
705 log_assert(GetSize(signal
) >= GetSize(remap_wire
));
707 log_assert(w
->port_input
|| w
->port_output
);
710 conn
.first
= remap_wire
;
711 conn
.second
= signal
;
713 module
->connect(conn
);
715 if (w
->port_output
) {
717 conn
.second
= remap_wire
;
719 module
->connect(conn
);
723 for (auto &it
: bit_users
)
724 if (bit_drivers
.count(it
.first
))
725 for (auto driver_cell
: bit_drivers
.at(it
.first
))
726 for (auto user_cell
: it
.second
)
727 toposort
.edge(driver_cell
, user_cell
);
728 bool no_loops
= toposort
.sort();
729 log_assert(no_loops
);
731 for (auto ii
= toposort
.sorted
.rbegin(); ii
!= toposort
.sorted
.rend(); ii
++) {
732 RTLIL::Cell
*not_cell
= mapped_mod
->cell(*ii
);
733 log_assert(not_cell
);
734 if (not_cell
->type
!= ID($_NOT_
))
736 auto it
= not2drivers
.find(not_cell
);
737 if (it
== not2drivers
.end())
739 RTLIL::Cell
*driver_lut
= it
->second
;
740 RTLIL::SigBit a_bit
= not_cell
->getPort(ID(A
));
741 RTLIL::SigBit y_bit
= not_cell
->getPort(ID(Y
));
742 RTLIL::Const driver_mask
;
744 a_bit
.wire
= module
->wires_
.at(remap_name(a_bit
.wire
->name
));
745 y_bit
.wire
= module
->wires_
.at(remap_name(y_bit
.wire
->name
));
747 auto jt
= bit2sinks
.find(a_bit
);
748 if (jt
== bit2sinks
.end())
751 for (auto sink_cell
: jt
->second
)
752 if (sink_cell
->type
!= ID($lut
))
755 // Push downstream LUTs past inverter
756 for (auto sink_cell
: jt
->second
) {
757 SigSpec A
= sink_cell
->getPort(ID(A
));
758 RTLIL::Const mask
= sink_cell
->getParam(ID(LUT
));
760 for (; index
< GetSize(A
); index
++)
761 if (A
[index
] == a_bit
)
763 log_assert(index
< GetSize(A
));
765 while (i
< GetSize(mask
)) {
766 for (int j
= 0; j
< (1 << index
); j
++)
767 std::swap(mask
[i
+j
], mask
[i
+j
+(1 << index
)]);
771 sink_cell
->setPort(ID(A
), A
);
772 sink_cell
->setParam(ID(LUT
), mask
);
775 // Since we have rewritten all sinks (which we know
776 // to be only LUTs) to be after the inverter, we can
777 // go ahead and clone the LUT with the expectation
778 // that the original driving LUT will become dangling
779 // and get cleaned away
781 driver_mask
= driver_lut
->getParam(ID(LUT
));
782 for (auto &b
: driver_mask
.bits
) {
783 if (b
== RTLIL::State::S0
) b
= RTLIL::State::S1
;
784 else if (b
== RTLIL::State::S1
) b
= RTLIL::State::S0
;
786 auto cell
= module
->addLut(NEW_ID
,
787 driver_lut
->getPort(ID(A
)),
790 for (auto &bit
: cell
->connections_
.at(ID(A
))) {
791 bit
.wire
= module
->wires_
.at(remap_name(bit
.wire
->name
));
792 bit2sinks
[bit
].push_back(cell
);
796 //log("ABC RESULTS: internal signals: %8d\n", int(signal_list.size()) - in_wires - out_wires);
797 log("ABC RESULTS: input signals: %8d\n", in_wires
);
798 log("ABC RESULTS: output signals: %8d\n", out_wires
);
800 design
->remove(mapped_mod
);
804 log("Don't call ABC as there is nothing to map.\n");
809 log("Removing temp directory.\n");
810 remove_directory(tempdir_name
);
816 struct Abc9Pass
: public Pass
{
817 Abc9Pass() : Pass("abc9", "use ABC9 for technology mapping") { }
818 void help() YS_OVERRIDE
820 // |---v---|---v---|---v---|---v---|---v---|---v---|---v---|---v---|---v---|---v---|
822 log(" abc9 [options] [selection]\n");
824 log("This pass uses the ABC tool [1] for technology mapping of yosys's internal gate\n");
825 log("library to a target architecture.\n");
827 log(" -exe <command>\n");
829 log(" use the specified command instead of \"" ABCEXTERNAL
"\" to execute ABC.\n");
831 log(" use the specified command instead of \"<yosys-bindir>/yosys-abc\" to execute ABC.\n");
833 log(" This can e.g. be used to call a specific version of ABC or a wrapper.\n");
835 log(" -script <file>\n");
836 log(" use the specified ABC script file instead of the default script.\n");
838 log(" if <file> starts with a plus sign (+), then the rest of the filename\n");
839 log(" string is interpreted as the command string to be passed to ABC. The\n");
840 log(" leading plus sign is removed and all commas (,) in the string are\n");
841 log(" replaced with blanks before the string is passed to ABC.\n");
843 log(" if no -script parameter is given, the following scripts are used:\n");
845 log(" for -lut/-luts (only one LUT size):\n");
846 log("%s\n", fold_abc_cmd(ABC_COMMAND_LUT
/*"; lutpack {S}"*/).c_str());
848 log(" for -lut/-luts (different LUT sizes):\n");
849 log("%s\n", fold_abc_cmd(ABC_COMMAND_LUT
).c_str());
852 log(" use different default scripts that are slightly faster (at the cost\n");
853 log(" of output quality):\n");
855 log(" for -lut/-luts:\n");
856 log("%s\n", fold_abc_cmd(ABC_FAST_COMMAND_LUT
).c_str());
858 log(" -D <picoseconds>\n");
859 log(" set delay target. the string {D} in the default scripts above is\n");
860 log(" replaced by this option when used, and an empty string otherwise\n");
861 log(" (indicating best possible delay).\n");
862 // log(" This also replaces 'dretime' with 'dretime; retime -o {D}' in the\n");
863 // log(" default scripts above.\n");
865 // log(" -S <num>\n");
866 // log(" maximum number of LUT inputs shared.\n");
867 // log(" (replaces {S} in the default scripts above, default: -S 1)\n");
869 log(" -lut <width>\n");
870 log(" generate netlist using luts of (max) the specified width.\n");
872 log(" -lut <w1>:<w2>\n");
873 log(" generate netlist using luts of (max) the specified width <w2>. All\n");
874 log(" luts with width <= <w1> have constant cost. for luts larger than <w1>\n");
875 log(" the area cost doubles with each additional input bit. the delay cost\n");
876 log(" is still constant for all lut widths.\n");
878 log(" -lut <file>\n");
879 log(" pass this file with lut library to ABC.\n");
881 log(" -luts <cost1>,<cost2>,<cost3>,<sizeN>:<cost4-N>,..\n");
882 log(" generate netlist using luts. Use the specified costs for luts with 1,\n");
883 log(" 2, 3, .. inputs.\n");
886 // log(" also pass $_DFF_?_ and $_DFFE_??_ cells through ABC. modules with many\n");
887 // log(" clock domains are automatically partitioned in clock domains and each\n");
888 // log(" domain is passed through ABC independently.\n");
890 // log(" -clk [!]<clock-signal-name>[,[!]<enable-signal-name>]\n");
891 // log(" use only the specified clock domain. this is like -dff, but only FF\n");
892 // log(" cells that belong to the specified clock domain are used.\n");
894 // log(" -keepff\n");
895 // log(" set the \"keep\" attribute on flip-flop output wires. (and thus preserve\n");
896 // log(" them, for example for equivalence checking.)\n");
898 log(" -nocleanup\n");
899 log(" when this option is used, the temporary files created by this pass\n");
900 log(" are not removed. this is useful for debugging.\n");
903 log(" print the temp dir name in log. usually this is suppressed so that the\n");
904 log(" command output is identical across runs.\n");
906 log(" -markgroups\n");
907 log(" set a 'abcgroup' attribute on all objects created by ABC. The value of\n");
908 log(" this attribute is a unique integer for each ABC process started. This\n");
909 log(" is useful for debugging the partitioning of clock domains.\n");
911 log(" -box <file>\n");
912 log(" pass this file with box library to ABC. Use with -lut.\n");
914 log("Note that this is a logic optimization pass within Yosys that is calling ABC\n");
915 log("internally. This is not going to \"run ABC on your design\". It will instead run\n");
916 log("ABC on logic snippets extracted from your design. You will not get any useful\n");
917 log("output when passing an ABC script that writes a file. Instead write your full\n");
918 log("design as BLIF file with write_blif and then load that into ABC externally if\n");
919 log("you want to use ABC to convert your design into another format.\n");
921 log("[1] http://www.eecs.berkeley.edu/~alanmi/abc/\n");
924 void execute(std::vector
<std::string
> args
, RTLIL::Design
*design
) YS_OVERRIDE
926 log_header(design
, "Executing ABC9 pass (technology mapping using ABC9).\n");
932 std::string exe_file
= ABCEXTERNAL
;
934 std::string exe_file
= proc_self_dirname() + "yosys-abc";
936 std::string script_file
, clk_str
, box_file
, lut_file
;
937 std::string delay_target
, lutin_shared
= "-S 1", wire_delay
;
938 bool fast_mode
= false, dff_mode
= false, keepff
= false, cleanup
= true;
939 bool show_tempdir
= false;
940 vector
<int> lut_costs
;
950 if (!check_file_exists(exe_file
+ ".exe") && check_file_exists(proc_self_dirname() + "..\\yosys-abc.exe"))
951 exe_file
= proc_self_dirname() + "..\\yosys-abc";
957 if (!getcwd(pwd
, sizeof(pwd
))) {
958 log_cmd_error("getcwd failed: %s\n", strerror(errno
));
961 for (argidx
= 1; argidx
< args
.size(); argidx
++) {
962 std::string arg
= args
[argidx
];
963 if (arg
== "-exe" && argidx
+1 < args
.size()) {
964 exe_file
= args
[++argidx
];
967 if (arg
== "-script" && argidx
+1 < args
.size()) {
968 script_file
= args
[++argidx
];
969 rewrite_filename(script_file
);
970 if (!script_file
.empty() && !is_absolute_path(script_file
) && script_file
[0] != '+')
971 script_file
= std::string(pwd
) + "/" + script_file
;
974 if (arg
== "-D" && argidx
+1 < args
.size()) {
975 delay_target
= "-D " + args
[++argidx
];
978 //if (arg == "-S" && argidx+1 < args.size()) {
979 // lutin_shared = "-S " + args[++argidx];
982 if (arg
== "-lut" && argidx
+1 < args
.size()) {
983 string arg
= args
[++argidx
];
984 size_t pos
= arg
.find_first_of(':');
985 int lut_mode
= 0, lut_mode2
= 0;
986 if (pos
!= string::npos
) {
987 lut_mode
= atoi(arg
.substr(0, pos
).c_str());
988 lut_mode2
= atoi(arg
.substr(pos
+1).c_str());
990 pos
= arg
.find_first_of('.');
991 if (pos
!= string::npos
) {
993 rewrite_filename(lut_file
);
994 if (!lut_file
.empty() && !is_absolute_path(lut_file
))
995 lut_file
= std::string(pwd
) + "/" + lut_file
;
998 lut_mode
= atoi(arg
.c_str());
999 lut_mode2
= lut_mode
;
1003 for (int i
= 0; i
< lut_mode
; i
++)
1004 lut_costs
.push_back(1);
1005 for (int i
= lut_mode
; i
< lut_mode2
; i
++)
1006 lut_costs
.push_back(2 << (i
- lut_mode
));
1009 if (arg
== "-luts" && argidx
+1 < args
.size()) {
1011 for (auto &tok
: split_tokens(args
[++argidx
], ",")) {
1012 auto parts
= split_tokens(tok
, ":");
1013 if (GetSize(parts
) == 0 && !lut_costs
.empty())
1014 lut_costs
.push_back(lut_costs
.back());
1015 else if (GetSize(parts
) == 1)
1016 lut_costs
.push_back(atoi(parts
.at(0).c_str()));
1017 else if (GetSize(parts
) == 2)
1018 while (GetSize(lut_costs
) < atoi(parts
.at(0).c_str()))
1019 lut_costs
.push_back(atoi(parts
.at(1).c_str()));
1021 log_cmd_error("Invalid -luts syntax.\n");
1025 if (arg
== "-fast") {
1029 //if (arg == "-dff") {
1033 //if (arg == "-clk" && argidx+1 < args.size()) {
1034 // clk_str = args[++argidx];
1038 //if (arg == "-keepff") {
1042 if (arg
== "-nocleanup") {
1046 if (arg
== "-showtmp") {
1047 show_tempdir
= true;
1050 if (arg
== "-markgroups") {
1054 if (arg
== "-box" && argidx
+1 < args
.size()) {
1055 box_file
= args
[++argidx
];
1056 rewrite_filename(box_file
);
1057 if (!box_file
.empty() && !is_absolute_path(box_file
))
1058 box_file
= std::string(pwd
) + "/" + box_file
;
1061 if (arg
== "-W" && argidx
+1 < args
.size()) {
1062 wire_delay
= "-W " + args
[++argidx
];
1067 extra_args(args
, argidx
, design
);
1069 dict
<int,IdString
> box_lookup
;
1070 dict
<IdString
,pool
<IdString
>> scc_break_inputs
;
1071 for (auto m
: design
->modules()) {
1072 auto it
= m
->attributes
.find(ID(abc_box_id
));
1073 if (it
== m
->attributes
.end())
1075 if (m
->name
.begins_with("$paramod"))
1077 auto id
= it
->second
.as_int();
1078 auto r
= box_lookup
.insert(std::make_pair(id
, m
->name
));
1080 log_error("Module '%s' has the same abc_box_id = %d value as '%s'.\n",
1081 log_id(m
), id
, log_id(r
.first
->second
));
1082 log_assert(r
.second
);
1084 RTLIL::Wire
*carry_in
= nullptr, *carry_out
= nullptr;
1085 for (auto p
: m
->ports
) {
1086 auto w
= m
->wire(p
);
1088 if (w
->port_input
) {
1089 if (w
->attributes
.count("\\abc_scc_break"))
1090 scc_break_inputs
[m
->name
].insert(p
);
1091 if (w
->attributes
.count("\\abc_carry_in")) {
1093 log_error("Module '%s' contains more than one 'abc_carry_in' port.\n", log_id(m
));
1097 if (w
->port_output
) {
1098 if (w
->attributes
.count("\\abc_carry_out")) {
1100 log_error("Module '%s' contains more than one 'abc_carry_out' port.\n", log_id(m
));
1105 if (carry_in
|| carry_out
) {
1106 if (carry_in
&& !carry_out
)
1107 log_error("Module '%s' contains an 'abc_carry_in' port but no 'abc_carry_out' port.\n", log_id(m
));
1108 if (!carry_in
&& carry_out
)
1109 log_error("Module '%s' contains an 'abc_carry_out' port but no 'abc_carry_in' port.\n", log_id(m
));
1110 // Make carry_in the last PI, and carry_out the last PO
1111 // since ABC requires it this way
1112 auto &ports
= m
->ports
;
1113 for (auto it
= ports
.begin(); it
!= ports
.end(); ) {
1114 RTLIL::Wire
* w
= m
->wire(*it
);
1116 if (w
== carry_in
|| w
== carry_out
) {
1117 it
= ports
.erase(it
);
1120 if (w
->port_id
> carry_in
->port_id
)
1122 if (w
->port_id
> carry_out
->port_id
)
1124 log_assert(w
->port_input
|| w
->port_output
);
1125 log_assert(ports
[w
->port_id
-1] == w
->name
);
1128 ports
.push_back(carry_in
->name
);
1129 carry_in
->port_id
= ports
.size();
1130 ports
.push_back(carry_out
->name
);
1131 carry_out
->port_id
= ports
.size();
1135 for (auto mod
: design
->selected_modules())
1137 if (mod
->attributes
.count(ID(abc_box_id
)))
1140 if (mod
->processes
.size() > 0) {
1141 log("Skipping module %s as it contains processes.\n", log_id(mod
));
1145 assign_map
.set(mod
);
1147 if (!dff_mode
|| !clk_str
.empty()) {
1148 abc9_module(design
, mod
, script_file
, exe_file
, cleanup
, lut_costs
, dff_mode
, clk_str
, keepff
,
1149 delay_target
, lutin_shared
, fast_mode
, show_tempdir
,
1150 box_file
, lut_file
, wire_delay
, box_lookup
, scc_break_inputs
);
1154 CellTypes
ct(design
);
1156 std::vector
<RTLIL::Cell
*> all_cells
= mod
->selected_cells();
1157 std::set
<RTLIL::Cell
*> unassigned_cells(all_cells
.begin(), all_cells
.end());
1159 std::set
<RTLIL::Cell
*> expand_queue
, next_expand_queue
;
1160 std::set
<RTLIL::Cell
*> expand_queue_up
, next_expand_queue_up
;
1161 std::set
<RTLIL::Cell
*> expand_queue_down
, next_expand_queue_down
;
1163 typedef tuple
<bool, RTLIL::SigSpec
, bool, RTLIL::SigSpec
> clkdomain_t
;
1164 std::map
<clkdomain_t
, std::vector
<RTLIL::Cell
*>> assigned_cells
;
1165 std::map
<RTLIL::Cell
*, clkdomain_t
> assigned_cells_reverse
;
1167 std::map
<RTLIL::Cell
*, std::set
<RTLIL::SigBit
>> cell_to_bit
, cell_to_bit_up
, cell_to_bit_down
;
1168 std::map
<RTLIL::SigBit
, std::set
<RTLIL::Cell
*>> bit_to_cell
, bit_to_cell_up
, bit_to_cell_down
;
1170 for (auto cell
: all_cells
)
1174 for (auto &conn
: cell
->connections())
1175 for (auto bit
: conn
.second
) {
1176 bit
= assign_map(bit
);
1177 if (bit
.wire
!= nullptr) {
1178 cell_to_bit
[cell
].insert(bit
);
1179 bit_to_cell
[bit
].insert(cell
);
1180 if (ct
.cell_input(cell
->type
, conn
.first
)) {
1181 cell_to_bit_up
[cell
].insert(bit
);
1182 bit_to_cell_down
[bit
].insert(cell
);
1184 if (ct
.cell_output(cell
->type
, conn
.first
)) {
1185 cell_to_bit_down
[cell
].insert(bit
);
1186 bit_to_cell_up
[bit
].insert(cell
);
1191 if (cell
->type
.in(ID($_DFF_N_
), ID($_DFF_P_
)))
1193 key
= clkdomain_t(cell
->type
== ID($_DFF_P_
), assign_map(cell
->getPort(ID(C
))), true, RTLIL::SigSpec());
1196 if (cell
->type
.in(ID($_DFFE_NN_
), ID($_DFFE_NP_
), ID($_DFFE_PN_
), ID($_DFFE_PP_
)))
1198 bool this_clk_pol
= cell
->type
.in(ID($_DFFE_PN_
), ID($_DFFE_PP_
));
1199 bool this_en_pol
= cell
->type
.in(ID($_DFFE_NP_
), ID($_DFFE_PP_
));
1200 key
= clkdomain_t(this_clk_pol
, assign_map(cell
->getPort(ID(C
))), this_en_pol
, assign_map(cell
->getPort(ID(E
))));
1205 unassigned_cells
.erase(cell
);
1206 expand_queue
.insert(cell
);
1207 expand_queue_up
.insert(cell
);
1208 expand_queue_down
.insert(cell
);
1210 assigned_cells
[key
].push_back(cell
);
1211 assigned_cells_reverse
[cell
] = key
;
1214 while (!expand_queue_up
.empty() || !expand_queue_down
.empty())
1216 if (!expand_queue_up
.empty())
1218 RTLIL::Cell
*cell
= *expand_queue_up
.begin();
1219 clkdomain_t key
= assigned_cells_reverse
.at(cell
);
1220 expand_queue_up
.erase(cell
);
1222 for (auto bit
: cell_to_bit_up
[cell
])
1223 for (auto c
: bit_to_cell_up
[bit
])
1224 if (unassigned_cells
.count(c
)) {
1225 unassigned_cells
.erase(c
);
1226 next_expand_queue_up
.insert(c
);
1227 assigned_cells
[key
].push_back(c
);
1228 assigned_cells_reverse
[c
] = key
;
1229 expand_queue
.insert(c
);
1233 if (!expand_queue_down
.empty())
1235 RTLIL::Cell
*cell
= *expand_queue_down
.begin();
1236 clkdomain_t key
= assigned_cells_reverse
.at(cell
);
1237 expand_queue_down
.erase(cell
);
1239 for (auto bit
: cell_to_bit_down
[cell
])
1240 for (auto c
: bit_to_cell_down
[bit
])
1241 if (unassigned_cells
.count(c
)) {
1242 unassigned_cells
.erase(c
);
1243 next_expand_queue_up
.insert(c
);
1244 assigned_cells
[key
].push_back(c
);
1245 assigned_cells_reverse
[c
] = key
;
1246 expand_queue
.insert(c
);
1250 if (expand_queue_up
.empty() && expand_queue_down
.empty()) {
1251 expand_queue_up
.swap(next_expand_queue_up
);
1252 expand_queue_down
.swap(next_expand_queue_down
);
1256 while (!expand_queue
.empty())
1258 RTLIL::Cell
*cell
= *expand_queue
.begin();
1259 clkdomain_t key
= assigned_cells_reverse
.at(cell
);
1260 expand_queue
.erase(cell
);
1262 for (auto bit
: cell_to_bit
.at(cell
)) {
1263 for (auto c
: bit_to_cell
[bit
])
1264 if (unassigned_cells
.count(c
)) {
1265 unassigned_cells
.erase(c
);
1266 next_expand_queue
.insert(c
);
1267 assigned_cells
[key
].push_back(c
);
1268 assigned_cells_reverse
[c
] = key
;
1270 bit_to_cell
[bit
].clear();
1273 if (expand_queue
.empty())
1274 expand_queue
.swap(next_expand_queue
);
1277 clkdomain_t
key(true, RTLIL::SigSpec(), true, RTLIL::SigSpec());
1278 for (auto cell
: unassigned_cells
) {
1279 assigned_cells
[key
].push_back(cell
);
1280 assigned_cells_reverse
[cell
] = key
;
1283 log_header(design
, "Summary of detected clock domains:\n");
1284 for (auto &it
: assigned_cells
)
1285 log(" %d cells in clk=%s%s, en=%s%s\n", GetSize(it
.second
),
1286 std::get
<0>(it
.first
) ? "" : "!", log_signal(std::get
<1>(it
.first
)),
1287 std::get
<2>(it
.first
) ? "" : "!", log_signal(std::get
<3>(it
.first
)));
1289 for (auto &it
: assigned_cells
) {
1290 clk_polarity
= std::get
<0>(it
.first
);
1291 clk_sig
= assign_map(std::get
<1>(it
.first
));
1292 en_polarity
= std::get
<2>(it
.first
);
1293 en_sig
= assign_map(std::get
<3>(it
.first
));
1294 abc9_module(design
, mod
, script_file
, exe_file
, cleanup
, lut_costs
, !clk_sig
.empty(), "$",
1295 keepff
, delay_target
, lutin_shared
, fast_mode
, show_tempdir
,
1296 box_file
, lut_file
, wire_delay
, box_lookup
, scc_break_inputs
);
1297 assign_map
.set(mod
);
1303 // The "clean" pass also contains a design->check() call
1304 Pass::call(design
, "clean");
1310 PRIVATE_NAMESPACE_END