#!/bin/bash
###########################################################################
#   Copyright (C) 2009 by Tobias Mueller, Tobias_Mueller@twam.info        #
#                                                                         #
#   This program is free software; you can redistribute it and/or modify  #
#   it under the terms of the GNU General Public License as published by  #
#   the Free Software Foundation; either version 2 of the License, or     #
#   (at your option) any later version.                                   #
#                                                                         #
#   This program is distributed in the hope that it will be useful,       # 
#   but WITHOUT ANYs WARRANTY; without even the implied warranty of       #
#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         #
#   GNU General Public License for more details.                          #
#                                                                         #
#   You should have received a copy of the GNU General Public License     #
#   along with this program; if not, write to the                         #
#   Free Software Foundation, Inc.,                                       #
#   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             #
###########################################################################

if [ "$1" = "" -o "$1" = "--help" ]
then
  echo "Usage: $0 width height fontsize line1 line2";
  echo "width height and font is interpreted in points"
  exit;
fi

  sed --silent -e '/PSTEMPLATE$/,/^PSTEMPLATE$/p' "$0" \
| sed -e '/PSTEMPLATE$/d' \
| sed -e "s/WIDTH/$1/" \
| sed -e "s/HEIGHT/$2/" \
| sed -e "s/FONTSIZE/$3/" \
| sed -e "s#LINE1#$4#" \
| sed -e "s#LINE2#$5#" \
| sed -e "s/COPYRIGHT/\xA9/"

exit;

: <<PSTEMPLATE
%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: 0 0 WIDTH HEIGHT

/width WIDTH def
/height HEIGHT def
/fontsize FONTSIZE def
/line1 (LINE1) def
/line2 (LINE2) def

% draw (inner) box
0 0 moveto
width 0 lineto
width height lineto
0 height lineto
closepath
gsave
5 setlinewidth
0.8 setgray
fill

% draw box border
grestore
0.5 setgray
stroke

% calculate center of box
width 2 div
/centerx exch def
height 2 div
/centery exch def

% load font & enconding
/Helvetica findfont
dup length dict begin
{def} forall
/Encoding ISOLatin1Encoding def
currentdict
end
/Helvetica-ISOLatin1 exch definefont

% set font size for ©
width height gt { height scalefont }{ width scalefont } ifelse setfont

% show ©
0.9 setgray
(COPYRIGHT) dup stringwidth pop /textwidth exch def
textwidth /textheight exch def
centerx textwidth 2 div sub centery textheight 2 div sub moveto
show

% set font for normal text
0 setgray
/Helvetica-ISOLatin1 findfont
fontsize scalefont
setfont

% move centery a litte bit down
centery fontsize 4 div sub /centery exch def

% display 2 text lines
line1 dup stringwidth pop /textwidth exch def
centerx textwidth 2 div sub centery fontsize 2 div add moveto
show

line2 dup stringwidth pop /textwidth exch def
centerx textwidth 2 div sub centery fontsize 2 div sub moveto
show

showpage
PSTEMPLATE