Edit File: pdfroff
#! /bin/sh # ------------------------------------------------------------------------------ # # Function: Format PDF Output from groff Markup # # Copyright (C) 2005-2021 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.23.0" ;; --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. You do not appear to have one installed; thus, '$CMD' cannot 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