#!/bin/sh

#PATH="/usr/local/misc:/usr/local/pbm:/usr/public/pkg/pbmplus:$PATH"
#export PATH

border=10
tmp=/tmp/pstopbm$$
tmpa=$tmp.a
(jgraph $*; echo showpage) > $tmp


set foo `psbb $tmp`
shift
llx="$1" lly="$2" urx="$3" ury="$4"
llx=`expr $llx - $border`
lly=`expr $lly - $border`
urx=`expr $urx + $border`
ury=`expr $ury + $border`
width=`expr $urx - $llx`
height=`expr $ury - $lly`

awk 'BEGIN      {ok = 1}
/^%%BoundingBox/ {if (ok) print $0; next }
{print}
/^%%EndComments/ { if (ok) {ok=0; printf "%d neg %d neg translate\n", '"$llx, $lly"'} } ' $tmp > $tmpa
gs -q -g"${width}x$height" -sDEVICE=pbm -sOutputFile=- -dNOPAUSE $tmpa < /dev/null
rm -f $tmp $tmpa