兰色精灵 发表于 2015-2-4 00:06:48

PHP网页编程之有数据库的具体域名查询法式PHP版(1)

大家如果能懂得“熟能生巧”的道理也就明白了这并不是浪费时间，同时这也可以减轻板主的负担，让他们有时间去处理更难的问题。   有数据库的具体域名查询法式PHP版(1)
[ 繁w中文 ] | 文章种别：PHP实例 | 文章品级：



| 宣布日期：2001-5-30礼拜三

[ 计数器 | 出色博客 | 魔法脸色 | 博客请求 | 源码下载 | IP查询 | Html2Js ] 转自:静态网制造指南 www.knowsky.com文件一：index.php

<?php

echo "<!-- Powered by MWhois written by Matt Wilson <matt@mattsscripts.co.uk> -->\\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, MA02111-1307USA
*/

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, $whois_exts)) { continue; }

      // yes we do, so store the details in the appropriate arrays
      $whois_servers[$es] = $es;
      $whois_si_servers[$es] = $es;
      $whois_info_servers[$es] = $es;
      $whois_info_servers_backup[$es] = $es;
      $whois_avail_strings[$es] = $es;

      // 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 \"<!-- choose_info_server() : unable to connect to \".$whois_servers[$ext].\" @ line

#\".$__LINE__.\" -->\\n\";
            $whois_server = $whois_servers[$ext];
      } else {
            echo \"<!-- choose_info_servers() : connected to \".$whois_servers[$ext].\" @ line

#\".$__LINE__.\", looking for `\".$whois_si_servers[$ext].\"\' -->\\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 \"<!-- choose_info_servers() : found `\".$whois_server.\"\' @ line #\".$__LINE__.\",

using for whois info server -->\\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<]\",$whois_servers[$ext],$f);
    $f = str_replace(\"[>TITLE_BAR<]\",$titlebar,$f);
    $f = str_replace(\"[>DOMAIN<]\",$domain,$f);
    $f = str_replace(\"[>ERROR_MSG<]\",$errormsg,$f);
    $f = str_replace(\"[>RAWOUTPUT<]\",$rawoutput,$f);

    for($l=0; $l<sizeof($avail); $l++){
      $sp = substr(strchr($avail[$l],\".\"),1);
      $sp = substr($avail[$l],0,strlen($avail[$l])-strlen($sp)-1);
      $avail_s = $avail_s.\"<a

href=\\\"\".$script_name.\"?domain=\".$sp.\"&ext=\".$sp.\"\\\">\".$avail[$l].\"</a><br>\";
    }

   for($l=0; $l<sizeof($unavail); $l++){
                $sp = substr(strchr($unavail[$l],\".\"),1);
                $sp = substr($unavail[$l],0,strlen($unavail[$l])-strlen($sp)-1);
                $unavail_s = $unavail_s.\"<a

href=\\\"\".$script_name.\"?domain=\".$sp.\"&ext=\".$sp.\"\\\">\".$unavail[$l].\"</a><br>\";
    }

    $f = str_replace(\"[>AVAIL_LIST<]\",$avail_s,$f);
    $f = str_replace(\"[>UNAVAIL_LIST<]\",$unavail_s,$f);
    $f = str_replace(\"[>SCRIPT_NAME<]\", $script_name, $f);
    $f = str_replace(\"[>EXT<]\",$ext,$f);
    $f = str_replace(\"[>EXT_LIST<]\",implode(\"<br>\",$whois_exts),$f);
    $f = str_replace(\"[>EXT_HTML_LIST<]\",\"<select

name=ext>\\n<option>\".implode(\"\\n<option>\",$whois_exts).\"\\n</select>\",$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(\"(){2}\",$domain)){
            $errormsg = \"在2个字节的域名中不克不及包括有字母\";
            return 0;
      }
      if(ereg(\"^-|-$\",$domain)){
            $errormsg = \"域名前和域名后不克不及利用-，也不成以一连利用-\";
            return 0;
      }
      if(!ereg(\"(|||-){\".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 = \"没法毗连到域名查询办事器 <b><i>\".$whois_servers[$ext].\"</i></b>\";
      return -1;
    }
    fputs($ns,\"$domainname.$ext\\n\");
    while(!feof($ns))
      $rawoutput .= fgets($ns,128);

    fclose($ns);

    echo \"<!--\\nAvail string = \\\"\".$whois_avail_strings[$whois_servers[$ext]].\"\\\"\\nComparing against =

\\\"\".$rawoutput.\"\\\"\\n-->\\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 \"<!-- do_raw() : using `\".$whois_server.\"\' for whois query -->\\n\";

      fputs($ns,\"$domainname.$ext\\n\");
      while(!feof($ns))
                $rawoutput = $rawoutput.fgets($ns,128);

      fclose($ns);

    echo \"<!--\".$rawoutput.\"-->\";

//    $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();

?>
学习如何将PHP与HTML结合起来完成简单动态页面

活着的死人 发表于 2015-2-4 08:55:43

作为一个合格的coder 编码的规范是必须，命名方面我推崇“驼峰法”，另外就是自己写的代码最好要带注释，不然时间长了，就算是自己的代码估计看起来都费事，更不用说别人拉。

只想知道 发表于 2015-2-6 10:33:04

其实没啥难的，多练习，练习写程序，真正的实践比看100遍都有用。不过要熟悉引擎

简单生活 发表于 2015-2-8 20:37:49

真正的方向了，如果将来要去开发团队，你一定要学好smarty ,phplib这样的模板引擎，

第二个灵魂 发表于 2015-2-9 21:34:06

写的比较杂，因为我也是个新手，不当至于大家多多指正。

小女巫 发表于 2015-2-10 02:49:20

有时候汉字的空格也能导致页面出错，所以在写代码的时候，要输入空格最好用引文模式。

莫相离 发表于 2015-2-28 03:18:25

最后祝愿，php会给你带来快乐的同时 你也会给他带来快乐。

海妖 发表于 2015-3-2 06:16:39

有位前辈曾经跟我说过，phper 至少要掌握200个函数 编起程序来才能顺畅点，那些不熟悉的函数记不住也要一拿手册就能找到。所以建议新手们没事就看看php的手册（至少array函数和string函数是要记牢的）。

乐观 发表于 2015-3-11 02:20:45

刚开始安装php的时候，我图了个省事，把php的扩展全都打开啦（就是把php.ini 那一片 extension 前面的冒号全去掉啦），这样自然有好处，以后不用再需要什么功能再来打开。

不帅 发表于 2015-3-17 19:08:21

php是动态网站开发的优秀语言，在学习的时候万万不能冒进。在系统的学习前，我认为不应该只是追求实现某种效果，因为即使你复制他人的代码调试成功，实现了你所期望的效果，你也不了解其中的原理。

变相怪杰 发表于 2015-3-17 21:08:05

装在C盘下面可以利用windows的ghost功能可以还原回来（顺便当做是重转啦），当然啦我的编译目录要放在别的盘下，不然自己的劳动成果就悲剧啦。

山那边是海 发表于 2015-3-24 09:13:09

环境搭建好,当你看见你的浏览器输出“it works\\\\\\\"时你一定是喜悦的。在你解决问题的时候，我强烈建议多读php手册。

冷月葬花魂 发表于 2015-3-25 10:13:20

装在C盘下面可以利用windows的ghost功能可以还原回来（顺便当做是重转啦），当然啦我的编译目录要放在别的盘下，不然自己的劳动成果就悲剧啦。

兰色精灵 发表于 2015-3-31 12:41:03

先学习php和mysql,还有css(html语言很简单)我认为现在的效果比以前的方法好。

精灵巫婆 发表于 2015-4-3 03:54:38

如果你已经到这种程度了，那么你已经可以做我的老师了。其实php也分很多的区域，

柔情似水 发表于 2015-4-4 17:50:23

其实没啥难的，多练习，练习写程序，真正的实践比看100遍都有用。不过要熟悉引擎

仓酷云 发表于 2015-4-5 02:40:34

多看优秀程序员编写的代码，仔细理解他们解决问题的方法，对自身有很大的帮助。

因胸联盟 发表于 2015-4-15 19:17:09

这些都是最基本最常用功能，我们这些菜鸟在系统学习后，可以先对这些功能深入研究。

谁可相欹 发表于 2015-4-24 19:25:29

最后祝愿，php会给你带来快乐的同时 你也会给他带来快乐。

若相依 发表于 2015-4-24 19:52:56

为了以后维护的方便最好是代码上都加上注释，“予人方便，自己方便”。此外开发文档什么的最好都弄齐全。我觉得这是程序员必备的素质。虽然会消耗点很多的时间。但是确实是非常有必要的。
页: [1]
查看完整版本: PHP网页编程之有数据库的具体域名查询法式PHP版(1)