xref: /plan9/rc/bin/doc2ps (revision 42dedc50a943b5d120c8c26dac13fc4664b65146)
1f5736e95SDavid du Colombier#!/bin/rc
2*42dedc50SDavid du Colombier# doc2ps [file.doc] - convert ms word document to postscript
3f5736e95SDavid du Colombierrfork e
4*42dedc50SDavid du Colombierfn usage {
5*42dedc50SDavid du Colombier	echo usage: doc2ps '[file.doc]' >[1=2]
6f5736e95SDavid du Colombier	exit usage
7f5736e95SDavid du Colombier}
8*42dedc50SDavid du Colombierswitch ($#*) {
9*42dedc50SDavid du Colombiercase 0
10f5736e95SDavid du Colombier	file=/tmp/antiword.doc.$pid
11*42dedc50SDavid du Colombier	fn sigexit { rm $file; exit $s }
12f5736e95SDavid du Colombier	cat >$file
13*42dedc50SDavid du Colombiercase 1
14*42dedc50SDavid du Colombier	if(~ $1 -*)
15*42dedc50SDavid du Colombier		usage
16*42dedc50SDavid du Colombier	file=$1
17*42dedc50SDavid du Colombiercase *
18*42dedc50SDavid du Colombier	usage
19f5736e95SDavid du Colombier}
20f5736e95SDavid du Colombieraux/antiword -i0 -p letter $file
21f5736e95SDavid du Colombiers=$status
22