3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
14 * Gestion des langues et choix de langue
16 * @package SPIP\Langue
18 if (!defined('_ECRIRE_INC_VERSION')) return;
23 * Changer la langue courante
25 * Définit la langue utilisée par la langue désignée
26 * si elle fait partie des langues utilisables dans le site.
28 * Cette fonction définit les globales :
29 * spip_lang, spip_lang_rtl, spip_lang_right, spip_lang_left
32 * La langue à utiliser
34 * string : La langue qui a été utilisée si trouvée
35 * false : aucune langue ne correspondait à la demande
37 function changer_langue($lang) {
38 global $spip_lang_rtl, $spip_lang_right, $spip_lang_left;
40 $liste_langues = ',' . @$GLOBALS['meta']['langues_proposees']
41 . ',' . @$GLOBALS['meta']['langues_multilingue'] . ',';
43 // Si la langue demandee n'existe pas, on essaie d'autres variantes
44 // Exemple : 'pt-br' => 'pt_br' => 'pt'
45 $lang = str_replace('-', '_', trim($lang));
49 if (strpos($liste_langues,",$lang,")!==false
50 OR ($lang = preg_replace(',_.*,', '', $lang)
51 AND strpos($liste_langues,",$lang,")!==false)) {
53 $spip_lang_rtl = lang_dir($lang, '', '_rtl');
54 $spip_lang_right = $spip_lang_rtl ?
'left' : 'right';
55 $spip_lang_left = $spip_lang_rtl ?
'right' : 'left';
57 return $GLOBALS['spip_lang'] = $lang;
63 // Gestion des blocs multilingues
64 // Selection dans un tableau dont les index sont des noms de langues
65 // de la valeur associee a la langue en cours
66 // si absente, retourne le premier
67 // remarque : on pourrait aussi appeler un service de traduction externe
68 // ou permettre de choisir une langue "plus proche",
69 // par exemple le francais pour l'espagnol, l'anglais pour l'allemand, etc.
71 function choisir_traduction ($trads, $lang='') {
72 $k = approcher_langue($trads, $lang);
73 return $k ?
$trads[$k] : array_shift($trads);
76 // retourne son 2e argument si c'est un index du premier
77 // ou un index approchant sinon et si possible,
78 // la langue X etant consideree comme une approche de X_Y
79 function approcher_langue ($trads, $lang='') {
81 if (!$lang) $lang = $GLOBALS['spip_lang'];
83 if (isset($trads[$lang])) {
86 // cas des langues xx_yy
88 $r = explode('_', $lang);
89 if (isset($trads[$r[0]]))
95 // http://doc.spip.org/@traduire_nom_langue
96 function traduire_nom_langue($lang) {
97 include_spip('inc/lang_liste');
98 include_spip('inc/charsets');
99 return html2unicode(isset($GLOBALS['codes_langues'][$lang]) ?
$GLOBALS['codes_langues'][$lang] : $lang);
106 // Donne la direction d'ecriture a partir de la langue. Retourne 'gaucher' si
107 // la langue est arabe, persan, kurde, pachto, ourdou (langues ecrites en
108 // alphabet arabe a priori), hebreu, yiddish (langues ecrites en alphabet
109 // hebreu a priori), 'droitier' sinon.
110 // C'est utilise par #LANG_DIR, #LANG_LEFT, #LANG_RIGHT.
111 // http://doc.spip.org/@lang_dir
112 function lang_dir($lang='', $droitier='ltr', $gaucher='rtl') {
113 static $lang_rtl = array('ar', 'fa', 'ku', 'ps', 'ur', 'he', 'heb', 'hbo', 'yi');
115 return in_array(($lang ?
$lang : $GLOBALS['spip_lang']), $lang_rtl) ?
116 $gaucher : $droitier;
119 // typo francaise ou anglaise ?
120 // $lang_objet est fixee dans l'interface privee pour editer
121 // un texte anglais en interface francaise (ou l'inverse) ;
122 // sinon determiner la typo en fonction de la langue courante
124 // http://doc.spip.org/@lang_typo
125 function lang_typo($lang='') {
127 $lang = isset($GLOBALS['lang_objet'])
128 ?
$GLOBALS['lang_objet']
129 : $GLOBALS['spip_lang'];
133 OR strncmp($lang, 'fr_', 3)==0
140 // gestion de la globale $lang_objet pour que les textes soient affiches
141 // avec les memes typo et direction dans l'espace prive que dans le public
142 // http://doc.spip.org/@changer_typo
143 function changer_typo($lang = '') {
145 $GLOBALS['lang_objet'] = $lang;
147 unset($GLOBALS['lang_objet']);
151 // Afficher un menu de selection de langue
152 // - 'var_lang_ecrire' = langue interface privee,
153 // pour var_lang' = langue de l'article, espace public, voir les squelettes
154 // pour 'changer_lang' (langue de l'article, espace prive), c'est en Ajax
156 // http://doc.spip.org/@menu_langues
157 function menu_langues($nom_select, $default='') {
158 include_spip('inc/actions');
160 $langues = liste_options_langues($nom_select);
162 if (!count($langues))
165 if (!$default) $default = $GLOBALS['spip_lang'];
166 foreach ($langues as $l) {
167 $selected = ($l == $default) ?
' selected=\'selected\'' : '';
168 $ret .= "<option value='$l'$selected>[".$l."] ".traduire_nom_langue($l)."</option>\n";
171 if (!test_espace_prive()) {
176 $base = spip_connect() ?
'base' : '';
179 $change = ' onchange="this.parentNode.parentNode.submit()"';
180 return generer_action_auteur('converser',$base, $cible,
181 (select_langues($nom_select, $change, $ret)
182 . "<noscript><div style='display:inline'><input type='submit' class='fondo' value='". _T('bouton_changer')."' /></div></noscript>"),
186 // http://doc.spip.org/@select_langues
187 function select_langues($nom_select, $change, $options, $label="")
190 $id = "menu_langues" . $cpt++
;
192 "<label for='$id'>".($label?
$label:_T('info_langues'))."</label> ".
193 "<select name='$nom_select' id='$id' "
194 . ((!test_espace_prive()) ?
195 ("class='forml menu_langues'") :
196 (($nom_select == 'var_lang_ecrire') ?
197 ("class='lang_ecrire'") :
206 * Lister les langues disponibles
208 * Retourne un tableau de langue utilisables, triées par code de langue,
209 * mais pas le même tableau en fonction du paramètre $nom_select.
211 * @param string $nom_select
212 * Attribut name du select
213 * Selon son nom, retourne une liste différente :
214 * - var_lang ou changer_lang :
215 * liste des langues sélectionnées dans la config multilinguisme
216 * - var_lang_ecrire :
217 * toutes les langues présentes en fichier de langue
221 function liste_options_langues($nom_select) {
223 switch($nom_select) {
226 # menu de changement de la langue d'un article
227 # les langues selectionnees dans la configuration "multilinguisme"
229 $langues = explode(',', $GLOBALS['meta']['langues_multilingue']);
231 # menu de l'interface (privee, installation et panneau de login)
232 # les langues presentes sous forme de fichiers de langue
233 # on force la relecture du repertoire des langues pour etre synchrone.
234 case 'var_lang_ecrire':
236 $GLOBALS['meta']['langues_proposees'] = '';
238 $langues = explode(',', $GLOBALS['meta']['langues_proposees']);
241 # dernier choix possible : toutes les langues = langues_proposees
242 # + langues_multilingues ; mais, ne sert pas
243 # $langues = explode(',', $GLOBALS['all_langs']);
245 if (count($langues) <= 1) return array();
253 * Redirige sur la bonne langue lorsque l'option forcer_lang est active
255 * Cette fonction est appelee depuis ecrire/public.php si on a installé
256 * la variable de personnalisation $forcer_lang ; elle renvoie le brouteur
257 * si necessaire vers l'URL xxxx?lang=ll
261 function verifier_lang_url() {
264 // quelle langue est demandee ?
265 $lang_demandee = (test_espace_prive()?
$GLOBALS['spip_lang']:$GLOBALS['meta']['langue_site']);
266 if (isset($_COOKIE['spip_lang_ecrire']))
267 $lang_demandee = $_COOKIE['spip_lang_ecrire'];
268 if (!test_espace_prive() AND isset($_COOKIE['spip_lang']))
269 $lang_demandee = $_COOKIE['spip_lang'];
270 if (isset($_GET['lang']))
271 $lang_demandee = $_GET['lang'];
273 // Renvoyer si besoin (et si la langue demandee existe)
274 if ($spip_lang != $lang_demandee
275 AND changer_langue($lang_demandee)
276 AND $lang_demandee != @$_GET['lang']) {
277 $destination = parametre_url(self(),'lang', $lang_demandee, '&');
278 // ici on a besoin des var_truc
279 foreach ($_GET as $var => $val) {
280 if (!strncmp('var_', $var, 4))
281 $destination = parametre_url($destination, $var, $val, '&');
283 include_spip('inc/headers');
284 redirige_par_entete($destination);
287 // Subtilite : si la langue demandee par cookie est la bonne
288 // alors on fait comme si $lang etait passee dans l'URL
289 // (pour criteres {lang}).
290 $GLOBALS['lang'] = $_GET['lang'] = $spip_lang;
295 * Utilise la langue du site
297 * Change la langue en cours d'utilisation par la langue du site
298 * si ce n'est pas déjà le cas.
300 * Note : Cette fonction initialise la globale spip_lang au chargement de inc/lang
303 * La langue sélectionnée
305 function utiliser_langue_site() {
306 // s'il existe une langue du site (en gros tout le temps en théorie)
307 if (isset($GLOBALS['meta']['langue_site'])
308 // et si spip_langue est pas encore définie (ce que va faire changer_langue())
309 // ou qu'elle n'est pas identique à la langue du site
310 AND (!isset($GLOBALS['spip_lang'])
311 OR $GLOBALS['spip_lang']!=$GLOBALS['meta']['langue_site']))
313 return changer_langue($GLOBALS['meta']['langue_site']);//@:install
315 // en theorie là, la globale est définie, sinon c'est un problème.
316 if (!isset($GLOBALS['spip_lang'])) {
317 spip_log("La globale spip_lang est indéfinie dans utiliser_langue_site() !", _LOG_ERREUR
);
319 return $GLOBALS['spip_lang'];
323 * Initialise la langue pour un visiteur du site
325 * La langue est choisie dans cet ordre :
326 * - Dans le cookie 'spip_lang' ou 'spip_lang_ecrire' s'il existe (selon l'espace public ou privé).
327 * - Sinon dans la session du visiteur.
328 * - Sinon dans une des langues définie en préférence du navigateur
329 * - Sinon la langue du site
334 function utiliser_langue_visiteur() {
336 $l = (!test_espace_prive() ?
'spip_lang' : 'spip_lang_ecrire');
337 if (isset($_COOKIE[$l]))
338 if (changer_langue($l = $_COOKIE[$l]))
341 if (isset($GLOBALS['visiteur_session']['lang']))
342 if (changer_langue($l = $GLOBALS['visiteur_session']['lang']))
345 foreach (explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']) as $s) {
346 if (preg_match('#^([a-z]{2,3})(-[a-z]{2,3})?(;q=[0-9.]+)?$#i', trim($s), $r)) {
347 if (changer_langue($l=strtolower($r[1])))
352 return utiliser_langue_site();
357 * Retourne le répertoire contenant le module de langue indiqué
359 * Note : pourrait en donner une liste... compliqué
361 * @param string $module
362 * Nom du module de lang
363 * @param string $lang
364 * Langue du module de langue
366 * Adresse du répertoire contenant le module
367 * Retourne ecrire/lang/ s'il rien ne semble correspondre.
369 function repertoire_lang($module='spip', $lang='fr') {
370 # valeur forcee (par ex.sur spip.net), old style, a faire disparaitre
371 if (defined('_DIR_LANG'))
374 # regarder s'il existe une v.f. qq part
375 if ($f = find_in_path($module.'_'.$lang . '.php', 'lang/'))
376 return dirname($f).'/';
378 # sinon, je ne sais trop pas quoi dire...
379 return _DIR_RESTREINT
. 'lang/';
384 * Initialisation des listes de langues
386 * Initialise les métas :
387 * - langues_proposees : liste des traductions disponibles
388 * - langue_site : langue par défaut du site
390 * Lorsque ces métas n'existent pas encore (c'est à dire à l'installation),
391 * elles sont calculées en obtenant la liste des langues
392 * dans les fichiers de lang
396 function init_langues() {
398 // liste des langues dans les meta, sauf a l'install
399 $all_langs = @$GLOBALS['meta']['langues_proposees'];
403 if ($d = @opendir
(repertoire_lang())) {
404 while (($f = readdir($d)) !== false) {
405 if (preg_match(',^spip_([a-z_]+)\.php[3]?$,', $f, $regs))
410 $tout = join(',', $tout);
411 // Si les langues n'ont pas change, ne rien faire
412 if ($tout != $all_langs) {
413 $GLOBALS['meta']['langues_proposees'] = $tout;
414 include_spip('inc/meta');
415 ecrire_meta('langues_proposees', $tout);
419 if (!isset($GLOBALS['meta']['langue_site'])) {
420 // Initialisation : le francais si dispo, sinon la premiere langue trouvee
421 $GLOBALS['meta']['langue_site'] = $tout =
422 (!$all_langs OR (strpos(',fr,',",$all_langs,")!==false))
423 ?
'fr' : substr($all_langs,0,strpos($all_langs,','));
424 ecrire_meta('langue_site', $tout);
429 * Retourne une balise <html>
431 * Retourne une balise HTML contenant les attributs 'lang' et 'dir'
432 * définis sur la langue en cours d'utilisation,
433 * ainsi que des classes CSS de ces du nom de la langue et direction choisie.
436 * Code html de la balise <html>
438 function html_lang_attributes()
440 $lang = $GLOBALS['spip_lang'];
441 $dir = ($GLOBALS['spip_lang_rtl'] ?
'rtl' : 'ltr');
442 return "<html class='$dir $lang no-js' xmlns='http://www.w3.org/1999/xhtml' lang='$lang' dir='$dir'>\n" ;
445 // initialise les globales (liste des langue, langue du site, spip_lang...)
447 utiliser_langue_site();