$last) {
$last = $number[1];
}
}
}
closedir ($handle);
return ($last);
}
#
# main
#
$page = isset($_GET['page']) ? $_GET['page'] : "1";
$file = basename (__FILE__, ".php");
$dir = dirname (__FILE__);
$url = parse_url( $_SERVER['REQUEST_URI']);
$link = $url['path'];
echo "
$file: part $page ";
?>
Whooops, the page variable must be an integer. Sorry.
>
Whooops, that page doesn't seem to exist. Sorry.
", ucwords($file), "
Part $page
";
$p = $dir . "/" . $file . ($page-1);
$n = $dir . "/" . $file . ($page+1);
if (file_exists($p)) {
$prev = $link . "?page=" . ($page - 1);
$prev = "<Back (" . ($page - 1) . ")";
} else {
$prev = "Back";
}
if (file_exists($n)) {
$next = $link . "?page=" . ($page + 1);
$next = "Next (" . ($page + 1) . ")>";
} else {
$next = "Next";
}
if ($page != 1) {
$first = "<<First ";
} else {
$first = "First ";
}
$lastpage = lastgen($dir, $file . "([[:digit:]]+)");
if ($page != $lastpage) {
$last = " Last ($lastpage)>>";
} else {
$last = " Last";
}
echo "$first $prev $next $last";
echo "
";
# insert the actual file
readfile ($dir . "/" . $file . $page);
echo "
";
echo "$first $prev $next $last";
}
?>
", "", $line);
$line = preg_replace ("",
"$mtime", $line);
echo $line;
}
?>