From 9808acdc759c10a6b6342e631685e14e25fa033f Mon Sep 17 00:00:00 2001
From: Clifford Wolf <clifford@clifford.at>
Date: Sun, 2 Feb 2014 17:11:19 +0100
Subject: [PATCH] Added delete command

---
 passes/cmds/Makefile.inc |   1 +
 passes/cmds/delete.cc    | 134 +++++++++++++++++++++++++++++++++++++++
 2 files changed, 135 insertions(+)
 create mode 100644 passes/cmds/delete.cc

diff --git a/passes/cmds/Makefile.inc b/passes/cmds/Makefile.inc
index ea70f40c0..52c53e03d 100644
--- a/passes/cmds/Makefile.inc
+++ b/passes/cmds/Makefile.inc
@@ -1,5 +1,6 @@
 
 OBJS += passes/cmds/add.o
+OBJS += passes/cmds/delete.o
 OBJS += passes/cmds/design.o
 OBJS += passes/cmds/select.o
 OBJS += passes/cmds/show.o
diff --git a/passes/cmds/delete.cc b/passes/cmds/delete.cc
new file mode 100644
index 000000000..8ed650402
--- /dev/null
+++ b/passes/cmds/delete.cc
@@ -0,0 +1,134 @@
+/*
+ *  yosys -- Yosys Open SYnthesis Suite
+ *
+ *  Copyright (C) 2012  Clifford Wolf <clifford@clifford.at>
+ *  
+ *  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
+ *  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.
+ *
+ */
+
+#include "kernel/register.h"
+#include "kernel/rtlil.h"
+#include "kernel/log.h"
+
+struct DeleteWireWorker
+{
+	RTLIL::Module *module;
+	std::set<std::string> *delete_wires_p;
+
+	void operator()(RTLIL::SigSpec &sig) {
+		sig.optimize();
+		for (auto &c : sig.chunks)
+			if (c.wire != NULL && delete_wires_p->count(c.wire->name))
+				c.wire = module->new_wire(c.width, NEW_ID);
+	}
+};
+
+struct DeletePass : public Pass {
+	DeletePass() : Pass("delete", "delete objects in the design") { }
+	virtual void help()
+	{
+		//   |---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");
+	}
+	virtual void execute(std::vector<std::string> args, RTLIL::Design *design)
+	{
+		size_t argidx;
+		for (argidx = 1; argidx < args.size(); argidx++)
+		{
+			// if (arg[argidx] == "-something") {
+			// 	flag_something = true;
+			// 	continue;
+			// }
+			break;
+		}
+		extra_args(args, argidx, design);
+
+		std::vector<std::string> delete_mods;
+
+		for (auto &mod_it : design->modules)
+		{
+			if (design->selected_whole_module(mod_it.first)) {
+				delete_mods.push_back(mod_it.first);
+				continue;
+			}
+
+			if (!design->selected_module(mod_it.first))
+				continue;
+
+			RTLIL::Module *module = mod_it.second;
+			std::set<std::string> delete_wires;
+			std::set<std::string> delete_cells;
+			std::set<std::string> delete_procs;
+			std::set<std::string> delete_mems;
+
+			for (auto &it : module->wires)
+				if (design->selected(module, it.second))
+					delete_wires.insert(it.first);
+
+			for (auto &it : module->memories)
+				if (design->selected(module, it.second))
+					delete_mems.insert(it.first);
+
+			for (auto &it : module->cells) {
+				if (design->selected(module, it.second))
+					delete_cells.insert(it.first);
+				if ((it.second->type == "$memrd" || it.second->type == "$memwr") &&
+						delete_mems.count(it.second->parameters.at("\\MEMID").decode_string()) != 0)
+					delete_cells.insert(it.first);
+			}
+
+			for (auto &it : module->processes)
+				if (design->selected(module, it.second))
+					delete_procs.insert(it.first);
+
+			DeleteWireWorker delete_wire_worker;
+			delete_wire_worker.module = module;
+			delete_wire_worker.delete_wires_p = &delete_wires;
+			module->rewrite_sigspecs(delete_wire_worker);
+
+			for (auto &it : delete_wires) {
+				delete module->wires.at(it);
+				module->wires.erase(it);
+			}
+
+			for (auto &it : delete_mems) {
+				delete module->memories.at(it);
+				module->memories.erase(it);
+			}
+
+			for (auto &it : delete_cells) {
+				delete module->cells.at(it);
+				module->cells.erase(it);
+			}
+
+			for (auto &it : delete_procs) {
+				delete module->processes.at(it);
+				module->processes.erase(it);
+			}
+
+			module->fixup_ports();
+		}
+
+		for (auto &it : delete_mods) {
+			delete design->modules.at(it);
+			design->modules.erase(it);
+		}
+	}
+} DeletePass;
+ 
-- 
2.30.2