1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
97.
98.
99.
100.
101.
102.
103.
104.
105.
106.
107.
108.
109.
110.
111.
112.
113.
114.
115.
116.
117.
118.
119.
120.
121.
122.
123.
124.
125.
126.
127.
128.
129.
130.
131.
132.
133.
134.
135.
136.
137.
138.
139.
140.
141.
142.
143.
144.
145.
146.
147.
148.
149.
150.
151.
152.
153.
154.
155.
156.
157.
158.
159.
160.
161.
162.
163.
164.
165.
166.
167.
168.
169.
170.
171.
172.
173.
174.
175.
176.
177.
178.
179.
180.
181.
182.
183.
184.
185.
186.
187.
188.
189.
190.
191.
192.
193.
194.
195.
196.
197.
198.
199.
200.
201.
202.
203.
204.
205.
206.
207.
208.
209.
210.
211.
212.
213.
214.
215.
216.
217.
218.
219.
220.
221.
222.
223.
224.
225.
226.
227.
228.
229.
230.
231.
232.
233.
234.
235.
236.
237.
238.
239.
240.
241.
242.
243.
244.
245.
246.
247.
248.
249.
250.
251.
252.
253.
254.
255.
256.
257.
258.
259.
260.
261.
262.
263.
264.
265.
266.
267.
268.
269.
270.
271.
272.
273.
274.
275.
276.
277.
278.
279.
280.
281.
282.
283.
284.
285.
286.
287.
288.
289.
290.
291.
292.
293.
294.
295.
296.
297.
298.
299.
300.
301.
302.
303.
304.
305.
306.
307.
308.
309.
310.
311.
312.
313.
314.
315.
316.
317.
318.
319.
320.
321.
322.
323.
324.
325.
326.
327.
328.
329.
330.
331.
332.
333.
334.
335.
336.
337.
338.
339.
340.
341.
342.
343.
344.
345.
346.
347.
348.
349.
350.
351.
352.
353.
354.
355.
356.
357.
358.
359.
360.
361.
362.
363.
364.
365.
366.
367.
368.
369.
370.
371.
372.
373.
374.
375.
376.
377.
378.
379.
380.
381.
382.
383.
384.
385.
386.
387.
388.
389.
390.
391.
392.
393.
394.
395.
396.
397.
398.
399.
400.
401.
402.
403.
404.
405.
406.
407.
408.
409.
410.
411.
412.
413.
414.
415.
416.
417.
418.
419.
420.
421.
422.
423.
424.
425.
426.
427.
428.
429.
430.
431.
432.
433.
434.
435.
436.
437.
438.
439.
440.
441.
442.
443.
444.
445.
446.
447.
448.
449.
450.
451.
452.
453.
454.
455.
456.
457.
458.
459.
460.
461.
462.
463.
464.
465.
466.
467.
468.
469.
470.
471.
472.
473.
474.
475.
476.
477.
478.
479.
480.
481.
482.
483.
484.
485.
486.
487.
488.
489.
490.
491.
492.
493.
494.
495.
496.
497.
498.
499.
500.
501.
502.
503.
504.
505.
506.
507.
508.
509.
510.
511.
512.
513.
514.
515.
516.
517.
518.
519.
520.
521.
522.
523.
524.
525.
526.
527.
528.
529.
530.
531.
532.
533.
534.
535.
536.
537.
538.
539.
540.
541.
542.
543.
544.
545.
546.
547.
548.
549.
550.
551.
552.
553.
554.
555.
556.
557.
558.
559.
560.
561.
562.
563.
564.
565.
566.
567.
568.
569.
570.
571.
572.
573.
574.
575.
576.
577.
578.
579.
580.
581.
582.
583.
584.
585.
586.
587.
588.
589.
590.
591.
592.
593.
594.
595.
596.
597.
598.
599.
600.
601.
602.
603.
604.
605.
606.
607.
608.
609.
610.
611.
612.
613.
614.
615.
616.
617.
618.
619.
620.
621.
622.
623.
624.
625.
626.
<?php
// include the config file
require "config.php";
// check whether we are going to use the header and footer template files
if(!isset($use_global_templates)) {
$use_global_templates = $use_global_templates_by_default; // whether to use the global templates
}
// 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();
// the page titles
$whois_page_titles = array();
// the template list
$whois_templates = array();
// some substitution strings follow
$errormsg = "";
$titlebar = "LemonHost: WhoIs (проверка наличия домена)"; // the default title bar
$rawoutput = "";
$avail = array();
$unavail = array();
$whois_server = "";
// the name of the script
$script_name = "mwhois.php";
function my_in_array($val,$array_)
{
for($l=0; $l<sizeof($array_); $l++) {
if($array_[$l] == $val) {
return 1;
}
}
return 0;
}
// in case the theme can't be found
function fatal_theme()
{
global $theme;
echo '<HTML><BODY><FONT FACE=VERDANA SIZE=2>MWhois could not load the specified theme `<B>'.$theme.'</B>\', check the directory exists and try again!</FONT></BODY></HTML>';
exit();
}
// in case the theme can't be found
function fatal_servers_lst()
{
echo '<HTML><BODY><FONT FACE=VERDANA SIZE=2>MWhois could not locate the `servers.lst\' file in the current directory!</FONT></BODY></HTML>';
exit();
}
// loads the page titles into a hash
function load_page_titles()
{
global $whois_page_titles;
global $theme;
global $dir_split;
// load the titles.cfg file
$titles_cfg_file = @file($theme.$dir_split."titles.cfg");
if(!$titles_cfg_file) { echo "\n<!-- recoverable error : no titles.cfg found in theme dir `$theme' -->"; }
// go through each line of the titles config file and grab what we want
for($l=0; $l<sizeof($titles_cfg_file); $l++){
// trim each line and see if its a comment
$titles_cfg_file[$l] = trim($titles_cfg_file[$l]);
if(substr($titles_cfg_file[$l],0,1) == ";") { continue; }
// explode the bits, we can't use the limit paramater in case of PHP<4.0.1
$bits = explode("|", $titles_cfg_file[$l]);
// check to make sure there are at least two bits
if(sizeof($bits) < 2) { continue; }
// glue the bits of the line together that are after 2
$flag = $bits[0];
$title = $bits[1];
for($t=0; $t<sizeof($bits)-2; $t++){ $title .= "|".$bits[$t]; }
// put the page title in to the hash array
$whois_page_titles[$flag] = $title;
// for the sakes of debugging show whats happening
//echo "\n<!-- added new title for flag `".$flag."' => `".$title."' -->";
}
}
// loads the template filenames into a hash ref
function load_template_names()
{
global $whois_templates;
global $theme;
global $dir_split;
// load the titles.cfg file
$template_cfg_file = @file($theme.$dir_split."templates.cfg");
if(!$template_cfg_file) { fatal_theme(); }
// go through each line of the titles config file and grab what we want
for($l=0; $l<sizeof($template_cfg_file); $l++){
// trim each line and see if its a comment
$template_cfg_file[$l] = trim($template_cfg_file[$l]);
if(substr($template_cfg_file[$l],0,1) == ";") { continue; }
// explode the bits, we can't use the limit paramater in case of PHP<4.0.1
$bits = explode("|", $template_cfg_file[$l]);
// check to make sure there are at least two bits
if(sizeof($bits) < 2) { continue; }
// glue the bits of the line together that are after 2
$flag = $bits[0];
$template = $bits[1];
for($t=0; $t<sizeof($bits)-2; $t++){ $template .= "|".$bits[$t]; }
// put the page title in to the hash array
$whois_templates[$flag] = $theme.$dir_split.$template;
// for the sakes of debugging show whats happening
//echo "\n<!-- added new template for flag `".$flag."' => `".$template."' -->";
}
}
// 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;
global $vars;
// load the servers.lst file
//------------------------------------------------------------------------------------------------------------------
//$path_whois="features/whois";
//-------------------------------------------------------------------------------------------------------------------
$tlds = @file("servers.lst");
if(!$tlds) { fatal_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;
global $vars;
$whois_server = "";
if($whois_si_servers[$ext]){
if(($co = fsockopen($whois_servers[$ext], 43)) == false){
//echo "\n<!-- choose_info_server() : unable to connect to ".$whois_servers[$ext]." @ line #".$__LINE__." -->";
$whois_server = $whois_servers[$ext];
} else {
//echo "\n<!-- choose_info_servers() : connected to ".$whois_servers[$ext]." @ line #".$__LINE__.", looking for `".$whois_si_servers[$ext]."' -->";
fputs($co, $domain.".".$ext."\r\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<!-- choose_info_servers() : found `".$whois_server."' @ line #".$__LINE__.", using for whois info server -->";
}
} else {
$whois_server = $whois_info_servers[$ext];
}
$whois_server = trim($whois_server);
}
// make all the changes
function make_changes($fil)
{
global $vars;
global $errormsg;
global $titlebar;
global $rawoutput;
global $avail;
global $unavail;
global $whois_exts;
global $whois_servers;
global $script_name;
global $theme;
global $dir_split;
$f = implode("", file($fil));
$f = str_replace("[>WHOIS_SERVER<]",$whois_servers[$vars["ext"]],$f);
$f = str_replace("[>TITLE_BAR<]",$titlebar,$f);
$f = str_replace("[>DOMAIN<]",$vars["domain"],$f);
$f = str_replace("[>FULLDOMAIN<]", $vars["fulldomain"], $f);
$f = str_replace("[>ERROR_MSG<]",$errormsg,$f);
$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]."</a><br>";
}
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]."</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<]",$vars["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 $vars;
global $titlebar;
global $errormsg;
global $whois_templates;
global $whois_page_titles;
$titlebar = $whois_page_titles["error"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
echo make_changes($whois_templates["error"]);
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
// checks the domain is legal
function check_domain()
{
global $errormsg;
global $vars;
global $whois_exts;
if(isset($vars["ext"])
&& !isset($vars["do_global"])
&& !isset($vars["do_wizard"]) ){
if(!strlen($vars["ext"])){
$errormsg = "No top level domain selected";
return 0;
}
if(!my_in_array($vars["ext"], $whois_exts)){
$errormsg = "Top level domain not supported";
return 0;
}
}
if(isset($vars["domain"])){
if(@ereg("^-|-$",$vars["domain"])){
$errormsg = "Domain names cannot begin or end in a hyphen or contain double hyphens";
return 0;
}
if(!@ereg("([a-z]|[A-Z]|[0-9]|-){".strlen($vars["domain"])."}",$vars["domain"]) || !strlen($vars["domain"])){
$errormsg = "Domain names must only contain alphanumerical characters and hyphens";
return 0;
}
}
return 1;
}
// perform_whois function returns 1 if domain is available otherwise returns either the raw info or 0
function perform_whois($domainname, $ext, $raw)
{
global $vars;
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 = "Cannot connect to <b><i>".$whois_servers[$ext]."</i></b>";
return -1;
}
fputs($ns, $domainname.".".$ext."\r\n");
while(!feof($ns)) { $rawoutput .= fgets($ns,128); }
fclose($ns);
$whois_avail_strings[$whois_servers[$ext]] = str_replace("\\n", "\n", $whois_avail_strings[$whois_servers[$ext]]);
// echo "<!--\nAvail string = \"".$whois_avail_strings[$whois_servers[$ext]]."\"\nComparing against = \"".$rawoutput."\"\n-->\n";
$tmp = strpos($rawoutput, $whois_avail_strings[$whois_servers[$ext]]);
if(!strlen($rawoutput) || is_integer($tmp)) { return 1; }
return 0;
}
// this performs the whois lookup and then shows the data returned
function do_raw($domainname, $ext)
{
global $vars;
global $titlebar;
global $use_global_templates;
global $whois_info_servers;
global $whois_servers;
global $rawoutput;
global $errormsg;
global $whois_info_servers_backup;
global $whois_avail_strings;
global $whois_server;
global $whois_page_titles;
global $whois_templates;
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<!-- do_raw() : using `".$whois_server."' for whois query -->";
fputs($ns, $domainname.".".$ext."\r\n");
while(!feof($ns)) { $rawoutput .= fgets($ns, 128); }
fclose($ns);
//echo "<!--".$rawoutput."-->";
$titlebar = $whois_page_titles["raw"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
echo make_changes($whois_templates["raw"]);
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
function do_getsearch_mini()
{
global $whois_templates;
echo make_changes($whois_templates["searchmini"]);
exit();
}
function do_getsearch()
{
global $use_global_templates;
global $titlebar;
global $whois_page_titles;
global $whois_templates;
$titlebar = $whois_page_titles["search"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
echo make_changes($whois_templates["search"]);
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
function do_avail()
{
global $use_global_templates;
global $titlebar;
global $whois_templates;
global $whois_page_titles;
$titlebar = $whois_page_titles["avail"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
echo make_changes($whois_templates["avail"]);
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
function do_taken()
{
global $use_global_templates;
global $titlebar;
global $whois_page_titles;
global $whois_templates;
$titlebar = $whois_page_titles["taken"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
echo make_changes($whois_templates["taken"]);
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
function do_exts()
{
global $use_global_templates;
global $whois_page_titles;
global $titlebar;
global $whois_templates;
$titlebar = $whois_page_titles["exts"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
echo make_changes($whois_templates["extlist"]);
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
function do_glob()
{
global $vars;
global $whois_exts;
global $avail;
global $unavail;
global $use_global_templates;
global $titlebar;
global $whois_page_titles;
global $whois_templates;
$titlebar = $whois_page_titles["global"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
if(!isset($vars["domain"])) {
echo make_changes($whois_templates["global"]);
} else{
for($l=0; $l<sizeof($whois_exts); $l++){
if(($r = perform_whois($vars["domain"], $whois_exts[$l], 0)) != -1){
if(!$r) { $unavail[] = $vars["domain"].".".$whois_exts[$l]; } else { $avail[] = $vars["domain"].".".$whois_exts[$l]; }
}
}
echo make_changes($whois_templates["globalres"]);
}
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
function do_wiz()
{
global $vars;
global $avail;
global $unavail;
global $use_global_templates;
global $titlebar;
global $errormsg;
global $whois_templates;
global $whois_page_titles;
$titlebar = $whois_page_titles["wiz"];
if($use_global_templates) { echo make_changes($whois_templates["header"]); }
if(!$vars["company"] && !$vars["keyword1"] && !$vars["keyword2"]) {
echo make_changes($whois_templates["wizard"]);
} else{
// remove whitespace from either side of each variable
$vars["company"] = strtolower(trim($vars["company"]));
$vars["keyword1"] = strtolower(trim($vars["keyword1"]));
$vars["keyword2"] = strtolower(trim($vars["keyword2"]));
$cdomains = array(
$vars["company"],
$vars["company"].$vars["keyword1"],
$vars["company"]."-".$vars["keyword1"],
$vars["keyword1"].$vars["company"],
$vars["keyword1"]."-".$vars["company"],
$vars["company"].$vars["keyword2"],
$vars["company"]."-".$vars["keyword2"],
$vars["keyword2"].$vars["company"],
$vars["keyword2"]."-".$vars["company"],
$vars["keyword1"],
$vars["keyword2"],
$vars["keyword1"].$vars["keyword2"],
$vars["keyword2"].$vars["keyword1"],
$vars["keyword1"]."-".$vars["keyword2"],
$vars["keyword2"]."-".$vars["keyword1"]
);
// remove any duplicates :)
$domains = @array_unique($cdomains);
for($l=0; $l<sizeof($domains); $l++){
$vars["domain"] = $domains[$l];
if(check_domain()){
if(($r = perform_whois($vars["domain"], $vars["ext"], 0)) != -1 && strlen($vars["domain"]) > 0){
if(!$r) { $unavail[] = $vars["domain"].".".$vars["ext"]; } else { $avail[] = $vars["domain"].".".$vars["ext"]; }
}
}
}
echo make_changes($whois_templates["wizres"]);
}
if($use_global_templates) { echo make_changes($whois_templates["footer"]); }
exit();
}
// this lump of code should sort out register_globals="off" problems :)
global $vars;
if(!isset($_SERVER)) { $_SERVER = $HTTP_SERVER_VARS; }
if(!isset($_POST)) { $_POST = $HTTP_POST_VARS; }
if(!isset($_GET)) { $_GET = $HTTP_GET_VARS; }
if(!isset($_COOKIE)) { $_COOKIE = $HTTP_COOKIE_VARS; }
if(!isset($_FILES)) { $_FILES = $HTTP_POST_FILES; }
if(!isset($_ENV)) { $_ENV = $HTTP_ENV_VARS; }
if(!isset($_SESSION)) { $_SESSION = $HTTP_SESSION_VARS; }
while(list($key, $var) = each($_GET)) { $vars[$key] = $var; }
while(list($key, $var) = each($_POST)) { $vars[$key] = $var; }
// try find out the script's path, if the first character is / then assume
// that the directory splitter is that too (otherwise use \)
$dir_split = "/";
if($_ENV["DOCUMENT_ROOT"] != "") {
if(substr($_ENV["DOCUMENT_ROOT"], 0, 1) != "/") {
$dir_split = "\\";
echo "\n<!-- Using dir_split=\"", $dir_split, "\" -->";
}
}
echo "\n<!-- Using dir_split=\"", $dir_split, "\" -->";
if(!isset($vars["domain"]) && !isset($vars["ext"]) && isset($vars["fulldomain"])) {
$vars["domain"] = ereg_replace("\..*$", "", $vars["fulldomain"]);
$vars["ext"] = str_replace($vars["domain"].".", "", $vars["fulldomain"]);
}
if(!isset($vars["fulldomain"]) && isset($vars["ext"]) && isset($vars["domain"])) {
$vars["fulldomain"] = $vars["domain"].".".$vars["ext"];
}
load_server_info();
load_template_names();
load_page_titles();
if(!check_domain()) { do_error(); }
if($vars["do_wizard"]) { do_wiz(); }
if($vars["do_global"]) { do_glob(); }
if($vars["list_exts"]) { do_exts(); }
if($vars["do_mini_search"]) { do_getsearch_mini(); }
if(!$vars["domain"]) { do_getsearch(); }
if(isset($vars["show_raw"])){
if(perform_whois($vars["domain"], $vars["ext"], 1) != -1) {
$errormsg = "Whois internal error";
}
do_error();
}
$ret = perform_whois($vars["domain"], $vars["ext"], 0);
if($ret == -1) {
do_error();
}
if(!$ret) {
do_taken();
} else {
do_avail();
}
?>
