array('exec'=>'configuration'),'data'=>''));
debut_page(_L('Update SVN'), "configuration", "configuration");
echo "
";
gros_titre(_L('Update SVN'));
if ($connect_statut != '0minirezo'
OR !in_array($connect_id_auteur, explode(':', _SVN_UPDATE_AUTEURS))) {
echo _T('avis_non_acces_page');
// debug echo ($connect_statut);
// debug echo ($connect_id_auteur);
fin_page();
exit;
}
debut_gauche();
debut_droite();
if (!defined('_SVN_UPDATE_FILE')
OR !file_exists(_SVN_UPDATE_FILE)) {
die ("Fichier de configuration "._SVN_UPDATE_FILE." absent");
}
$config = file(_SVN_UPDATE_FILE);
$dirs_ok = array();
foreach ($config as $l) {
$l = trim($l);
if ($l AND substr($l,0,1) != "#") {
list($src,$dest) = explode(' ', $l);
$dirs_ok[$dest] = $l;
$sources[$dest] = $src;
}
}
if ($dirs_ok) {
chdir(_DIR_RACINE);
// Appliquer la demande
if (_request('dir_svn') == -1) {
traiter_config_svn($config);
} else
if ($dir_svn = _request('dir_svn')
AND isset($dirs_ok[$dir_svn])) {
traiter_config_svn(array($dirs_ok[$dir_svn]));
}
chdir(_DIR_RESTREINT_ABS);
// Menu
echo _L("Choisir le répertoire à mettre à jour : ");
echo "
";
} else
echo _L("Désolé, aucun répertoire n'est accessible en SVN.");
fin_page();
}
?>