blob: ec074055ce85eb86ff1885e65bc8c12649d9324b (
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
141
142
143
144
145
146
147
148
149
150
|
#! /bin/bash
# This script tests: pamtowinicon winicontopam
# Also requires: pamchannel pamdepth pamstack pamtopam pbmmake pngtopam
# Also requires: pnmtopng ppmpat
tmpdir=${tmpdir:-/tmp}
test_pam=${tmpdir}/testimg.pam
test1_pam=${tmpdir}/testimg1.pam
test2_pam=${tmpdir}/testimg2.pam
#test3_pam=${tmpdir}/testimg3.pam
test4_pam=${tmpdir}/testimg4.pam
test5_pam=${tmpdir}/testimg5.pam
black_pam=${tmpdir}/black.pam
white_pam=${tmpdir}/white.pam
gray_pam=${tmpdir}/gray.pam
# classic: 16 24 32 48 64
# full: 16 32 48 256
for sizes in "16 24 32 48 64" "16 32 48 256"
do
for size in ${sizes}
do
ppmpat -tartan -color=rgb:1f/1f/1f,rgb:7f/ff/00,rgb:00/ff/3f \
${size} ${size}
done | pamtopam > ${test_pam}
for size in ${sizes}
do
pbmmake -black ${size} ${size} | pamdepth 255
done | pamtopam > ${black_pam}
for size in ${sizes}
do
pbmmake -white ${size} ${size} | pamdepth 255
done | pamtopam > ${white_pam}
for size in ${sizes}
do
pbmmake -gray ${size} ${size} | pamdepth 255
done | pamtopam > ${gray_pam}
# 1 plane
echo ${sizes} ": 1 plane"
echo "Should print 2588356089 8591 or 3783949470 69390 four times"
pamchannel -tupletype="GRAYSCALE" 0 < ${test_pam} | \
tee ${test1_pam} | cksum
pamtowinicon ${test1_pam} | winicontopam -allimages | \
pamchannel -tupletype="GRAYSCALE" 0 | cksum
pamtowinicon -pngthreshold=300 ${test1_pam} | winicontopam -allimages | \
pamchannel -tupletype="GRAYSCALE" 0 | cksum
pamtowinicon -pngthreshold=1 ${test1_pam} | winicontopam -allimages | \
pamchannel -tupletype="GRAYSCALE" 0 | cksum
rm ${test1_pam}
# 2 planes
echo ${sizes} ": 2 planes"
echo "Should print 3357739334 16877 or 3331485515 138534 four times"
pamstack ${gray_pam} ${gray_pam} | \
pamchannel -tupletype="GRAYSCALE_ALPHA" 0 1 | tee ${test2_pam} | cksum
pamtowinicon ${test2_pam} | winicontopam -allimages | \
pamchannel -tupletype="GRAYSCALE_ALPHA" 0 1 | cksum
pamtowinicon -pngthreshold=300 ${test2_pam} | winicontopam -allimages | \
pamchannel -tupletype="GRAYSCALE_ALPHA" 0 1 | cksum
pamtowinicon -pngthreshold=1 ${test2_pam} | winicontopam -allimages | \
pamchannel -tupletype="GRAYSCALE_ALPHA" 0 1 | cksum
rm ${test2_pam}
# 3 planes
echo ${sizes} ": 3 planes"
echo "Should print 3734212737 25073 or 56221695 207606 four times"
pamchannel -tupletype="RGB" 0 1 2 < ${test_pam} | cksum
pamtowinicon ${test_pam} | winicontopam -allimages | \
pamchannel -tupletype="RGB" 0 1 2 | cksum
pamtowinicon -pngthreshold=300 ${test_pam} | winicontopam -allimages | \
pamchannel -tupletype="RGB" 0 1 2 | cksum
pamtowinicon -pngthreshold=1 ${test_pam} | winicontopam -allimages | \
pamchannel -tupletype="RGB" 0 1 2 | cksum
# 4 planes
echo ${sizes} ": 4 planes"
echo "Should print 1294260080 33359 or 732184466 276750 four times"
pamdepth 255 ${black_pam} | pamstack ${test_pam} - | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | tee ${test4_pam} | cksum
pamtowinicon ${test4_pam} | winicontopam -allimages | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | cksum
pamtowinicon -pngthreshold=300 ${test4_pam} | winicontopam -allimages | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | cksum
pamtowinicon -pngthreshold=1 ${test4_pam} | winicontopam -allimages | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | cksum
rm ${test4_pam}
# 5 planes
echo ${sizes} ": 5 planes: output 3"
echo "Should print 3734212737 25073 or 56221695 207606 four times"
pamstack ${test_pam} ${gray_pam} ${white_pam} | \
pamchannel -tupletype="RGB" 0 1 2 | \
tee ${test5_pam} | cksum
pamtowinicon ${test5_pam} | winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB" 0 1 2 | cksum
pamtowinicon -pngthreshold=300 ${test5_pam} | \
winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB" 0 1 2 | cksum
pamtowinicon -pngthreshold=1 ${test5_pam} | \
winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB" 0 1 2 | cksum
echo ${sizes} ": 5 planes : output 4"
echo "Should print 2704877198 33359 or 1699833476 276750 four times"
pamstack ${test_pam} ${gray_pam} ${white_pam} | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | \
tee ${test5_pam} | cksum
pamtowinicon ${test5_pam} | winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | cksum
pamtowinicon -pngthreshold=300 ${test5_pam} | \
winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | cksum
pamtowinicon -pngthreshold=1 ${test5_pam} | \
winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB_ALPHA" 0 1 2 3 | cksum
echo ${sizes} ": 5 planes : output 5"
echo "Should print 2567279592 41655 or 4154838752 345902 twice"
pamstack ${test_pam} ${gray_pam} ${white_pam} | \
pamchannel -tupletype="RGB_ALPHA_ANDMASK" 0 1 2 3 4 | \
tee ${test5_pam} | cksum
pamtowinicon -pngthreshold=300 ${test5_pam} | \
winicontopam -allimages -andmasks | \
pamchannel -tupletype="RGB_ALPHA_ANDMASK" 0 1 2 3 4 | cksum
rm ${test5_pam}
rm ${test_pam} ${gray_pam} ${white_pam} ${black_pam}
done
|
