New version submitted by TomB
[carbonphp.git] / Source / carbon / utilities / directory_utility.php
blob0b7b69fb1b6f575b46e54e11369628b5de3b5843
1 <?php
2 /*------------------------------------------------------------
3 * CarbonPHP framework (C) Tom Bell
4 * http://tombell.org.uk
5 *------------------------------------------------------------*/
7 if (!defined('CARBON_PATH'))
9 exit('Direct script access is not allowed.');
12 if (!function_exists('directory_map'))
14 function directory_map($source_dir, $top_level_only = false)
16 if ($fp = @opendir($source_dir))
18 $filedata = array();
20 while (($file = readdir($fp)) !== false)
22 if (@is_dir($source_dir . $file) && substr($file, 0, 1) != '.' && $top_level_only == false)
24 $temp_array = array();
25 $temp_array = directory_map($source_dir . $file . '/');
26 $filedata[$file] = $temp_array;
28 else if (substr($file, 0, 1) != '.')
30 $filedata[] = $file;
34 return $filedata;