| 1 |
pjm2 |
1.1 |
<? |
| 2 |
|
|
|
| 3 |
tdb |
1.3 |
# |
| 4 |
|
|
# i-scream central monitoring system |
| 5 |
tdb |
1.5 |
# http://www.i-scream.org |
| 6 |
tdb |
1.3 |
# Copyright (C) 2000-2002 i-scream |
| 7 |
|
|
# |
| 8 |
|
|
# This program is free software; you can redistribute it and/or |
| 9 |
|
|
# modify it under the terms of the GNU General Public License |
| 10 |
|
|
# as published by the Free Software Foundation; either version 2 |
| 11 |
|
|
# of the License, or (at your option) any later version. |
| 12 |
|
|
# |
| 13 |
|
|
# This program is distributed in the hope that it will be useful, |
| 14 |
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 15 |
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 16 |
|
|
# GNU General Public License for more details. |
| 17 |
|
|
# |
| 18 |
|
|
# You should have received a copy of the GNU General Public License |
| 19 |
|
|
# along with this program; if not, write to the Free Software |
| 20 |
|
|
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
| 21 |
|
|
# |
| 22 |
|
|
|
| 23 |
pjm2 |
1.1 |
# return an array of subdirectories from a directory. |
| 24 |
|
|
function getdirArray($dir='./',$sort='asort') { |
| 25 |
|
|
global $dir_file_count; |
| 26 |
|
|
if ( is_dir($dir) ) { |
| 27 |
|
|
$fd = @opendir($dir); |
| 28 |
|
|
while ( ($part = @readdir($fd)) == TRUE ) { |
| 29 |
|
|
clearstatcache(); |
| 30 |
|
|
if ($part != "." && $part != "..") { |
| 31 |
|
|
$dir_array[] = $part; |
| 32 |
|
|
} |
| 33 |
|
|
} |
| 34 |
|
|
if($fd == TRUE) { |
| 35 |
|
|
closedir($fd); |
| 36 |
|
|
} |
| 37 |
tdb |
1.7 |
if (isset($dir_array) && is_array($dir_array)) { |
| 38 |
pjm2 |
1.1 |
$sort($dir_array); |
| 39 |
|
|
$dir_file_count = count($dir_array); |
| 40 |
|
|
Return $dir_array; |
| 41 |
|
|
} else { |
| 42 |
|
|
Return FALSE; |
| 43 |
|
|
} |
| 44 |
|
|
} else { |
| 45 |
|
|
Return FALSE; |
| 46 |
|
|
} |
| 47 |
|
|
} |
| 48 |
|
|
|
| 49 |
tdb |
1.6 |
?> |
