#!/bin/sh

logfile="ChangeLog"

(

dir=`dirname $0`
cd ${dir}
module=`basename \`pwd\``
cvsroot=`cat CVS/Root | sed 's/.*://g;s/\/$//g'`
module=${cvsroot}/`cat CVS/Repository`

if [ -f changelog.date ] ; then
  dateopt="-d \">`cat changelog.date`\""
fi

rcsscript=`mktemp /tmp/createlog.XXXXXX`
rcslog=`mktemp /tmp/createlog.XXXXXX`

uopt=
if [ -f Developers ] ; then
  uopt="`cat Developers | sed 's/^/-u "/g;s/$/\"/g'`"
fi
cat >${rcsscript} <<EOF
#!/bin/sh
f="\`cat\`"
cvs log ${dateopt} \${f} | sed 's/ +0000;/;/' >${rcslog}
rcs2log `echo ${uopt}` -L ${rcslog}
EOF
chmod +x ${rcsscript}

(
  for i in `find . -path "*CVS/Entries"` ; do
    d=`dirname \`dirname $i\``
    for e in `cat $i | grep -v "$logfile" | grep '^/' | cut -f 2 -d '/'` ; do
      echo $d/$e
    done
  done
) | sed 's,^\./,,g' | ${rcsscript} | \
sed "s,${module}/,,g" | \
sed "`echo -e 's/: - /:\\\\\n\t- /;s/\t-/\\\\\n\t-/'`" | fmt | sed '/^$/d' | \
awk 'BEGIN{ x = 1; }/^[0-9]/{ if (x != 1) printf "\n"; x = 0; }/\t\*/{ printf "\n"; }//{print $0; }' >${logfile}

cvs -z3 commit -m "" "${logfile}"

rm -f ${rcsscript} ${rcslog}

)