aboutsummaryrefslogtreecommitdiff
path: root/src/bin/duplex
blob: 12b254e8413bed8bd6380a3e96e3f4bf35e1dc5e (plain) (blame)
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
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
#!/bin/sh
set -eu

usage() {
	cat <<-'EOF'
	Usage:
	  duplex [-q QUALITY] [FILE...]
	  duplex -h
EOF
}

help() {
	cat <<-'EOF'

	Options:
	  -q QUALITY    choose the print quality, either:
	                low, medium (default) or high.
	  -h, --help    show this message

	Examples:

	  Print the given PostScript file with default quality:
	    duplex f1.ps

	  Print multiple PDF files with high quality:
	    duplex -q high *.pdf

	  Print the file from STDIN:
	    cat f2.ps | duplex
EOF
}

mkdtemp() {
	name="$(echo 'mkstemp(template)' |
		m4 -D template="${TMPDIR:-/tmp}/m4-tmpname.")"
	rm -f "$name"
	mkdir "$name"
	echo "$name"
}

n_pages() {
	pdftk "$1" dump_data | awk '/NumberOfPages/ { print $2 }'
}

main() {
	if file -b in-tmp   | grep -q PostScript; then
		ps2pdf in-tmp in.pdf
	elif file -b in-tmp | grep -q PDF; then
		cp in-tmp in.pdf
	else
		printf "Don't know how to duplex print input file:\n" >&2
		file in-tmp >&2
		printf '\nGive me either a PostScript or PDF file instead.\n' >&2
		exit 2
	fi

	FULL="$(n_pages in.pdf)"
	if [ "$FULL" = '1' ]; then
		lp in.pdf
		return
	fi

	pdftk A=in.pdf cat Aodd  output odd.pdf
	pdftk A=in.pdf cat Aeven output even.pdf

	NODD="$(n_pages  odd.pdf)"
	NEVEN="$(n_pages even.pdf)"

	printf 'Printing odd pages...\n' >&2
	lp odd.pdf
	printf 'Has printing finished yet?  Once it does, reload the pages and hit it enter to continue. '
	read -r < /dev/tty
	lp even.pdf

	if [ "$NODD" != "$NEVEN" ]; then
		printf '\n' | lp
	fi
}

for flag in "$@"; do
	case "$flag" in
		--)
			break
			;;
		--help)
			usage
			help
			exit
			;;
		*)
			;;
	esac
done

lpoptions -o PrintQuality=standard
while getopts 'hq:' flag; do
	case "$flag" in
		q)
			case "$OPTARG" in
				low)
					lpoptions -o PrintQuality=draft
					;;
				medium)
					lpoptions -o PrintQuality=standard
					;;
				high)
					lpoptions -o PrintQuality=high
					;;
				*)
					echo "Bad QUALITY option: \"$OPTARG\"" >&2
					exit 2
					;;
			esac
			;;
		h)
			usage
			help
			exit
			;;
		*)
			usage >&2
			exit 2
			;;
	esac
done
shift $((OPTIND - 1))

OLDDIR="$PWD"
cd "$(mkdtemp)" #FIXME
if [ -z "${1:-}" ]; then
	cat - > in-tmp
	main
else
	for f in "$@"; do
		# ABS="$(echo "$(cd "$(dirname "$f")"; pwd -P)/$(basename "$f")")"
		# echo "$ABS"
		cp "$OLDDIR/$(basename "$f")" in-tmp
		main
	done
fi