blob: 6f82ddbe9dabef2bc3670f9ecc8a44cf484fd3f0 (
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
|
#!/bin/sh
#
# ppmmargin - add a margin to a PNM image
#
# Copyright (C) 1991 by Jef Poskanzer.
#
# Permission to use, copy, modify, and distribute this software and its
# documentation for any purpose and without fee is hereby granted, provided
# that the above copyright notice appear in all copies and that both that
# copyright notice and this permission notice appear in supporting
# documentation. This software is provided "as is" without express or
# implied warranty.
color="-gofigure"
plainopt=""
# Parse args.
while true ; do
case "$1" in
-version|--version )
pnmpad --version; exit $?;
;;
-p|-pl|-pla|-plai|-plain )
plainopt="-plain"
shift
;;
-w|-wh|-whi|-whit|-white )
color="-white"
shift
;;
-b|-bl|-bla|-blac|-black )
color="-black"
shift
;;
-c|-co|-col|-colo|-color )
shift
if [ ! ${1-""} ] ; then
echo "usage: $0 [-white|-black|-color <colorspec>] <size> [pnmfile]" 1>&2
exit 1
fi
color="$1"
shift
;;
-* )
echo "usage: $0 [-white|-black|-color <colorspec>] <size> [pnmfile]" 1>&2
exit 1
;;
* )
break
;;
esac
done
if [ ! ${1-""} ] ; then
echo "usage: $0 [-white|-black|-color <colorspec>] <size> [pnmfile]" 1>&2
exit 1
fi
size="$1"
shift
case $size in
''|*[!0-9]*)
echo "Size argument '$size' is not a whole number"
exit 1
;;
esac
if [ ${2-""} ] ; then
echo "usage: $0 [-white|-black|-color <colorspec>] <size> [pnmfile]" 1>&2
exit 1
fi
# TODO: This code does not consider the case when the input file is specified
# and there is also input coming in from a pipe.
if [ $size -eq 0 ] ; then
# Zero margin; just copy input to output
pamtopnm $plainopt $@;
else
# If -white or -black, write output with pnmpad and exit.
# Otherwise construct spacer files.
case "$color" in
-gofigure )
pnmpad $plainopt -detect-background \
-left=$size -right=$size -top=$size -bottom=$size $@
exit
;;
-white | -black )
pnmpad $plainopt $color \
-left=$size -right=$size -top=$size -bottom=$size $@
exit
;;
* )
pnmpad $plainopt -color $color \
-left=$size -right=$size -top=$size -bottom=$size $@
exit
;;
esac
fi
|
