#!/bin/bash
## Copyright (C) 2003-2006 Red Hat, Inc.
## Copyright (C) 2003-2006 Tim Waugh <twaugh@redhat.com>
## Changed on 2007/05/17, Opher Shachar, LADPC Ltd.
##     Added support for page-ranges option.
##     Added page accounting.

## 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 ANY 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., 675 Mass Ave, Cambridge, MA 02139, USA.

if [ $# == 0 ]; then
  echo >&2 "ERROR: $0 job-id user title copies options [file]"
  exit 1
fi

# Extract the papersize
SENDFF=`grep '^\*DefaultSendFF' "$PPD" | cut -d\  -f2`
COPIES=1
if [ $# -ge 4 ]; then
  COPIES="$4"
fi

if [ "$COPIES" -gt 1 ] && [ $# -lt 6 ]; then
  unset TMPFILE
  trap -- 'rm -f "$TMPFILE"' EXIT
  TMPFILE=$(mktemp ${TMPDIR:-/tmp}/textonly.XXXXXX)
  cat > "$TMPFILE"
else
  TMPFILE="$6"
fi

PR=${5#*page-ranges=}
# Do options specify page-ranges?
if [[ "$PR" != "$5" ]]; then
  PR=${PR%% *}
else
  #unset PR
  PR=1-999999
fi

if [[ "$PR" ]]; then
  TMPFILE2=$(mktemp ${TMPDIR:-/tmp}/textonly2.XXXXXX)
  pagenum=0
  EOF=
  { 
  while [[ "$PR" ]]; do
    pl=${PR%%,*}		;# take first subrange
    PR=${PR#$pl};PR=${PR#,}	;# remove from range list
    pu=${pl#*-}			;# extract upper and lower
    pl=${pl%-*}			;# pages of subrange
    # Allows interpreting 0-5,3-10 as 1-5,6-10 rejects 5-1 or 1-
    (( pagenum >= pl )) && pl=$(( pagenum + 1 ))
    (( pl > pu )) && continue
    
    # Loop reading pages until at or over lower page of subrange.
    while read -d `echo -ne '\f'` -r; do
      (( pagenum++ ))
      (( pagenum == pl )) && break
    done
    # Did we reach lower page of subrange or EOF?
    if (( pagenum < pl )); then
      [[ ! "$REPLY" ]] && break		;# empty last page - we're done.
      (( pagenum++ ))
      EOF=y
    fi
    # Output page and report to page log
    if (( pagenum == pl )); then
      echo -n "${REPLY}" >>"$TMPFILE2"
      # If EOF then page has no final FF
      [[ ! "$EOF" ]] && echo -ne '\f' >>"$TMPFILE2"
      echo "PAGE: $pagenum $COPIES" >&2
    fi
    [[ "$EOF" ]] && break
    # Is the current subrange a single page?
    (( pagenum == pu )) && continue
    while read -d `echo -ne '\f'` -r; do
      (( pagenum++ ))
      echo -ne "${REPLY}\f" >>"$TMPFILE2"
      echo "PAGE: $pagenum $COPIES" >&2
      (( pagenum == pu )) && break
    done
    # Could be that we reached EOF before page boundry
    if (( pagenum < pu )); then
      if [[ "$REPLY" ]]; then
        (( pagenum++ ))
        echo -n "${REPLY}" >>"$TMPFILE2"
        echo "PAGE: $pagenum $COPIES" >&2
      fi
      break
    fi
  done
  } <"$TMPFILE"
else
  TMPFILE2="$TMPFILE"
  pc=$(grep -co `echo -ne '\f'` "$TMPFILE2")
  pc=$(( pc * $COPIES ))
  echo "PAGE: $pc" >&2
fi

while [ "$COPIES" -gt 0 ]; do
  # Just translate LF->CRLF at the moment, until the PPD has options added.
  sed -e 's/$/'`echo -ne '\r'`'/g' "$TMPFILE2"

  if [ "$SENDFF" == "True" ]
    then
    echo -ne '\f'
  fi

  COPIES=$(($COPIES - 1))
done
# Cleanup
[[ "$TMPFILE" != "$TMPFILE2" ]] && rm -f "$TMPFILE2"
exit 0