SVN: xinitrc-ng/trunk/changelog.sh

[baggins]

Author: baggins
Date: Wed Jul 27 14:29:23 2011
New Revision: 12278

Added:
   xinitrc-ng/trunk/changelog.sh   (contents, props changed)
Log:
- script to generate ChangeLog, taken from geniinitrd


Added: xinitrc-ng/trunk/changelog.sh
==============================================================================
--- (empty file)
+++ xinitrc-ng/trunk/changelog.sh	Wed Jul 27 14:29:23 2011
@@ -0,0 +1,37 @@
+#!/bin/sh
+# $Id: changelog.sh 9867 2008-09-05 21:48:22Z patrys $
+# Run this to generate ChangeLog.
+
+[ -z "$svn2log" -a -x ~/bin/svn2log.py ] && svn2log=~/bin/svn2log.py
+[ -z "$svn2log" -a -x /usr/bin/svn2log ] && svn2log=/usr/bin/svn2log
+if [ -z "$svn2log" ]; then
+	echo >&2 'Need svn2log program!'
+	exit 1
+fi
+
+# create users for svn2log format
+tmp=$(mktemp -q svn2logXXXXXX 2>/dev/null || echo ${TMPDIR:-/tmp}/svn2log.tmp)
+> $tmp
+
+[ -z "$users" -a -f ../CVSROOT/users ] && users=../CVSROOT/users
+[ -z "$users" -a -f ~/rpm/CVSROOT/users ] && users=~/rpm/CVSROOT/users
+[ -z "$users" -a -f ~/.CVS-PLD/CVSROOT/users ] && users=~/.CVS-PLD/CVSROOT/users
+if [ -z "$users" ]; then
+	echo >&2 "Can't find users file!"
+	echo >&2 'Run in parent dir to fetch one:'
+	echo >&2 '$ cvs -d :pserver:cvs at cvs.pld-linux.org:/cvsroot co CVSROOT/users'
+	exit 1
+fi
+
+awk -F":" ' { login=$1; if ($3 != "") { name=$3 } else { name=$1 }; email=$2; printf "%s\t%s <%s at pld-linux.org>\n", login, name, login } ' $users > $tmp
+
+if grep -q vim:encoding=utf-8 $users; then
+	charset=UTF-8
+else
+	charset=ISO8859-2
+fi
+svn log -v --xml | $svn2log --users-charset=$charset --domain "pld-linux.org" -p /xinitrc-ng/trunk -u $tmp --exclude ChangeLog -o ChangeLog
+rm -f $tmp
+
+# obfuscate emails <user at domain> and (user at domain)
+sed -i -e 's,\([<(].*\)@\(.*[)>]\),\1/at/\2,g' ChangeLog