Not Found

The requested URL /ht-php/linkpage was not found on this server.

"); } include("machine.inc"); echo "\n\nMy favourite sites!\n\n\n"; echo "My favourite sites on Allweb Sweden AB:

\n"; $data = file($zdVhosts); foreach($data as $line) { if(strpos($line, "ServerName") !== false) { $server = trim(substr($line, 11)); if(strpos($server, "rojekt") && strpos($server, ".allweb.se")) { // no } elseif(strpos($server, "17.73.97") || strpos($server, "test.") === 0 || strpos($server, "redirect.") === 0 || strpos($server, "gold10.com") !== false || strpos($server, "mail.") === 0 || $server == "wcal.allweb.se") { // no } elseif(in_array($server, $excluders) || in_array("www.".$server, $excluders)) { // no } else { $p = strpos($server, ">"); if($p) $server = trim(substr($server, 0, $p - 1)); $ix = @file("/www/normal/$server/index.html"); if(!$ix) $ix = @file("/www/normal/$server/index.htm"); if($ix) { $tit = 0; $t = ""; foreach($ix as $ixrad) { $ixrad = trim($ixrad); if($ixrad != "") { if(($p = strpos(strtoupper($ixrad), "")) !== false) { $tit = 1; $tt = substr($ixrad, $p + 7); if(($p = strpos(strtoupper($tt), "<")) !== false) { $tt = substr($tt, 0, $p); $tit = 2; } $t .= $tt; } elseif(($p = strpos(strtoupper($ixrad), "<")) !== false && $tit == 1) { $t .= substr($ixrad, 0, $p); $tit = 2; } elseif($tit == 1) { $t .= $titrad; } } } if($t != "") $nfo = " - " . trim($t); else $nfo = ""; } else $nfo = ""; echo "<A HREF=\"http://" . $server . "\">" . $server . $nfo . "</A><BR>\n"; } } elseif(strpos($line, "ServerAlias") !== false) { // Den automatskapade httpd.conf går i ordningen: // ServerAdmin, ServerAlias, ServerName så det är inte lätt att veta riktiga domännamnet= // mappen=kunna läsa $nfo från index här, om man inte parsar mer intelligent efter taggarna // <Virtualhost> etc, vilket jag tycker är overkill, så $nfo blir "" för alla alias. $nfo = ""; $xaliases = explode(" ", substr($line, 12)); $aliases = Array(); foreach($xaliases as $alias) { $alias = trim($alias); if(in_array($alias, $excluders) || in_array("www.".$alias, $excluders)) { // no } elseif(substr($alias, 0, 2) != "*." && $alias != "") { $aliases[] = $alias; } } foreach($aliases as $alias) { if(!in_array("www.".$alias, $aliases)) { // www-kollen tar bara bort dubbla på alias, inte den extra www. i alias som är samma som servername men det får man leva med echo "<A HREF=\"http://" . $alias . "\">" . $alias . $nfo . "</A><BR>\n"; } } } } echo "</BODY>\n</HTML>\n"; ?>