source: spip-zone/_plugins_/couteau_suisse/outils/maj_auto_action_rapide.php @ 59861

Last change on this file since 59861 was 59861, checked in by patfr@…, 8 years ago

Fonctions Ajax abandonnées par SPIP3

File size: 14.2 KB
Line 
1<?php
2
3// module inclu dans la description de l'outil en page de configuration
4
5if (!defined("_ECRIRE_INC_VERSION")) return; // securiser
6//include_spip('inc/actions');
7include_spip('inc/actions_compat');
8include_spip('inc/distant');
9include_spip('inc/presentation');
10if(version_compare(PHP_VERSION, '5.0.0', '>=')) 
11        include_spip('outils/maj_auto_php5'); else { function cs_svn17($dir) { return false; } }
12
13define('_MAJ_SVN_FILE', 'file:///home/svn/repository/spip-zone/');
14define('_MAJ_SVN_DEBUT', 'svn://zone.spip.org/spip-zone/');
15define('_MAJ_SVN_TRAC', 'svn://trac.rezo.net/spip-zone/'); // ancienne URL
16define('_MAJ_ZONE', 'http://zone.spip.org/trac/spip-zone/');
17define('_MAJ_LOG_DEBUT', _MAJ_ZONE.'log/');
18define('_MAJ_LOG_FIN', '?format=changelog');
19define('_MAJ_ZIP', 'http://files.spip.org/spip-zone/');
20define('_MAJ_ECRAN_SECU', _MAJ_ZONE.'browser/_core_/securite/ecran_securite.php?format=txt');
21
22// Pour SPIP = 2.0.X
23if(!function_exists('info_maj_spip')) {
24        include_spip('inc/plugin');
25        if(!function_exists('spip_version_compare')) {
26                function spip_version_compare($v1,$v2,$op) { return version_compare($v1,$v2,$op); }
27        }
28        function info_maj_spip(){
29                if (!autoriser('webmestre')) return "";
30                // derniere version de SPIP
31                $maj = $GLOBALS['meta']['info_maj_spip'];
32                if (!$maj) return "";
33                $maj = explode('|',$maj);
34                // c'est une ancienne notif, on a fait la maj depuis !
35                if ($GLOBALS['spip_version_branche']!==array_shift($maj)) {
36                        // compat_maj_spip(true);
37                        return "";
38                }
39                // derniere version de SPIP 2.?.?
40                $maj = implode('|',$maj);
41                if (strncmp($maj,"<a",2)==0) $maj = extraire_attribut ($maj, 'title');
42                $lien = "http://www.spip.net/".$GLOBALS['spip_lang']."_download";
43                $maj = _T('couteau:maj_rev_ok',array('revision'=>$maj, 'url'=>$lien, 'zip'=>''));
44                // derniere version de SPIP 2.0.?
45                include_spip('lib/maj_auto/distant_mise_a_jour');
46                if(function_exists('info_maj_cache')) {
47                        list(,,$rev) = preg_split('/\D+/', $GLOBALS['spip_version_branche']);
48                        $nom = _DIR_CACHE_XML . _VERSIONS_LISTE;
49                        $page = info_maj_cache($nom, 'spip', !file_exists($nom) ? '' : file_get_contents($nom));
50                        preg_match_all(',/SPIP\D+2\D+0(\D+(\d+))?.*?[.]zip",i', $page, $m,  PREG_SET_ORDER);
51                        $page=0;
52                        foreach ($m as $v) if ($v[2]>$rev && $v[2]>$page) $page = $v[2];
53                        if($page) {
54                                $lien = "http://files.spip.org/spip/archives/SPIP-v2-0-$page.zip"; // 'http://files.spip.org/spip/archives/#SPIP-v2-0-'.$page;
55                                $maj = _T('couteau:maj_rev_ok',array('revision'=>'2.0.'.$page, 'url'=>$lien, 'zip'=>'')) . '<br/>' . $maj;
56                        }
57                }
58                // liens morts
59                return preg_replace(',\[([^[]+)->\],', '$1', $maj);
60        }
61        function compat_maj_spip($forcer=false) {
62                include_spip('lib/maj_auto/distant_mise_a_jour');
63                if(function_exists('genie_mise_a_jour_dist') && $forcer) return genie_mise_a_jour_dist(0);
64        }
65}
66
67function maj_auto_action_rapide() {
68        global $spip_version_affichee, $spip_version_base;
69        $arg_chargeur = $spip_version_base>=15828?'url_zip_plugin2':'url_zip_plugin'; // eq. SPIP >= 2.1.2
70        $time = time();
71        $timeout = ini_get('max_execution_time');
72        $timeout = $timeout?min(30,floor($timeout/2)):10;
73        $style = 'style="padding:0.4em;"';
74        // verification des mises a jour de SPIP>=2.1
75        include_spip('inc/presentation');
76        list($m1,$m2) = preg_split('/\D+/', $GLOBALS['spip_version_branche']);
77        $html1 = (function_exists('info_maj_spip') && ($html1=info_maj_spip()))
78                ?"<fieldset><legend $style>"._T('couteauprive:help2', array('version'=>'SPIP '.$spip_version_affichee)).'</legend>'.propre("\n|{{{$html1}}}|")
79                        .(preg_match(",$m1\.$m2\.\d+,",$html1)?'<p>'._T('couteau:maj_spip').'</p>':'').'</fieldset>'
80                :'';
81        // verification de l'ecran de securite
82        if(defined('_ECRAN_SECURITE')) {
83                $maj = maj_auto_rev_distante(_MAJ_ECRAN_SECU,false,",(\d+\.\d+(\.\d+)?),",0,true);
84                if($maj{0}!="-" && _ECRAN_SECURITE!=$maj) {
85                        include_spip('inc/description_outil');
86                        $html1 .= "\n<fieldset><legend $style>"._T('couteauprive:help2', array('version'=>_T('couteauprive:ecran_securite:nom').' '._ECRAN_SECURITE)).'</legend>'
87                                . description_outil_liens(_T("couteauprive:ecran_maj_ko2", array("n"=>"<span style=\"color:red; font-weight:bold;\">$maj</span>"))).'</fieldset>';
88                }
89        }
90        // verification des plugins
91        include_spip('inc/plugin');
92        $plugins_actifs = array_values(liste_chemin_plugin_actifs());
93        // liste des extensions dispo sous SPIP 2.1
94        $plugins_extensions = defined('_SPIP20100')?array_values(liste_chemin_plugin_actifs(_DIR_EXTENSIONS)):array();
95        // tous, mais les actifs d'abord...
96        $plugins = array_unique(array_merge($plugins_actifs, $plugins_extensions, liste_plugin_files()));
97        $html_actifs = $html_inactifs = $html_extensions = array();
98        foreach ($plugins as $p) /*if(preg_match(',^auto/,', $p))*/ {
99                $actif = in_array($p, $plugins_actifs, true);
100                $extension = in_array($p, $plugins_extensions, true);
101                $auto = preg_match(',^auto/,', $p);
102                $infos = plugin_get_infos_maj($p, $stop=time()-$time>$timeout, $extension?_DIR_EXTENSIONS:_DIR_PLUGINS);
103                $maj_lib = $checked = '';
104                if($stop)
105                        $maj_lib = '<span class="cs_relancer">'.'Temps serveur &eacute;coul&eacute; : [poursuivre->#].'.'</span>';
106                elseif($infos['maj_dispo']) { 
107                        $maj_lib = _T('couteau:maj_rev_ok', 
108                                array('revision' => $infos['rev_rss'], 'url'=>$infos['url_origine'], 'zip'=>$infos['zip_trac']));
109                        $checked = " class='maj_checked'"; }
110                elseif($infos['rev_rss']>0 && $infos['rev_local'])
111                        $maj_lib = _T('couteau:maj'.($infos['svn']?'_svn':'_ok'),
112                                array('zip'=>$infos['zip_trac'], 'url'=>$infos['url_origine']));
113                elseif($auto) {
114                        $maj_lib = _T('couteau:maj_rev_ko', array('url'=>$infos['url_origine']));
115                        $checked = " class='maj_checked'"; }
116                elseif($infos['rev_local'] && $infos['rev_rss']<=0)
117                        $maj_lib = _T('couteau:maj_rev_ko', array('url'=>$infos['url_origine']));
118                // eventuels liens morts
119                $maj_lib = preg_replace(',\[([^[]+)->\],', '$1', $maj_lib);
120                $nom = preg_replace(",[\n\r]+,",' ',$infos['nom']). '&nbsp;(v' .$infos['version'] . ')' . ($maj_lib?"\n_ {{".$maj_lib.'}}':'');
121                $rev = $infos['rev_local']?_T('couteau:maj_rev', array('revision' => $infos['rev_local'])):'';
122                if(strlen($infos['commit'])) $rev .= (strlen($rev)?'<br/>':'') . cs_date_court($infos['commit']);
123                if($infos['svn']) $rev .= '<br/>SVN';           
124                if(!strlen($rev)) $rev = '&nbsp;';
125                $zip_log = (strlen($infos['zip_log']) && $infos['zip_log']!=$infos['zip_trac'])
126                        ?"<label><input type='radio' value='$infos[zip_log]'$checked name='$arg_chargeur'/>[->$infos[zip_log]]</label>":'';
127                $bouton = '&nbsp;';
128                if($auto && !$stop) $bouton = strlen($infos['zip_trac'])
129                        ?"<input type='radio' value='$infos[zip_trac]'$checked name='$arg_chargeur'/>"
130                        :'<center style="margin-top:0.6em;font-weight:bold;"><acronym title="'._T('couteau:maj_zip_ko').'">&#63;</acronym></center>';
131                if(strlen($zip_log)) {
132                        if (!$stop)
133                                $nom .= "\n_ "._T('couteau:maj_verif') . "\n_ $zip_log\n_ {$bouton}[->$infos[zip_trac]]<label>";
134                        $bouton = '&nbsp;';
135                }
136                ${$actif?'html_actifs':($extension?'html_extensions':'html_inactifs')}[] = "|$bouton|$nom|$rev|";
137        }
138       
139        $sep = " class='cs_hidden'> (...)</span>}}|<|<|\n";
140        $html1 = "\n<div $style id='maj_auto_div'>$html1<fieldset><legend $style>"
141                . _T('couteau:maj_liste').'</legend>'
142                . propre(
143                        (count($html_actifs)? "\n|{{" . _T('couteau:plug_actifs') . "<span id='maj_1'" . $sep . join("\n",$html_actifs) . "\n" : '')
144                        . (count($html_extensions)? "\n|{{" . _T('plugins_liste_extensions') . "<span id='maj_2'". $sep . join("\n",$html_extensions) . "\n" : '')
145                        . (count($html_inactifs)? "\n|{{" . _T('couteau:plug_inactifs') . "<span id='maj_3'". $sep . join("\n",$html_inactifs) . "\n" : '')
146                  )
147                . "<div style='text-align: right;'><input class='fondo' type='submit' value=\""
148                . attribut_html(_T('couteau:maj_maj'))
149                . '" /><p><i>'._T('couteau:maj_verif2').'</i></p></div></fieldset></div>'
150                . http_script("
151jQuery(document).ready(function() {
152        var ch = jQuery('#maj_auto_div .maj_checked');
153        var re = jQuery('.cs_relancer a');
154        if(ch.length) ch[0].checked = true;
155        else if(!re.length){
156                jQuery('#maj_auto_div :submit').parent().remove();
157                jQuery('#maj_auto_div :radio').attr('disabled','disabled');
158        }
159        if(!jQuery('#maj_auto_div :radio:checked').length && jQuery('#maj_auto_div :radio').length)
160                jQuery('#maj_auto_div :radio:first')[0].checked = true;
161        re.click(function() {
162                cs_href_click(jQuery('#maj_auto')[0], true);
163                return false;
164        });
165        jQuery('#maj_auto_div thead').click( function() {
166                jQuery(this).next().toggleClass('cs_hidden');
167                span = jQuery('span', this);
168                cs_EcrireCookie(span[0].id, '+'+span[0].className, dixans);
169                span.toggleClass('cs_hidden');
170                // annulation du clic
171                return false;
172        }).each(maj_lire_cookie);
173
174function maj_lire_cookie(i,e){
175        jQuery(this).attr('style', 'cursor:pointer;')
176        var span = jQuery('span', this);
177        var c = cs_LireCookie(span[0].id);
178        if(c!==null && c.match('cs_hidden')) {
179                jQuery(this).next().addClass('cs_hidden');
180                span.removeClass('cs_hidden');
181        }
182}
183
184});");
185        $html2 = "\n<div class='cs_sobre'><input class='cs_sobre' type='submit' value=\"["
186                . attribut_html(_T('couteau:maj_actu')) . ']" /></div>';
187
188// premier formulaire non ajax, lancant directement charger_plugin
189        return redirige_action_post('charger_plugin', '', 'admin_couteau_suisse', "cmd=descrip&outil=maj_auto#cs_infos", $html1)
190// second formulaire ajax : lien d'actualisation forcee
191                . ajax_action_auteur('action_rapide', 'maj_auto_forcer', 'admin_couteau_suisse', "arg=maj_auto|description_outil&cmd=descrip#cs_action_rapide", $html2);
192}
193
194// renvoie le pattern present dans la page distante
195// si le pattern est NULL, renvoie un simple 'is_file_exists'
196function maj_auto_rev_distante($url, $timeout=false, $pattern=NULL, $lastmodified=0, $force=false) {
197        $force |= in_array(_request('var_mode'), array('calcul', 'recalcul'));
198        // pour la version distante, on regarde toutes les 24h00 (meme en cas d'echec)
199        $maj_ = isset($GLOBALS['meta']['tweaks_maj_auto'])?unserialize($GLOBALS['meta']['tweaks_maj_auto']):array();
200        if(!isset($maj_[$url_=md5($url)])) $maj_[$url_] = array(0, false);
201        $maj = &$maj_[$url_];
202        // prendre le cache si svn.revision n'est pas modifie recemment, si les 24h ne sont pas ecoulee, et si on ne force pas
203        if (!$force && $maj[1]!==false && ($lastmodified<$maj[0]) && (time()-$maj[0] < 24*3600))
204                $distant = $maj[1];
205        elseif($timeout)
206                return '-1';
207        else {
208                $distant = $maj[1] = ($pattern!==NULL)
209                        ?(($distant = recuperer_page($url))
210                                ?(preg_match($pattern, $distant, $regs)?$regs[1]:'-2')
211                                :'-1')
212                        :strlen(recuperer_page($url, false, true, 0));
213                $maj[0] = time();
214                ecrire_meta('tweaks_maj_auto', serialize($maj_));
215                ecrire_metas();
216        }
217        return $distant;
218}
219
220function plugin_get_infos_maj($p, $timeout=false, $DIR_PLUGINS=_DIR_PLUGINS) {
221        if(defined('_SPIP20100')) {
222                $get_infos = charger_fonction('get_infos','plugins');
223                $infos = $get_infos($p, false, $DIR_PLUGINS);
224        } else $infos = plugin_get_infos($p);
225        // fichier svn.revision fourni par SPIP
226        $ok = lire_fichier($svn_rev = $DIR_PLUGINS.$p.'/svn.revision', $svn);
227        $lastmodified = @file_exists($svn_rev)?@filemtime($svn_rev):0;
228        if($ok && preg_match(',<origine>(.+)</origine>,', $svn, $regs)) {
229                $url_origine = str_replace(array(_MAJ_SVN_FILE, _MAJ_SVN_DEBUT), _MAJ_LOG_DEBUT, $regs[1]);
230                // prise en compte du recent demenagement de la Zone...
231                $url_origine = preg_replace(',/_plugins_/_(?:stable|dev|test)_/,','/_plugins_/', $url_origine);
232        } else $url_origine = '';
233        $infos['commit'] = ($ok && preg_match(',<commit>(.+)</commit>,', $svn, $regs))?$regs[1]:'';
234        $rev_local = (strlen($svn) && preg_match(',<revision>(.+)</revision>,', $svn, $regs))
235                ?intval($regs[1]):version_svn_courante2($DIR_PLUGINS.$p);
236        if($infos['svn'] = is_array($rev_local) || $rev_local<0) { 
237                // systeme SVN en place
238                if (is_array($rev_local)) // version SVN >= 1.7 ?
239                        list($rev_local, $url_origine) = $rev_local;   
240                // version SVN anterieure
241                elseif (lire_fichier($DIR_PLUGINS.$p.'/.svn/entries', $svn) 
242                                && preg_match(',(?:'.preg_quote(_MAJ_SVN_TRAC).'|'.preg_quote(_MAJ_SVN_DEBUT).')[^\n\r]+,ms', $svn, $regs))
243                        $url_origine = $regs[0];
244                $url_origine = str_replace(array(_MAJ_SVN_TRAC,_MAJ_SVN_DEBUT), _MAJ_LOG_DEBUT, $url_origine);
245                // prise en compte du recent demenagement de la Zone...
246                $url_origine = preg_replace(',/_plugins_/_(?:stable|dev|test)_/,','/_plugins_/', $url_origine);
247                //$infos['zip_trac'] = 'SVN';
248        }
249        $infos['url_origine'] = strlen($url_origine)?$url_origine._MAJ_LOG_FIN:'';
250        $infos['rev_local'] = abs($rev_local);
251        $infos['rev_rss'] = intval(maj_auto_rev_distante($infos['url_origine'], $timeout, ', \[(\d+)\],', $lastmodified));
252        $infos['maj_dispo'] = $infos['rev_rss']>0 && $infos['rev_local']>0 && $infos['rev_rss']>$infos['rev_local'];
253        // fichiers zip
254        $infos['zip_log'] = $infos['zip_trac'] = '';
255        $p2 = preg_match(',^auto/(.*)$,', $p, $regs)?$regs[1]:'';
256        if(strlen($p2)) {
257                // supposition du nom d'archive sur files.spip.org
258                if(intval(maj_auto_rev_distante($f = _MAJ_ZIP.$p2.'.zip', $timeout))) $infos['zip_trac'] = $f;
259                // nom de l'archive recemment installee par chargeur
260                if(lire_fichier(sous_repertoire(_DIR_CACHE, 'chargeur').$p2.'/install.log', $log)
261                                && preg_match(',[\n\r]source: *([^\n\r]+),msi', $log, $regs)
262                                && intval(maj_auto_rev_distante($regs[1], $timeout)))
263                        $infos['zip_log'] = $regs[1];
264                // au final on prend le bon
265                if(!$infos['zip_trac']) $infos['zip_trac'] = $infos['zip_log'];
266        }
267        return $infos;
268}
269
270// fonction {$outil}_{$arg}_action() appelee par action/action_rapide.php
271function maj_auto_maj_auto_forcer_action() {
272        // forcer la lecture de la derniere version de SPIP
273        if(function_exists('compat_maj_spip')) compat_maj_spip(true); // pour SPIP < 2.1
274        elseif($cron = charger_fonction('mise_a_jour', 'genie')) $cron(0);
275        // forcer la lecture des revisions distantes de plugins
276        ecrire_meta('tweaks_maj_auto', serialize(array()));
277        ecrire_metas();
278}
279
280function version_svn_courante2($dir) {
281        // recherche de la base de donnee
282        if(!$db = @file_exists($dir2 = realpath($dir . '/.svn/wc.db'))) {
283                // version <1.7 de Subversion (reconnue par SPIP)
284                if(@file_exists($dir.'/.svn/entries')) return version_svn_courante($dir);
285                // trunk et extensions
286                $db = @file_exists($dir2 = realpath($dir . '/../.svn/wc.db'));
287                if(!$db) {
288                        // branches
289                        $db = @file_exists($dir2 = realpath($dir . '/../../.svn/wc.db'));
290                        if($db) $b = basename(dirname($dir)).'/'.basename($dir);
291                } else $b = basename($dir);
292        } else $b = '';
293        // version 1.7 de Subversion
294        return cs_svn17($dir2);
295}
296
297?>
Note: See TracBrowser for help on using the repository browser.