Code: 
/* ------------------------------------------------------------------------- */

function getlist ($directory) {
	global $delim, $win;

	if ($d = @opendir($directory)) {

		while (($filename = @readdir($d)) !== false) {
	if ($filename == '.' && $filename == '..')
       		continue;

					$path = $directory . $filename;
				
				if ($stat = @lstat($path)) {
	
					$file = array(
						'filename'    => $filename,
						'path'        => $path,
						'is_file'     => @is_file($path),
						'is_dir'      => @is_dir($path),
						'is_link'     => @is_link($path),
						'is_readable' => @is_readable($path),
						'is_writable' => @is_writable($path),
						'size'        => $stat['size'],
						'mtime'       => @filemtime($path),
						'atime'       => @fileatime($path),
						'ctime'       => @filectime($path)
					);
	
					if ($file['is_dir']) {
						$file['is_executable'] = @file_exists($path . $delim . '.');
					} else {
						if (!$win) {
							$file['is_executable'] = @is_executable($path);
						} else {
							$file['is_executable'] = true;
						}
					}
	
					if ($file['is_link']) $file['target'] = @readlink($path);
	
					$files[] = $file;
				}
			
		}

		return $files;

	} else {
		return false;
	}

}

Looks like the same