about summary refs log tree commit diff
path: root/editor/pnmmargin
blob: 51ebebe5fc0fae06be2c0b36956b4ba42a5e4d10 (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
#!/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.

tempdir="${TMPDIR-/tmp}/pnmmargin.$$"
mkdir -m 0700 $tempdir || \
  { echo "Could not create temporary file. Exiting." 1>&2; exit 1;}
trap 'rm -rf $tempdir' 0 1 3 15

tmp1=$tempdir/pnmm1
tmp2=$tempdir/pnmm2
tmp3=$tempdir/pnmm3
tmp4=$tempdir/pnmm4

color="-gofigure"
plainopt=""

# Parse args.
while true ; do
    case "$1" in
        -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

if [ ${2-""} ] ; then
    echo "usage: $0 [-white|-black|-color <colorspec>] <size> [pnmfile]" 1>&2
    exit 1
fi

# Capture input file in a tmp file, in case it's a pipe.
# TODO: This code does not consider the case when the input file is specified
# and there is also input coming in from a pipe.

cat $@ > $tmp1

if [ $size == 0 ] ; then
    # Zero margin; just copy input to output
    pamtopnm $plainopt $tmp1;
else
    # If -white or -black, write output with pnmpad and exit.
    # Otherwise construct spacer files.
    
    case "$color" in
        -gofigure )
        pnmcut 0 0 1 1 $tmp1 | pnmtile $size 1 > $tmp2
        ;;
        -white | -black )
        pnmpad $plainopt $color \
            -left=$size -right=$size -top=$size -bottom=$size $tmp1
        exit
        ;;
        * )
        ppmmake $color $size 1 > $tmp2
        ;;
    esac
    pamflip -rotate90 $tmp2 > $tmp3
    
    # Cat things together.
    pnmcat -lr $tmp2 $tmp1 $tmp2 > $tmp4
    pnmcat -tb $plainopt $tmp3 $tmp4 $tmp3
fi