<?php

// $CVSHeader: _freebeer/www/demo/HTTP.PathInfo(2).php,v 1.3 2004/03/08 04:29:18 ross Exp $

// Copyright (c) 2002-2004, Ross Smith.  All rights reserved.
// Licensed under the BSD or LGPL License. See license.txt for details.

// \todo fix wget's continuously reporting "End of file while parsing headers."
if (preg_match('/wget/i'$_SERVER['HTTP_USER_AGENT'])) {
    echo 
"<html><body></body></html>";
    exit(
0);
}

require_once 
'./_demo.php';

require_once 
FREEBEER_BASE '/lib/HTTP/PathInfo.php';

echo 
html_header_demo('HTTP/PathInfo class tester'nullnullfalse);

/// \todo move to separate file

function _url($url) {
    return 
sprintf("<a href=\"%s\">%s</a><br />\n"$url$url);
}

function 
url($_url) {
    
$url fbHTTP_PathInfo::fixRelativeURL($_url);
    return 
_url($url);
}

echo 
"<pre>";

echo 
"<html>\n<head>\n</head>\n<body>\n";
echo 
"Absolute:";

echo 
url('/index.php');
echo 
"Relative (broken):";
echo 
_url('index.php');
echo 
"Relative (fixed):";
echo 
url('index.php');

$a $_SERVER;
ksort($a);
print_r($a);

echo 
date('r');

echo 
"</body>\n</html>\n";

?>