X-Git-Url: https://scripts.mit.edu/gitweb/autoinstalls/wordpress.git/blobdiff_plain/177fd6fefd2e3d5a0ea6591c71d660cabdb3c1a4..fa11948979fd6a4ea5705dc613b239699a459db3:/wp-includes/l10n.php diff --git a/wp-includes/l10n.php b/wp-includes/l10n.php index 0584f9da..0687ca6b 100644 --- a/wp-includes/l10n.php +++ b/wp-includes/l10n.php @@ -7,302 +7,606 @@ */ /** - * get_locale() - Gets the current locale + * Get the current locale. * - * If the locale is set, then it will filter the locale - * in the 'locale' filter hook and return the value. + * If the locale is set, then it will filter the locale in the 'locale' filter + * hook and return the value. * - * If the locale is not set already, then the WPLANG - * constant is used if it is defined. Then it is filtered - * through the 'locale' filter hook and the value for the - * locale global set and the locale is returned. + * If the locale is not set already, then the WPLANG constant is used if it is + * defined. Then it is filtered through the 'locale' filter hook and the value + * for the locale global set and the locale is returned. * - * The process to get the locale should only be done once - * but the locale will always be filtered using the - * 'locale' hook. + * The process to get the locale should only be done once, but the locale will + * always be filtered using the 'locale' hook. * * @since 1.5.0 - * @uses apply_filters() Calls 'locale' hook on locale value - * @uses $locale Gets the locale stored in the global * - * @return string The locale of the blog or from the 'locale' hook + * @return string The locale of the blog or from the 'locale' hook. */ function get_locale() { global $locale; - if (isset($locale)) + if ( isset( $locale ) ) + /** + * Filter WordPress install's locale ID. + * + * @since 1.5.2 + * + * @param string $locale The locale ID. + */ return apply_filters( 'locale', $locale ); // WPLANG is defined in wp-config. - if (defined('WPLANG')) + if ( defined( 'WPLANG' ) ) $locale = WPLANG; - if (empty($locale)) - $locale = ''; + // If multisite, check options. + if ( is_multisite() ) { + // Don't check blog option when installing. + if ( defined( 'WP_INSTALLING' ) || ( false === $ms_locale = get_option( 'WPLANG' ) ) ) + $ms_locale = get_site_option('WPLANG'); - $locale = apply_filters('locale', $locale); + if ( $ms_locale !== false ) + $locale = $ms_locale; + } + + if ( empty( $locale ) ) + $locale = 'en_US'; - return $locale; + // duplicate_hook + return apply_filters( 'locale', $locale ); } /** - * translate() - Retrieve the translated text + * Retrieve the translation of $text. * - * If the domain is set in the $l10n global, then the text is run - * through the domain's translate method. After it is passed to - * the 'gettext' filter hook, along with the untranslated text as - * the second parameter. + * If there is no translation, or the text domain isn't loaded, the original text is returned. * - * If the domain is not set, the $text is just returned. + * Note: Don't use translate() directly, use __() or related functions. * * @since 2.2.0 - * @uses $l10n Gets list of domain translated string (gettext_reader) objects - * @uses apply_filters() Calls 'gettext' on domain translated text - * with the untranslated text as second parameter * - * @param string $text Text to translate - * @param string $domain Domain to retrieve the translated text + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. * @return string Translated text */ -function translate($text, $domain = 'default') { - global $l10n; +function translate( $text, $domain = 'default' ) { + $translations = get_translations_for_domain( $domain ); + $translations = $translations->translate( $text ); + /** + * Filter text with its translation. + * + * @since 2.0.11 + * + * @param string $translations Translated text. + * @param string $text Text to translate. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + return apply_filters( 'gettext', $translations, $text, $domain ); +} - if (isset($l10n[$domain])) - return apply_filters('gettext', $l10n[$domain]->translate($text), $text); +/** + * Remove last item on a pipe-delimited string. + * + * Meant for removing the last item in a string, such as 'Role name|User role'. The original + * string will be returned if no pipe '|' characters are found in the string. + * + * @since 2.8.0 + * + * @param string $string A pipe-delimited string. + * @return string Either $string or everything before the last pipe. + */ +function before_last_bar( $string ) { + $last_bar = strrpos( $string, '|' ); + if ( false == $last_bar ) + return $string; else - return $text; + return substr( $string, 0, $last_bar ); } /** - * translate_with_context() - Retrieve the translated text and strip context + * Retrieve the translation of $text in the context defined in $context. + * + * If there is no translation, or the text domain isn't loaded the original + * text is returned. * - * If the domain is set in the $l10n global, then the text is run - * through the domain's translate method. After it is passed to - * the 'gettext' filter hook, along with the untranslated text as - * the second parameter. + * @since 2.8.0 * - * If the domain is not set, the $text is just returned. + * @param string $text Text to translate. + * @param string $context Context information for the translators. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated text on success, original text on failure. + */ +function translate_with_gettext_context( $text, $context, $domain = 'default' ) { + $translations = get_translations_for_domain( $domain ); + $translations = $translations->translate( $text, $context ); + /** + * Filter text with its translation based on context information. + * + * @since 2.8.0 + * + * @param string $translations Translated text. + * @param string $text Text to translate. + * @param string $context Context information for the translators. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + return apply_filters( 'gettext_with_context', $translations, $text, $context, $domain ); +} + +/** + * Retrieve the translation of $text. If there is no translation, + * or the text domain isn't loaded, the original text is returned. * - * @since 2.5 - * @uses translate() + * @since 2.1.0 * - * @param string $text Text to translate - * @param string $domain Domain to retrieve the translated text - * @return string Translated text + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated text. */ -function translate_with_context($text, $domain = 'default') { - $whole = translate($text, $domain); - $last_bar = strrpos($whole, '|'); - if ( false == $last_bar ) { - return $whole; - } else { - return substr($whole, 0, $last_bar); - } +function __( $text, $domain = 'default' ) { + return translate( $text, $domain ); } /** - * __() - Retrieve a translated string + * Retrieve the translation of $text and escapes it for safe use in an attribute. * - * __() is a convenience function which retrieves the translated - * string from the translate(). + * If there is no translation, or the text domain isn't loaded, the original text is returned. * - * @see translate() An alias of translate() - * @since 2.1.0 + * @since 2.8.0 * - * @param string $text Text to translate - * @param string $domain Optional. Domain to retrieve the translated text - * @return string Translated text + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated text on success, original text on failure. */ -function __($text, $domain = 'default') { - return translate($text, $domain); +function esc_attr__( $text, $domain = 'default' ) { + return esc_attr( translate( $text, $domain ) ); } -// . /** - * _e() - Display a translated string + * Retrieve the translation of $text and escapes it for safe use in HTML output. * - * _e() is a convenience function which displays the returned - * translated text from translate(). + * If there is no translation, or the text domain isn't loaded, the original text is returned. + * + * @since 2.8.0 + * + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated text + */ +function esc_html__( $text, $domain = 'default' ) { + return esc_html( translate( $text, $domain ) ); +} + +/** + * Display translated text. * - * @see translate() Echos returned translate() string * @since 1.2.0 * - * @param string $text Text to translate - * @param string $domain Optional. Domain to retrieve the translated text + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. */ -function _e($text, $domain = 'default') { - echo translate($text, $domain); +function _e( $text, $domain = 'default' ) { + echo translate( $text, $domain ); } /** - * _c() - Retrieve context translated string + * Display translated text that has been escaped for safe use in an attribute. * - * Quite a few times, there will be collisions with similar - * translatable text found in more than two places but with - * different translated context. + * @since 2.8.0 * - * In order to use the separate contexts, the _c() function - * is used and the translatable string uses a pipe ('|') - * which has the context the string is in. + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + */ +function esc_attr_e( $text, $domain = 'default' ) { + echo esc_attr( translate( $text, $domain ) ); +} + +/** + * Display translated text that has been escaped for safe use in HTML output. * - * When the translated string is returned, it is everything - * before the pipe, not including the pipe character. If - * there is no pipe in the translated text then everything - * is returned. + * @since 2.8.0 * - * @since 2.2.0 + * @param string $text Text to translate. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + */ +function esc_html_e( $text, $domain = 'default' ) { + echo esc_html( translate( $text, $domain ) ); +} + +/** + * Retrieve translated string with gettext context. + * + * Quite a few times, there will be collisions with similar translatable text + * found in more than two places, but with different translated context. + * + * By including the context in the pot file, translators can translate the two + * strings differently. * - * @param string $text Text to translate - * @param string $domain Optional. Domain to retrieve the translated text - * @return string Translated context string without pipe + * @since 2.8.0 + * + * @param string $text Text to translate. + * @param string $context Context information for the translators. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated context string without pipe. */ -function _c($text, $domain = 'default') { - return translate_with_context($text, $domain); +function _x( $text, $context, $domain = 'default' ) { + return translate_with_gettext_context( $text, $context, $domain ); } /** - * __ngettext() - Retrieve the plural or single form based on the amount + * Display translated string with gettext context. * - * If the domain is not set in the $l10n list, then a comparsion - * will be made and either $plural or $single parameters returned. + * @since 3.0.0 * - * If the domain does exist, then the parameters $single, $plural, - * and $number will first be passed to the domain's ngettext method. - * Then it will be passed to the 'ngettext' filter hook along with - * the same parameters. The expected type will be a string. + * @param string $text Text to translate. + * @param string $context Context information for the translators. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated context string without pipe. + */ +function _ex( $text, $context, $domain = 'default' ) { + echo _x( $text, $context, $domain ); +} + +/** + * Translate string with gettext context, and escapes it for safe use in an attribute. * - * @since 1.2.0 - * @uses $l10n Gets list of domain translated string (gettext_reader) objects - * @uses apply_filters() Calls 'ngettext' hook on domains text returned, - * along with $single, $plural, and $number parameters. Expected to return string. + * @since 2.8.0 * - * @param string $single The text that will be used if $number is 1 - * @param string $plural The text that will be used if $number is not 1 - * @param int $number The number to compare against to use either $single or $plural - * @param string $domain Optional. The domain identifier the text should be retrieved in - * @return string Either $single or $plural translated text + * @param string $text Text to translate. + * @param string $context Context information for the translators. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated text */ -function __ngettext($single, $plural, $number, $domain = 'default') { - global $l10n; +function esc_attr_x( $text, $context, $domain = 'default' ) { + return esc_attr( translate_with_gettext_context( $text, $context, $domain ) ); +} - if (isset($l10n[$domain])) { - return apply_filters('ngettext', $l10n[$domain]->ngettext($single, $plural, $number), $single, $plural, $number); - } else { - if ($number != 1) - return $plural; - else - return $single; - } +/** + * Translate string with gettext context, and escapes it for safe use in HTML output. + * + * @since 2.9.0 + * + * @param string $text Text to translate. + * @param string $context Context information for the translators. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Translated text. + */ +function esc_html_x( $text, $context, $domain = 'default' ) { + return esc_html( translate_with_gettext_context( $text, $context, $domain ) ); +} + +/** + * Retrieve the plural or single form based on the supplied amount. + * + * If the text domain is not set in the $l10n list, then a comparison will be made + * and either $plural or $single parameters returned. + * + * If the text domain does exist, then the parameters $single, $plural, and $number + * will first be passed to the text domain's ngettext method. Then it will be passed + * to the 'ngettext' filter hook along with the same parameters. The expected + * type will be a string. + * + * @since 2.8.0 + * + * @param string $single The text that will be used if $number is 1. + * @param string $plural The text that will be used if $number is not 1. + * @param int $number The number to compare against to use either $single or $plural. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Either $single or $plural translated text. + */ +function _n( $single, $plural, $number, $domain = 'default' ) { + $translations = get_translations_for_domain( $domain ); + $translation = $translations->translate_plural( $single, $plural, $number ); + /** + * Filter text with its translation when plural option is available. + * + * @since 2.2.0 + * + * @param string $translation Translated text. + * @param string $single The text that will be used if $number is 1. + * @param string $plural The text that will be used if $number is not 1. + * @param string $number The number to compare against to use either $single or $plural. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + return apply_filters( 'ngettext', $translation, $single, $plural, $number, $domain ); +} + +/** + * Retrieve the plural or single form based on the supplied amount with gettext context. + * + * This is a hybrid of _n() and _x(). It supports contexts and plurals. + * + * @since 2.8.0 + * + * @param string $single The text that will be used if $number is 1. + * @param string $plural The text that will be used if $number is not 1. + * @param int $number The number to compare against to use either $single or $plural. + * @param string $context Context information for the translators. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return string Either $single or $plural translated text with context. + */ +function _nx($single, $plural, $number, $context, $domain = 'default') { + $translations = get_translations_for_domain( $domain ); + $translation = $translations->translate_plural( $single, $plural, $number, $context ); + /** + * Filter text with its translation while plural option and context are available. + * + * @since 2.8.0 + * + * @param string $translation Translated text. + * @param string $single The text that will be used if $number is 1. + * @param string $plural The text that will be used if $number is not 1. + * @param string $number The number to compare against to use either $single or $plural. + * @param string $context Context information for the translators. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + return apply_filters( 'ngettext_with_context', $translation, $single, $plural, $number, $context, $domain ); } /** - * __ngettext_noop() - register plural strings in POT file, but don't translate them + * Register plural strings in POT file, but don't translate them. * - * Used when you want do keep structures with translatable plural strings and - * use them later. + * Used when you want to keep structures with translatable plural + * strings and use them later. * * Example: - * $messages = array( - * 'post' => ngettext_noop('%s post', '%s posts'), - * 'page' => ngettext_noop('%s pages', '%s pages') - * ); - * ... - * $message = $messages[$type]; - * $usable_text = sprintf(__ngettext($message[0], $message[1], $count), $count); + * + * $messages = array( + * 'post' => _n_noop('%s post', '%s posts'), + * 'page' => _n_noop('%s pages', '%s pages') + * ); + * ... + * $message = $messages[$type]; + * $usable_text = sprintf( translate_nooped_plural( $message, $count ), $count ); + * + * + * @since 2.5.0 + * + * @param string $singular Single form to be i18ned. + * @param string $plural Plural form to be i18ned. + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. + * @return array array($singular, $plural) + */ +function _n_noop( $singular, $plural, $domain = null ) { + return array( 0 => $singular, 1 => $plural, 'singular' => $singular, 'plural' => $plural, 'context' => null, 'domain' => $domain ); +} + +/** + * Register plural strings with context in POT file, but don't translate them. + * + * @since 2.8.0 + */ +function _nx_noop( $singular, $plural, $context, $domain = null ) { + return array( 0 => $singular, 1 => $plural, 2 => $context, 'singular' => $singular, 'plural' => $plural, 'context' => $context, 'domain' => $domain ); +} + +/** + * Translate the result of _n_noop() or _nx_noop(). + * + * @since 3.1.0 * - * @since 2.5 - * @param $single Single form to be i18ned - * @param $plural Plural form to be i18ned - * @param $number Not used, here for compatibility with __ngettext, optional - * @param $domain Not used, here for compatibility with __ngettext, optional - * @return array array($single, $plural) + * @param array $nooped_plural Array with singular, plural and context keys, usually the result of _n_noop() or _nx_noop() + * @param int $count Number of objects + * @param string $domain Optional. Text domain. Unique identifier for retrieving translated strings. If $nooped_plural contains + * a text domain passed to _n_noop() or _nx_noop(), it will override this value. + * @return string Either $single or $plural translated text. */ -function __ngettext_noop($single, $plural, $number=1, $domain = 'default') { - return array($single, $plural); +function translate_nooped_plural( $nooped_plural, $count, $domain = 'default' ) { + if ( $nooped_plural['domain'] ) + $domain = $nooped_plural['domain']; + + if ( $nooped_plural['context'] ) + return _nx( $nooped_plural['singular'], $nooped_plural['plural'], $count, $nooped_plural['context'], $domain ); + else + return _n( $nooped_plural['singular'], $nooped_plural['plural'], $count, $domain ); } /** - * load_textdomain() - Loads MO file into the list of domains + * Load a .mo file into the text domain $domain. * - * If the domain already exists, the inclusion will fail. If the - * MO file is not readable, the inclusion will fail. + * If the text domain already exists, the translations will be merged. If both + * sets have the same string, the translation from the original value will be taken. * - * On success, the mofile will be placed in the $l10n global by - * $domain and will be an gettext_reader object. + * On success, the .mo file will be placed in the $l10n global by $domain + * and will be a MO object. * * @since 1.5.0 - * @uses $l10n Gets list of domain translated string (gettext_reader) objects - * @uses CacheFileReader Reads the MO file - * @uses gettext_reader Allows for retrieving translated strings * - * @param string $domain Unique identifier for retrieving translated strings - * @param string $mofile Path to the .mo file - * @return null On failure returns null and also on success returns nothing. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @param string $mofile Path to the .mo file. + * @return bool True on success, false on failure. */ -function load_textdomain($domain, $mofile) { +function load_textdomain( $domain, $mofile ) { global $l10n; - if (isset($l10n[$domain])) - return; + /** + * Filter text domain and/or MO file path for loading translations. + * + * @since 2.9.0 + * + * @param boolean Whether to override the text domain. Default false. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @param string $mofile Path to the MO file. + */ + $plugin_override = apply_filters( 'override_load_textdomain', false, $domain, $mofile ); - if ( is_readable($mofile)) - $input = new CachedFileReader($mofile); - else - return; + if ( true == $plugin_override ) { + return true; + } + + /** + * Fires before the MO translation file is loaded. + * + * @since 2.9.0 + * + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @param string $mofile Path to the .mo file. + */ + do_action( 'load_textdomain', $domain, $mofile ); + + /** + * Filter MO file path for loading translations for a specific text domain. + * + * @since 2.9.0 + * + * @param string $mofile Path to the MO file. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + $mofile = apply_filters( 'load_textdomain_mofile', $mofile, $domain ); + + if ( !is_readable( $mofile ) ) return false; + + $mo = new MO(); + if ( !$mo->import_from_file( $mofile ) ) return false; + + if ( isset( $l10n[$domain] ) ) + $mo->merge_with( $l10n[$domain] ); + + $l10n[$domain] = &$mo; + + return true; +} + +/** + * Unload translations for a text domain. + * + * @since 3.0.0 + * + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @return bool Whether textdomain was unloaded. + */ +function unload_textdomain( $domain ) { + global $l10n; + + /** + * Filter text text domain for loading translation. + * + * @since 3.0.0 + * + * @param boolean Whether to override unloading the text domain. Default false. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + $plugin_override = apply_filters( 'override_unload_textdomain', false, $domain ); - $l10n[$domain] = new gettext_reader($input); + if ( $plugin_override ) + return true; + + /** + * Fires before the text domain is unloaded. + * + * @since 3.0.0 + * + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + do_action( 'unload_textdomain', $domain ); + + if ( isset( $l10n[$domain] ) ) { + unset( $l10n[$domain] ); + return true; + } + + return false; } /** - * load_default_textdomain() - Loads default translated strings based on locale + * Load default translated strings based on locale. + * + * Loads the .mo file in WP_LANG_DIR constant path from WordPress root. + * The translated (.mo) file is named based on the locale. * - * Loads the .mo file in LANGDIR constant path from WordPress root. - * The translated (.mo) file is named based off of the locale. + * @see load_textdomain() * * @since 1.5.0 */ function load_default_textdomain() { $locale = get_locale(); - if ( empty($locale) ) - $locale = 'en_US'; - $mofile = ABSPATH . LANGDIR . "/$locale.mo"; + load_textdomain( 'default', WP_LANG_DIR . "/$locale.mo" ); + + if ( ( is_multisite() || ( defined( 'WP_INSTALLING_NETWORK' ) && WP_INSTALLING_NETWORK ) ) && ! file_exists( WP_LANG_DIR . "/admin-$locale.mo" ) ) { + load_textdomain( 'default', WP_LANG_DIR . "/ms-$locale.mo" ); + return; + } + + if ( is_admin() || ( defined( 'WP_REPAIRING' ) && WP_REPAIRING ) ) + load_textdomain( 'default', WP_LANG_DIR . "/admin-$locale.mo" ); + + if ( is_network_admin() || ( defined( 'WP_INSTALLING_NETWORK' ) && WP_INSTALLING_NETWORK ) ) + load_textdomain( 'default', WP_LANG_DIR . "/admin-network-$locale.mo" ); - load_textdomain('default', $mofile); } /** - * load_plugin_textdomain() - Loads the plugin's translated strings + * Load a plugin's translated strings. * - * If the path is not given then it will be the root of the plugin - * directory. The .mo file should be named based on the domain with a - * dash followed by a dash, and then the locale exactly. + * If the path is not given then it will be the root of the plugin directory. * - * The plugin may place all of the .mo files in another folder and set - * the $path based on the relative location from ABSPATH constant. The - * plugin may use the constant PLUGINDIR and/or plugin_basename() to - * get path of the plugin and then add the folder which holds the .mo - * files. + * The .mo file should be named based on the text domain with a dash, and then the locale exactly. * * @since 1.5.0 * - * @param string $domain Unique identifier for retrieving translated strings - * @param string $path Optional. Path of the folder where the .mo files reside. + * @param string $domain Unique identifier for retrieving translated strings + * @param string $deprecated Use the $plugin_rel_path parameter instead. + * @param string $plugin_rel_path Optional. Relative path to WP_PLUGIN_DIR where the .mo file resides. */ -function load_plugin_textdomain($domain, $path = false) { +function load_plugin_textdomain( $domain, $deprecated = false, $plugin_rel_path = false ) { $locale = get_locale(); - if ( empty($locale) ) - $locale = 'en_US'; + /** + * Filter a plugin's locale. + * + * @since 3.0.0 + * + * @param string $locale The plugin's current locale. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + $locale = apply_filters( 'plugin_locale', $locale, $domain ); - if ( false === $path ) - $path = PLUGINDIR; + if ( false !== $plugin_rel_path ) { + $path = WP_PLUGIN_DIR . '/' . trim( $plugin_rel_path, '/' ); + } else if ( false !== $deprecated ) { + _deprecated_argument( __FUNCTION__, '2.7' ); + $path = ABSPATH . trim( $deprecated, '/' ); + } else { + $path = WP_PLUGIN_DIR; + } + + // Load the textdomain according to the plugin first + $mofile = $domain . '-' . $locale . '.mo'; + if ( $loaded = load_textdomain( $domain, $path . '/'. $mofile ) ) + return $loaded; - $mofile = ABSPATH . "$path/$domain-$locale.mo"; - load_textdomain($domain, $mofile); + // Otherwise, load from the languages directory + $mofile = WP_LANG_DIR . '/plugins/' . $mofile; + return load_textdomain( $domain, $mofile ); } /** - * load_theme_textdomain() - Includes theme's translated strings for the theme + * Load the translated strings for a plugin residing in the mu-plugins directory. + * + * @since 3.0.0 + * + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @param string $mu_plugin_rel_path Relative to WPMU_PLUGIN_DIR directory in which the .mo file resides. + * Default empty string. + * @return bool True when textdomain is successfully loaded, false otherwise. + */ +function load_muplugin_textdomain( $domain, $mu_plugin_rel_path = '' ) { + // duplicate_hook + $locale = apply_filters( 'plugin_locale', get_locale(), $domain ); + $path = trailingslashit( WPMU_PLUGIN_DIR . '/' . ltrim( $mu_plugin_rel_path, '/' ) ); + + // Load the textdomain according to the plugin first + $mofile = $domain . '-' . $locale . '.mo'; + if ( $loaded = load_textdomain( $domain, $path . $mofile ) ) + return $loaded; + + // Otherwise, load from the languages directory + $mofile = WP_LANG_DIR . '/plugins/' . $mofile; + return load_textdomain( $domain, $mofile ); +} + +/** + * Load the theme's translated strings. * * If the current locale exists as a .mo file in the theme's root directory, it * will be included in the translated strings by the $domain. @@ -311,15 +615,191 @@ function load_plugin_textdomain($domain, $path = false) { * * @since 1.5.0 * - * @param string $domain Unique identifier for retrieving translated strings + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @param string $path Optional. Path to the directory containing the .mo file. + * Default false. + * @return bool True when textdomain is successfully loaded, false otherwise. */ -function load_theme_textdomain($domain) { +function load_theme_textdomain( $domain, $path = false ) { $locale = get_locale(); - if ( empty($locale) ) - $locale = 'en_US'; + /** + * Filter a theme's locale. + * + * @since 3.0.0 + * + * @param string $locale The theme's current locale. + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + */ + $locale = apply_filters( 'theme_locale', $locale, $domain ); + + if ( ! $path ) + $path = get_template_directory(); + + // Load the textdomain according to the theme + $mofile = "{$path}/{$locale}.mo"; + if ( $loaded = load_textdomain( $domain, $mofile ) ) + return $loaded; + + // Otherwise, load from the languages directory + $mofile = WP_LANG_DIR . "/themes/{$domain}-{$locale}.mo"; + return load_textdomain( $domain, $mofile ); +} + +/** + * Load the child themes translated strings. + * + * If the current locale exists as a .mo file in the child themes + * root directory, it will be included in the translated strings by the $domain. + * + * The .mo files must be named based on the locale exactly. + * + * @since 2.9.0 + * + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @return bool True when the theme textdomain is successfully loaded, false otherwise. + */ +function load_child_theme_textdomain( $domain, $path = false ) { + if ( ! $path ) + $path = get_stylesheet_directory(); + return load_theme_textdomain( $domain, $path ); +} + +/** + * Return the Translations instance for a text domain. + * + * If there isn't one, returns empty Translations instance. + * + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @return Translations A Translations instance. + */ +function get_translations_for_domain( $domain ) { + global $l10n; + if ( !isset( $l10n[$domain] ) ) { + $l10n[$domain] = new NOOP_Translations; + } + return $l10n[$domain]; +} + +/** + * Whether there are translations for the text domain. + * + * @since 3.0.0 + * @param string $domain Text domain. Unique identifier for retrieving translated strings. + * @return bool Whether there are translations. + */ +function is_textdomain_loaded( $domain ) { + global $l10n; + return isset( $l10n[$domain] ); +} - $mofile = get_template_directory() . "/$locale.mo"; - load_textdomain($domain, $mofile); +/** + * Translates role name. + * + * Since the role names are in the database and not in the source there + * are dummy gettext calls to get them into the POT file and this function + * properly translates them back. + * + * The before_last_bar() call is needed, because older installs keep the roles + * using the old context format: 'Role name|User role' and just skipping the + * content after the last bar is easier than fixing them in the DB. New installs + * won't suffer from that problem. + * + * @since 2.8.0 + * + * @param string $name The role name. + * @return string Translated role name on success, original name on failure. + */ +function translate_user_role( $name ) { + return translate_with_gettext_context( before_last_bar($name), 'User role' ); } -?> +/** + * Get all available languages based on the presence of *.mo files in a given directory. + * + * The default directory is WP_LANG_DIR. + * + * @since 3.0.0 + * + * @param string $dir A directory to search for language files. + * Default WP_LANG_DIR. + * @return array An array of language codes or an empty array if no languages are present. Language codes are formed by stripping the .mo extension from the language file names. + */ +function get_available_languages( $dir = null ) { + $languages = array(); + + foreach( (array)glob( ( is_null( $dir) ? WP_LANG_DIR : $dir ) . '/*.mo' ) as $lang_file ) { + $lang_file = basename($lang_file, '.mo'); + if ( 0 !== strpos( $lang_file, 'continents-cities' ) && 0 !== strpos( $lang_file, 'ms-' ) && + 0 !== strpos( $lang_file, 'admin-' )) + $languages[] = $lang_file; + } + + return $languages; +} + +/** + * Get installed translations. + * + * Looks in the wp-content/languages directory for translations of + * plugins or themes. + * + * @since 3.7.0 + * + * @param string $type What to search for. Accepts 'plugins', 'themes', 'core'. + * @return array Array of language data. + */ +function wp_get_installed_translations( $type ) { + if ( $type !== 'themes' && $type !== 'plugins' && $type !== 'core' ) + return array(); + + $dir = 'core' === $type ? '' : "/$type"; + + if ( ! is_dir( WP_LANG_DIR ) ) + return array(); + + if ( $dir && ! is_dir( WP_LANG_DIR . $dir ) ) + return array(); + + $files = scandir( WP_LANG_DIR . $dir ); + if ( ! $files ) + return array(); + + $language_data = array(); + + foreach ( $files as $file ) { + if ( '.' === $file[0] || is_dir( $file ) ) + continue; + if ( substr( $file, -3 ) !== '.po' ) + continue; + if ( ! preg_match( '/(?:(.+)-)?([A-Za-z_]{2,6}).po/', $file, $match ) ) + continue; + + list( , $textdomain, $language ) = $match; + if ( '' === $textdomain ) + $textdomain = 'default'; + $language_data[ $textdomain ][ $language ] = wp_get_pomo_file_data( WP_LANG_DIR . "$dir/$file" ); + } + return $language_data; +} + +/** + * Extract headers from a PO file. + * + * @since 3.7.0 + * + * @param string $po_file Path to PO file. + * @return array PO file headers. + */ +function wp_get_pomo_file_data( $po_file ) { + $headers = get_file_data( $po_file, array( + 'POT-Creation-Date' => '"POT-Creation-Date', + 'PO-Revision-Date' => '"PO-Revision-Date', + 'Project-Id-Version' => '"Project-Id-Version', + 'X-Generator' => '"X-Generator', + ) ); + foreach ( $headers as &$header ) { + // Remove possible contextual '\n' and closing double quote. + $header = preg_replace( '~(\\\n)?"$~', '', $header ); + } + return $headers; +}