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 \***************************************************************************/
13 if (!defined("_ECRIRE_INC_VERSION")) return;
16 // Notes de bas de page
18 if (!defined('_NOTES_OUVRE_REF')) define('_NOTES_OUVRE_REF','<span class="spip_note_ref"> [');
19 if (!defined('_NOTES_FERME_REF')) define('_NOTES_FERME_REF',']</span>');
20 if (!defined('_NOTES_OUVRE_NOTE')) define('_NOTES_OUVRE_NOTE','<span class="spip_note_ref">[');
21 if (!defined('_NOTES_FERME_NOTE')) define('_NOTES_FERME_NOTE','] </span>');
22 if (!defined('_NOTES_RACCOURCI')) define('_NOTES_RACCOURCI', ',\[\[(\s*(<([^>\'"]*)>)?(.*?))\]\],msS');
24 // argument = true: empiler l'etat courant, initialiser un nouvel etat
25 // argument = false: restaurer l'etat precedent, denonce un etat courant perdu
26 // argument chaine, on y recherche les notes et on les renvoie en tableau
27 // argument tableau, texte de notes a rajouter dans ce qu'on a deja
28 // le dernier cas retourne la composition totale
29 // en particulier, envoyer un tableau vide permet de tout recuperer
30 // C'est stocke dans la globale $les_notes, mais pas besoin de le savoir
32 function inc_notes_dist($arg,$operation='traiter', $ignorer_autobr=false)
34 static $pile = array();
35 static $next_marqueur = 1;
37 global $les_notes, $compt_note, $notes_vues;
40 if (is_array($arg)) return traiter_les_notes($arg,$ignorer_autobr);
42 return traiter_raccourci_notes($arg, $marqueur>1?
$marqueur:'');
46 // si le marqueur n'a pas encore ete utilise, on le recycle dans la pile courante
47 array_push($pile, array(@$les_notes, @$compt_note, $notes_vues,0));
49 // sinon on le stocke au chaud, et on en cree un nouveau
50 array_push($pile, array(@$les_notes, @$compt_note, $notes_vues,$marqueur));
51 $next_marqueur++
; // chaque fois qu'on rempile on incremente le marqueur general
52 $marqueur = $next_marqueur; // et on le prend comme marqueur courant
58 #$prev_notes = $les_notes;
59 if (strlen($les_notes)) spip_log("notes perdues");
60 // si le marqueur n'a pas servi, le liberer
61 if (!strlen($les_notes) AND $marqueur==$next_marqueur)
63 // on redepile tout suite a une fin d'inclusion ou d'un affichage des notes
64 list($les_notes, $compt_note, $notes_vues, $marqueur) = array_pop($pile);
65 #$les_notes .= $prev_notes;
66 // si pas de marqueur attribue, on le fait
68 $next_marqueur++
; // chaque fois qu'on rempile on incremente le marqueur general
69 $marqueur = $next_marqueur; // et on le prend comme marqueur courant
73 if ($compt_note OR $marqueur>1 OR $next_marqueur>1)
74 return array($les_notes, $compt_note, $notes_vues, $marqueur,$next_marqueur);
76 return ''; // rien a sauver
78 case 'restaurer_etat':
79 if ($arg AND is_array($arg)) // si qqchose a restaurer
80 list($les_notes, $compt_note, $notes_vues, $marqueur,$next_marqueur) = $arg;
82 case 'contexter_cache':
83 if ($compt_note OR $marqueur>1 OR $next_marqueur>1)
84 return array("$compt_note:$marqueur:$next_marqueur");
88 case 'reset_all': // a n'utiliser qu'a fins de test
89 if (strlen($les_notes)) spip_log("notes perdues [reset_all]");
95 $notes_vues = array();
101 function traiter_raccourci_notes($letexte, $marqueur_notes)
103 global $compt_note, $notes_vues;
105 if (strpos($letexte, '[[') === false
106 OR !preg_match_all(_NOTES_RACCOURCI
, $letexte, $m, PREG_SET_ORDER
))
107 return array($letexte, array());
109 // quand il y a plusieurs series de notes sur une meme page
110 $mn = !$marqueur_notes ?
'' : ($marqueur_notes.'-');
111 $mes_notes = array();
113 list($note_source, $note_all, $ref, $nom, $note_texte) = $r;
115 // reperer une note nommee, i.e. entre chevrons
116 // On leve la Confusion avec une balise en regardant
117 // si la balise fermante correspondante existe
118 // Cas pathologique: [[ <a> <a href="x">x</a>]]
120 if (!(isset($nom) AND $ref
121 AND ((strpos($note_texte, '</' . $nom .'>') === false)
122 OR preg_match(",<$nom\W.*</$nom>,", $note_texte)))) {
123 $nom = ++
$compt_note;
124 $note_texte = $note_all;
127 // eliminer '%' pour l'attribut id
128 $ancre = $mn . str_replace('%','_', rawurlencode($nom));
130 // ne mettre qu'une ancre par appel de note (XHTML)
131 $att = ($notes_vues[$ancre]++
) ?
'' : " id='nh$ancre'";
133 // creer le popup 'title' sur l'appel de note
134 // propre est couteux => nettoyer_raccourcis_typo
135 if ($title = supprimer_tags(nettoyer_raccourcis_typo($note_texte))) {
136 $title = " title='" . couper($title,80) . "'";
139 // ajouter la note aux notes precedentes
141 $mes_notes[]= array($ancre, $nom, $note_texte);
144 // dans le texte, mettre l'appel de note a la place de la note
145 if ($nom) $nom = _NOTES_OUVRE_REF
."<a href='#nb$ancre' class='spip_note' rel='footnote'$title$att>$nom</a>"._NOTES_FERME_REF
;
147 $pos = strpos($letexte, $note_source);
149 // supprimer les ' ' ou 'nbsp;' avant un appel de note
150 $avant = preg_replace(',( | |'.chr(194).chr(160).')+$,S', '', substr($letexte, 0, $pos));
153 . code_echappement($nom)
154 . substr($letexte, $pos +
strlen($note_source));
158 return array($letexte, $mes_notes);
162 // http://doc.spip.org/@traiter_les_notes
163 function traiter_les_notes($notes,$ignorer_autobr) {
166 $title = _T('info_notes');
167 foreach ($notes as $r) {
168 list($ancre, $nom, $texte) = $r;
169 $atts = " href='#nh$ancre' class='spip_note' title='$title $ancre' rev='footnote'";
171 . "<div id='nb$ancre'><p". ($GLOBALS['class_spip'] ?
" class='spip_note'" : "") .">"
172 . code_echappement($nom
173 ? _NOTES_OUVRE_NOTE
."<a".$atts.">$nom</a>"._NOTES_FERME_NOTE
179 $mes_notes = _AUTOBR_IGNORER
.$mes_notes;
180 $mes_notes = propre($mes_notes);
182 return ($GLOBALS['les_notes'] .= $mes_notes);