r43463 - /scripts/rename-uploader

[ryan52-guest at users.alioth.debian.org]

Author: ryan52-guest
Date: Wed Sep  2 04:18:19 2009
New Revision: 43463

URL: http://svn.debian.org/wsvn/?sc=1&rev=43463
Log:
add a script to change peoples email addresses across the whole repo

Added:
    scripts/rename-uploader   (with props)

Added: scripts/rename-uploader
URL: http://svn.debian.org/wsvn/scripts/rename-uploader?rev=43463&op=file
==============================================================================
--- scripts/rename-uploader (added)
+++ scripts/rename-uploader Wed Sep  2 04:18:19 2009
@@ -1,0 +1,33 @@
+#!/bin/sh
+
+if [ $# -ne 3 ]; then
+   echo "Usage: $(basename $0) nickname oldemail newemail"
+   exit 1
+fi
+
+if [ -n "$(svn di)" ]; then
+    echo "Dirty working copy, exiting"
+    exit 1
+fi
+
+list_dirs(){
+    find $@ -maxdepth 1 -mindepth 1 -type d | sed 's,.*/,,' | sort -u
+}
+
+sub(){
+    perl -e 'my ($a, $b) = @ARGV; while(<STDIN>){ s/$a/$b/g; print; }' -- "$1" "$2"  < "$3" | sponge "$3"
+}
+
+for i in `list_dirs`; do
+    cd $i
+    for i in debian/control debian/copyright; do
+        sub "$2" "$3" $i
+        sub "$2" "$3" $i
+    done
+    if [ -n "$(svn di)" ]; then
+        dch --no-auto-nmu "Update $1's email address"
+    fi
+    cd ..
+done
+
+svn ci -m "mass updated $1's email address"

Propchange: scripts/rename-uploader
------------------------------------------------------------------------------
    svn:executable = *