#!/bin/sh
# By "Julian Stacey"	from
# ~jhs/public_html/src/bsd/jhs/bin/local/mail/ctm-freebsd-src-4-incoming
# For all comment see ctm-freebsd-cvs-incoming.
notify=freebsd-ctm-src-4-notify
type=src-4
base=/pub/FreeBSD/branches/4.0-stable/src
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"
# (echo "$prog_pid start" | mail -s "$prog_pid start" $notify )
logdir=/pub/FreeBSD/development/CTM
log=$logdir/$type.log
pieces=/pub/FreeBSD/development/CTM/$type
deltas=/pub/FreeBSD/development/CTM/$type
HOME=$logdir	;  export HOME
for object in $log $pieces/.dummy $deltas/.dummy
	do
	# (echo "$prog_pid $test $object" |	\
	#	 mail -s "$prog_pid $test $object" $notify )
	touch $object || \
		( echo "$id touch $object" | \
			 mail -s "$prog_failed_error" $notify ; \
		exit 1 )
	done
## for object in $base/.ctm_status
## 	do
## 	# (echo "$prog_pid $test $object" |	\
## 	#	 mail -s "$prog_pid $test $object" $notify )
## 	touch $object || \
## 		( echo "$id touch $object" | \
## 			 mail -s "$prog_failed_warning" $notify )
## 	done
# (echo "$prog_pid starting ctm_rmail" |	\
	# mail -s "$prog_pid starting ctm_rmail" $notify )
nice ctm_rmail -u -l $log -p $pieces -d $deltas -b $base
	 # | mail -s "$prog_pid result" $notify 2>&1
# (echo "$prog_pid end" | mail -s "$prog_pid end" $notify )
cd $deltas
xx=`ls -t | grep .gz | head -1`
chmod 444 $xx
nice md5 $xx >> $logdir/$type.md5
exit 0