"; $bartitle="Unverified user: Please login to use Peril".$snapversion; printneedtologinmsg($bartitle); } else{ $showlogin="yes"; include("$incpath/menu.php"); $currentIP=$_SERVER['REMOTE_ADDR']; $firstname= $_SESSION['reg_firstname']; $reg_member_id = $_SESSION['reg_member_id']; $reg_email = $_SESSION['reg_email']; $bartitle="Peril$snapversion - Welcome $firstname"; $hostname = gethostbyaddr($currentIP); if ($_SERVER['REQUEST_METHOD']!='POST') { echo ""; show_bartitle($bartitle); ?>
Your current IP address is: ", $currentIP ," [ ", $hostname ," ] \n"; $ipaddr = ip2long($currentIP); $s_ipaddr = sprintf("%u",$ipaddr); ?>
PerilSnap sample
Sample PerilSnap image
"; show_bartitle($bartitle); //echo "submit_snap($currentIP)"; $ipaddr = ip2long($currentIP); $s_ipaddr = sprintf("%u",$ipaddr); $myhostip = long2ip($s_ipaddr); $locationtype = 'free'; $imagetype = 'png'; $myhostname = gethostbyaddr($myhostip); echo "

A PerilSnap request will be submitted on your behalf for address "; echo "" , $currentIP , " [",$myhostname , "].\n"; echo "

You should receive an image which gives information about\n"; echo "your network connectivity as soon as data is available.\n\n"; echo "

Typically data is available to PerilSnap users within an \n"; echo "hour and is delivered in a mime-compliant mail message.\n\n"; echo "The PerilSnap image will be sent to $reg_email ."; submit_snap($currentIP,$myhostname,$snapversion,$locationtype,$imagetype); } // else post } //else (logged in) include("$incpath/footer.php"); ?>