Solution to the issue of IPV6ip2long in php

In a 32-bit system, ip2long cannot be converted to IPv6, but you can convert ip2bin and bin2ip. This function is converted to IPv4 and IPv6, and false is returned. if it is invalid, the instance program: & lt ;? Phpfunctionip

In a 32-bit system, ip2long cannot be converted to IPv6, but you can convert ip2bin and bin2ip. This function is converted to IPv4 and IPv6, and false is returned. if it is invalid, the instance program:

2. Function ip2bin ($ ip)
3. {
4. If (filter_var ($ ip, FILTER_VALIDATE_IP, FILTER_FLAG_IPV4 )! = False)
5. Return base_convert (ip2long ($ ip), 10, 2 );
6. If (filter_var ($ ip, FILTER_VALIDATE_IP, FILTER_FLAG_IPV6) = false)
7. Return false;
8. If ($ ip_n = inet_ton ($ ip) === false) return false;
9. $ Bits = 15; // 16x8 bit = 128bit (ipv6)
10. While ($ bits> = 0)
11. {
12. $ Bin = sprintf ("% 08b", (ord ($ ip_n [$ bits]);
13. $ Ipbin = $ bin. $ ipbin;
14. $ Bits --;
15. }
16. Return $ ipbin;
17. }
18.  
19. Function bin2ip ($ bin)
20. {
21. If (strlen ($ bin) <= 32) // 32 bits (ipv4)
22. Return long2ip (base_convert ($ bin, 2, 10 ));
23. If (strlen ($ bin )! = 128)
24. Return false;
25. $ Pad = 128-strlen ($ bin );
26. For ($ I = 1; $ I <= $ pad; $ I ++)
27. {
28. $ Bin = "0". $ bin;
29. }
30. $ Bits = 0;
31. While ($ bits <= 7)
32. {
33. $ Bin_part = substr ($ bin, ($ bits * 16), 16 );
34. $ Ipv6. = dechex (bindec ($ bin_part )).":";
35. $ Bits ++;
36. }
37. Return inet_ntop (inet_ton (substr ($ ipv6, 0,-1 )));
38. }
39. ?>