| | |
| | | <?php |
| | | |
| | | /* |
| | | /** |
| | | +-----------------------------------------------------------------------+ |
| | | | This file is part of the Roundcube PHP suite | |
| | | | Copyright (C) 2005-2015, The Roundcube Dev Team | |
| | |
| | | | Author: Aleksander Machniak <alec@alec.pl> | |
| | | +-----------------------------------------------------------------------+ |
| | | */ |
| | | |
| | | |
| | | /** |
| | | * Roundcube Framework Initialization |
| | |
| | | } |
| | | |
| | | // framework constants |
| | | define('RCUBE_VERSION', '1.1.0'); |
| | | define('RCUBE_VERSION', '1.2-git'); |
| | | define('RCUBE_CHARSET', 'UTF-8'); |
| | | |
| | | if (!defined('RCUBE_LIB_DIR')) { |
| | |
| | | } |
| | | |
| | | // set internal encoding for mbstring extension |
| | | if (extension_loaded('mbstring')) { |
| | | if (function_exists('mb_internal_encoding')) { |
| | | mb_internal_encoding(RCUBE_CHARSET); |
| | | @mb_regex_encoding(RCUBE_CHARSET); |
| | | } |
| | | if (function_exists('mb_regex_encoding')) { |
| | | mb_regex_encoding(RCUBE_CHARSET); |
| | | } |
| | | |
| | | // make sure the Roundcube lib directory is in the include_path |
| | |
| | | spl_autoload_register('rcube_autoload'); |
| | | |
| | | // set PEAR error handling (will also load the PEAR main class) |
| | | PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, 'rcube_pear_error'); |
| | | |
| | | if (class_exists('PEAR')) { |
| | | @PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, 'rcube_pear_error'); |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Similar function as in_array() but case-insensitive |
| | | * Similar function as in_array() but case-insensitive with multibyte support. |
| | | * |
| | | * @param string $needle Needle value |
| | | * @param array $heystack Array to search in |
| | | * @param string $needle Needle value |
| | | * @param array $heystack Array to search in |
| | | * |
| | | * @return boolean True if found, False if not |
| | | */ |
| | | function in_array_nocase($needle, $haystack) |
| | | { |
| | | $needle = mb_strtolower($needle); |
| | | foreach ((array)$haystack as $value) { |
| | | if ($needle === mb_strtolower($value)) { |
| | | return true; |
| | | // use much faster method for ascii |
| | | if (is_ascii($needle)) { |
| | | foreach ((array) $haystack as $value) { |
| | | if (strcasecmp($value, $needle) === 0) { |
| | | return true; |
| | | } |
| | | } |
| | | } |
| | | else { |
| | | $needle = mb_strtolower($needle); |
| | | foreach ((array) $haystack as $value) { |
| | | if ($needle === mb_strtolower($value)) { |
| | | return true; |
| | | } |
| | | } |
| | | } |
| | | |
| | | return false; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Parse a human readable string for a number of bytes. |
| | |
| | | return floatval($bytes); |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Make sure the string ends with a slash |
| | | */ |
| | |
| | | return unslashify($str).'/'; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Remove slashes at the end of the string |
| | | */ |
| | |
| | | { |
| | | return preg_replace('/\/+$/', '', $str); |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Returns number of seconds for a specified offset string. |
| | |
| | | return $amount; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Create a unix timestamp with a specified offset from now. |
| | | * |
| | |
| | | { |
| | | return time() + get_offset_sec($offset_str) * $factor; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Truncate string if it is longer than the allowed length. |
| | |
| | | return $str; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Get all keys from array (recursive). |
| | | * |
| | |
| | | return $keys; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Remove all non-ascii and non-word chars except ., -, _ |
| | | */ |
| | |
| | | $allowed = 'a-z0-9\_\-' . (!$css_id ? '\.' : ''); |
| | | return preg_replace("/[^$allowed]/i", $replace_with, $str); |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Check if a string contains only ascii characters |
| | |
| | | $regexp = $control_chars ? '/[^\x00-\x7F]/' : '/[^\x20-\x7E]/'; |
| | | return preg_match($regexp, $str) ? false : true; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Compose a valid representation of name and e-mail address |
| | |
| | | return $email; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Format e-mail address |
| | | * |
| | |
| | | return $email; |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Fix version number so it can be used correctly in version_compare() |
| | | * |
| | |
| | | array('-stable', '-git'), |
| | | array('.0', '.99'), |
| | | $version); |
| | | } |
| | | |
| | | |
| | | /** |
| | | * mbstring replacement functions |
| | | */ |
| | | if (!extension_loaded('mbstring')) |
| | | { |
| | | function mb_strlen($str) |
| | | { |
| | | return strlen($str); |
| | | } |
| | | |
| | | function mb_strtolower($str) |
| | | { |
| | | return strtolower($str); |
| | | } |
| | | |
| | | function mb_strtoupper($str) |
| | | { |
| | | return strtoupper($str); |
| | | } |
| | | |
| | | function mb_substr($str, $start, $len=null) |
| | | { |
| | | return substr($str, $start, $len); |
| | | } |
| | | |
| | | function mb_strpos($haystack, $needle, $offset=0) |
| | | { |
| | | return strpos($haystack, $needle, $offset); |
| | | } |
| | | |
| | | function mb_strrpos($haystack, $needle, $offset=0) |
| | | { |
| | | return strrpos($haystack, $needle, $offset); |
| | | } |
| | | } |
| | | |
| | | /** |