From 4283fca1de5c2d4d75b9142f68cfa199f801be0c Mon Sep 17 00:00:00 2001
From: "Committo,Ergo:sum" <esj@rezo.net>
Date: Fri, 23 Jun 2006 22:24:08 +0000
Subject: [PATCH] Traitement des raccourcis [TITRE->TABLEnnn]
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Afin de faciliter la rédaction de la documentation de Spip, ajout d'un raccourci [->spip19] qui renvoie à l'article décrivant cette version sur www.spip.net (et bientot des autres versions).
Comme le traitement de ces raccourcis s'était alourdi avec le temps, ce depot est aussi une remise a plat de la fonction extraire_lien qui est maintenant obsolete (mais toujours disponible pour compatibilité). C'est à présent la fonction calculer_url qui prend en charge ces traitements, et rend l'URL ou son titre ou ces deux choses plus une CSS selon le mode d'appel. Dans le premier cas, cela revient simplement à appeler la famille generer_url_TABLE. La fonction calculer_url utilise un tableau global $tableau_raccourcis qu'il est loisible d'augmenter pour se définir de nouveaux raccourcis [TITRE->TABLEnnn].
En prime, la redirection par le champ Chapeau d'un article interprète ces raccourcis, ce qui n'était pas le cas auparavant.
---
ecrire/inc/filtres.php | 7 -
ecrire/inc/texte.php | 247 ++++++++++++++++++++---------------
ecrire/inc_version.php | 15 +++
ecrire/public/composer.php | 4 +-
ecrire/public/parametrer.php | 5 +-
5 files changed, 158 insertions(+), 120 deletions(-)
diff --git a/ecrire/inc/filtres.php b/ecrire/inc/filtres.php
index 663c0fcfb2..24a04545ef 100644
--- a/ecrire/inc/filtres.php
+++ b/ecrire/inc/filtres.php
@@ -277,13 +277,6 @@ function vider_url($url) {
return $url;
}
-// urls des liens spip [->article1]
-// voir la definition tordue de extraire_lien() dans inc_texte
-function calculer_url($url) {
- list(,$l) = extraire_lien(array('','','',vider_url($url)));
- return $l;
-}
-
//
// Ajouter le &var_recherche=toto dans les boucles de recherche
//
diff --git a/ecrire/inc/texte.php b/ecrire/inc/texte.php
index 9c345cfc6d..d77e21e0f0 100644
--- a/ecrire/inc/texte.php
+++ b/ecrire/inc/texte.php
@@ -226,7 +226,7 @@ function nettoyer_raccourcis_typo($texte){
if (strlen($reg[1]))
$titre = $reg[1];
else
- list(,,$titre) = extraire_lien($reg);
+ $titre= calculer_url($reg[3], $reg[1], 'titre');
$texte = str_replace($reg[0], $titre, $texte);
}
@@ -545,121 +545,151 @@ function typo($letexte, $echapper=true) {
return $letexte;
}
+// obsolete, utiliser calculer_url
-// cette fonction est tordue : on lui passe un tableau correspondant au match
-// de la regexp ci-dessous, et elle retourne le texte a inserer a la place
-// et le lien "brut" a usage eventuel de redirection...
function extraire_lien ($regs) {
- $lien_texte = $regs[1];
-
- $lien_url = entites_html(vider_url($regs[3]));
- $lien_interne = false;
- if (ereg('^[[:space:]]*(art(icle)?|rub(rique)?|br(.ve)?|aut(eur)?|mot|site|doc(ument)?|im(age|g))?[[:space:]]*([[:digit:]]+)(#.*)?[[:space:]]*$', $lien_url, $match)) {
- $id_lien = $match[8];
- $ancre = $match[9];
- $type_lien = substr($match[1], 0, 2);
- $lien_interne=true;
- $class_lien = "in";
- charger_generer_url();
- switch ($type_lien) {
- case 'ru':
- $lien_url = generer_url_rubrique($id_lien);
- if (!$lien_texte) {
- $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_rubriques WHERE id_rubrique=$id_lien"));
-
- $lien_texte = $row['titre'];
- }
- break;
- case 'br':
- $lien_url = generer_url_breve($id_lien);
- if (!$lien_texte) {
- $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_breves WHERE id_breve=$id_lien"));
-
- $lien_texte = $row['titre'];
- }
- break;
- case 'au':
- $lien_url = generer_url_auteur($id_lien);
- if (!$lien_texte) {
- $row = @spip_fetch_array(spip_query("SELECT nom FROM spip_auteurs WHERE id_auteur = $id_lien"));
-
- $lien_texte = $row['nom'];
- }
- break;
- case 'mo':
- $lien_url = generer_url_mot($id_lien);
- if (!$lien_texte) {
- $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_mots WHERE id_mot=$id_lien"));
+ list($lien, $class, $texte) = calculer_url($regs[3], $regs[1],'tout');
+ // Preparer le texte du lien ; attention s'il contient un <div>
+ // (ex: [<docXX|right>->lien]), il faut etre smart
+ $ref = "<a href=\"$lien\" class=\"$class\">$texte</a>";
+ return array($ref, $lien, $texte);
+}
- $lien_texte = $row['titre'];
- }
- break;
- case 'im':
- case 'do':
- $lien_url = generer_url_document($id_lien);
- if (!$lien_texte) {
- $row = @spip_fetch_array(spip_query("SELECT titre,fichier FROM spip_documents WHERE id_document=$id_lien"));
-
- $lien_texte = $row['titre'];
- if (!$lien_texte)
- $lien_texte = ereg_replace("^.*/","",$row['fichier']);
- }
- break;
- case 'si':
- # attention dans le cas des sites le lien pointe non pas sur
- # la page locale du site, mais directement sur le site lui-meme
- $row = @spip_fetch_array(spip_query("SELECT nom_site,url_site FROM spip_syndic WHERE id_syndic=$id_lien"));
- if ($row) {
- $lien_url = $row['url_site'];
- if (!$lien_texte)
- $lien_texte = typo($row['nom_site']);
- }
- break;
- default:
- $lien_url = generer_url_article($id_lien);
- if (!$lien_texte) {
- $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_articles WHERE id_article=$id_lien"));
+// traitement des raccourcis issus de [TITRE->RACCOURCInnn] et connexes
+//
+// Valeur retournee selon le parametre $pour:
+// 'tout' : <a href="L">T</a>
+// 'titre': seulement T ci-dessus (i.e. le TITRE ci-dessus ou dans table SQL)
+// 'url': seulement L (i.e. generer_url_RACCOURCI)
+
+function calculer_url ($lien, $texte='', $pour='url') {
+ global $tableau_raccourcis;
+ if (preg_match(',^\s*(\w*?)\s*(\d+)(#[^\s]*)?\s*$,', $lien, $match)) {
+ $ancre = isset($match[3]) ? $match[3] :'';
+ $f = $match[1];
+ if (isset($tableau_raccourcis[$f])
+ AND is_string($tableau_raccourcis[$f]))
+ $f = $tableau_raccourcis[$f];
+ $f=(($pour == 'url') ? 'generer' : 'calculer') . '_url_' . $f;
+ if (function_exists($f)) {
+ charger_generer_url();
+ if ($pour == 'url') return $f($match[2]) . $ancre;
+ $res = $f($match[2], $texte, $ancre);
+ return ($pour == 'titre') ? $res[2] : $res;
+ }
+ }
+
+ $lien = ltrim($lien);
+ if ($lien[0] == '?') {
+ if ($pour == 'titre') return $texte;
+ $lien = entites_html(substr($lien, 1));
+ return ($pour == 'url') ? $lien :
+ array($lien, "glossaire", $texte);
+ }
+ // Liens explicites
+ if (!$texte) {
+ $texte = str_replace('"', '', $lien);
+ if (strlen($texte)>40)
+ $texte = substr($texte,0,35).'...';
+ $texte = "<html>$texte</html>";
+ $class = "spip_url";
+ } else $class = "spip_out";
+
+ if ($pour == 'titre') return $texte;
+
+ $lien = entites_html(vider_url($lien));
+
+ // petites corrections d'URL
+ if (preg_match(",^www\.[^@]+$,",$lien))
+ $lien = "http://".$lien;
+ else if (strpos($lien, "@") && email_valide($lien))
+ $lien = "mailto:".$lien;
+
+ return ($pour == 'url') ? $lien : array($lien, $class, $texte);
+}
- $lien_texte = $row['titre'];
+function calculer_url_article($id, $texte, $ancre)
+{
+ $lien = generer_url_article($id) . $ancre;
+ if (!$texte) {
+ $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_articles WHERE id_article=$id"));
+ $texte = $row['titre'];
+ }
+ return array($lien, 'spip_in', $texte);
+}
- }
- break;
- }
+function calculer_url_rubrique($id, $texte, $ancre)
+{
+ $lien = generer_url_rubrique($id) . $ancre;
+ if (!$texte) {
+ $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_rubriques WHERE id_rubrique=$id"));
+ $texte = $row['titre'];
+ }
+ return array($lien, 'spip_in', $texte);
+}
- $lien_url .= $ancre;
+function calculer_url_mot($id, $texte, $ancre)
+{
+ $lien = generer_url_mot($id) . $ancre;
+ if (!$texte) {
+ $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_mots WHERE id_mot=$id"));
+ $texte = $row['titre'];
+ }
+ return array($lien, 'spip_in', $texte);
+}
- // supprimer les numeros des titres
- $lien_texte = supprimer_numero($lien_texte);
+function calculer_url_breve($id, $texte, $ancre)
+{
+ $lien = generer_url_breve($id) . $ancre;
+ if (!$texte) {
+ $row = @spip_fetch_array(spip_query("SELECT titre FROM spip_breves WHERE id_breve=$id"));
+ $texte = $row['titre'];
}
- else if (preg_match(',^\?(.*)$,s', $lien_url, $regs)) {
- // Liens glossaire
- $lien_url = substr($lien_url, 1);
- $class_lien = "glossaire";
+ return array($lien, 'spip_in', $texte);
+}
+
+function calculer_url_auteur($id, $texte, $ancre)
+{
+ $lien = generer_url_auteur($id) . $ancre;
+ if (!$texte) {
+ $row = @spip_fetch_array(spip_query("SELECT nom FROM spip_auteurs WHERE id_auteur=$id"));
+ $texte = $row['nom'];
}
- else {
- // Liens non automatiques
- $class_lien = "out";
- // texte vide ?
- if ((!$lien_texte) and (!$lien_interne)) {
- $lien_texte = str_replace('"', '', $lien_url);
- if (strlen($lien_texte)>40)
- $lien_texte = substr($lien_texte,0,35).'...';
- $class_lien = "url";
- $lien_texte = "<html>$lien_texte</html>";
- }
- // petites corrections d'URL
- if (preg_match(",^www\.[^@]+$,",$lien_url))
- $lien_url = "http://".$lien_url;
- else if (strpos($lien_url, "@") && email_valide($lien_url))
- $lien_url = "mailto:".$lien_url;
+ return array($lien, 'spip_in', $texte);
+}
+
+function calculer_url_document($id, $texte, $ancre)
+{
+ $lien = generer_url_document($id) . $ancre;
+ if (!$texte) {
+ $row = @spip_fetch_array(spip_query("SELECT titre,fichier FROM spip_documents WHERE id_document=$id"));
+ $texte = $row['titre'];
+ if (!$texte)
+ $texte = ereg_replace("^.*/","",$row['fichier']);
}
+ return array($lien, 'spip_in', $texte);
+}
- // Preparer le texte du lien ; attention s'il contient un <div>
- // (ex: [<docXX|right>->lien]), il faut etre smart
- $insert = typo("<a href=\"$lien_url\" class=\"spip_$class_lien\""
- .">$lien_texte</a>");
+function calculer_url_site($id, $texte, $ancre)
+{
+ # attention dans le cas des sites le lien pointe non pas sur
+ # la page locale du site, mais directement sur le site lui-meme
+ $row = @spip_fetch_array(spip_query("SELECT nom_site,url_site FROM spip_syndic WHERE id_syndic=$id"));
+ if ($row) {
+ $lien = $row['url_site'];
+ if (!$texte)
+ $texte = $row['nom_site'];
+ }
+ return array($lien, 'spip_in', $texte);
+}
- return array($insert, $lien_url, $lien_texte);
+function calculer_url_spip($id, $texte, $ancre)
+{
+ global $tableau_raccourcis;
+ if (is_numeric($tableau_raccourcis['spip'][$id]))
+ $p= "spip.php?page=article&id_article=" . $tableau_raccourcis['spip'][$id];
+ else $p = '';
+ return array("http://www.spip.net/$p$ancre", 'spip_in', "SPIP $id");
}
//
@@ -1048,7 +1078,7 @@ function traiter_raccourcis($letexte) {
//
- // Raccourcis liens [xxx->url] (cf. fonction extraire_lien ci-dessus)
+ // Raccourcis liens [xxx->url]
// Note : complique car c'est ici qu'on applique typo() !
//
$regexp = "|\[([^][]*)->(>?)([^]]*)\]|ms";
@@ -1056,8 +1086,11 @@ function traiter_raccourcis($letexte) {
if (preg_match_all($regexp, $letexte, $matches, PREG_SET_ORDER)) {
$i = 0;
foreach ($matches as $regs) {
- list($insert) = extraire_lien($regs);
- $inserts[++$i] = $insert;
+ list($lien, $class, $texte) = calculer_url($regs[3], $regs[1], 'tout');
+ $inserts[++$i] = "<a href=\"$lien\" class=\"$class\">"
+ . typo(supprimer_numero($texte))
+ . "</a>";
+
$letexte = str_replace($regs[0], "@@SPIP_ECHAPPE_LIEN_$i@@", $letexte);
}
}
diff --git a/ecrire/inc_version.php b/ecrire/inc_version.php
index ec7845eb22..737eb855da 100644
--- a/ecrire/inc_version.php
+++ b/ecrire/inc_version.php
@@ -187,6 +187,21 @@ $spip_pipeline = array(
'affichage_final' => '|f_surligne|f_tidy|f_admin', # cf. public/assembler
'taches_generales_cron' => ''
);
+
+$tableau_raccourcis = array(
+ '' => 'article',
+ 'art' => 'article',
+ 'rub' => 'rubrique',
+ 'br' => 'breve',
+ 'brève' => 'breve',
+ 'aut' => 'auteur',
+ 'doc' => 'document',
+ 'im' => 'document',
+ 'img' => 'document',
+ 'image' => 'document',
+ 'spip' => array(19 => 3368) // num article sur spipnet. A completer
+);
+
# la matrice standard (fichiers definissant les fonctions a inclure)
$spip_matrice = array ();
# les plugins a activer
diff --git a/ecrire/public/composer.php b/ecrire/public/composer.php
index f01ffc0d2a..0637557c48 100644
--- a/ecrire/public/composer.php
+++ b/ecrire/public/composer.php
@@ -484,9 +484,7 @@ function calculer_notes() {
// Renvoie le titre du "lien hypertexte"
function construire_titre_lien($nom,$url) {
- $result = extraire_lien(array(1=>$nom, 3=>$url));
- preg_match("/>([^>]*)<\/a>/", $result[0], $matches);
- return $matches[1];
+ return typo(supprimer_numero(calculer_url($url, $nom, 'titre')));
}
// Ajouter "&lang=..." si la langue de base n'est pas celle du site
diff --git a/ecrire/public/parametrer.php b/ecrire/public/parametrer.php
index e5be0b2579..8f882eea49 100644
--- a/ecrire/public/parametrer.php
+++ b/ecrire/public/parametrer.php
@@ -293,10 +293,9 @@ function public_parametrer_dist($fond, $local='', $cache='') {
if ($fond == 'article'
AND $id_article = intval($local['id_article'])) {
if ($chapo = sql_chapo($id_article)) {
- if (substr($chapo, 0, 1) == '=') {
+ if (preg_match(',^=(\[->)?(.*?)[]]?$,', $chapo, $url)){
include_spip('inc/texte');
- list(,$url) = extraire_lien(array('','','',
- substr($chapo, 1)));
+ $url = calculer_url($url[2]);
if ($url) { // sinon les navigateurs pataugent
$url = texte_script(str_replace('&', '&', $url));
return array('texte' => "<".
--
GitLab