<%
define('ROOT',$_SERVER['DOCUMENT_ROOT']);
define('FRAGMENTS_ROOT',str_replace('htdocs','fragments',ROOT));
define('ALBUMS_ROOT',ROOT.'/albums');
umask(0002);
$admin = ($_SERVER['HTTP_HOST']=='admin-dorian.apteryx.fr');
$pi=$_SERVER['PATH_INFO'];
$user = array_key_exists('REMOTE_USER',$_SERVER) ? $_SERVER['REMOTE_USER'] : FALSE;
if ($user) {
$link = mysql_connect("localhost", "dorian", "dorian");
mysql_select_db('dorian');
$query = "SELECT * FROM dorian.user_info WHERE USER_NAME='$user'";
$profile = mysql_fetch_assoc(mysql_query($query, $link));
$profile['allow_publish'] = $user=='dorian';
$profile['super_admin'] = $user=='dorian';
mysql_close();
}
function filemdate($f) {
return date('d/m/Y H:i:s',filemtime($f));
}
function versions($f) {
$files = glob("$f,*");
$mtimes = array_map("filemdate",$files);
$versions = preg_replace("/.*\//", "", $files);
return array_combine($versions,$mtimes);
}
function latest($f) {
$lastver = array_pop(glob("$f,*"));
if ($lastver=="") $lastver=$f;
return $lastver;
}
function newver($file) {
$f = preg_replace('#,[^/]*$#','',$file);
$lastver = str_replace("$f,",'',@array_pop(glob("$f,*")));
return sprintf('%06d.%s',1+intval($lastver),$user);
}
function finclude($f) {
if (file_exists($f)) return @readfile($f);
else return @readfile(latest($f));
}
function insertEditableFragment($id,$className,$f) {
global $admin;
if ($admin) echo "";
finclude($f);
if ($admin) echo '
';
}
// function fwrite_if_newer($dest_filename, $content, $make_link)
// Compute new revision number and derive filename to create.
// File is created only if content differs from last revision.
// If no older revision exists and content is empty, skip it.
function fwrite_if_newer($f,$s,$ln=FALSE) {
global $user;
$lastver = str_replace("$f,",'',@array_pop(glob("$f,*")));
$newver = sprintf('%06d.%s',1+intval($lastver),$user);
$fl = "$f,$lastver";
if (!strlen($s) && (!file_exists($fl)||!filesize($fl))) return FALSE;
if (file_exists($fl) && strlen($s)===filesize($fl)) {
$s2 = file_get_contents($fl);
if ($s==$s2) return FALSE;
}
// TODO : make this a real recursive path check, and add proper error reporting as we may encounter an existing *file* (not a *dir*)...
if (!is_dir(dirname($f))) mkdir(dirname($f), 0775, TRUE);
file_put_contents($fn="$f,$newver", $s);
if ($ln) {
@unlink($f);
symlink(realpath($fn),$f);
}
return $newver;
}
%>
var menu_timer, menu_current;
var no_timer = false;
function ms(s) {
clearTimeout(menu_timer);
if (menu_current!=null && menu_current != s) _mh(menu_current);
document.getElementById(s).style.visibility = "visible";
menu_current = s;
}
function _mh(s) {
var e = document.getElementById(s);
e.style.visibility = "hidden";
e.no_timer = false;
menu_current = null;
}
function mh(s) {
if (!document.getElementById(s).no_timer) menu_timer = setTimeout("_mh('"+s+"')",1000);
}
function mc(s) {
var e = document.getElementById(s);
if (e.no_timer && menu_current!=null && menu_current == s) {
_mh(menu_current);
e.no_timer = false;
} else {
document.getElementById(s).no_timer = true;
ms(s);
}
}
function drawMenu(ml) {
for (i=0; i
');
}
document.write('');
} else document.write(' | ');
}
}