3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2011 *
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
19 // argument = true: empiler l'etat courant, initialiser un nouvel etat
20 // argument = false: restaurer l'etat precedent, denonce un etat courant perdu
21 // argument chaine, on y recherche les notes et on les renvoie en tableau
22 // argument tableau, texte de notes a rajouter dans ce qu'on a deja
23 // le dernier cas retourne la composition totale
24 // en particulier, envoyer un tableau vide permet de tout recuperer
25 // C'est stocke dans la globale $les_notes, mais pas besoin de le savoir
27 function inc_notes_dist($arg,$operation='traiter')
29 static $pile = array();
30 static $next_marqueur = 1;
32 global $les_notes, $compt_note, $notes_vues;
35 if (is_array($arg)) return traiter_les_notes($arg);
37 return traiter_raccourci_notes($arg, $marqueur>1?
$marqueur:'');
40 #var_dump(">$compt_note:$marqueur");
42 // si le marqueur n'a pas encore ete utilise, on le recycle dans la pile courante
43 array_push($pile, array(@$les_notes, @$compt_note, $notes_vues,0));
45 // sinon on le stocke au chaud, et on en cree un nouveau
46 array_push($pile, array(@$les_notes, @$compt_note, $notes_vues,$marqueur));
47 $next_marqueur++
; // chaque fois qu'on rempile on incremente le marqueur general
48 $marqueur = $next_marqueur; // et on le prend comme marqueur courant
54 #$prev_notes = $les_notes;
55 if (strlen($les_notes)) spip_log("notes perdues");
56 // si le marqueur n'a pas servi, le liberer
57 if (!strlen($les_notes) AND $marqueur==$next_marqueur)
59 // on redepile tout suite a une fin d'inclusion ou d'un affichage des notes
60 list($les_notes, $compt_note, $notes_vues, $marqueur) = array_pop($pile);
61 #$les_notes .= $prev_notes;
62 #var_dump("<$compt_note:$marqueur");
63 // si pas de marqueur attribue, on le fait
65 $next_marqueur++
; // chaque fois qu'on rempile on incremente le marqueur general
66 $marqueur = $next_marqueur; // et on le prend comme marqueur courant
70 if ($compt_note OR $marqueur>1 OR $next_marqueur>1)
71 return array($les_notes, $compt_note, $notes_vues, $marqueur,$next_marqueur);
73 return ''; // rien a sauver
75 case 'restaurer_etat':
76 if ($arg AND is_array($arg)) // si qqchose a restaurer
77 list($les_notes, $compt_note, $notes_vues, $marqueur,$next_marqueur) = $arg;
79 case 'contexter_cache':
80 if ($compt_note OR $marqueur>1 OR $next_marqueur>1)
81 return array("$compt_note:$marqueur:$next_marqueur");
85 case 'reset_all': // a n'utiliser qu'a fins de test
86 if (strlen($les_notes)) spip_log("notes perdues [reset_all]");
92 $notes_vues = array();
97 define('_RACCOURCI_NOTES', ', *\[\[(\s*(<([^>\'"]*)>)?(.*?))\]\],msS');
99 function traiter_raccourci_notes($letexte, $marqueur_notes)
101 global $compt_note, $les_notes, $notes_vues;
102 global $ouvre_ref, $ferme_ref;
104 if (!preg_match_all(_RACCOURCI_NOTES
, $letexte, $m, PREG_SET_ORDER
))
105 return array($letexte, array());
107 // quand il y a plusieurs series de notes sur une meme page
108 $mn = !$marqueur_notes ?
'' : ($marqueur_notes.'-');
109 $mes_notes = array();
111 list($note_source, $note_all, $ref, $nom, $note_texte) = $r;
113 // reperer une note nommee, i.e. entre chevrons
114 // On leve la Confusion avec une balise en regardant
115 // si la balise fermante correspondante existe
116 // Cas pathologique: [[ <a> <a href="x">x</a>]]
118 if (!(isset($nom) AND $ref
119 AND ((strpos($note_texte, '</' . $nom .'>') === false)
120 OR preg_match(",<$nom\W.*</$nom>,", $note_texte)))) {
121 $nom = ++
$compt_note;
122 $note_texte = $note_all;
125 // eliminer '%' pour l'attribut id
126 $ancre = $mn . str_replace('%','_', rawurlencode($nom));
128 // ne mettre qu'une ancre par appel de note (XHTML)
129 $att = ($notes_vues[$ancre]++
) ?
'' : " id='nh$ancre'";
131 // creer le popup 'title' sur l'appel de note
132 if ($title = supprimer_tags(propre($note_texte))) {
133 $title = " title='" . couper($title,80) . "'";
136 // ajouter la note aux notes precedentes
138 $mes_notes[]= array($ancre, $nom, $note_texte);
141 // dans le texte, mettre l'appel de note a la place de la note
142 if ($nom) $nom = "$ouvre_ref<a href='#nb$ancre' class='spip_note' rel='footnote'$title$att>$nom</a>$ferme_ref";
144 $pos = strpos($letexte, $note_source);
145 $letexte = substr($letexte, 0, $pos)
146 . code_echappement($nom)
147 . substr($letexte, $pos +
strlen($note_source));
150 return array($letexte, $mes_notes);
154 // http://doc.spip.org/@traiter_les_notes
155 function traiter_les_notes($notes) {
156 global $ouvre_note, $ferme_note;
160 $title = _T('info_notes');
161 foreach ($notes as $r) {
162 list($ancre, $nom, $texte) = $r;
163 $atts = " href='#nh$ancre' id='nb$ancre' class='spip_note' title='$title $ancre' rev='footnote'";
165 . code_echappement($nom
166 ?
"$ouvre_note<a$atts>$nom</a>$ferme_note"
170 $mes_notes = propre('<p>' . $mes_notes);
171 if ($GLOBALS['class_spip'])
172 $mes_notes = str_replace('<p class="spip">', '<p class="spip_note">', $mes_notes);
174 return ($GLOBALS['les_notes'] .= $mes_notes);