i wrote my own one in a mean time [thanks vincent, i will take a look at that one too]. unsafe, why?
<?
function findPOPserver ($aEmail) {
//---- email sploh vsebuje @
if (($y = strrchr ($aEmail,"@"))==false) {
return false;
}
//---- nslookup
$xDomain = substr ($y,1);
$xDomain = escapeshellcmd ($xDomain);
$xMailserver = `nslookup -type=MX $xDomain tagtag.com`;
if (!$x = strpos ($xMailserver, "mail exchanger = ")) {
return false;
}
$xMailserver = substr ($xMailserver, $x + 17);
$xMailserver = substr ($xMailserver, 0, strpos($xMailserver, "\n"));
if ($xMailserver != "") {
return $xMailserver;
}
else {
return false;
}
}
//=====================================
$xEmail = $email;
if (!$x = findPOPserver($xEmail)) {
echo "I cant find POP mail server name!";
}
else {
echo "POP SERVER: $x";
}
?>