#! /bin/sh
# This script tests: pamfile
# Also requires: pamchannel pamtopnm

echo "Test 1"

pamfile testimg.ppm
pamfile testgrid.pbm
pamchannel -infile=testimg.ppm -tupletype="GRAYSCALE" 0 | pamtopnm | pamfile
pamchannel -tupletype="GRAYSCALE" -infile=testimg.ppm 0 | pamfile

echo "Test 2"

cat testgrid.pbm testgrid.pbm testgrid.pbm | pamfile -count
cat testgrid.pbm testgrid.pbm testgrid.pbm | pamfile -allimages

echo "Test 3"

pamfile -size testimg.ppm
pamfile -machine testimg.ppm
cat testgrid.pbm testimg.ppm testgrid.pbm | pamfile -machine

echo "Test Invalid"

. ./test-invalid.inc

invCmd "pamfile -size -machine  testimg.ppm"
invCmd "pamfile -count -machine testimg.ppm"

head1_ppm=${tmpdir}/head1.ppm

head -n1 testimg.ppm > ${head1_ppm}
invCmd "pamfile  ${head1_ppm}"
rm ${head1_ppm}
