Import sources from 2011-03-30 iso image - rc

1 files changed, 31 insertions, 0 deletions

diff --git a/rc/bin/patch/move b/rc/bin/patch/move
new file mode 100755
index 000000000..60dfb952c
--- /dev/null
+++ b/rc/bin/patch/move
@@ -0,0 +1,31 @@
+#!/bin/rc
+# patch/move target patch-tree... - move patch tree(s) to target dir
+rfork e
+pats=/n/sources/patch
+if(~ $#* 0 1){
+	echo 'usage: patch/move dst patch-name...' >[1=2]
+	exit usage
+}
+
+if(! test -d $pats){
+	rfork n
+	9fs sources
+}
+cd $pats
+
+dst=$1
+shift
+for(src){
+	patbase = `{basename $src}
+	patdest = $dst/$patbase
+	if (~ $dst $src $patbase)
+		echo $0: skipping $src >[1=2]
+	if not if(! test -d $src)
+		echo $0: no such patch $pats/$src >[1=2]
+	if not if(test -d $patdest)
+		echo $0: already have $pats/$patdest >[1=2]
+	if not
+		ls -ldp $src >$src/origls &&
+			mkdir $patdest && dircp $src $patdest && rm -rf $src &&
+			test -s $patdest/email && patch/notify $patdest
+}