php版 子网掩码计算器

php代码

Destoon B2B网站

Destoon B2B网站管理系统是一套完善的B2B(电子商务)行业门户解决方案。系统基于PHP+MySQL开发，采用B/S架构，模板与程序分离，源码开放。模型化的开发思路，可扩展或删除任何功能；创新的缓存技术与数据库设计，可负载千万级别数据容量及访问。 系统特性1、跨平台。支持Linux/Unix/Windows服务器，支持Apache/IIS/Zeus等2、跨浏览器。基于最新Web标准构建，在

下载

  
  
  








  

     PHP Subnet Calculator
  




  

        
IP & Mask or CIDR:   
        

        
    
                         
             
  



\n\n" ;

$end='




';

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= "0" . substr(dotbin($bin_net,$cdr_nmask),1) ;
//}elseif (ereg('^10',$bin_net)){
}elseif (preg_match("/^10/",$bin_net)){
	$class="B";
	$dotbin_net= "10" . substr(dotbin($bin_net,$cdr_nmask),2) ;
//}elseif (ereg('^110',$bin_net)){
}elseif (preg_match("/^110/",$bin_net)){
  	$class="C";
	$dotbin_net= "110" . substr(dotbin($bin_net,$cdr_nmask),3) ;
//}elseif (ereg('^1110',$bin_net)){
}elseif (preg_match("/^1110/",$bin_net)){
  	$class="D";
	$dotbin_net= "1110" . substr(dotbin($bin_net,$cdr_nmask),4) ;
	$special="Class D = Multicast Address Space.";
}else{
  	$class="E";
	$dotbin_net= "1111" . substr(dotbin($bin_net,$cdr_nmask),4) ;
	$special="Class E = Experimental Address Space.";
}

//if (ereg('^(00001010)|(101011000001)|(1100000010101000)',$bin_net)){
if (preg_match("/^(00001010)|(101011000001)|(1100000010101000)/",$bin_net)){
  	 $special='( RFC-1918 Private Internet Address. )';
}

// Print Results
tr('Address:',"$dq_host",
	''.dotbin($bin_host,$cdr_nmask).'');
tr('Netmask:',''.bintodq($bin_nmask)." = $cdr_nmask",
	''.dotbin($bin_nmask, $cdr_nmask).'');
tr('Wildcard:', ''.bintodq($bin_wmask).'',
	''.dotbin($bin_wmask, $cdr_nmask).'');
tr('Network:', ''.bintodq($bin_net).'',
	"$dotbin_net","(Class $class)");
tr('Broadcast:',''.bintodq($bin_bcast).'',
	''.dotbin($bin_bcast, $cdr_nmask).'');
tr('HostMin:', ''.bintodq($bin_first).'',
	''.dotbin($bin_first, $cdr_nmask).'');
tr('HostMax:', ''.bintodq($bin_last).'',
	''.dotbin($bin_last, $cdr_nmask).'');
@tr('Hosts/Net:', ''.$host_total.'', "$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";
	for($i=0; $i".func_get_arg($i)."";
	echo "\n";
}
?>