X-Git-Url: http://git.cyclocoop.org/?p=velocampus%2Fweb%2Fwww.git;a=blobdiff_plain;f=www%2Fplugins%2Fauto%2Fcouteau_suisse%2Fcouteau_suisse%2Foutils%2Fchatons.php;fp=www%2Fplugins%2Fauto%2Fcouteau_suisse%2Fcouteau_suisse%2Foutils%2Fchatons.php;h=dae2dc0d3eda8681f44d2d3e9d6aea16c5030ee5;hp=0000000000000000000000000000000000000000;hb=80b4d3e85f78d402ed2e73f8f5d1bf4c19962eed;hpb=aaf970bf4cdaf76689ecc10609048e18d073820c

diff --git a/www/plugins/auto/couteau_suisse/couteau_suisse/outils/chatons.php b/www/plugins/auto/couteau_suisse/couteau_suisse/outils/chatons.php
new file mode 100644
index 0000000..dae2dc0
--- /dev/null
+++ b/www/plugins/auto/couteau_suisse/couteau_suisse/outils/chatons.php
@@ -0,0 +1,101 @@
+<?php
+
+// Outils CHATONS - 30 janvier 2007
+// Serieuse refonte et integration au Couteau Suisse : Patrice Vanneufville
+// Toutes les infos sur : http://www.spip-contrib.net/?article2166
+
+// cette fonction n'est pas appelee dans les balises html : html|code|cadre|frame|script|acronym|cite
+function cs_rempl_chatons($texte) {
+	if (strpos($texte, ':')===false) return $texte;
+	$chatons = cs_lire_data_outil('chatons');
+	return count($chatons[2])?preg_replace($chatons[2], $chatons[1], $texte):$texte;
+//	return str_replace($chatons[0], $chatons[1], $texte);
+}
+
+function chatons_pre_typo($texte) {
+	if (strpos($texte, ':')===false) return $texte;
+	return cs_echappe_balises('html|code|cadre|frame|script|acronym|cite', 'cs_rempl_chatons', $texte);
+}
+
+// cette fonction appelee automatiquement a chaque affichage de la page privee du Couteau Suisse renvoie un tableau
+function chatons_installe_dist() {
+	$chatons = array(array(), array(), array(), array(), array());
+	$path = find_in_path('img/chatons');
+	$dossier = opendir($path);
+	$bt = defined('_DIR_PLUGIN_PORTE_PLUME');
+	if($path) while ($image = readdir($dossier)) {
+		if (preg_match(',^([a-z][a-z0-9_-]*)\.(png|gif|jpg),', $image, $reg)) { 
+			$chatons[0][] = ':'.$reg[1];
+			$chatons[2][] = ',:'.preg_quote($reg[1],',').'\\b,';
+			list(,,,$size) = @getimagesize("$path/$reg[1].$reg[2]");
+			$chatons[1][] = "<img class=\"no_image_filtrer\" alt=\"$reg[1]\" title=\"$reg[1]\" src=\"".url_absolue($path)."/$reg[1].$reg[2]\" $size/>";
+			if($bt)	$chatons[4]['chaton_'.$reg[1]] = $reg[1].'.'.$reg[2];
+		}
+	}
+	return array($chatons);
+}
+
+// liste des nouveaux raccourcis ajoutes par l'outil
+// si cette fonction n'existe pas, le plugin cherche alors  _T('couteauprive:un_outil:aide');
+function chatons_raccourcis() {
+	$chatons = cs_lire_data_outil('chatons');
+	return _T('couteauprive:chatons:aide', array('liste' => '<b>'.join('</b>, <b>', $chatons[0]).'</b>'));
+}
+
+// cette fonction renvoie une ligne de tableau entre <tr></tr> afin de l'inserer dans la Barre Typo V2, si elle est presente
+function chatons_BarreTypo($tr) {
+	$chatons = cs_lire_data_outil('chatons');
+	$max = count($chatons[0]);
+	$res = '';
+	for ($i=0; $i<$max; $i++)
+		$res .= "<a href=\"javascript:barre_inserer('{$chatons[0][$i]}',@@champ@@)\">{$chatons[1][$i]}</a>";
+	return $tr.'<tr><td><@@span@@>'._T('couteauprive:chatons:nom')."</span>&nbsp;$res</td></tr>";
+}
+
+// les 2 fonctions suivantes inserent les boutons pour le plugin Porte Plume, s'il est present (SPIP>=2.0)
+function chatons_PP_pre_charger($flux) {
+	$chatons = cs_lire_data_outil('chatons');
+	$max = count($chatons[0]);
+	$r = array();
+	for ($i=0; $i<$max; $i++) {
+		$c = &$chatons[0][$i];
+		$id = 'chaton_'.str_replace(':','',$c);
+		$r[] = array(
+			"id" => $id,
+			"name" => _T('couteau:pp_chatons_inserer', array('chaton'=>$c)),
+			"className" => $id,
+			"replaceWith" => $c,
+			"display" => true);
+	}
+	$r = array(
+		"id" => 'cs_chatons_drop',
+		"name" => _T('couteau:pp_chatons_inserer_drop'),
+		"className" => 'cs_chatons_drop',
+		"replaceWith" => '',
+		"display" => true,
+		"dropMenu" => $r,
+	);
+	foreach(cs_pp_liste_barres('chatons') as $b)
+		$flux[$b]->ajouterApres('grpCaracteres', $r);
+	return $flux;
+}
+function chatons_PP_icones($flux) {
+	$chatons = cs_lire_data_outil('chatons');
+	$flux['cs_chatons_drop'] = chatons_creer_icone_barre(find_in_path('img/chatons/lol.png'));
+	$path = find_in_path('img/chatons').'/';
+	foreach($chatons[4] as $i=>$v) $flux[$i] = chatons_creer_icone_barre($path.$v);
+	return $flux;
+}
+// creation d'icone pour le plugin porte-plume
+function chatons_creer_icone_barre($file) {
+	static $icones_barre;
+	rep_icones_barre($icones_barre);
+	define_IMG_GD_MAX_PIXELS();
+	// la config "Methode de fabrication des vignettes" doit etre renseignee pour 'image_reduire'
+	$file = filtrer('image_reduire', $file, 19, 19);
+	$file = filtrer('image_recadre', $file, 16, 16, 'topleft');
+	$nom = basename($src = extraire_attribut($file, 'src'));
+	@copy($src, $icones_barre.$nom);
+	return $nom;
+}
+?>
\ No newline at end of file