#!/bin/sh
def_signal=0
def_sound=0
def_tools=1

help(){
	cat <<END
Usage: $0 <filename.[ppm|pnm|png]>
Options:
    -s n      audio, n=0 mp2enc, n=1 toolame        ($def_sound)
    -t n      video, n=0 mjpegtools, n=1 ffmpeg     ($def_tools)
    -v n      Video Signal, n=1 ntsc n=2 pal        ($def_signal)
END
	exit 0
}

signal=$def_signal
sound=$def_sound
tools=$def_tools

while getopts s:t:v:h name "$@"
do
    case $name in
s)
    sound=$OPTARG ;;
t)
	tools=$OPTARG ;;
v)
    signal=$OPTARG ;;
*)
    help ;;
    esac
done
let shiftind=$OPTIND-1
shift $shiftind

case $signal in
2)
    Vflag="-F 25:1"
    Nflag="pal"
	Rflag_m="-A 59:54"
    fwidth="720"
    fheight="576" ;;
*)
    Vflag="-F 30000:1001"
    Nflag="ntsc"
	Rflag_m="-A 10:11"
    fwidth="720"
    fheight="480" ;;
esac

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$//"` ;;
*.png)
		ifilter=pngtopnm
		input="$1"
		base=`echo $input | sed "s/\.png$//"` ;;
*)
		help ;;
	esac
    echo Transcoding $input to $base.mpg....
    sleep 1

	dd if=/dev/zero bs=4 count=16000 |
		sox -t raw -s -w -c2 -r48000 /dev/stdin "$base".wav

	case $tools in
1)
	$ifilter $input |
	ppmtoy4m $Rflag $Vflag -n 10 -r -I p -S 420mpeg2 |
		ffmpeg -f yuv4mpegpipe -i /dev/stdin \
		-aspect 4:3 -interlace 0 -r ntsc -target dvd -y "$base".m2v
	ffmpeg -i "$base".wav -i "$base".m2v \
		-target dvd -ab 128000 -y "$base"b.mpg ;;
*)
	$ifilter $input |
	ppmtoy4m $Rflag $Vflag -n 10 -r -I p -S 420mpeg2 |
		mpeg2enc -a2 -f 8 -n $Nflag -o "$base".m2v
case $sound in
1)
	toolame -b 128 -s 48 "$base".wav "$base".m2a ;;
*)
	mp2enc -r48000 -b128 -o "$base".m2a <"$base".wav ;;
esac
	mplex -f 8 "$base".m2v "$base".m2a -o "$base"b.mpg ;;
esac

	if test ! -f $base.xml
	then
		cat <<EOF >$base.xml
<subpictures>
  <stream>
    <spu 
       force="yes"
       start="00:00:00.00" end="00:00:00.0"
       select="${base}h.png"
       highlight="${base}h.png"
       autooutline="infer"
       outlinewidth="8"
       autoorder="rows">
    </spu>
  </stream>
</subpictures>
EOF
	fi
	spumux $base.xml <"$base"b.mpg >$base.mpg
	
else
	help
fi