Projet-Autoblog/xsaf2.php

144 lines
5.3 KiB
PHP
Raw Normal View History

2013-01-22 22:48:58 +01:00
<?php
/* modtime 2013-01-23 */
2013-01-22 22:48:58 +01:00
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); }
}
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;
}
2013-01-22 22:48:58 +01:00
function xsafimport($xsafremote)
{
$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]);
2013-01-22 22:48:58 +01:00
$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;
}
2013-01-22 22:48:58 +01:00
$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)) {
if ( mkdir('./'. $foldername, 0755, false) ) {
$fp = fopen('./'. $foldername .'/index.php', 'w+');
/* autoblog */
if($social==FALSE)
{
2013-01-22 22:48:58 +01:00
if( !fwrite($fp, "<?php require_once dirname(__DIR__) . '/autoblog.php'; ?>") ){
$infos = "Impossible 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 = "Impossible d'écrire le fichier vvb.ini dans ".$foldername;
}else{
fclose($fp);
$infos = "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( !fwrite($fp, "<?php require_once dirname(__DIR__) . '/automicroblog.php'; ?>") ){
$infos = "Impossible 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 = "Impossible d'écrire le fichier vvb.ini dans ".$foldername;
}else{
fclose($fp);
$infos = "automicroblog crée avec succès : $foldername";
$to_update[]=serverUrl().preg_replace("/(.*)\/(.*)$/i","$1/".$foldername , $_SERVER['SCRIPT_NAME']); // url of the new autoblog
}
}
}
/* end of file writing */
2013-01-22 22:48:58 +01:00
}else {
$infos = "Impossible de créer le répertoire ".$foldername;
}
} /* else { $infos = "Le répertoire ".$foldername." existe déjà ($sitename;$siteurl;$rssurl)"; } */
2013-01-22 22:48:58 +01:00
if(DEBUG){ echo $infos."\n"; }
}
}
if(!empty($to_update)){
if(DEBUG){ echo "update of autoblogs ..."; }
// because it's could be very long, we finish by updating new autoblogs
foreach ($to_update as $url) {
file_get_contents($url);
}
if(DEBUG){ echo "done"; }
}
}
}
/* And now, the XSAF links to be imported ! */
//xsafimport('https://www.ecirtam.net/autoblogs/?export');
xsafimport('http://autoblog.suumitsu.eu/?export');
2013-01-22 22:48:58 +01:00
if(DEBUG){ echo "\n\nXSAF import finished\n\n"; }
?>