#2731: Improved caching of locallang - changed internal caching from default characte...
[Packages/TYPO3.CMS.git] / typo3 / sysext / lang / lang.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2008 Kasper Skaarhoj (kasperYYYY@typo3.com)
6 * All rights reserved
7 *
8 * This script is part of the TYPO3 project. The TYPO3 project is
9 * free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * The GNU General Public License can be found at
15 * http://www.gnu.org/copyleft/gpl.html.
16 * A copy is found in the textfile GPL.txt and important notices to the license
17 * from the author is found in LICENSE.txt distributed with these scripts.
18 *
19 *
20 * This script is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
24 *
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
27 /**
28 * Contains the TYPO3 Backend Language class
29 *
30 * $Id$
31 * Revised for TYPO3 3.6.0
32 *
33 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
34 */
35 /**
36 * [CLASS/FUNCTION INDEX of SCRIPT]
37 *
38 *
39 *
40 * 88: class language
41 * 138: function init($lang,$altPath='')
42 * 183: function addModuleLabels($arr,$prefix)
43 * 209: function hscAndCharConv($lStr,$hsc)
44 * 224: function makeEntities($str)
45 * 241: function JScharCode($str)
46 * 260: function getLL($index,$hsc=0)
47 * 278: function getLLL($index,$LOCAL_LANG,$hsc=0)
48 * 299: function sL($input,$hsc=0)
49 * 344: function loadSingleTableDescription($table)
50 * 396: function includeLLFile($fileRef,$setGlobal=1,$mergeLocalOntoDefault=0)
51 * 441: function readLLfile($fileRef)
52 * 451: function localizedFileRef($fileRef)
53 *
54 * TOTAL FUNCTIONS: 12
55 * (This index is automatically created/updated by the extension "extdeveval")
56 *
57 */
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74 /**
75 * Contains the TYPO3 Backend Language class
76 *
77 * For detailed information about how localization is handled,
78 * please refer to the 'Inside TYPO3' document which descibes this.
79 *
80 * This class is normally instantiated as the global variable $LANG in typo3/template.php
81 * It's only available in the backend and under certain circumstances in the frontend
82 *
83 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
84 * @package TYPO3
85 * @subpackage core
86 * @see typo3/template.php, template
87 */
88 class language {
89 var $lang='default'; // This is set to the language that is currently running for the user
90 var $langSplit='default'; // Values like the labels in the tables.php-document are split by '|'. This values defines which language is represented by which position in the resulting array after splitting a value. (NOTICE: Obsolete concept!)
91
92 // Default charset in backend
93 var $charSet = 'iso-8859-1';
94
95 // Array with alternative charsets for other languages. (Moved to t3lib_cs, Set from csConvObj!)
96 var $charSetArray = array();
97
98 // This is the url to the TYPO3 manual
99 var $typo3_help_url= 'http://www.typo3.com/man_uk/';
100 // Array with alternative URLs based on language.
101 var $helpUrlArray = array(
102 'dk' => 'http://www.typo3.com/man_dk/',
103 );
104
105 var $debugKey = FALSE; // If true, will show the key/location of labels in the backend.
106
107
108 var $moduleLabels = Array(); // Can contain labels and image references from the backend modules. Relies on t3lib_loadmodules to initialize modules after a global instance of $LANG has been created.
109
110 // Internal
111 var $langSplitIndex=0; // Points to the position of the current language key as found in constant TYPO3_languages
112 var $LL_files_cache=array(); // Internal cache for read LL-files
113 var $LL_labels_cache=array(); // Internal cache for ll-labels (filled as labels are requested)
114
115 /**
116 * instance of the "t3lib_cs" class. May be used by any application.
117 *
118 * @var t3lib_cs
119 */
120 var $csConvObj;
121
122
123
124
125
126
127
128
129 /**
130 * Initializes the backend language.
131 * This is for example done in typo3/template.php with lines like these:
132 *
133 * require (PATH_typo3.'sysext/lang/lang.php');
134 * $LANG = t3lib_div::makeInstance('language');
135 * $LANG->init($BE_USER->uc['lang']);
136 *
137 * @param string The language key (two character string from backend users profile)
138 * @param string IGNORE. Not used.
139 * @return void
140 */
141 function init($lang,$altPath='') {
142
143 // Initialize the conversion object:
144 $this->csConvObj = t3lib_div::makeInstance('t3lib_cs');
145 $this->charSetArray = $this->csConvObj->charSetArray;
146
147 // Internally setting the list of TYPO3 backend languages.
148 $this->langSplit=TYPO3_languages;
149
150 // Finding the requested language in this list based on the $lang key being inputted to this function.
151 $ls = explode('|',$this->langSplit);
152 while(list($i,$v)=each($ls)) {
153 if ($v==$lang) { // Language is found. Configure it:
154 $this->langSplitIndex=$i; // The index of the language as found in the TYPO3_languages list
155 $this->lang = $lang; // The current language key
156 if ($this->helpUrlArray[$this->lang]) $this->typo3_help_url=$this->helpUrlArray[$this->lang]; // The help URL if different from the default.
157 if ($this->charSetArray[$this->lang]) $this->charSet=$this->charSetArray[$this->lang]; // The charset if different from the default.
158 }
159 }
160
161 // If a forced charset is used and different from the charset otherwise used:
162 if ($GLOBALS['TYPO3_CONF_VARS']['BE']['forceCharset'] && $GLOBALS['TYPO3_CONF_VARS']['BE']['forceCharset']!=$this->charSet) {
163 // Set the forced charset:
164 $this->charSet = $GLOBALS['TYPO3_CONF_VARS']['BE']['forceCharset'];
165
166 if ($this->charSet!='utf-8' && !$this->csConvObj->initCharset($this->charSet)) {
167 t3lib_BEfunc::typo3PrintError ('The forced character set "'.$this->charSet.'" was not found in t3lib/csconvtbl/','Forced charset not found');
168 exit;
169 }
170 }
171 }
172
173 /**
174 * Adds labels and image references from the backend modules to the internal moduleLabels array
175 *
176 * @param array Array with references to module labels, keys: ['labels']['tablabel'], ['labels']['tabdescr'], ['tabs']['tab']
177 * @param string Module name prefix
178 * @return void
179 * @see t3lib_loadModules
180 */
181 function addModuleLabels($arr,$prefix) {
182 if (is_array($arr)) {
183 reset($arr);
184 while(list($k,$larr)=each($arr)) {
185 if (!isset($this->moduleLabels[$k])) {
186 $this->moduleLabels[$k]=array();
187 }
188 if (is_array($larr)) {
189 reset($larr);
190 while(list($l,$v)=each($larr)) {
191 $this->moduleLabels[$k][$prefix.$l]=$v;
192 }
193 }
194 }
195 }
196 }
197
198 /**
199 * Will htmlspecialchar() the input string and before that any charset conversion will also have taken place if needed (see init())
200 * Used to pipe language labels through just before they are returned.
201 *
202 * @param string The string to process
203 * @param boolean If set, then the string is htmlspecialchars()'ed
204 * @return string The processed string
205 * @see init()
206 */
207 function hscAndCharConv($lStr,$hsc) {
208 $lStr = $hsc ? htmlspecialchars($lStr) : $lStr;
209
210 // labels returned from a locallang file used to be in the language of the charset. Since TYPO3 4.1 they are always in the charset of the BE.
211
212 return $lStr;
213 }
214
215 /**
216 * Will convert the input strings special chars (all above 127) to entities. The string is expected to be encoded in the charset, $this->charSet
217 * This function is used to create strings that can be used in the Click Menu (Context Sensitive Menus). The reason is that the values that are dynamically written into the <div> layer is decoded as iso-8859-1 no matter what charset is used in the document otherwise (only MSIE, Mozilla is OK). So by converting we by-pass this problem.
218 *
219 * @param string Input string
220 * @return string Output string
221 */
222 function makeEntities($str) {
223 // Convert string to UTF-8:
224 if ($this->charSet!='utf-8') $str = $this->csConvObj->utf8_encode($str,$this->charSet);
225
226 // Convert string back again, but using the full entity conversion:
227 $str = $this->csConvObj->utf8_to_entities($str);
228 return $str;
229 }
230
231 /**
232 * Converts the input string to a JavaScript function returning the same string, but charset-safe.
233 * Used for confirm and alert boxes where we must make sure that any string content does not break the script AND want to make sure the charset is preserved.
234 * Originally I used the JS function unescape() in combination with PHP function rawurlencode() in order to pass strings in a safe way. This could still be done for iso-8859-1 charsets but now I have applied the same method here for all charsets.
235 *
236 * @param string Input string, encoded with $this->charSet
237 * @return string Output string, a JavaScript function: "String.fromCharCode(......)"
238 */
239 function JScharCode($str) {
240
241 // Convert string to UTF-8:
242 if ($this->charSet!='utf-8') $str = $this->csConvObj->utf8_encode($str,$this->charSet);
243
244 // Convert the UTF-8 string into a array of char numbers:
245 $nArr = $this->csConvObj->utf8_to_numberarray($str);
246
247 return 'String.fromCharCode('.implode(',',$nArr).')';
248 }
249
250 /**
251 * Returns the label with key $index form the globally loaded $LOCAL_LANG array.
252 * Mostly used from modules with only one LOCAL_LANG file loaded into the global space.
253 *
254 * @param string Label key
255 * @param boolean If set, the return value is htmlspecialchar'ed
256 * @return string
257 */
258 function getLL($index,$hsc=0) {
259 // Get Local Language
260 if (strcmp($GLOBALS['LOCAL_LANG'][$this->lang][$index],'')) {
261 $output = $this->hscAndCharConv($GLOBALS['LOCAL_LANG'][$this->lang][$index], $hsc); // Returns local label if not blank.
262 } else {
263 $output = $this->hscAndCharConv($GLOBALS['LOCAL_LANG']['default'][$index], $hsc); // Returns default label
264 }
265 return $output.($this->debugKey ? ' ['.$index.']':'');
266 }
267
268 /**
269 * Works like ->getLL() but takes the $LOCAL_LANG array used as the second argument instead of using the global array.
270 *
271 * @param string Label key
272 * @param array $LOCAL_LANG array to get label key from
273 * @param boolean If set, the return value is htmlspecialchar'ed
274 * @return string
275 */
276 function getLLL($index,$LOCAL_LANG,$hsc=0) {
277 // Get Local Language
278 if (strcmp($LOCAL_LANG[$this->lang][$index],'')) {
279 $output = $this->hscAndCharConv($LOCAL_LANG[$this->lang][$index], $hsc); // Returns local label if not blank.
280 } else {
281 $output = $this->hscAndCharConv($LOCAL_LANG['default'][$index], $hsc); // Returns default label
282 }
283 return $output.($this->debugKey ? ' ['.$index.']':'');
284 }
285
286 /**
287 * splitLabel function
288 * Historically labels were exploded by '|' and each part would correspond to the translation of the language found at the same 'index' in the TYPO3_languages constant.
289 * Today all translations are based on $LOCAL_LANG variables. 'language-splitted' labels can therefore refer to a local-lang file + index instead!
290 * It's highly recommended to use the 'local_lang' method (and thereby it's highly deprecated to use 'language-splitted' label strings)
291 * Refer to 'Inside TYPO3' for more details
292 *
293 * @param string Label key/reference
294 * @param boolean If set, the return value is htmlspecialchar'ed
295 * @return string
296 */
297 function sL($input,$hsc=0) {
298 if (strcmp(substr($input,0,4),'LLL:')) { // Using obsolete 'language-splitted' labels:
299 $t = explode('|',$input);
300 $out = $t[$this->langSplitIndex] ? $t[$this->langSplitIndex] : $t[0];
301 return $this->hscAndCharConv($out, $hsc);
302 } else { // LOCAL_LANG:
303 if (!isset($this->LL_labels_cache[$this->lang][$input])) { // If cached label
304 $restStr = trim(substr($input,4));
305 $extPrfx='';
306 if (!strcmp(substr($restStr,0,4),'EXT:')) { // ll-file refered to is found in an extension.
307 $restStr = trim(substr($restStr,4));
308 $extPrfx='EXT:';
309 }
310 $parts = explode(':',$restStr);
311 $parts[0]=$extPrfx.$parts[0];
312 if (!isset($this->LL_files_cache[$parts[0]])) { // Getting data if not cached
313 $this->LL_files_cache[$parts[0]] = $this->readLLfile($parts[0]);
314
315 // If the current language is found in another file, load that as well:
316 $lFileRef = $this->localizedFileRef($parts[0]);
317 if ($lFileRef && is_string($this->LL_files_cache[$parts[0]][$this->lang]) && $this->LL_files_cache[$parts[0]][$this->lang]=='EXT') {
318 $tempLL = $this->readLLfile($lFileRef);
319 $this->LL_files_cache[$parts[0]][$this->lang] = $tempLL[$this->lang];
320 }
321
322 // Overriding file?
323 if (isset($GLOBALS['TYPO3_CONF_VARS']['BE']['XLLfile'][$parts[0]])) {
324 $ORarray = $this->readLLfile($GLOBALS['TYPO3_CONF_VARS']['BE']['XLLfile'][$parts[0]]);
325 $this->LL_files_cache[$parts[0]] = t3lib_div::array_merge_recursive_overrule($this->LL_files_cache[$parts[0]],$ORarray);
326 }
327 }
328 $this->LL_labels_cache[$this->lang][$input] = $this->getLLL($parts[1],$this->LL_files_cache[$parts[0]]);
329 }
330 $output = $hsc ? t3lib_div::deHSCentities(htmlspecialchars($this->LL_labels_cache[$this->lang][$input])) : $this->LL_labels_cache[$this->lang][$input]; // For the cached output charset conversion has already happend! So perform HSC right here.
331 return $output.($this->debugKey ? ' ['.$input.']':'');
332 }
333 }
334
335 /**
336 * Loading $TCA_DESCR[$table]['columns'] with content from locallang files as defined in $TCA_DESCR[$table]['refs']
337 * $TCA_DESCR is a global var
338 *
339 * @param string Table name found as key in global array $TCA_DESCR
340 * @return void
341 */
342 function loadSingleTableDescription($table) {
343 global $TCA_DESCR;
344
345 if (is_array($TCA_DESCR[$table])
346 && !isset($TCA_DESCR[$table]['columns'])
347 && is_array($TCA_DESCR[$table]['refs'])) { // First the 'table' cannot already be loaded in [columns] and secondly there must be a references to locallang files available in [refs]
348
349 // Init $TCA_DESCR for $table-key
350 $TCA_DESCR[$table]['columns']=array();
351
352 // Get local-lang for each file in $TCA_DESCR[$table]['refs'] as they are ordered.
353 foreach ($TCA_DESCR[$table]['refs'] as $llfile) {
354 $LOCAL_LANG = $this->includeLLFile($llfile,0,1);
355
356 // Traverse all keys
357 if (is_array($LOCAL_LANG['default'])) {
358 foreach($LOCAL_LANG['default'] as $lkey => $lVal) {
359
360 // exploding by '.':
361 // 0 => fieldname,
362 // 1 => type from (alttitle,description,details,syntax,image_descr,image,seeAlso),
363 // 2 => special instruction, see switch construct
364 $kParts = explode('.',$lkey);
365
366 // Detecting 'hidden' labels, converting to normal fieldname
367 if ($kParts[0]=='_') $kParts[0]='';
368 if (substr($kParts[0],0,1)=='_') { $kParts[0] = substr($kParts[0],1); }
369
370 // Add label:
371 switch((string)$kParts[2]) {
372 case '+': // adding
373 $TCA_DESCR[$table]['columns'][$kParts[0]][$kParts[1]].= chr(10).$lVal;
374 break;
375 default: // Substituting:
376 $TCA_DESCR[$table]['columns'][$kParts[0]][$kParts[1]] = $lVal;
377 break;
378 }
379 }
380 }
381 }
382 }
383 }
384
385 /**
386 * Includes locallang file (and possibly additional localized version if configured for)
387 * Read language labels will be merged with $LOCAL_LANG (if $setGlobal=1).
388 *
389 * @param string $fileRef is a file-reference (see t3lib_div::getFileAbsFileName)
390 * @param boolean Setting in global variable $LOCAL_LANG (or returning the variable)
391 * @param boolean If $mergeLocalOntoDefault is set the local part of the $LOCAL_LANG array is merged onto the default part (if the local part exists) and the local part is unset.
392 * @return mixed If $setGlobal is true the LL-files will set the $LOCAL_LANG in the global scope. Otherwise the $LOCAL_LANG array is returned from function
393 */
394 function includeLLFile($fileRef,$setGlobal=1,$mergeLocalOntoDefault=0) {
395 // Configure for global flag:
396 if ($setGlobal) {
397 global $LOCAL_LANG;
398 }
399
400 // Get default file:
401 $llang = $this->readLLfile($fileRef);
402
403 if (count($llang)) {
404
405 $LOCAL_LANG = t3lib_div::array_merge_recursive_overrule((array)$LOCAL_LANG,$llang);
406
407 // Localized addition?
408 $lFileRef = $this->localizedFileRef($fileRef);
409 if ($lFileRef && (string)$LOCAL_LANG[$this->lang]=='EXT') {
410 $llang = $this->readLLfile($lFileRef);
411 $LOCAL_LANG = t3lib_div::array_merge_recursive_overrule($LOCAL_LANG,$llang);
412 }
413
414 // Overriding file?
415 if (isset($GLOBALS['TYPO3_CONF_VARS']['BE']['XLLfile'][$fileRef])) {
416 $ORarray = $this->readLLfile($GLOBALS['TYPO3_CONF_VARS']['BE']['XLLfile'][$fileRef]);
417 $LOCAL_LANG = t3lib_div::array_merge_recursive_overrule($LOCAL_LANG,$ORarray);
418 }
419
420 // Merge local onto default:
421 if ($mergeLocalOntoDefault && strcmp($this->lang,'default') && is_array($LOCAL_LANG[$this->lang]) && is_array($LOCAL_LANG['default'])) {
422 $LOCAL_LANG['default'] = array_merge($LOCAL_LANG['default'],$LOCAL_LANG[$this->lang]); // array_merge can be used so far the keys are not numeric - which we assume they are not...
423 unset($LOCAL_LANG[$this->lang]);
424 }
425 }
426
427 // Return value if not global is set.
428 if (!$setGlobal) {
429 return $LOCAL_LANG;
430 }
431 }
432
433 /**
434 * Includes a locallang file and returns the $LOCAL_LANG array found inside.
435 *
436 * @param string Input is a file-reference (see t3lib_div::getFileAbsFileName) which, if exists, is included. That file is expected to be a 'local_lang' file containing a $LOCAL_LANG array.
437 * @return array Value of $LOCAL_LANG found in the included file. If that array is found it's returned. Otherwise an empty array
438 */
439 function readLLfile($fileRef) {
440 return t3lib_div::readLLfile($fileRef, $this->lang, $this->charSet);
441 }
442
443 /**
444 * Returns localized fileRef (.[langkey].php)
445 *
446 * @param string Filename/path of a 'locallang.php' file
447 * @return string Input filename with a '.[lang-key].php' ending added if $this->lang is not 'default'
448 */
449 function localizedFileRef($fileRef) {
450 if ($this->lang!='default' && substr($fileRef,-4)=='.php') {
451 return substr($fileRef,0,-4).'.'.$this->lang.'.php';
452 }
453 }
454 }
455
456 // Include extension to the template class?
457 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['ext/lang/lang.php']) {
458 include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['ext/lang/lang.php']);
459 }
460 ?>