blob: bec8baf5a0a65ea7b327029c8022c529b2005756 (
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
|
#! /bin/sh
# This script tests: pamcut pnmpaste
# Also requires: pbmmake pnmpad
tmpdir=${tmpdir:-/tmp}
base_ppm=${tmpdir}/base.ppm
# Test 1. Should produce 2999529086 101484
# (Make a modified base image to prevent false positives.)
pbmmake -g 100 70 | \
pnmpaste -replace - 50 40 testimg.ppm | tee ${base_ppm} | cksum
# Test 2. Should produce 1926073387 101484
pamcut 50 40 100 70 testimg.ppm | \
pnmpaste -replace - 50 40 ${base_ppm} | cksum
rm ${base_ppm}
basewhite_pbm=${tmpdir}/basewhite.pbm
baseblack_pbm=${tmpdir}/baseblack.pbm
part_pbm=${tmpdir}/part.pbm
# Test 3. Should produce 514843768 41
# (Make a modified base image to prevent false positives.)
pbmmake -w 5 7 |
pnmpaste -replace - 7 9 testgrid.pbm | tee ${basewhite_pbm} | cksum
# Test 4. Should produce 1880210648 41
# (Another modified base image with target area black.)
pbmmake -b 5 7 |
pnmpaste -replace - 7 9 ${basewhite_pbm} | tee ${baseblack_pbm} | cksum
# Test 5. Should produce 2425386270 41 six times.
pamcut 7 9 5 7 testgrid.pbm > ${part_pbm}
pnmpaste -replace ${part_pbm} 7 9 ${basewhite_pbm} | cksum
pnmpaste -and ${part_pbm} 7 9 ${basewhite_pbm} | cksum
pnmpaste -or ${part_pbm} 7 9 ${baseblack_pbm} | cksum
pnmpad -left 3 -white ${part_pbm} |\
pnmpaste -and - 4 9 ${basewhite_pbm} | cksum
pnmpad -left 7 -right 2 -top 1 -black ${part_pbm} |\
pnmpaste -or - 0 8 ${baseblack_pbm} | cksum
pnmpaste -xor ${part_pbm} 7 9 testgrid.pbm |\
pnmpaste -xor ${part_pbm} 7 9 | cksum
rm ${part_pbm} ${basewhite_pbm} ${baseblack_pbm}
|
