php版 子网掩码计算器
- PHP中文网Original
- 2016-05-25 17:07:322252Durchsuche
php代码
<!--
PHP Subnet Calculator v1.3.
Copyright 06/25/2003 Raymond Ferguson ferguson_at_share-foo.com.
Released under GNU GPL.
Special thanks to krischan at jodies.cx for ipcalc.pl http://jodies.de/ipcalcThe presentation and concept was mostly taken from ipcalc.pl.
-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>PHP Subnet Calculator</title>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">
<meta name="GENERATOR" content="Quanta Plus">
</head>
<body bgcolor="#D3D3D3">
<center>
<form method="post" action="<?php print $_SERVER['PHP_SELF'] ?> ">
<BR><BR>
<table width="95%" align=center cellpadding=2 cellspacing=2 border=0>
<tr><td align="center" bgcolor="#999999">
<b><A HREF="http://sourceforge.net/projects/subntcalc/">PHP Subnet Calculator</A></b>
</td></tr>
</table>
<BR>
<table>
<tr>
<td>IP & Mask or CIDR: </td>
<td><input type="text" name="my_net_info" value="" size="31" maxlength="32"></td>
<td> <input type="submit" value="Calculate" name="subnetcalc">
</td>
</tr>
</table></form><br>
<?php
//Start table
print "<table cellpadding=\"2\">\n<COL span=\"4\" align=\"left\">\n" ;
$end='</table><br><br><br><br><br><table width="95%" align=center cellpadding=2 cellspacing=2 border=0>
<tr><td bgcolor="#999999"></td><tr><td align="center"><a href="http://validator.w3.org/check/referer">
<img border="0" src="http://www.w3.org/Icons/valid-html401" alt="Valid HTML 4.01!" height="31" width="88"></a>
</td></tr></table></center></body></html>';
if (empty($_POST['my_net_info'])){
tr('Use IP & CIDR Netmask: ', '10.0.0.1/22');
tr('Or IP & Netmask:','10.0.0.1 255.255.252.0');
tr('Or IP & Wildcard Mask:','10.0.0.1 0.0.3.255');
print $end ;
exit ;
}
$my_net_info=rtrim($_POST['my_net_info']);
//if (! ereg('^([0-9]{1,3}\.){3}[0-9]{1,3}(( ([0-9]{1,3}\.){3}[0-9]{1,3})|(/[0-9]{1,2}))$',$my_net_info)){
if (! preg_match("/^([0-9]{1,3}\.){3}[0-9]{1,3}(( ([0-9]{1,3}\.){3}[0-9]{1,3})|(\/[0-9]{1,2}))$/",$my_net_info)){
tr("Invalid Input.");
tr('Use IP & CIDR Netmask: ', '10.0.0.1/22');
tr('Or IP & Netmask:','10.0.0.1 255.255.252.0');
tr('Or IP & Wildcard Mask:','10.0.0.1 0.0.3.255');
print $end ;
exit ;
}
//if (ereg("/",$my_net_info)){ //if cidr type mask
if (preg_match("/\//",$my_net_info)){ //if cidr type mask
$dq_host = strtok("$my_net_info", "/");
$cdr_nmask = strtok("/");
if (!($cdr_nmask >= 0 && $cdr_nmask <= 32)){
tr("Invalid CIDR value. Try an integer 0 - 32.");
print "$end";
exit ;
}
$bin_nmask=cdrtobin($cdr_nmask);
$bin_wmask=binnmtowm($bin_nmask);
} else { //Dotted quad mask?
$dqs=explode(" ", $my_net_info);
$dq_host=$dqs[0];
$bin_nmask=dqtobin($dqs[1]);
$bin_wmask=binnmtowm($bin_nmask);
//if (ereg("0",rtrim($bin_nmask, "0"))) { //Wildcard mask then? hmm?
if (preg_match("/0/",rtrim($bin_nmask, "0"))) { //Wildcard mask then? hmm?
$bin_wmask=dqtobin($dqs[1]);
$bin_nmask=binwmtonm($bin_wmask);
if (ereg("0",rtrim($bin_nmask, "0"))){ //If it's not wcard, whussup?
tr("Invalid Netmask.");
print "$end";
exit ;
}
}
$cdr_nmask=bintocdr($bin_nmask);
}
//Check for valid $dq_host
//if(! ereg('^0.',$dq_host)){
if(! preg_match("/^0\./",$dq_host)){
foreach( explode(".",$dq_host) as $octet ){
if($octet > 255){
tr("Invalid IP Address");
print $end ;
exit;
}
}
}
$bin_host=dqtobin($dq_host);
$bin_bcast=(str_pad(substr($bin_host,0,$cdr_nmask),32,1));
$bin_net=(str_pad(substr($bin_host,0,$cdr_nmask),32,0));
$bin_first=(str_pad(substr($bin_net,0,31),32,1));
$bin_last=(str_pad(substr($bin_bcast,0,31),32,0));
$host_total=(bindec(str_pad("",(32-$cdr_nmask),1)) - 1);
if ($host_total <= 0){ //Takes care of 31 and 32 bit masks.
$bin_first="N/A" ; $bin_last="N/A" ; $host_total="N/A";
if ($bin_net === $bin_bcast) $bin_bcast="N/A";
}
//Determine Class
//if (ereg('^0',$bin_net)){
if (preg_match("/^0/",$bin_net)){
$class="A";
$dotbin_net= "<font color=\"Green\">0</font>" . substr(dotbin($bin_net,$cdr_nmask),1) ;
//}elseif (ereg('^10',$bin_net)){
}elseif (preg_match("/^10/",$bin_net)){
$class="B";
$dotbin_net= "<font color=\"Green\">10</font>" . substr(dotbin($bin_net,$cdr_nmask),2) ;
//}elseif (ereg('^110',$bin_net)){
}elseif (preg_match("/^110/",$bin_net)){
$class="C";
$dotbin_net= "<font color=\"Green\">110</font>" . substr(dotbin($bin_net,$cdr_nmask),3) ;
//}elseif (ereg('^1110',$bin_net)){
}elseif (preg_match("/^1110/",$bin_net)){
$class="D";
$dotbin_net= "<font color=\"Green\">1110</font>" . substr(dotbin($bin_net,$cdr_nmask),4) ;
$special="<font color=\"Green\">Class D = Multicast Address Space.</font>";
}else{
$class="E";
$dotbin_net= "<font color=\"Green\">1111</font>" . substr(dotbin($bin_net,$cdr_nmask),4) ;
$special="<font color=\"Green\">Class E = Experimental Address Space.</font>";
}
//if (ereg('^(00001010)|(101011000001)|(1100000010101000)',$bin_net)){
if (preg_match("/^(00001010)|(101011000001)|(1100000010101000)/",$bin_net)){
$special='<a href="http://www.ietf.org/rfc/rfc1918.txt">( RFC-1918 Private Internet Address. )</a>';
}
// Print Results
tr('Address:',"<font color=\"blue\">$dq_host</font>",
'<font color="brown">'.dotbin($bin_host,$cdr_nmask).'</font>');
tr('Netmask:','<font color="blue">'.bintodq($bin_nmask)." = $cdr_nmask</font>",
'<font color="red">'.dotbin($bin_nmask, $cdr_nmask).'</font>');
tr('Wildcard:', '<font color="blue">'.bintodq($bin_wmask).'</font>',
'<font color="brown">'.dotbin($bin_wmask, $cdr_nmask).'</font>');
tr('Network:', '<font color="blue">'.bintodq($bin_net).'</font>',
"<font color=\"brown\">$dotbin_net</font>","<font color=\"Green\">(Class $class)</font>");
tr('Broadcast:','<font color="blue">'.bintodq($bin_bcast).'</font>',
'<font color="brown">'.dotbin($bin_bcast, $cdr_nmask).'</font>');
tr('HostMin:', '<font color="blue">'.bintodq($bin_first).'</font>',
'<font color="brown">'.dotbin($bin_first, $cdr_nmask).'</font>');
tr('HostMax:', '<font color="blue">'.bintodq($bin_last).'</font>',
'<font color="brown">'.dotbin($bin_last, $cdr_nmask).'</font>');
@tr('Hosts/Net:', '<font color="blue">'.$host_total.'</font>', "$special");
print "$end";
function binnmtowm($binin){
$binin=rtrim($binin, "0");
//if (!ereg("0",$binin) ){
if (!preg_match("/0/",$binin) ){
return str_pad(str_replace("1","0",$binin), 32, "1");
} else return "1010101010101010101010101010101010101010";
}
function bintocdr ($binin){
return strlen(rtrim($binin,"0"));
}
function bintodq ($binin) {
if ($binin=="N/A") return $binin;
$binin=explode(".", chunk_split($binin,8,"."));
for ($i=0; $i<4 ; $i++) {
$dq[$i]=bindec($binin[$i]);
}
return implode(".",$dq) ;
}
function bintoint ($binin){
return bindec($binin);
}
function binwmtonm($binin){
$binin=rtrim($binin, "1");
//if (!ereg("1",$binin)){
if (!preg_match("/1/",$binin)){
return str_pad(str_replace("0","1",$binin), 32, "0");
} else return "1010101010101010101010101010101010101010";
}
function cdrtobin ($cdrin){
return str_pad(str_pad("", $cdrin, "1"), 32, "0");
}
function dotbin($binin,$cdr_nmask){
// splits 32 bit bin into dotted bin octets
if ($binin=="N/A") return $binin;
$oct=rtrim(chunk_split($binin,8,"."),".");
if ($cdr_nmask > 0){
$offset=sprintf("%u",$cdr_nmask/8) + $cdr_nmask ;
return substr($oct,0,$offset ) . " " . substr($oct,$offset) ;
} else {
return $oct;
}
}
function dqtobin($dqin) {
$dq = explode(".",$dqin);
for ($i=0; $i<4 ; $i++) {
$bin[$i]=str_pad(decbin($dq[$i]), 8, "0", STR_PAD_LEFT);
}
return implode("",$bin);
}
function inttobin ($intin) {
return str_pad(decbin($intin), 32, "0", STR_PAD_LEFT);
}
function tr(){
echo "\t<tr>";
for($i=0; $i<func_num_args(); $i++) echo "<td>".func_get_arg($i)."</td>";
echo "</tr>\n";
}
?>Stellungnahme：
Der Inhalt dieses Artikels wird freiwillig von Internetnutzern beigesteuert und das Urheberrecht liegt beim ursprünglichen Autor. Diese Website übernimmt keine entsprechende rechtliche Verantwortung. Wenn Sie Inhalte finden, bei denen der Verdacht eines Plagiats oder einer Rechtsverletzung besteht, wenden Sie sich bitte an admin@php.cn
Vorheriger Artikel：php判断xss攻击Nächster Artikel：PHP分页不切割单词