Your IP : 216.73.216.59


Current Path : /home/quelfutuu/www/grice/plugins/auto/couteau_suisse/v1.17.0/outils/
Upload File :
Current File : /home/quelfutuu/www/grice/plugins/auto/couteau_suisse/v1.17.0/outils/maj_auto_action_rapide.php

<?php

// module inclu dans la description de l'outil en page de configuration

if (!defined("_ECRIRE_INC_VERSION")) return; // securiser
//include_spip('inc/actions');
//include_spip('inc/actions_compat');
include_spip('inc/distant');
include_spip('inc/presentation');
include_spip('couteau_suisse_fonctions'); // pour cs_lien()
// Constantes distantes
include_spip('cout_define');

if(version_compare(PHP_VERSION, '5.0.0', '>='))
	include_spip('outils/maj_auto_php5');
else {
	function cs_svn17($dir) { return false; } 
}

define('_MAJ_SVN_FILE', 'file:///home/svn/repository/spip-zone/');
define('_MAJ_SVN_DEBUT', 'svn://zone.spip.org/spip-zone/');
define('_MAJ_SVN_TRAC', 'svn://trac.rezo.net/spip-zone/'); // ancienne URL
define('_MAJ_ZONE', 'https://zone.spip.org/trac/spip-zone/');
define('_MAJ_LOG_DEBUT', _MAJ_ZONE . 'log/');
define('_MAJ_LOG_FIN', '?format=changelog');
define('_MAJ_LOG_CS', _MAJ_LOG_DEBUT . '_plugins_/couteau_suisse');
define('_MAJ_ZIP', 'https://files.spip.net/spip-zone/');
define('_MAJ_ZIP_SPIP', 'https://files.spip.net/spip/archives/SPIP-v');

// Pour SPIP = 2.0.X
if(!function_exists('info_maj_spip')) {
	include_spip('inc/plugin');
	if(!function_exists('spip_version_compare')) {
		function spip_version_compare($v1,$v2,$op) { return version_compare($v1,$v2,$op); }
	}
	function info_maj_spip(){
		if (!autoriser('webmestre')) return '';
		// derniere version de SPIP
		$maj = $GLOBALS['meta']['info_maj_spip'];
		if (!$maj) return '';
		list(, $maj) = explode('|', $maj, 2);
		if (strncmp($maj, "<a", 2) === 0)
			$maj = extraire_attribut ($maj, 'title');
		$res = _T('couteau:maj_rev_ok', array('revision' => $maj, 'url' => "https://www.spip.net/$GLOBALS[spip_lang]_download", 'zip' => ''));
		include_spip('lib/maj_auto/distant_mise_a_jour');
		return $res;
	}
	function compat_maj_spip($forcer = false) {
		include_spip('lib/maj_auto/distant_mise_a_jour');
		if(function_exists('genie_mise_a_jour_dist') && $forcer)
			return genie_mise_a_jour_dist(0);
	}
}

function maj_auto_js() {
	return http_script("
jQuery(document).ready(function() {
	var ch = jQuery('#maj_auto_div .maj_checked'); // radio checked
	var re = jQuery('.cs_relancer a');
	var cb = jQuery('#maj_auto_div .select_plugin'); // checkbox
	if(ch.length) ch[0].checked = true;
	else if(!re.length && !cb.length){
		jQuery('#maj_auto_div :submit').parent().remove();
		jQuery('#maj_auto_div :radio').attr('disabled','disabled');
	}
	if(cb.length==1 && !ch.length) cb[0].checked = true;
	if(!jQuery('#maj_auto_div :radio:checked').length && jQuery('#maj_auto_div :radio').length)
		jQuery('#maj_auto_div :radio:first')[0].checked = true;
	re.click(function() {
		cs_href_click(jQuery('#maj_auto')[0], true);
		return false;
	});
	jQuery('#maj_auto_div thead').click( function() {
		var span = jQuery('span', this);
		if(!span.length) return true;
		jQuery(this).next().toggleClass('cs_hidden');
		cs_EcrireCookie(span[0].id, '+'+span[0].className, dixans);
		span.toggleClass('cs_hidden');
		// annulation du clic
		return false;
	}).each(maj_lire_cookie);
	cb.click( function() {
		var checks = jQuery('#maj_auto_div :checkbox:checked').length;
		var radios = jQuery('#maj_auto_div :radio');
		if(checks) radios.hide(); else radios.show();
	});

function maj_lire_cookie(i,e){
	var span = jQuery('span', this);
	if(!span.length) return;
	jQuery(this).attr('style', 'cursor:pointer;')
	var c = cs_LireCookie(span[0].id);
	if(c!==null && c.match('cs_hidden')) {
		jQuery(this).next().addClass('cs_hidden');
		span.removeClass('cs_hidden');
	}
}
});"); }

function info_maj_spip2(){
	if (!autoriser('webmestre')) return "";
	$tmp = "<fieldset><legend>" . _T('couteauprive:help2', array('version' => 'SPIP ' . $GLOBALS['spip_version_branche'])).'</legend>';
	if(defined('_CS_PAS_DE_DISTANT'))
		return $tmp . ' <b>'.cs_lien("https://www.spip.net/$GLOBALS[spip_lang]_download", couteauprive_T('version_distante_off')) . '</b></fieldset>';
	include_spip('inc/presentation');
	// Plus grosse version de SPIP dispo (API d'origine)
	$res = info_maj_spip();
	$maj = $GLOBALS['meta']['info_maj_spip'];
	list(, $maj) = explode('|', $maj, 2);
	// Complement d'info : toutes les autres versions dispos
	list($m1, $m2, $m3) = preg_split('/\D+/', $GLOBALS['spip_version_branche']);
	if($m = info_maj_spip_ext($m1, $m2, $m3)) {
		if($maj && $res) $m[$maj] = $res;
		$res = implode('<br/>', $m); 
	}
	if(!strlen($res)) return $res;
	$res = str_replace('|', '<br/>', $res); // nouveauté SPIP v4 ?
	// liens morts
	$res = preg_replace(',\[([^[]+)->\],', '$1', $res);
	return $tmp	. propre("\n|{{{$res}}}|")
		. (preg_match(",$m1\.$m2\.\d+,",$res) ? '<p>' . _T('couteau:maj_spip') . '</p>' : '')
		. '</fieldset>';
}

// Liste de toutes les versions de SPIP [234].[01].? les plus elevees
function info_maj_spip_ext($ver_min, $rev_min, $min3){
	$res = array();
	include_spip('genie/mise_a_jour');
	if(!function_exists('info_maj_cache')) return $res;
	$nom = _DIR_CACHE_XML . _VERSIONS_LISTE;
	$page = info_maj_cache($nom, 'spip', !file_exists($nom) ? '' : file_get_contents($nom));
	preg_match_all(',/SPIP\D+((\d)\D+(\d)(\D+(\d+))?.*?[.]zip)",i', "$page", $m,  PREG_SET_ORDER);
	$v_min = "$ver_min.$rev_min.$min3";
	for($ver = $ver_min; $ver<=4; $ver++)
    for($rev = ($ver == $ver_min ? $rev_min : 0); $rev <= 1; $rev++) {
      $max = -1;
      foreach ($m as $v) 
        if ($v[2] == "$ver" && $v[3] == "$rev" && isset($v[5]) && $v[5] > $max)
          list($max, $fich) = array($v[5], $v[1]);
      if($max >= 0 && ($v = "$ver.$rev.$max") != $v_min)
        $res[$v] = _T('couteau:maj_rev_ok', array('revision' => $v, 'url' => _MAJ_ZIP_SPIP.$fich, 'zip' => ''));
    }
	ksort($res);
	return $res;
}

function maj_auto_action_rapide_callback($v) {
	return _T('couteau:2pts', array('objet'=>$v));
}

function maj_auto_action_rapide($actif) {
	if(!$actif) return str_replace(':','',_T('couteau:maj_liste'));
	$arg_chargeur = $GLOBALS['spip_version_base']>=15828?'url_zip_plugin2':'url_zip_plugin'; // eq. SPIP >= 2.1.2
	$tiers = array_map('maj_auto_action_rapide_callback', explode('/', _T('couteau:maj_tiers')));
	$tiers = array('necessite'=> $tiers[0], 'utilise'=> $tiers[1], 'procure'=> $tiers[2]);
	$time = time();
	$timeout = ini_get('max_execution_time');
	$timeout = $timeout?min(20,floor($timeout/2)):10;
	$html1 = '<style type="text/css">
	#maj_auto_div tr td:first-child {text-align: center;}
	.padd {padding:0.4em;}
	.caps {font-variant:small-caps;}
	.redb {color:red; font-weight:bold;}
	.interb {font-weight:bold;}
	.cfg_link {float: right;}
</style>'
	// verification des mises a jour de SPIP >= 2.0
		. info_maj_spip2();
	// verification de l'ecran de securite
	if(defined('_ECRAN_SECURITE')) {
		$tmp = "\n<fieldset><legend class='padd'>"._T('couteauprive:help2', array('version'=>_T('couteauprive:ecran_securite:nom')
			. ' ' . _ECRAN_SECURITE)) . '</legend>';
		if(defined('_CS_PAS_DE_DISTANT'))
			$html1 .= $tmp . ' <b>'.cs_lien(_MAJ_ECRAN_SECU, couteauprive_T('version_distante_off')) . '</b></fieldset>';
		elseif(($maj = maj_auto_rev_distante(_MAJ_ECRAN_SECU,false,",(\d+\.\d+(\.\d+)?),",0,true)) && $maj[0]!="-" && _ECRAN_SECURITE!=$maj) {
			include_spip('inc/description_outil');
			$html1 .= $tmp . description_outil_liens(_T("couteauprive:ecran_maj_ko2", array("n"=>"<span class='redb'>$maj</span>"))) . '</fieldset>';
		}
	}
	// verification des plugins
	include_spip('inc/plugin');
	$plugins_actifs = array_values(liste_chemin_plugin_actifs());
	// liste des extensions dispo sous SPIP >= 2.1
	if(defined('_DIR_EXTENSIONS')) define('_DIR_PLUGINS_DIST', _DIR_EXTENSIONS); // compat pour SPIP 2.1
	$plugins_extensions = defined('_SPIP20100')?array_values(liste_chemin_plugin_actifs(_DIR_PLUGINS_DIST)):array();
	// tous, mais les actifs d'abord...
	$plugins = array_unique(array_merge($plugins_actifs, $plugins_extensions, liste_plugin_files()));
	$html_actifs = $html_inactifs = $html_extensions = array();
	echo maj_auto_svp_presenter_messages();
	foreach ($plugins as $p) {
		$actif = in_array($p, $plugins_actifs, true);
		$extension = in_array($p, $plugins_extensions, true);
		$auto = strncmp($p, 'auto/', 5) === 0;
		$dir = $extension ? _DIR_PLUGINS_DIST : _DIR_PLUGINS;
		$stop = time() - $time > $timeout;
		$infos = plugin_get_infos_maj($p, $stop, $dir);
		if(!isset($infos['nom']) || !isset($infos['prefix']))
			continue;
		$nom = trim($infos['nom']);
		if(!defined('_SPIP30000') && strtoupper($infos['necessite'][0]['id']) == 'SPIP')
			array_shift($infos['necessite']);
		$cfg = $maj_lib = $checked = '';

		if(defined('_CS_PAS_DE_DISTANT'))
			$maj_lib = '[' . couteauprive_T('version_distante_off') . "->$infos[url_origine]]"
				. ($infos['zip_trac']  ?" [[zip]->$infos[zip_trac]]" : '');
		elseif($stop)
			$maj_lib = '<span class="cs_relancer">'._T('couteau:maj_poursuivre').'</span>';
		elseif($infos['maj_dispo']) {
			$maj_lib = _T('couteau:maj_rev_ok',
				array('revision' => $infos['rev_rss'], 'url' => $infos['url_origine'], 'zip' => $infos['zip_trac']));
			$checked = " class='maj_checked'"; }
		elseif($infos['rev_rss']>0 && $infos['rev_local'])
			$maj_lib = _T('couteau:maj' . ($infos['svn'] ? '_svn' : '_ok'),
				array('zip' => $infos['zip_trac'], 'url' => $infos['url_origine']));
		elseif($auto) {
			$maj_lib = $infos['rev_local'] == 999.99 && $infos['prefix'] != 'couteau_suisse'
				? _T('couteau:maj_archive_ko', array('zip' => $infos['zip_trac']))
				: _T('couteau:maj_rev_ko', array('url' => $infos['url_origine']));
			$checked = " class='maj_checked'"; }
		elseif($infos['rev_local'] && $infos['rev_rss'] <= 0)
			$maj_lib = _T('couteau:maj_rev_ko', array('url' => $infos['url_origine']));
		// eventuels liens morts
		$maj_lib = preg_replace(',\[([^[]+)->\],', '$1', $maj_lib);
		if($actif || $extension) $cfg = defined('_SPIP30000')
			? recuperer_fond('prive/squelettes/inclure/cfg',
				 array('script' => 'configurer_' . strtolower($infos['prefix']), 'nom' => ': ' . $nom))
			: ( (include_spip('plugins/afficher_plugin') && function_exists('plugin_bouton_config')) ? plugin_bouton_config($p, $infos, $dir) : '');
		$nom = $cfg . $nom . '&nbsp;(v' . $infos['version'] . ')' . ($maj_lib ? "<br /> {{".$maj_lib.'}}' : '');
		$nom = preg_replace(",[\n\r]+,", ' ', $nom); // Pour éviter les auto_br de SPIP...
		$rev = $infos['rev_local'] ? _T('couteau:maj_rev', array('revision' => $infos['rev_local'])) : '';
		if(strlen($infos['commit'])) $rev .= (strlen($rev)?'<br/>' : '') . cs_date_court($infos['commit']);
		if($infos['svn']) $rev .= '<br/><span class="caps">svn</span>';
		if($infos['id_paquet']>0) $rev .= '<span class="caps">&nbsp;svp</span>';
			elseif($infos['id_paquet'] < 0) $rev .= '<span class="caps">&nbsp;old</span>';
		$id_paquet = abs($infos['id_paquet']);
		if(!strlen($rev)) $rev = '&nbsp;';
		$zip_log = (strlen($infos['zip_log']) && $infos['zip_log'] != $infos['zip_trac'])
			? "<label><input type='radio' value='$infos[zip_log]'$checked name='$arg_chargeur'/>[->$infos[zip_log]]</label>"
			: '';
		$bouton = '&nbsp;';
		// bouton si on est dans les temps, et si une mise a jour est dispo
		// (sauf si un vieux plugin auto/ est detecte ou erreur d'archivage distant)
		if(!$stop && ($infos['maj_dispo'] || $infos['id_paquet'] < 0 || $infos['rev_local'] == 999.99)) {
			if($id_paquet) {
				// format des donnees en sortie
				$bouton = $id_paquet . ':' . $infos['id_depot'] . ':' . $p . ':' . $infos['zip_trac'];
				// 1 radio (MAJ unique) et 1 checkbox (MAJ multiple) pour SVP
				$bouton = /*"<input type='radio' value=\"$bouton\"$checked name='$arg_chargeur'/><br/>*/"<input type='checkbox' class='checkbox select_plugin' name='ids_paquet[]' value=\"$bouton\">";
			} elseif($auto) $bouton = strlen($infos['zip_trac'])
				? "<input type='radio' value='$infos[zip_trac]'$checked name='$arg_chargeur'/>"
				: '<acronym class="interb" title="' . _T('couteau:maj_zip_ko') . '">&#63;</acronym>';
		}
		if(strlen($zip_log)) {
			if (!$stop)
				$nom .= "<br/>" . _T('couteau:maj_verif') . "<br/>$zip_log<br/>{$bouton}[->$infos[zip_trac]]<label>";
			$bouton = '&nbsp;';
		}
		// relations exterieures
		foreach($tiers as $k => $v)
      if(isset($infos[$k]) && count($inf = $infos[$k]))
		    $nom .= "<br/>$v {" . implode('}, {', array_column($inf, 'nom')) . '}';
		${$actif ? 'html_actifs' : ($extension ? 'html_extensions' : 'html_inactifs')}[] = "|$bouton|$nom|$rev|";
	}

	$sep = " class='cs_hidden'> (...)</span>}}|<|<|\n";
	$html1 = "\n<div class='padd' id='maj_auto_div'>$html1<fieldset><legend class='padd'>"
		. _T('couteau:maj_liste').'</legend>'
		. propre(
			(count($html_actifs)? "\n|{{" . _T('couteau:plug_actifs') . "<span id='maj_1'" . $sep . implode("\n", $html_actifs) . "\n" : '')
			. (count($html_extensions)? "\n|{{" . _T(defined('_SPIP30000')?'plugins_liste_dist':'plugins_liste_extensions') . "<span id='maj_2'". $sep . implode("\n", $html_extensions) . "\n" : '')
			. (count($html_inactifs)? "\n|{{" . _T('couteau:plug_inactifs') . "<span id='maj_3'". $sep . implode("\n", $html_inactifs) . "\n" : '')
		  )
		. "<div style='text-align: right;'><input class='fondo' type='submit' value=\""
		. attribut_html(_T('couteau:maj_maj'))
		. '" /><p><i>'._T('couteau:maj_verif2').'</i></p></div></fieldset></div>'
		. maj_auto_js();
	$html2 = "\n<div class='cs_sobre'><input class='cs_sobre' type='submit' value=\"["
		. attribut_html(_T('couteau:maj_actu'))	. ']" /></div>';

	// premier formulaire non ajax, lancant directement charger_plugin
	return redirige_action_post('charger_plugin', '', 'admin_couteau_suisse', "cmd=descrip&outil=maj_auto#cs_infos", $html1)
		// second formulaire ajax : lien d'actualisation forcee
		. ajax_action_auteur('action_rapide', 'maj_auto_forcer', 'admin_couteau_suisse', "arg=maj_auto|description_outil&cmd=descrip#cs_action_rapide", $html2);
}

function maj_auto_svp_presenter_messages() {
	if(!defined('_SPIP30000')) return;
	// presenter d'abord les messages de SVP
	include_spip('exec/admin_plugin');
	$res = svp_presenter_actions_realisees();
	// puis ceux du CS s'il y en a
	if(!@file_exists($f=_DIR_TMP.'cs_messages.txt')) return $res;
	lire_fichier($f, $messages);
	$messages = unserialize($messages);
	include_spip('inc/filtres_boites');
	foreach(array('ok'=>array('svp:actions_realises','success'),
			'fail'=>array('svp:actions_en_erreur','error'),
			'notice'=>array('info_avertissement','notice')) as $k=>$v)
		if($messages[$k]) {
			$tmp = '<ul>';
			foreach($messages[$k] as $i) $tmp .= "<li>$i</li>";
			$res .= boite_ouvrir(_T($v[0]), $v[1]) . $tmp. '</ul>' . boite_fermer();
		}
	spip_unlink($f);
	return $res;
}

// renvoie le pattern present dans la page distante
// si le pattern est NULL, renvoie un simple 'is_file_exists'
// retours possibles :
// -3 si les acces distants sont desactives dans l'outil "Comportement du Couteau Suisse"
// -2 si la page distante est negative au pattern demande
// -1 si l'acces distant a echoue ou si le timeout est atteint
function maj_auto_rev_distante($url, $timeout = false, $pattern = NULL, $lastmodified = 0, $force = false) {
	// acces distants desactives ?
	if(defined('_CS_PAS_DE_DISTANT'))
		return '-3';
	// var_mode en parametre URL ?
	$force |= in_array(_request('var_mode'), array('calcul', 'recalcul'));
	// pour la version distante, on regarde toutes les 24h00 (meme en cas d'echec)
	$maj_ = isset($GLOBALS['meta']['tweaks_maj_auto']) ? unserialize($GLOBALS['meta']['tweaks_maj_auto']) : array();
	$url_md5 = md5($url);
	if(!isset($maj_[$url_md5])) $maj_[$url_md5] = array(0, false);
	$maj = &$maj_[$url_md5];
	// prendre le cache si svn.revision n'est pas modifie recemment, si les 24h ne sont pas ecoulee, et si on ne force pas
	if(!$force && $maj[1] !== false && $lastmodified < $maj[0] && (time() - $maj[0] < 24 * 3600))
		$distant = $maj[1];
	elseif($timeout)
		return '-1';
	else {
		include_spip('cout_utils');
		$distant = $maj[1] = ($pattern !== NULL)
			? (($distant = cs_recuperer_page($url))
				? (preg_match($pattern, $distant, $regs) ? $regs[1] : '-2')
				: '-1')
			: strlen(cs_recuperer_page($url, false, true, 0));
		$maj[0] = time();
		ecrire_meta('tweaks_maj_auto', serialize($maj_));
		if(!defined('_SPIP19300')) ecrire_metas(); # Pour SPIP 1.92
	}
	return $distant;
}

function plugin_get_infos_maj($p, $timeout = false, $DIR_PLUGINS = _DIR_PLUGINS) {
	if(defined('_SPIP20100')) {
		$get_infos = charger_fonction('get_infos', 'plugins');
		$infos = $get_infos($p, false, $DIR_PLUGINS);
	} else 
		$infos = plugin_get_infos($p);
	// fichier svn.revision fourni par SPIP
	$fichier_lu = lire_fichier($svn_rev = $DIR_PLUGINS . $p . '/svn.revision', $svn);
	$lastmodified = @file_exists($svn_rev) ? @filemtime($svn_rev) : 0;
	if($fichier_lu && preg_match(',<origine>(.+)</origine>,', $svn, $regs)) {
		$url_origine = str_replace(array(_MAJ_SVN_FILE, _MAJ_SVN_DEBUT), _MAJ_LOG_DEBUT, $regs[1]);
		// prise en compte du recent demenagement de la Zone...
		$url_origine = preg_replace(',/_plugins_/_(?:stable|dev|test)_/,', '/_plugins_/', $url_origine);
	} else
		$url_origine = (isset($infos['prefix']) && $infos['prefix'] == 'couteau_suisse') ? _MAJ_LOG_CS : '';
	$infos['commit'] = ($fichier_lu && preg_match(',<commit>(.+)</commit>,', $svn, $regs)) ? $regs[1] : '';
	$rev_local = (strlen($svn) && preg_match(',<revision>(.+)</revision>,', $svn, $regs))
		? intval($regs[1])
		:	($infos['commit'] >= '2013-02-08'
				? 999.99 # Erreur sur le serveur SPIP survenue le 8 fevrier 2013
				: version_svn_courante2($DIR_PLUGINS . $p)
			);
	if($infos['svn'] = is_array($rev_local) || $rev_local < 0) {
		// systeme SVN en place
		if(is_array($rev_local)) // version SVN >= 1.7 ?
			list($rev_local, $url_origine) = $rev_local;
		// version SVN anterieure
		elseif(lire_fichier($DIR_PLUGINS . $p . '/.svn/entries', $svn)
				&& preg_match(',(?:' . preg_quote(_MAJ_SVN_TRAC) . '|' . preg_quote(_MAJ_SVN_DEBUT) . ')[^\n\r]+,ms', $svn, $regs))
			$url_origine = $regs[0];
		$url_origine = str_replace(array(_MAJ_SVN_TRAC, _MAJ_SVN_DEBUT), _MAJ_LOG_DEBUT, $url_origine);
		// prise en compte d'un demenagement de la Zone...
		$url_origine = preg_replace(',/_plugins_/_(?:stable|dev|test)_/,', '/_plugins_/', $url_origine);
	}
	// URL https:// inattendu
	if(strncmp($url_origine, 'https://', 8) !== 0)
		$url_origine = '';
	$infos['id_paquet'] = 0; // SVP
	$infos['url_origine'] = strlen($url_origine) ? $url_origine._MAJ_LOG_FIN : '';
	$infos['rev_local'] = abs($rev_local);
	$infos['rev_rss'] = intval(maj_auto_rev_distante($infos['url_origine'], $timeout, ', \[(\d+)\],', $lastmodified));
	$infos['maj_dispo'] = $infos['rev_rss'] > 0 && $infos['rev_local'] > 0 && $infos['rev_rss'] > $infos['rev_local'];
	// fichiers zip
	$infos['zip_log'] = $infos['zip_trac'] = '';
	$p2 = preg_match(',^auto/(.*)$,', $p, $regs) ? $regs[1] : '';
	if(strlen($p2)) {
		if(defined('_SPIP30000')) {
			// supposition du passage par SVP ?
			maj_auto_svp_query($p, $infos);
			// ce plugin passe en negatif s'il n'a pas ete installe par SVP
			if(isset($infos['prefix']) && strpos($p2, $infos['prefix'] . '/v') === false)
				$infos['id_paquet'] *= -1;
		}
		// supposition du nom d'archive sur files.spip.org
		if(!$infos['zip_trac'] && intval(maj_auto_rev_distante($f = _MAJ_ZIP . $p2 . '.zip', $timeout)))
			$infos['zip_trac'] = $f;
		// nom de l'archive recemment installee par chargeur
		if(lire_fichier(sous_repertoire(_DIR_CACHE, 'chargeur') . $p2 . '/install.log', $log)
				&& preg_match(',[\n\r]source: *([^\n\r]+),msi', $log, $regs)
				&& intval(maj_auto_rev_distante($regs[1], $timeout)))
			$infos['zip_log'] = $regs[1];
		// au final on prend le bon
		if(!$infos['zip_trac'])
			$infos['zip_trac'] = $infos['zip_log'];
	}
	return $infos;
}

// fonction cherchant un fichier zip valide dans les paquets de SVP
// retourne array($id_paquet, $url_zips, $nom_zip)
function maj_auto_svp_query($dir, &$infos) {
	// Recherche en base du plugin local, puis du paquet distant
	if($x = sql_fetsel('id_paquet,id_plugin,version,nom_archive', 'spip_paquets', 'src_archive=' . _q($dir)))
		if($y = sql_fetsel('id_paquet,p.id_depot,p.version,nom_archive,src_archive,url_archives,url_brouteur',
			array('spip_paquets AS p', 'spip_depots AS d'), array('p.id_plugin=' . $x['id_plugin'], 'p.id_depot>0'))) {
		$infos['id_paquet'] = $x['id_paquet'];
		$infos['id_depot'] = $y['id_depot'];
		// info : si $x['version']<>$y['version'] alors SVP propose une mise a jour disponible
		// construction du paquet zip
		if(strlen($y['nom_archive']) && intval(maj_auto_rev_distante($f = $y['url_archives'].'/'.$y['nom_archive'])))
			$infos['zip_trac'] = $f;
//echo "<hr>$dir -> $infos[prefix]<br>SQL LOCAL = "; print_r($x); echo "<br>SQL DISTANT = "; print_r($y);
	}
}

// fonction manipulant les fonctions CVT de SVP (cf. svp/formulaires/admin_plugin.php)
function maj_auto_svp_maj_plugin($ids_paquet = array()) {
	if(!count($ids_paquet)) return;
	$actions = $depots = $messages = $retour = $requests = $cs_messages = array();
	$messages['decideur_erreurs'] = $cs_messages['fail'] = array();
	// donnees du formulaire recues sous la forme id_paquet:id_depot:plugin:archive
	foreach ($ids_paquet as $i)	{
		$p = explode(':', $i, 4);
		$requests[$p[0]] = $p;
		$actions[$p[0]] = 'up';
		$depots[$p[1]] = 1;
	}
	// pour denormaliser_version()
	include_spip('svp_fonctions');
	// actualiser la liste des paquets distants
	// ici une demande manuelle de mise a jour est demandee, autant etre sur...
	include_spip('inc/svp_depoter_distant');
	foreach($depots as $k => $v) svp_actualiser_depot($k);
	// lancer les verifications
	if(count($actions0 = $actions)) {
		// faire appel au decideur pour determiner la liste exacte des commandes apres
		// verification des dependances
		include_spip('inc/svp_decider');
		svp_decider_verifier_actions_demandees($actions, $messages);
	} else
		$cs_messages['notice'][] = _T('svp:message_erreur_aucun_plugin_selectionne');
	if(!count($messages['decideur_erreurs'])) {
		// recuperer les actions validees par le decideur
		$actions = defined('_SPIP30000') ? decoder_contexte_ajax(_request('_todo'), 'svp_todo') : false;
		if($actions === false) $actions = @unserialize(_request('_todo'));
		$rejets = is_array($actions) ? array_diff(array_keys($actions0), array_keys($actions)) : array();
		if(count($rejets)) {
			// probablement une action de reparation ou de MAJ de release sans changement de version
			// dans ce cas, on remplace simplement les anciens fichiers du plugin 
			if((include_spip('action/charger_plugin') OR include_spip('lib/maj_auto/distant_action_charger_plugin'))
					&& (include_spip('inc/charger_plugin') OR include_spip('lib/maj_auto/distant_inc_charger_plugin'))) {
				// ici : methode SPIP2 qui fonctionne sous SPIP3&4
				// (prise en compte de fichiers fantomes restes indument apres mise à jour vers SPIP3)
				foreach($rejets as $p) if($requests[$p][3]) {
					set_request('url_zip_plugin2', $requests[$p][3]);
					set_request('cs_retour', 'oui');
					include_spip('cout_utils'); // pour cs_recuperer_page
					$retour = action_charger_plugin_dist();
					if($retour['suite'] && is_dir($retour['tmp'])) {
						// deplacement de l'archive dezipee a son emplacement definitif
						$dest = _DIR_PLUGINS . $requests[$p][2];
						if(is_dir($old = dirname($dest) . '/.' . basename($dest) . '.old')) supprimer_repertoire($old);
						rename($dest, $old);
						rename($retour['tmp'], $dest);
						spip_unlink($retour['fichier']);
						$cs_messages['ok'][] = _T('couteauprive:maj_actualise_ok', array('plugin' => $retour['nom']));
					}
				} else
					$cs_messages['fail'][] = _T('couteauprive:maj_fichier_ko', array('file' => $requests[$p][3]));
			} else {
				$cs_messages['fail'][] = _T('couteauprive:maj_librairies_ko');
				include_spip('couteau_suisse_administrations');
				cs_maj_forcee(array('maj_auto'));
			}
		} // rejets
		// sauvegarde des messages
		if(count($cs_messages))
			ecrire_fichier(_DIR_TMP . 'cs_messages.txt', serialize($cs_messages));
		// envoyer les actions validees a l'actionneur
		include_spip('inc/svp_actionner');
		svp_actionner_traiter_actions_demandees($actions, $retour);//, $redirect);
		$action = charger_fonction('actionner', 'action');
		$action(); // et hop, action !
	} else
		$cs_messages['fail'] = array_merge($messages['decideur_erreurs'], $cs_messages['fail']);
	// Retour !
	include_spip('inc/headers');
	redirige_par_entete(_request('redirect'));
}

// fonction {$outil}_{$arg}_action() appelee par action/action_rapide.php
function maj_auto_maj_auto_forcer_action() {
	// forcer la lecture de la derniere version de SPIP
	if(function_exists('compat_maj_spip'))
		compat_maj_spip(true); // pour SPIP < 2.1
	elseif($cron = charger_fonction('mise_a_jour', 'genie'))
		$cron(0);
	// forcer la lecture des revisions distantes de plugins
	ecrire_meta('tweaks_maj_auto', serialize(array()));
	if(!defined('_SPIP19300')) ecrire_metas(); # Pour SPIP 1.92
}

function version_svn_courante2($dir) {
	// recherche de la base de donnee
	$db = @file_exists($dir2 = realpath($dir . '/.svn/wc.db'));
	if(!$db) {
		// version <1.7 de Subversion (reconnue par SPIP)
		if(@file_exists($dir.'/.svn/entries'))
			return version_svn_courante($dir);
		// trunk et extensions
		$db = @file_exists($dir2 = realpath($dir . '/../.svn/wc.db'));
		if(!$db) {
			// branches
			$db = @file_exists($dir2 = realpath($dir . '/../../.svn/wc.db'));
			if($db)
				$b = basename(dirname($dir)) . '/' . basename($dir);
		} else
			$b = basename($dir);
	} else
		$b = '';
	// version 1.7 de Subversion
	return cs_svn17($dir2);
}

?>