--- /dev/null
+<?php\r
+#-----------------------------------------------------#\r
+# Plugin : Couteau Suisse - Licence : GPL #\r
+# Auteur : Patrice Vanneufville, 2006 #\r
+# Contact : patrice¡.!vanneufville¡@!laposte¡.!net #\r
+# Infos : http://www.spip-contrib.net/?article2166 #\r
+#-----------------------------------------------------#\r
+if(!defined("_ECRIRE_INC_VERSION")) return;\r
+\r
+// Ici se definissent les constantes du Couteau Suisse\r
+\r
+// RSS de trac\r
+@define('_CS_RSS_SOURCE', 'http://zone.spip.org/trac/spip-zone/log/_plugins_/couteau_suisse?format=rss&mode=stop_on_copy&limit=20');\r
+// Doc de spip-contrib.net\r
+@define('_URL_CONTRIB', 'http://www.spip-contrib.net/?article');\r
+// Revisions du CS\r
+@define('_URL_CS_PLUGIN_XML', 'http://zone.spip.org/trac/spip-zone/browser/_plugins_/couteau_suisse/plugin.xml?format=txt');\r
+// On met a jour le flux rss toutes les 2 heures\r
+define('_CS_RSS_UPDATE', 2*3600);\r
+define('_CS_RSS_COUNT', 15);\r
+// Fichier \r
+define('_CS_TMP_RSS', _DIR_TMP.'rss_couteau_suisse.html');\r
+\r
+\r
+// Qui sont les webmestres et les administrateurs ?\r
+function get_liste_administrateurs() {\r
+ include_spip('inc/autoriser');\r
+ include_spip('inc/texte');\r
+ $admins = $webmestres = array();\r
+ $s = spip_query("SELECT * FROM spip_auteurs WHERE statut='0minirezo'");\r
+ $fetch = function_exists('sql_fetch')?'sql_fetch':'spip_fetch_array'; // compatibilite SPIP 1.92\r
+ while ($qui = $fetch($s)) {\r
+ $nom = '<a href="'.generer_url_ecrire('auteur_infos',"id_auteur=$qui[id_auteur]").'">'.typo($qui['nom']."</a> (id_auteur=$qui[id_auteur])");\r
+ if(autoriser('webmestre','','',$qui)) $webmestres[$qui['id_auteur']] = $nom;\r
+ else if(autoriser('configurer','plugins','',$qui)) $admins[$qui['id_auteur']] = $nom;\r
+ }\r
+ return array(\r
+ count($webmestres)?join(', ', $webmestres):_T('couteauprive:variable_vide'), \r
+ count($admins)?join(', ', $admins):_T('couteauprive:variable_vide'));\r
+}\r
+\r
+// Polices disponibles\r
+function get_liste_fonts() {\r
+ return array_keys(find_all_in_path('polices/', '\w+\.ttf$'));\r
+}\r
+\r
+// Montrer le fichier mes_options.php en cours\r
+function show_file_options() {\r
+ return cs_canonicalize(str_replace("../", "", _DIR_RESTREINT_ABS).cs_spip_file_options(3));\r
+}\r
+\r
+?>
\ No newline at end of file