#!/usr/bin/php
<?php
	/*
		fetch - will retrieve songs from a Live Music Archive page and encode them to mp3
		Usage: fetch [Concert Page URL, ie: http://www.archive.org/details/decemberists2006-05-18.dpa4061.flac16 ]

		Requires: PHP4 or PHP5 with curl extension, wget, flac (for flac decoding), 
			  shorten (for shorten decoding), lame (for mp3 encoding)

		Bugs: Lots of bugs that haven't been found have already been fixed!
		
		By Alice Lee, November 18 2006
		magicalgirl (the location which receives the mail) gmail (that which ends a sentence) com
		http://magical-girl.com/
		
	*/

	$url = $argv[1];
	if(!$url){
		echo "Enter a url!\n";	
		exit;
	}
	$start = time();

	echo "Fetching for $url\n";
	$curl = curl_init($url);
	curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
	curl_setopt($curl, CURLOPT_HEADER, 0);
	$page = curl_exec($curl);
	curl_close($curl);
	$orig_url = $url;
	$url = parse_url($url);


	$pattern = '@<td class="fileTitle">(.*?)</td><td><a href="(.*?(flac|mp3|shn))">@';
	preg_match_all($pattern, $page, $matches=array());
	if(empty($matches[0])){
		echo "No matches found!\n";
		exit;
	}
	$songs = array();
	foreach($matches[1] as $i=>$title){
		$relative_url = $matches[2][$i];
		$full_url = "http://".$url['host'].$relative_url;
		$type = $matches[3][$i];
		$filename = substr($relative_url, strrpos($relative_url, '/')+1);

		array_push($songs, array('title'=>$title, 'url'=>$full_url, 'type'=>$type, 'filename'=>$filename));
	}

	$pattern ='@Band/Artist: </span><span class="value"><a href=".*?">(.*?)</a>@';
	preg_match($pattern, $page, $matches);
	$artist = $matches[1];
	
	$pattern = '@Venue: </span><span class="value"><a href=".*?">(.*?)</a>@';
	preg_match($pattern, $page, $matches);
	$venue = $matches[1];
	
	$pattern = '@Date: </span><span class="value">(.*?)</span>@';
	preg_match($pattern, $page, $matches);
	$date = $matches[1];
	
	$album = "Live at $venue ($date)";

	$i=1;
	foreach($songs as $song){
		echo "Fetching {$song['title']} - {$song['url']}\n";
		echo 'wget '.$song['url']."\n";
		exec('wget '.$song['url']);
		if(!is_file($song['filename'])){
			echo "{$song['filename']} didn't fetch correctly!\n";
			continue;
		}
		if($song['type']=='flac'){
			$new_filename = str_replace(".flac", ".wav", $song['filename']);
			echo "Converting {$song['filename']} from FLAC to WAV\n";
			exec('flac -do '.$new_filename.' '.$song['filename']);
			if(!is_file($new_filename)){
				echo "{$song['filename']} didn't convert correctly\n";
				continue;
			}
			echo "Removing .flac file for $new_filename\n";
			exec('rm '.$song['filename']);
			$song['type']='wav';
			$song['filename']= $new_filename;
		}
		if($song['type']=='shn'){
			$new_filename = str_replace(".shn", ".wav", $song['filename']);
			echo "Converting {$song['filename']} from Shorten to WAV\n";
			exec('shorten -x '.$song['filename'].' '.$new_filename);
			if(!is_file($new_filename)){
				echo "{$song['filename']} didn't convert correctly\n";
				continue;
			}
			echo "Removing .shn file for $new_filename\n";
			exec('rm '.$song['filename']);
			$song['type']='wav';
			$song['filename']= $new_filename;

		}
	
		if($song['type']=='wav'){
			$new_filename = str_replace(".wav", ".mp3", $song['filename']);
			echo "Converting {$song['filename']} from WAV to MP3\n";
			echo "lame -v --id3v2-only --tt \"{$song['title']}\" --ta \"$artist\" --tl \"$album\" --tn $i {$song['filename']} $new_filename\n";
			exec("lame -v --id3v2-only --tt \"{$song['title']}\" --ta \"$artist\" --tl \"$album\" --tn $i {$song['filename']} $new_filename");
			if(!is_file($new_filename)){
				echo "{$song['filename']} didn't convert correctly\n";
				continue;
			}
			echo "Removing .wav file for $new_filename\n";
			exec('rm '.$song['filename']);
		}		
		$i++;
	}
	$time = time()-$start;
	
	echo "Operation took ".floor($time/60)." minutes, ".floor($time%60)." seconds\n";
?>