Uplink/IPAddr.class.php

   1 <?php
   2 /******************************* PHP-P10 v2 *****************************
   3  * Copyright (C) 2011-2012  Philipp Kreil (pk910)                       *
   4  *                                                                      *
   5  * This program is free software: you can redistribute it and/or modify *
   6  * it under the terms of the GNU General Public License as published by *
   7  * the Free Software Foundation, either version 3 of the License, or    *
   8  * (at your option) any later version.                                  *
   9  *                                                                      *
  10  * This program is distributed in the hope that it will be useful,      *
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  13  * GNU General Public License for more details.                         *
  14  *                                                                      *
  15  * You should have received a copy of the GNU General Public License    *
  16  * along with this program. If not, see <http://www.gnu.org/licenses/>. *
  17  *                                                                      *
  18  ************************************************************************
  19  *
  20  *  Uplink/IpAddr.class.php
  21  *
  22  * This class represents an IPv4 or IPv6 address.
  23  *
  24  */
  25
  26 class IPAddr {
  27         private static $pattern_IPv6 = '/^((([0-9A-Fa-f]{1,4}:){7}[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){6}:[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){5}:([0-9A-Fa-f]{1,4}:)?[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){4}:([0-9A-Fa-f]{1,4}:){0,2}[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){3}:([0-9A-Fa-f]{1,4}:){0,3}[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){2}:([0-9A-Fa-f]{1,4}:){0,4}[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){6}((\b((25[0-5])|(1\d{2})|(2[0-4]\d)|(\d{1,2}))\b)\.){3}(\b((25[0-5])|(1\d{2})|(2[0-4]\d)|(\d{1,2}))\b))|(([0-9A-Fa-f]{1,4}:){0,5}:((\b((25[0-5])|(1\d{2})|(2[0-4]\d)|(\d{1,2}))\b)\.){3}(\b((25[0-5])|(1\d{2})|(2[0-4]\d)|(\d{1,2}))\b))|(::([0-9A-Fa-f]{1,4}:){0,5}((\b((25[0-5])|(1\d{2})|(2[0-4]\d)|(\d{1,2}))\b)\.){3}(\b((25[0-5])|(1\d{2})|(2[0-4]\d)|(\d{1,2}))\b))|([0-9A-Fa-f]{1,4}::([0-9A-Fa-f]{1,4}:){0,5}[0-9A-Fa-f]{1,4})|(::([0-9A-Fa-f]{1,4}:){0,6}[0-9A-Fa-f]{1,4})|(([0-9A-Fa-f]{1,4}:){1,7}:))(|\/[0-9]{1,3})$/';
  28         private static $pattern_IPv4 = '/^[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}(|\/[0-9]{1,2})$/';
  29         private $ip6 = array();
  30         private $addr_is_ipv6 = false;
  31
  32         public function __construct($initial_value) {
  33                 for($i = 0; $i < 8; $i++) {
  34                         $this->ip6[$i] = 0;
  35                 }
  36                 if($initial_value == null) {
  37                         //nothing
  38                 } elseif(preg_match(self::$pattern_IPv6, $initial_value)) {
  39                         $this->parseIPv6($initial_value);
  40                 } elseif(preg_match(self::$pattern_IPv4, $initial_value)) {
  41                         $this->parseIPv4($initial_value);
  42                 } else {
  43                         $this->parseNumeric($initial_value);
  44                 }
  45         }
  46
  47         public function parseNumeric($numeric) {
  48                 if(strlen($numeric) == 6) { //IPv4
  49                         $value = Numerics::numToInt($numeric);
  50                         $this->ip6[6] = ($value & 0xffff0000) >> 16;
  51                         $this->ip6[7] = ($value & 0x0000ffff);
  52                         $this->addr_is_ipv6 = false;
  53                 } else { //IPv6
  54                         $j = 0;
  55                         for($i = 0; $i < strlen($numeric);) {
  56                                 if($numeric[$i] == "_") {
  57                                         $rightBlocks = (strlen($numeric) - $i - 1) / 3;
  58                                         $skipBlocks = 8 - $j - $rightBlocks;
  59                                         $j += $skipBlocks;
  60                                         $i++;
  61                                 } else {
  62                                         $value = Numerics::numToInt($numeric[$i].$numeric[$i+1].$numeric[$i+2]);
  63                                         $this->ip6[$j++] = dechex($value);
  64                                         $i += 3;
  65                                 }
  66                         }
  67                         $this->addr_is_ipv6 = true;
  68                 }
  69         }
  70
  71         public function parseIPv6($ipv6) {
  72                 if(substr($ipv6,0,2) == "::") $ipv6 = substr($ipv6, 1);
  73                 if(substr($ipv6,-2) == "::") $ipv6 = substr($ipv6, 0, -1);
  74                 $ipv6blocks = explode(":", $ipv6);
  75                 $j = 0;
  76                 foreach($ipv6blocks as $i => $block) {
  77                         if($block == "") {
  78                                 $skipBlocks = 8 - count($ipv6blocks);
  79                                 $j += $skipBlocks + 1;
  80                         } else {
  81                                 $this->ip6[$j++] = hexdec($block);
  82                         }
  83                 }
  84                 $this->addr_is_ipv6 = true;
  85         }
  86
  87         public function parseIPv4($ipv4) {
  88                 $ipv4blocks = explode(".",$ipv4);
  89                 $this->ip6[6] = intval($ipv4blocks[0]) << 8;
  90                 $this->ip6[6] |= intval($ipv4blocks[1]);
  91                 $this->ip6[7] = intval($ipv4blocks[2]) << 8;
  92                 $this->ip6[7] |= intval($ipv4blocks[3]);
  93                 $this->addr_is_ipv6 = false;
  94         }
  95
  96         public function isIPv6() {
  97                 return $this->addr_is_ipv6;
  98         }
  99
 100         public function getAddress() {
 101                 if($this->isIPv6()) {
 102                         $max_start = 0;
 103                         $max_zeros = 0;
 104                         $curr_zeros = 0;
 105                         for ($i = 0; $i < 8; $i++) {
 106                                 if ($this->ip6[$i] == 0)
 107                                 $curr_zeros++;
 108                                 else if ($curr_zeros > $max_zeros) {
 109                                         $max_start = $i - $curr_zeros;
 110                                         $max_zeros = $curr_zeros;
 111                                         $curr_zeros = 0;
 112                                 }
 113                         }
 114                         if ($curr_zeros > $max_zeros) {
 115                                 $max_start = $i - $curr_zeros;
 116                                 $max_zeros = $curr_zeros;
 117                         }
 118                         $ipv6 = "";
 119                         for($i = 0; $i < 8; $i++) {
 120                                 if($max_zeros > 1 && $i == $max_start) {
 121                                         $ipv6 .= "::";
 122                                         $i += $max_zeros - 1;
 123                                 } else {
 124                                         if($ipv6 != "") $ipv6 .= ":";
 125                                         $ipv6 .= dechex($this->ip6[$i]);
 126                                 }
 127                         }
 128                         return $ipv6;
 129                 } else {
 130                         $ipv4 = array();
 131                         $ipv4[0] = ($this->ip6[6] >> 8) & 0xff;
 132                         $ipv4[1] = ($this->ip6[6]) & 0xff;
 133                         $ipv4[2] = ($this->ip6[7] >> 8) & 0xff;
 134                         $ipv4[3] = ($this->ip6[7]) & 0xff;
 135                         return implode(".", $ipv4);
 136                 }
 137         }
 138
 139         public function getNumeric() {
 140                 if($this->isIPv6()) {
 141                         $max_start = 0;
 142                         $max_zeros = 0;
 143                         $curr_zeros = 0;
 144                         for ($i = 0; $i < 8; $i++) {
 145                                 if ($this->ip6[$i] == 0)
 146                                 $curr_zeros++;
 147                                 else if ($curr_zeros > $max_zeros) {
 148                                         $max_start = $i - $curr_zeros;
 149                                         $max_zeros = $curr_zeros;
 150                                         $curr_zeros = 0;
 151                                 }
 152                         }
 153                         if ($curr_zeros > $max_zeros) {
 154                                 $max_start = $i - $curr_zeros;
 155                                 $max_zeros = $curr_zeros;
 156                         }
 157                         $ipv6 = "";
 158                         for($i = 0; $i < 8; $i++) {
 159                                 if($max_zeros > 0 && $i == $max_start) {
 160                                         $ipv6 .= "_";
 161                                         $i += $max_zeros - 1;
 162                                 } else {
 163                                         $ipv6 .= Numerics::intToNum($this->ip6[$i],3);
 164                                 }
 165                         }
 166                         return $ipv6;
 167                 } else {
 168                         $ipv4 = array();
 169                         $ipv4[0] = Numerics::intToNum($this->ip6[6], 3);
 170                         $ipv4[1] = Numerics::intToNum($this->ip6[7], 3);
 171                         return $ipv4[0].$ipv4[1];
 172                 }
 173         }
 174
 175 }
 176
 177 ?>