L-electron-Rare/moodle
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Bug #6245 - rewritten multilang filter

Browse Source
This commit is contained in:
skodak
2006-08-14 07:46:03 +00:00
parent 951e1073da
commit 9fecfdfb83
2 changed files with 28 additions and 77 deletions
Download Patch File Download Diff File Expand all files Collapse all files
filter/multilang/README.txt
-1
View File
@@ -14,7 +14,6 @@ How it works:
- for each "lang block":
- if there are texts in the currently active language, print them.
- else, if there exists texts in the current parent language, print them.
- else, if there are English texts, print them
- else, print the first language found in the text.
- text out of "lang blocks" will be showed always.
filter/multilang/filter.php
+28 -76
View File
@@ -5,7 +5,7 @@
// This program is part of Moodle - Modular Object-Oriented Dynamic //
// Learning Environment - http://moodle.org //
// //
// Copyright (C) 2004 Gaëtan Frenoy <gaetan à frenoy.net> //
// Copyright (C) 2004 Gaetan Frenoy <gaetan@frenoy.net> //
// Eloy Lafuente <[email protected]> //
// //
// This program is free software; you can redistribute it and/or modify //
@@ -27,10 +27,10 @@
// - look for lang sections in the code.
// - if there exists texts in the currently active language, print them.
// - else, if there exists texts in the current parent language, print them.
// - else, if there are English texts, print them
// - else, print the first language in the text.
// Please note that English texts are not used as default anymore!
//
// This is an improved version of the original multilang filter by Gaëtan Frenoy.
// This is an improved version of the original multilang filter by Gaetan Frenoy.
// It should be 100% compatible with the original one. Some new features are:
// - Supports a new "short" syntax to make things easier. Simply use:
// <lang lang="XX">
@@ -39,90 +39,42 @@
function multilang_filter($courseid, $text) {
/*
/// Do a quick check using stripos to avoid unnecessary work
if (stripos($text, '<lang') === false && stripos($text, '<span lang') === false) {
return $text;
}
*/
// [pj] I don't know about you but I find this new implementation funny :P
// [skodak] I was laughing while rewriting it ;-)
$search = '/(<(?:lang|span) lang="[a-zA-Z0-9_-]*".*?>.+?<\/(?:lang|span)>\s*)+/is';
return preg_replace_callback($search, 'multilang_filter_impl', $text);
}
function multilang_filter_impl($langblock) {
global $CFG;
// This callbackis going to get called multiple times, so cache $preflangs
static $preflangs = NULL;
/// Flag this text as something not to cache
$CFG->currenttextiscacheable = false;
if(empty($preflangs)) {
/// Get current languages (utf and simple)
$currentlang = current_language();
$currentlangsimple = '';
/// If it's a utf8 lang, use the basic one too
if (strstr($currentlang, '_utf8') !== false) {
$currentlangsimple = str_replace('_utf8', '', $currentlang);
}
/// Get parent language of $currentlang (utf and simple)
$parentlang = get_string('parentlanguage');
$parentlangsimple = '';
if (substr($parentlang, 0, 1) == '[') {
$parentlang = '';
}
/// If it's a utf8 lang, use the basic one too
if (strstr($parentlang, '_utf8') !== false) {
$parentlangsimple = str_replace('_utf8', '', $parentlang);
}
/// Fill in the array of preffered languages
$preflangs = array();
$preflangs[] = $currentlang; /// First, the current lang
if (!empty($currentlangsimple)) {
$preflangs[] = $currentlangsimple; /// The simple (non utf8) lang
}
if (!empty($parentlang)) {
$preflangs[] = $parentlang; /// Then, if available, the parent lang
}
if (!empty($parentlangsimple)) {
$preflangs[] = $parentlangsimple; /// And the simple (non utf8) parent lang
}
if ($currentlang != 'en' && $currentlang != 'en_utf8') {
$preflangs[] = 'en_utf8'; /// Finally, if not used, add the en langs
$preflangs[] = 'en';
}
$mylang = str_replace('_utf8', '', current_language());
static $parentcache;
if (!isset($parentcache)) {
$parentcache = array();
}
if (!array_key_exists($mylang, $parentcache)) {
$parentlang = str_replace('_utf8', '', get_string('parentlanguage'));
$parentcache[$mylang] = $parentlang;
} else {
$parentlang = $parentcache[$mylang];
}
// Setup is done, now do multilang replacement on the match we 've been called for
$searchtosplit = '/<(?:lang|span) lang="([a-zA-Z0-9_-]*)".*?>(.+?)<\/(?:lang|span)>/is';
preg_match_all($searchtosplit, $langblock[0], $langlist);
/// Get the existing sections langs
$lang = '';
$minpref = count($preflangs);
$bestkey = 0;
// Define the preference that will be enough if found
$stoppref = empty($CFG->unicodedb) ? 0 : 1;
//Iterate
foreach ($langlist[1] as $key => $lang) {
//Normalize: Moodle's langs are always lowercase and they use the underscore
//Should we be stricter?
$lang = strtolower(str_replace('-','_',$lang));
$foundkey = array_search($lang, $preflangs);
if ($foundkey !== false && $foundkey !== NULL && $foundkey < $minpref) {
$minpref = $foundkey;
$bestkey = $key;
if ($minpref <= $stoppref) {
break; //The best has been found. Leave iteration.
}
}
preg_match_all($searchtosplit, $langblock[0], $rawlanglist);
$langlist = array();
foreach ($rawlanglist[1] as $index=>$lang) {
$lang = str_replace('_utf8', '', str_replace('-','_',strtolower($lang))); // normalize languages
$langlist[$lang] = $rawlanglist[2][$index];
}
return trim($langlist[2][$bestkey]);
if (array_key_exists($mylang, $langlist)) {
return $langlist[$mylang];
} else if (array_key_exists($parentlang, $langlist)) {
return $langlist[$parentlang];
} else {
$first = array_shift($langlist);
return $first;
}
}
?>