См. ip2long() и inet_pton().

Редактировать: в PHP_Compat пакет.

<?php

/**
 * @copyright   2004-2007 Aidan Lister <[email protected]>, Arpad Ray <[email protected]>
 * @link        http://php.net/inet_pton
 * @author      Arpad Ray <[email protected]>
 */
function php_compat_inet_pton($address) {
    // Convert to IPv4 (numeric representation)
    $r = ip2long($address);

    // ip2long() will return FALSE if it's an invalid IPv4 address (or -1 if PHP earlier than 5.0.0)
    if ($r !== false && $r != -1)
        // if it didn't, then it *is* a valid IPv4 address
        // We pack the number as unsigned long (always 32 bit, big endian byte order) and we're done
        return pack('N', $r);

    // Count the number of delimiters (:)
    $delim_count = substr_count($address, ':');

    // If none or more than 7, the address is not valid
    if ($delim_count < 1 || $delim_count > 7) return false;

    // Create an array with the delimited substrings
    $r = explode(':', $address);

    // Count the number of items
    $rcount = count($r);

    // If we have empty items, fetch the position of the first one
    if (($doub = array_search('', $r, 1)) !== false) {

        // We fill a $length variable with this rule:
        // - If it's the first or last item ---> 2
        // - Otherwhise                     ---> 1
        $length = (!$doub || $doub == $rcount - 1 ? 2 : 1);

        // Remove a portion of the array and replace it with something else
        array_splice($r,

            // We skip items before the empty one
            $doub,

            // We remove one or two items
            $length,

            // We replace each removed value with zeros
            array_fill(0, 8 + $length - $rcount, 0)

        );
    }

    // We convert each item from hexadecimal to decimal
    $r = array_map('hexdec', $r);

    // We add 'n*' at the beginning of the array (just a trick to use pack on all the items)
    array_unshift($r, 'n*');

    // We pack all the items as unsigned shorts (always 16 bit, big endian byte order)
    $r = call_user_func_array('pack', $r);

    // Return the resulting string
    return $r;
}

Я буду использовать следующий URL для написания нужной мне функции:

http://www.zytrax.com/tech/protocols/ipv6.html

Я отредактирую код функции.

Изменить Вот оно: надеюсь, люди сочтут это полезным.

class Connect {
    /**
     * Returns the IP in it's fullest format.
     * @example
     *          ::1              => 0000:0000:0000:0000:0000:0000:0000:0001
     *          220F::127.0.0.1  => 220F:0000:0000:0000:0000:0000:7F00:0001
     *          2F:A1::1         => 002F:00A1:0000:0000:0000:0000:0000:0001
     * @param string $ip Original/compressed/packed IPv6.
     * @return string Full IP.
     */
    protected static function fixIpv6($ip){
        // fix double colon
        if(strpos($ip,'::')!==false)$ip=str_replace('::',str_repeat(':',9-substr_count($ip,':')),$ip);
        // fix each slot
        $ip=explode(':',$ip);
        foreach($ip as $k=>$v){
            // fix empty/compressed slots
            $ip[$k]=$v=str_pad($v,4,'0',STR_PAD_LEFT);
            // fix ipv4-style slot
            if(strpos($v,'.')!==false){
                // initially empty buffer
                $ip[$k]='';
                // replace each number(byte) with a two-digit hex representation
                foreach(explode('.',$v) as $v2){
                    $v=dechex(min((int)$v2,255));
                    if(strlen($v)==1)$v='0'.$v;
                    $ip[$k].=$v;
                }
                // add colon in between two pairs(bytes) (FFFFFFFF=>FFFF:FFFF)
                $ip[$k]=implode(':',str_split($ip[$k],4));
            }
        }
        return strtoupper(implode(':',$ip));
    }
    /**
     * Compresses an IP to it's binary representation.
     * @param string $ip A well-formatted full IPv4 or IPv6 address.
     * @return string Binary representation of address.
     */
    public static function compressIp($ip){
        if(strpos($ip,':')!==false){ // ipv6
        $ip=str_split(str_replace(':','',self::fixIpv6($ip)),2);
        foreach($ip as $k=>$v)$ip[$k]=chr(hexdec($v));
        return implode('',$ip);
        }elseif(strpos($ip,'.')!==false){ // ipv4
            $ip=explode('.',$ip);
            if(count($ip)!=4)$ip=array(0,0,0,0);
            return chr($ip[0]).chr($ip[1]).chr($ip[2]).chr($ip[3]);
        }else throw new Exception('Unrecognized IP format: '.MB_SECURITY::snohtml($ip));
    }
}