PHP Classes

File: Web/system/core/compat/standard.php

Recommend this page to a friend!
  Classes of Burge Lab   Burge CMF   Web/system/core/compat/standard.php   Download  
File: Web/system/core/compat/standard.php
Role: Auxiliary script
Content type: text/plain
Description: Auxiliary script
Class: Burge CMF
Framework to publish managed content
Author: By
Last change:
Date: 7 years ago
Size: 8,927 bytes
 

Contents

Class file image Download
<?php
/**
 * CodeIgniter
 *
 * An open source application development framework for PHP
 *
 * This content is released under the MIT License (MIT)
 *
 * Copyright (c) 2014 - 2015, British Columbia Institute of Technology
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 *
 * @package CodeIgniter
 * @author EllisLab Dev Team
 * @copyright Copyright (c) 2008 - 2014, EllisLab, Inc. (http://ellislab.com/)
 * @copyright Copyright (c) 2014 - 2015, British Columbia Institute of Technology (http://bcit.ca/)
 * @license http://opensource.org/licenses/MIT MIT License
 * @link http://codeigniter.com
 * @since Version 3.0.0
 * @filesource
 */
defined('BASEPATH') OR exit('No direct script access allowed');

/**
 * PHP ext/standard compatibility package
 *
 * @package CodeIgniter
 * @subpackage CodeIgniter
 * @category Compatibility
 * @author Andrey Andreev
 * @link http://codeigniter.com/user_guide/
 */

// ------------------------------------------------------------------------

if (is_php('5.5'))
{
    return;
}

// ------------------------------------------------------------------------

if ( ! function_exists('array_column'))
{
   
/**
     * array_column()
     *
     * @link http://php.net/array_column
     * @param string $array
     * @param mixed $column_key
     * @param mixed $index_key
     * @return array
     */
   
function array_column(array $array, $column_key, $index_key = NULL)
    {
        if ( !
in_array($type = gettype($column_key), array('integer', 'string', 'NULL'), TRUE))
        {
            if (
$type === 'double')
            {
               
$column_key = (int) $column_key;
            }
            elseif (
$type === 'object' && method_exists($column_key, '__toString'))
            {
               
$column_key = (string) $column_key;
            }
            else
            {
               
trigger_error('array_column(): The column key should be either a string or an integer', E_USER_WARNING);
                return
FALSE;
            }
        }

        if ( !
in_array($type = gettype($index_key), array('integer', 'string', 'NULL'), TRUE))
        {
            if (
$type === 'double')
            {
               
$index_key = (int) $index_key;
            }
            elseif (
$type === 'object' && method_exists($index_key, '__toString'))
            {
               
$index_key = (string) $index_key;
            }
            else
            {
               
trigger_error('array_column(): The index key should be either a string or an integer', E_USER_WARNING);
                return
FALSE;
            }
        }

       
$result = array();
        foreach (
$array as &$a)
        {
            if (
$column_key === NULL)
            {
               
$value = $a;
            }
            elseif (
is_array($a) && array_key_exists($column_key, $a))
            {
               
$value = $a[$column_key];
            }
            else
            {
                continue;
            }

            if (
$index_key === NULL OR ! array_key_exists($index_key, $a))
            {
               
$result[] = $value;
            }
            else
            {
               
$result[$a[$index_key]] = $value;
            }
        }

        return
$result;
    }
}

// ------------------------------------------------------------------------

if (is_php('5.4'))
{
    return;
}

// ------------------------------------------------------------------------

if ( ! function_exists('hex2bin'))
{
   
/**
     * hex2bin()
     *
     * @link http://php.net/hex2bin
     * @param string $data
     * @return string
     */
   
function hex2bin($data)
    {
        if (
in_array($type = gettype($data), array('array', 'double', 'object'), TRUE))
        {
            if (
$type === 'object' && method_exists($data, '__toString'))
            {
               
$data = (string) $data;
            }
            else
            {
               
trigger_error('hex2bin() expects parameter 1 to be string, '.$type.' given', E_USER_WARNING);
                return
NULL;
            }
        }

        if (
strlen($data) % 2 !== 0)
        {
           
trigger_error('Hexadecimal input string must have an even length', E_USER_WARNING);
            return
FALSE;
        }
        elseif ( !
preg_match('/^[0-9a-f]*$/i', $data))
        {
           
trigger_error('Input string must be hexadecimal string', E_USER_WARNING);
            return
FALSE;
        }

        return
pack('H*', $data);
    }
}

// ------------------------------------------------------------------------

if (is_php('5.3'))
{
    return;
}

// ------------------------------------------------------------------------

if ( ! function_exists('array_replace'))
{
   
/**
     * array_replace()
     *
     * @link http://php.net/array_replace
     * @return array
     */
   
function array_replace()
    {
       
$arrays = func_get_args();

        if ((
$c = count($arrays)) === 0)
        {
           
trigger_error('array_replace() expects at least 1 parameter, 0 given', E_USER_WARNING);
            return
NULL;
        }
        elseif (
$c === 1)
        {
            if ( !
is_array($arrays[0]))
            {
               
trigger_error('array_replace(): Argument #1 is not an array', E_USER_WARNING);
                return
NULL;
            }

            return
$arrays[0];
        }

       
$array = array_shift($arrays);
       
$c--;

        for (
$i = 0; $i < $c; $i++)
        {
            if ( !
is_array($arrays[$i]))
            {
               
trigger_error('array_replace(): Argument #'.($i + 2).' is not an array', E_USER_WARNING);
                return
NULL;
            }
            elseif (empty(
$arrays[$i]))
            {
                continue;
            }

            foreach (
array_keys($arrays[$i]) as $key)
            {
               
$array[$key] = $arrays[$i][$key];
            }
        }

        return
$array;
    }
}

// ------------------------------------------------------------------------

if ( ! function_exists('array_replace_recursive'))
{
   
/**
     * array_replace_recursive()
     *
     * @link http://php.net/array_replace_recursive
     * @return array
     */
   
function array_replace_recursive()
    {
       
$arrays = func_get_args();

        if ((
$c = count($arrays)) === 0)
        {
           
trigger_error('array_replace_recursive() expects at least 1 parameter, 0 given', E_USER_WARNING);
            return
NULL;
        }
        elseif (
$c === 1)
        {
            if ( !
is_array($arrays[0]))
            {
               
trigger_error('array_replace_recursive(): Argument #1 is not an array', E_USER_WARNING);
                return
NULL;
            }

            return
$arrays[0];
        }

       
$array = array_shift($arrays);
       
$c--;

        for (
$i = 0; $i < $c; $i++)
        {
            if ( !
is_array($arrays[$i]))
            {
               
trigger_error('array_replace_recursive(): Argument #'.($i + 2).' is not an array', E_USER_WARNING);
                return
NULL;
            }
            elseif (empty(
$arrays[$i]))
            {
                continue;
            }

            foreach (
array_keys($arrays[$i]) as $key)
            {
               
$array[$key] = (is_array($arrays[$i][$key]) && isset($array[$key]) && is_array($array[$key]))
                    ?
array_replace_recursive($array[$key], $arrays[$i][$key])
                    :
$arrays[$i][$key];
            }
        }

        return
$array;
    }
}

// ------------------------------------------------------------------------

if ( ! function_exists('quoted_printable_encode'))
{
   
/**
     * quoted_printable_encode()
     *
     * @link http://php.net/quoted_printable_encode
     * @param string $str
     * @return string
     */
   
function quoted_printable_encode($str)
    {
        if (
strlen($str) === 0)
        {
            return
'';
        }
        elseif (
in_array($type = gettype($str), array('array', 'object'), TRUE))
        {
            if (
$type === 'object' && method_exists($str, '__toString'))
            {
               
$str = (string) $str;
            }
            else
            {
               
trigger_error('quoted_printable_encode() expects parameter 1 to be string, '.$type.' given', E_USER_WARNING);
                return
NULL;
            }
        }

        if (
function_exists('imap_8bit'))
        {
            return
imap_8bit($str);
        }

       
$i = $lp = 0;
       
$output = '';
       
$hex = '0123456789ABCDEF';
       
$length = (extension_loaded('mbstring') && ini_get('mbstring.func_overload'))
            ?
mb_strlen($str, '8bit')
            :
strlen($str);

        while (
$length--)
        {
            if (((
$c = $str[$i++]) === "\015") && isset($str[$i]) && ($str[$i] === "\012") && $length > 0)
            {
               
$output .= "\015".$str[$i++];
               
$length--;
               
$lp = 0;
                continue;
            }

            if (
               
ctype_cntrl($c)
                OR (
ord($c) === 0x7f)
                OR (
ord($c) & 0x80)
                OR (
$c === '=')
                OR (
$c === ' ' && isset($str[$i]) && $str[$i] === "\015")
            )
            {
                if (
                    ((
$lp += 3) > 75 && ord($c) <= 0x7f)
                    OR (
ord($c) > 0x7f && ord($c) <= 0xdf && ($lp + 3) > 75)
                    OR (
ord($c) > 0xdf && ord($c) <= 0xef && ($lp + 6) > 75)
                    OR (
ord($c) > 0xef && ord($c) <= 0xf4 && ($lp + 9) > 75)
                )
                {
                   
$output .= "=\015\012";
                   
$lp = 3;
                }

               
$output .= '='.$hex[ord($c) >> 4].$hex[ord($c) & 0xf];
                continue;
            }

            if ((++
$lp) > 75)
            {
               
$output .= "=\015\012";
               
$lp = 1;
            }

           
$output .= $c;
        }

        return
$output;
    }
}