[Sommaire] [Imprimer]

   1  <?php
   2  /**
   3   * Information and debugging functions
   4   *
   5   * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
   6   * @author     Andreas Gohr <andi@splitbrain.org>
   7   */
   8  if(!defined('DOKU_INC')) define('DOKU_INC',realpath(dirname(__FILE__).'/../').'/');
   9  if(!defined('DOKU_MESSAGEURL')) define('DOKU_MESSAGEURL','http://update.dokuwiki.org/check/');
  10  require_once (DOKU_INC.'inc/HTTPClient.php');
  11  
  12  /**
  13   * Check for new messages from upstream
  14   *
  15   * @author Andreas Gohr <andi@splitbrain.org>
  16   */
  17  function checkUpdateMessages(){
  18      global $conf;
  19      global $INFO;
  20      if(!$conf['updatecheck']) return;
  21      if($conf['useacl'] && $INFO['perm'] < AUTH_ADMIN) return;
  22  
  23      $cf = $conf['cachedir'].'/messages.txt';
  24      $lm = @filemtime($cf);
  25  
  26      // check if new messages needs to be fetched
  27      if($lm < time()-(60*60*24) || $lm < @filemtime(DOKU_CONF.'msg')){
  28          $num = @file(DOKU_CONF.'msg');
  29          $num = is_array($num) ? (int) $num[0] : 0;
  30          $http = new DokuHTTPClient();
  31          $http->timeout = 8;
  32          $data = $http->get(DOKU_MESSAGEURL.$num);
  33          io_saveFile($cf,$data);
  34      }else{
  35          $data = io_readFile($cf);
  36      }
  37  
  38      // show messages through the usual message mechanism
  39      $msgs = explode("\n%\n",$data);
  40      foreach($msgs as $msg){
  41          if($msg) msg($msg,2);
  42      }
  43  }
  44  
  45  
  46  /**
  47   * Return DokuWikis version
  48   *
  49   * @author Andreas Gohr <andi@splitbrain.org>
  50   */
  51  function getVersion(){
  52    //import version string
  53    if(@file_exists('VERSION')){
  54      //official release
  55      return 'Release '.trim(io_readfile(DOKU_INC.'/VERSION'));
  56    }elseif(is_dir('_darcs')){
  57      //darcs checkout - read last 2000 bytes of inventory
  58      $sz   = filesize('_darcs/inventory');
  59      $seek = max(0,$sz-2000);
  60      $fh   = fopen('_darcs/inventory','rb');
  61      fseek($fh,$seek);
  62      $chunk = fread($fh,2000);
  63      fclose($fh);
  64      $inv = preg_grep('#\*\*\d{14}[\]$]#',explode("\n",$chunk));
  65      $cur = array_pop($inv);
  66      preg_match('#\*\*(\d{4})(\d{2})(\d{2})#',$cur,$matches);
  67      return 'Darcs '.$matches[1].'-'.$matches[2].'-'.$matches[3];
  68    }else{
  69      return 'snapshot?';
  70    }
  71  }
  72  
  73  /**
  74   * Run a few sanity checks
  75   *
  76   * @author Andreas Gohr <andi@splitbrain.org>
  77   */
  78  function check(){
  79    global $conf;
  80    global $INFO;
  81  
  82    msg('DokuWiki version: '.getVersion(),1);
  83  
  84    if(version_compare(phpversion(),'4.3.3','<')){
  85      msg('Your PHP version is too old ('.phpversion().' vs. 4.3.3+ recommended)',-1);
  86    }elseif(version_compare(phpversion(),'4.3.10','<')){
  87      msg('Consider upgrading PHP to 4.3.10 or higher for security reasons (your version: '.phpversion().')',0);
  88    }else{
  89      msg('PHP version '.phpversion(),1);
  90    }
  91  
  92    if(is_writable($conf['changelog'])){
  93      msg('Changelog is writable',1);
  94    }else{
  95      if (@file_exists($conf['changelog'])) {
  96        msg('Changelog is not writable',-1);
  97      }
  98    }
  99  
 100    if (isset($conf['changelog_old']) && @file_exists($conf['changelog_old'])) {
 101      msg('Old changelog exists', 0);
 102    }
 103  
 104    if (@file_exists($conf['changelog'].'_failed')) {
 105      msg('Importing old changelog failed', -1);
 106    } else if (@file_exists($conf['changelog'].'_importing')) {
 107      msg('Importing old changelog now.', 0);
 108    } else if (@file_exists($conf['changelog'].'_import_ok')) {
 109      msg('Old changelog imported', 1);
 110      if (!plugin_isdisabled('importoldchangelog')) {
 111        msg('Importoldchangelog plugin not disabled after import', -1);
 112      }
 113    }
 114  
 115    if(is_writable($conf['datadir'])){
 116      msg('Datadir is writable',1);
 117    }else{
 118      msg('Datadir is not writable',-1);
 119    }
 120  
 121    if(is_writable($conf['olddir'])){
 122      msg('Attic is writable',1);
 123    }else{
 124      msg('Attic is not writable',-1);
 125    }
 126  
 127    if(is_writable($conf['mediadir'])){
 128      msg('Mediadir is writable',1);
 129    }else{
 130      msg('Mediadir is not writable',-1);
 131    }
 132  
 133    if(is_writable($conf['cachedir'])){
 134      msg('Cachedir is writable',1);
 135    }else{
 136      msg('Cachedir is not writable',-1);
 137    }
 138  
 139    if(is_writable($conf['lockdir'])){
 140      msg('Lockdir is writable',1);
 141    }else{
 142      msg('Lockdir is not writable',-1);
 143    }
 144  
 145    if(is_writable(DOKU_CONF.'users.auth.php')){
 146      msg('conf/users.auth.php is writable',1);
 147    }else{
 148      msg('conf/users.auth.php is not writable',0);
 149    }
 150  
 151    if(function_exists('mb_strpos')){
 152      if(defined('UTF8_NOMBSTRING')){
 153        msg('mb_string extension is available but will not be used',0);
 154      }else{
 155        msg('mb_string extension is available and will be used',1);
 156      }
 157    }else{
 158      msg('mb_string extension not available - PHP only replacements will be used',0);
 159    }
 160  
 161    if($conf['allowdebug']){
 162      msg('Debugging support is enabled. If you don\'t need it you should set $conf[\'allowdebug\'] = 0',-1);
 163    }else{
 164      msg('Debugging support is disabled',1);
 165    }
 166  
 167    msg('Your current permission for this page is '.$INFO['perm'],0);
 168  
 169    if(is_writable($INFO['filepath'])){
 170      msg('The current page is writable by the webserver',0);
 171    }else{
 172      msg('The current page is not writable by the webserver',0);
 173    }
 174  
 175    if($INFO['writable']){
 176      msg('The current page is writable by you',0);
 177    }else{
 178      msg('The current page is not writable by you',0);
 179    }
 180  }
 181  
 182  /**
 183   * print a message
 184   *
 185   * If HTTP headers were not sent yet the message is added
 186   * to the global message array else it's printed directly
 187   * using html_msgarea()
 188   *
 189   *
 190   * Levels can be:
 191   *
 192   * -1 error
 193   *  0 info
 194   *  1 success
 195   *
 196   * @author Andreas Gohr <andi@splitbrain.org>
 197   * @see    html_msgarea
 198   */
 199  function msg($message,$lvl=0,$line='',$file=''){
 200    global $MSG;
 201    $errors[-1] = 'error';
 202    $errors[0]  = 'info';
 203    $errors[1]  = 'success';
 204    $errors[2]  = 'notify';
 205  
 206    if($line || $file) $message.=' ['.basename($file).':'.$line.']';
 207  
 208    if(!headers_sent()){
 209      if(!isset($MSG)) $MSG = array();
 210      $MSG[]=array('lvl' => $errors[$lvl], 'msg' => $message);
 211    }else{
 212      $MSG = array();
 213      $MSG[]=array('lvl' => $errors[$lvl], 'msg' => $message);
 214      if(function_exists('html_msgarea')){
 215        html_msgarea();
 216      }else{
 217        print "ERROR($lvl) $message";
 218      }
 219    }
 220  }
 221  
 222  /**
 223   * print debug messages
 224   *
 225   * little function to print the content of a var
 226   *
 227   * @author Andreas Gohr <andi@splitbrain.org>
 228   */
 229  function dbg($msg,$hidden=false){
 230    (!$hidden) ? print '<pre class="dbg">' : print "<!--\n";
 231    print_r($msg);
 232    (!$hidden) ? print '</pre>' : print "\n-->";
 233  }
 234  
 235  /**
 236   * Print info to a log file
 237   *
 238   * @author Andreas Gohr <andi@splitbrain.org>
 239   */
 240  function dbglog($msg){
 241    global $conf;
 242    $file = $conf['cachedir'].'/debug.log';
 243    $fh = fopen($file,'a');
 244    if($fh){
 245      fwrite($fh,date('H:i:s ').$_SERVER['REMOTE_ADDR'].': '.$msg."\n");
 246      fclose($fh);
 247    }
 248  }
 249