#!/bin/sh
#
#	drft06rr_buttons - Make the various web buttons used in DRFT06RR
#
#	Makes the various round and rectangular web button images
#	used by the DRFT06RR pages, calling two sub-scripts called
#	drft06rr_roundbutton and drft06rr_rectbutton.
#
#	Paul Wessel, 20-NOV-2001
#
if [ $# -gt 0 ] && [ $1 = "-f" ]; then
	force="-f"
	shift
else
	force=
fi
mkdir -p drft06rr
cd drft06rr

# These are box ID buttons: Round with a letter inside.  We make a large
# and a small one for each box.

makecpt -Crainbow -T0/6/1 -Z | egrep -v '^#|^B|^F|^N' | awk '{if (NR < 6) {printf "%s/%s/%s\n", $2, $3, $4} else {printf "%s/%s/%s\n%s/%s/%s\n", $2, $3, $4, $6, $7, $8}}' > tmp
n=`cat tmp | wc -l`
i=1
while [ $i -le $n ]; do
	char=`echo $i | awk '{printf "%c\n", $1+64}'`
	rgb=`sed -n ${i}p tmp`
	../drft06rr_roundbutton $force $char $rgb
	../drft06rr_roundbutton $force -s $char $rgb
	i=`expr $i + 1`
done

# These are document type buttons: Rectangular with text inside:

../drft06rr_rectbutton $force DOC 0/0/255
../drft06rr_rectbutton $force XLS 0/255/0
../drft06rr_rectbutton $force PPT 255/255/0 0
../drft06rr_rectbutton $force JPG 70/150/30
../drft06rr_rectbutton $force PDF 255/0/0
../drft06rr_rectbutton $force EPS 255/220/0 0
../drft06rr_rectbutton $force PS 255/220/0 0
../drft06rr_rectbutton $force TXT 0 255
../drft06rr_rectbutton $force TIFF 50/200/255 0
../drft06rr_rectbutton $force REGIONAL 255/0/0 0
../drft06rr_rectbutton $force MISC 180 0
../drft06rr_rectbutton $force SEAMOUNTS 0/0/255
../drft06rr_rectbutton $force DREDGES 220/180/0 0
../drft06rr_rectbutton $force PHOTOS 60/30/10 255
../drft06rr_rectbutton $force SCRIPTS 255/0/255 0
../drft06rr_rectbutton $force LINKS 200/255/200 0
../drft06rr_rectbutton $force SH 255/0/255 0
../drft06rr_rectbutton $force 2-D 255/200/200 0
../drft06rr_rectbutton $force 3-D 200/255/200 0
../drft06rr_rectbutton $force Processed_SideScan 200/200/255 0
../drft06rr_rectbutton $force PAD 255 255
../drft06rr_rectbutton $force REPORT 85/25/140 255

# These are SMT and DREDGE buttons:

if [ -f ../drft06rr_smts.lis ]; then
	grep -v '^#' ../drft06rr_smts.lis | awk '{printf "../drft06rr_rectbutton %s SMT%s 0/0/255\n", "'$force'", $1}' > job.sh
	sh job.sh
fi
if [ -f ../drft06rr_dredges.lis ]; then
	grep -v '^#' ../drft06rr_dredges.lis | awk '{printf "../drft06rr_rectbutton %s D-%s 200/180/0 0 %s\n", "'$force'", $1, $4}' > job.sh
	sh job.sh
fi

# Finally make the DRFT06RR home button

if [ ! -f drft06rr.home.gif ] || [ "X$force" = "X-f" ]; then
	echo "Generating home button gif"
	psimage ../data/moai.ras -Gf10/60/10 -E2000 -P > t.ps
	convert t.ps -density 60x60 -crop 0x0 drft06rr.home.gif
#	xv drft06rr.home.gif &
	rm -f t.ps
fi

rm -f tmp job.sh
cd ..