[Sommaire] [Imprimer]

   1  <?php
   2  # ***** BEGIN LICENSE BLOCK *****
   3  # This file is part of DotClear.
   4  # Copyright (c) 2004 Olivier Meunier and contributors. All rights
   5  # reserved.
   6  #
   7  # DotClear is free software; you can redistribute it and/or modify
   8  # it under the terms of the GNU General Public License as published by
   9  # the Free Software Foundation; either version 2 of the License, or
  10  # (at your option) any later version.
  11  # 
  12  # DotClear is distributed in the hope that it will be useful,
  13  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  # GNU General Public License for more details.
  16  # 
  17  # You should have received a copy of the GNU General Public License
  18  # along with DotClear; if not, write to the Free Software
  19  # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  #
  21  # ***** END LICENSE BLOCK *****
  22  
  23  /* Missing functions
  24  source : http://pear.php.net/package/PHP_Compat
  25  */
  26  
  27  /* files_get_contents */
  28  if (!function_exists('file_get_contents'))
  29  {
  30  	function file_get_contents($filename, $incpath = false, $resource_context = null)
  31      {
  32          if (false === $fh = fopen($filename, 'rb', $incpath))
  33          {
  34              trigger_error('file_get_contents() failed to open stream: No such file or directory', E_USER_WARNING);
  35              return false;
  36          }
  37          clearstatcache();
  38          if ($fsize = filesize($filename))
  39          {
  40              $data = fread($fh, $fsize);
  41          }
  42          else
  43          {
  44              while (!feof($fh)) {
  45                  $data .= fread($fh, 8192);
  46              }
  47          }
  48          fclose($fh);
  49          return $data;
  50      }
  51  }
  52  
  53  if (!function_exists('is_a'))
  54  {
  55  	function is_a($obj, $classname)
  56      {
  57          if (strtolower(get_class($obj)) == strtolower($classname)) {
  58              return true;
  59          } else {
  60              return(is_subclass_of($obj, $classname));
  61          }
  62      }
  63  }
  64  ?>