[CLEANUP] Remove deprecated hook XLLfile
[Packages/TYPO3.CMS.git] / typo3 / sysext / lang / lang.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2011 Kasper Skårhøj (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 * @author Kasper Skårhøj <kasperYYYY@typo3.com>
31 */
32
33 /**
34 * Contains the TYPO3 Backend Language class
35 *
36 * For detailed information about how localization is handled,
37 * please refer to the 'Inside TYPO3' document which descibes this.
38 *
39 * This class is normally instantiated as the global variable $LANG in typo3/template.php
40 * It's only available in the backend and under certain circumstances in the frontend
41 *
42 * @author Kasper Skårhøj <kasperYYYY@typo3.com>
43 * @package TYPO3
44 * @subpackage core
45 * @see typo3/template.php, template
46 */
47 class language {
48
49 /**
50 * This is set to the language that is currently running for the user
51 *
52 * @var string
53 */
54 public $lang = 'default';
55
56 /**
57 * Values like the labels in the tables.php-document are split by '|'.
58 * This values defines which language is represented by which position
59 * in the resulting array after splitting a value. (NOTICE: Obsolete concept!)
60 *
61 * @var string
62 */
63 public $langSplit = 'default';
64
65 /**
66 * Default charset in backend
67 *
68 * @var string
69 */
70 public $charSet = 'utf-8';
71
72 /**
73 * Array with alternative charsets for other languages.
74 * Moved to t3lib_cs, set internally from csConvObj!
75 *
76 * @var array
77 */
78 public $charSetArray = array();
79
80 /**
81 * This is the url to the TYPO3 manual
82 *
83 * @var string
84 */
85 public $typo3_help_url= 'http://typo3.org/documentation/document-library/';
86
87 /**
88 * If TRUE, will show the key/location of labels in the backend.
89 * @var bool
90 */
91 public $debugKey = FALSE;
92
93 /**
94 * Can contain labels and image references from the backend modules.
95 * Relies on t3lib_loadmodules to initialize modules after a global instance of $LANG has been created.
96 *
97 * @var array
98 */
99 public $moduleLabels = array();
100
101 /**
102 * Internal, Points to the position of the current language key as found in constant TYPO3_languages
103 * @var int
104 */
105 public $langSplitIndex = 0;
106
107 /**
108 * Internal cache for read LL-files
109 *
110 * @var array
111 */
112 public $LL_files_cache = array();
113
114 /**
115 * Internal cache for ll-labels (filled as labels are requested)
116 *
117 * @var array
118 */
119 public $LL_labels_cache = array();
120
121 /**
122 * instance of the "t3lib_cs" class. May be used by any application.
123 *
124 * @var t3lib_cs
125 */
126 public $csConvObj;
127
128 /**
129 * instance of the parser factory
130 * @var tx_lang_Factory
131 */
132 public $parserFactory;
133
134 /**
135 * Initializes the backend language.
136 * This is for example done in typo3/template.php with lines like these:
137 *
138 * require (PATH_typo3 . 'sysext/lang/lang.php');
139 * $LANG = t3lib_div::makeInstance('language');
140 * $LANG->init($GLOBALS['BE_USER']->uc['lang']);
141 *
142 * @throws RuntimeException
143 * @param string $lang The language key (two character string from backend users profile)
144 * @return void
145 */
146 public function init($lang) {
147
148 // Initialize the conversion object:
149 $this->csConvObj = t3lib_div::makeInstance('t3lib_cs');
150 $this->charSetArray = $this->csConvObj->charSetArray;
151
152 // Initialize the parser factory object
153 $this->parserFactory = t3lib_div::makeInstance('tx_lang_Factory');
154
155 // Internally setting the list of TYPO3 backend languages.
156 $this->langSplit = TYPO3_languages;
157
158 // Finding the requested language in this list based
159 // on the $lang key being inputted to this function.
160 $ls = explode('|', $this->langSplit);
161
162 foreach ($ls as $i => $v) {
163 // Language is found. Configure it:
164 if ($v == $lang) {
165 // The index of the language as found in the TYPO3_languages list
166 $this->langSplitIndex = $i;
167 // The current language key
168 $this->lang = $lang;
169 if ($this->charSetArray[$this->lang]) {
170 // The charset if different from the default.
171 $this->charSet = $this->charSetArray[$this->lang];
172 }
173 }
174 }
175
176 if ($GLOBALS['TYPO3_CONF_VARS']['BE']['lang']['debug']) {
177 $this->debugKey = TRUE;
178 }
179
180 // If a forced charset is used and different from the charset otherwise used:
181 if ($GLOBALS['TYPO3_CONF_VARS']['BE']['forceCharset'] && $GLOBALS['TYPO3_CONF_VARS']['BE']['forceCharset'] != $this->charSet) {
182 // Set the forced charset:
183 $this->charSet = $GLOBALS['TYPO3_CONF_VARS']['BE']['forceCharset'];
184
185 if ($this->charSet != 'utf-8' && !$this->csConvObj->initCharset($this->charSet)) {
186 throw new RuntimeException('Forced charset not found: The forced character set "'. $this->charSet . '" was not found in t3lib/csconvtbl/', 1294587487);
187 }
188 }
189 }
190
191 /**
192 * Gets the parser factory.
193 *
194 * @return tx_lang_Factory
195 */
196 public function getParserFactory() {
197 return $this->parserFactory;
198 }
199
200 /**
201 * Adds labels and image references from the backend modules to the internal moduleLabels array
202 *
203 * @param array $arr Array with references to module labels, keys: ['labels']['tablabel'],
204 * ['labels']['tabdescr'], ['tabs']['tab']
205 * @param string $prefix Module name prefix
206 * @return void
207 * @see t3lib_loadModules
208 */
209 public function addModuleLabels($arr, $prefix) {
210 if (is_array($arr)) {
211 foreach ($arr as $k => $larr) {
212 if (!isset($this->moduleLabels[$k])) {
213 $this->moduleLabels[$k] = array();
214 }
215 if (is_array($larr)) {
216 foreach ($larr as $l => $v) {
217 $this->moduleLabels[$k][$prefix . $l] = $v;
218 }
219 }
220 }
221 }
222 }
223
224 /**
225 * Will htmlspecialchar() the input string and before that any charset conversion
226 * will also have taken place if needed (see init())
227 * Used to pipe language labels through just before they are returned.
228 *
229 * @param string $lStr The string to process
230 * @param boolean $hsc If set, then the string is htmlspecialchars()'ed
231 * @return string The processed string
232 * @deprecated since TYPO3 4.6, will be removed in TYPO3 4.8 - Use htmlspecialchars() instead.
233 * @see init()
234 * @access public
235 */
236 public function hscAndCharConv($lStr, $hsc) {
237 t3lib_div::logDeprecatedFunction();
238 // labels returned from a locallang file used to be in the language of the charset.
239 // Since TYPO3 4.1 they are always in the charset of the BE.
240 if ($hsc) {
241 return htmlspecialchars($lStr);
242 } else {
243 return $lStr;
244 }
245 }
246
247 /**
248 * Will convert the input strings special chars (all above 127) to entities.
249 * The string is expected to be encoded in the charset, $this->charSet
250 * This function is used to create strings that can be used in the Click Menu
251 * (Context Sensitive Menus). The reason is that the values that are dynamically
252 * written into the <div> layer is decoded as iso-8859-1 no matter what charset
253 * is used in the document otherwise (only MSIE, Mozilla is OK).
254 * So by converting we by-pass this problem.
255 *
256 * @param string $str Input string
257 * @return string Output string
258 * @access public
259 */
260 public function makeEntities($str) {
261 // Convert string to UTF-8:
262 if ($this->charSet != 'utf-8') {
263 $str = $this->csConvObj->utf8_encode($str, $this->charSet);
264 }
265
266 // Convert string back again, but using the full entity conversion:
267 return $this->csConvObj->utf8_to_entities($str);
268 }
269
270 /**
271 * Converts the input string to a JavaScript function returning the same string, but charset-safe.
272 * Used for confirm and alert boxes where we must make sure that any string content
273 * does not break the script AND want to make sure the charset is preserved.
274 * Originally I used the JS function unescape() in combination with PHP function
275 * rawurlencode() in order to pass strings in a safe way. This could still be done
276 * for iso-8859-1 charsets but now I have applied the same method here for all charsets.
277 *
278 * @param string $str Input string, encoded with $this->charSet
279 * @return string Output string, a JavaScript function: "String.fromCharCode(......)"
280 * @access public
281 */
282 public function JScharCode($str) {
283
284 // Convert string to UTF-8:
285 if ($this->charSet != 'utf-8') {
286 $str = $this->csConvObj->utf8_encode($str, $this->charSet);
287 }
288
289 // Convert the UTF-8 string into a array of char numbers:
290 $nArr = $this->csConvObj->utf8_to_numberarray($str);
291
292 return 'String.fromCharCode(' . implode(',', $nArr) . ')';
293 }
294
295 /**
296 * Debugs localization key.
297 *
298 * @param $value Value to debug
299 * @return string
300 */
301 public function debugLL($value) {
302 return ($this->debugKey ? '[' . $value . ']' : '');
303 }
304
305 /**
306 * Returns the label with key $index form the globally loaded $LOCAL_LANG array.
307 * Mostly used from modules with only one LOCAL_LANG file loaded into the global space.
308 *
309 * @param string $index Label key
310 * @param boolean $hsc If set, the return value is htmlspecialchar'ed
311 * @return string
312 * @access public
313 */
314 public function getLL($index, $hsc = FALSE) {
315 // Get Local Language
316 if ($GLOBALS['LOCAL_LANG'][$this->lang][$index][0]['target'] !== '') {
317 $output = $GLOBALS['LOCAL_LANG'][$this->lang][$index][0]['target'];
318 } else {
319 $output = $GLOBALS['LOCAL_LANG']['default'][$index][0]['target'];
320 }
321 if ($hsc) {
322 $output = htmlspecialchars($output);
323 }
324 return $output . $this->debugLL($index);
325 }
326
327 /**
328 * Works like ->getLL() but takes the $LOCAL_LANG array
329 * used as the second argument instead of using the global array.
330 *
331 * @param string $index Label key
332 * @param array $localLanguage $LOCAL_LANG array to get label key from
333 * @param boolean $hsc If set, the return value is htmlspecialchar'ed
334 * @return string
335 * @access public
336 */
337 public function getLLL($index, $localLanguage, $hsc = FALSE) {
338 // Get Local Language. Special handling for all extensions that
339 // read PHP LL files and pass arrays here directly.
340 $value = is_string($localLanguage[$this->lang][$index]) ? $localLanguage[$this->lang][$index] : $localLanguage[$this->lang][$index][0]['target'];
341
342 // Fallback to default language
343 if (trim($value) === '') {
344 $value = is_string($localLanguage['default'][$index]) ? $localLanguage['default'][$index] : $localLanguage['default'][$index][0]['target'];
345 }
346
347 if ($hsc) {
348 $value = htmlspecialchars($value);
349 }
350 return $value . $this->debugLL($index);
351 }
352
353 /**
354 * splitLabel function
355 * Historically labels were exploded by '|' and each part would correspond
356 * to the translation of the language found at the same 'index' in the TYPO3_languages constant.
357 * Today all translations are based on $LOCAL_LANG variables.
358 * 'language-splitted' labels can therefore refer to a local-lang file + index instead!
359 * It's highly recommended to use the 'local_lang' method
360 * (and thereby it's highly deprecated to use 'language-splitted' label strings)
361 * Refer to 'Inside TYPO3' for more details
362 *
363 * @param string $input Label key/reference
364 * @param boolean $hsc If set, the return value is htmlspecialchar'ed
365 * @return string
366 * @access public
367 */
368 public function sL($input, $hsc = FALSE) {
369 // Using obsolete 'language-splitted' labels:
370 if (strcmp(substr($input, 0, 4), 'LLL:')) {
371 $t = explode('|', $input);
372 $out = $t[$this->langSplitIndex] ? $t[$this->langSplitIndex] : $t[0];
373 if ($hsc) {
374 $out = htmlspecialchars($out);
375 }
376 return $out;
377 // LOCAL_LANG:
378 } else {
379 // If cached label
380 if (!isset($this->LL_labels_cache[$this->lang][$input])) {
381 $restStr = trim(substr($input, 4));
382 $extPrfx = '';
383
384 // ll-file refered to is found in an extension.
385 if (!strcmp(substr($restStr, 0, 4), 'EXT:')) {
386 $restStr = trim(substr($restStr, 4));
387 $extPrfx = 'EXT:';
388 }
389 $parts = explode(':', $restStr);
390 $parts[0] = $extPrfx . $parts[0];
391
392 // Getting data if not cached
393 if (!isset($this->LL_files_cache[$parts[0]])) {
394 $this->LL_files_cache[$parts[0]] = $this->readLLfile($parts[0]);
395
396 // If the current language is found in another file, load that as well:
397 $lFileRef = $this->localizedFileRef($parts[0]);
398 if ($lFileRef && is_string($this->LL_files_cache[$parts[0]][$this->lang])
399 && $this->LL_files_cache[$parts[0]][$this->lang] == 'EXT') {
400 $tempLL = $this->readLLfile($lFileRef);
401 $this->LL_files_cache[$parts[0]][$this->lang] = $tempLL[$this->lang];
402 }
403 }
404 $this->LL_labels_cache[$this->lang][$input] = $this->getLLL($parts[1], $this->LL_files_cache[$parts[0]]);
405 }
406 // For the cached output charset conversion has already happened!
407 // So perform HSC right here.
408 $output = $this->LL_labels_cache[$this->lang][$input];
409 if ($hsc) {
410 $output = t3lib_div::deHSCentities(htmlspecialchars($output));
411 }
412 return $output . $this->debugLL($input);
413 }
414 }
415
416 /**
417 * Loading $TCA_DESCR[$table]['columns'] with content from locallang files
418 * as defined in $TCA_DESCR[$table]['refs']
419 * $TCA_DESCR is a global var
420 *
421 * @param string $table Table name found as key in global array $TCA_DESCR
422 * @return void
423 * @access public
424 */
425 public function loadSingleTableDescription($table) {
426
427 // First the 'table' cannot already be loaded in [columns]
428 // and secondly there must be a references to locallang files available in [refs]
429 if (is_array($GLOBALS['TCA_DESCR'][$table])
430 && !isset($GLOBALS['TCA_DESCR'][$table]['columns'])
431 && is_array($GLOBALS['TCA_DESCR'][$table]['refs'])) {
432
433 // Init $TCA_DESCR for $table-key
434 $GLOBALS['TCA_DESCR'][$table]['columns'] = array();
435
436 // Get local-lang for each file in $TCA_DESCR[$table]['refs'] as they are ordered.
437 foreach ($GLOBALS['TCA_DESCR'][$table]['refs'] as $llfile) {
438 $localLanguage = $this->includeLLFile($llfile, 0, 1);
439
440 // Traverse all keys
441 if (is_array($localLanguage['default'])) {
442 foreach ($localLanguage['default'] as $lkey => $lVal) {
443 $type = '';
444 $fieldName = '';
445
446 // Exploding by '.':
447 // 0-n => fieldname,
448 // n+1 => type from (alttitle, description, details, syntax, image_descr,image,seeAlso),
449 // n+2 => special instruction, if any
450 $keyParts = explode('.', $lkey);
451 $keyPartsCount = count($keyParts);
452 // Check if last part is special instruction
453 // Only "+" is currently supported
454 $specialInstruction = ($keyParts[$keyPartsCount - 1] == '+') ? TRUE : FALSE;
455 if ($specialInstruction) {
456 array_pop($keyParts);
457 }
458
459 // If there are more than 2 parts, get the type from the last part
460 // and merge back the other parts with a dot (.)
461 // Otherwise just get type and field name straightaway
462 if ($keyPartsCount > 2) {
463 $type = array_pop($keyParts);
464 $fieldName = implode('.', $keyParts);
465 } else {
466 $fieldName = $keyParts[0];
467 $type = $keyParts[1];
468 }
469
470 // Detecting 'hidden' labels, converting to normal fieldname
471 if ($fieldName == '_') {
472 $fieldName = '';
473 }
474 if (substr($fieldName, 0, 1) == '_') {
475 $fieldName = substr($fieldName, 1);
476 }
477
478 // Append label
479 if ($specialInstruction) {
480 $GLOBALS['TCA_DESCR'][$table]['columns'][$fieldName][$type] .= LF . $lVal[0]['source'];
481 } else {
482 // Substitute label
483 $GLOBALS['TCA_DESCR'][$table]['columns'][$fieldName][$type] = $lVal[0]['source'];
484 }
485 }
486 }
487 }
488 }
489 }
490
491 /**
492 * Includes locallang file (and possibly additional localized version if configured for)
493 * Read language labels will be merged with $LOCAL_LANG (if $setGlobal = TRUE).
494 *
495 * @param string $fileRef $fileRef is a file-reference (see t3lib_div::getFileAbsFileName)
496 * @param boolean $setGlobal Setting in global variable $LOCAL_LANG (or returning the variable)
497 * @param boolean $mergeLocalOntoDefault 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.
498 * @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
499 * @access public
500 */
501 public function includeLLFile($fileRef, $setGlobal = TRUE, $mergeLocalOntoDefault = FALSE) {
502
503 $globalLanguage = array();
504
505 // Get default file
506 $localLanguage = $this->readLLfile($fileRef);
507
508 if (is_array($localLanguage) && count($localLanguage)) {
509
510 // it depends on, whether we should return the result or set it in the global $LOCAL_LANG array
511 if ($setGlobal) {
512 $globalLanguage = t3lib_div::array_merge_recursive_overrule((array)$GLOBALS['LOCAL_LANG'], $localLanguage);
513 } else {
514 $globalLanguage = $localLanguage;
515 }
516
517 // Localized addition?
518 $lFileRef = $this->localizedFileRef($fileRef);
519 if ($lFileRef && (string)$globalLanguage[$this->lang] == 'EXT') {
520 $localLanguage = $this->readLLfile($lFileRef);
521 $globalLanguage = t3lib_div::array_merge_recursive_overrule($globalLanguage, $localLanguage);
522 }
523
524 // Merge local onto default
525 if ($mergeLocalOntoDefault && $this->lang !== 'default'
526 && is_array($globalLanguage[$this->lang]) && is_array($globalLanguage['default'])) {
527 // array_merge can be used so far the keys are not
528 // numeric - which we assume they are not...
529 $globalLanguage['default'] = array_merge($globalLanguage['default'], $globalLanguage[$this->lang]);
530 unset($globalLanguage[$this->lang]);
531 }
532 }
533
534 // Return value if not global is set.
535 if (!$setGlobal) {
536 return $globalLanguage;
537 } else {
538 $GLOBALS['LOCAL_LANG'] = $globalLanguage;
539 }
540 }
541
542 /**
543 * Includes a locallang file and returns the $LOCAL_LANG array found inside.
544 *
545 * @param string $fileRef 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.
546 * @return array Value of $LOCAL_LANG found in the included file. If that array is found it's returned. Otherwise an empty array
547 * @access private
548 */
549 protected function readLLfile($fileRef) {
550 return t3lib_div::readLLfile($fileRef, $this->lang, $this->charSet);
551 }
552
553 /**
554 * Returns localized fileRef (.[langkey].php)
555 *
556 * @param string $fileRef Filename/path of a 'locallang.php' file
557 * @return string Input filename with a '.[lang-key].php' ending added if $this->lang is not 'default'
558 * @access private
559 */
560 protected function localizedFileRef($fileRef) {
561 if ($this->lang != 'default' && substr($fileRef, -4) == '.php') {
562 return substr($fileRef, 0, -4) . '.' . $this->lang . '.php';
563 }
564 }
565
566 /**
567 * Overrides a label.
568 *
569 * @param string $index
570 * @param string $value
571 * @param boolean $overrideDefault Overrides default language
572 * @return void
573 */
574 public function overrideLL($index, $value, $overrideDefault = TRUE) {
575 if (isset($GLOBALS['LOCAL_LANG']) === FALSE) {
576 $GLOBALS['LOCAL_LANG'] = array();
577 }
578
579 $GLOBALS['LOCAL_LANG'][$this->lang][$index][0]['target'] = $value;
580
581 if ($overrideDefault) {
582 $GLOBALS['LOCAL_LANG']['default'][$index][0]['target'] = $value;
583 }
584 }
585 }
586
587
588 if (defined('TYPO3_MODE') && isset($GLOBALS['TYPO3_CONF_VARS'][TYPO3_MODE]['XCLASS']['ext/lang/lang.php'])) {
589 include_once($GLOBALS['TYPO3_CONF_VARS'][TYPO3_MODE]['XCLASS']['ext/lang/lang.php']);
590 }
591
592 ?>