#! /bin/sh

rm -f `find . -name "*.bz2"`
rm -f `find . -name "*.zip"`
rm -f `find . -name "*.gz"`

function zipit() {
	for j in CD-Writing.$1
	do
		bzip2 -c $j > $j.bz2
		gzip -c $j > $j.gz
		zip  $j.zip  $j
	done
}

cd txt
sgml2txt ../CD-Writing.sgml
sed -e "s/.//g" CD-Writing.txt \
| perl -e '@l=<STDIN>; $d=join("",@l); $d=~s/\n\n\n+/\n\n/g; print $d;' \
> CD-Writing.tmp
mv CD-Writing.tmp CD-Writing.txt
zipit txt
cd ..

cd rtf
sgml2rtf ../CD-Writing.sgml
zipit rtf
cd ..

cd tex
sgml2latex ../CD-Writing.sgml
zipit tex
cd ..

cd dvi
latex ../tex/CD-Writing.tex
zipit dvi
cd ..

cd ps
dvips ../dvi/CD-Writing.dvi -o CD-Writing.ps
zipit ps
cd ..

cd html
sgml2html ../CD-Writing.sgml
tar -czvf CD-Writing.tar.gz CD-Writing-*.html
zip CD-Writing.zip CD-Writing-*.html