2014-02-02 10:11:19 -06:00
|
|
|
/*
|
|
|
|
* yosys -- Yosys Open SYnthesis Suite
|
|
|
|
*
|
|
|
|
* Copyright (C) 2012 Clifford Wolf <clifford@clifford.at>
|
2015-07-02 04:14:30 -05:00
|
|
|
*
|
2014-02-02 10:11:19 -06:00
|
|
|
* 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.
|
2015-07-02 04:14:30 -05:00
|
|
|
*
|
2014-02-02 10:11:19 -06:00
|
|
|
* 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
|
|
|
|
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
|
|
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
|
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
|
|
|
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
2014-09-27 09:17:53 -05:00
|
|
|
#include "kernel/yosys.h"
|
|
|
|
|
|
|
|
USING_YOSYS_NAMESPACE
|
|
|
|
PRIVATE_NAMESPACE_BEGIN
|
2014-02-02 10:11:19 -06:00
|
|
|
|
|
|
|
struct DeletePass : public Pass {
|
|
|
|
DeletePass() : Pass("delete", "delete objects in the design") { }
|
2018-07-21 01:41:18 -05:00
|
|
|
void help() YS_OVERRIDE
|
2014-02-02 10:11:19 -06:00
|
|
|
{
|
|
|
|
// |---v---|---v---|---v---|---v---|---v---|---v---|---v---|---v---|---v---|---v---|
|
|
|
|
log("\n");
|
|
|
|
log(" delete [selection]\n");
|
|
|
|
log("\n");
|
|
|
|
log("Deletes the selected objects. This will also remove entire modules, if the\n");
|
|
|
|
log("whole module is selected.\n");
|
|
|
|
log("\n");
|
2014-02-09 03:03:26 -06:00
|
|
|
log("\n");
|
|
|
|
log(" delete {-input|-output|-port} [selection]\n");
|
|
|
|
log("\n");
|
|
|
|
log("Does not delete any object but removes the input and/or output flag on the\n");
|
|
|
|
log("selected wires, thus 'deleting' module ports.\n");
|
|
|
|
log("\n");
|
2014-02-02 10:11:19 -06:00
|
|
|
}
|
2018-07-21 01:41:18 -05:00
|
|
|
void execute(std::vector<std::string> args, RTLIL::Design *design) YS_OVERRIDE
|
2014-02-02 10:11:19 -06:00
|
|
|
{
|
2014-02-09 03:03:26 -06:00
|
|
|
bool flag_input = false;
|
|
|
|
bool flag_output = false;
|
|
|
|
|
2014-02-02 10:11:19 -06:00
|
|
|
size_t argidx;
|
|
|
|
for (argidx = 1; argidx < args.size(); argidx++)
|
|
|
|
{
|
2014-02-09 03:03:26 -06:00
|
|
|
if (args[argidx] == "-input") {
|
|
|
|
flag_input = true;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
if (args[argidx] == "-output") {
|
|
|
|
flag_output = true;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
if (args[argidx] == "-port") {
|
|
|
|
flag_input = true;
|
|
|
|
flag_output = true;
|
|
|
|
continue;
|
|
|
|
}
|
2014-02-02 10:11:19 -06:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
extra_args(args, argidx, design);
|
|
|
|
|
2014-08-01 17:45:25 -05:00
|
|
|
std::vector<RTLIL::IdString> delete_mods;
|
2014-02-02 10:11:19 -06:00
|
|
|
|
2014-07-27 03:18:00 -05:00
|
|
|
for (auto &mod_it : design->modules_)
|
2014-02-02 10:11:19 -06:00
|
|
|
{
|
2014-02-09 03:03:26 -06:00
|
|
|
if (design->selected_whole_module(mod_it.first) && !flag_input && !flag_output) {
|
2014-02-02 10:11:19 -06:00
|
|
|
delete_mods.push_back(mod_it.first);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!design->selected_module(mod_it.first))
|
|
|
|
continue;
|
|
|
|
|
|
|
|
RTLIL::Module *module = mod_it.second;
|
2014-02-09 03:03:26 -06:00
|
|
|
|
|
|
|
if (flag_input || flag_output) {
|
2014-07-26 18:49:51 -05:00
|
|
|
for (auto &it : module->wires_)
|
2014-02-09 03:03:26 -06:00
|
|
|
if (design->selected(module, it.second)) {
|
|
|
|
if (flag_input)
|
|
|
|
it.second->port_input = false;
|
|
|
|
if (flag_output)
|
|
|
|
it.second->port_output = false;
|
|
|
|
}
|
|
|
|
module->fixup_ports();
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2014-12-28 10:51:16 -06:00
|
|
|
pool<RTLIL::Wire*> delete_wires;
|
|
|
|
pool<RTLIL::Cell*> delete_cells;
|
2014-12-26 14:59:41 -06:00
|
|
|
pool<RTLIL::IdString> delete_procs;
|
|
|
|
pool<RTLIL::IdString> delete_mems;
|
2014-02-02 10:11:19 -06:00
|
|
|
|
2014-07-26 18:49:51 -05:00
|
|
|
for (auto &it : module->wires_)
|
2014-02-02 10:11:19 -06:00
|
|
|
if (design->selected(module, it.second))
|
2014-07-26 13:12:50 -05:00
|
|
|
delete_wires.insert(it.second);
|
2014-02-02 10:11:19 -06:00
|
|
|
|
|
|
|
for (auto &it : module->memories)
|
|
|
|
if (design->selected(module, it.second))
|
|
|
|
delete_mems.insert(it.first);
|
|
|
|
|
2014-07-26 18:51:45 -05:00
|
|
|
for (auto &it : module->cells_) {
|
2014-02-02 10:11:19 -06:00
|
|
|
if (design->selected(module, it.second))
|
2014-07-25 08:05:18 -05:00
|
|
|
delete_cells.insert(it.second);
|
2019-08-15 11:23:57 -05:00
|
|
|
if (it.second->type.in("$memrd", "$memwr") &&
|
2014-02-02 10:11:19 -06:00
|
|
|
delete_mems.count(it.second->parameters.at("\\MEMID").decode_string()) != 0)
|
2014-07-25 08:05:18 -05:00
|
|
|
delete_cells.insert(it.second);
|
2014-02-02 10:11:19 -06:00
|
|
|
}
|
|
|
|
|
|
|
|
for (auto &it : module->processes)
|
|
|
|
if (design->selected(module, it.second))
|
|
|
|
delete_procs.insert(it.first);
|
|
|
|
|
|
|
|
for (auto &it : delete_mems) {
|
|
|
|
delete module->memories.at(it);
|
|
|
|
module->memories.erase(it);
|
|
|
|
}
|
|
|
|
|
2014-07-26 13:12:50 -05:00
|
|
|
for (auto &it : delete_cells)
|
2014-07-25 08:05:18 -05:00
|
|
|
module->remove(it);
|
2014-02-02 10:11:19 -06:00
|
|
|
|
|
|
|
for (auto &it : delete_procs) {
|
|
|
|
delete module->processes.at(it);
|
|
|
|
module->processes.erase(it);
|
|
|
|
}
|
|
|
|
|
2014-07-26 13:12:50 -05:00
|
|
|
module->remove(delete_wires);
|
|
|
|
|
2014-02-02 10:11:19 -06:00
|
|
|
module->fixup_ports();
|
|
|
|
}
|
|
|
|
|
|
|
|
for (auto &it : delete_mods) {
|
2014-07-27 03:18:00 -05:00
|
|
|
delete design->modules_.at(it);
|
|
|
|
design->modules_.erase(it);
|
2014-02-02 10:11:19 -06:00
|
|
|
}
|
|
|
|
}
|
|
|
|
} DeletePass;
|
2015-07-02 04:14:30 -05:00
|
|
|
|
2014-09-27 09:17:53 -05:00
|
|
|
PRIVATE_NAMESPACE_END
|