From 0133a7c81dd87d170c4fc8f9a598d3919e6ab081 Mon Sep 17 00:00:00 2001
From: Jan Schneider <oss@janschneider.net>
Date: Fri, 30 Mar 2018 14:27:03 +0200
Subject: [PATCH] Implement command "firmware clone <target-device>"

---
 addon/rmupdate.tcl | 19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)

diff --git a/addon/rmupdate.tcl b/addon/rmupdate.tcl
index fe0dfc0..68a787d 100644
--- a/addon/rmupdate.tcl
+++ b/addon/rmupdate.tcl
@@ -25,11 +25,12 @@ proc usage {} {
 	puts stderr "usage: ${argv0} <module> <command>"
 	puts stderr ""
 	puts stderr "possible commands:"
-	puts stderr "  firmware show_current      : show current firmware version"
-	puts stderr "  firmware show_latest       : show latest available firmware version"
-	puts stderr "  firmware install_latest    : install latest available firmware version"
-	puts stderr "  firmware install <version> : install firmware VERSION"
-	puts stderr "  addons list                : list installed addons and versions"
+	puts stderr "  firmware show_current         : show current firmware version"
+	puts stderr "  firmware show_latest          : show latest available firmware version"
+	puts stderr "  firmware install_latest       : install latest available firmware version"
+	puts stderr "  firmware install <version>    : install firmware VERSION"
+	puts stderr "  addons list                   : list installed addons and versions"
+	puts stderr "  system clone <target-device>  : clone system to TARGET-DEVICE"
 }
 
 proc main {} {
@@ -73,6 +74,14 @@ proc main {} {
 			usage
 			exit 1
 		}
+	} elseif {$mod == "system"} {
+		if {$cmd == "clone"} {
+			set target_device [lindex $argv 2]
+			rmupdate::clone_system $target_device 1
+			puts "System cloned to ${target_device}, shutting down"
+			exec /sbin/poweroff
+		}
+		
 	} else {
 		usage
 		exit 1