| 1 | pjm2 | 1.1 | <? | 
 
 
 
 
 | 2 |  |  |  | 
 
 
 
 
 
 
 
 | 3 | tdb | 1.3 | # | 
 
 
 
 
 | 4 |  |  | # i-scream central monitoring system | 
 
 
 
 
 | 5 |  |  | # Copyright (C) 2000-2002 i-scream | 
 
 
 
 
 | 6 |  |  | # | 
 
 
 
 
 | 7 |  |  | # This program is free software; you can redistribute it and/or | 
 
 
 
 
 | 8 |  |  | # modify it under the terms of the GNU General Public License | 
 
 
 
 
 | 9 |  |  | # as published by the Free Software Foundation; either version 2 | 
 
 
 
 
 | 10 |  |  | # of the License, or (at your option) any later version. | 
 
 
 
 
 | 11 |  |  | # | 
 
 
 
 
 | 12 |  |  | # This program 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 this program; if not, write to the Free Software | 
 
 
 
 
 | 19 |  |  | # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. | 
 
 
 
 
 | 20 |  |  | # | 
 
 
 
 
 | 21 |  |  |  | 
 
 
 
 
 
 
 
 | 22 | pjm2 | 1.1 | # return an array of subdirectories from a directory. | 
 
 
 
 
 | 23 |  |  | function getdirArray($dir='./',$sort='asort') { | 
 
 
 
 
 | 24 |  |  | global $dir_file_count; | 
 
 
 
 
 | 25 |  |  | if ( is_dir($dir) ) { | 
 
 
 
 
 | 26 |  |  | $fd = @opendir($dir); | 
 
 
 
 
 | 27 |  |  | while ( ($part = @readdir($fd)) == TRUE ) { | 
 
 
 
 
 | 28 |  |  | clearstatcache(); | 
 
 
 
 
 | 29 |  |  | if ($part != "." && $part != "..") { | 
 
 
 
 
 | 30 |  |  | $dir_array[] = $part; | 
 
 
 
 
 | 31 |  |  | } | 
 
 
 
 
 | 32 |  |  | } | 
 
 
 
 
 | 33 |  |  | if($fd == TRUE) { | 
 
 
 
 
 | 34 |  |  | closedir($fd); | 
 
 
 
 
 | 35 |  |  | } | 
 
 
 
 
 | 36 |  |  | if (is_array($dir_array)) { | 
 
 
 
 
 | 37 |  |  | $sort($dir_array); | 
 
 
 
 
 | 38 |  |  | $dir_file_count = count($dir_array); | 
 
 
 
 
 | 39 |  |  | Return $dir_array; | 
 
 
 
 
 | 40 |  |  | } else { | 
 
 
 
 
 | 41 |  |  | Return FALSE; | 
 
 
 
 
 | 42 |  |  | } | 
 
 
 
 
 | 43 |  |  | } else { | 
 
 
 
 
 | 44 |  |  | Return FALSE; | 
 
 
 
 
 | 45 |  |  | } | 
 
 
 
 
 | 46 |  |  | } | 
 
 
 
 
 | 47 |  |  |  | 
 
 
 
 
 
 
 
 | 48 | pjm2 | 1.2 | ?> |