Casio ISA550WBUN3K9 manual Networking

Models: ISA550WBUN3K9

1 479
Download 479 pages 49.64 Kb
Page 198
Image 198

Networking

4

 

Using External Web-Hosted CGI Scripts

 

 

 

 

 

$password =~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/seg;

# If attempt to login

if ($button =~ /^Accept$/) { $hexchal = pack "H32", $challenge; if (defined $uamsecret) {

$newchal = md5($hexchal, $uamsecret);

}

else {

$newchal = $hexchal;

}

$response = md5_hex("\0", $password, $newchal);

$pappassword = unpack "H32", ($password ^ $newchal); #sleep 5;

print "Content-type: text/html\n\n";

print "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\"> <html>

<head>

<title>MySMB Login</title>

<meta http-equiv=\"Cache-control\" content=\"no-cache\"> <meta http-equiv=\"Pragma\" content=\"no-cache\">";

if ((defined $uamsecret) && defined($userpassword)) { print " <meta http-equiv=\"refresh\" content=\"0;url= http://$uamip:$uamport/logon?username=$username&password=

$pappassword&userurl=$userurl\">"; } else {

print " <meta http-equiv=\"refresh\" content=\"0;url= http://$uamip:$uamport/logon?username=$username&response=$response&userurl= $userurl\">";

}

print "</head>

<body bgColor = '#c0d8f4'>";

print "<h1 style=\"text-align: center;\">Logging in to MySMB</h1>"; print "

<center>

Please wait......

</center>

</body> <!--

<?xml version=\"1.0\" encoding=\"UTF-8\"?> <WISPAccessGatewayParam

xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xsi:noNamespaceSchemaLocation=

\"http://www.acmewisp.com/WISPAccessGatewayParam.xsd\">

<AuthenticationReply>

<MessageType>120</MessageType>

<ResponseCode>201</ResponseCode>

";

if ((defined $uamsecret) && defined($userpassword)) {

print "<LoginResultsURL>http://$uamip:$uamport/logon?username= $username&password=$pappassword</LoginResultsURL>";

} else {

print "<LoginResultsURL>http://$uamip:$uamport/logon?username= $username&response=$response&userurl=$userurl</LoginResultsURL>";

}

Cisco ISA500 Series Integrated Security Appliances Administration Guide

198

Page 198
Image 198
Casio ISA550WBUN3K9 manual Networking