File: aps2file.in

package info (click to toggle)
apsfilter 7.2.6-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 2,544 kB
  • ctags: 61
  • sloc: sh: 457; ansic: 236; perl: 175; makefile: 157
file content (125 lines) | stat: -rwxr-xr-x 2,906 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
#! @shell@
# -*- sh -*-
#
# $ApsCVS: src/apsfilter/bin/aps2file.in,v 1.1.2.7 2002/02/24 20:47:48 andreas Exp $
#
# aps2file, by Michael Loin
#
# pass input data through apsfilter into a file ("print to file" mode)
#
# doesn't work with fake duplex mode, since two PostScript documents
# (even and odd pages) will end up in one
#

unset Z_OPTS APSFILTER OUTPUT_FILE INPUT_FILE DEBUG
QUEUE=${PRINTER:-lp}


usage()
{
    cat >&2 <<EOF
aps2file: print to file using apsfilter

Usage:
	aps2file [-h] [-D] [-P queue] [-Z options] [-o output] [input]

Options:
	-h		show this help
	-D		run apsfilter in debug mode ('set -x')
	-P queue	name of printer queue to be used for apsfilter
			(default: value of '\$PRINTER'; otherwise 'lp')
	-Z options	comma separated option list
			(default: empty)
	-o output	output file
			(default: stdout)
	input		input file
			(default: stdin)
EOF
    exit 0
}

error()
{
    echo >&2 "aps2file: $@"
    exit 1
}

parse_commandline()
{
    while [ "$1" ]; do
	case "$1" in
	    -P)		shift; QUEUE="$1" ;;
	    -P*)	QUEUE="${1#-P}" ;;

	    -Z)		shift; Z_OPTS="-Z$1" ;;
	    -Z*)	Z_OPTS="$1" ;;

	    -o)		shift; OUTPUT_FILE="$1" ;;
	    -o*)	OUTPUT_FILE="${1#-o}" ;;

	    -h|--help)	usage ;;

	    -D)		DEBUG="-x" ;;

	    -*)		error "unknown option '$1'" ;;

	    *)		if [ "$INPUT_FILE" ]; then
			    error "at most one input file allowed"
			else
			    INPUT_FILE="$1"
			fi ;;
	esac
	shift
    done
}

check_queue_name()
{
    local q

    # apspreview provides a special configuration directory to aps2file
    # (supplied in environment variable APS_CONFDIR) and the proper queue
    # name, so we don't need to re-check it
    if [ -z "$APS_CONFDIR" ]; then
	APS_CONFDIR="@sysconfdir@/apsfilter"

	# if the queue name is an alias, parse printcap for the original name
	if [ ! -d "$APS_CONFDIR/$QUEUE" ]; then
	    # quote forward slashes
	    q=$(echo "$QUEUE" | sed 's%/%\\/%')
	    q=$("@awk@" -F":" "/^${q}[|:]|^[^#].*\|${q}[|:]/,/^#/ \
		{ if (\$0 ~ /:sd=/) print \$2 }" < "@printcap@")
	    if [ "$q" ]; then
		QUEUE="${q##*/}"
	    else
		error "couldn't resolve printer name '$QUEUE' in @printcap@"
	    fi
	fi
    fi
}

print2file()
{
    APSFILTER="$APS_CONFDIR/basedir/bin/apsfilter"
    if [ ! -x "$APSFILTER" ]; then
	error "apsfilter not found at '$APSFILTER'"
    elif [ ! -f "$APS_CONFDIR/$QUEUE/apsfilterrc" ]; then
	error "no configuration file found for queue '$QUEUE'"
    fi

    : ${INPUT_FILE:=/dev/stdin} ${OUTPUT_FILE:=/dev/stdout}

    # start with an almost empty environment to emulate running under LPRng;
    # input must not come from a file connected to a terminal
    cat "$INPUT_FILE" | env -i CONTROL=dummy APS2FILE_CONTEXT=dummy \
	SPOOL_DIR="$QUEUE" "@shell@" $DEBUG "$APSFILTER" -h"$HOSTNAME" \
	-n"$USER" -f$(basename "$INPUT_FILE") $Z_OPTS > "$OUTPUT_FILE"
}

#
# main controls
#

parse_commandline "$@"
check_queue_name
print2file