IP地址定位函数

对IpLocation类进行了封装，方便调用。默认使用的是gbk纯真IP地址库文件QQWry。

function IP($ip='',$charset='gbk',$file='QQWry.dat') {

    static $_ip    =    array();

    if(isset($_ip[$ip])) {

        return $_ip[$ip];

    }else{

        import("ORG.Net.IpLocation");

        $iplocation =   new IpLocation($file);

        $location   =   $iplocation->getlocation($ip);

        $_ip[$ip]    =    $location['country'].$location['area'];

    }

    if('utf-8' != $charset) {

        $_ip[$ip] = iconv($charset,'utf-8',$_ip[$ip]);

    }

    return $_ip[$ip];

}