[SPIP] +2.1.12

[velocampus/web/www.git] / www / plugins / auto / couteau_suisse / couteau_suisse / outils / insertions_fonctions.php

diff --git a/www/plugins/auto/couteau_suisse/couteau_suisse/outils/insertions_fonctions.php b/www/plugins/auto/couteau_suisse/couteau_suisse/outils/insertions_fonctions.php
new file mode 100644 (file)
index 0000000..8b98bd1
--- /dev/null
+++ b/www/plugins/auto/couteau_suisse/couteau_suisse/outils/insertions_fonctions.php
@@ -0,0 +1,23 @@
+<?php\r
+\r
+// cette fonction n'est pas appelee dans les balises html : html|code|cadre|frame|script\r
+function insertions_rempl($texte) {\r
+       $ins = cs_lire_data_outil('insertions');\r
+       if(!$ins) return $texte;\r
+       $texte = str_replace($ins[0][0], $ins[0][1], $texte);\r
+       return preg_replace($ins[1][0], $ins[1][1], $texte);\r
+}\r
+\r
+function insertions_callback($m) {\r
+       return $m[1].cs_code_echappement($m[2], 'CS');\r
+}\r
+\r
+// Fonctions de traitement sur #TEXTE\r
+function insertions_pre_propre($texte) {\r
+       // prudence : on protege les liens de raccourcis de liens SPIP\r
+       if (strpos($texte, '[')!==false) \r
+               $texte = preg_replace_callback(',(\[[^][]*->>?)([^]]*)(?=\]),msS', 'insertions_callback', $texte);\r
+       return cs_echappe_balises('', 'insertions_rempl', $texte);\r
+}\r
+\r
+?>
\ No newline at end of file