View file masterwap/main.php

<?php

/*
/////////////////////////////////////////////
// Автор: TDR                              //
// ICQ: 563-1991-59                        //
// E-mail: [email protected]                   //
// Сайт: gens.wup.ru  Все для WAP-мастеров //
/////////////////////////////////////////////
*/


define('_IN_JOHNCMS', 1);
$textl = 'Сканер сайта';
require_once ("../incfiles/core.php");
require_once ("../incfiles/head.php");

if($_GET['adr']){
$adr = htmlspecialchars($_GET['adr']);
}

$parse_adr = parse_url($adr);

if($parse_adr['query']){
$parse_adr['query'] = '?'.$parse_adr['query'];
}

$host = $parse_adr['host'];
$path = $parse_adr['path'].$parse_adr['query'];
if(preg_match("/^[a-zA-Z_0-9\-^\.]+\.[a-z]{2,4}+$/i", $parse_adr['host']))
{

$fp = fsockopen($host,80,$errno,$errstr,10);
if(!$fp){
print '<div class="red">Error ('.$errno.')<br/></div>';
exit;
require_once ("../incfiles/end.php");
}
if($path){
$headers = "GET $path HTTP/1.0\r\n";
}
else{
$headers = "GET / HTTP/1.0\r\n";
}
$headers .= "Host: $host\r\n";
$headers .= "Accept: */*\r\n";
$headers .= "Accept-Charset: UTF-8\r\n";
$headers .= "Accept-Language: ru\r\n";
$headers .= "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; ru) Opera 8.01\r\n\r\n";
fwrite($fp,$headers);
//while($text != "\r\n") $text = fgets($fp,128);
//$text = '';
while(!feof($fp)){
$text.=fgets($fp,1024);
}
fclose($fp);


$ip = gethostbynamel($parse_adr['host']);
if($ip){
foreach($ip as $index => $val){
$ip.= $val.'<br/>';
}
}
else{
$ip = 'Не определено<br/>';
}
$kod = nl2br(htmlspecialchars($text));

print '<div>'.$kod.'</div>
<div class="menu">
<strong>Адрес</strong>: '.$adr.'<br/>
</div>
<div class="telo">
<strong>IP</strong>: '.$ip.'
</div>';
}
else{
print '<div class="red">Не верно введён адрес!<br/></div>';
}

require_once ("../incfiles/end.php");
?>