#!/bin/sh
# Script to correct the BoundingBox of PostScript files.
#
# Author: R.F. Smith <rsmith@xs4all.nl>
# Time-stamp: <2010-08-29 14:02:37 rsmith>
#
# To the extent possible under law, Roland Smith has waived all copyright and
# related or neighboring rights to fixbb. This work is published from the
# Netherlands. See http://creativecommons.org/publicdomain/zero/1.0/

# Check for arguments
if [ $# -eq 0 ]; then
    echo "Usage: $(basename $0) filename"
    exit 1
fi

if [ ! -f $1 ]; then
    echo "File "$1" doesn't exist!"
    exit 0
fi

# Check for special programs that are used in this script.
PROGS="gs"
for P in $PROGS; do
    which $P >/dev/null 2>&1
    if [ $? -ne 0 ]; then
	echo "$(basename $0): The program \"$P\" cannot be found."
	exit 1
    fi
done

if ! grep '%%Pages\?:.*1' >/dev/null $1; then
    echo "Sorry, this script only works for single-page documents!"
    exit 0
fi

# Determine the new BoundingBox. 
# This only works properly for single-page documents! 
NEWBB=`echo|gs -sDEVICE=bbox $1 -c quit 2>&1|grep '^%%B'`

#echo "New bounding box is:"
#echo $NEWBB

sed -I .bak -e "s/^%%Bound.*/$NEWBB/" $1