#! /bin/sh
# ------------------------------------------------------------------------------
#
# Function: Format PDF Output from groff Markup
#
# Copyright (C) 2005-2014 Free Software Foundation, Inc.
# Written by Keith Marshall (keith.d.marshall@ntlworld.com)
#
# This file is part of groff.
#
# groff 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 3 of the License, or
# (at your option) any later version.
#
# groff 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, see <http://www.gnu.org/licenses/>.
#
# ------------------------------------------------------------------------------
#
# Set up an identifier for the NULL device.
# In most cases "/dev/null" will be correct, but some shells on
# MS-DOS/MS-Windows systems may require us to use "NUL".
#
NULLDEV="/dev/null"
test -c $NULLDEV || NULLDEV="NUL"
#
# Set up the command name to use in diagnostic messages.
# (We can't assume we have 'basename', so use the full path if required.
# Also use the 'exec 2>...' workaround for a bug in Cygwin's 'ash').
#
CMD=`exec 2>$NULLDEV; basename $0` || CMD=$0
#
# To ensure that prerequisite helper programs are available, and are
# executable, a [fairly] portable method of detecting such programs is
# provided by function `searchpath'.
#
searchpath(){
#
# Usage: searchpath progname path
#
IFS=${PATH_SEPARATOR-":"} prog=':'
for dir in $2
do
for ext in '' '.exe'
#
# try `progname' with all well known extensions
# (e.g. Win32 may require `progname.exe')
#
do
try="$dir/$1$ext"
test -f "$try" && test -x "$try" && prog="$try" && break
done
test "$prog" = ":" || break
done
echo "$prog"
}
#
# If the system maps '/bin/sh' to some 'zsh' implementation,
# then we may need this hack, adapted from autoconf code.
#
test x${ZSH_VERSION+"set"} = x"set" && NULLCMD=":" \
&& (emulate sh) >$NULLDEV 2>&1 && emulate sh
#
# We need both 'grep' and 'sed' programs, to parse script options,
# and we also need 'cat', to display help and some error messages,
# so ensure they are all installed, before we continue.
#
CAT=`searchpath cat "$PATH"`
GREP=`searchpath grep "$PATH"`
SED=`searchpath sed "$PATH"`
#
# Another fundamental requirement is the 'groff' program itself;
# we MUST use a 'groff' program located in 'GROFF_BIN_DIR', if this
# is specified; if not, we will search 'GROFF_BIN_PATH', only falling
# back to a 'PATH' search, if neither of these is specified.
#
if test -n "$GROFF_BIN_DIR"
then
GPATH=GROFF_BIN_DIR
GROFF=`searchpath groff "$GROFF_BIN_DIR"`
#
elif test -n "$GROFF_BIN_PATH"
then
GPATH=GROFF_BIN_PATH
GROFF=`searchpath groff "$GROFF_BIN_PATH"`
#
else
GPATH=PATH
GROFF=`searchpath groff "$PATH"`
fi
#
# If one or more of these is missing, diagnose and bail out.
#
NO='' NOPROG="$CMD: installation problem: cannot find program"
test "$CAT" = ":" && echo >&2 "$NOPROG 'cat' in PATH" && NO="$NO 'cat'"
test "$GREP" = ":" && echo >&2 "$NOPROG 'grep' in PATH" && NO="$NO 'grep'"
test "$GROFF" = ":" && echo >&2 "$NOPROG 'groff' in $GPATH" && NO="$NO 'groff'"
test "$SED" = ":" && echo >&2 "$NOPROG 'sed' in PATH" && NO="$NO 'sed'"
if test -n "$NO"
then
set $NO
test $# -gt 1 && NO="s" IS="are" || NO='' IS="is"
while test $# -gt 0
do
test $# -gt 2 && NO="$NO $1,"
test $# -eq 2 && NO="$NO $1 and" && shift
test $# -lt 2 && NO="$NO $1"
shift
done
$CAT >&2 <<-ETX
*** FATAL INSTALLATION ERROR ***
The program$NO $IS required by '$CMD',
but cannot be found; '$CMD' is unable to continue.
ETX
exit 1
fi
#
# Identify the postprocessor command, for writing PDF output.
# (May be forced, by defining PDFROFF_POSTPROCESSOR_COMMAND in the environment;
# if this is not set, leave blank to use the built in default).
#
if test -n "${PDFROFF_POSTPROCESSOR_COMMAND}"
then
GROFF_GHOSTSCRIPT_INTERPRETER=`set command ${PDFROFF_POSTPROCESSOR_COMMAND};
echo $2`
fi
#
# Set up temporary/intermediate file locations, with traps to
# clean them up on exit. Note that, for greater portability, we
# prefer to refer to events by number, rather than by symbolic
# names; thus, the EXIT event is trapped as event zero.
#
export TMPDIR GROFF_TMPDIR
TMPDIR=${GROFF_TMPDIR=${TMPDIR-${TMP-${TEMP-"."}}}}
if GROFF_TMPDIR=`exec 2>${NULLDEV}; mktemp -dt pdfroff-XXXXXXXXXX`
then
#
# We successfully created a private temporary directory,
# so to clean up, we may simply purge it.
#
trap "rm -rf ${GROFF_TMPDIR}" 0
#
else
#
# Creation of a private temporary directory was unsuccessful;
# fall back to user nominated directory, (using current directory
# as default), and schedule removal of only the temporary files.
#
GROFF_TMPDIR=${TMPDIR}
trap "rm -f ${GROFF_TMPDIR}/pdf$$.*" 0
fi
#
# In the case of abnormal termination events, we force an exit
# (with status code '1'), leaving the normal exit trap to clean
# up the temporary files, as above. Note that we again prefer
# to refer to events by number, rather than by symbolic names;
# here we trap SIGHUP, SIGINT, SIGQUIT, SIGPIPE and SIGTERM.
#
trap "exit 1" 1 2 3 13 15
#
WRKFILE=${GROFF_TMPDIR}/pdf$$.tmp
#
REFCOPY=${GROFF_TMPDIR}/pdf$$.cmp
REFFILE=${GROFF_TMPDIR}/pdf$$.ref
#
CS_DATA=""
TC_DATA=${GROFF_TMPDIR}/pdf$$.tc
BD_DATA=${GROFF_TMPDIR}/pdf$$.ps
#
# Initialise 'groff' format control settings,
# to discriminate table of contents and document body formatting passes.
#
TOC_FORMAT="-rPHASE=1"
BODY_FORMAT="-rPHASE=2"
#
LONGOPTS="
help reference-dictionary no-reference-dictionary
stylesheet pdf-output no-pdf-output
version report-progress no-toc-relocation
emit-ps keep-temporary-files no-kill-null-pages
"
# Parse the command line, to identify 'pdfroff' specific options.
# Collect all other parameters into new argument and file lists,
# to be passed on to 'groff', enforcing the '-Tps' option.
#
DIFF="" STREAM="" INPUT_FILES=""
SHOW_VERSION="" GROFF_STYLE="$GROFF -Tps"
while test $# -gt 0
do
case "$1" in
#
# Long options must be processed locally ...
#
--*)
#
# First identify, matching any abbreviation to its full form.
#
MATCH="" OPTNAME=`IFS==; set dummy $1; echo $2`
for OPT in $LONGOPTS
do
MATCH="$MATCH"`echo --$OPT | $GREP "^$OPTNAME"`
done
#
# For options in the form --option=value
# capture any specified value into $OPTARG.
#
OPTARG=`echo $1 | $SED -n s?"^${OPTNAME}="??p`
#
# Perform case specific processing for matched option ...
#
case "$MATCH" in
--help)
$CAT <<-ETX
Usage: $CMD [-option ...] [--long-option ...] [file ...]
Options:
-h
--help
Display this usage summary, and exit.
-v
--version
Display a version identification message and exit.
--report-progress
Enable console messages, indicating the progress of the
PDF document formatting process.
--emit-ps
Emit PostScript output instead of PDF; this may be useful
when the ultimate PDF output is to be generated by a more
specialised postprocessor, (e.g. gpresent), rather than
the default GhostScript PDF writer.
--pdf-output=name
Write the PDF, (or PostScript), output stream to file
'name'; if this option is unspecified, standard output
is used for PDF, (or PostScript), output.
--no-pdf-output
Suppress the generation of PDF, (or PostScript), output
entirely; use this with the --reference-dictionary option,
if processing a document stream to produce only a
reference dictionary.
--no-reference-dictionary
Suppress the generation of a '$CMD' reference dictionary
for the PDF document. Normally '$CMD' will create a
reference dictionary, at the start of document processing;
this option can accelerate processing, if it is known in
advance, that no reference dictionary is required.
--reference-dictionary=name
Save the document reference dictionary in file 'name'.
If 'name' already exists, when processing commences, it
will be used as the base case, from which the updated
dictionary will be derived. If this option is not used,
then the reference dictionary, created during the normal
execution of '$CMD', will be deleted on completion of
document processing.
--stylesheet=name
Use the file 'name' as a 'groff' style sheet, to control
the appearance of the document's front cover section. If
this option is not specified, then no special formatting
is applied, to create a front cover section.
--no-toc-relocation
Suppress the multiple pass 'groff' processing, which is
normally required to position the table of contents at the
start of a PDF document.
--no-kill-null-pages
Suppress the 'null page' elimination filter, which is used
to remove the excess blank pages produced by the collation
algorithm used for 'toc-relocation'.
--keep-temporary-files
Suppress the normal clean up of temporary files, which is
scheduled when 'pdfroff' completes.
ETX
exit 0
;;
--version)
GROFF_STYLE="$GROFF_STYLE \"$1\""
SHOW_VERSION="GNU pdfroff (groff) version 1.22.3"
;;
--report-progress)
SHOW_PROGRESS=echo
;;
--keep-temporary-files)
trap "" 0
;;
--emit-ps)
PDFROFF_POSTPROCESSOR_COMMAND="$CAT"
;;
--pdf-output)
PDF_OUTPUT="$OPTARG"
;;
--no-pdf-output)
PDF_OUTPUT="$NULLDEV"
;;
--reference-dictionary)
REFFILE="$OPTARG"
;;
--no-reference-dictionary)
AWK=":" DIFF=":" REFFILE="$NULLDEV" REFCOPY="$NULLDEV"
;;
--stylesheet)
STYLESHEET="$OPTARG" CS_DATA=${GROFF_TMPDIR}/pdf$$.cs
;;
--no-toc-relocation)
TC_DATA="" TOC_FORMAT="" BODY_FORMAT=""
;;
--no-kill-null-pages)
PDFROFF_COLLATE="$CAT" PDFROFF_KILL_NULL_PAGES=""
;;
#
# any other non-null match must have matched more than one defined case,
# so report the ambiguity, and bail out.
#
--*)
echo >&2 "$CMD: ambiguous abbreviation in option '$1'"
exit 1
;;
#
# while no match at all simply represents an undefined case.
#
*)
echo >&2 "$CMD: unknown option '$1'"
exit 1
;;
esac
;;
#
# A solitary hyphen, as an argument, means "stream STDIN through groff",
# while the "-i" option means "append STDIN stream to specified input files",
# so set up a mechanism to achieve this, for ALL 'groff' passes.
#
- | -i*)
STREAM="$CAT ${GROFF_TMPDIR}/pdf$$.in |"
test "$1" = "-" && INPUT_FILES="$INPUT_FILES $1" \
|| GROFF_STYLE="$GROFF_STYLE $1"
;;
#
# Those standard options which expect an argument, but are specified with
# an intervening space, between flag and argument, must be reparsed, so we
# can trap invalid use of '-T dev', or missing input files.
#
-[dfFILmMnoPrTwW])
OPTNAME="$1"
shift; set reparse "$OPTNAME$@"
;;
#
# Among standard options, '-Tdev' is treated as a special case.
# '-Tps' is automatically enforced, so if specified, is silently ignored.
#
-Tps) ;;
#
# No other '-Tdev' option is permitted.
#
-T*) echo >&2 "$CMD: option '$1' is incompatible with PDF output"
exit 1
;;
#
# '-h' and '-v' options redirect to their equivalent long forms ...
#
-h*) set redirect --help
;;
#
-v*) shift; set redirect --version "$@"
;;
#
# All other standard options are simply passed through to 'groff',
# with no validation beforehand.
#
-*) GROFF_STYLE="$GROFF_STYLE \"$1\""
;;
#
# All non-option arguments are considered as possible input file names,
# and are passed on to 'groff', unaltered.
#
*) INPUT_FILES="$INPUT_FILES \"$1\""
;;
esac
shift
done
#
# If the '-v' or '--version' option was specified,
# then we simply emulate the behaviour of 'groff', with this option,
# and quit.
#
if test -n "$SHOW_VERSION"
then
echo >&2 "$SHOW_VERSION"
echo >&2; eval $GROFF_STYLE $INPUT_FILES
exit $?
fi
#
# Establish how to invoke 'echo', suppressing the terminating newline.
# (Adapted from 'autoconf' code, as found in 'configure' scripts).
#
case `echo "testing\c"; echo 1,2,3`,`echo -n testing; echo 1,2,3` in
*c*,*-n*) n='' c='' ;;
*c*) n='-n' c='' ;;
*) n='' c='\c' ;;
esac
#
# If STDIN is specified among the input files,
# or if no input files are specified, then we need to capture STDIN,
# so we can replay it into each 'groff' processing pass.
#
test -z "$INPUT_FILES" && STREAM="$CAT ${GROFF_TMPDIR}/pdf$$.in |"
test -n "$STREAM" && $CAT > ${GROFF_TMPDIR}/pdf$$.in
#
# Unless reference resolution is explicitly suppressed,
# we initiate it by touching the cross reference dictionary file,
# and initialise the comparator, to kickstart the reference resolver loop.
#
SAY=":"
if test -z "$DIFF"
then
>> $REFFILE
echo kickstart > $REFCOPY
test x${SHOW_PROGRESS+"set"} = x"set" && SAY=echo
#
# In order to correctly resolve 'pdfmark' references,
# we need to have both the 'awk' and 'diff' programs available.
#
NO=''
if test -n "$GROFF_AWK_INTERPRETER"
then
AWK="$GROFF_AWK_INTERPRETER"
test -f "$AWK" && test -x "$AWK" || AWK=":"
else
for prog in gawk mawk nawk awk
do
AWK=`searchpath $prog "$PATH"`
test "$AWK" = ":" || break
done
fi
DIFF=`searchpath diff "$PATH"`
test "$AWK" = ":" && echo >&2 "$NOPROG 'awk' in PATH" && NO="$NO 'awk'"
test "$DIFF" = ":" && echo >&2 "$NOPROG 'diff' in PATH" && NO="$NO 'diff'"
if test -n "$NO"
then
set $NO
SAY=":" AWK=":" DIFF=":"
test $# -gt 1 && NO="s $1 and $2 are" || NO=" $1 is"
$CAT >&2 <<-ETX
*** WARNING ***
The program$NO required, but cannot be found;
consequently, '$CMD' is unable to resolve 'pdfmark' references.
Document processing will continue, but no 'pdfmark' reference dictionary
will be compiled; if any 'pdfmark' reference appears in the resulting PDF
document, the formatting may not be correct.
ETX
fi
fi
#
# Run the multi-pass 'pdfmark' reference resolver loop ...
#
$SAY >&2 $n Resolving references ..$c
until $DIFF $REFCOPY $REFFILE 1>$NULLDEV 2>&1
do
#
# until all references are resolved, to yield consistent values
# in each of two consecutive passes, or until it seems that no consistent
# resolution is achievable.
#
$SAY >&2 $n .$c
PASS_INDICATOR="${PASS_INDICATOR}."
if test "$PASS_INDICATOR" = "...."
then
#
# More than three passes required indicates a probable inconsistency
# in the source document; diagnose, and bail out.
#
$SAY >&2 " failed"
$CAT >&2 <<-ETX
$CMD: unable to resolve references consistently after three passes
$CMD: the source document may exhibit instability about the reference(s) ...
ETX
#
# Report the unresolved references, as a diff between the two pass files,
# preferring 'unified' or 'context' diffs, when available
#
DIFFOPT=''
$DIFF -c0 $NULLDEV $NULLDEV 1>$NULLDEV 2>&1 && DIFFOPT='-c0'
$DIFF -u0 $NULLDEV $NULLDEV 1>$NULLDEV 2>&1 && DIFFOPT='-u0'
$DIFF >&2 $DIFFOPT $REFCOPY $REFFILE
exit 1
fi
#
# Replace the comparison file copy from any previous pass,
# with the most recently updated copy of the reference dictionary.
# (Some versions of 'mv' may not support overwriting of an existing file,
# so remove the old comparison file first).
#
rm -f $REFCOPY
mv $REFFILE $REFCOPY
#
# Run 'groff' and 'awk', to identify reference marks in the document source,
# filtering them into the reference dictionary; discard incomplete 'groff' output
# at this stage.
#
eval $STREAM $GROFF_STYLE -Z 1>$NULLDEV 2>$WRKFILE $REFCOPY $INPUT_FILES
$AWK '/^gropdf-info:href/ {$1 = ".pdfhref D -N"; print}' $WRKFILE > $REFFILE
done
$SAY >&2 " done"
#
# To get to here ...
# We MUST have resolved all 'pdfmark' references, such that the content of the
# updated reference dictionary file EXACTLY matches the last saved copy.
#
# If PDF output has been suppressed, then there is nothing more to do.
#
test "$PDF_OUTPUT" = "$NULLDEV" && exit 0
#
# We are now ready to start preparing the intermediate PostScript files,
# from which the PDF output will be compiled -- but before proceeding further ...
# let's make sure we have a GhostScript interpreter to convert them!
#
if test -n "$GROFF_GHOSTSCRIPT_INTERPRETER"
then
GS="$GROFF_GHOSTSCRIPT_INTERPRETER"
test -f "$GS" && test -x "$GS" || GS=":"
else
for prog in gs gswin32c gsos2
do
GS=`searchpath $prog "$PATH"`
test "$GS" = ":" || break
done
fi
#
# If we could not find a GhostScript interpreter, then we can do no more.
#
if test "$GS" = ":"
then
echo >&2 "$CMD: installation problem: cannot find GhostScript interpreter"
$CAT >&2 <<-ETX
*** FATAL INSTALLATION ERROR ***
'$CMD' requires a GhostScript interpreter to convert PostScript to PDF.
Since you do not appear to have one installed, '$CMD' connot continue.
ETX
exit 1
fi
#
# We now extend the local copy of the reference dictionary file,
# to create a full 'pdfmark' reference map for the document ...
#
$AWK '/^grohtml-info/ {print ".pdfhref Z", $2, $3, $4}' $WRKFILE >> $REFCOPY
#
# ... appending a dummy map reference, to ensure that at least
# one such is always present; (this is required, to suppress any
# further intermediate output to stderr during the "press-ready"
# runs of groff, for PDF output file production).
#
echo ".pdfhref Z 0 0 0" >> $REFCOPY
#
# Evaluate any processing options which may have been specified
# as a result of parsing the document source ...
#
eval `$SED -n '/^ *pdfroff-option:set */s///p' $WRKFILE`
#
# ... (which is currently supported to enable "toc-relocation",
# only when the document actually relies on it, and if it is not
# explicitly disabled from the command line) ...
#
if test x${toc_relocation-"auto"} != xenabled
then
#
# ... thus we reproduce the effect of the "--no-toc-relocation"
# option, when no enabling request is detected in the document
# control stream.
#
TC_DATA="" TOC_FORMAT="" BODY_FORMAT=""
fi
#
# Re-enable progress reporting, if necessary ...
# (Missing 'awk' or 'diff' may have disabled it, to avoid display
# of spurious messages associated with reference resolution).
#
test x${SHOW_PROGRESS+"set"} = x"set" && SAY=echo
#
# If a document cover style sheet is specified ...
# then we run a special formatting pass, to create a cover section file.
#
if test -n "$STYLESHEET"
then
DOT='^\.[ ]*'
CS_MACRO=${CS_MACRO-"CS"} CE_MACRO=${CE_MACRO-"CE"}
$SAY >&2 $n "Formatting document ... front cover section ..$c"
CS_FILTER="$STREAM $SED -n '/${DOT}${CS_MACRO}/,/${DOT}${CE_MACRO}/p'"
eval $CS_FILTER $INPUT_FILES | eval $GROFF_STYLE $STYLESHEET - > $CS_DATA
$SAY >&2 ". done"
fi
#
# If table of contents relocation is to be performed (it is, by default),
# then we run an extra 'groff' pass, to format a TOC intermediate file.
#
if test -n "$TC_DATA"
then
$SAY >&2 $n "Formatting document ... table of contents ..$c"
eval $STREAM $GROFF_STYLE $TOC_FORMAT $REFCOPY $INPUT_FILES > $TC_DATA
$SAY >&2 ". done"
fi
#
# In all cases, a final 'groff' pass is required, to format the document body.
#
$SAY >&2 $n "Formatting document ... body section ..$c"
eval $STREAM $GROFF_STYLE $BODY_FORMAT $REFCOPY $INPUT_FILES > $BD_DATA
$SAY >&2 ". done"
#
# Finally ...
# Invoke GhostScript as a PDF writer, to bind all of the generated
# PostScript intermediate files into a single PDF output file.
#
$SAY >&2 $n "Writing PDF output ..$c"
if test -z "$PDFROFF_POSTPROCESSOR_COMMAND"
then
PDFROFF_POSTPROCESSOR_COMMAND="$GS -dQUIET -dBATCH -dNOPAUSE -dSAFER
-sDEVICE=pdfwrite -sOutputFile="${PDF_OUTPUT-"-"}
elif test -n "$PDF_OUTPUT"
then
exec > $PDF_OUTPUT
fi
#
# (This 'sed' script is a hack, to eliminate redundant blank pages).
#
${PDFROFF_COLLATE-"$SED"} ${PDFROFF_KILL_NULL_PAGES-'
/%%Page:/{
N
/%%BeginPageSetup/b again
}
b
:again
/%%EndPageSetup/b finish
/%%Page:/{
N
b again
}
b
:finish
N
/^%%Page:.*\n0 Cg EP$/d
'} $TC_DATA $BD_DATA | $PDFROFF_POSTPROCESSOR_COMMAND $CS_DATA -
$SAY >&2 ". done"
#
# ------------------------------------------------------------------------------
# $RCSfile$ $Revision$: end of file