ecrire/action/test_dirs.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2007                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   9  *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
  10  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
  11 \***************************************************************************/
  12
  13 if (!defined("_ECRIRE_INC_VERSION")) return; // securiser
  14
  15 if (defined("_TEST_DIRS")) return;
  16 define("_TEST_DIRS", "1");
  17
  18 include_spip('inc/minipres');
  19 include_spip('inc/lang');
  20 utiliser_langue_visiteur();
  21
  22 //
  23 // Tente d'ecrire
  24 //
  25 // http://doc.spip.org/@test_ecrire
  26 function test_ecrire($my_dir) {
  27         static $chmod = 0;
  28
  29         $ok = false;
  30         $script = @file_exists('spip_loader.php') ? 'spip_loader.php' : $_SERVER['PHP_SELF'];
  31         $self = basename($script);
  32         $uid = @fileowner('.');
  33         $uid2 = @fileowner($self);
  34         $gid = @filegroup('.');
  35         $gid2 = @filegroup($self);
  36         $perms = @fileperms($self);
  37
  38         // Comparer l'appartenance d'un fichier cree par PHP
  39         // avec celle du script et du repertoire courant
  40         if(!$chmod) {
  41                 @rmdir('test');
  42                 @unlink('test'); // effacer au cas ou
  43                 @touch('test');
  44                 if ($uid > 0 && $uid == $uid2 && @fileowner('test') == $uid)
  45                         $chmod = 0700;
  46                 else if ($gid > 0 && $gid == $gid2 && @filegroup('test') == $gid)
  47                         $chmod = 0770;
  48                 else
  49                         $chmod = 0777;
  50                 // Appliquer de plus les droits d'acces du script
  51                 if ($perms > 0) {
  52                         $perms = ($perms & 0777) | (($perms & 0444) >> 2);
  53                         $chmod |= $perms;
  54                 }
  55                 @unlink('test');
  56         }
  57         // Verifier que les valeurs sont correctes
  58         $f = @fopen($my_dir.'test.php', 'w');
  59         if ($f) {
  60                 @fputs($f, '<'.'?php $ok = true; ?'.'>');
  61                 @fclose($f);
  62                 @chmod($my_dir.'test.php', $chmod);
  63                 include($my_dir.'test.php');
  64         }
  65         @unlink($my_dir.'test.php');
  66         return $ok?$chmod:false;
  67 }
  68
  69 //
  70 // tester les droits en ecriture sur les repertoires
  71 // rajouter celui passer dans l'url ou celui du source (a l'installation)
  72 //
  73
  74 // http://doc.spip.org/@action_test_dirs_dist
  75 function action_test_dirs_dist()
  76 {
  77   global $test_dir, $test_dirs;
  78   $chmod = 0;
  79
  80 if ($test_dir) {
  81   if (!ereg("/$", $test_dir)) $test_dir .= '/';
  82   if (!in_array($test_dir, $test_dirs)) $test_dirs[] = $test_dir;
  83  }
  84 else {
  85         if (!_FILE_CONNECT)
  86           $test_dirs[] = dirname(_FILE_CONNECT_INS).'/';
  87 }
  88
  89 $bad_dirs = array();
  90 $absent_dirs  = array();;
  91
  92 while (list(, $my_dir) = each($test_dirs)) {
  93         $test = test_ecrire($my_dir);
  94         if (!test_ecrire($my_dir)) {
  95                 if (@file_exists($my_dir)) {
  96                                 $bad_dirs[] = "<li>".$my_dir."</li>";
  97                 } else
  98                         $absent_dirs[] = "<li>".$my_dir."</li>";
  99         }
 100         $chmod = max($chmod, $test);
 101 }
 102
 103 if ($bad_dirs OR $absent_dirs) {
 104
 105         if (!_FILE_CONNECT) {
 106                 $titre = _T('dirs_preliminaire');
 107                 $continuer = ' '._T('dirs_commencer') . '.';
 108         } else
 109                 $titre = _T('dirs_probleme_droits');
 110
 111
 112         $res = "<div align='right'>". menu_langues('var_lang_ecrire')."</div>\n";
 113
 114         if ($bad_dirs) {
 115                 $res .=
 116                   _T('dirs_repertoires_suivants',
 117                            array('bad_dirs' => join(" ", $bad_dirs))) .
 118                         "<b>". _T('login_recharger')."</b>.";
 119         }
 120
 121         if ($absent_dirs) {
 122                 $res .=
 123                         _T('dirs_repertoires_absents',
 124                            array('bad_dirs' => join(" ", $absent_dirs))) .
 125                         "<b>". _T('login_recharger')."</b>.";
 126         }
 127
 128         $res = "<p>" . $continuer  . $res . aide ("install0") . "</p>" .
 129           "<form action='" . generer_url_action('test_dirs') . "'>" .
 130            "<input type='hidden' name='action' value='test_dirs' />" .
 131           (!$test_dir ? "" :
 132            "<input type='hidden' name='test_dir' value='$test_dir' />") .
 133           "<div align='right'><input type='submit' class='fondl' value='".
 134           _T('login_recharger')."' /></div>" .
 135           "</form>";
 136         echo minipres($titre, $res);
 137
 138  } else {
 139         if (!_FILE_CONNECT)
 140           header("Location: " . generer_url_ecrire("install", "etape=1&chmod=".$chmod, true));
 141         else
 142                 header("Location: " . _DIR_RESTREINT_ABS);
 143  }
 144 }
 145 ?>