[Sommaire] [Imprimer]

   1  <?php
   2  // +----------------------------------------------------------------------+

   3  // | PHP Version 4                                                        |

   4  // +----------------------------------------------------------------------+

   5  // | Copyright (c) 1997-2004 The PHP Group                                |

   6  // +----------------------------------------------------------------------+

   7  // | This source file is subject to version 3.0 of the PHP license,       |

   8  // | that is bundled with this package in the file LICENSE, and is        |

   9  // | available at through the world-wide-web at                           |

  10  // | http://www.php.net/license/3_0.txt.                                  |

  11  // | If you did not receive a copy of the PHP license and are unable to   |

  12  // | obtain it through the world-wide-web, please send a note to          |

  13  // | license@php.net so we can mail you a copy immediately.               |

  14  // +----------------------------------------------------------------------+

  15  // | Authors: Aidan Lister <aidan@php.net>                                |

  16  // +----------------------------------------------------------------------+

  17  //

  18  // $Id: scandir.php,v 1.18 2005/01/26 04:55:13 aidan Exp $

  19  
  20  
  21  /**

  22   * Replace scandir()

  23   *

  24   * @category    PHP

  25   * @package     PHP_Compat

  26   * @link        http://php.net/function.scandir

  27   * @author      Aidan Lister <aidan@php.net>

  28   * @version     $Revision: 1.18 $

  29   * @since       PHP 5

  30   * @require     PHP 4.0.0 (user_error)

  31   */
  32  if (!function_exists('scandir')) {
  33      function scandir($directory, $sorting_order = 0)
  34      {
  35          if (!is_string($directory)) {
  36              user_error('scandir() expects parameter 1 to be string, ' .
  37                  gettype($directory) . ' given', E_USER_WARNING);
  38              return;
  39          }
  40  
  41          if (!is_int($sorting_order) && !is_bool($sorting_order)) {
  42              user_error('scandir() expects parameter 2 to be long, ' .
  43                  gettype($sorting_order) . ' given', E_USER_WARNING);
  44              return;
  45          }
  46  
  47          if (!is_dir($directory) || (false === $fh = @opendir($directory))) {
  48              user_error('scandir() failed to open dir: Invalid argument', E_USER_WARNING);
  49              return false;
  50          }
  51  
  52          $files = array ();
  53          while (false !== ($filename = readdir($fh))) {
  54              $files[] = $filename;
  55          }
  56  
  57          closedir($fh);
  58  
  59          if ($sorting_order == 1) {
  60              rsort($files);
  61          } else {
  62              sort($files);
  63          }
  64  
  65          return $files;
  66      }
  67  }
  68  
  69  ?>