spip / SPIP

ecrire/public/fonctions.php

Indentation +239 added lines, -239 removed lines

@@ -23,7 +23,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -52,75 +52,75 @@ 
  *     Introduction calculée
  **/
 function filtre_introduction_dist($descriptif, $texte, $longueur, $connect, $suite = null) {
-	// Si un descriptif est envoye, on l'utilise directement
-	if (strlen($descriptif)) {
-		return appliquer_traitement_champ($descriptif, 'introduction', '', array(), $connect);
-	}
-
-	// De preference ce qui est marque <intro>...</intro>
-	$intro = '';
-	$texte = preg_replace(",(</?)intro>,i", "\\1intro>", $texte); // minuscules
-	while ($fin = strpos($texte, "</intro>")) {
-		$zone = substr($texte, 0, $fin);
-		$texte = substr($texte, $fin + strlen("</intro>"));
-		if ($deb = strpos($zone, "<intro>") or substr($zone, 0, 7) == "<intro>") {
-			$zone = substr($zone, $deb + 7);
-		}
-		$intro .= $zone;
-	}
-
-	// [12025] On ne *PEUT* pas couper simplement ici car c'est du texte brut,
-	// qui inclus raccourcis et modeles
-	// un simple <articlexx> peut etre ensuite transforme en 1000 lignes ...
-	// par ailleurs le nettoyage des raccourcis ne tient pas compte
-	// des surcharges et enrichissement de propre
-	// couper doit se faire apres propre
-	//$texte = nettoyer_raccourcis_typo($intro ? $intro : $texte, $connect);
-
-	// Cependant pour des questions de perfs on coupe quand meme, en prenant
-	// large et en se mefiant des tableaux #1323
-
-	if (strlen($intro)) {
-		$texte = $intro;
-	} else {
-		if (strpos("\n" . $texte, "\n|") === false
-			and strlen($texte) > 2.5 * $longueur
-		) {
-			if (strpos($texte, "<multi") !== false) {
-				$texte = extraire_multi($texte);
-			}
-			$texte = couper($texte, 2 * $longueur);
-		}
-	}
-
-	// ne pas tenir compte des notes
-	if ($notes = charger_fonction('notes', 'inc', true)) {
-		$notes('', 'empiler');
-	}
-	// Supprimer les modèles avant le propre afin d'éviter qu'ils n'ajoutent du texte indésirable
-	// dans l'introduction.
-	$texte = supprime_img($texte, '');
-	$texte = appliquer_traitement_champ($texte, 'introduction', '', array(), $connect);
-
-	if ($notes) {
-		$notes('', 'depiler');
-	}
-
-	if (is_null($suite) and defined('_INTRODUCTION_SUITE')) {
-		$suite = _INTRODUCTION_SUITE;
-	}
-	$texte = couper($texte, $longueur, $suite);
-	// comme on a coupe il faut repasser la typo (on a perdu les insecables)
-	$texte = typo($texte, true, $connect, array());
-
-	// et reparagrapher si necessaire (coherence avec le cas descriptif)
-	// une introduction a tojours un <p>
-	if ($GLOBALS['toujours_paragrapher']) // Fermer les paragraphes
-	{
-		$texte = paragrapher($texte, $GLOBALS['toujours_paragrapher']);
-	}
-
-	return $texte;
+    // Si un descriptif est envoye, on l'utilise directement
+    if (strlen($descriptif)) {
+        return appliquer_traitement_champ($descriptif, 'introduction', '', array(), $connect);
+    }
+
+    // De preference ce qui est marque <intro>...</intro>
+    $intro = '';
+    $texte = preg_replace(",(</?)intro>,i", "\\1intro>", $texte); // minuscules
+    while ($fin = strpos($texte, "</intro>")) {
+        $zone = substr($texte, 0, $fin);
+        $texte = substr($texte, $fin + strlen("</intro>"));
+        if ($deb = strpos($zone, "<intro>") or substr($zone, 0, 7) == "<intro>") {
+            $zone = substr($zone, $deb + 7);
+        }
+        $intro .= $zone;
+    }
+
+    // [12025] On ne *PEUT* pas couper simplement ici car c'est du texte brut,
+    // qui inclus raccourcis et modeles
+    // un simple <articlexx> peut etre ensuite transforme en 1000 lignes ...
+    // par ailleurs le nettoyage des raccourcis ne tient pas compte
+    // des surcharges et enrichissement de propre
+    // couper doit se faire apres propre
+    //$texte = nettoyer_raccourcis_typo($intro ? $intro : $texte, $connect);
+
+    // Cependant pour des questions de perfs on coupe quand meme, en prenant
+    // large et en se mefiant des tableaux #1323
+
+    if (strlen($intro)) {
+        $texte = $intro;
+    } else {
+        if (strpos("\n" . $texte, "\n|") === false
+            and strlen($texte) > 2.5 * $longueur
+        ) {
+            if (strpos($texte, "<multi") !== false) {
+                $texte = extraire_multi($texte);
+            }
+            $texte = couper($texte, 2 * $longueur);
+        }
+    }
+
+    // ne pas tenir compte des notes
+    if ($notes = charger_fonction('notes', 'inc', true)) {
+        $notes('', 'empiler');
+    }
+    // Supprimer les modèles avant le propre afin d'éviter qu'ils n'ajoutent du texte indésirable
+    // dans l'introduction.
+    $texte = supprime_img($texte, '');
+    $texte = appliquer_traitement_champ($texte, 'introduction', '', array(), $connect);
+
+    if ($notes) {
+        $notes('', 'depiler');
+    }
+
+    if (is_null($suite) and defined('_INTRODUCTION_SUITE')) {
+        $suite = _INTRODUCTION_SUITE;
+    }
+    $texte = couper($texte, $longueur, $suite);
+    // comme on a coupe il faut repasser la typo (on a perdu les insecables)
+    $texte = typo($texte, true, $connect, array());
+
+    // et reparagrapher si necessaire (coherence avec le cas descriptif)
+    // une introduction a tojours un <p>
+    if ($GLOBALS['toujours_paragrapher']) // Fermer les paragraphes
+    {
+        $texte = paragrapher($texte, $GLOBALS['toujours_paragrapher']);
+    }
+
+    return $texte;
 }
 
 
@@ -155,59 +155,59 @@ 
  *     Code HTML de la pagination
  **/
 function filtre_pagination_dist(
-	$total,
-	$nom,
-	$position,
-	$pas,
-	$liste = true,
-	$modele = '',
-	$connect = '',
-	$env = array()
+    $total,
+    $nom,
+    $position,
+    $pas,
+    $liste = true,
+    $modele = '',
+    $connect = '',
+    $env = array()
 ) {
-	static $ancres = array();
-	if ($pas < 1) {
-		return '';
-	}
-	$ancre = 'pagination' . $nom; // #pagination_articles
-	$debut = 'debut' . $nom; // 'debut_articles'
-
-	// n'afficher l'ancre qu'une fois
-	if (!isset($ancres[$ancre])) {
-		$bloc_ancre = $ancres[$ancre] = "<a id='" . $ancre . "' class='pagination_ancre'></a>";
-	} else {
-		$bloc_ancre = '';
-	}
-	// liste = false : on ne veut que l'ancre
-	if (!$liste) {
-		return $ancres[$ancre];
-	}
-
-	$self = (empty($env['self']) ? self() : $env['self']);
-	$pagination = array(
-		'debut' => $debut,
-		'url' => parametre_url($self, 'fragment', ''), // nettoyer l'id ahah eventuel
-		'total' => $total,
-		'position' => intval($position),
-		'pas' => $pas,
-		'nombre_pages' => floor(($total - 1) / $pas) + 1,
-		'page_courante' => floor(intval($position) / $pas) + 1,
-		'ancre' => $ancre,
-		'bloc_ancre' => $bloc_ancre
-	);
-	if (is_array($env)) {
-		$pagination = array_merge($env, $pagination);
-	}
-
-	// Pas de pagination
-	if ($pagination['nombre_pages'] <= 1) {
-		return '';
-	}
-
-	if ($modele) {
-		$modele = '_' . $modele;
-	}
-
-	return recuperer_fond("modeles/pagination$modele", $pagination, array('trim' => true), $connect);
+    static $ancres = array();
+    if ($pas < 1) {
+        return '';
+    }
+    $ancre = 'pagination' . $nom; // #pagination_articles
+    $debut = 'debut' . $nom; // 'debut_articles'
+
+    // n'afficher l'ancre qu'une fois
+    if (!isset($ancres[$ancre])) {
+        $bloc_ancre = $ancres[$ancre] = "<a id='" . $ancre . "' class='pagination_ancre'></a>";
+    } else {
+        $bloc_ancre = '';
+    }
+    // liste = false : on ne veut que l'ancre
+    if (!$liste) {
+        return $ancres[$ancre];
+    }
+
+    $self = (empty($env['self']) ? self() : $env['self']);
+    $pagination = array(
+        'debut' => $debut,
+        'url' => parametre_url($self, 'fragment', ''), // nettoyer l'id ahah eventuel
+        'total' => $total,
+        'position' => intval($position),
+        'pas' => $pas,
+        'nombre_pages' => floor(($total - 1) / $pas) + 1,
+        'page_courante' => floor(intval($position) / $pas) + 1,
+        'ancre' => $ancre,
+        'bloc_ancre' => $bloc_ancre
+    );
+    if (is_array($env)) {
+        $pagination = array_merge($env, $pagination);
+    }
+
+    // Pas de pagination
+    if ($pagination['nombre_pages'] <= 1) {
+        return '';
+    }
+
+    if ($modele) {
+        $modele = '_' . $modele;
+    }
+
+    return recuperer_fond("modeles/pagination$modele", $pagination, array('trim' => true), $connect);
 }
 
 
@@ -221,15 +221,15 @@ 
  **/
 function lister_objets_avec_logos($type) {
 
-	$objet = objet_type($type);
-	$ids = sql_allfetsel("L.id_objet", "spip_documents AS D JOIN spip_documents_liens AS L ON L.id_document=D.id_document", "D.mode=".sql_quote('logoon')." AND L.objet=".sql_quote($objet));
-	if ($ids) {
-		$ids = array_column($ids, 'id_objet');
-		return implode(',', $ids);
-	}
-	else {
-		return "0";
-	}
+    $objet = objet_type($type);
+    $ids = sql_allfetsel("L.id_objet", "spip_documents AS D JOIN spip_documents_liens AS L ON L.id_document=D.id_document", "D.mode=".sql_quote('logoon')." AND L.objet=".sql_quote($objet));
+    if ($ids) {
+        $ids = array_column($ids, 'id_objet');
+        return implode(',', $ids);
+    }
+    else {
+        return "0";
+    }
 }
 
 
@@ -245,14 +245,14 @@ 
  *     Code HTML des notes
  **/
 function calculer_notes() {
-	$r = '';
-	if ($notes = charger_fonction('notes', 'inc', true)) {
-		$r = $notes(array());
-		$notes('', 'depiler');
-		$notes('', 'empiler');
-	}
-
-	return $r;
+    $r = '';
+    if ($notes = charger_fonction('notes', 'inc', true)) {
+        $r = $notes(array());
+        $notes('', 'depiler');
+        $notes('', 'empiler');
+    }
+
+    return $r;
 }
 
 
@@ -269,10 +269,10 @@ 
  * @return string
  */
 function retrouver_rang_lien($objet_source, $ids, $objet_lie, $idl, $objet_lien){
-	$res = lister_objets_liens($objet_source, $objet_lie, $idl, $objet_lien);
-	$res = array_column($res, 'rang_lien', $objet_source);
+    $res = lister_objets_liens($objet_source, $objet_lie, $idl, $objet_lien);
+    $res = array_column($res, 'rang_lien', $objet_source);
 
-	return (isset($res[$ids]) ? $res[$ids] : '');
+    return (isset($res[$ids]) ? $res[$ids] : '');
 }
 
 
@@ -289,19 +289,19 @@ 
  * @private
  */
 function lister_objets_liens($objet_source, $objet, $id_objet, $objet_lien) {
-	static $liens = array();
-	if (!isset($liens["$objet_source-$objet-$id_objet-$objet_lien"])) {
-		include_spip('action/editer_liens');
-		// quand $objet == $objet_lien == $objet_source on reste sur le cas par defaut de $objet_lien == $objet_source
-		if ($objet_lien == $objet and $objet_lien !== $objet_source) {
-			$res = objet_trouver_liens(array($objet => $id_objet), array($objet_source => '*'));
-		} else {
-			$res = objet_trouver_liens(array($objet_source => '*'), array($objet => $id_objet));
-		}
-
-		$liens["$objet_source-$objet-$id_objet-$objet_lien"] = $res;
-	}
-	return $liens["$objet_source-$objet-$id_objet-$objet_lien"];
+    static $liens = array();
+    if (!isset($liens["$objet_source-$objet-$id_objet-$objet_lien"])) {
+        include_spip('action/editer_liens');
+        // quand $objet == $objet_lien == $objet_source on reste sur le cas par defaut de $objet_lien == $objet_source
+        if ($objet_lien == $objet and $objet_lien !== $objet_source) {
+            $res = objet_trouver_liens(array($objet => $id_objet), array($objet_source => '*'));
+        } else {
+            $res = objet_trouver_liens(array($objet_source => '*'), array($objet => $id_objet));
+        }
+
+        $liens["$objet_source-$objet-$id_objet-$objet_lien"] = $res;
+    }
+    return $liens["$objet_source-$objet-$id_objet-$objet_lien"];
 }
 
 /**
@@ -315,23 +315,23 @@ 
  * @return int|string
  */
 function calculer_rang_smart($titre, $objet_source, $id, $env) {
-	// Cas du #RANG utilisé dans #FORMULAIRE_EDITER_LIENS -> attraper le rang du lien
-	// permet de voir le rang du lien si il y en a un en base, meme avant un squelette xxxx-lies.html ne gerant pas les liens
-	if (isset($env['form']) and $env['form']
-		and isset($env['_objet_lien']) and $env['_objet_lien']
-		and (function_exists('lien_triables') or include_spip('action/editer_liens'))
-		and $r = objet_associable($env['_objet_lien'])
-		and list($p, $table_lien) = $r
-	  and lien_triables($table_lien)
-	  and isset($env['objet']) and $env['objet']
-		and isset($env['id_objet']) and $env['id_objet']
-		and $objet_source
-		and $id = intval($id)
-	) {
-		$rang = retrouver_rang_lien($objet_source, $id, $env['objet'], $env['id_objet'], $env['_objet_lien']);
-		return ($rang ? $rang : '');
-	}
-	return recuperer_numero($titre);
+    // Cas du #RANG utilisé dans #FORMULAIRE_EDITER_LIENS -> attraper le rang du lien
+    // permet de voir le rang du lien si il y en a un en base, meme avant un squelette xxxx-lies.html ne gerant pas les liens
+    if (isset($env['form']) and $env['form']
+        and isset($env['_objet_lien']) and $env['_objet_lien']
+        and (function_exists('lien_triables') or include_spip('action/editer_liens'))
+        and $r = objet_associable($env['_objet_lien'])
+        and list($p, $table_lien) = $r
+      and lien_triables($table_lien)
+      and isset($env['objet']) and $env['objet']
+        and isset($env['id_objet']) and $env['id_objet']
+        and $objet_source
+        and $id = intval($id)
+    ) {
+        $rang = retrouver_rang_lien($objet_source, $id, $env['objet'], $env['id_objet'], $env['_objet_lien']);
+        return ($rang ? $rang : '');
+    }
+    return recuperer_numero($titre);
 }
 
 
@@ -347,7 +347,7 @@ 
  * @return string
  */
 function tri_protege_champ($t) {
-	return preg_replace(',[^\s\w.+\[\]],', '', $t);
+    return preg_replace(',[^\s\w.+\[\]],', '', $t);
 }
 
 /**
@@ -360,34 +360,34 @@ 
  * @return string
  */
 function tri_champ_order($t, $from = null) {
-	if (strncmp($t, 'multi ', 6) == 0) {
-		return "multi";
-	}
-
-	$champ = $t;
-
-	if (strncmp($t, 'num ', 4) == 0) {
-		$champ = substr($t, 4);
-	}
-	// enlever les autres espaces non evacues par tri_protege_champ
-	$champ = preg_replace(',\s,', '', $champ);
-
-	if (is_array($from)) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		foreach ($from as $idt => $table_sql) {
-			if ($desc = $trouver_table($table_sql)
-				and isset($desc['field'][$champ])
-			) {
-				$champ = "$idt.$champ";
-				break;
-			}
-		}
-	}
-	if (strncmp($t, 'num ', 4) == 0) {
-		return "0+$champ";
-	} else {
-		return $champ;
-	}
+    if (strncmp($t, 'multi ', 6) == 0) {
+        return "multi";
+    }
+
+    $champ = $t;
+
+    if (strncmp($t, 'num ', 4) == 0) {
+        $champ = substr($t, 4);
+    }
+    // enlever les autres espaces non evacues par tri_protege_champ
+    $champ = preg_replace(',\s,', '', $champ);
+
+    if (is_array($from)) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        foreach ($from as $idt => $table_sql) {
+            if ($desc = $trouver_table($table_sql)
+                and isset($desc['field'][$champ])
+            ) {
+                $champ = "$idt.$champ";
+                break;
+            }
+        }
+    }
+    if (strncmp($t, 'num ', 4) == 0) {
+        return "0+$champ";
+    } else {
+        return $champ;
+    }
 }
 
 /**
@@ -401,18 +401,18 @@ 
  * @return string
  */
 function tri_champ_select($t) {
-	if (strncmp($t, 'multi ', 6) == 0) {
-		$t = substr($t, 6);
-		$t = preg_replace(',\s,', '', $t);
-		$t = sql_multi($t, $GLOBALS['spip_lang']);
-
-		return $t;
-	}
-	if (trim($t) == 'hasard') {
-		return 'rand() AS hasard';
-	}
-
-	return "''";
+    if (strncmp($t, 'multi ', 6) == 0) {
+        $t = substr($t, 6);
+        $t = preg_replace(',\s,', '', $t);
+        $t = sql_multi($t, $GLOBALS['spip_lang']);
+
+        return $t;
+    }
+    if (trim($t) == 'hasard') {
+        return 'rand() AS hasard';
+    }
+
+    return "''";
 }
 
 /**
@@ -424,16 +424,16 @@ 
  * @return string
  */
 function formate_liste_critere_par_ordre_liste($valeurs, $serveur = ''){
-	if (!is_array($valeurs)){
-		return '';
-	}
-	$f = sql_serveur('quote', $serveur, true);
-	if (!is_string($f) or !$f){
-		return '';
-	}
-	$valeurs = implode(',', array_map($f, array_unique($valeurs)));
-
-	return $valeurs;
+    if (!is_array($valeurs)){
+        return '';
+    }
+    $f = sql_serveur('quote', $serveur, true);
+    if (!is_string($f) or !$f){
+        return '';
+    }
+    $valeurs = implode(',', array_map($f, array_unique($valeurs)));
+
+    return $valeurs;
 }
 
 /**
@@ -456,20 +456,20 @@ 
  *     Valeur $defaut sinon.
  **/
 function appliquer_filtre_sinon($arg, $filtre, $args, $defaut = '') {
-	// Si c'est un filtre d'image, on utilise image_filtrer()
-	// Attention : les 2 premiers arguments sont inversés dans ce cas
-	if (trouver_filtre_matrice($filtre) and substr($filtre, 0, 6) == 'image_') {
-		$args[1] = $args[0];
-		$args[0] = $filtre;
-		return image_graver(image_filtrer($args));
-	}
-
-	$f = chercher_filtre($filtre);
-	if (!$f) {
-		return $defaut;
-	}
-	array_shift($args); // enlever $arg
-	array_shift($args); // enlever $filtre
-	array_unshift($args, $arg); // remettre $arg
-	return call_user_func_array($f, $args);
+    // Si c'est un filtre d'image, on utilise image_filtrer()
+    // Attention : les 2 premiers arguments sont inversés dans ce cas
+    if (trouver_filtre_matrice($filtre) and substr($filtre, 0, 6) == 'image_') {
+        $args[1] = $args[0];
+        $args[0] = $filtre;
+        return image_graver(image_filtrer($args));
+    }
+
+    $f = chercher_filtre($filtre);
+    if (!$f) {
+        return $defaut;
+    }
+    array_shift($args); // enlever $arg
+    array_shift($args); // enlever $filtre
+    array_unshift($args, $arg); // remettre $arg
+    return call_user_func_array($f, $args);
 }