<?php
-/********************************* PHP-P10 ******************************
- * P10 uplink class by pk910 (c)2011 pk910 *
- ************************************************************************
- * Version 2 (OOP) *
+/******************************* PHP-P10 v2 *****************************
+ * Copyright (C) 2011-2012 Philipp Kreil (pk910) *
* *
- * PHP-P10 is free software; you can redistribute it and/or modify *
+ * This program is free software: you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
- * the Free Software Foundation; either version 2 of the License, or *
+ * the Free Software Foundation, either version 3 of the License, or *
* (at your option) any later version. *
* *
* This program is distributed in the hope that it will be useful, *
* GNU General Public License for more details. *
* *
* You should have received a copy of the GNU General Public License *
- * along with PHP-P10; if not, write to the Free Software Foundation, *
- * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
+ * along with this program. If not, see <http://www.gnu.org/licenses/>. *
* *
************************************************************************
- *
+ *
* Uplink/Numerics.class.php
*
* P10 numeric functions
*
- ************************************************************************
- * accessable functions
- *
- * static String intToNum(int $int, int $length)
- * returns the numeric representing $int
- *
- * static int numToInt(String $numeric)
- * returns the integer value, the numeric represents
- *
- * static String parseIP(String $numeric)
- * parses an IP Address in numeric format
- *
- * static String numericFromIP(String $ip)
- * builds a numeric representing the IP
*/
class Numerics {
'w','x','y','z','0','1','2','3','4','5','6','7','8','9','[',']'
);
private static $base64charsLength = 64;
-
+
public static function intToNum($int, $length) {
- //fix a small "bug": normaly 0 = AAAAA but we need 1 = AAAAA
- $int = $int - 1;
-
$numeric = "";
for($pos = $length-1; $pos >= 0; $pos--) {
//current position represents floor($int / ($base64charsLength ^ $pos))
$base = $base * self::$base64charsLength;
}
$posValue = floor($int / $base);
+ $int -= $posValue * $base;
//get the char representing $posValue
$posChar = self::$base64chars[$posValue];
$numeric .= $posChar;
}
-
return $numeric;
}
-
+
public static function numToInt($numeric) {
$base = 1;
$int = 0;
for($pos = strlen($numeric)-1; $pos >= 0; $pos--) {
$posValue = array_search($numeric[$pos], self::$base64chars);
- $int = ($posValue * $base);
+ $int += ($posValue * $base);
$base = $base * self::$base64charsLength;
}
-
- //fix a small "bug": normaly 0 = AAAAA but we need 1 = AAAAA
- $int = $int + 1;
-
return $int;
}
-
- public static function parseIP($numeric, $shortForm = true) {
- if(strlen($numeric) == 6) { //IPv4
- $value = self::numToInt($numeric);
- $ip = array();
- $ip[0] = ($value & 0xff000000) >> 24;
- $ip[1] = ($value & 0x00ff0000) >> 16;
- $ip[2] = ($value & 0x0000ff00) >> 8;
- $ip[3] = ($value & 0x000000ff);
- return implode(".", $ip);
- } else { //IPv6
- $ip = array();
- for($i = 0; $i < strlen($numeric);) {
- if($numeric[$i] == "_") {
- if($shortForm) {
- $ip[] = ""; //::
- } else {
- $rightBlocks = (strlen($numeric) - ($i + 1)) / 3;
- $skipCount = 8 - count($ip) - $rightBlocks;
- for($j = 0; $j < $skipBlocks; $j++) {
- $ip[] = "0";
- }
- }
- $i++;
- } else {
- $value = self::numToInt($numeric[$i].$numeric[$i+1].$numeric[$i+2]);
- $ip[] = dechex($value);
- $i += 3;
- }
- }
- return implode(":", $ip);
- }
- }
-
- public static function numericFromIP($ip) {
- $pattern = array();
- $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})$/';
- $pattern['ipv4'] = '/^[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}(|\/[0-9]{1,2})$/';
- if(preg_match($pattern['ipv4'], $ip)) {
- //thats quite simple here
- $ip = explode(".", $ip);
- $ipValue = intval($ip[3]);
- $ipValue <<= 8;
- $ipValue |= intval($ip[2]);
- $ipValue <<= 8;
- $ipValue |= intval($ip[1]);
- $ipValue <<= 8;
- $ipValue |= intval($ip[0]);
- $ip = self::intToNum($ipValue,6);
- } else if(preg_match($pattern['ipv6'], $ip)) {
- //thats a little bit complicated :D (we may only have one _)
- $ipv6 = array();
- $ip = explode(":",$ip);
- $last_zero = false; $zero_sequence = 0; $biggest_zero_sequence = 0, $max_start = -1;
- foreach($ip as $i => $v) {
- if($v == "") {
- $skipBlocks = (8 - count($ip));
- for($j = 0; $j < $skipBlocks; $j++) {
- $ipv6[$i+$j] = "_";
- }
- $max_start = $i;
- $biggest_zero_sequence = $skipBlocks;
- } else {
- $value = hexdec($v);
- if($value == 0) {
- $ipv6[$i] = "_";
- if($last_zero) {
- $zero_sequence++;
- } else {
- $last_zero = true;
- $zero_sequence = 1;
- }
- if($zero_sequence > $biggest_zero_sequence) {
- $biggest_zero_sequence = $zero_sequence;
- $max_start = $i-($zero_sequence-1);
- }
- } else {
- $ipv6[$i] = self::intToNum($value,3);
- $last_zero = false;
- }
- }
- }
- $ip = "";
- for($i = 0; $i < 8; $i++) {
- if($i == $max_start) { //merge the biggest sequence of _'s
- $ip .= "_";
- $i += ($biggest_zero_sequence-1)
- } elseif($ipv6[$i] == "_") {
- $ip .= "AAA";
- } else {
- $ip .= $ipv6[$i];
- }
- }
- return $ip;
- } else {
- $ip = "AAAAAA";
- }
- return $ip;
- }
-
+
}
?>
\ No newline at end of file