about summary refs log tree commit diff
path: root/test/ps-alt-roundtrip.test
blob: d90c4ddb1e9f043f0f4daaffa269e4ff083db903 (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
#! /bin/bash
# This script tests: pbmtoepsi pbmtopsg3 pbmtolps psidtopgm pstopnm
# Also requires: gs pnmcrop


# This script is for testing alternative (or minor) utilities that
# read/write Postscript and encapsulated Postscript:
# pbmtoepsi, pbmtopsg3, pbmtolps and psidtopgm.
#
# We keep these tests separate from those for pnmtops and pstopnm
# which are far more popular.
#
# pbmtopsg3 and pbmtolps produce output that require pstopnm for decoding.
#
# Failure message
## If ps-roundtrip.test succeeds and this test fails, it is most likely
## a problem with one of the alternate Postscipt utilities:
## pbmtoepsi, pbmtopsg3, pbmtolps or psidtopgm.
## If both tests fail it indicates a problem with pstopnm or gs.

# pstopnm does not use libnetpbm functions for output.
# Output is filtered through at least one Netpbm program.

# Test 1. Should print: 2425386270 41
testgrid1_ps=${tmpdir}/testgrid1.ps

pbmtopsg3 -dpi=72 testgrid.pbm \
     > ${testgrid1_ps} && \
pstopnm -xborder=0 -yborder=0 -llx=0 -lly=-16 -urx=14 \
    -dpi=72 -stdout -quiet -pbm ${testgrid1_ps} | \
    pnmcrop | cksum

rm ${testgrid1_ps}


# Test 2. Should print: 2425386270 41
testgrid2_ps=${tmpdir}/testgrid2.ps

pbmtolps -dpi 72 testgrid.pbm \
     > ${testgrid2_ps} && \
pstopnm -xborder=0 -yborder=0 -dpi=72 -stdout \
    -quiet ${testgrid2_ps} -pbm | \
  pnmcrop | cksum

rm ${testgrid2_ps}

# Test 3. Should print: 2916080186 235
# Output is pgm maxval=1 with black and white inverted.
#
testgrid_epsi=${tmpdir}/testgrid.epsi

pbmtoepsi testgrid.pbm > ${testgrid_epsi} && \
xysizebps=`awk  '/BeginPreview/ {print $2,$3,$4}' \
    ${testgrid_epsi}` && \
awk '/^%%BeginPreview:/ { p=1; next } /^%%EndImage/ { p=0; next } \
  p==1 && /%[ \t0-9a-fA-F]+/ { print substr($0,2); next } \
  p==1 {print "!"$0}' \
    ${testgrid_epsi} | psidtopgm $xysizebps | cksum

rm ${testgrid_epsi}