abfee108bc7aa32cb4152a47f38f0da5b8c436f3
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2012 *
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 = '') {
146 return $lang_objet = $lang ?
$lang : $GLOBALS['meta']['langue_site'];
150 // Afficher un menu de selection de langue
151 // - 'var_lang_ecrire' = langue interface privee,
152 // pour var_lang' = langue de l'article, espace public, voir les squelettes
153 // pour 'changer_lang' (langue de l'article, espace prive), c'est en Ajax
155 // http://doc.spip.org/@menu_langues
156 function menu_langues($nom_select, $default='') {
157 include_spip('inc/actions');
159 $langues = liste_options_langues($nom_select);
161 if (!count($langues))
164 if (!$default) $default = $GLOBALS['spip_lang'];
165 foreach ($langues as $l) {
166 $selected = ($l == $default) ?
' selected=\'selected\'' : '';
167 $ret .= "<option value='$l'$selected>[".$l."] ".traduire_nom_langue($l)."</option>\n";
170 if (!test_espace_prive()) {
175 $base = spip_connect() ?
'base' : '';
178 $change = ' onchange="this.parentNode.parentNode.submit()"';
179 return generer_action_auteur('converser',$base, $cible,
180 (select_langues($nom_select, $change, $ret)
181 . "<noscript><div style='display:inline'><input type='submit' class='fondo' value='". _T('bouton_changer')."' /></div></noscript>"),
185 // http://doc.spip.org/@select_langues
186 function select_langues($nom_select, $change, $options, $label="")
189 $id = "menu_langues" . $cpt++
;
191 "<label for='$id'>".($label?
$label:_T('info_langues'))."</label> ".
192 "<select name='$nom_select' id='$id' "
193 . ((!test_espace_prive()) ?
194 ("class='forml menu_langues'") :
195 (($nom_select == 'var_lang_ecrire') ?
196 ("class='lang_ecrire'") :
205 * Lister les langues disponibles
207 * Retourne un tableau de langue utilisables, triées par code de langue,
208 * mais pas le même tableau en fonction du paramètre $nom_select.
210 * @param string $nom_select
211 * Attribut name du select
212 * Selon son nom, retourne une liste différente :
213 * - var_lang ou changer_lang :
214 * liste des langues sélectionnées dans la config multilinguisme
215 * - var_lang_ecrire :
216 * toutes les langues présentes en fichier de langue
220 function liste_options_langues($nom_select) {
222 switch($nom_select) {
225 # menu de changement de la langue d'un article
226 # les langues selectionnees dans la configuration "multilinguisme"
228 $langues = explode(',', $GLOBALS['meta']['langues_multilingue']);
230 # menu de l'interface (privee, installation et panneau de login)
231 # les langues presentes sous forme de fichiers de langue
232 # on force la relecture du repertoire des langues pour etre synchrone.
233 case 'var_lang_ecrire':
235 $GLOBALS['meta']['langues_proposees'] = '';
237 $langues = explode(',', $GLOBALS['meta']['langues_proposees']);
240 # dernier choix possible : toutes les langues = langues_proposees
241 # + langues_multilingues ; mais, ne sert pas
242 # $langues = explode(',', $GLOBALS['all_langs']);
244 if (count($langues) <= 1) return array();
252 * Redirige sur la bonne langue lorsque l'option forcer_lang est active
254 * Cette fonction est appelee depuis ecrire/public.php si on a installé
255 * la variable de personnalisation $forcer_lang ; elle renvoie le brouteur
256 * si necessaire vers l'URL xxxx?lang=ll
260 function verifier_lang_url() {
263 // quelle langue est demandee ?
264 $lang_demandee = (test_espace_prive()?
$GLOBALS['spip_lang']:$GLOBALS['meta']['langue_site']);
265 if (isset($_COOKIE['spip_lang_ecrire']))
266 $lang_demandee = $_COOKIE['spip_lang_ecrire'];
267 if (!test_espace_prive() AND isset($_COOKIE['spip_lang']))
268 $lang_demandee = $_COOKIE['spip_lang'];
269 if (isset($_GET['lang']))
270 $lang_demandee = $_GET['lang'];
272 // Renvoyer si besoin (et si la langue demandee existe)
273 if ($spip_lang != $lang_demandee
274 AND changer_langue($lang_demandee)
275 AND $lang_demandee != @$_GET['lang']) {
276 $destination = parametre_url(self(),'lang', $lang_demandee, '&');
277 // ici on a besoin des var_truc
278 foreach ($_GET as $var => $val) {
279 if (!strncmp('var_', $var, 4))
280 $destination = parametre_url($destination, $var, $val, '&');
282 include_spip('inc/headers');
283 redirige_par_entete($destination);
286 // Subtilite : si la langue demandee par cookie est la bonne
287 // alors on fait comme si $lang etait passee dans l'URL
288 // (pour criteres {lang}).
289 $GLOBALS['lang'] = $_GET['lang'] = $spip_lang;
294 * Utilise la langue du site
296 * Change la langue en cours d'utilisation par la langue du site
297 * si ce n'est pas déjà le cas.
299 * Note : Cette fonction initialise la globale spip_lang au chargement de inc/lang
302 * La langue sélectionnée
304 function utiliser_langue_site() {
305 // s'il existe une langue du site (en gros tout le temps en théorie)
306 if (isset($GLOBALS['meta']['langue_site'])
307 // et si spip_langue est pas encore définie (ce que va faire changer_langue())
308 // ou qu'elle n'est pas identique à la langue du site
309 AND (!isset($GLOBALS['spip_lang'])
310 OR $GLOBALS['spip_lang']!=$GLOBALS['meta']['langue_site']))
312 return changer_langue($GLOBALS['meta']['langue_site']);//@:install
314 // en theorie là, la globale est définie, sinon c'est un problème.
315 if (!isset($GLOBALS['spip_lang'])) {
316 spip_log("La globale spip_lang est indéfinie dans utiliser_langue_site() !", _LOG_ERREUR
);
318 return $GLOBALS['spip_lang'];
322 * Initialise la langue pour un visiteur du site
324 * La langue est choisie dans cet ordre :
325 * - Dans le cookie 'spip_lang' ou 'spip_lang_ecrire' s'il existe (selon l'espace public ou privé).
326 * - Sinon dans la session du visiteur.
327 * - Sinon dans une des langues définie en préférence du navigateur
328 * - Sinon la langue du site
333 function utiliser_langue_visiteur() {
335 $l = (!test_espace_prive() ?
'spip_lang' : 'spip_lang_ecrire');
336 if (isset($_COOKIE[$l]))
337 if (changer_langue($l = $_COOKIE[$l]))
340 if (isset($GLOBALS['visiteur_session']['lang']))
341 if (changer_langue($l = $GLOBALS['visiteur_session']['lang']))
344 foreach (explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']) as $s) {
345 if (preg_match('#^([a-z]{2,3})(-[a-z]{2,3})?(;q=[0-9.]+)?$#i', trim($s), $r)) {
346 if (changer_langue($l=strtolower($r[1])))
351 return utiliser_langue_site();
356 * Retourne le répertoire contenant le module de langue indiqué
358 * Note : pourrait en donner une liste... compliqué
360 * @param string $module
361 * Nom du module de lang
362 * @param string $lang
363 * Langue du module de langue
365 * Adresse du répertoire contenant le module
366 * Retourne ecrire/lang/ s'il rien ne semble correspondre.
368 function repertoire_lang($module='spip', $lang='fr') {
369 # valeur forcee (par ex.sur spip.net), old style, a faire disparaitre
370 if (defined('_DIR_LANG'))
373 # regarder s'il existe une v.f. qq part
374 if ($f = find_in_path($module.'_'.$lang . '.php', 'lang/'))
375 return dirname($f).'/';
377 # sinon, je ne sais trop pas quoi dire...
378 return _DIR_RESTREINT
. 'lang/';
383 * Initialisation des listes de langues
385 * Initialise les métas :
386 * - langues_proposees : liste des traductions disponibles
387 * - langue_site : langue par défaut du site
389 * Lorsque ces métas n'existent pas encore (c'est à dire à l'installation),
390 * elles sont calculées en obtenant la liste des langues
391 * dans les fichiers de lang
395 function init_langues() {
397 // liste des langues dans les meta, sauf a l'install
398 $all_langs = @$GLOBALS['meta']['langues_proposees'];
402 if ($d = @opendir
(repertoire_lang())) {
403 while (($f = readdir($d)) !== false) {
404 if (preg_match(',^spip_([a-z_]+)\.php[3]?$,', $f, $regs))
409 $tout = join(',', $tout);
410 // Si les langues n'ont pas change, ne rien faire
411 if ($tout != $all_langs) {
412 $GLOBALS['meta']['langues_proposees'] = $tout;
413 include_spip('inc/meta');
414 ecrire_meta('langues_proposees', $tout);
418 if (!isset($GLOBALS['meta']['langue_site'])) {
419 // Initialisation : le francais si dispo, sinon la premiere langue trouvee
420 $GLOBALS['meta']['langue_site'] = $tout =
421 (!$all_langs OR (strpos(',fr,',",$all_langs,")!==false))
422 ?
'fr' : substr($all_langs,0,strpos($all_langs,','));
423 ecrire_meta('langue_site', $tout);
428 * Retourne une balise <html>
430 * Retourne une balise HTML contenant les attributs 'lang' et 'dir'
431 * définis sur la langue en cours d'utilisation,
432 * ainsi que des classes CSS de ces du nom de la langue et direction choisie.
435 * Code html de la balise <html>
437 function html_lang_attributes()
439 $lang = $GLOBALS['spip_lang'];
440 $dir = ($GLOBALS['spip_lang_rtl'] ?
'rtl' : 'ltr');
441 return "<html class='$dir $lang no-js' xmlns='http://www.w3.org/1999/xhtml' lang='$lang' dir='$dir'>\n" ;
444 // initialise les globales (liste des langue, langue du site, spip_lang...)
446 utiliser_langue_site();