#!/bin/sh

USAGE="usage: $0 [-l level_number] [-s] doc ..."

LIB=/local/libshare/sgml
TMP=/tmp/doctype$$
level=2
strict=

set -- `getopt 'l:s' $@`
if [ $? -ne 0 ] ; then
	echo "$USAGE" 1>&2
	exit 1
fi
while : ; do
	case "$1" in
	-l)	level=$2 ; shift 2 ;;
	-s)	strict="Strict" ; shift ;;
	--)	shift ; break ;;
	*)	echo "$USAGE" 1>&2 ; exit 1 ;;
	esac
done

echo "<!DOCTYPE HTML PUBLIC \"-//IETF//DTD HTML ${strict} Level ${level}//EN\">" >$TMP
trap 'rm -f $TMP ; exit 1' 1 2 3 15

rc=0
for i in $@ ; do
	if sgmls -s -m $LIB/catalog $LIB/html.decl $TMP $i ; then
		echo "$i: ok" 1>&2
	else
		rc=1
	fi
done

rm -f $TMP
exit $rc

