source: branches/version-2_12-multilang/data/class/helper/SC_Helper_Locale.php @ 22186

<?php
/*
 * This file is part of EC-CUBE
 *
 * Copyright(c) 2000-2011 LOCKON CO.,LTD. All Rights Reserved.
 *
 * http://www.lockon.co.jp/
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */

require DATA_REALDIR . 'module/Locale/streams.php';
require DATA_REALDIR . 'module/Locale/gettext.php';

/**
 * Helper class for localization.
 * Library of static method.
 *
 * @package Helper
 * @author LOCKON CO.,LTD.
 * @version $Id$
 */
class SC_Helper_Locale {

    /**
     * Store the instance of SC_Helper_Locale_Ex.
     * @var SC_Helper_Locale
     */
     static $_instance = NULL;

     public $_translations = array();

     /**
     * Return a string which corresponding with message alias.
     *
     * @param   string  $string     message alias
     * @param   array   $options    options
     * @return  string  a string corresponding with message alias
     */
     public static function get_locale($string, &$options) {
        is_null(SC_Helper_Locale_Ex::$_instance) and SC_Helper_Locale_Ex::$_instance = new SC_Helper_Locale_Ex();

        // If language code is not specified, use site default.
        if (empty($options['lang_code'])) {
            $lang_code = $options['lang_code'] = defined('LANG_CODE') ? LANG_CODE : 'en';
        } else {
            $lang_code = $options['lang_code'];
        }
        // If device type ID is not specified, detect the viewing device.
        if (!isset($options['device_type_id']) || ($options['device_type_id'] !== FALSE && !strlen($options['device_type_id']))) {
            if (method_exists('SC_Display_Ex', 'detectDevice')) {
                $device_type_id = SC_Display_Ex::detectDevice();
            } else {
                $device_type_id = FALSE;
            }
        } else {
            $device_type_id = $options['device_type_id'];
        }

        $return = $string;
        // Get string list of specified language.
        if ($lang_code != 'en') {
            $translations = SC_Helper_Locale_Ex::$_instance->get_translations($lang_code, $device_type_id);
            // Whether a string which corresponding with alias is exist.
            if (isset($translations[$return])) {
                $return = $translations[$return];
            }
        }

        $esc_types = $options['escape'];
        if (is_null($esc_types) && $string[0] !== '<') {
            $esc_types = 'h';
        }
        foreach (explode(',', $esc_types) as $esc_type) {
            switch ($esc_type) {
                case 'h':
                case 'html':
                    $return = htmlspecialchars($return, ENT_QUOTES);
                    break;

                case 'j':
                case 'javascript':
                    // escape quotes and backslashes, newlines, etc.
                    $return = strtr($return, array('\\'=>'\\\\',"'"=>"\\'",'"'=>'\\"',"\r"=>'\\r',"\n"=>'\\n','</'=>'<\/'));
                    break;

                case 'nl2br':
                    $return = nl2br($return, true);
                    break;

                case '':
                case 'none':
                    break;

                case 'htmlall':
                    $return = htmlentities($return, ENT_QUOTES);
                    break;

                case 'u':
                case 'url':
                    $return = rawurlencode($return);
                    break;

                case 'urlpathinfo':
                    $return = str_replace('%2F','/',rawurlencode($return));
                    break;

                case 'quotes':
                    // escape unescaped single quotes
                    $return = preg_replace("%(?<!\\\\)'%", "\\'", $return);
                    break;

                case 'hex':
                    // escape every character into hex
                    $text = '';
                    for ($x=0; $x < strlen($return); $x++) {
                        $text .= '%' . bin2hex($return[$x]);
                    }
                    $return = $text;
                    break;

                case 'hexentity':
                    $text = '';
                    for ($x=0; $x < strlen($return); $x++) {
                        $text .= '&#x' . bin2hex($return[$x]) . ';';
                    }
                    $return = $text;
                    break;

                case 'decentity':
                    $text = '';
                    for ($x=0; $x < strlen($return); $x++) {
                        $text .= '&#' . ord($return[$x]) . ';';
                    }
                    $return = $text;
                    break;

                case 'mail':
                    // safe way to display e-mail address on a web page
                    $return = str_replace(array('@', '.'),array(' [AT] ', ' [DOT] '), $return);
                    break;

                case 'nonstd':
                   // escape non-standard chars, such as ms document quotes
                   $_res = '';
                   for($_i = 0, $_len = strlen($return); $_i < $_len; $_i++) {
                       $_ord = ord(substr($return, $_i, 1));
                       // non-standard char, escape it
                       if($_ord >= 126){
                           $_res .= '&#' . $_ord . ';';
                       }
                       else {
                           $_res .= substr($return, $_i, 1);
                       }
                   }
                   $return = $_res;
                    break;

                default:
                    trigger_error('unknown escape type. ' . var_export(func_get_args(), true), E_USER_WARNING);
                    break;
            }
        }

        return $return;
    }

    /**
     * Return a string which corresponding with message alias.
     *
     * @param   string  $single     message alias (single)
     * @param   string  $plural     message alias (plural)
     * @param   array   $options    options
     * @return  array
     */
    public static function get_locale_plural($single, $plural, &$options) {
        // Plural strings are coupled with a null character.
        $key = $single . chr(0) . $plural;
        // Get a string of specified language which corresponds to the message alias.
        $translated = SC_Helper_Locale_Ex::get_locale($key, $options);
        // Divide with a null character.
        return explode(chr(0), $translated);
    }

    /**
     * Get the strings of specified language from locale files.
     *
     * @param   string  $lang_code      language code
     * @param   integer $device_type_id device type ID
     * @return  array   strings
     */
    function get_translations($lang_code, $device_type_id = FALSE) {
        $translations_key = "translations_" . $lang_code . "_" . $device_type_id;
        // If the strings of specified language is not loaded
        if (empty($this->_translations[$translations_key])) {
            $translations = array();

            // Get a list of files to load.
            $file_list = $this->get_locale_file_list($lang_code, $device_type_id);

            // Get the strings from each locale file using php_gettext.
            foreach ($file_list as $locale_file) {
                $stream = new FileReader($locale_file);
                $gettext = new gettext_reader($stream);

                $gettext->load_tables();
                $translations = array_merge($translations, $gettext->cache_translations);
            }

            $this->_translations[$translations_key] = $translations;
        }

        return $this->_translations[$translations_key];
    }

    /**
     * Get a list of locale files.
     *
     * @param   string  $lang_code      language code
     * @param   integer $device_type_id device type ID
     * @return  array   file list
     */
    function get_locale_file_list($lang_code, $device_type_id = FALSE) {
        $file_list = array();

        // Path to the EC-CUBE Core locale file.
        $core_locale_path = DATA_REALDIR . "locales/{$lang_code}.mo";
        // If a locale file of specified language is exist, add to the file list.
        if (file_exists($core_locale_path)) {
            $file_list[] = $core_locale_path;
        }

        // Get a list of enabled plugins.
        if (defined(PLUGIN_UPLOAD_REALDIR)) {
            $arrPluginDataList = SC_Plugin_Util_Ex::getEnablePlugin();
            // Get the plugins directory.
            $arrPluginDirectory = SC_Plugin_Util_Ex::getPluginDirectory();
            foreach ($arrPluginDataList as $arrPluginData) {
                // Check that the plugin filename is contained in the list of plugins directory.
                if (array_search($arrPluginData['plugin_code'], $arrPluginDirectory) !== false) {
                    // Path to the plugin locale file.
                    $plugin_locale_path = PLUGIN_UPLOAD_REALDIR . $arrPluginData['plugin_code'] . "/locales/{$lang_code}.mo";
                    // If a locale file of specified language is exist, add to the file list.
                    if (file_exists($plugin_locale_path)) {
                        $file_list[] = $plugin_locale_path;
                    }
                }
            }
        }

        // Path to the template locale file.
        if ($device_type_id !== FALSE) {
            $template_locale_path = HTML_REALDIR . SC_Helper_PageLayout_Ex::getUserDir($device_type_id, true) . "locales/{$lang_code}.mo";
            // If a locale file of specified language is exist, add to the file list.
            if (file_exists($template_locale_path)) {
                $file_list[] = $template_locale_path;
            }
        }

        return $file_list;
    }
}