- changelog generator. based on rc-scripts one

Changed files:
    changelog.sh -> 1.1

diff --git a/changelog.sh b/changelog.sh
new file mode 100644 (file)
index 0000000..08e60c3
--- /dev/null
+++ b/changelog.sh
@@ -0,0 +1,36 @@
+#!/bin/sh
+# $Id$
+# Run this to generate ChangeLog.
+
+if [ ! -x /usr/bin/cvs2cl ]; then
+       echo >&2 'Need cvs2cl program!'
+       exit 1
+fi
+
+# create users for cvs2log format
+tmp=$(mktemp -q cvs2logXXXXXX 2>/dev/null || echo ${TMPDIR:-/tmp}/cvs2log.tmp)
+> $tmp
+
+[ -z "$users" -a -f ../CVSROOT/users ] && users=../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@cvs.pld-linux.org:/cvsroot co CVSROOT/users'
+       exit 1
+fi
+
+awk -F: '{ login=$1; if ($3) { name=$3 } else { name=$1 }; printf "%s:%s <%s@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
+
+cvs2cl --no-times --usermap $tmp --ignore ChangeLog
+
+rm -f $tmp
+
+# obfuscate emails <user@domain> and (user@domain)
+sed -i -e 's,\([<(].*\)@\(.*[)>]\),\1/at/\2,g' ChangeLog