※ 引述《in2 (海帶呀海帶~~)》之銘言：
: ※ 引述《SmallBeeWayn (喵喵叫的蜜蜂貓)》之銘言：
: : 最近登入一個之前寫的舊網站
: : 怎樣都登不進去，一直在研究程式碼哪裡有問題了
: : 結果後來發現，因為我有紀錄登入IP，是在MySQL中一個varchar(15)的紀錄
: : 拿來記錄IPv4("255.255.255.255")是剛好
: : 可是IPv6最長長度可以到39byte
: : ("ffff:ffff:ffff:ffff:ffff:ffff:ffff:ffff")
: : 從而導致登入失敗...
: : 記錄一下提醒給其他將網站轉往IPv6的人...
: 題外話,
: 我以為一般都是用 ip2long() / long2ip() 這類的把 ipv4
: 轉成 unsigned 32bit integer, 而不是用 string 存 15 bytes.
: 也有人改了個 ipv6 的版本,
: http://thesocialexpo.com/?a=SUBS_Blog_Display&id=12981930190593528
: 只不過有個問題是這樣子會生出一個 unsigned 128bit integer,
: 比 mysql 最大的 BIGINT (64bit) 還長一倍,
: 不知道是要怎麼存比較好呢 orz
網路上幾個比較精簡的ipv6 to binary都用到inet_pton
可是那個只有比較新的PHP有支援(win32 5.3.0+, else 5.1.0+)
所以我自己重寫了一個，輸出為長度16Byte的Binary String
支援標準IPv4(0.0.0.0),IPv6(0:0:0:0:0:0:0:0)及混和模式含:
::0.0.0.0, IPv6::0.0.0.0, IPv6::IPv6
純IPv4會前補"::" ex.192.168.0.0 => ::192.168.0.0
如果缺"."會後補零 ex.192.168.0 => 192.168.0.0
缺":"且無"::"則是前補"::" ex.c0a8:0 => ::c0a8:0
若是前後都缺 ex.c0a8:192.168 => ::c0a8:192.168.0.0
====================以下為程式碼====================
function ip2bin($ip) {
$ret=array_fill(0,8,0);
if(strpos($ip,":")!==false) { //IPv6
$ip6cs=strpos($ip,"::");
if($ip6cs!==false) {
$ip6s=explode(':',substr($ip,0,$ip6cs));
for($i=0;$i<count($ip6s);$i++) $ret[$i]=hexdec($ip6s[$i]);
$ip6s=explode(':',substr($ip,$ip6cs+2));
} else {
$ip6s=explode(':',$ip);
}
$ip6cs=count($ip6s)-1;
if(strpos($ip6s[$ip6cs],'.')) { //IPv6:IPv4
$a4=explode(".",$ip6s[$ip6cs]);
$ip6s[$ip6cs]=dechex($a4[0]*256+$a4[1]);
$ip6cs++;
$ip6s[$ip6cs]=dechex($a4[2]*256+$a4[3]);
}
for($i=0;$i<=$ip6cs;$i++) $ret[7-$ip6cs+$i]=hexdec($ip6s[$i]);
} else if(strpos($ip,'.')) { //IPv4
$a4=explode(".",$ip);
$ret[6]=$a4[0]*256+$a4[1];
$ret[7]=$a4[2]*256+$a4[3];
}
return pack("n*",$ret[0],$ret[1],$ret[2],$ret[3]
,$ret[4],$ret[5],$ret[6],$ret[7]);
}