#!/bin/sh

FONTDIR=/usr/home/mats/share/groff_font/devps

pw=595
ph=842

font=TR
size=48
color="0 0 0"
bgcolor="1 1 1"
adjust=L

usage()
{
    echo "usage: grtext [-f font] [-s size] [-c color] [-b bgcolor] [-m] [-l] text" >&2
    exit 1
}

while getopts ":f:s:c:b:ml" c
do
    case "$c" in
    f)      font=$OPTARG;;
    s)      size=$OPTARG;;
    c)      color=$OPTARG;;
    b)      bgcolor=$OPTARG;;
    m)      adjust=C;;
    l)      pw=842; ph=595;;
    :|'?')  usage;;
    esac
done
shift $(($OPTIND - 1))
if [ $# -lt 1 ]; then usage; fi

[ $pw -eq 842 ] && ln -sf $FONTDIR/DESC.landscape $FONTDIR/DESC

exec 2>/dev/null

cat <<EOF
%!
1 dict dup /PageSize [$pw $ph] put setpagedevice
$bgcolor setrgbcolor
clippath fill
$color setrgbcolor
EOF

(
cat <<EOF
..pl ${ph}p
..ll ${pw}p-.2i
..po .1i
..fp 1 $font
..nr pp $size
..lp
..(b $adjust
$1
..)b
EOF
) | groff -me

[ $pw -eq 842 ] && ln -sf $FONTDIR/DESC.std $FONTDIR/DESC
.