Domene Whois i Mambo...

[oblomsoe]

Hei! Jeg har funnet et domene whois module tl Mambo CMS. Men så er det veldig lite valg av de jeg ville ha, som feks .no er ikke dær.. Jeg så litt i koden å prøvde å legge til .no også, men da får jeg bestandig at det er opptatt:/.. Her er koden:

<?
/* 
File:  	mod_whois.php
Version:  2.5.7 :: 25th October 2004
Author:  Carl Pickering :: [email protected]
Company:  ITS Linux Ltd :: www.its-linux.co.uk
Function:	Module box to search for domains
Licence:	GPL - Modify it as you wish, but credit author
Support:	Limited support by author available. If this mod fails to work,
 	check that your server can telnet out.
System:  Mambo Open Source - 4.5.1a
*/

/** ensure this file is being included by a parent file */
defined( '_VALID_MOS' ) or die( 'Direct Access to this location is not allowed.' );

function available(){ 
PRINT "Status: <span class=\"alert\">available"; 
}

function unavailable(){ 
PRINT "Status: <span class=\"alert\">Sorry, taken</span>"; 

}
?>
<style type="text/css">
<!--
.smallbox {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 10px;
color: #000000;
border: thin solid #000000;
}
.smalltext {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 10px;
}
.alert {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 9px;
color: #FF0000;
}
-->
</style>
<form enctype="multipart/form-data" name="whois" action="<?php echo $_SERVER['file:///C|/Documents%20and%20Settings/carlp/Local%20Settings/Temporary%20Internet%20Files/Content.IE5/8AH50CIX/PHP_SELF'] .'?'. $_SERVER['QUERY_STRING']; ?>" method="post"> <table width="150" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td><span class="smalltext">Enter domain to check</span></td>
  </tr>
  <tr>
    <td><div align="right">
      <input name="domain" type="text" class="smallbox" value="domain" size="20" onblur="if(this.value=='') this.value='domain';" onfocus="if(this.value=='domain') this.value='';">
    </div></td>
  </tr>
  <tr>
    <td><div align="right">
      <select name="extension" class="smallbox">
          <option value="co.uk">.co.uk</option>
          <option value="com" selected>.com</option>
          <option value="net">.net</option>
          <option value="org">.org</option>
          <option value="info">.info</option>
          <option value="biz">.biz</option>
          <option value="no">.no</option>
      </select>
    </div></td>
  </tr>
  <tr>
    <td><div align="right">
      <input name="check" type="hidden" id="check" value=".">
      <input name="lookup" type="submit" class="smallbox" value="check">
    </div></td>
  </tr>
   <tr>
    <td class="smalltext">Domain: <span class="alert"><?php echo $_POST['domain'] . $_POST['check'] . $_POST['extension'];?></span></td>
  </tr>
  <tr>
    <td class="smalltext">
<?  
/*
Code:	The search process
Notes:	More TLD's can be added, just copy & paste a block, 
 starting with 'if' and ending in '}'. Check the returned
 message from a domain that is taken and replace the quoted
 text in 'if eregi'. TLD must be added to HTML
*/
if(isset($_POST['check'])){
$dom = $_POST['domain'];
$ext = $_POST['extension'];
if ($ext == 'com'){
$domname = "$dom.com";
$ns = fsockopen('whois.opensrs.net',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('Can\'t get information',$result)) available(); else unavailable();
}
if ($ext == 'net'){
$domname = "$dom.net";
$ns = fsockopen('whois.opensrs.net',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('Can\'t get information',$result)) available(); else unavailable();
}
if ($ext == 'org'){
$domname = "$dom.org";
$ns = fsockopen('whois.publicinterestregistry.com',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('NOT FOUND',$result)) available(); else unavailable();
}
if ($ext == 'info'){
$domname = "$dom.info";
$ns = fsockopen('whois.opensrs.net',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('Not found',$result)) available(); else unavailable();
}
if ($ext == 'biz'){
$domname = "$dom.biz";
$ns = fsockopen('whois.nic.biz',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('Not found',$result)) available(); else unavailable();
}
if ($ext == 'co.uk'){
$domname = "$dom.co.uk";
$ns = fsockopen('whois.nic.uk',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('No match',$result)) available(); else unavailable();
}
}
?>
 </td>
  </tr>
<?

?>
</table>
</form>

 

Det jeg prøvde når jeg la til .no var dette:

if ($ext == 'no'){
$domname = "$dom.no";
$ns = fsockopen('whois.opensrs.net',43); fputs($ns,"$domname\r\n");
$result = '';
while(!feof($ns)) $result .= fgets($ns,128); fclose($ns);
if (eregi('Can\'t get information',$result)) available(); else unavailable();
}

 

Jeg er ikke helt sikker på hvorfor det ikke funker, men jeg tror det er fordi at whois.opensrs.net ikke funker å whoise .no domener med.. Men vet dere av en annen server som jeg kunne prøvd med eller hva som er feil? Eller vet dere av et component elr Module til Mambo som har litt flere domene endelser?

 

Takk!

 

 

 

Edit: Jeg prøvde med en .us server som jeg vet virker: whois.nic.us Gjorde ikke noe spesielt med scriptet en å lime inn den dær, og jeg hadde samme feil da også.. Håper noen kan hjelpe meg med dette! Takk

Endret 23. juli 2005 av oblomsoe

[oblomsoe]

Eller om noen vet om ett whois script som sjekker de aller fleste domener?Ser litt på hotscripts.com men har ikke funnet noen med mange enda...:/