#!/bin/sh
def_frames=150
help(){
cat <<END
Usage: $0 <filename.[ppm|pnm|jpg]>
Options:
    -n n      Number of frames per image
    -h        Print this help message
END
        exit 0
}

frames=$def_frames

while getopts n:h name "$@"
do
    case $name in
n)
    frames=$OPTARG ;;
*)
    help ;;
    esac
done
let shiftind=$OPTIND-1
shift $shiftind

if test "$#" = "1"
then
    case $1 in
*.pnm)
		ifilter=cat
        input="$1"
        base=`echo $input | sed "s/\.pnm$//"` ;;
*.ppm)
		ifilter=cat
        input="$1"
        base=`echo $input | sed "s/\.ppm$//"` ;;
*.jpg)
		ifilter=jpegtopnm
		input="$1"
        base=`echo $input | sed "s/\.jpg$//"` ;;
*)
                help ;;
    esac
    echo Transcoding $input to $base.qt....
    sleep 1
	$ifilter $input |
    ppmtoy4m -n $frames -F 30000:1001 -r -I p | \
	yuvscaler -nntsc -O DVD | \
	yuv2lav -fq -o "$base".qt
#	yuvscaler -nntsc -O SVCD | \
#		mpeg2enc -f4 -o $base.m2v
#       mplex -f4 "$base".m2v -o "$base".mpg
else
        help
fi