#!/bin/sh
# By "Julian H. Stacey" from
# ~jhs/public_html/src/bsd/jhs/bin/local/mail/ctm-freebsd-ports-cur-incoming
# For all comment see ctm-freebsd-cvs-incoming.
notify=freebsd-ctm-ports-cur-notify
type=ports-cur
base=/pub/FreeBSD/branches/-current/ports
prog=$0
PATH=/bin:/sbin:/usr/sbin:/usr/bin	; export PATH
umask 022
TMPDIR=/tmp	; export TMPDIR
id="`id` Failed to"
prog_pid="$prog pid=$$"
prog_failed_error="$prog_pid Error: Failed"
prog_failed_warning="$prog_pid Warning: Failed"
logdir=/pub/FreeBSD/development/CTM
log=$logdir/$type.log
deltas=/pub/FreeBSD/development/CTM/$type
pieces=$deltas
HOME=$logdir	;  export HOME
for object in $log $pieces/.dummy $deltas/.dummy
	do
	touch $object || \
		( echo "$id touch $object" | \
			 mail -s "$prog_failed_error" $notify ; \
		exit 1 )
	done
nice ctm_rmail -u -l $log -p $pieces -d $deltas -b $base
cd $deltas
xx=`ls -t | grep .gz | head -1`
chmod 444 $xx
nice md5 $xx >> $logdir/$type.md5
private=""
private="$private /pri/FreeBSD/branches/-current/ports"
private="$private /pri/FreeBSD/branches/amd64/-current/ports"
private="$private /pri/FreeBSD/branches/i386/-current/486/ports"
private="$private /pri/FreeBSD/branches/i386/-current/586/ports"
private="$private /pri/FreeBSD/branches/i386/-current/686/ports"
private="$private /pri/FreeBSD/branches/i386/-current/ports"
private="$private /usr/ports"
for another_base in ${private}; do
	if [ -d ${another_base} ]; then
		cd ${another_base}
		ctm $deltas/$xx
	fi
done
exit 0