#!/usr/local/bin/php
<?php
$start = time();
set_time_limit(0);


/* CONFIGURATION */
$apikey = ""; // Put your Google YouTube API Key Here
$ytuser = ''; // Destination YouTube Account (ex: johnsmith@gmail.com)
$ytpasswd = ''; // Not recommended without 2-step Auth
                // (in which case use App Password)
/* END CONFIGURATION */


$ythost = "uploads.gdata.youtube.com";
$bufsize = 10240;
$version = "1.03";
$arguments = getopt("f:t:d:c:k:");
if (!isset($arguments['f'])) {
	die("Usage: ".$_SERVER[argv][0]." -f videofile [-t title] [-d description] [-c category] [-k keywords]\n");
}

if (isset($arguments['t'])) {
	$title = $arguments['t'];
} else {
	$title = "Zefie's CMD Line Uploaded Video";
}

if (isset($arguments['d'])) {
	$desc = $arguments['d'];
}

if (isset($arguments['k'])) {
	$keywords = $arguments['k'];
}

if (isset($arguments['c'])) {
	$vcat = $arguments['c'];
} else {
	$vcat = "People";
}


$file = $arguments['f'];
$fileparts = split("/",$file);
$filename = $fileparts[(count($fileparts)-1)];
$filesize = filesize($file);
$contype = get_mime_type($filename);

echo "-- Zefie YouTube Uploader v".$version."--\n\n";
echo "File Name: ".$filename."\n";
echo "File Size: ".$filesize."\n";
echo "File Type: ".$contype."\n";
echo "Video Title: ".$title."\n";
echo "Video Category: ".$vcat."\n";
echo "Video Keywords: ".$keywords."\n";
if (isset($desc)) {
	echo "Video Description: ".$desc."\n";
}
echo "\n";
echo "Checking Category Validity... ";
$data = file_get_contents("http://gdata.youtube.com/schemas/2007/categories.cat");
$dsplit = split("atom:category ",$data);
foreach ($dsplit as $gcat) {
	$pos = (strpos($gcat,"term") + 6);
	$pos2 = strpos($gcat,"'",$pos);
	$catterm = substr($gcat,$pos,($pos2 - $pos));
	if ($catterm != "version=") {
		$categories[] = $catterm;
		if ($catterm == $vcat) {
			echo "OK.\n";
			$validcat = 1;
			break;
		}
	}
}
if (!isset($validcat)) {
	echo "Invalid.\n\n";
	echo "Please select from one of the following:\n";
	foreach ($categories as $cat) {
		echo $cat." ";
	}
	echo "\n";
	die();
}

echo "Getting Google Account Auth Token... \n";
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, "https://www.google.com/youtube/accounts/ClientLogin");
curl_setopt($ch, CURLOPT_POST, 1);
if (!isset($ytpasswd)) {
	$ytpasswd = prompt_silent("Password for ".$ytuser.": ");
}
curl_setopt($ch, CURLOPT_POSTFIELDS, "Email=".urlencode($ytuser)."&Passwd=".urlencode($ytpasswd)."&service=youtube&source=".urlencode("Zefie's Command Line Uploader for PHP Linux"));
unset($ytpasswd);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
$goodata = curl_exec($ch);
unset($ch);

$goodatares = split("\n",$goodata);
foreach ($goodatares as $datastr) {
	$meh = split("=",$datastr);
	if ($meh[0] == "Error") {
		die("Failed.\nReason: ".$meh[1]."\n\n");
	}
	if ($meh[0] == "Auth") {
		echo "Success.\n";
		$token = $meh[1];
	};
	if ($meh[0] == "YouTubeUser") {
		$ytrealuser = $meh[1];
	};
}
	
$yturi = "/feeds/api/users/".$ytrealuser."/uploads";

$outdata2 = "--f93dcbA3\n";
$outdata2 .= "Content-Type: application/atom+xml; charset=UTF-8\n";
$outdata2 .= "\n";
$outdata2 .= "<?xml version=\"1.0\"?>\n";
$outdata2 .= "<entry xmlns=\"http://www.w3.org/2005/Atom\"\n";
$outdata2 .= "  xmlns:media=\"http://search.yahoo.com/mrss/\"\n";
$outdata2 .= "  xmlns:yt=\"http://gdata.youtube.com/schemas/2007\">\n";
$outdata2 .= "  <media:group>\n";
$outdata2 .= "    <yt:incomplete/>\n";
$outdata2 .= "	<media:title type=\"plain\">".htmlentities($title)."</media:title>\n";
$outdata2 .= "    <media:category\n";
$outdata2 .= " scheme=\"http://gdata.youtube.com/schemas/2007/developertags.cat\">Zefie PHP Uploader\n";
$outdata2 .= "    </media:category>\n";
$outdata2 .= "    <media:category\n";
$outdata2 .= "          scheme=\"http://gdata.youtube.com/schemas/2007/categories.cat\">".$vcat."\n";
$outdata2 .= "        </media:category>\n";
if (isset($desc)) {
	$outdata2 .= "      <media:description type=\"plain\">".htmlentities($desc)."</media:description>\n";
}
if (isset($keywords)) {
	$outdata2 .= "      <media:keywords>".htmlentities($keywords)."</media:keywords>\n";
}
$outdata2 .= "  </media:group>\n";
$outdata2 .= "</entry>\n";
$outdata2 .= "--f93dcbA3\n";
$outdata2 .= "Content-Type: $contype\n";
$outdata2 .= "Content-Transfer-Encoding: binary\n";
$outdata2 .= "\n";

$outdata = "POST ".$yturi." HTTP/1.1\n";
$outdata .= "Host: ".$ythost."\n";
$outdata .= "Authorization: GoogleLogin auth=\"".$token."\"\n";
$outdata .= "GData-Version: 2\n";
$outdata .= "X-GData-Key: key=".$apikey."\n";
$outdata .= "Slug: ".$filename."\n";
$outdata .= "Content-Type: multipart/related; boundary=\"f93dcbA3\"\n";
$outdata .= "Content-Length: ".($filesize+strlen($outdata2)+13)."\n";
$outdata .= "Connection: close\n";
$outdata .= "\n";
$outdata .= $outdata2;

$socket = fsockopen($ythost,80,$errno,$errstr,50);
if (!$socket) {
	die("Cannot connect".$errno.$errstr);
} else { 
	fwrite($socket,$outdata);
	$infile = fopen($file,"r");
	$sent = 0;
	while (!feof($infile)) {
		$buffer = fread($infile,$bufsize);
		$written = fwrite($socket,$buffer);
		$sent = ($sent + $written);
		echo "Sent ".size_hum_read($sent)." of ".size_hum_read($filesize)."...\r";
	}
	echo "\n";
	fclose($infile);
	fwrite($socket,"\n--f93dcbA3--");
	$readback = fread($socket,20480);
	if (preg_match("/400 Bad Request/",$readback) || preg_match("/401 Unauth/",$readback)) {
		$readsplit = split("\r\n\r\n",$readback);
		echo "Error Uploading Video: ".$readsplit[1]."\n";
	}
	if (preg_match("/201 Created/",$readback)) {
		echo "Success!\n\n";
		echo "This is a primitive uploader.\n";
		echo "Please go to your YouTube Account and update the metadata.\n";
	}
	fclose($socket);
	$end = time();
	$seconds = ($end - $start);
        $mins = floor ($seconds / 60);
        $secs = $seconds % 60;
	if ($secs < 10) {
		$secs = "0".$secs;
	}
        printf ("Total time elapsed: %d:%s\n", $mins, $secs);
}


function get_mime_type($filename, $mimePath = '/home/mysticmidnight/etc') {
   $fileext = substr(strrchr($filename, '.'), 1);
   if (empty($fileext)) return (false);
   $regex = "/^([\w\+\-\.\/]+)\s+(\w+\s)*($fileext\s)/i";
   $lines = file("$mimePath/mime.types");
   foreach($lines as $line) {
      if (substr($line, 0, 1) == '#') continue; // skip comments
      $line = rtrim($line) . " ";
      if (!preg_match($regex, $line, $matches)) continue; // no match to the extension
      return ($matches[1]);
   }
   return (false); // no match at all
} 

function size_hum_read($size) {
	$i=0;	
	$iec = array("b", "kb", "mb", "gb", "tb", "pb", "eb", "zb", "yb");
	while (($size/1024)>1) {
		$size=$size/1024;
		$i++;
	}
	return substr($size,0,strpos($size,'.')+4).$iec[$i];
} 


function prompt_silent($prompt = "Enter Password:") {
  if (preg_match('/^win/i', PHP_OS)) {
    $vbscript = sys_get_temp_dir() . 'prompt_password.vbs';
    file_put_contents(
      $vbscript, 'wscript.echo(InputBox("'
      . addslashes($prompt)
      . '", "", "password here"))');
    $command = "cscript //nologo " . escapeshellarg($vbscript);
    $password = rtrim(shell_exec($command));
    unlink($vbscript);
    return $password;
  } else {
    $command = "/usr/bin/env bash -c 'echo OK'";
    if (rtrim(shell_exec($command)) !== 'OK') {
      trigger_error("Can't invoke bash");
      return;
    }
    $command = "/usr/bin/env bash -c 'read -s -p \""
      . addslashes($prompt)
      . "\" mypassword && echo \$mypassword'";
    $password = rtrim(shell_exec($command));
    echo "\n";
    return $password;
  }
}