php教程 PHP源码 PHP json类

PHP json类

May 25, 2016 pm 05:13 PM

代码

use = $use;
    }

   /**
    * convert a string from one UTF-16 char to one UTF-8 char
    *
    * Normally should be handled by mb_convert_encoding, but
    * provides a slower PHP-only method for installations
    * that lack the multibye string extension.
    *
    * @param    string  $utf16  UTF-16 character
    * @return   string  UTF-8 character
    * @access   private
    */
    function utf162utf8($utf16)
    {
        // oh please oh please oh please oh please oh please
        if(function_exists('mb_convert_encoding')) {
            return mb_convert_encoding($utf16, 'UTF-8', 'UTF-16');
        }

        $bytes = (ord($utf16{0}) << 8) | ord($utf16{1});

        switch(true) {
            case ((0x7F & $bytes) == $bytes):
                // this case should never be reached, because we are in ASCII range
                // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                return chr(0x7F & $bytes);

            case (0x07FF & $bytes) == $bytes:
                // return a 2-byte UTF-8 character
                // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                return chr(0xC0 | (($bytes >> 6) & 0x1F))
                     . chr(0x80 | ($bytes & 0x3F));

            case (0xFFFF & $bytes) == $bytes:
                // return a 3-byte UTF-8 character
                // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                return chr(0xE0 | (($bytes >> 12) & 0x0F))
                     . chr(0x80 | (($bytes >> 6) & 0x3F))
                     . chr(0x80 | ($bytes & 0x3F));
        }

        // ignoring UTF-32 for now, sorry
        return &#39;&#39;;
    }

   /**
    * convert a string from one UTF-8 char to one UTF-16 char
    *
    * Normally should be handled by mb_convert_encoding, but
    * provides a slower PHP-only method for installations
    * that lack the multibye string extension.
    *
    * @param    string  $utf8   UTF-8 character
    * @return   string  UTF-16 character
    * @access   private
    */
    function utf82utf16($utf8)
    {
        // oh please oh please oh please oh please oh please
        if(function_exists(&#39;mb_convert_encoding&#39;)) {
            return mb_convert_encoding($utf8, &#39;UTF-16&#39;, &#39;UTF-8&#39;);
        }

        switch(strlen($utf8)) {
            case 1:
                // this case should never be reached, because we are in ASCII range
                // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                return $utf8;

            case 2:
                // return a UTF-16 character from a 2-byte UTF-8 char
                // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                return chr(0x07 & (ord($utf8{0}) >> 2))
                     . chr((0xC0 & (ord($utf8{0}) << 6))
                         | (0x3F & ord($utf8{1})));

            case 3:
                // return a UTF-16 character from a 3-byte UTF-8 char
                // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                return chr((0xF0 & (ord($utf8{0}) << 4))
                         | (0x0F & (ord($utf8{1}) >> 2)))
                     . chr((0xC0 & (ord($utf8{1}) << 6))
                         | (0x7F & ord($utf8{2})));
        }

        // ignoring UTF-32 for now, sorry
        return &#39;&#39;;
    }

   /**
    * encodes an arbitrary variable into JSON format
    *
    * @param    mixed   $var    any number, boolean, string, array, or object to be encoded.
    *                           see argument 1 to Services_JSON() above for array-parsing behavior.
    *                           if var is a strng, note that encode() always expects it
    *                           to be in ASCII or UTF-8 format!
    *
    * @return   mixed   JSON string representation of input var or an error if a problem occurs
    * @access   public
    */
    function encode($var)
    {
        switch (gettype($var)) {
            case &#39;boolean&#39;:
                return $var ? &#39;true&#39; : &#39;false&#39;;

            case &#39;NULL&#39;:
                return &#39;null&#39;;

            case &#39;integer&#39;:
                return (int) $var;

            case &#39;double&#39;:
            case &#39;float&#39;:
                return (float) $var;

            case &#39;string&#39;:
                // STRINGS ARE EXPECTED TO BE IN ASCII OR UTF-8 FORMAT
                $ascii = &#39;&#39;;
                $strlen_var = strlen($var);

               /*
                * Iterate over every character in the string,
                * escaping with a slash or encoding to UTF-8 where necessary
                */
                for ($c = 0; $c < $strlen_var; ++$c) {

                    $ord_var_c = ord($var{$c});

                    switch (true) {
                        case $ord_var_c == 0x08:
                            $ascii .= &#39;\b&#39;;
                            break;
                        case $ord_var_c == 0x09:
                            $ascii .= &#39;\t&#39;;
                            break;
                        case $ord_var_c == 0x0A:
                            $ascii .= &#39;\n&#39;;
                            break;
                        case $ord_var_c == 0x0C:
                            $ascii .= &#39;\f&#39;;
                            break;
                        case $ord_var_c == 0x0D:
                            $ascii .= &#39;\r&#39;;
                            break;

                        case $ord_var_c == 0x22:
                        case $ord_var_c == 0x2F:
                        case $ord_var_c == 0x5C:
                            // double quote, slash, slosh
                            $ascii .= &#39;\\&#39;.$var{$c};
                            break;

                        case (($ord_var_c >= 0x20) && ($ord_var_c utf82utf16($char);
                            $ascii .= sprintf(&#39;\u%04s&#39;, bin2hex($utf16));
                            break;

                        case (($ord_var_c & 0xF0) == 0xE0):
                            // characters U-00000800 - U-0000FFFF, mask 1110XXXX
                            // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                            $char = pack(&#39;C*&#39;, $ord_var_c,
                                         ord($var{$c + 1}),
                                         ord($var{$c + 2}));
                            $c += 2;
                            $utf16 = $this->utf82utf16($char);
                            $ascii .= sprintf(&#39;\u%04s&#39;, bin2hex($utf16));
                            break;

                        case (($ord_var_c & 0xF8) == 0xF0):
                            // characters U-00010000 - U-001FFFFF, mask 11110XXX
                            // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                            $char = pack(&#39;C*&#39;, $ord_var_c,
                                         ord($var{$c + 1}),
                                         ord($var{$c + 2}),
                                         ord($var{$c + 3}));
                            $c += 3;
                            $utf16 = $this->utf82utf16($char);
                            $ascii .= sprintf(&#39;\u%04s&#39;, bin2hex($utf16));
                            break;

                        case (($ord_var_c & 0xFC) == 0xF8):
                            // characters U-00200000 - U-03FFFFFF, mask 111110XX
                            // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                            $char = pack(&#39;C*&#39;, $ord_var_c,
                                         ord($var{$c + 1}),
                                         ord($var{$c + 2}),
                                         ord($var{$c + 3}),
                                         ord($var{$c + 4}));
                            $c += 4;
                            $utf16 = $this->utf82utf16($char);
                            $ascii .= sprintf(&#39;\u%04s&#39;, bin2hex($utf16));
                            break;

                        case (($ord_var_c & 0xFE) == 0xFC):
                            // characters U-04000000 - U-7FFFFFFF, mask 1111110X
                            // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
                            $char = pack(&#39;C*&#39;, $ord_var_c,
                                         ord($var{$c + 1}),
                                         ord($var{$c + 2}),
                                         ord($var{$c + 3}),
                                         ord($var{$c + 4}),
                                         ord($var{$c + 5}));
                            $c += 5;
                            $utf16 = $this->utf82utf16($char);
                            $ascii .= sprintf(&#39;\u%04s&#39;, bin2hex($utf16));
                            break;
                    }
                }

                return &#39;"&#39;.$ascii.&#39;"&#39;;

            case &#39;array&#39;:
               /*
                * As per JSON spec if any array key is not an integer
                * we must treat the the whole array as an object. We
                * also try to catch a sparsely populated associative
                * array with numeric keys here because some JS engines
                * will create an array with empty indexes up to
                * max_index which can cause memory issues and because
                * the keys, which may be relevant, will be remapped
                * otherwise.
                *
                * As per the ECMA and JSON specification an object may
                * have any string as a property. Unfortunately due to
                * a hole in the ECMA specification if the key is a
                * ECMA reserved word or starts with a digit the
                * parameter is only accessible using ECMAScript&#39;s
                * bracket notation.
                */

                // treat as a JSON object
                if (is_array($var) && count($var) && (array_keys($var) !== range(0, sizeof($var) - 1))) {
                    $properties = array_map(array($this, &#39;name_value&#39;),
                                            array_keys($var),
                                            array_values($var));

                    foreach($properties as $property) {
                        if(Services_JSON::isError($property)) {
                            return $property;
                        }
                    }

                    return &#39;{&#39; . join(&#39;,&#39;, $properties) . &#39;}&#39;;
                }

                // treat it like a regular array
                $elements = array_map(array($this, &#39;encode&#39;), $var);

                foreach($elements as $element) {
                    if(Services_JSON::isError($element)) {
                        return $element;
                    }
                }

                return &#39;[&#39; . join(&#39;,&#39;, $elements) . &#39;]&#39;;

            case &#39;object&#39;:
                $vars = get_object_vars($var);

                $properties = array_map(array($this, &#39;name_value&#39;),
                                        array_keys($vars),
                                        array_values($vars));

                foreach($properties as $property) {
                    if(Services_JSON::isError($property)) {
                        return $property;
                    }
                }

                return &#39;{&#39; . join(&#39;,&#39;, $properties) . &#39;}&#39;;

            default:
                return ($this->use & SERVICES_JSON_SUPPRESS_ERRORS)
                    ? &#39;null&#39;
                    : new Services_JSON_Error(gettype($var)." can not be encoded as JSON string");
        }
    }

   /**
    * array-walking function for use in generating JSON-formatted name-value pairs
    *
    * @param    string  $name   name of key to use
    * @param    mixed   $value  reference to an array element to be encoded
    *
    * @return   string  JSON-formatted name-value pair, like &#39;"name":value&#39;
    * @access   private
    */
    function name_value($name, $value)
    {
        $encoded_value = $this->encode($value);

        if(Services_JSON::isError($encoded_value)) {
            return $encoded_value;
        }

        return $this->encode(strval($name)) . &#39;:&#39; . $encoded_value;
    }

   /**
    * reduce a string by removing leading and trailing comments and whitespace
    *
    * @param    $str    string      string value to strip of comments and whitespace
    *
    * @return   string  string value stripped of comments and whitespace
    * @access   private
    */
    function reduce_string($str)
    {
        $str = preg_replace(array(

                // eliminate single line comments in &#39;// ...&#39; form
                &#39;#^\s*//(.+)$#m&#39;,

                // eliminate multi-line comments in &#39;/* ... */&#39; form, at start of string
                &#39;#^\s*/\*(.+)\*/#Us&#39;,

                // eliminate multi-line comments in &#39;/* ... */&#39; form, at end of string
                &#39;#/\*(.+)\*/\s*$#Us&#39;

            ), &#39;&#39;, $str);

        // eliminate extraneous space
        return trim($str);
    }

   /**
    * decodes a JSON string into appropriate variable
    *
    * @param    string  $str    JSON-formatted string
    *
    * @return   mixed   number, boolean, string, array, or object
    *                   corresponding to given JSON input string.
    *                   See argument 1 to Services_JSON() above for object-output behavior.
    *                   Note that decode() always returns strings
    *                   in ASCII or UTF-8 format!
    * @access   public
    */
    function decode($str)
    {
        $str = $this->reduce_string($str);

        switch (strtolower($str)) {
            case &#39;true&#39;:
                return true;

            case &#39;false&#39;:
                return false;

            case &#39;null&#39;:
                return null;

            default:
                $m = array();

                if (is_numeric($str)) {
                    // Lookie-loo, it&#39;s a number

                    // This would work on its own, but I&#39;m trying to be
                    // good about returning integers where appropriate:
                    // return (float)$str;

                    // Return float or int, as appropriate
                    return ((float)$str == (integer)$str)
                        ? (integer)$str
                        : (float)$str;

                } elseif (preg_match(&#39;/^("|\&#39;).*(\1)$/s&#39;, $str, $m) && $m[1] == $m[2]) {
                    // STRINGS RETURNED IN UTF-8 FORMAT
                    $delim = substr($str, 0, 1);
                    $chrs = substr($str, 1, -1);
                    $utf8 = &#39;&#39;;
                    $strlen_chrs = strlen($chrs);

                    for ($c = 0; $c < $strlen_chrs; ++$c) {

                        $substr_chrs_c_2 = substr($chrs, $c, 2);
                        $ord_chrs_c = ord($chrs{$c});

                        switch (true) {
                            case $substr_chrs_c_2 == &#39;\b&#39;:
                                $utf8 .= chr(0x08);
                                ++$c;
                                break;
                            case $substr_chrs_c_2 == &#39;\t&#39;:
                                $utf8 .= chr(0x09);
                                ++$c;
                                break;
                            case $substr_chrs_c_2 == &#39;\n&#39;:
                                $utf8 .= chr(0x0A);
                                ++$c;
                                break;
                            case $substr_chrs_c_2 == &#39;\f&#39;:
                                $utf8 .= chr(0x0C);
                                ++$c;
                                break;
                            case $substr_chrs_c_2 == &#39;\r&#39;:
                                $utf8 .= chr(0x0D);
                                ++$c;
                                break;

                            case $substr_chrs_c_2 == &#39;\\"&#39;:
                            case $substr_chrs_c_2 == &#39;\\\&#39;&#39;:
                            case $substr_chrs_c_2 == &#39;\\\\&#39;:
                            case $substr_chrs_c_2 == &#39;\\/&#39;:
                                if (($delim == &#39;"&#39; && $substr_chrs_c_2 != &#39;\\\&#39;&#39;) ||
                                   ($delim == "&#39;" && $substr_chrs_c_2 != &#39;\\"&#39;)) {
                                    $utf8 .= $chrs{++$c};
                                }
                                break;

                            case preg_match(&#39;/\\\u[0-9A-F]{4}/i&#39;, substr($chrs, $c, 6)):
                                // single, escaped unicode character
                                $utf16 = chr(hexdec(substr($chrs, ($c + 2), 2)))
                                       . chr(hexdec(substr($chrs, ($c + 4), 2)));
                                $utf8 .= $this->utf162utf8($utf16);
                                $c += 5;
                                break;

                            case ($ord_chrs_c >= 0x20) && ($ord_chrs_c use & SERVICES_JSON_LOOSE_TYPE) {
                            $stk = array(SERVICES_JSON_IN_OBJ);
                            $obj = array();
                        } else {
                            $stk = array(SERVICES_JSON_IN_OBJ);
                            $obj = new stdClass();
                        }
                    }

                    array_push($stk, array(&#39;what&#39;  => SERVICES_JSON_SLICE,
                                           &#39;where&#39; => 0,
                                           &#39;delim&#39; => false));

                    $chrs = substr($str, 1, -1);
                    $chrs = $this->reduce_string($chrs);

                    if ($chrs == &#39;&#39;) {
                        if (reset($stk) == SERVICES_JSON_IN_ARR) {
                            return $arr;

                        } else {
                            return $obj;

                        }
                    }

                    //print("\nparsing {$chrs}\n");

                    $strlen_chrs = strlen($chrs);

                    for ($c = 0; $c decode($parts[1]);
                                    $val = $this->decode($parts[2]);

                                    if ($this->use & SERVICES_JSON_LOOSE_TYPE) {
                                        $obj[$key] = $val;
                                    } else {
                                        $obj->$key = $val;
                                    }
                                } elseif (preg_match(&#39;/^\s*(\w+)\s*:\s*(\S.*),?$/Uis&#39;, $slice, $parts)) {
                                    // name:value pair, where name is unquoted
                                    $key = $parts[1];
                                    $val = $this->decode($parts[2]);

                                    if ($this->use & SERVICES_JSON_LOOSE_TYPE) {
                                        $obj[$key] = $val;
                                    } else {
                                        $obj->$key = $val;
                                    }
                                }

                            }

                        } elseif ((($chrs{$c} == &#39;"&#39;) || ($chrs{$c} == "&#39;")) && ($top[&#39;what&#39;] != SERVICES_JSON_IN_STR)) {
                            // found a quote, and we are not inside a string
                            array_push($stk, array(&#39;what&#39; => SERVICES_JSON_IN_STR, &#39;where&#39; => $c, &#39;delim&#39; => $chrs{$c}));
                            //print("Found start of string at {$c}\n");

                        } elseif (($chrs{$c} == $top[&#39;delim&#39;]) &&
                                 ($top[&#39;what&#39;] == SERVICES_JSON_IN_STR) &&
                                 ((strlen(substr($chrs, 0, $c)) - strlen(rtrim(substr($chrs, 0, $c), &#39;\\&#39;))) % 2 != 1)) {
                            // found a quote, we&#39;re in a string, and it&#39;s not escaped
                            // we know that it&#39;s not escaped becase there is _not_ an
                            // odd number of backslashes at the end of the string so far
                            array_pop($stk);
                            //print("Found end of string at {$c}: ".substr($chrs, $top[&#39;where&#39;], (1 + 1 + $c - $top[&#39;where&#39;]))."\n");

                        } elseif (($chrs{$c} == &#39;[&#39;) &&
                                 in_array($top[&#39;what&#39;], array(SERVICES_JSON_SLICE, SERVICES_JSON_IN_ARR, SERVICES_JSON_IN_OBJ))) {
                            // found a left-bracket, and we are in an array, object, or slice
                            array_push($stk, array(&#39;what&#39; => SERVICES_JSON_IN_ARR, &#39;where&#39; => $c, &#39;delim&#39; => false));
                            //print("Found start of array at {$c}\n");

                        } elseif (($chrs{$c} == &#39;]&#39;) && ($top[&#39;what&#39;] == SERVICES_JSON_IN_ARR)) {
                            // found a right-bracket, and we&#39;re in an array
                            array_pop($stk);
                            //print("Found end of array at {$c}: ".substr($chrs, $top[&#39;where&#39;], (1 + $c - $top[&#39;where&#39;]))."\n");

                        } elseif (($chrs{$c} == &#39;{&#39;) &&
                                 in_array($top[&#39;what&#39;], array(SERVICES_JSON_SLICE, SERVICES_JSON_IN_ARR, SERVICES_JSON_IN_OBJ))) {
                            // found a left-brace, and we are in an array, object, or slice
                            array_push($stk, array(&#39;what&#39; => SERVICES_JSON_IN_OBJ, &#39;where&#39; => $c, &#39;delim&#39; => false));
                            //print("Found start of object at {$c}\n");

                        } elseif (($chrs{$c} == &#39;}&#39;) && ($top[&#39;what&#39;] == SERVICES_JSON_IN_OBJ)) {
                            // found a right-brace, and we&#39;re in an object
                            array_pop($stk);
                            //print("Found end of object at {$c}: ".substr($chrs, $top[&#39;where&#39;], (1 + $c - $top[&#39;where&#39;]))."\n");

                        } elseif (($substr_chrs_c_2 == &#39;/*&#39;) &&
                                 in_array($top[&#39;what&#39;], array(SERVICES_JSON_SLICE, SERVICES_JSON_IN_ARR, SERVICES_JSON_IN_OBJ))) {
                            // found a comment start, and we are in an array, object, or slice
                            array_push($stk, array(&#39;what&#39; => SERVICES_JSON_IN_CMT, &#39;where&#39; => $c, &#39;delim&#39; => false));
                            $c++;
                            //print("Found start of comment at {$c}\n");

                        } elseif (($substr_chrs_c_2 == &#39;*/&#39;) && ($top[&#39;what&#39;] == SERVICES_JSON_IN_CMT)) {
                            // found a comment end, and we&#39;re in one now
                            array_pop($stk);
                            $c++;

                            for ($i = $top[&#39;where&#39;]; $i
로그인 후 복사
본 웹사이트의 성명
본 글의 내용은 네티즌들의 자발적인 기여로 작성되었으며, 저작권은 원저작자에게 있습니다. 본 사이트는 이에 상응하는 법적 책임을 지지 않습니다. 표절이나 침해가 의심되는 콘텐츠를 발견한 경우 admin@php.cn으로 문의하세요.

핫 AI 도구

Undresser.AI Undress

Undresser.AI Undress

사실적인 누드 사진을 만들기 위한 AI 기반 앱

AI Clothes Remover

AI Clothes Remover

사진에서 옷을 제거하는 온라인 AI 도구입니다.

Undress AI Tool

Undress AI Tool

무료로 이미지를 벗다

Clothoff.io

Clothoff.io

AI 옷 제거제

Video Face Swap

Video Face Swap

완전히 무료인 AI 얼굴 교환 도구를 사용하여 모든 비디오의 얼굴을 쉽게 바꾸세요!

뜨거운 도구

메모장++7.3.1

메모장++7.3.1

사용하기 쉬운 무료 코드 편집기

SublimeText3 중국어 버전

SublimeText3 중국어 버전

중국어 버전, 사용하기 매우 쉽습니다.

스튜디오 13.0.1 보내기

스튜디오 13.0.1 보내기

강력한 PHP 통합 개발 환경

드림위버 CS6

드림위버 CS6

시각적 웹 개발 도구

SublimeText3 Mac 버전

SublimeText3 Mac 버전

신 수준의 코드 편집 소프트웨어(SublimeText3)