4 Cet outil 'decoration' permet aux redacteurs d'un site spip de d'appliquer des styles aux textes SPIP
5 Attention : seules les balises en minuscules sont reconnues.
6 Doc : http://www.spip-contrib.net/?article2427
9 // cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
10 function decoration_installe_dist() {
11 if(!function_exists('_decoration_BALISES')) return NULL;
12 cs_log("decoration_installe_dist()");
13 // on decode les balises entrees dans la config
14 $deco_balises = preg_split("/[\r\n]+/", _decoration_BALISES());
15 $aide = $trouve = $remplace = $alias = $auto_balises = $auto_remplace = $BT = array();
16 foreach ($deco_balises as $balise) {
17 $balise = trim($balise);
18 if (preg_match('/^(span|div|auto)\.([^.]+)\.(class|lang)\s*=(.+)$/', $balise, $regs)) {
20 list($auto, $div, $racc, $attr, $valeur) = array($regs[1]=='auto', $regs[1], trim($regs[2]), trim($regs[3]), trim($regs[4]));
21 if (defined('_SPIP20100') && $attr=='lang') {
22 // Pour SPIP>=2.1 on utilise l'astuce <multi>[XX]...</multi> pour beneficier ensuite de la typo appropriee
23 $BT[] = array($racc, true, $div);
25 $trouve[] = "<$racc>"; $trouve[] = "</$racc>";
26 $remplace[] = $a = "<multi>[$valeur]";
27 $remplace[] = $b = "</multi>";
29 $attr="$attr=\"$valeur\"";
30 $BT[] = array($racc, $auto, $div);
32 $auto_balises[] = $racc;
33 $auto_remplace[$racc] = "$attr>";
36 $trouve[] = "<$racc>"; $trouve[] = "</$racc>"; $trouve[] = "<$racc/>";
37 $remplace[] = $a = "<$div $attr>";
38 $remplace[] = $b = "</$div>"; $remplace[] = $a.$b;
41 } elseif (preg_match('/^(span|div|auto)\.([^=]+)=(.+)$/', $balise, $regs)) {
43 list($auto, $div, $racc, $style) = array($regs[1]=='auto', $regs[1], trim($regs[2]), trim($regs[3]));
44 $BT[] = array($racc, $auto, $div);
45 $attr="style=\"$style\"";
47 $auto_balises[] = $racc;
48 $auto_remplace[$racc] = "$attr>";
51 $trouve[] = "<$racc>"; $trouve[] = "</$racc>"; $trouve[] = "<$racc/>";
52 $remplace[] = $a = "<$div $attr>";
53 $remplace[] = $b = "</$div>"; $remplace[] = $a.$b;
55 } elseif (preg_match('/^([^=]+)=(.+)$/', $balise, $regs)) {
57 $alias[trim($regs[1])] = trim($regs[2]);
60 // ajout des alias qu'on a trouves
61 foreach ($alias as $a=>$v)
62 if(($i=array_search("<$v>", $trouve, true))!==false) {
63 $aide[] = $a; $trouve[] = "<$a>"; $trouve[] = "</$a>"; $trouve[] = "<$a/>";
64 $remplace[] = $remplace[$i]; $remplace[] = $remplace[$i+
1]; $remplace[] = $remplace[$i+
2];
65 } elseif(array_search($v, $auto_balises, true)!==false) {
67 $auto_remplace[$a] = $auto_remplace[$v];
69 // liste des balises disponibles
70 $aide = array_merge($aide, $auto_balises);
71 $n = count($auto_balises);
72 // protection $auto_balises pour la future regExpr
73 array_walk($auto_balises, 'cs_preg_quote');
74 // renvoi des donnees compilees
76 // balises fixes a trouver
78 // remplacement des balises fixes
80 // RegExpr pour les balises automatiques
81 $n?
($n==1?
",<($auto_balises[0])>(.*?)</$auto_balises[0]>,ms":',<('.join('|', $auto_balises).')>(.*?)</\\1>,ms'):'',
82 // association pour les balises automatiques
84 // balises disponibles
86 // casier special pour l'aide
91 // liste des nouveaux raccourcis ajoutes par l'outil
92 // si cette fonction n'existe pas, le plugin cherche alors _T('couteauprive:un_outil:aide');
93 function decoration_raccourcis() {
94 $racc = cs_lire_data_outil('decoration', 'racc');
95 return _T('couteauprive:decoration:aide', array('liste' => '<b>'.join('</b>, <b>', $racc).'</b>'));
98 function decoration_callback($matches) {
100 return cs_block($matches[2])
101 ?
'<div ' . $deco_balises[3][$matches[1]] . $matches[2] . '</div>'
102 :'<span ' . $deco_balises[3][$matches[1]] . $matches[2] . '</span>';
105 // cette fonction n'est pas appelee dans les balises html : html|code|cadre|frame|script
106 function decoration_rempl($texte) {
107 if (strpos($texte, '<')===false) return $texte;
108 // reecrire les raccourcis du type <balise />
109 $texte = preg_replace(', +/>,', '/>', $texte);
110 global $deco_balises;
111 // balises fixes, facile : on remplace tout d'un coup !
112 $texte = str_replace($deco_balises[0], $deco_balises[1], $texte);
113 // balises automatiques, plus long : il faut un callback pour analyser l'interieur du texte
114 return strlen($deco_balises[2])
115 ?
preg_replace_callback($deco_balises[2], 'decoration_callback', $texte)
120 function decoration_pre_typo($texte) {
121 if (strpos($texte, '<')===false ||
!function_exists('_decoration_BALISES')) return $texte;
122 // pour les callbacks
123 global $deco_balises;
124 // lecture des balises et des remplacements
125 $deco_balises = cs_lire_data_outil('decoration');
126 // on remplace apres echappement
127 $texte = cs_echappe_balises('', 'decoration_rempl', $texte);
129 unset($deco_balises);
133 // cette fonction renvoie une ligne de tableau entre <tr></tr> afin de l'inserer dans la Barre Typo V2, si elle est presente
134 function decoration_BarreTypo($tr) {
135 $balises = cs_lire_data_outil('decoration');
137 foreach($balises[4] as $v) {
138 $tmp = $v[1]?
"('<$v[0]>','</$v[0]>'":"_etendu('<$v[0]>','</$v[0]>','<$v[0]/>'";
139 $res[] = "<a href=\"javascript:barre_raccourci$tmp,@@champ@@)\"><span class=\"cs_BT\">$v[0]</span></a>";
141 $res = join(' ', $res);
142 return $tr.'<tr><td><p style="margin:0; line-height:1.8em;">'._T('couteauprive:decoration:nom')." $res</p></td></tr>";
145 // les 2 fonctions suivantes inserent les boutons pour le plugin Porte Plume, s'il est present (SPIP>=2.0)
146 function decoration_PP_pre_charger($flux) {
147 $balises = cs_lire_data_outil('decoration');
148 $max = count($balises[4]);
150 foreach($balises[4] as $b) {
151 $id = 'decoration_'.$b[0];
154 "name" => _T('couteau:pp_decoration_inserer', array('racc'=>$b[0], 'balise'=>$b[2])),
156 "selectionType" => $b[2]=='div'?
"line":"word",
157 // $b[1] est vrai si la balise <racc/> est interdite
158 "replaceWith" => "function(h){ return outil_decoration(h.selection, '$b[0]', '$b[2]', '".($b[1]?
'':"<$b[0]/>")."'); }",
162 "id" => 'cs_decoration_drop',
163 "name" => _T('couteau:pp_decoration_inserer_drop'),
164 "className" => 'cs_decoration_drop',
170 foreach(cs_pp_liste_barres('decoration') as $b) {
171 $flux[$b]->ajouterApres('stroke_through', $r);
172 $flux[$b]->ajouterFonction("function outil_decoration(sel, racc, balise, defaut) {
174 r='<'+racc+'>'+sel+'</'+racc+'>';
175 return balise=='span'?r.replace(/(\\n\\n|\\r\\n\\r\\n|\\r\\r)/g,'</'+racc+'>\$1<'+racc+'>'):r;
182 function decoration_PP_icones($flux){
183 $balises = cs_lire_data_outil('decoration');
184 // icones utilisees. Attention : mettre les drop-boutons en premier !!
185 $flux['cs_decoration_drop'] = 'decoration_div.png';
186 foreach($balises[4] as $b) {
187 $id = 'decoration_'.$b[0];
188 $flux[$id] = find_in_path("icones_barre/{$id}.png")?
$id.'.png'
189 :"decoration_{$b[2]}.png";