1，php代码部分

<?php
/**
* 获取网站地理位置
* 获取网站操作系统信息
* edit by www.
*/
error_reporting(E_ERROR);
header(“content-Type: text/html; charset=gb2312″);
set_time_limit(120);
$host = isset($_POST['url']) ? chop(str_replace(‘http://’,”,$_POST['url'])) : ‘ www.2cto.com ’;
$port = isset($_POST['duankou']) ? chop($_POST['duankou']) : ’80′;
$num  = 10;
function microtime_float()
{
        list($usec, $sec) = explode(” “, microtime());
        return ((float)$usec + (float)$sec);
}
function ip138($url)
{
        $host = ‘www.ip138.com’;
        $fp = @fsockopen($host,80,&$errno,&$errstr,3);
        $get = “GET /ips.asp?ip=”.$url.” HTTP/1.1\r\nHost:”.$host.”\r\nConnection: Close\r\n\r\n”;
        @fputs($fp,$get);
        $data = ”;
        while ($fp && !feof($fp))
        $data .= fread($fp, 1024);
        @fclose($fp);
        $s1 = ‘\<table width\=\”80\%\”  border\=\”0\” align\=\”center”\ cellpadding\=\”0\” cellspacing\=\”0\”\>’;
        $s2 = ‘\<\/table\>’;
        $tmp = array();
        preg_match_all(“/”.$s1.”([^~]*?)”.$s2.”/i”,$data,$tmp);
        $tmp1 = array();
        preg_match_all(“/\<li\>([^~]*?)\<\/li\>/i”,$tmp[0][0],$tmp1);
        return $tmp1[0][0].$tmp1[0][1].$tmp1[0][2];
}
function getsoft($host,$port)
{
        $fp = @fsockopen($host,$port,&$errno,&$errstr,3);
        if(!$fp) return ‘unknown’;
        $get = “GET / HTTP/1.1\r\nHost:”.$host.”\r\nConnection: Close\r\n\r\n”;
        @fputs($fp,$get);
        $data = ”;
        while ($fp && !feof($fp))
        $data .= fread($fp, 1024);
        @fclose($fp);
        $array = explode(“\n”,$data);
        $k = 2;
        for($i = 0;$i < 20;$i++)
        {
                if(stristr($array[$i],’Server’)){$k = $i; break;}
        }
        if(!stristr($array[$k],’Server’)) return ‘unknown’;
        else return str_replace(‘Server’,'服务器软件’,$array[$k]);
}
function ping($host,$port)
{
        $time_start = microtime_float();
        $ip = gethostbyname($host);
        $fp = @fsockopen($host,$port,&$errno,&$errstr,1);
        if(!$fp) return ‘Request timed out.<br />’.”\r\n”;
        $get = “GET / HTTP/1.1\r\nHost:”.$host.”\r\nConnection: Close\r\n\r\n”;
        @fputs($fp,$get);
        @fclose($fp);
        $time_end = microtime_float();
        $time = $time_end – $time_start;
        $time = ceil($time * 1000);
        return ‘Reply from ‘.$ip.’: time=’.$time.’ms<br />’;
}
if(isset($_POST['url']) && isset($_POST['duankou']))
{
        echo ip138($host).’<br /><br />’;
        echo ‘<font color=”#FF0000″>’.getsoft($host,$port).’</font><br /><br />’;
        echo ‘Pinging ‘.$host.’ ['.gethostbyname($host).'] with Port:’.$port.’ of data:<br /><br />’.”\r\n”;
        ob_flush();
        flush();
        for($i = 0;$i < $num;$i++)
        {
                echo ping($host,$port);
                ob_flush();
                flush();
                sleep(1);
        }
}
?>

2，页面内容部分

<form method=”POST”>
域名/IP：<input type=”text” name=”url” value=”<?php echo $host;?>” size=”50″>
端口：<input type=”text” name=”duankou” value=”<?php echo $port;?>” size=”10″>
<input type=”submit” value=”ping”>
</form>

$_SERVER参数详细说明：
 

举个例子吧，如下：

<?php
//$_SERVER用例参考
//edit by www.
echo $_SERVER['HTTP_ACCEPT_LANGUAGE']; //浏览器语言 
echo $_SERVER['REMOTE_ADDR']; //当前用户 IP 。 
echo $_SERVER['REMOTE_HOST']; //当前用户主机名 
echo $_SERVER['REQUEST_URI']; //URL
echo $_SERVER['HTTP_HOST']; //主机与端口号
echo $_SERVER['SCRIPT_FILENAME']; //脚本绝对路径名
?>

所谓“来路”，即从哪里点击了网站的链接，即，从什么页面连接到当前网站。

在php中，可以借助全局数组变量$_SERVER['HTTP_REFERER']来获取当前页的来路地址。

比如，以下代码路径在http://wwww./a.html，其中有个链接，点击会跳转到demo.php，在demo.php输出来自哪个页面。
<a href="/blog_article/demo.html">获取这个页面的地址</a>

代码：

<?php
echo "来访域名：".$_SERVER['HTTP_REFERER'];
?>

输出结果：
来访域名：http://www./a.html。
有时可能只需要获取到域名和IP即可，那么可以使用parse_url($_SERVER['HTTP_REFERER']);
它将返回一个数组，数组里的键值为host就是域名，而scheme为http,path为剩下的部分（文件路径和文件）。
query为附加在url上的参数。还可以通过gethostbyname获取到这个url的IP地址。

您可能感兴趣的文章：
PHP获取域名的几个全局变量
php 实现dns域名查询的方法详解(图文)
php 从url中获取域名的实例代码
探讨:PHP获取域名及域名IP地址的方法
php获取URL中domain域名的代码一例
PHP正则匹配获取URL中域名的代码
PHP获取当前网址及域名的代码
php正则表达式匹配URL中的域名
PHP调用万网接口实现域名查询的功能