#!/usr/bin/php
<?
if($argc == 2)
{
	$url = $argv[1];
	$urlss = explode("/",$url);
	
	$vid = $urlss[3];
	if(!$vid)
	{
		echo("Not a redtube link");
		exit();
	}
	$fl = (string) round((integer) $vid / 1000);
	$len = strlen($vid);
	for($a = 1; $a <= 7 - $len; $a++)
	{
		$vid = "0".$vid;
	}
	$len = strlen($fl);
	for($a = 1; $a <= 7 - $len; $a++)
	{
		$fl = "0".$fl;
	}
      	$map = Array("R", "1", "5", "3", "4", "2", "O", "7", "K", "9", "H", "B", "C", "D", "X", "F", "G", "A", "I", "J", "8", "L", "M", "Z", "6", "P", "Q", "0", "S", "T", "U", "V", "W", "E", "Y", "N");	
	$int = 0;
	for($a = 0; $a <= 6; $a++)
	{
		$int = $int + ((integer) substr($vid,$a,1) * ($a + 1)); 
	}
	$ch = (string) $int;
	$int = 0;
	for($a = 0; $a < strlen($ch);$a++)
	{
		$int = $int + (integer) substr($ch,$a,1);
	}

	if($int >= 10)
	{
		$ch = (string) $int;
	}
	else
	{
		$ch = "0".$int;
	}

	$mapping = "";
	$mapping .= $map[ord(substr($vid,3,1)) - 48 + $int + 3];
	$mapping .= substr($ch,1,1);
	$mapping .= $map[ord(substr($vid,0,1)) - 48 + $int + 2];
	$mapping .= $map[ord(substr($vid,2,1)) - 48 + $int + 1];
	$mapping .= $map[ord(substr($vid,5,1)) - 48 + $int + 6];
	$mapping .= $map[ord(substr($vid,1,1)) - 48 + $int + 5];
	$mapping .= substr($ch,0,1);
	$mapping .= $map[ord(substr($vid,4,1)) - 48 + $int + 7];
	$mapping .= $map[ord(substr($vid,6,1)) - 48 + $int + 4];

	$url = "http://dl.redtube.com/_videos_t4vn23s9jc5498tgj49icfj4678/".$fl."/".$mapping.".flv";
	echo($url."\n");
}
else
{
	echo("Usage - redtube-dl <URL>\n");
}
?>