| 1 | <?php |
|---|
| 2 | |
|---|
| 3 | include_spip('inc/svn_update'); |
|---|
| 4 | |
|---|
| 5 | # redefinissables dans ecrire/mes_options ; si on veut en mettre |
|---|
| 6 | # plusieurs separer par des deux-points |
|---|
| 7 | define('_SVN_UPDATE_AUTEURS', '2'); |
|---|
| 8 | # fichier source |
|---|
| 9 | define('_SVN_UPDATE_FILE', find_in_path('svn_update_list.txt')); |
|---|
| 10 | |
|---|
| 11 | # securite |
|---|
| 12 | if (!defined("_ECRIRE_INC_VERSION")) return; |
|---|
| 13 | |
|---|
| 14 | function exec_svn_update() { |
|---|
| 15 | global $connect_statut, $connect_id_auteur, $connect_toutes_rubriques; |
|---|
| 16 | global $exec; |
|---|
| 17 | include_spip('inc/presentation'); |
|---|
| 18 | include_spip('inc/config'); |
|---|
| 19 | |
|---|
| 20 | pipeline('exec_init', |
|---|
| 21 | array('args'=>array('exec'=>'configuration'),'data'=>'')); |
|---|
| 22 | |
|---|
| 23 | debut_page(_L('Update SVN'), "configuration", "configuration"); |
|---|
| 24 | echo "<br><br><br>"; |
|---|
| 25 | gros_titre(_L('Update SVN')); |
|---|
| 26 | |
|---|
| 27 | |
|---|
| 28 | if ($connect_statut != '0minirezo' |
|---|
| 29 | OR !in_array($connect_id_auteur, explode(':', _SVN_UPDATE_AUTEURS))) { |
|---|
| 30 | echo _T('avis_non_acces_page'); |
|---|
| 31 | // debug echo ($connect_statut); |
|---|
| 32 | // debug echo ($connect_id_auteur); |
|---|
| 33 | fin_page(); |
|---|
| 34 | exit; |
|---|
| 35 | } |
|---|
| 36 | |
|---|
| 37 | debut_gauche(); |
|---|
| 38 | debut_droite(); |
|---|
| 39 | |
|---|
| 40 | if (!defined('_SVN_UPDATE_FILE') |
|---|
| 41 | OR !file_exists(_SVN_UPDATE_FILE)) { |
|---|
| 42 | die ("Fichier de configuration "._SVN_UPDATE_FILE." absent"); |
|---|
| 43 | } |
|---|
| 44 | $config = file(_SVN_UPDATE_FILE); |
|---|
| 45 | |
|---|
| 46 | $dirs_ok = array(); |
|---|
| 47 | foreach ($config as $l) { |
|---|
| 48 | $l = trim($l); |
|---|
| 49 | if ($l AND substr($l,0,1) != "#") { |
|---|
| 50 | list($src,$dest) = explode(' ', $l); |
|---|
| 51 | $dirs_ok[$dest] = $l; |
|---|
| 52 | $sources[$dest] = $src; |
|---|
| 53 | } |
|---|
| 54 | } |
|---|
| 55 | |
|---|
| 56 | if ($dirs_ok) { |
|---|
| 57 | |
|---|
| 58 | chdir(_DIR_RACINE); |
|---|
| 59 | // Appliquer la demande |
|---|
| 60 | if (_request('dir_svn') == -1) { |
|---|
| 61 | traiter_config_svn($config); |
|---|
| 62 | } else |
|---|
| 63 | if ($dir_svn = _request('dir_svn') |
|---|
| 64 | AND isset($dirs_ok[$dir_svn])) { |
|---|
| 65 | traiter_config_svn(array($dirs_ok[$dir_svn])); |
|---|
| 66 | } |
|---|
| 67 | chdir(_DIR_RESTREINT_ABS); |
|---|
| 68 | |
|---|
| 69 | |
|---|
| 70 | // Menu |
|---|
| 71 | |
|---|
| 72 | echo _L("Choisir le répertoire à mettre à jour : "); |
|---|
| 73 | echo "<form action='./?exec=$exec' method='post'> |
|---|
| 74 | <input type='hidden' name='exec' value='$exec' /> |
|---|
| 75 | <select name='dir_svn'> |
|---|
| 76 | <option value=''></option>"; |
|---|
| 77 | foreach ($dirs_ok as $dir => $source) { |
|---|
| 78 | echo "<option value='$dir'>".$dir |
|---|
| 79 | ." depuis ".$sources[$dir]."</option>\n"; |
|---|
| 80 | } |
|---|
| 81 | echo "<option value='-1'>** "._L('Tous')."</option>\n"; |
|---|
| 82 | echo "</select> |
|---|
| 83 | <input type='submit' value='Update' /> |
|---|
| 84 | </form> |
|---|
| 85 | "; |
|---|
| 86 | |
|---|
| 87 | } else |
|---|
| 88 | echo _L("Désolé, aucun répertoire n'est accessible en SVN."); |
|---|
| 89 | |
|---|
| 90 | |
|---|
| 91 | fin_page(); |
|---|
| 92 | |
|---|
| 93 | } |
|---|
| 94 | |
|---|
| 95 | ?> |
|---|
