#!/usr/bin/env php
<?php
require_once( 'Console/CommandLine.php' );
function get_console_parser() {
    $parser = new Console_CommandLine(array(
        'description' => 'This program downloads an flv from youtube and generates an mp3 from it.',
        'version' => '0.0.1',
    ));
    
    $parser->addOption(
        'skip_curl',
        array(
            'short_name'  => '-s',
            'long_name'   => '--skip-curl',
            'description' => 'More useful in testing. If you\'ve recently downloaded the youtube html page, this option will skip that and use the temp file from the last attempt.',
            'action'      => 'StoreTrue',
        )
    );
    
    $parser->addOption(
        'output_file',
        array(
            'short_name'  => '-o',
            'long_name'   => '--output-file',
            'description' => 'If you don\'t define an output file the script defaults to youtube\'s VIDEO_TITLE variable.  Do not add a file extension to this.',
            'action'      => 'StoreString',
        )
    );
    
    $parser->addOption(
        'keep_flv',
        array(
            'short_name'  => '-k',
            'long_name'   => '--keep-flv',
            'description' => 'Use this option if you want to keep the downloaded flv.',
            'action'      => 'StoreTrue',
        )
    );
    
    
    $parser->addArgument(
        'youtube_url',
        array(
            'description' => 'The youtube url, i.e. http://www.youtube.com/watch?v=R2dygXfmFIc',
            'help_name' => 'URL',
        )
    );
    return $parser;
}

try {
    $parser = get_console_parser();
    $result = $parser->parse();
#    print_r( $result->options );
#    print_r( $result->args );
}
catch ( Exception $e ) {
    $parser->displayError( $e->getMessage() );
    exit();
}
#exit(50);

#$GLOBALS['skip_curl'] = true;
#$GLOBALS['skip_curl'] = false;
$GLOBALS['skip_curl'] = $result->options['skip_curl'];

#$GLOBALS['url'] = 'http://www.youtube.com/watch?v=R2dygXfmFIc';
$GLOBALS['url'] = $result->args['youtube_url'];

$GLOBALS['cookie_file'] = dirname( __FILE__ ) . '/cookies.txt';
$GLOBALS['user_agent'] = 'Mozilla/5.0 (X11; U; Linux x86_64; en-US; rv:1.9.0.16) Gecko/2009121601 Ubuntu/9.04 (jaunty) Firefox/3.0.16';
$GLOBALS['tmp_file'] = dirname( __FILE__ ) . '/get-youtube.php.watch.html';

/*
http://v23.lscache6.c.youtube.com/videoplayback?ip=0.0.0.0&sparams=id%2Cexpire%2Cip%2Cipbits%2Citag%2Calgorithm%2Cburst%2Cfactor%2Coc%3AU0dVTVRRUV9FSkNNNV9MS1VH&fexp=903913%2C906800&algorithm=throttle-factor&itag=34&ipbits=0&burst=40&sver=3&expire=1268463600&key=yt1&signature=B34245381748159860D82E93FA79D25D01223E42.8E545ED44903A7B1477E3D77BA6552945C458F97&factor=1.25&id=4767728177e61487&#/Caspa___The_Terminator_video.flv

http://v23.lscache6.c.youtube.com/videoplayback?ip=0.0.0.0&sparams=id%2Cexpire%2Cip%2Cipbits%2Citag%2Calgorithm%2Cburst%2Cfactor%2Coc%3AU0dVTVRTT19FSkNNNV9MTVNH&fexp=900147&algorithm=throttle-factor&itag=34&ipbits=0&burst=40&sver=3&expire=1268481600&key=yt1&signature=CA5FC726E76896BC21EB0C69797531A1B786B121.654396F2C2B5A855503EC20BF59DDD13C8B0D493&factor=1.25&id=4767728177e61487,5
*/

function getfile( $url, $referer = '', $file = '' ) {
    $ch = curl_init();
    
    curl_setopt( $ch, CURLOPT_URL, $url );
    
    if ( $file ) {
        $f = fopen( $file, 'w' );
        curl_setopt( $ch, CURLOPT_FILE, $f );
    }
    else {
        curl_setopt( $ch, CURLOPT_RETURNTRANSFER, true );
    }
    
    if ( $referer ) {
        curl_setopt( $ch, CURLOPT_REFERER, $referer );
    }
    
    curl_setopt( $ch, CURLOPT_COOKIEFILE, $GLOBALS['cookie_file'] );
    curl_setopt( $ch, CURLOPT_COOKIEJAR,  $GLOBALS['cookie_file'] );
    
    curl_setopt( $ch, CURLOPT_USERAGENT,  $GLOBALS['user_agent'] );
    curl_setopt( $ch, CURLOPT_FILETIME, true );
    
    $out = curl_exec( $ch );
    
    if ( $file ) {
        $GLOBALS['server_filetime'] = curl_getinfo( $ch, CURLINFO_FILETIME );
#        echo '$server_filetime = ', $server_filetime, PHP_EOL;
        if ( !touch( $file, $GLOBALS['server_filetime'] ) ) {
            echo 'touch -t ', date( 'YmdHi.s', $GLOBALS['server_filetime'] ), ' ', $file, PHP_EOL;
        }
    }
    
    curl_close( $ch );
    return $out;
}

// ********************************************************************

$GLOBALS['fix_flv_url']['file_pattern'] = array(
#    '@[ -\.]@g',
    '@[ -\.\&]@',
    '@[\[\]]@',
);
$GLOBALS['fix_flv_url']['file_replace'] = array(
    '_',
    '',
);
$GLOBALS['fix_flv_url']['url_pattern'] = array(
    '@,[0-9A-Za-z]+$@',
);
$GLOBALS['fix_flv_url']['url_replace'] = array(
    '&#/',
);
function fix_flv_url( $url, $title ) {
    $file = preg_replace(
        $GLOBALS['fix_flv_url']['file_pattern']
        ,$GLOBALS['fix_flv_url']['file_replace']
        ,$title
    );
    $file .= '_video.flv';
    
    $url = preg_replace(
        $GLOBALS['fix_flv_url']['url_pattern']
        ,$GLOBALS['fix_flv_url']['url_replace']
        ,$url
    );
    $out['file'] = $file;
    $out['url' ] = $url . $file;
    
    return $out;
}

// ********************************************************************

if ( $skip_curl ) {
    echo 'Skipping curl, getting html from ', $tmp_file, PHP_EOL;
    $url_page = file_get_contents( $tmp_file );
}
else {
    echo 'Downloading from ', $GLOBALS['url'], PHP_EOL;
    $url_page = getfile( $GLOBALS['url'] );
    file_put_contents( $GLOBALS['tmp_file'], $url_page );
}

$url_page = explode( "\n", $url_page );

$lines = preg_grep( '/["\'](SWF_ARGS|VIDEO_TITLE)["\']/', $url_page );

//    'VIDEO_TITLE': 'Caspa - The Terminator',
$title_pattern = '@.*["\']VIDEO_TITLE["\']:\s*["\']([^"\']+)["\'].*@';
$title_replace = '$1';
$pattern = '@.*"fmt_url_map": "([^"]+)".*@';
$replace = '$1';
foreach ( $lines as $line ) {
    $line = trim( $line );
    if ( false !== strpos( $line, 'VIDEO_TITLE' ) ) {
        $line = preg_replace( $title_pattern, $title_replace, $line );
        echo '$line = ', $line, PHP_EOL;
        $title = $line;
    }
    else {
        $line = preg_replace( $pattern, $replace, $line );
        $line = urldecode( $line );
        $a = explode( '|', $line );
        $url = $a[1];
        echo '$url = ', $url, PHP_EOL;
    }
}

$rs = fix_flv_url( $url, $title );
echo '$rs[\'url\'] = ', $rs['url'], PHP_EOL;

if ( $result->options['output_file'] ) {
    $t = trim( $result->options['output_file'] );
}
else {
    $t = trim( $title );
    $t = strtr( $t, ' ', '_' );
}
$file_flv = $t . '.flv';
$file_mp3 = $t . '.mp3';
echo 'Grabbing flv from youtube.';
$success = getfile( $rs['url'], $GLOBALS['url'], $file_flv );
if ( !$success ) {
    echo 'There was an error downloading the flv.  It\'s possible that you may need to increase the amount of time curl needs to download the file.', PHP_EOL;
    echo 'Failed downloading from: ', $rs['url'], PHP_EOL;
    exit(5);
}
else if ( !filesize( $file_flv ) ) {
    echo 'There was an error downloading the flv. It could be that the URL I generated was incorrect.', PHP_EOL;
    echo 'Failed downloading from: ', $rs['url'], PHP_EOL;
    exit(404);
}

#ffmpeg -i video.flv -acodec mp2 -ac 2 -ab 128k -vn -y 'Caspa - The Terminator.mp3'
#ffmpeg -i "%s.flv" -acodec mp2 -ac 2 -ab 128k -vn -y "%s.mp3"
# libmp3lame

echo 'Preparing to run ffmpeg to generate the mp3, this may take a while.', PHP_EOL;
$cmd = 'ffmpeg -i %s -acodec libmp3lame -ac 2 -ab 128k -vn -y %s';
$cmd = sprintf(
    $cmd
    ,escapeshellarg( $file_flv )
    ,escapeshellarg( $file_mp3 )
);
echo $cmd, PHP_EOL;
passthru( $cmd );

if ( !touch( $file_mp3, $GLOBALS['server_filetime'] ) ) {
    echo 'touch -t ', date( 'YmdHi.s', $GLOBALS['server_filetime'] ), ' ', $file_mp3, PHP_EOL;
}

if ( !$result->options['keep_flv'] ) {
    unlink( $file_flv );
}