e5a75d8fe725b1f1ee2e689ed24de97bb042c70e
[ghc-hetmet.git] / glafp-utils / docbook / db2rtf
1 #! /bin/sh
2
3 DB_STYLESHEET=/usr/lib/sgml/stylesheets/cygnus-both.dsl
4 ADMON_GRAPHICS=/usr/lib/sgml/stylesheets/nwalsh-modular/images/*.gif
5
6 output=db2rtf.rtf
7 #TMPFN=db2rtf$$.rtf
8
9 # setting SGML_CATALOG_FILES should be done in the Makefile at build time
10 # of jade but I set it here anyway in case someone forgets.
11
12 # Dave Mason's option to specify a different stylesheet
13 case $1 in
14     -d) DB_STYLESHEET=$2
15         shift 2
16         ;;
17 esac
18
19 echo "Using stylesheet: \"${DB_STYLESHEET}\""
20
21 if [ $# -gt 2 ]
22 then
23   echo "Usage: `basename $0` [filename.sgml]" >&2
24   exit 1
25 fi
26
27 if [ $# -eq 1 ]
28 then
29   if [ ! -r $1 ]
30   then
31     echo Cannot read \"$1\".  Exiting. >&2
32     exit 1
33   fi
34   if echo $1 | egrep -i '\.sgml$|\.sgm$' >/dev/null 2>&1
35   then
36     output="`echo $1 | sed 's,\.sgml$,.rtf,;s,\.sgm$,.rtf,'`"
37   fi
38 fi
39
40 ### echo "about to copy admon graphics to this dir"
41 ### cp ${ADMON_GRAPHICS} .
42
43 cat $* | jade -t rtf -d ${DB_STYLESHEET}\#print
44
45 if [ $# -eq 1 ]
46 then
47   mv jade-out.rtf $output
48 else
49   cat jade-out.rtf
50 fi
51
52 exit 0