[SPIP] +spip v3.0.17

[lhc/web/clavette_www.git] / www / plugins-dist / textwheel / wheels / spip / spip-listes.php

diff --git a/www/plugins-dist/textwheel/wheels/spip/spip-listes.php b/www/plugins-dist/textwheel/wheels/spip/spip-listes.php
new file mode 100644 (file)
index 0000000..2e37d65
--- /dev/null
+++ b/www/plugins-dist/textwheel/wheels/spip/spip-listes.php
@@ -0,0 +1,107 @@
+<?php
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+# not useful as this file is included by the engine itself
+# require_once 'engine/textwheel.php';
+
+function tw_liste_init($t){
+       charger_fonction('dummy', 'inc', true); // ne sert a rien mais evite un segmentation fault PHP, on dirait
+       return tw_liste_item($t,'init');
+}
+
+function tw_liste_close($t){
+       return tw_liste_item($t,'close');
+}
+
+function tw_liste_item($t,$quoi='item'){
+       global $class_spip, $class_spip_plus;
+       static $niveau;
+       static $pile_li;
+       static $pile_type;
+       static $type;
+
+       switch ($quoi){
+               case 'init':
+                       $niveau = 0;
+                       $pile_li = array();
+                       $pile_type = array();
+                       $type = '';
+                       break;
+               case 'close':
+                       // retour sur terre
+                       $ajout = '';
+                       while ($niveau > 0) {
+                               $ajout .= $pile_li[$niveau];
+                               $ajout .= $pile_type[$niveau];
+                               $niveau --;
+                       }
+                       $t .= $ajout;
+                       break;
+
+               case 'ul':
+               case 'ol':
+                       $nouv_type = $quoi;
+                       break;
+               
+               case 'item':
+               default:
+                       $profond = 0;
+                       if ($l=strlen($t[2])) {
+                               $profond=$l;$nouv_type='ul';
+                               if (strncmp($t[2],'#',1)==0) $nouv_type='ol';
+                       }
+
+                       if ($profond > 0) {
+                               $ajout='';
+
+                               // changement de type de liste au meme niveau : il faut
+                               // descendre un niveau plus bas, fermer ce niveau, et
+                               // remonter
+                               $change_type = ($type AND ($type <> $nouv_type) AND ($profond == $niveau)) ? 1 : 0;
+                               $type = $nouv_type;
+
+                               // d'abord traiter les descentes
+                               while ($niveau > $profond - $change_type) {
+                                       $ajout .= $pile_li[$niveau];
+                                       $ajout .= $pile_type[$niveau];
+                                       if (!$change_type)
+                                               unset ($pile_li[$niveau]);
+                                       $niveau --;
+                               }
+
+                               // puis les identites (y compris en fin de descente)
+                               if ($niveau == $profond && !$change_type) {
+                                       $ajout .= $pile_li[$niveau];
+                               }
+
+                               // puis les montees (y compris apres une descente un cran trop bas)
+                               while ($niveau < $profond) {
+                                       if ($niveau == 0)
+                                               $ajout .= "\n\n";
+                                       elseif (!isset($pile_li[$niveau])) {
+                                               $ajout .= "<li$class_spip>";
+                                               $pile_li[$niveau] = "</li>";
+                                       }
+                                       $niveau ++;
+                                       $ajout .= "<$type$class_spip_plus>";
+                                       $pile_type[$niveau] = "</$type>";
+                               }
+
+                               $ajout .= "<li$class_spip>";
+                               $pile_li[$profond] = "</li>";
+                       }
+                       else {
+                               $ajout = $t[1]; // puce normale ou <hr>
+                       }
+
+                       $t = $ajout . $t[3];
+                       break;
+       }
+
+       return $t;
+}
+
+function tw_def_wrap($t){
+       global $class_spip_plus;
+       return "<dl$class_spip_plus>\n$t</dl>\n";
+}