$current = $_GET["current"];
$current_item = $_GET["item"];
$dh = opendir(".");
$global = array();
$global_names = array();
while (false !== ($filename = readdir($dh))) {
if (($filename != ".") && ($filename != "..") && is_dir($filename)) {
$dhl = opendir($filename);
$filenames = array();
while (false !== ($local = readdir($dhl))) {
if (($local != ".") && ($local != "..")) {
list ($key, $local) = explode ("_", $local);
list ($local, $ext) = explode (".", $local);
if (is_numeric($key)) $filenames[$key] = $local;
}
}
ksort ($filenames);
list ($key, $filename) = explode ("_", $filename);
if (is_numeric($key)) {
$global[$key] = $filenames;
$global_names[$key] = $filename;
}
closedir($dhl);
}
}
closedir($dh);
ksort($global);
ksort($global_names);
if ($current == "") {
$keys = array_keys($global_names);
$current_key = $keys[0];
$current = $global_names[$current_key];
} else {
$current_key = array_search($current, $global_names);
}
if ($current_item == "") {
$keys = array_keys($global[$current_key]);
$current_item_key = $keys[0];
$current_item = $global[$current_key][$current_item_key];
} else {
$current_item_key = array_search($current_item, $global[$current_key]);
}
/*
echo "ck $current_key, cik $current_item_key\n";
foreach ($global_names as $key => $value) {
echo "Key $key $value
\n";
$dir = $global[$key];
foreach ($dir as $k => $v) {
echo "-- $k $v
\n";
}
}
*/
?>