applnk: changelog.sh (NEW) - changelog generation script cloned from setup/...

[glen]

Author: glen                         Date: Sat Mar  5 12:54:17 2011 GMT
Module: applnk                        Tag: HEAD
---- Log message:
- changelog generation script cloned from setup/changelog.sh (which itself got cloned from ...)

---- Files affected:
applnk:
   changelog.sh (NONE -> 1.1)  (NEW)

---- Diffs:

================================================================
Index: applnk/changelog.sh
diff -u /dev/null applnk/changelog.sh:1.1
--- /dev/null	Sat Mar  5 13:54:17 2011
+++ applnk/changelog.sh	Sat Mar  5 13:54:12 2011
@@ -0,0 +1,39 @@
+#!/bin/sh
+# $Id$
+# Run this to generate ChangeLog.
+
+if [ ! -x /usr/bin/cvs2cl ]; then
+	echo >&2 'Need cvs2cl program!'
+	exit 1
+fi
+
+set -e
+
+# 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 at cvs.pld-linux.org:/cvsroot co CVSROOT/users'
+	exit 1
+fi
+
+if grep -q vim:encoding=utf-8 $users; then
+	charset=UTF-8
+else
+	charset=ISO8859-2
+fi
+
+awk -F: '{ login=$1; if ($3) { name=$3 } else { name=$1 }; printf "%s:%s <%s at pld-linux.org>\n", login, name, login }' $users | \
+	iconv -f $charset -t utf-8 > $tmp
+
+TZ=GMT cvs2cl --no-times --usermap $tmp --ignore ChangeLog
+
+rm -f $tmp
+
+# obfuscate emails <user at domain> and (user at domain)
+sed -i -e 's,\([<(].*\)@\(.*[)>]\),\1/at/\2,g' ChangeLog
================================================================