【www.hzclsc.cn--热门资讯】

文件一：index.php



<?php



echo "

\\n\";



/*

    #########################################################################################

    #                                                                                       #

    #  本域名查询系统由mydowns收集整理汉化，汉化归把握时间网站所有(http://www.85time.com)   #

    #  该程序是2001年5月18日发布的最新版本，本站将对此程序继续进行修改完善，敬请关注本站！  #

    #  该程序可以查询域名所有者的详细资料信息，现提供9个类型的域名以供查询！                #

    #  演示地址：http://www.85time.com/whois                                                #

    #  源程序打包下载：http://www.85time.com/mydowns/mydowns.php?id=378                     #

    #  把握时间网站提供PHP、ASP、CGI、HTML、JSP等源程序、电子教材、文章资料                 #

    #  把握时间网站http://www.85time.com  把握时间论坛http://ww.85time.ent                  #

    #  请保留此信息，谢谢！                                                                 #

    #                                                                                       #

    #########################################################################################

    MWhois - a Whois lookup script written in PHP and Perl

    Copyright (C) 2000 Matt Wilson



    This program is free software; you can redistribute it and/or modify

    it under the terms of the GNU General Public License as published by

    the Free Software Foundation; either version 2 of the License, or

    (at your option) any later version.



    This program is distributed in the hope that it will be useful,

    but WITHOUT ANY WARRANTY; without even the implied warranty of

    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    GNU General Public License for more details.



    You should have received a copy of the GNU General Public License

    along with this program; if not, write to the Free Software

    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

*/



if(!isset($use_global_templates))

    $use_global_templates = 1;    // whether to use the global templates



$template_header = \"gheader.tml\";    // the global header template

$template_footer = \"gfooter.tml\";    // the global footer template



/* Template information stuff

  ----------------------------

  The following strings in your templates are replaced with the description;



    [>DOMAIN<] = domain searching for

    [>RAWOUTPUT<] = the raw output of the whois query

    [>WHOIS_SERVER<] = the whois server used

    [>AVAIL_LIST<] = a list of the available domains (in global/wizard search mode)

    [>UNAVAIL_LIST<] = a list of the unavailable domains (in global/wizard search mode)

    [>ERROR_MSG<] = the error message produced

    [>EXT<] = the extension if it is set

    [>EXT_HTML_LIST<] = a list of the extensions supported in a html list

    [>EXT_LIST<] = a list of extensions supported



  parameters to the script (no parameters brings up normal search script);



    show_raw=1    = wherther to show the raw output page

    do_wizard=1    = whether the information being passed is for the wizard

    domain=(string) = do a search for the domain (string)

    list_exts=1    = show the extensions supported page

    do_global=1    = goto the global search page

    do_mini_search=1 = just show the search form without anything else

    company=(string) = used for the wizard, needed in order to search

    keyword1=(string) = used for the wizard, needed in order to search

    keyword2=(string) = used for the wizard, needed in order to search



  If any of this is unclear, see the provided example templates

*/



$template_search_mini = \"searchform.tml\";    // search template

$template_search = \"searchmain.tml\";

$template_raw_output = \"rawoutput.tml\";    // raw output template

$template_available = \"isavail.tml\";    // template for available

$template_taken = \"istaken.tml\";    // template for taken

$template_wizard = \"wizard.tml\";    // template for the domain wizard

$template_wizard_results = \"wizardres.tml\"; // the output template for the domain wizard

$template_error = \"error.tml\";    // the template in case of error

$template_exts_list = \"exts_list.tml\";

$template_global = \"global.tml\";

$template_global_results = \"globres.tml\";



$search_title = \"Let Floyd find your domain name\";

$raw_output_title = \"Floyd\'s Raw WHOIS Output\";

$available_title = \"Floyd says Domain Name Available!\";

$taken_title = \"Floyd says Doman Name in use\";

$wizard_title = \"Floyd the Domain Name Wizard\";

$error_title = \"Floyd Encountered an Error!\";

$exts_list_title = \"Floyd supports the following extensions\";

$global_title = \"Let Floyd do the hard work!\";



// the extensions that we are going to be using, edit these for your needs

$whois_exts = array(

    \"com\",

    \"net\",

    \"org\",

    \"com.cn\",

    \"net.cn\",

    \"org.cn\",

    \"gov.cn\",

    \"sh\",

    \"cc\"

);



// some extensions (com/net/org) have a server which contains the name of the server which should be used for  



the information, this simply tells the script to use the whois server as a source for the server info... ;)

$whois_si_servers = array();



// an array of the `whois\' servers

$whois_servers = array();



// default whois servers for info

$whois_info_servers = array();



// the backup whois servers to try

$whois_info_servers_backup = array();



// the strings that are returned if the domain is available

$whois_avail_strings = array();



// some substitution strings follow

$errormsg = \"\";

$titlebar = \"MWhois written by Matt Wilson\";    // the defatul title bar

$rawoutput = \"\";

$avail = array();

$unavail = array();

$whois_server = \"\";



// the name of the script

$script_name = \"index.php\";



function my_in_array($val,$array_)

{

    for($l=0; $l<sizeof($array_); $l++)

        if($array_[$l] == $val)

            return 1;



    return 0;

}



// this loads the server info for the extensions in $whois_exts;

function load_server_info()

{

    global $whois_exts;

    global $whois_si_servers;

    global $whois_servers;

    global $whois_info_servers;

    global $whois_info_servers_backup;

    global $whois_avail_strings;

     

    // load the servers.lst file

    $tlds = file(\"servers.lst\");



    for($l=0; $l<sizeof($tlds); $l++){

        // time leading spaces or trailing spaces

        $tlds[$l] = chop($tlds[$l]);

         

        // filter out the commented lines (begin with #)

        if(substr($tlds[$l], 0, 1) == \"#\" || !strlen($tlds[$l])) { continue; }



        // explode via the seperation char `|\'

        $es = explode(\"|\", $tlds[$l]);



        // check to see whether we want this TLD

        if(!my_in_array($es[0], $whois_exts)) { continue; }



        // yes we do, so store the details in the appropriate arrays

        $whois_servers[$es[0]] = $es[1];

        $whois_si_servers[$es[0]] = $es[5];

        $whois_info_servers[$es[0]] = $es[3];

        $whois_info_servers_backup[$es[0]] = $es[4];

        $whois_avail_strings[$es[1]] = $es[2];



        // thats it!

    }

}



function choose_info_server($domain, $ext)

{

    global $whois_info_servers;

    global $whois_si_servers;

    global $whois_server;

    global $whois_servers;



    $whois_server = \"\";



    if($whois_si_servers[$ext]){

        if(($co = fsockopen($whois_servers[$ext], 43)) == false){

            echo \"

\\n\";

            $whois_server = $whois_servers[$ext];

        } else {

            echo \"

\\n\";

            fputs($co, $domain.\".\".$ext.\"\\n\");

            while(!feof($co))

                $output .= fgets($co,128);



            fclose($co);



            $he = strpos($output, $whois_si_servers[$ext]) + strlen($whois_si_servers[$ext]);

            $le = strpos($output, \"\\n\", $he);

            $whois_server = substr($output, $he, $le-$he);

            echo \"

\\n\";

        }

    } else {

        $whois_server = $whois_info_servers[$ext];

    }



    $whois_server = trim($whois_server);

}



// make all the changes

function make_changes($fil)

{

    global $domain;

    global $errormsg;

    global $titlebar;

    global $rawoutput;

    global $avail;

    global $unavail;

    global $ext;

    global $whois_exts;

    global $whois_servers;

    global $script_name;

     

    $f = implode(\"\",file($fil));



    $f = str_replace(\"[>WHOIS_SERVER<]\ f="str_replace(\"[">TITLE_BAR<]\ f="str_replace(\"[">DOMAIN<]\ f="str_replace(\"[">ERROR_MSG<]\ f="str_replace(\"[">RAWOUTPUT<]\",$rawoutput,$f);



    for($l=0; $l<sizeof($avail); $l++){

        $sp[1] = substr(strchr($avail[$l],\".\"),1);

        $sp[0] = substr($avail[$l],0,strlen($avail[$l])-strlen($sp[1])-1);

        $avail_s = $avail_s.\"<a  



href=\\\"\".$script_name.\"?domain=\".$sp[0].\"&ext=\".$sp[1].\"\\\">\".$avail[$l].\"
\";

    }



     for($l=0; $l<sizeof($unavail); $l++){

                $sp[1] = substr(strchr($unavail[$l],\".\"),1);

                $sp[0] = substr($unavail[$l],0,strlen($unavail[$l])-strlen($sp[1])-1);

                $unavail_s = $unavail_s.\"<a  



href=\\\"\".$script_name.\"?domain=\".$sp[0].\"&ext=\".$sp[1].\"\\\">\".$unavail[$l].\"
\";

    }



    $f = str_replace(\"[>AVAIL_LIST<]\ f="str_replace(\"[">UNAVAIL_LIST<]\ f="str_replace(\"[">SCRIPT_NAME<]\ f="str_replace(\"[">EXT<]\ f="str_replace(\"[">EXT_LIST<]\",implode(\"
\",$whois_exts),$f);

    $f = str_replace(\"[>EXT_HTML_LIST<]\",\"<select  



name=ext>\\n\".implode(\"\\n\",$whois_exts).\"\\n\",$f);



    return $f;

}



// show the error page

function do_error()

{

    global $use_global_templates;

    global $template_header;

    global $template_footer;

    global $template_error;

    global $domain;

    global $titlebar;

    global $error_title;

    global $errormsg;



    $titlebar = $error_title;



    if($use_global_templates)

        echo make_changes($template_header);



    echo make_changes($template_error);



    if($use_global_templates)

        echo make_changes($template_footer);



    exit();

}



// checks the domain is legal

function check_domain()

{

    global $errormsg;

    global $domain;

    global $ext;

    global $whois_exts;



    if(isset($ext)){

        if(!strlen($ext)){

            $errormsg = \"没有选择域名后缀\";

            return 0;

        }

        if(!my_in_array($ext,$whois_exts)){

            $errormsg = \"不支持此域名后缀\";

            return 0;

        }

    }

    if(isset($domain)){

        if(strlen($domain) < 2 || strlen($domain) > 57){

            $errormsg = \"域名太长或太短\";

            return 0;

        }

        if(strlen($domain) == 2 && !ereg(\"([0-9]){2}\",$domain)){

            $errormsg = \"在2个字节的域名中不能包含有字母\";

            return 0;

        }

        if(ereg(\"^-|-$\",$domain)){

            $errormsg = \"域名前和域名后不能使用-，也不可以连续使用-\";

            return 0;

        }

        if(!ereg(\"([a-z]|[A-Z]|[0-9]|-){\".strlen($domain).\"}\",$domain)){

            $errormsg = \"域名只可以包含字母数字组合和-\";

            return 0;

        }

    }



    return 1;

}



// perform_whois function returns 0 if domain is available otherwise returns either the raw info or 1

function perform_whois($domainname,$ext,$raw)

{

    global $errormsg;

    global $whois_servers;

    global $rawoutput;

    global $whois_avail_strings;



    $rawoutput = \"\";



    if($raw)

        return do_raw($domainname,$ext);



    if(($ns = fsockopen($whois_servers[$ext],43)) == false){

        $errormsg = \"无法连接到域名查询服务器\".$whois_servers[$ext].\"\";

        return -1;

    }

    fputs($ns,\"$domainname.$ext\\n\");

    while(!feof($ns))

        $rawoutput .= fgets($ns,128);



    fclose($ns);



    echo \"

\\n\";



    if(!ereg($whois_avail_strings[$whois_servers[$ext]], $rawoutput))

        return 0;



    return 1;

}



// this performs the whois lookup and then shows the data returned

function do_raw($domainname, $ext)

{

    global $titlebar;

    global $template_raw_output;

    global $use_global_templates;

    global $template_header;

    global $template_footer;

    global $raw_output_title;

    global $whois_info_servers;

    global $whois_servers;

    global $rawoutput;

    global $errormsg;

    global $whois_info_servers_backup;

    global $whois_avail_strings;

    global $whois_server;



    choose_info_server($domainname, $ext);



    if(($ns = fsockopen($whois_server,43)) == false){

        if(($ns = fsockopen($whois_info_servers[$ext],43)) == false){

            if(($ns = fsockopen($whois_info_servers_backup[$ext], 43)) == false){

                        return -1;

            } else {

                $whois_server = $whois_info_servers_backup[$ext];

            }

        } else {

            $whois_server = $whois_info_servers[$ext];

        }

    }



    print \"

\\n\";



        fputs($ns,\"$domainname.$ext\\n\");

        while(!feof($ns))

                $rawoutput = $rawoutput.fgets($ns,128);



        fclose($ns);



    echo \"

\";



//    $pos = @strpos($rawoutput,$whois_avail_strings[$server]);

//    if(is_string($pos) && !$pos){}

//    else{

//    if(!is_string($pos) || $pos){

//        if(($ns = fsockopen($whois_info_servers_backup[$ext],43)) == false)

//            return -1;

//        else{

//            $rawoutput = \"\";

//            fputs($ns,\"$domainname.$ext\\n\");

//            while(!feof($ns))

//                $rawoutput = $rawoutput.fgets($ns,128);

//            $pos = @strpos($rawoutput,$whois_avail_strings[$whois_info_servers_backup[$ext]]);

//            if(!is_string($pos) || $pos){}

//            else

//                return -1;

//        }

//    }

                 

    $titlebar = $raw_output_title;



        if($use_global_templates)

                echo make_changes($template_header);



        echo make_changes($template_raw_output);



        if($use_global_templates)

                echo make_changes($template_footer);



    exit();

}



function do_getsearch_mini()

{

        global $template_search_mini;



        echo make_changes($template_search_mini);



    exit();

}



function do_getsearch()

{

        global $template_footer;

        global $template_header;

        global $use_global_templates;

        global $titlebar;

        global $template_search;

    global $search_title;



        $titlebar = $search_title;



        if($use_global_templates)

                echo make_changes($template_header);



        echo make_changes($template_search);



        if($use_global_templates)

                echo make_changes($template_footer);



        exit();     

}



function do_avail()

{

    global $template_footer;

    global $template_header;

    global $use_global_templates;

    global $titlebar;

    global $template_available;

    global $available_title;



        $titlebar = $available_title;



        if($use_global_templates)

                echo make_changes($template_header);



        echo make_changes($template_available);



        if($use_global_templates)

                echo make_changes($template_footer);



    exit();

}



function do_taken()

{

    global $template_footer;

    global $template_header;

    global $use_global_templates;

    global $template_taken;

    global $titlebar;

    global $taken_title;



        $titlebar = $taken_title;



        if($use_global_templates)

                echo make_changes($template_header);



        echo make_changes($template_taken);



        if($use_global_templates)

                echo make_changes($template_footer);



    exit();

}



function do_exts()

{

        global $template_footer;

        global $template_header;

        global $use_global_templates;

        global $template_exts_list;

        global $titlebar;

        global $exts_list_title;



        $titlebar = $exts_list_title;



        if($use_global_templates)

                echo make_changes($template_header);



        echo make_changes($template_exts_list);



        if($use_global_templates)

                echo make_changes($template_footer);



        exit();

}



function do_glob()

{

    global $domain;

    global $whois_exts;

    global $avail;

    global $unavail;

    global $template_header;

        global $template_footer;

        global $use_global_templates;

        global $titlebar;

        global $global_title;



    $titlebar = $global_title;



    if($use_global_templates)

        echo make_changes($template_header);



    if(!isset($domain)){

            global $template_global;



            echo make_changes($template_global);

    }

    else{

        global $template_global_results;



        for($l=0; $l<sizeof($whois_exts); $l++){

            if(($r = perform_whois($domain,$whois_exts[$l],0)) != -1){

                if(!$r)

                    $avail[] = $domain.\".\".$whois_exts[$l];

                else

                    $unavail[] = $domain.\".\".$whois_exts[$l];

            }

        }



        echo make_changes($template_global_results);

    }



    if($use_global_templates)

        echo make_changes($template_footer);



    exit();

}



function do_wiz()

{

        global $domain;

    global $ext;

        global $avail;

        global $unavail;

        global $template_header;

        global $template_footer;

        global $use_global_templates;

        global $titlebar;

        global $wizard_title;

    global $errormsg;

    global $keyword1;

    global $keyword2;

    global $company;



        $titlebar = $wizard_title;



        if($use_global_templates)

                echo make_changes($template_header);



    if(!isset($company) || !isset($keyword1) || !isset($keyword2)){

                global $template_wizard;



                echo make_changes($template_wizard);

        }

        else{

                global $template_wizard_results;



        $domains = array(

            $company,

            $company.$keyword1,

            $company.\"-\".$keyword1,

            $keyword1.$company,

            $keyword1.\"-\".$company,

                        $company.$keyword2,

                        $company.\"-\".$keyword2,

                        $keyword2.$company,

                        $keyword2.\"-\".$company,

            $keyword1,

            $keyword2,

            $keyword1.$keyword2,

            $keyword2.$keyword1,

            $keyword1.\"-\".$keyword2,

            $keyword2.\"-\".$keyword1

        );



        for($l=0; $l<sizeof($domains); $l++){

            $domain = strtolower(str_replace(\" \",\"\",$domains[$l]));

            if(check_domain()){

                if(($r = perform_whois($domain,$ext,0)) != -1){

                    if(!$r)

                        $avail[] = $domain.\".\".$ext;

                    else

                        $unavail[] = $domain.\".\".$ext;

                }

            }

        }



                echo make_changes($template_wizard_results);

        }



        if($use_global_templates)

                echo make_changes($template_footer);



    exit();

}



load_server_info();



if(!check_domain())

    do_error();



if(isset($do_wizard))

    do_wiz();



if(isset($do_global))

    do_glob();



if(isset($list_exts))

    do_exts();



if(isset($do_mini_search))

    do_getsearch_mini();



if(!isset($domain))

    do_getsearch();



if(isset($show_raw)){

    if(perform_whois($domain,$ext,1) != -1)

        $errormsg = \"MWhois域名查询内部错误\";



    do_error();

}



$ret = perform_whois($domain,$ext,0);

if($ret == -1)

    do_error();



if(!$ret)

    do_taken();

else

    do_avail();



?>

本文来源：http://www.hzclsc.cn/news/27290.html