1#!/usr/local/bin/bash
2# This script tests: pamscale pamstretch pamstretch-gen
3# Also requires: pamvalidate pnmpsnr
4
5tmpdir=${tmpdir:-/tmp}
6stretch_ppm=${tmpdir}/stretch.ppm
7
8width_height=`pamfile -size testimg.ppm | \
9                awk '{print "-width="$1, "-height="$2}'`
10
11pamstretch-gen 3.96 testimg.ppm | pamvalidate > ${stretch_ppm}
12echo 3.96 hermite:
13pamscale 3.96 -filter=hermite testimg.ppm | \
14  pnmpsnr -target1=34.13 -target2=48.95 -target3=42.73 - ${stretch_ppm} || \
15  echo failure ${PIPESTATUS[@]} ":" $?
16
17pamscale ${width_height} -filter=hermite ${stretch_ppm} | \
18  pnmpsnr -target1=33.12 -target2=48.59 -target3=42.3 testimg.ppm - || \
19  echo failure ${PIPESTATUS[@]} ":" $?
20rm ${stretch_ppm}
21
22pamstretch-gen 2.75 testimg.ppm | pamvalidate > ${stretch_ppm}
23echo 2.75 lanczos:
24pamscale 2.75 -filter=lanczos testimg.ppm | \
25  pnmpsnr -target1=32.93 -target2=48.28 -target3=41.89 - ${stretch_ppm} || \
26  echo failure ${PIPESTATUS[@]} ":" $?
27
28pamscale ${width_height} -filter=lanczos ${stretch_ppm} | \
29  pnmpsnr -target1=32.81 -target2=48.43 -target3=41.94 testimg.ppm - || \
30  echo failure ${PIPESTATUS[@]} ":" $?
31rm ${stretch_ppm}
32