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

diff --git a/www/plugins/auto/couteau_suisse/couteau_suisse/exec/cs_version.php b/www/plugins/auto/couteau_suisse/couteau_suisse/exec/cs_version.php
new file mode 100644
index 0000000..0baca3b
--- /dev/null
+++ b/www/plugins/auto/couteau_suisse/couteau_suisse/exec/cs_version.php
@@ -0,0 +1,37 @@
+<?php
+#-----------------------------------------------------#
+#  Plugin  : Couteau Suisse - Licence : GPL           #
+#  Auteur  : Patrice Vanneufville, 2007               #
+#  Contact : patrice¡.!vanneufville¡@!laposte¡.!net   #
+#  Infos : http://www.spip-contrib.net/?article2166   #
+#-----------------------------------------------------#
+if (!defined("_ECRIRE_INC_VERSION")) return;
+
+include_spip('inc/actions');
+include_spip('cout_define');
+
+function exec_cs_version_dist() {
+	cs_minipres();
+	$version = _request('version');
+	$force = _request('force')=='oui';
+
+	// pour la version disponible, on regarde toutes les 2h00
+	$maj = isset($GLOBALS['meta']['tweaks_maj'])?unserialize($GLOBALS['meta']['tweaks_maj']):array(0, '');
+	if (!$force && $maj[1] && (time()-$maj[0] < 2*3600)) $distant = $maj[1];
+	else {
+		include_spip('inc/distant');
+		$distant = recuperer_page(_URL_CS_PLUGIN_XML);
+		if ($distant) $distant = $maj[1] = preg_match(',<version>([0-9.]+)</version>,', $distant, $regs)?$regs[1]:'';
+		$maj[0] = time();
+		if ($distant) ecrire_meta('tweaks_maj', serialize($maj));
+		ecrire_metas();
+	}
+	include_spip('inc/texte');
+	include_spip('couteau_suisse_fonctions'); // fonctions pour les pipelines
+	if (!$distant)
+		return ajax_retour('<span style="color: red;">'._T('couteauprive:erreur:probleme', array('pb'=>cs_lien(_URL_CS_PLUGIN_XML,_T('couteauprive:erreur:distant')))).'</span>');
+	ajax_retour(ptobr(propre($distant==$version?_T('couteauprive:version_a_jour'):(
+		$distant?_T('couteauprive:version_nouvelle', array('version' => "[{$distant}->http://files.spip.org/spip-zone/couteau_suisse.zip]")):''
+	))));
+}
+?>
\ No newline at end of file