cvs -z9 -d:pserver:anonymous@mplayerhq.hu:/cvsroot/ffmpeg co ffmpeg
cd ffmpeg
./configure --enable-xvid --enable-gpl --enable-faac
make
make install

# mpg2ipod
# quick script to transcode to an 5G iPod compatible video file
# requires recompiling of ffmpeg with xvid, and facc enabled
# you can tweak any of the crop, bitrate, etc.
# video size has worked for me up to 480x352
# this does a 2nd pass because it decreases file size greatly
# remove this pass to speed things up
# this was a quick hack, but is works for now

for file in $*
do
/usr/local/bin/ffmpeg -i $file -cropleft 4 -cropright 10 -deinterlace -vcodec xvid -s 320x240 -r 29.97 -b 384 -qmax 5 -bufsize 4096 -acodec aac -ab 96 -g 300 -pass 1 -passlogfile mpg2ipod_log -f mov $file.pass1.mov
/usr/local/bin/ffmpeg -i $file -cropleft 4 -cropright 10 -deinterlace -vcodec xvid -s 320x240 -r 29.97 -b 384 -qmax 5 -bufsize 4096 -acodec aac -ab 96 -g 300 -pass 2 -passlogfile mpg2ipod_log -f mov $file.ipod.mov
rm -f $file.pass1.mov
rm -f mpg2ipod_log*
done

#!/usr/bin/perl
#
# First things first this is a quick hack, so use at your own risk
# it is working well for me right now with Knoppmyth R5A22
#
# VERSION: Beta .1 - mpg2ipod
# Author: Chris aka Wififun - email: wififun-at-gmail.com
#
# Requirements: recompile ffmpeg with --enable-xvid --enable-gpl --enable-faac
# mythweb should be accessable to your iTunes machine you can edit your hosts
# file to have mythtv point the right IP
# create a folder /myth/ipod and make sure to chown mythtv:mythtv
# then create a symlink ln -s /myth/ipod /var/www/ipodfeed
# put this script in /usr/local/bin and make sure mythtv can run it
# it may need chown root:mythtv
# open mythtv-setup and under General set up one of your User Jobs to run it:
# /usr/local/bin/mpg2ipod "%DIR%" "%FILE%" "%TITLE%" "%SUBTITLE%" "%STARTTIME%"
# Give the job a name like "Copy for iPod feed" and exit setup
# Then edit your recording schedules for each show you want in the feed.
# under Post Processing, add the newly created job to the list.
# you can also select it after a recording is finished, from the Job Options
# item when you get info for a previously recorded program.
# In iTunes, select "Subscribe to Podcast" from the Advanced menu
# enter the url http://mythtv/ipodfeed/mythtvforipod.xml
# have fun


if ($#ARGV != 4) {
    print "usage: mpg2ipod DIRECTORY TITLE SUBTITLE STARTTIME\n";
    exit;
}

$directory = $ARGV[0];
$file = $ARGV[1];
$title = $ARGV[2];
$subtitle = $ARGV[3];
$recorddate = substr $ARGV[4], 0, 8;
my( $rightnow ) = `date`;
$filename = $title."-".$subtitle."-".$recorddate;
$filename =~ s/ //g;

printf("Starting pass 1 of 2...\n");
   DoPassOne();
printf("Pass 1 competed, starting pass 2 of 2...\n");
   DoPassTwo();
printf("cleaning up temporary files\n");
   $cmd = "rm -f /tmp/mpg2ipod_log*";
      print $cmd."\n";
      if(system($cmd)) { print "Removing log files failed\n"; }
   $cmd = "rm -f /myth/ipod/'$filename'.pass1.mov";
      print $cmd."\n";
      if(system($cmd)) { print "Removing pass 1 file failed\n"; }
printf("$title is ready for your iPod\n");
printf("Generating RSS feed for iTunes\n");
   GenerateRSSFeed();
printf("Done\n");

sub DoPassOne {
    $cmd = "/usr/local/bin/ffmpeg -i $directory/$file -cropleft 4 -cropright 10 -deinterlace -vcodec xvid -s 320x240 -r 29.97 -b 384 -qmax 5 -bufsize 4096 -acodec aac -ab 96 -g 300 -pass 1 -passlogfile /tmp/mpg2ipod_log -f mov /myth/ipod/'$filename'.pass1.mov";
    print $cmd."\n";
    if(system($cmd)) { print "Pass one failed\n"; }
    return 0;
}

sub DoPassTwo {
    $cmd = "/usr/local/bin/ffmpeg -i $directory/$file -cropleft 4 -cropright 10 -deinterlace -vcodec xvid -s 320x240 -r 29.97 -b 384 -qmax 5 -bufsize 4096 -acodec aac -ab 96 -g 300 -pass 2 -passlogfile /tmp/mpg2ipod_log -f mov /myth/ipod/'$filename'.ipod.mov";
    print $cmd."\n";
    if(system($cmd)) { print "Pass two failed\n"; }
    return 0;
}

sub GenerateRSSFeed {
   if ( ! -r "/myth/ipod/mythtvforipod.xml" ) {
      open(XML, ">/myth/ipod/mythtvforipod.xml");
       print XML "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n";
       print XML "<rss xmlns:itunes=\"http://www.itunes.com/DTDs/Podcast-1.0.dtd\" version=\"2.0\">\n";
       print XML "<channel>\n";
       print XML "<title>MythTV Recorded Programs</title>\n";
      print XML "<itunes:author>MythTV</itunes:author>\n";
      print XML "<link>http://mythtv/ipodfeed/</link>\n";
      print XML "<itunes:subtitle>Transcoded recording for your iPod Video.</itunes:subtitle>\n";
      print XML "<itunes:summary>Myth TV Recorded Programs for the iPod v.1</itunes:summary>\n";
      print XML "<description>Myth TV Recorded Programs for the iPod v.1</description>\n";
      print XML "<itunes:owner>\n";
      print XML "<itunes:name>MythTV</itunes:name>\n";
      print XML "<itunes:email>mythtv@localhost</itunes:email>\n";
      print XML "</itunes:owner>\n";
      print XML "<itunes:explicit>No</itunes:explicit>\n";
      print XML "<language>en-us</language>\n";
      print XML "<copyright>Copyright 2005.</copyright>\n";
      print XML "<lastBuildDate>Today.</lastBuildDate>\n";
      print XML "<webMaster>mythtv@localhost</webMaster>\n";
      print XML "<itunes:image href=\"http://mythtv.org/themes/Myth_bb2/images/mythtv-logo.jpg\" />\n";
      print XML "<itunes:category text=\"TV Shows\"></itunes:category>\n";
      print XML "<category>TV Shows</category>\n";
      print XML "<image>";
      print XML "<url>http://mythtv.org/themes/Myth_bb2/images/mythtv-logo.jpg</url>\n";
      print XML "</image>\n";
      print XML "</channel>\n";
      print XML "</rss>\n";
      close(XML);

       }
      my @xmlarray = '/myth/ipod/mythtvforipod.xml';
      open(XML, "</myth/ipod/mythtvforipod.xml") or die "no xml file to open\n";
      @xmlarray = <XML>;
      close(XML);   
      foreach my $line (@xmlarray) {
         $line =~ s/<\/channel>\n//gi;
         $line =~ s/<\/rss>\n//gi;
      }

      push @xmlarray, "<item>\n"; 
       push @xmlarray, "<title>".$_."</title>\n"; 
       push @xmlarray, "<itunes:author>MythTV</itunes:author>\n"; 
       push @xmlarray, "<author>MythTV</author>\n"; 
       push @xmlarray, "<itunes:category text=\"TV Shows\"></itunes:category>\n"; 
       push @xmlarray, "<description>".$subtitle."</description>\n"; 
       push @xmlarray, "<pubDate>".$rightnow."</pubDate>\n"; 
       push @xmlarray, "<enclosure url=\"http://mythtv/ipodfeed/".$filename.".ipod.mov\" type=\"video/quicktime\" />\n"; 
       push @xmlarray, "<itunes:duration></itunes:duration>\n"; 
       push @xmlarray, "<itunes:keywords>".$title."</itunes:keywords>\n"; 
       push @xmlarray, "</item>\n";
      push @xmlarray, "</channel>\n";
      push @xmlarray, "</rss>\n";
      
      open(XML, ">/myth/ipod/mythtvforipod.xml") or die "no xml file to open\n";
      foreach my $line (@xmlarray) {
         print XML $line;
      }
      close(XML);   
   return 0;
}