squelette des menus de langues

ecrire/inc_lang.php3

@@ -415,15 +415,9 @@ function lang_dselect ($rien='') {
 function menu_langues($nom_select = 'var_lang', $default = '', $texte = '', $herit = '') {
 	global $couleur_foncee, $couleur_claire, $connect_id_auteur;
 
-	if ($default == '')
-		$default = $GLOBALS['spip_lang'];
+	$ret = liste_options_langues($nom_select, $default, $herit);
 
-	if ($nom_select == 'var_lang_ecrire')
-		$langues = explode(',', $GLOBALS['all_langs']);
-	else
-		$langues = explode(',', lire_meta('langues_multilingue'));
-
-	if (count($langues) <= 1) return;
+	if (!$ret) return '';
 
 	if (!$couleur_foncee) $couleur_foncee = '#044476';
 
@@ -450,16 +444,6 @@ function menu_langues($nom_select = 'var_lang', $default = '', $texte = '', $her
 	$postcomplet = new Link($post);
 	if ($cible) $postcomplet->addvar('url', $cible);
 
-	$ret = '';
-	sort($langues);
-	while (list(, $l) = each ($langues)) {
-		$selected = ($l == $default) ? ' selected=\'selected\'' : '';
-		if ($l == $herit) {
-			$ret .= "<option class='maj-debut' style='font-weight: bold;' value='herit'$selected>"
-				.traduire_nom_langue($herit)." ("._T('info_multi_herit').")</option>\n";
-		}
-		else $ret .= "<option class='maj-debut' value='$l'$selected>".traduire_nom_langue($l)."</option>\n";
-	}
 	return "<form action='"
 	  . $post
 	  . "' method='post' style='margin:0px; padding:0px;'>"
@@ -481,7 +465,27 @@ function menu_langues($nom_select = 'var_lang', $default = '', $texte = '', $her
 	  . "</form>";
 }
 
+function liste_options_langues($nom_select, $default='', $herit='') {
 
+	if ($default == '') $default = $GLOBALS['spip_lang'];
+	if ($nom_select == 'var_lang_ecrire')
+		$langues = explode(',', $GLOBALS['all_langs']);
+	else
+		$langues = explode(',', lire_meta('langues_multilingue'));
+
+	if (count($langues) <= 1) return '';
+	$ret = '';
+	sort($langues);
+	while (list(, $l) = each ($langues)) {
+		$selected = ($l == $default) ? ' selected=\'selected\'' : '';
+		if ($l == $herit) {
+			$ret .= "<option class='maj-debut' style='font-weight: bold;' value='herit'$selected>"
+				.traduire_nom_langue($herit)." ("._T('info_multi_herit').")</option>\n";
+		}
+		else $ret .= "<option class='maj-debut' value='$l'$selected>".traduire_nom_langue($l)."</option>\n";
+	}
+	return $ret;
+}
 
 //
 // Cette fonction est appelee depuis inc-public-global si on a installe

formulaire_menu_lang-dist.html

+<form	action='[(#HTTP_VARS{url})]'
+	method='post'
+	style='margin:0px; padding:0px;'>[
+	<input type='hidden' name='url' value='(#HTTP_VARS{cible})' />
+]	<select	name='[(#HTTP_VARS{nom})]' 
+		class='forml'
+		style='vertical-align: top; max-height: 24px; margin-bottom: 5px; width: 120px;'
+		onchange="document.location.href='[(#HTTP_VARS{retour})]&amp;[(#HTTP_VARS{nom})]='+this.options[this.selectedIndex].value">
+		[(#HTTP_VARS*{langues})]
+      </select>
+      <noscript>
+	<input type='submit' value='&gt;&gt;' class='spip_bouton' />
+      </noscript>
+</form>

inc-balises.php3

@@ -376,39 +376,6 @@ function balise_FIN_SURLIGNE_dist($p) {
 	return $p;
 }
 
-// Formulaire de changement de langue
-function balise_MENU_LANG_dist($p) {
-	$p->code = '("<"."?php
-include_ecrire(\"inc_lang.php3\");
-echo menu_langues(\"var_lang\", \$menu_lang);
-?".">")';
-	$p->statut = 'php';
-	return $p;
-}
-
-// Formulaire de changement de langue / page de login
-function balise_MENU_LANG_ECRIRE_dist($p) {
-	$p->code = '("<"."?php
-include_ecrire(\"inc_lang.php3\");
-echo menu_langues(\"var_lang_ecrire\", \$menu_lang);
-?".">")';
-	$p->statut = 'php';
-	return $p;
-}
-
-function balise_URL_LOGOUT_dist($p) {
-	if ($p->fonctions) {
-	$url = "'" . $p->fonctions[0] . "'";
-	$p->fonctions = array();
-	} else {
-	$url = '\$clean_link->getUrl()';
-	}
-	$p->code = '("<"."?php if (\$GLOBALS[\'auteur_session\'][\'login\'])
-    { echo \'spip_cookie.php3?logout_public=\'.\$GLOBALS[\'auteur_session\'][\'login\'].\'&amp;url=\' .urlencode(' . $url . '); } ?".">")';
-	$p->statut = 'php';
-	return $p;
-}
-
 function balise_INTRODUCTION_dist ($p) {
 	$_type = $p->type_requete;
 	$_texte = champ_sql('texte', $p);

inc-calcul-outils.php3

@@ -33,32 +33,23 @@ function affiche_logos($logos, $lien, $align) {
 	static $num_survol=0;
 	global $espace_logos;
 	list ($arton, $artoff) = $logos;
-	$num_survol++;
+
 	if (!$arton) return $artoff;
+
+	$num_survol++;
 	$milieu = "<img src='$arton'"
 		. ($align ? " align='$align' " : '') 
 		. " name='image$num_survol' border='0' "
 		. "alt='image$num_survol'"
 		. " hspace='$espace_logos' vspace='$espace_logos' class='spip_logos' />";
 
-	if ($artoff) {
-			if ($lien) {
-				$afflien = "<a href='$lien'";
-				$afflien2 = "a>";
-			}
-			else {
-				$afflien = "<div";
-				$afflien2 = "div>";
-			}
-			$milieu = "$afflien onmouseover=\"image$num_survol.src=".
-				"'$artoff'\" onmouseout=\"image$num_survol.src=".
-				"'$arton'\">$milieu</$afflien2";
-	}
-		else if ($lien) {
-			$milieu = "<a href='$lien'>$milieu</a>";
-		}
+	if (!$artoff) return ($lien ? http_href($lien, $milieu) : $milieu);
+
+	$att =	"onmouseover=\"image$num_survol.src='$artoff'\" 
+		onmouseout=\"image$num_survol.src='$arton'\"";
+
+	return ($lien ? "<a href='$lien' $att>$milieu</a>" : "<div $att>$milieu</div>");
 
-	return $milieu;
 }
 
 //

inc-menu_lang.php3

+<?php
+
+global $balise_MENU_LANG_collecte;
+$balise_MENU_LANG_collecte = array('menu_lang');
+
+// s'il n'y a qu'une langue eviter definitivement la balise ?php 
+
+function balise_MENU_LANG_stat ($args, $filtres)
+{
+  if (!strpos(lire_meta('langues_multilingue'),',')) return '';
+  return $args;
+}
+
+// normalement $opt sera toujours non vide suite au test ci-dessus
+
+function balise_MENU_LANG_dyn($default)
+{
+  include_ecrire("inc_lang.php3");
+  $opt = liste_options_langues('var_lang', $default);
+  if (!$opt) return '';
+  include_local("inc-menu_lang_ecrire.php3");
+  return menu_lang_pour_tous('var_lang', $opt);
+}
+?>

inc-menu_lang_ecrire.php3

+<?php
+
+global $balise_MENU_LANG_ECRIRE_collecte;
+$balise_MENU_LANG_ECRIRE_collecte = array('menu_lang');
+
+// s'il n'y a qu'une langue proposee eviter definitivement la balise ?php 
+
+function balise_MENU_LANG_ECRIRE_stat ($args, $filtres)
+{
+  if (!strpos(lire_meta('langues_proposees'),',')) return '';
+  return $args;
+}
+
+// normalement $opt sera toujours non vide suite au test ci-dessus
+
+function balise_MENU_LANG_ECRIRE_dyn($default)
+{
+  include_ecrire("inc_lang.php3");
+  $opt = liste_options_langues('var_lang_ecrire', $default);
+  return (!$opt ? '' : menu_lang_pour_tous('var_lang_ecrire', $opt));
+}
+
+function menu_lang_pour_tous($nom, $opt)
+{
+  $site = lire_meta("adresse_site");
+  $post = ($site ? $site : '..') . "/spip_cookie.php3";
+  $cible = $GLOBALS['clean_link']->getUrl();
+  $postcomplet = new Link($post);
+  $postcomplet->addvar('url', $cible);
+
+  return array('formulaire_menu_lang',
+	       10, 
+	       array('nom' => $nom,
+		     'url' => $post,
+		     'cible' => $cible,
+		     'retour' => $postcomplet->getUrl(),
+		     'langues' => $opt));
+}
+?>

inc-url_logout.php3

+<?php
+
+global $balise_URL_LOGOUT_collecte;
+$balise_URL_LOGOUT_collecte = array();
+
+function balise_URL_LOGOUT_stat ($args, $filtres)
+{
+  return array($filtres[0]);
+}
+
+function balise_URL_LOGOUT_dyn($cible)
+{
+	if (!$login = $GLOBALS['auteur_session']['login'])
+	  return '';
+	if (!$cible) $cible = $GLOBALS['clean_link']->getUrl();
+	return 'spip_cookie.php3?logout_public=' . $login . '&amp;url=' . urlencode($cible);
+}
+?>

spip_image.php3

@@ -105,8 +105,8 @@ function deplacer_fichier_upload($source, $dest) {
 		exit;
 	}
 
-	$ok = copy($source, $dest);
-	if (!$ok) $ok = move_uploaded_file($source, $dest);
+	$ok = @copy($source, $dest);
+	if (!$ok) $ok = @move_uploaded_file($source, $dest);
 	if ($ok)
 		@chmod($dest, 0666);
 	else {

spip_test_dirs.php3

@@ -28,8 +28,10 @@ function test_ecrire($my_dir) {
 
 // rajouter celui passer dans l'url ou celui du source (a l'installation)
 
-if ($test_dir)
-	$test_dirs[] = $test_dir;
+if ($test_dir) {
+  if (!ereg("/$", $test_dir)) $test_dir .= '/';
+  if (!in_array($test_dir, $test_dirs)) $test_dirs[] = $test_dir;
+ }
 else {
 	if (!_FILE_CONNECT)
 	  $test_dirs[] = dirname(_FILE_CONNECT_INS);