Projet-Autoblog/xsaf2.php

<?php
/* modtime 2013-01-28 */

define('DEBUG', true);

header("HTTP/1.0 403 Forbidden");   /* Uncivilized method to prevent bot indexing, huh :) */
header('X-Robots-Tag: noindex');    /* more civilized method, but bots may not all take into account */
header('Content-type: text/plain');
$expire = time() -7200 ; $lockfile = ".xsaflock";  /* defaut delay: 7200 (2 hours) */

if (file_exists($lockfile)) 
{
  if (filemtime($lockfile) > $expire)
	{ echo "too early"; die; }
	else
	{ unlink($lockfile); file_put_contents($lockfile, ''); }
}
else file_put_contents($lockfile, '');

define('ROOT_DIR', __DIR__);
function escape($str)
{
    return htmlspecialchars($str, ENT_COMPAT, 'UTF-8', false);
}
function serverUrl()
{
    $https = (!empty($_SERVER['HTTPS']) && (strtolower($_SERVER['HTTPS'])=='on')) || $_SERVER["SERVER_PORT"]=='443'; // HTTPS detection.
    $serverport = ($_SERVER["SERVER_PORT"]=='80' || ($https && $_SERVER["SERVER_PORT"]=='443') ? '' : ':'.$_SERVER["SERVER_PORT"]);
    return 'http'.($https?'s':'').'://'.$_SERVER["SERVER_NAME"].$serverport;
}
function NoProtocolSiteURL($url)
{
	$siteurlnoprototypes = array("http://", "https://");
	$siteurlnoproto = str_replace($siteurlnoprototypes, "", $url);
	return $siteurlnoproto;
}
function xsafimport($xsafremote, $iter)
{
echo "\n*Traitement $xsafremote avec $iter créations max";
	$json_import = file_get_contents($xsafremote);
	if(!empty($json_import)){ 
		$to_update=array();
	 	foreach (json_decode($json_import) as $value) {
	 		$infos="";
	 		if(count($value)==3 && !empty($value[0]) && !empty($value[1]) && !empty($value[2])){

				$sitename = $value[0];
				$siteurl = escape($value[1]);
	 			$rssurl = escape($value[2]);
					if(strpos($siteurl, 'twitter.com') !== FALSE or strpos($siteurl, 'identi.ca') !== FALSE or strpos($sitename, 'statusnet-') !== FALSE)	{$social=TRUE;} else {$social=FALSE;}
				if($social==FALSE)
					{
					$foldername = sha1(NoProtocolSiteURL($siteurl));
					if(substr($siteurl, -1) == '/'){ $foldername2 = sha1(NoProtocolSiteURL(substr($siteurl, 0, -1))); }else{ $foldername2 = sha1(NoProtocolSiteURL($siteurl).'/');}	
					}
				else
					{
					$foldername = $sitename;$foldername2 = $sitename;
					}

				$sitedomain1 = preg_split('/\//', $siteurl, 0);
				$sitedomain2=$sitedomain1[2];
				$sitedomain3=explode(".", $sitedomain2);
				$sitedomain3=array_reverse($sitedomain3);
				$sitedomain = $sitedomain3[1].'.'.$sitedomain3[0];
				if(!file_exists($foldername) && !file_exists($foldername2) and $iter > 0) { 
					if ( mkdir('./'. $foldername, 0755, false) ) {
		                $fp = fopen('./'. $foldername .'/index.php', 'w+');

$response = get_headers($rssurl, 1); // check for redirections
if(!empty($response['Location']))
	{ $result="false"; }
else
{
$xml = simplexml_load_file($rssurl); // quick feed check
if (isset($xml->entry)) // ATOM feed.
	{$result="true";}  
elseif (isset($xml->item)) // RSS 1.0 /RDF
	{$result="true";} 
elseif (isset($xml->channel->item)) // RSS 2.0
	{$result="true";} 
else
	{$result="false";} 
}

/* autoblog */
if($social==FALSE and $result!=="false")
{ $iter--;
		                if( !fwrite($fp, "<?php require_once dirname(__DIR__) . '/autoblog.php'; ?>") ){
		                    $infos = "\nImpossible d'écrire le fichier index.php dans ".$foldername;
		                    fclose($fp);
		                }else{
			                fclose($fp);
			                $fp = fopen('./'. $foldername .'/vvb.ini', 'w+');
			                if( !fwrite($fp, '[VroumVroumBlogConfig]
SITE_TITLE="'. $sitename .'"
SITE_DESCRIPTION="Ce site n\'est pas le site officiel de '. $sitename .'<br>C\'est un blog automatis&eacute; qui r&eacute;plique les articles de <a href="'. $siteurl .'">'. $sitename .'</a>"
SITE_URL="'. $siteurl .'"
FEED_URL="'. $rssurl .'"
DOWNLOAD_MEDIA_FROM='.$sitedomain) ){
			                    fclose($fp);
			                	$infos = "\nImpossible d'écrire le fichier vvb.ini dans ".$foldername;
			               	}else{
			                	fclose($fp);
								$infos = "\n$iter/autoblog crée avec succès : $foldername";
								$to_update[]=serverUrl().preg_replace("/(.*)\/(.*)$/i","$1/".$foldername , $_SERVER['SCRIPT_NAME']); // url of the new autoblog
							}
						}
}
/* automicroblog */
else if($social!==FALSE and $result!=="false")
{ $iter--;
		                if( !fwrite($fp, "<?php require_once dirname(__DIR__) . '/automicroblog.php'; ?>") ){
		                    $infos = "\nImpossible d'écrire le fichier index.php dans ".$foldername;
		                    fclose($fp);
		                }else{
			                fclose($fp);
			                $fp = fopen('./'. $foldername .'/vvb.ini', 'w+');
			                if( !fwrite($fp, '[VroumVroumBlogConfig]
SITE_TITLE="'. $sitename .'"
SITE_DESCRIPTION="AutoMicroblog automatis&eacute; de "
SITE_URL="'. $siteurl .'"
FEED_URL="'. $rssurl .'"') ){
			                    fclose($fp);
			                	$infos = "\nImpossible d'écrire le fichier vvb.ini dans ".$foldername;
			               	}else{
			                	fclose($fp);
								$infos = "\n$iter/automicroblog crée avec succès : $foldername";
								$to_update[]=serverUrl().preg_replace("/(.*)\/(.*)$/i","$1/".$foldername , $_SERVER['SCRIPT_NAME']); // url of the new autoblog
							}
						}

} else { $infos = "\n$rssurl -> flux invalide"; }
/* end of file writing */
		            }else {
		                $infos = "\nImpossible de créer le répertoire ".$foldername;
					}
				}  else {  /*$infos = "\nFin d'itération ou Le répertoire ".$foldername." existe déjà ($sitename;$siteurl;$rssurl)";*/  } 
				if(DEBUG){ echo $infos; }
	 		}
	 	}
	 	/*if(!empty($to_update)){
	 		if(DEBUG){ echo "\nupdate of autoblogs ..."; }
	 		// because it's could be very long, we finish by updating new autoblogs
	 		foreach ($to_update as $url) {
	 			get_headers($url);
	 		}
	 		if(DEBUG){ echo "done\n\n"; }
	 	}*/
	}
$iter=''; return;
}

/* And now, the XSAF links to be imported, with maximal import per run ! */
xsafimport('https://raw.github.com/mitsukarenai/xsaf-bootstrap/master/2.json', 2);
//xsafimport('https://www.ecirtam.net/autoblogs/?export', 2);
//xsafimport('https://autoblog.suumitsu.eu/?export', 1);

if(DEBUG){ echo "\n\nXSAF import finished\n\n"; }
die;
?>