function getDocumentRoot()
{
global $DOCUMENT_ROOT, $PATH_TRANSLATED, $PATH_INFO;
if ( !isset($DOCUMENT_ROOT) ) {
// Check if we have $PATH_TRANSLATED and $PATH_INFO. We need them!
if ( isset($PATH_TRANSLATED) && isset($PATH_INFO) ) {
// In $PATH_TRANSLATED dirs are separated by escaped backslashes
// (`\\') ,in $PATH_INFO in Unix style by slashes (`/'). So we
// convert the former to the latter.
$pt = str_replace("\\\\", "/", $PATH_TRANSLATED);
// Now we cut off $PATH_INFO from $PATH_TRANSLATED's tail
// and get the physical path to the topmost dir of the site.
$l = strlen($pt) - strlen($PATH_INFO);
$DOCUMENT_ROOT = substr($pt, 0, $l);
}
// is there an else?
}
return $DOCUMENT_ROOT;
}
?>