xpressengine / xe-core

     * @param  string $input

     * @return array

     */

    protected function _ucs4_string_to_ucs4($input)

    {

        $output = array();

        $inp_len = self::byteLength($input);

        // Input length must be dividable by 4

        if ($inp_len % 4) {

            $this->_error('Input UCS4 string is broken');

            return false;

        }

        // Empty input - return empty output

        if (!$inp_len) {

            return $output;

        }

        for ($i = 0, $out_len = -1; $i < $inp_len; ++$i) {

            // Increment output position every 4 input bytes

            if (!($i % 4)) {

                $out_len++;

                $output[$out_len] = 0;

            }

            $output[$out_len] += ord($input{$i}) << (8 * (3 - ($i % 4) ) );

        }

        return $output;

    }

    /**

     * Gets the length of a string in bytes even if mbstring function

     * Convert UCS-4 string (LE in the moment) into UCS-4 garray

     * @access   private

     */

    private static function ucs4_ucs4array($input)

    {

        $output = array();

        $inp_len = strlen($input);

        // Input length must be dividable by 4

        if ($inp_len % 4) {

            throw new Exception('Input UCS4 string is broken');

        }

        // Empty input - return empty output

        if (!$inp_len) return $output;

        for ($i = 0, $out_len = -1; $i < $inp_len; ++$i) {

            if (!($i % 4)) { // Increment output position every 4 input bytes

                $out_len++;

                $output[$out_len] = 0;

            }

            $output[$out_len] += ord($input{$i}) << (8 * (3 - ($i % 4) ) );

        }

        return $output;

    }

}

?>