spip / SPIP

ecrire/iterateur/data.php

Indentation +640 added lines, -640 removed lines

@@ -17,11 +17,11 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_DATA_SOURCE_MAX_SIZE')) {
-	define('_DATA_SOURCE_MAX_SIZE', 2 * 1_048_576);
+    define('_DATA_SOURCE_MAX_SIZE', 2 * 1_048_576);
 }
 
 
@@ -42,17 +42,17 @@ 
  *     Description de la boucle complétée des champs
  */
 function iterateur_DATA_dist($b) {
-	$b->iterateur = 'DATA'; # designe la classe d'iterateur
-	$b->show = [
-		'field' => [
-			'cle' => 'STRING',
-			'valeur' => 'STRING',
-			'*' => 'ALL' // Champ joker *
-		]
-	];
-	$b->select[] = '.valeur';
-
-	return $b;
+    $b->iterateur = 'DATA'; # designe la classe d'iterateur
+    $b->show = [
+        'field' => [
+            'cle' => 'STRING',
+            'valeur' => 'STRING',
+            '*' => 'ALL' // Champ joker *
+        ]
+    ];
+    $b->select[] = '.valeur';
+
+    return $b;
 }
 
 
@@ -62,522 +62,522 @@ 
  * Pour itérer sur des données quelconques (transformables en tableau)
  */
 class IterateurDATA implements Iterator {
-	/**
-	 * tableau de donnees
-	 *
-	 * @var array
-	 */
-	protected $tableau = [];
-
-	/**
-	 * Conditions de filtrage
-	 * ie criteres de selection
-	 *
-	 * @var array
-	 */
-	protected $filtre = [];
-
-
-	/**
-	 * Cle courante
-	 *
-	 * @var null
-	 */
-	protected $cle = null;
-
-	/**
-	 * Valeur courante
-	 *
-	 * @var null
-	 */
-	protected $valeur = null;
-
-	/**
-	 * Erreur presente ?
-	 *
-	 * @var bool
-	 **/
-	public $err = false;
-
-	/**
-	 * Calcul du total des elements
-	 *
-	 * @var int|null
-	 **/
-	public $total = null;
-
-	/**
-	 * Constructeur
-	 *
-	 * @param  $command
-	 * @param array $info
-	 */
-	public function __construct($command, $info = []) {
-		$this->type = 'DATA';
-		$this->command = $command;
-		$this->info = $info;
-
-		$this->select($command);
-	}
-
-	/**
-	 * Revenir au depart
-	 *
-	 * @return void
-	 */
-	public function rewind() : void {
-		reset($this->tableau);
-		$this->cle = array_key_first($this->tableau);
-		$this->valeur = current($this->tableau);
-		next($this->tableau);
-	}
-
-	/**
-	 * Déclarer les critères exceptions
-	 *
-	 * @return array
-	 */
-	public function exception_des_criteres() {
-		return ['tableau'];
-	}
-
-	/**
-	 * Récupérer depuis le cache si possible
-	 *
-	 * @param string $cle
-	 * @return mixed
-	 */
-	protected function cache_get($cle) {
-		if (!$cle) {
-			return;
-		}
-		# utiliser memoization si dispo
-		if (!function_exists('cache_get')) {
-			return;
-		}
-
-		return cache_get($cle);
-	}
-
-	/**
-	 * Stocker en cache si possible
-	 *
-	 * @param string $cle
-	 * @param int $ttl
-	 * @param null|mixed $valeur
-	 * @return bool
-	 */
-	protected function cache_set($cle, $ttl, $valeur = null) {
-		if (!$cle) {
-			return;
-		}
-		if (is_null($valeur)) {
-			$valeur = $this->tableau;
-		}
-		# utiliser memoization si dispo
-		if (!function_exists('cache_set')) {
-			return;
-		}
-
-		return cache_set(
-			$cle,
-			[
-				'data' => $valeur,
-				'time' => time(),
-				'ttl' => $ttl
-			],
-			3600 + $ttl
-		);
-		# conserver le cache 1h de plus que la validite demandee,
-		# pour le cas ou le serveur distant ne reponde plus
-	}
-
-	/**
-	 * Aller chercher les données de la boucle DATA
-	 *
-	 * @throws Exception
-	 * @param array $command
-	 * @return void
-	 */
-	protected function select($command) {
-
-		// l'iterateur DATA peut etre appele en passant (data:type)
-		// le type se retrouve dans la commande 'from'
-		// dans ce cas la le critere {source}, si present, n'a pas besoin du 1er argument
-		if (isset($this->command['from'][0])) {
-			if (isset($this->command['source']) and is_array($this->command['source'])) {
-				array_unshift($this->command['source'], $this->command['sourcemode']);
-			}
-			$this->command['sourcemode'] = $this->command['from'][0];
-		}
-
-		// cherchons differents moyens de creer le tableau de donnees
-		// les commandes connues pour l'iterateur DATA
-		// sont : {tableau #ARRAY} ; {cle=...} ; {valeur=...}
-
-		// {source format, [URL], [arg2]...}
-		if (
-			isset($this->command['source'])
-			and isset($this->command['sourcemode'])
-		) {
-			$this->select_source();
-		}
-
-		// Critere {liste X1, X2, X3}
-		if (isset($this->command['liste'])) {
-			$this->select_liste();
-		}
-		if (isset($this->command['enum'])) {
-			$this->select_enum();
-		}
-
-		// Si a ce stade on n'a pas de table, il y a un bug
-		if (!is_array($this->tableau)) {
-			$this->err = true;
-			spip_log('erreur datasource ' . var_export($command, true));
-		}
-
-		// {datapath query.results}
-		// extraire le chemin "query.results" du tableau de donnees
-		if (
-			!$this->err
-			and isset($this->command['datapath'])
-			and is_array($this->command['datapath'])
-		) {
-			$this->select_datapath();
-		}
-
-		// tri {par x}
-		if ($this->command['orderby']) {
-			$this->select_orderby();
-		}
-
-		// grouper les resultats {fusion /x/y/z} ;
-		if ($this->command['groupby']) {
-			$this->select_groupby();
-		}
-
-		$this->rewind();
-		#var_dump($this->tableau);
-	}
-
-
-	/**
-	 * Aller chercher les donnees de la boucle DATA
-	 * depuis une source
-	 * {source format, [URL], [arg2]...}
-	 */
-	protected function select_source() {
-		# un peu crado : avant de charger le cache il faut charger
-		# les class indispensables, sinon PHP ne saura pas gerer
-		# l'objet en cache ; cf plugins/icalendar
-		# perf : pas de fonction table_to_array ! (table est deja un array)
-		if (
-			isset($this->command['sourcemode'])
-			and !in_array($this->command['sourcemode'], ['table', 'array', 'tableau'])
-		) {
-			charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true);
-		}
-
-		# le premier argument peut etre un array, une URL etc.
-		$src = $this->command['source'][0];
-
-		# avons-nous un cache dispo ?
-		$cle = null;
-		if (is_string($src)) {
-			$cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true));
-		}
-
-		$cache = $this->cache_get($cle);
-		if (isset($this->command['datacache'])) {
-			$ttl = intval($this->command['datacache']);
-		}
-		if (
-			$cache
-			and ($cache['time'] + ($ttl ?? $cache['ttl'])
-				> time())
-			and !(_request('var_mode') === 'recalcul'
-				and include_spip('inc/autoriser')
-				and autoriser('recalcul')
-			)
-		) {
-			$this->tableau = $cache['data'];
-		} else {
-			try {
-				if (
-					isset($this->command['sourcemode'])
-					and in_array(
-						$this->command['sourcemode'],
-						['table', 'array', 'tableau']
-					)
-				) {
-					if (
-						is_array($a = $src)
-						or (is_string($a)
-							and $a = str_replace('"', '"', $a) # fragile!
-							and is_array($a = @unserialize($a)))
-					) {
-						$this->tableau = $a;
-					}
-				} else {
-					$data = $src;
-					if (is_string($src)) {
-						if (tester_url_absolue($src)) {
-							include_spip('inc/distant');
-							$data = recuperer_url($src, ['taille_max' => _DATA_SOURCE_MAX_SIZE]);
-							$data = $data['page'] ?? '';
-							if (!$data) {
-								throw new Exception('404');
-							}
-							if (!isset($ttl)) {
-								$ttl = 24 * 3600;
-							}
-						} elseif (@is_dir($src)) {
-							$data = $src;
-						} elseif (@is_readable($src) && @is_file($src)) {
-							$data = spip_file_get_contents($src);
-						}
-						if (!isset($ttl)) {
-							$ttl = 10;
-						}
-					}
-
-					if (
-						!$this->err
-						and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true)
-					) {
-						$args = $this->command['source'];
-						$args[0] = $data;
-						if (is_array($a = $data_to_array(...$args))) {
-							$this->tableau = $a;
-						}
-					}
-				}
-
-				if (!is_array($this->tableau)) {
-					$this->err = true;
-				}
-
-				if (!$this->err and isset($ttl) and $ttl > 0) {
-					$this->cache_set($cle, $ttl);
-				}
-			} catch (Exception $e) {
-				$e = $e->getMessage();
-				$err = sprintf(
-					"[%s, %s] $e",
-					$src,
-					$this->command['sourcemode']
-				);
-				erreur_squelette([$err, []]);
-				$this->err = true;
-			}
-		}
-
-		# en cas d'erreur, utiliser le cache si encore dispo
-		if (
-			$this->err
-			and $cache
-		) {
-			$this->tableau = $cache['data'];
-			$this->err = false;
-		}
-	}
-
-
-	/**
-	 * Retourne un tableau donne depuis un critère liste
-	 *
-	 * Critère `{liste X1, X2, X3}`
-	 *
-	 * @see critere_DATA_liste_dist()
-	 *
-	 **/
-	protected function select_liste() {
-		# s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
-		if (!isset($this->command['liste'][1])) {
-			if (!is_array($this->command['liste'][0])) {
-				$this->command['liste'] = explode(',', $this->command['liste'][0]);
-			} else {
-				$this->command['liste'] = $this->command['liste'][0];
-			}
-		}
-		$this->tableau = $this->command['liste'];
-	}
-
-	/**
-	 * Retourne un tableau donne depuis un critere liste
-	 * Critere {enum Xmin, Xmax}
-	 *
-	 **/
-	protected function select_enum() {
-		# s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
-		if (!isset($this->command['enum'][1])) {
-			if (!is_array($this->command['enum'][0])) {
-				$this->command['enum'] = explode(',', $this->command['enum'][0]);
-			} else {
-				$this->command['enum'] = $this->command['enum'][0];
-			}
-		}
-		if ((is_countable($this->command['enum']) ? count($this->command['enum']) : 0) >= 3) {
-			$enum = range(
-				array_shift($this->command['enum']),
-				array_shift($this->command['enum']),
-				array_shift($this->command['enum'])
-			);
-		} else {
-			$enum = range(array_shift($this->command['enum']), array_shift($this->command['enum']));
-		}
-		$this->tableau = $enum;
-	}
-
-
-	/**
-	 * extraire le chemin "query.results" du tableau de donnees
-	 * {datapath query.results}
-	 *
-	 **/
-	protected function select_datapath() {
-		$base = reset($this->command['datapath']);
-		if (strlen($base = ltrim(trim($base), '/'))) {
-			$this->tableau = table_valeur($this->tableau, $base);
-			if (!is_array($this->tableau)) {
-				$this->tableau = [];
-				$this->err = true;
-				spip_log("datapath '$base' absent");
-			}
-		}
-	}
-
-	/**
-	 * Ordonner les resultats
-	 * {par x}
-	 *
-	 **/
-	protected function select_orderby() {
-		$sortfunc = '';
-		$aleas = 0;
-		foreach ($this->command['orderby'] as $tri) {
-			// virer le / initial pour les criteres de la forme {par /xx}
-			if (preg_match(',^\.?([/\w]+)( DESC)?$,iS', ltrim($tri, '/'), $r)) {
-				$r = array_pad($r, 3, null);
-
-				// tri par cle
-				if ($r[1] == 'cle') {
-					if (isset($r[2]) and $r[2]) {
-						krsort($this->tableau);
-					} else {
-						ksort($this->tableau);
-					}
-				} # {par hasard}
-				else {
-					if ($r[1] == 'hasard') {
-						$k = array_keys($this->tableau);
-						shuffle($k);
-						$v = [];
-						foreach ($k as $cle) {
-							$v[$cle] = $this->tableau[$cle];
-						}
-						$this->tableau = $v;
-					} else {
-						# {par valeur}
-						if ($r[1] == 'valeur') {
-							$tv = '%s';
-						} # {par valeur/xx/yy} ??
-						else {
-							$tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')';
-						}
-						$sortfunc .= '
+    /**
+     * tableau de donnees
+     *
+     * @var array
+     */
+    protected $tableau = [];
+
+    /**
+     * Conditions de filtrage
+     * ie criteres de selection
+     *
+     * @var array
+     */
+    protected $filtre = [];
+
+
+    /**
+     * Cle courante
+     *
+     * @var null
+     */
+    protected $cle = null;
+
+    /**
+     * Valeur courante
+     *
+     * @var null
+     */
+    protected $valeur = null;
+
+    /**
+     * Erreur presente ?
+     *
+     * @var bool
+     **/
+    public $err = false;
+
+    /**
+     * Calcul du total des elements
+     *
+     * @var int|null
+     **/
+    public $total = null;
+
+    /**
+     * Constructeur
+     *
+     * @param  $command
+     * @param array $info
+     */
+    public function __construct($command, $info = []) {
+        $this->type = 'DATA';
+        $this->command = $command;
+        $this->info = $info;
+
+        $this->select($command);
+    }
+
+    /**
+     * Revenir au depart
+     *
+     * @return void
+     */
+    public function rewind() : void {
+        reset($this->tableau);
+        $this->cle = array_key_first($this->tableau);
+        $this->valeur = current($this->tableau);
+        next($this->tableau);
+    }
+
+    /**
+     * Déclarer les critères exceptions
+     *
+     * @return array
+     */
+    public function exception_des_criteres() {
+        return ['tableau'];
+    }
+
+    /**
+     * Récupérer depuis le cache si possible
+     *
+     * @param string $cle
+     * @return mixed
+     */
+    protected function cache_get($cle) {
+        if (!$cle) {
+            return;
+        }
+        # utiliser memoization si dispo
+        if (!function_exists('cache_get')) {
+            return;
+        }
+
+        return cache_get($cle);
+    }
+
+    /**
+     * Stocker en cache si possible
+     *
+     * @param string $cle
+     * @param int $ttl
+     * @param null|mixed $valeur
+     * @return bool
+     */
+    protected function cache_set($cle, $ttl, $valeur = null) {
+        if (!$cle) {
+            return;
+        }
+        if (is_null($valeur)) {
+            $valeur = $this->tableau;
+        }
+        # utiliser memoization si dispo
+        if (!function_exists('cache_set')) {
+            return;
+        }
+
+        return cache_set(
+            $cle,
+            [
+                'data' => $valeur,
+                'time' => time(),
+                'ttl' => $ttl
+            ],
+            3600 + $ttl
+        );
+        # conserver le cache 1h de plus que la validite demandee,
+        # pour le cas ou le serveur distant ne reponde plus
+    }
+
+    /**
+     * Aller chercher les données de la boucle DATA
+     *
+     * @throws Exception
+     * @param array $command
+     * @return void
+     */
+    protected function select($command) {
+
+        // l'iterateur DATA peut etre appele en passant (data:type)
+        // le type se retrouve dans la commande 'from'
+        // dans ce cas la le critere {source}, si present, n'a pas besoin du 1er argument
+        if (isset($this->command['from'][0])) {
+            if (isset($this->command['source']) and is_array($this->command['source'])) {
+                array_unshift($this->command['source'], $this->command['sourcemode']);
+            }
+            $this->command['sourcemode'] = $this->command['from'][0];
+        }
+
+        // cherchons differents moyens de creer le tableau de donnees
+        // les commandes connues pour l'iterateur DATA
+        // sont : {tableau #ARRAY} ; {cle=...} ; {valeur=...}
+
+        // {source format, [URL], [arg2]...}
+        if (
+            isset($this->command['source'])
+            and isset($this->command['sourcemode'])
+        ) {
+            $this->select_source();
+        }
+
+        // Critere {liste X1, X2, X3}
+        if (isset($this->command['liste'])) {
+            $this->select_liste();
+        }
+        if (isset($this->command['enum'])) {
+            $this->select_enum();
+        }
+
+        // Si a ce stade on n'a pas de table, il y a un bug
+        if (!is_array($this->tableau)) {
+            $this->err = true;
+            spip_log('erreur datasource ' . var_export($command, true));
+        }
+
+        // {datapath query.results}
+        // extraire le chemin "query.results" du tableau de donnees
+        if (
+            !$this->err
+            and isset($this->command['datapath'])
+            and is_array($this->command['datapath'])
+        ) {
+            $this->select_datapath();
+        }
+
+        // tri {par x}
+        if ($this->command['orderby']) {
+            $this->select_orderby();
+        }
+
+        // grouper les resultats {fusion /x/y/z} ;
+        if ($this->command['groupby']) {
+            $this->select_groupby();
+        }
+
+        $this->rewind();
+        #var_dump($this->tableau);
+    }
+
+
+    /**
+     * Aller chercher les donnees de la boucle DATA
+     * depuis une source
+     * {source format, [URL], [arg2]...}
+     */
+    protected function select_source() {
+        # un peu crado : avant de charger le cache il faut charger
+        # les class indispensables, sinon PHP ne saura pas gerer
+        # l'objet en cache ; cf plugins/icalendar
+        # perf : pas de fonction table_to_array ! (table est deja un array)
+        if (
+            isset($this->command['sourcemode'])
+            and !in_array($this->command['sourcemode'], ['table', 'array', 'tableau'])
+        ) {
+            charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true);
+        }
+
+        # le premier argument peut etre un array, une URL etc.
+        $src = $this->command['source'][0];
+
+        # avons-nous un cache dispo ?
+        $cle = null;
+        if (is_string($src)) {
+            $cle = 'datasource_' . md5($this->command['sourcemode'] . ':' . var_export($this->command['source'], true));
+        }
+
+        $cache = $this->cache_get($cle);
+        if (isset($this->command['datacache'])) {
+            $ttl = intval($this->command['datacache']);
+        }
+        if (
+            $cache
+            and ($cache['time'] + ($ttl ?? $cache['ttl'])
+                > time())
+            and !(_request('var_mode') === 'recalcul'
+                and include_spip('inc/autoriser')
+                and autoriser('recalcul')
+            )
+        ) {
+            $this->tableau = $cache['data'];
+        } else {
+            try {
+                if (
+                    isset($this->command['sourcemode'])
+                    and in_array(
+                        $this->command['sourcemode'],
+                        ['table', 'array', 'tableau']
+                    )
+                ) {
+                    if (
+                        is_array($a = $src)
+                        or (is_string($a)
+                            and $a = str_replace('"', '"', $a) # fragile!
+                            and is_array($a = @unserialize($a)))
+                    ) {
+                        $this->tableau = $a;
+                    }
+                } else {
+                    $data = $src;
+                    if (is_string($src)) {
+                        if (tester_url_absolue($src)) {
+                            include_spip('inc/distant');
+                            $data = recuperer_url($src, ['taille_max' => _DATA_SOURCE_MAX_SIZE]);
+                            $data = $data['page'] ?? '';
+                            if (!$data) {
+                                throw new Exception('404');
+                            }
+                            if (!isset($ttl)) {
+                                $ttl = 24 * 3600;
+                            }
+                        } elseif (@is_dir($src)) {
+                            $data = $src;
+                        } elseif (@is_readable($src) && @is_file($src)) {
+                            $data = spip_file_get_contents($src);
+                        }
+                        if (!isset($ttl)) {
+                            $ttl = 10;
+                        }
+                    }
+
+                    if (
+                        !$this->err
+                        and $data_to_array = charger_fonction($this->command['sourcemode'] . '_to_array', 'inc', true)
+                    ) {
+                        $args = $this->command['source'];
+                        $args[0] = $data;
+                        if (is_array($a = $data_to_array(...$args))) {
+                            $this->tableau = $a;
+                        }
+                    }
+                }
+
+                if (!is_array($this->tableau)) {
+                    $this->err = true;
+                }
+
+                if (!$this->err and isset($ttl) and $ttl > 0) {
+                    $this->cache_set($cle, $ttl);
+                }
+            } catch (Exception $e) {
+                $e = $e->getMessage();
+                $err = sprintf(
+                    "[%s, %s] $e",
+                    $src,
+                    $this->command['sourcemode']
+                );
+                erreur_squelette([$err, []]);
+                $this->err = true;
+            }
+        }
+
+        # en cas d'erreur, utiliser le cache si encore dispo
+        if (
+            $this->err
+            and $cache
+        ) {
+            $this->tableau = $cache['data'];
+            $this->err = false;
+        }
+    }
+
+
+    /**
+     * Retourne un tableau donne depuis un critère liste
+     *
+     * Critère `{liste X1, X2, X3}`
+     *
+     * @see critere_DATA_liste_dist()
+     *
+     **/
+    protected function select_liste() {
+        # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
+        if (!isset($this->command['liste'][1])) {
+            if (!is_array($this->command['liste'][0])) {
+                $this->command['liste'] = explode(',', $this->command['liste'][0]);
+            } else {
+                $this->command['liste'] = $this->command['liste'][0];
+            }
+        }
+        $this->tableau = $this->command['liste'];
+    }
+
+    /**
+     * Retourne un tableau donne depuis un critere liste
+     * Critere {enum Xmin, Xmax}
+     *
+     **/
+    protected function select_enum() {
+        # s'il n'y a qu'une valeur dans la liste, sans doute une #BALISE
+        if (!isset($this->command['enum'][1])) {
+            if (!is_array($this->command['enum'][0])) {
+                $this->command['enum'] = explode(',', $this->command['enum'][0]);
+            } else {
+                $this->command['enum'] = $this->command['enum'][0];
+            }
+        }
+        if ((is_countable($this->command['enum']) ? count($this->command['enum']) : 0) >= 3) {
+            $enum = range(
+                array_shift($this->command['enum']),
+                array_shift($this->command['enum']),
+                array_shift($this->command['enum'])
+            );
+        } else {
+            $enum = range(array_shift($this->command['enum']), array_shift($this->command['enum']));
+        }
+        $this->tableau = $enum;
+    }
+
+
+    /**
+     * extraire le chemin "query.results" du tableau de donnees
+     * {datapath query.results}
+     *
+     **/
+    protected function select_datapath() {
+        $base = reset($this->command['datapath']);
+        if (strlen($base = ltrim(trim($base), '/'))) {
+            $this->tableau = table_valeur($this->tableau, $base);
+            if (!is_array($this->tableau)) {
+                $this->tableau = [];
+                $this->err = true;
+                spip_log("datapath '$base' absent");
+            }
+        }
+    }
+
+    /**
+     * Ordonner les resultats
+     * {par x}
+     *
+     **/
+    protected function select_orderby() {
+        $sortfunc = '';
+        $aleas = 0;
+        foreach ($this->command['orderby'] as $tri) {
+            // virer le / initial pour les criteres de la forme {par /xx}
+            if (preg_match(',^\.?([/\w]+)( DESC)?$,iS', ltrim($tri, '/'), $r)) {
+                $r = array_pad($r, 3, null);
+
+                // tri par cle
+                if ($r[1] == 'cle') {
+                    if (isset($r[2]) and $r[2]) {
+                        krsort($this->tableau);
+                    } else {
+                        ksort($this->tableau);
+                    }
+                } # {par hasard}
+                else {
+                    if ($r[1] == 'hasard') {
+                        $k = array_keys($this->tableau);
+                        shuffle($k);
+                        $v = [];
+                        foreach ($k as $cle) {
+                            $v[$cle] = $this->tableau[$cle];
+                        }
+                        $this->tableau = $v;
+                    } else {
+                        # {par valeur}
+                        if ($r[1] == 'valeur') {
+                            $tv = '%s';
+                        } # {par valeur/xx/yy} ??
+                        else {
+                            $tv = 'table_valeur(%s, ' . var_export($r[1], true) . ')';
+                        }
+                        $sortfunc .= '
 					$a = ' . sprintf($tv, '$aa') . ';
 					$b = ' . sprintf($tv, '$bb') . ';
 					if ($a <> $b)
 						return ($a ' . (!empty($r[2]) ? '>' : '<') . ' $b) ? -1 : 1;';
-					}
-				}
-			}
-		}
-
-		if ($sortfunc) {
-			$sortfunc .= "\n return 0;";
-			uasort($this->tableau, fn($aa, $bb) => eval($sortfunc));
-		}
-	}
-
-
-	/**
-	 * Grouper les resultats
-	 * {fusion /x/y/z}
-	 *
-	 **/
-	protected function select_groupby() {
-		// virer le / initial pour les criteres de la forme {fusion /xx}
-		if (strlen($fusion = ltrim($this->command['groupby'][0], '/'))) {
-			$vu = [];
-			foreach ($this->tableau as $k => $v) {
-				$val = table_valeur($v, $fusion);
-				if (isset($vu[$val])) {
-					unset($this->tableau[$k]);
-				} else {
-					$vu[$val] = true;
-				}
-			}
-		}
-	}
-
-
-	/**
-	 * L'iterateur est-il encore valide ?
-	 *
-	 * @return bool
-	 */
-	public function valid(): bool {
-		return !is_null($this->cle);
-	}
-
-	/**
-	 * Retourner la valeur
-	 *
-	 * @return mixed
-	 */
-	#[\ReturnTypeWillChange]
-	public function current() {
-		return $this->valeur;
-	}
-
-	/**
-	 * Retourner la cle
-	 *
-	 * @return mixed
-	 */
-	#[\ReturnTypeWillChange]
-	public function key() {
-		return $this->cle;
-	}
-
-	/**
-	 * Passer a la valeur suivante
-	 *
-	 * @return void
-	 */
-	public function next() : void {
-		if ($this->valid()) {
-			$this->cle = key($this->tableau);
-			$this->valeur = current($this->tableau);
-			next($this->tableau);
-		}
-	}
-
-	/**
-	 * Compter le nombre total de resultats
-	 *
-	 * @return int
-	 */
-	public function count() {
-		if (is_null($this->total)) {
-			$this->total = count($this->tableau);
-		}
-
-		return $this->total;
-	}
+                    }
+                }
+            }
+        }
+
+        if ($sortfunc) {
+            $sortfunc .= "\n return 0;";
+            uasort($this->tableau, fn($aa, $bb) => eval($sortfunc));
+        }
+    }
+
+
+    /**
+     * Grouper les resultats
+     * {fusion /x/y/z}
+     *
+     **/
+    protected function select_groupby() {
+        // virer le / initial pour les criteres de la forme {fusion /xx}
+        if (strlen($fusion = ltrim($this->command['groupby'][0], '/'))) {
+            $vu = [];
+            foreach ($this->tableau as $k => $v) {
+                $val = table_valeur($v, $fusion);
+                if (isset($vu[$val])) {
+                    unset($this->tableau[$k]);
+                } else {
+                    $vu[$val] = true;
+                }
+            }
+        }
+    }
+
+
+    /**
+     * L'iterateur est-il encore valide ?
+     *
+     * @return bool
+     */
+    public function valid(): bool {
+        return !is_null($this->cle);
+    }
+
+    /**
+     * Retourner la valeur
+     *
+     * @return mixed
+     */
+    #[\ReturnTypeWillChange]
+    public function current() {
+        return $this->valeur;
+    }
+
+    /**
+     * Retourner la cle
+     *
+     * @return mixed
+     */
+    #[\ReturnTypeWillChange]
+    public function key() {
+        return $this->cle;
+    }
+
+    /**
+     * Passer a la valeur suivante
+     *
+     * @return void
+     */
+    public function next() : void {
+        if ($this->valid()) {
+            $this->cle = key($this->tableau);
+            $this->valeur = current($this->tableau);
+            next($this->tableau);
+        }
+    }
+
+    /**
+     * Compter le nombre total de resultats
+     *
+     * @return int
+     */
+    public function count() {
+        if (is_null($this->total)) {
+            $this->total = count($this->tableau);
+        }
+
+        return $this->total;
+    }
 }
 
 /*
@@ -591,7 +591,7 @@ 
  * @return array
  */
 function inc_file_to_array_dist($data) {
-	return preg_split('/\r?\n/', $data);
+    return preg_split('/\r?\n/', $data);
 }
 
 /**
@@ -600,9 +600,9 @@ 
  * @return array
  */
 function inc_plugins_to_array_dist() {
-	include_spip('inc/plugin');
+    include_spip('inc/plugin');
 
-	return liste_chemin_plugin_actifs();
+    return liste_chemin_plugin_actifs();
 }
 
 /**
@@ -612,7 +612,7 @@ 
  * @return array
  */
 function inc_xml_to_array_dist($data) {
-	return @XMLObjectToArray(new SimpleXmlIterator($data));
+    return @XMLObjectToArray(new SimpleXmlIterator($data));
 }
 
 /**
@@ -624,14 +624,14 @@ 
  *
  */
 function inc_object_to_array($object) {
-	if (!is_object($object) && !is_array($object)) {
-		return $object;
-	}
-	if (is_object($object)) {
-		$object = get_object_vars($object);
-	}
-
-	return array_map('inc_object_to_array', $object);
+    if (!is_object($object) && !is_array($object)) {
+        return $object;
+    }
+    if (is_object($object)) {
+        $object = get_object_vars($object);
+    }
+
+    return array_map('inc_object_to_array', $object);
 }
 
 /**
@@ -641,20 +641,20 @@ 
  * @return array|bool
  */
 function inc_sql_to_array_dist($data) {
-	# sortir le connecteur de $data
-	preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v);
-	$serveur = (string)$v[1];
-	$req = trim($v[2]);
-	if ($s = sql_query($req, $serveur)) {
-		$r = [];
-		while ($t = sql_fetch($s)) {
-			$r[] = $t;
-		}
-
-		return $r;
-	}
-
-	return false;
+    # sortir le connecteur de $data
+    preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v);
+    $serveur = (string)$v[1];
+    $req = trim($v[2]);
+    if ($s = sql_query($req, $serveur)) {
+        $r = [];
+        while ($t = sql_fetch($s)) {
+            $r[] = $t;
+        }
+
+        return $r;
+    }
+
+    return false;
 }
 
 /**
@@ -664,13 +664,13 @@ 
  * @return array|bool
  */
 function inc_json_to_array_dist($data) {
-	try {
-		$json = json_decode($data, true, 512, JSON_THROW_ON_ERROR);
-	} catch (JsonException $e) {
-		$json = null;
-		spip_log('Failed to parse Json data : ' . $e->getMessage(), _LOG_INFO);
-	}
-	return is_array($json) ? (array) $json : [];
+    try {
+        $json = json_decode($data, true, 512, JSON_THROW_ON_ERROR);
+    } catch (JsonException $e) {
+        $json = null;
+        spip_log('Failed to parse Json data : ' . $e->getMessage(), _LOG_INFO);
+    }
+    return is_array($json) ? (array) $json : [];
 }
 
 /**
@@ -680,30 +680,30 @@ 
  * @return array|bool
  */
 function inc_csv_to_array_dist($data) {
-	include_spip('inc/csv');
-	[$entete, $csv] = analyse_csv($data);
-	array_unshift($csv, $entete);
-
-	include_spip('inc/charsets');
-	$i = 1;
-	foreach ($entete as $k => $v) {
-		if (trim($v) == '') {
-			$v = 'col' . $i;
-		} // reperer des eventuelles cases vides
-		if (is_numeric($v) and $v < 0) {
-			$v = '__' . $v;
-		} // ne pas risquer d'ecraser une cle numerique
-		if (is_numeric($v)) {
-			$v = '_' . $v;
-		} // ne pas risquer d'ecraser une cle numerique
-		$v = strtolower(preg_replace(',\W+,', '_', translitteration($v)));
-		foreach ($csv as &$item) {
-			$item[$v] = &$item[$k];
-		}
-		$i++;
-	}
-
-	return $csv;
+    include_spip('inc/csv');
+    [$entete, $csv] = analyse_csv($data);
+    array_unshift($csv, $entete);
+
+    include_spip('inc/charsets');
+    $i = 1;
+    foreach ($entete as $k => $v) {
+        if (trim($v) == '') {
+            $v = 'col' . $i;
+        } // reperer des eventuelles cases vides
+        if (is_numeric($v) and $v < 0) {
+            $v = '__' . $v;
+        } // ne pas risquer d'ecraser une cle numerique
+        if (is_numeric($v)) {
+            $v = '_' . $v;
+        } // ne pas risquer d'ecraser une cle numerique
+        $v = strtolower(preg_replace(',\W+,', '_', translitteration($v)));
+        foreach ($csv as &$item) {
+            $item[$v] = &$item[$k];
+        }
+        $i++;
+    }
+
+    return $csv;
 }
 
 /**
@@ -713,13 +713,13 @@ 
  * @return array|bool
  */
 function inc_rss_to_array_dist($data) {
-	$tableau = null;
-	include_spip('inc/syndic');
-	if (is_array($rss = analyser_backend($data))) {
-		$tableau = $rss;
-	}
+    $tableau = null;
+    include_spip('inc/syndic');
+    if (is_array($rss = analyser_backend($data))) {
+        $tableau = $rss;
+    }
 
-	return $tableau;
+    return $tableau;
 }
 
 /**
@@ -729,9 +729,9 @@ 
  * @return array|bool
  */
 function inc_atom_to_array_dist($data) {
-	$rss_to_array = charger_fonction('rss_to_array', 'inc');
+    $rss_to_array = charger_fonction('rss_to_array', 'inc');
 
-	return $rss_to_array($data);
+    return $rss_to_array($data);
 }
 
 /**
@@ -742,12 +742,12 @@ 
  * @return array|bool
  */
 function inc_glob_to_array_dist($data) {
-	$a = glob(
-		$data,
-		GLOB_MARK | GLOB_NOSORT | GLOB_BRACE
-	);
+    $a = glob(
+        $data,
+        GLOB_MARK | GLOB_NOSORT | GLOB_BRACE
+    );
 
-	return $a ?: [];
+    return $a ?: [];
 }
 
 /**
@@ -758,14 +758,14 @@ 
  * @throws Exception
  */
 function inc_yaml_to_array_dist($data) {
-	include_spip('inc/yaml-mini');
-	if (!function_exists('yaml_decode')) {
-		throw new Exception('YAML: impossible de trouver la fonction yaml_decode');
+    include_spip('inc/yaml-mini');
+    if (!function_exists('yaml_decode')) {
+        throw new Exception('YAML: impossible de trouver la fonction yaml_decode');
 
-		return false;
-	}
+        return false;
+    }
 
-	return yaml_decode($data);
+    return yaml_decode($data);
 }
 
 
@@ -780,7 +780,7 @@ 
  * @return array|bool
  */
 function inc_pregfiles_to_array_dist($dir, $regexp = -1, $limit = 10000) {
-	return (array)preg_files($dir, $regexp, $limit);
+    return (array)preg_files($dir, $regexp, $limit);
 }
 
 /**
@@ -792,23 +792,23 @@ 
  * @return array|bool
  */
 function inc_ls_to_array_dist($data) {
-	$glob_to_array = charger_fonction('glob_to_array', 'inc');
-	$a = $glob_to_array($data);
-	foreach ($a as &$v) {
-		$b = (array)@stat($v);
-		foreach ($b as $k => $ignore) {
-			if (is_numeric($k)) {
-				unset($b[$k]);
-			}
-		}
-		$b['file'] = preg_replace('`/$`', '', $v) ;
-		$v = array_merge(
-			pathinfo($v),
-			$b
-		);
-	}
-
-	return $a;
+    $glob_to_array = charger_fonction('glob_to_array', 'inc');
+    $a = $glob_to_array($data);
+    foreach ($a as &$v) {
+        $b = (array)@stat($v);
+        foreach ($b as $k => $ignore) {
+            if (is_numeric($k)) {
+                unset($b[$k]);
+            }
+        }
+        $b['file'] = preg_replace('`/$`', '', $v) ;
+        $v = array_merge(
+            pathinfo($v),
+            $b
+        );
+    }
+
+    return $a;
 }
 
 /**
@@ -818,25 +818,25 @@ 
  * @return array|bool
  */
 function XMLObjectToArray($object) {
-	$xml_array = [];
-	for ($object->rewind(); $object->valid(); $object->next()) {
-		if (array_key_exists($key = $object->key(), $xml_array)) {
-			$key .= '-' . uniqid();
-		}
-		$vars = get_object_vars($object->current());
-		if (isset($vars['@attributes'])) {
-			foreach ($vars['@attributes'] as $k => $v) {
-				$xml_array[$key][$k] = $v;
-			}
-		}
-		if ($object->hasChildren()) {
-			$xml_array[$key][] = XMLObjectToArray(
-				$object->current()
-			);
-		} else {
-			$xml_array[$key][] = strval($object->current());
-		}
-	}
-
-	return $xml_array;
+    $xml_array = [];
+    for ($object->rewind(); $object->valid(); $object->next()) {
+        if (array_key_exists($key = $object->key(), $xml_array)) {
+            $key .= '-' . uniqid();
+        }
+        $vars = get_object_vars($object->current());
+        if (isset($vars['@attributes'])) {
+            foreach ($vars['@attributes'] as $k => $v) {
+                $xml_array[$key][$k] = $v;
+            }
+        }
+        if ($object->hasChildren()) {
+            $xml_array[$key][] = XMLObjectToArray(
+                $object->current()
+            );
+        } else {
+            $xml_array[$key][] = strval($object->current());
+        }
+    }
+
+    return $xml_array;
 }

ecrire/plugins/verifie_conformite.php

Indentation +213 added lines, -213 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/xml');
@@ -19,218 +19,218 @@ 
 
 // https://code.spip.net/@plugin_verifie_conformite
 function plugins_verifie_conformite_dist($plug, &$arbre, $dir_plugins = _DIR_PLUGINS) {
-	$needs = null;
-	$compat_spip = null;
-	$uses = null;
-	$paths = null;
-	$trads = null;
-	static $etats = ['dev', 'experimental', 'test', 'stable'];
+    $needs = null;
+    $compat_spip = null;
+    $uses = null;
+    $paths = null;
+    $trads = null;
+    static $etats = ['dev', 'experimental', 'test', 'stable'];
 
-	$matches = [];
-	$silence = false;
-	$p = null;
-	// chercher la declaration <plugin spip='...'> a prendre pour cette version de SPIP
-	if ($n = spip_xml_match_nodes(',^plugin(\s|$),', $arbre, $matches)) {
-		// version de SPIP
-		$vspip = $GLOBALS['spip_version_branche'];
-		foreach ($matches as $tag => $sous) {
-			[$tagname, $atts] = spip_xml_decompose_tag($tag);
-			if ($tagname == 'plugin' and is_array($sous)) {
-				// On rajoute la condition sur $n :
-				// -- en effet si $n==1 on a pas plus a choisir la balise que l'on ait
-				//    un attribut spip ou pas. Cela permet de traiter tous les cas mono-balise
-				//    de la meme facon.
-				if (
-					!isset($atts['spip'])
-					or $n == 1
-					or plugin_version_compatible($atts['spip'], $vspip, 'spip')
-				) {
-					// on prend la derniere declaration avec ce nom
-					$p = end($sous);
-					$compat_spip = $atts['spip'] ?? '';
-				}
-			}
-		}
-	}
-	if (is_null($p)) {
-		$arbre = ['erreur' => [_T('erreur_plugin_tag_plugin_absent') . " : $plug"]];
-		$silence = true;
-	} else {
-		$arbre = $p;
-	}
-	if (!is_array($arbre)) {
-		$arbre = [];
-	}
-	// verification de la conformite du plugin avec quelques
-	// precautions elementaires
-	if (!isset($arbre['nom'])) {
-		if (!$silence) {
-			$arbre['erreur'][] = _T('erreur_plugin_nom_manquant');
-		}
-		$arbre['nom'] = [''];
-	}
-	if (!isset($arbre['version'])) {
-		if (!$silence) {
-			$arbre['erreur'][] = _T('erreur_plugin_version_manquant');
-		}
-		$arbre['version'] = [''];
-	}
-	if (!isset($arbre['prefix'])) {
-		if (!$silence) {
-			$arbre['erreur'][] = _T('erreur_plugin_prefix_manquant');
-		}
-		$arbre['prefix'] = [''];
-	} else {
-		$prefix = trim(end($arbre['prefix']));
-		if (strtoupper($prefix) == 'SPIP' and $plug != './') {
-			$arbre['erreur'][] = _T('erreur_plugin_prefix_interdit');
-		}
-		if (isset($arbre['etat'])) {
-			$etat = trim(end($arbre['etat']));
-			if (!in_array($etat, $etats)) {
-				$arbre['erreur'][] = _T('erreur_plugin_etat_inconnu') . " : '$etat'";
-			}
-		}
-		if (isset($arbre['options'])) {
-			foreach ($arbre['options'] as $optfile) {
-				$optfile = trim($optfile);
-				if (!@is_readable($dir_plugins . "$plug/$optfile")) {
-					if (!$silence) {
-						$arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $optfile";
-					}
-				}
-			}
-		}
-		if (isset($arbre['fonctions'])) {
-			foreach ($arbre['fonctions'] as $optfile) {
-				$optfile = trim($optfile);
-				if (!@is_readable($dir_plugins . "$plug/$optfile")) {
-					if (!$silence) {
-						$arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $optfile";
-					}
-				}
-			}
-		}
-		$fonctions = [];
-		if (isset($arbre['fonctions'])) {
-			$fonctions = $arbre['fonctions'];
-		}
-		$liste_methodes_reservees = [
-			'__construct',
-			'__destruct',
-			'plugin',
-			'install',
-			'uninstall',
-			strtolower($prefix)
-		];
+    $matches = [];
+    $silence = false;
+    $p = null;
+    // chercher la declaration <plugin spip='...'> a prendre pour cette version de SPIP
+    if ($n = spip_xml_match_nodes(',^plugin(\s|$),', $arbre, $matches)) {
+        // version de SPIP
+        $vspip = $GLOBALS['spip_version_branche'];
+        foreach ($matches as $tag => $sous) {
+            [$tagname, $atts] = spip_xml_decompose_tag($tag);
+            if ($tagname == 'plugin' and is_array($sous)) {
+                // On rajoute la condition sur $n :
+                // -- en effet si $n==1 on a pas plus a choisir la balise que l'on ait
+                //    un attribut spip ou pas. Cela permet de traiter tous les cas mono-balise
+                //    de la meme facon.
+                if (
+                    !isset($atts['spip'])
+                    or $n == 1
+                    or plugin_version_compatible($atts['spip'], $vspip, 'spip')
+                ) {
+                    // on prend la derniere declaration avec ce nom
+                    $p = end($sous);
+                    $compat_spip = $atts['spip'] ?? '';
+                }
+            }
+        }
+    }
+    if (is_null($p)) {
+        $arbre = ['erreur' => [_T('erreur_plugin_tag_plugin_absent') . " : $plug"]];
+        $silence = true;
+    } else {
+        $arbre = $p;
+    }
+    if (!is_array($arbre)) {
+        $arbre = [];
+    }
+    // verification de la conformite du plugin avec quelques
+    // precautions elementaires
+    if (!isset($arbre['nom'])) {
+        if (!$silence) {
+            $arbre['erreur'][] = _T('erreur_plugin_nom_manquant');
+        }
+        $arbre['nom'] = [''];
+    }
+    if (!isset($arbre['version'])) {
+        if (!$silence) {
+            $arbre['erreur'][] = _T('erreur_plugin_version_manquant');
+        }
+        $arbre['version'] = [''];
+    }
+    if (!isset($arbre['prefix'])) {
+        if (!$silence) {
+            $arbre['erreur'][] = _T('erreur_plugin_prefix_manquant');
+        }
+        $arbre['prefix'] = [''];
+    } else {
+        $prefix = trim(end($arbre['prefix']));
+        if (strtoupper($prefix) == 'SPIP' and $plug != './') {
+            $arbre['erreur'][] = _T('erreur_plugin_prefix_interdit');
+        }
+        if (isset($arbre['etat'])) {
+            $etat = trim(end($arbre['etat']));
+            if (!in_array($etat, $etats)) {
+                $arbre['erreur'][] = _T('erreur_plugin_etat_inconnu') . " : '$etat'";
+            }
+        }
+        if (isset($arbre['options'])) {
+            foreach ($arbre['options'] as $optfile) {
+                $optfile = trim($optfile);
+                if (!@is_readable($dir_plugins . "$plug/$optfile")) {
+                    if (!$silence) {
+                        $arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $optfile";
+                    }
+                }
+            }
+        }
+        if (isset($arbre['fonctions'])) {
+            foreach ($arbre['fonctions'] as $optfile) {
+                $optfile = trim($optfile);
+                if (!@is_readable($dir_plugins . "$plug/$optfile")) {
+                    if (!$silence) {
+                        $arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $optfile";
+                    }
+                }
+            }
+        }
+        $fonctions = [];
+        if (isset($arbre['fonctions'])) {
+            $fonctions = $arbre['fonctions'];
+        }
+        $liste_methodes_reservees = [
+            '__construct',
+            '__destruct',
+            'plugin',
+            'install',
+            'uninstall',
+            strtolower($prefix)
+        ];
 
-		$extraire_pipelines = charger_fonction('extraire_pipelines', 'plugins');
-		$arbre['pipeline'] = $extraire_pipelines($arbre);
-		foreach ($arbre['pipeline'] as $pipe) {
-			if (!isset($pipe['nom'])) {
-				if (!$silence) {
-					$arbre['erreur'][] = _T('erreur_plugin_nom_pipeline_non_defini');
-				}
-			}
-			if (isset($pipe['action'])) {
-				$action = $pipe['action'];
-			} else {
-				$action = $pipe['nom'];
-			}
-			// verif que la methode a un nom autorise
-			if (in_array(strtolower($action), $liste_methodes_reservees)) {
-				if (!$silence) {
-					$arbre['erreur'][] = _T('erreur_plugin_nom_fonction_interdit') . " : $action";
-				}
-			}
-			if (isset($pipe['inclure'])) {
-				$inclure = $dir_plugins . "$plug/" . $pipe['inclure'];
-				if (!@is_readable($inclure)) {
-					if (!$silence) {
-						$arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $inclure";
-					}
-				}
-			}
-		}
-		$necessite = [];
-		$spip_trouve = false;
-		if (spip_xml_match_nodes(',^necessite,', $arbre, $needs)) {
-			foreach (array_keys($needs) as $tag) {
-				[$tag, $att] = spip_xml_decompose_tag($tag);
-				if (!isset($att['id'])) {
-					if (!$silence) {
-						$arbre['erreur'][] = _T(
-							'erreur_plugin_attribut_balise_manquant',
-							['attribut' => 'id', 'balise' => $att]
-						);
-					}
-				} else {
-					$necessite[] = $att;
-				}
-				if (strtolower($att['id']) == 'spip') {
-					$spip_trouve = true;
-				}
-			}
-		}
-		if ($compat_spip and !$spip_trouve) {
-			$necessite[] = ['id' => 'spip', 'version' => $compat_spip];
-		}
-		$arbre['necessite'] = $necessite;
-		$utilise = [];
-		if (spip_xml_match_nodes(',^utilise,', $arbre, $uses)) {
-			foreach (array_keys($uses) as $tag) {
-				[$tag, $att] = spip_xml_decompose_tag($tag);
-				if (!isset($att['id'])) {
-					if (!$silence) {
-						$arbre['erreur'][] = _T(
-							'erreur_plugin_attribut_balise_manquant',
-							['attribut' => 'id', 'balise' => $att]
-						);
-					}
-				} else {
-					$utilise[] = $att;
-				}
-			}
-		}
-		$arbre['utilise'] = $utilise;
-		$procure = [];
-		if (spip_xml_match_nodes(',^procure,', $arbre, $uses)) {
-			foreach (array_keys($uses) as $tag) {
-				[$tag, $att] = spip_xml_decompose_tag($tag);
-				$procure[] = $att;
-			}
-		}
-		$arbre['procure'] = $procure;
-		$path = [];
-		if (spip_xml_match_nodes(',^chemin,', $arbre, $paths)) {
-			foreach (array_keys($paths) as $tag) {
-				[$tag, $att] = spip_xml_decompose_tag($tag);
-				$att['path'] = $att['dir']; // ancienne syntaxe
-				$path[] = $att;
-			}
-		} else {
-			$path = [['dir' => '']];
-		} // initialiser par defaut
-		$arbre['path'] = $path;
-		// exposer les noisettes
-		if (isset($arbre['noisette'])) {
-			foreach ($arbre['noisette'] as $k => $nut) {
-				$nut = preg_replace(',[.]html$,uims', '', trim($nut));
-				$arbre['noisette'][$k] = $nut;
-				if (!@is_readable($dir_plugins . "$plug/$nut.html")) {
-					if (!$silence) {
-						$arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $nut";
-					}
-				}
-			}
-		}
-		$traduire = [];
-		if (spip_xml_match_nodes(',^traduire,', $arbre, $trads)) {
-			foreach (array_keys($trads) as $tag) {
-				[$tag, $att] = spip_xml_decompose_tag($tag);
-				$traduire[] = $att;
-			}
-		}
-		$arbre['traduire'] = $traduire;
-	}
+        $extraire_pipelines = charger_fonction('extraire_pipelines', 'plugins');
+        $arbre['pipeline'] = $extraire_pipelines($arbre);
+        foreach ($arbre['pipeline'] as $pipe) {
+            if (!isset($pipe['nom'])) {
+                if (!$silence) {
+                    $arbre['erreur'][] = _T('erreur_plugin_nom_pipeline_non_defini');
+                }
+            }
+            if (isset($pipe['action'])) {
+                $action = $pipe['action'];
+            } else {
+                $action = $pipe['nom'];
+            }
+            // verif que la methode a un nom autorise
+            if (in_array(strtolower($action), $liste_methodes_reservees)) {
+                if (!$silence) {
+                    $arbre['erreur'][] = _T('erreur_plugin_nom_fonction_interdit') . " : $action";
+                }
+            }
+            if (isset($pipe['inclure'])) {
+                $inclure = $dir_plugins . "$plug/" . $pipe['inclure'];
+                if (!@is_readable($inclure)) {
+                    if (!$silence) {
+                        $arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $inclure";
+                    }
+                }
+            }
+        }
+        $necessite = [];
+        $spip_trouve = false;
+        if (spip_xml_match_nodes(',^necessite,', $arbre, $needs)) {
+            foreach (array_keys($needs) as $tag) {
+                [$tag, $att] = spip_xml_decompose_tag($tag);
+                if (!isset($att['id'])) {
+                    if (!$silence) {
+                        $arbre['erreur'][] = _T(
+                            'erreur_plugin_attribut_balise_manquant',
+                            ['attribut' => 'id', 'balise' => $att]
+                        );
+                    }
+                } else {
+                    $necessite[] = $att;
+                }
+                if (strtolower($att['id']) == 'spip') {
+                    $spip_trouve = true;
+                }
+            }
+        }
+        if ($compat_spip and !$spip_trouve) {
+            $necessite[] = ['id' => 'spip', 'version' => $compat_spip];
+        }
+        $arbre['necessite'] = $necessite;
+        $utilise = [];
+        if (spip_xml_match_nodes(',^utilise,', $arbre, $uses)) {
+            foreach (array_keys($uses) as $tag) {
+                [$tag, $att] = spip_xml_decompose_tag($tag);
+                if (!isset($att['id'])) {
+                    if (!$silence) {
+                        $arbre['erreur'][] = _T(
+                            'erreur_plugin_attribut_balise_manquant',
+                            ['attribut' => 'id', 'balise' => $att]
+                        );
+                    }
+                } else {
+                    $utilise[] = $att;
+                }
+            }
+        }
+        $arbre['utilise'] = $utilise;
+        $procure = [];
+        if (spip_xml_match_nodes(',^procure,', $arbre, $uses)) {
+            foreach (array_keys($uses) as $tag) {
+                [$tag, $att] = spip_xml_decompose_tag($tag);
+                $procure[] = $att;
+            }
+        }
+        $arbre['procure'] = $procure;
+        $path = [];
+        if (spip_xml_match_nodes(',^chemin,', $arbre, $paths)) {
+            foreach (array_keys($paths) as $tag) {
+                [$tag, $att] = spip_xml_decompose_tag($tag);
+                $att['path'] = $att['dir']; // ancienne syntaxe
+                $path[] = $att;
+            }
+        } else {
+            $path = [['dir' => '']];
+        } // initialiser par defaut
+        $arbre['path'] = $path;
+        // exposer les noisettes
+        if (isset($arbre['noisette'])) {
+            foreach ($arbre['noisette'] as $k => $nut) {
+                $nut = preg_replace(',[.]html$,uims', '', trim($nut));
+                $arbre['noisette'][$k] = $nut;
+                if (!@is_readable($dir_plugins . "$plug/$nut.html")) {
+                    if (!$silence) {
+                        $arbre['erreur'][] = _T('erreur_plugin_fichier_absent') . " : $nut";
+                    }
+                }
+            }
+        }
+        $traduire = [];
+        if (spip_xml_match_nodes(',^traduire,', $arbre, $trads)) {
+            foreach (array_keys($trads) as $tag) {
+                [$tag, $att] = spip_xml_decompose_tag($tag);
+                $traduire[] = $att;
+            }
+        }
+        $arbre['traduire'] = $traduire;
+    }
 }

ecrire/plugins/get_infos.php

Indentation +101 added lines, -101 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,110 +33,110 @@ 
  * @return array
  */
 function plugins_get_infos_dist($plug = false, $reload = false, $dir = _DIR_PLUGINS, $clean_old = false) {
-	$contenu = null;
-	$res = null;
-	static $cache = '';
-	static $filecache = '';
-
-	if ($cache === '') {
-		$filecache = _DIR_TMP . 'plugin_xml_cache.gz';
-		if (is_file($filecache)) {
-			lire_fichier($filecache, $contenu);
-			$cache = unserialize($contenu);
-		}
-		if (!is_array($cache)) {
-			$cache = [];
-		}
-	}
-
-	if (defined('_VAR_MODE') and _VAR_MODE == 'recalcul') {
-		$reload = true;
-	}
-
-	if ($plug === false) {
-		ecrire_fichier($filecache, serialize($cache));
-
-		return $cache;
-	} elseif (is_string($plug)) {
-		$res = plugins_get_infos_un($plug, $reload, $dir, $cache);
-	} elseif (is_array($plug)) {
-		$res = false;
-		if (!$reload) {
-			$reload = -1;
-		}
-		foreach ($plug as $nom) {
-			$res |= plugins_get_infos_un($nom, $reload, $dir, $cache);
-		}
-
-		// Nettoyer le cache des vieux plugins qui ne sont plus la
-		if ($clean_old and isset($cache[$dir]) and is_countable($cache[$dir]) ? count($cache[$dir]) : 0) {
-			foreach (array_keys($cache[$dir]) as $p) {
-				if (!in_array($p, $plug)) {
-					unset($cache[$dir][$p]);
-				}
-			}
-		}
-	}
-	if ($res) {
-		ecrire_fichier($filecache, serialize($cache));
-	}
-	if (!isset($cache[$dir])) {
-		return [];
-	}
-	if (is_string($plug)) {
-		return $cache[$dir][$plug] ?? [];
-	} else {
-		return $cache[$dir];
-	}
+    $contenu = null;
+    $res = null;
+    static $cache = '';
+    static $filecache = '';
+
+    if ($cache === '') {
+        $filecache = _DIR_TMP . 'plugin_xml_cache.gz';
+        if (is_file($filecache)) {
+            lire_fichier($filecache, $contenu);
+            $cache = unserialize($contenu);
+        }
+        if (!is_array($cache)) {
+            $cache = [];
+        }
+    }
+
+    if (defined('_VAR_MODE') and _VAR_MODE == 'recalcul') {
+        $reload = true;
+    }
+
+    if ($plug === false) {
+        ecrire_fichier($filecache, serialize($cache));
+
+        return $cache;
+    } elseif (is_string($plug)) {
+        $res = plugins_get_infos_un($plug, $reload, $dir, $cache);
+    } elseif (is_array($plug)) {
+        $res = false;
+        if (!$reload) {
+            $reload = -1;
+        }
+        foreach ($plug as $nom) {
+            $res |= plugins_get_infos_un($nom, $reload, $dir, $cache);
+        }
+
+        // Nettoyer le cache des vieux plugins qui ne sont plus la
+        if ($clean_old and isset($cache[$dir]) and is_countable($cache[$dir]) ? count($cache[$dir]) : 0) {
+            foreach (array_keys($cache[$dir]) as $p) {
+                if (!in_array($p, $plug)) {
+                    unset($cache[$dir][$p]);
+                }
+            }
+        }
+    }
+    if ($res) {
+        ecrire_fichier($filecache, serialize($cache));
+    }
+    if (!isset($cache[$dir])) {
+        return [];
+    }
+    if (is_string($plug)) {
+        return $cache[$dir][$plug] ?? [];
+    } else {
+        return $cache[$dir];
+    }
 }
 
 
 function plugins_get_infos_un($plug, $reload, $dir, &$cache) {
-	if (!is_readable($file = "$dir$plug/paquet.xml")) {
-		return false;
-	}
-	$time = intval(@filemtime($file));
-	if ($time < 0) {
-		return false;
-	}
-	$md5 = md5_file($file);
-
-	$pcache = $cache[$dir][$plug] ?? ['filemtime' => 0, 'md5_file' => ''];
-
-	// si le cache est valide
-	if (
-		(intval($reload) <= 0)
-		and ($time > 0)
-		and ($time <= $pcache['filemtime'])
-		and $md5 == $pcache['md5_file']
-	) {
-		return false;
-	}
-
-	// si on arrive pas a lire le fichier, se contenter du cache
-	if (!($texte = spip_file_get_contents($file))) {
-		return false;
-	}
-
-	$f = charger_fonction('infos_paquet', 'plugins');
-	$ret = $f($texte, $plug, $dir);
-	$ret['filemtime'] = $time;
-	$ret['md5_file'] = $md5;
-	// Si on lit le paquet.xml de SPIP, on rajoute un procure php afin que les plugins puissent
-	// utiliser un necessite php. SPIP procure donc la version php courante du serveur.
-	// chaque librairie php est aussi procurée, par exemple 'php:curl'.
-	if (isset($ret['prefix']) and $ret['prefix'] == 'spip') {
-		$ret['procure']['php'] = ['nom' => 'php', 'version' => phpversion()];
-		foreach (get_loaded_extensions() as $ext) {
-			$ret['procure']['php:' . $ext] = ['nom' => 'php:' . $ext, 'version' => phpversion($ext)];
-		}
-	}
-	$diff = ($ret != $pcache);
-
-	if ($diff) {
-		$cache[$dir][$plug] = $ret;
+    if (!is_readable($file = "$dir$plug/paquet.xml")) {
+        return false;
+    }
+    $time = intval(@filemtime($file));
+    if ($time < 0) {
+        return false;
+    }
+    $md5 = md5_file($file);
+
+    $pcache = $cache[$dir][$plug] ?? ['filemtime' => 0, 'md5_file' => ''];
+
+    // si le cache est valide
+    if (
+        (intval($reload) <= 0)
+        and ($time > 0)
+        and ($time <= $pcache['filemtime'])
+        and $md5 == $pcache['md5_file']
+    ) {
+        return false;
+    }
+
+    // si on arrive pas a lire le fichier, se contenter du cache
+    if (!($texte = spip_file_get_contents($file))) {
+        return false;
+    }
+
+    $f = charger_fonction('infos_paquet', 'plugins');
+    $ret = $f($texte, $plug, $dir);
+    $ret['filemtime'] = $time;
+    $ret['md5_file'] = $md5;
+    // Si on lit le paquet.xml de SPIP, on rajoute un procure php afin que les plugins puissent
+    // utiliser un necessite php. SPIP procure donc la version php courante du serveur.
+    // chaque librairie php est aussi procurée, par exemple 'php:curl'.
+    if (isset($ret['prefix']) and $ret['prefix'] == 'spip') {
+        $ret['procure']['php'] = ['nom' => 'php', 'version' => phpversion()];
+        foreach (get_loaded_extensions() as $ext) {
+            $ret['procure']['php:' . $ext] = ['nom' => 'php:' . $ext, 'version' => phpversion($ext)];
+        }
+    }
+    $diff = ($ret != $pcache);
+
+    if ($diff) {
+        $cache[$dir][$plug] = $ret;
 #       echo count($cache[$dir]), $dir,$plug, " $reloadc<br>";
-	}
+    }
 
-	return $diff;
+    return $diff;
 }

ecrire/plugins/afficher_repertoires.php

Indentation +87 added lines, -87 removed lines

@@ -11,68 +11,68 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // https://code.spip.net/@affiche_arbre_plugins
 function plugins_afficher_repertoires_dist($url_page, $liste_plugins, $liste_plugins_actifs) {
-	$ligne_plug = charger_fonction('afficher_plugin', 'plugins');
-	$racine = basename(_DIR_PLUGINS);
-	$init_dir = $current_dir = '';
-	// liste des repertoires deplies : construit en remontant l'arbo de chaque plugin actif
-	// des qu'un path est deja note deplie on s'arrete
-	$deplie = [$racine => true];
-	$fast_liste_plugins_actifs = [];
-	foreach ($liste_plugins_actifs as $key => $plug) {
-		$chemin_plug = chemin_plug($racine, $plug);
-		$fast_liste_plugins_actifs[$chemin_plug] = true;
-		$dir = dirname($chemin_plug);
-		$maxiter = 100;
-		while (strlen($dir) && !isset($deplie[$dir]) && $dir != $racine && $maxiter-- > 0) {
-			$deplie[$dir] = true;
-			$dir = dirname($dir);
-		}
-	}
+    $ligne_plug = charger_fonction('afficher_plugin', 'plugins');
+    $racine = basename(_DIR_PLUGINS);
+    $init_dir = $current_dir = '';
+    // liste des repertoires deplies : construit en remontant l'arbo de chaque plugin actif
+    // des qu'un path est deja note deplie on s'arrete
+    $deplie = [$racine => true];
+    $fast_liste_plugins_actifs = [];
+    foreach ($liste_plugins_actifs as $key => $plug) {
+        $chemin_plug = chemin_plug($racine, $plug);
+        $fast_liste_plugins_actifs[$chemin_plug] = true;
+        $dir = dirname($chemin_plug);
+        $maxiter = 100;
+        while (strlen($dir) && !isset($deplie[$dir]) && $dir != $racine && $maxiter-- > 0) {
+            $deplie[$dir] = true;
+            $dir = dirname($dir);
+        }
+    }
 
-	// index repertoires --> plugin
-	$dir_index = [];
-	foreach ($liste_plugins as $key => $plug) {
-		$liste_plugins[$key] = chemin_plug($racine, $plug);
-		$dir_index[dirname($liste_plugins[$key])][] = $key;
-	}
+    // index repertoires --> plugin
+    $dir_index = [];
+    foreach ($liste_plugins as $key => $plug) {
+        $liste_plugins[$key] = chemin_plug($racine, $plug);
+        $dir_index[dirname($liste_plugins[$key])][] = $key;
+    }
 
-	$visible = @isset($deplie[$current_dir]);
-	$maxiter = 1000;
+    $visible = @isset($deplie[$current_dir]);
+    $maxiter = 1000;
 
-	$res = '';
-	while ((is_countable($liste_plugins) ? count($liste_plugins) : 0) && $maxiter--) {
-		// le rep suivant
-		$dir = dirname(reset($liste_plugins));
-		if ($dir != $current_dir) {
-			$res .= tree_open_close_dir($current_dir, $dir, $deplie);
-		}
+    $res = '';
+    while ((is_countable($liste_plugins) ? count($liste_plugins) : 0) && $maxiter--) {
+        // le rep suivant
+        $dir = dirname(reset($liste_plugins));
+        if ($dir != $current_dir) {
+            $res .= tree_open_close_dir($current_dir, $dir, $deplie);
+        }
 
-		// d'abord tous les plugins du rep courant
-		if (isset($dir_index[$current_dir])) {
-			foreach ($dir_index[$current_dir] as $key) {
-				$plug = $liste_plugins[$key];
-				$actif = @isset($fast_liste_plugins_actifs[$plug]);
-				$id = substr(md5($plug), 0, 16);
-				$res .= $ligne_plug(
-					$url_page,
-					str_replace(_DIR_PLUGINS, '', _DIR_RACINE . $plug),
-					$actif,
-					'menu-entree'
-				) . "\n";
-				unset($liste_plugins[$key]);
-			}
-		}
-	}
-	$res .= tree_open_close_dir($current_dir, $init_dir, true);
+        // d'abord tous les plugins du rep courant
+        if (isset($dir_index[$current_dir])) {
+            foreach ($dir_index[$current_dir] as $key) {
+                $plug = $liste_plugins[$key];
+                $actif = @isset($fast_liste_plugins_actifs[$plug]);
+                $id = substr(md5($plug), 0, 16);
+                $res .= $ligne_plug(
+                    $url_page,
+                    str_replace(_DIR_PLUGINS, '', _DIR_RACINE . $plug),
+                    $actif,
+                    'menu-entree'
+                ) . "\n";
+                unset($liste_plugins[$key]);
+            }
+        }
+    }
+    $res .= tree_open_close_dir($current_dir, $init_dir, true);
 
-	return "<ul class='menu-liste plugins'>"
-	. $res
-	. '</ul>';
+    return "<ul class='menu-liste plugins'>"
+    . $res
+    . '</ul>';
 }
 
 
@@ -80,44 +80,44 @@ 
 // une fonction pour aider...
 // https://code.spip.net/@chemin_plug
 function chemin_plug($racine, $plug) {
-	return preg_replace(',[^/]+/\.\./,', '', "$racine/$plug");
+    return preg_replace(',[^/]+/\.\./,', '', "$racine/$plug");
 }
 
 // https://code.spip.net/@tree_open_close_dir
 function tree_open_close_dir(&$current, $target, $deplie = []) {
-	if ($current == $target) {
-		return '';
-	}
-	$tcur = explode('/', $current);
-	$ttarg = explode('/', $target);
-	$tcom = [];
-	$output = '';
-	// la partie commune
-	while (reset($tcur) == reset($ttarg)) {
-		$tcom[] = array_shift($tcur);
-		array_shift($ttarg);
-	}
-	// fermer les repertoires courant jusqu'au point de fork
-	while ($close = array_pop($tcur)) {
-		$output .= "</ul>\n";
-		$output .= fin_block();
-		$output .= "</li>\n";
-	}
-	$chemin = '';
-	if (count($tcom)) {
-		$chemin .= implode('/', $tcom) . '/';
-	}
-	// ouvrir les repertoires jusqu'a la cible
-	while ($open = array_shift($ttarg)) {
-		$visible = @isset($deplie[$chemin . $open]);
-		$chemin .= $open . '/';
-		$output .= '<li>';
-		$output .= bouton_block_depliable($chemin, $visible);
-		$output .= debut_block_depliable($visible);
+    if ($current == $target) {
+        return '';
+    }
+    $tcur = explode('/', $current);
+    $ttarg = explode('/', $target);
+    $tcom = [];
+    $output = '';
+    // la partie commune
+    while (reset($tcur) == reset($ttarg)) {
+        $tcom[] = array_shift($tcur);
+        array_shift($ttarg);
+    }
+    // fermer les repertoires courant jusqu'au point de fork
+    while ($close = array_pop($tcur)) {
+        $output .= "</ul>\n";
+        $output .= fin_block();
+        $output .= "</li>\n";
+    }
+    $chemin = '';
+    if (count($tcom)) {
+        $chemin .= implode('/', $tcom) . '/';
+    }
+    // ouvrir les repertoires jusqu'a la cible
+    while ($open = array_shift($ttarg)) {
+        $visible = @isset($deplie[$chemin . $open]);
+        $chemin .= $open . '/';
+        $output .= '<li>';
+        $output .= bouton_block_depliable($chemin, $visible);
+        $output .= debut_block_depliable($visible);
 
-		$output .= "<ul>\n";
-	}
-	$current = $target;
+        $output .= "<ul>\n";
+    }
+    $current = $target;
 
-	return $output;
+    return $output;
 }

ecrire/plugins/extraire_pipelines.php

Indentation +24 added lines, -24 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -21,28 +21,28 @@ 
  * @param array $arbre
  */
 function plugins_extraire_pipelines_dist(&$arbre) {
-	$pipes = null;
-	$tag = null;
-	$pipeline = [];
-	if (spip_xml_match_nodes(',^pipeline,', $arbre, $pipes)) {
-		foreach ($pipes as $tag => $p) {
-			if (!is_array($p[0])) {
-				[$tag, $att] = spip_xml_decompose_tag($tag);
-				$pipeline[] = $att;
-			} else {
-				foreach ($p as $pipe) {
-					$att = [];
-					if (is_array($pipe)) {
-						foreach ($pipe as $k => $t) {
-							$att[$k] = trim(end($t));
-						}
-					}
-					$pipeline[] = $att;
-				}
-			}
-		}
-		unset($arbre[$tag]);
-	}
+    $pipes = null;
+    $tag = null;
+    $pipeline = [];
+    if (spip_xml_match_nodes(',^pipeline,', $arbre, $pipes)) {
+        foreach ($pipes as $tag => $p) {
+            if (!is_array($p[0])) {
+                [$tag, $att] = spip_xml_decompose_tag($tag);
+                $pipeline[] = $att;
+            } else {
+                foreach ($p as $pipe) {
+                    $att = [];
+                    if (is_array($pipe)) {
+                        foreach ($pipe as $k => $t) {
+                            $att[$k] = trim(end($t));
+                        }
+                    }
+                    $pipeline[] = $att;
+                }
+            }
+        }
+        unset($arbre[$tag]);
+    }
 
-	return $pipeline;
+    return $pipeline;
 }

ecrire/plugins/infos_paquet.php

Indentation +207 added lines, -207 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,64 +25,64 @@ 
  * @return array
  */
 function plugins_infos_paquet($desc, $plug = '', $dir_plugins = _DIR_PLUGINS) {
-	static $process = [ // tableau constant
-		'debut' => 'paquet_debutElement',
-		'fin' => 'paquet_finElement',
-		'text' => 'paquet_textElement'
-	];
-
-	$valider_xml = charger_fonction('valider', 'xml');
-	$vxml = $valider_xml($desc, false, $process, 'paquet.dtd', 'utf-8');
-	if (!$vxml->err) {
-		// On veut toutes les variantes selon la version de SPIP
-		if (!$plug) {
-			return $vxml->versions;
-		}
-
-		// compatibilite avec l'existant:
-		$tree = $vxml->versions['0'];
-
-		// l'arbre renvoie parfois un tag vide... etrange. Pas la peine de garder ca.
-		if (isset($tree['']) and !strlen($tree[''])) {
-			unset($tree['']);
-		}
-
-		$tree['slogan'] = $tree['prefix'] . '_slogan';
-		$tree['description'] = $tree['prefix'] . '_description';
-		paquet_readable_files($tree, "$dir_plugins$plug/");
-		if (!$tree['chemin']) {
-			$tree['chemin'] = [];
-		}
-
-		// On verifie qu'il existe des balises spip qu'il faudrait rajouter dans
-		// la structure d'infos du paquet en fonction de la version spip courante
-		if ((is_countable($vxml->versions) ? count($vxml->versions) : 0) > 1) {
-			$vspip = $GLOBALS['spip_version_branche'];
-			foreach ($vxml->versions as $_compatibilite => $_version) {
-				if (
-					($_version['balise'] == 'spip')
-					and (plugin_version_compatible($_compatibilite, $vspip, 'spip'))
-				) {
-					// on merge les sous-balises de la balise spip compatible avec celles de la
-					// balise paquet
-					foreach ($_version as $_index => $_balise) {
-						if ($_index and $_index != 'balise') {
-							$tree[$_index] = array_merge($tree[$_index], $_balise);
-						}
-					}
-				}
-			}
-		}
-
-		return $tree;
-	}
-
-	// Prendre les messages d'erreur sans les numeros de lignes
-	$msg = array_column($vxml->err, 0);
-	$t = _T('plugins_erreur', ['plugins' => $plug]);
-	array_unshift($msg, $t . " <ul class='erreur_xml'><li>" . reset($msg) . '</li></ul>');
-
-	return ['erreur' => $msg];
+    static $process = [ // tableau constant
+        'debut' => 'paquet_debutElement',
+        'fin' => 'paquet_finElement',
+        'text' => 'paquet_textElement'
+    ];
+
+    $valider_xml = charger_fonction('valider', 'xml');
+    $vxml = $valider_xml($desc, false, $process, 'paquet.dtd', 'utf-8');
+    if (!$vxml->err) {
+        // On veut toutes les variantes selon la version de SPIP
+        if (!$plug) {
+            return $vxml->versions;
+        }
+
+        // compatibilite avec l'existant:
+        $tree = $vxml->versions['0'];
+
+        // l'arbre renvoie parfois un tag vide... etrange. Pas la peine de garder ca.
+        if (isset($tree['']) and !strlen($tree[''])) {
+            unset($tree['']);
+        }
+
+        $tree['slogan'] = $tree['prefix'] . '_slogan';
+        $tree['description'] = $tree['prefix'] . '_description';
+        paquet_readable_files($tree, "$dir_plugins$plug/");
+        if (!$tree['chemin']) {
+            $tree['chemin'] = [];
+        }
+
+        // On verifie qu'il existe des balises spip qu'il faudrait rajouter dans
+        // la structure d'infos du paquet en fonction de la version spip courante
+        if ((is_countable($vxml->versions) ? count($vxml->versions) : 0) > 1) {
+            $vspip = $GLOBALS['spip_version_branche'];
+            foreach ($vxml->versions as $_compatibilite => $_version) {
+                if (
+                    ($_version['balise'] == 'spip')
+                    and (plugin_version_compatible($_compatibilite, $vspip, 'spip'))
+                ) {
+                    // on merge les sous-balises de la balise spip compatible avec celles de la
+                    // balise paquet
+                    foreach ($_version as $_index => $_balise) {
+                        if ($_index and $_index != 'balise') {
+                            $tree[$_index] = array_merge($tree[$_index], $_balise);
+                        }
+                    }
+                }
+            }
+        }
+
+        return $tree;
+    }
+
+    // Prendre les messages d'erreur sans les numeros de lignes
+    $msg = array_column($vxml->err, 0);
+    $t = _T('plugins_erreur', ['plugins' => $plug]);
+    array_unshift($msg, $t . " <ul class='erreur_xml'><li>" . reset($msg) . '</li></ul>');
+
+    return ['erreur' => $msg];
 }
 
 /**
@@ -94,11 +94,11 @@ 
  * @return void
  */
 function paquet_readable_files(&$tree, $dir) {
-	$prefix = strtolower($tree['prefix']);
+    $prefix = strtolower($tree['prefix']);
 
-	$tree['options'] = (is_readable($dir . $f = ($prefix . '_options.php'))) ? [$f] : [];
-	$tree['fonctions'] = (is_readable($dir . $f = ($prefix . '_fonctions.php'))) ? [$f] : [];
-	$tree['install'] = (is_readable($dir . $f = ($prefix . '_administrations.php'))) ? [$f] : [];
+    $tree['options'] = (is_readable($dir . $f = ($prefix . '_options.php'))) ? [$f] : [];
+    $tree['fonctions'] = (is_readable($dir . $f = ($prefix . '_fonctions.php'))) ? [$f] : [];
+    $tree['install'] = (is_readable($dir . $f = ($prefix . '_administrations.php'))) ? [$f] : [];
 }
 
 /**
@@ -115,35 +115,35 @@ 
  * @param array $attrs
  */
 function paquet_debutElement($phraseur, $name, $attrs) {
-	xml_debutElement($phraseur, $name, $attrs);
-	if ($phraseur->err) {
-		return;
-	}
-	if (($name == 'paquet') or ($name == 'spip')) {
-		if ($name == 'spip') {
-			$n = $attrs['compatibilite'];
-			$attrs = [];
-		} else {
-			$n = '0';
-			$phraseur->contenu['paquet'] = $attrs;
-			$attrs['menu'] = [];
-			$attrs['chemin'] = [];
-			$attrs['necessite'] = [];
-			$attrs['lib'] = [];
-			$attrs['onglet'] = [];
-			$attrs['procure'] = [];
-			$attrs['pipeline'] = [];
-			$attrs['utilise'] = [];
-			$attrs['style'] = [];
-			$attrs['script'] = [];
-			$attrs['genie'] = [];
-		}
-		$phraseur->contenu['compatible'] = $n;
-		$phraseur->versions[$phraseur->contenu['compatible']] = $attrs;
-	} else {
-		$phraseur->versions[$phraseur->contenu['compatible']][$name][0] = $attrs;
-	}
-	$phraseur->versions[$phraseur->contenu['compatible']][''] = '';
+    xml_debutElement($phraseur, $name, $attrs);
+    if ($phraseur->err) {
+        return;
+    }
+    if (($name == 'paquet') or ($name == 'spip')) {
+        if ($name == 'spip') {
+            $n = $attrs['compatibilite'];
+            $attrs = [];
+        } else {
+            $n = '0';
+            $phraseur->contenu['paquet'] = $attrs;
+            $attrs['menu'] = [];
+            $attrs['chemin'] = [];
+            $attrs['necessite'] = [];
+            $attrs['lib'] = [];
+            $attrs['onglet'] = [];
+            $attrs['procure'] = [];
+            $attrs['pipeline'] = [];
+            $attrs['utilise'] = [];
+            $attrs['style'] = [];
+            $attrs['script'] = [];
+            $attrs['genie'] = [];
+        }
+        $phraseur->contenu['compatible'] = $n;
+        $phraseur->versions[$phraseur->contenu['compatible']] = $attrs;
+    } else {
+        $phraseur->versions[$phraseur->contenu['compatible']][$name][0] = $attrs;
+    }
+    $phraseur->versions[$phraseur->contenu['compatible']][''] = '';
 }
 
 /**
@@ -155,11 +155,11 @@ 
  * @param string $data
  */
 function paquet_textElement($phraseur, $data) {
-	xml_textElement($phraseur, $data);
-	if ($phraseur->err or !(trim($data))) {
-		return;
-	}
-	$phraseur->versions[$phraseur->contenu['compatible']][''] .= $data;
+    xml_textElement($phraseur, $data);
+    if ($phraseur->err or !(trim($data))) {
+        return;
+    }
+    $phraseur->versions[$phraseur->contenu['compatible']][''] .= $data;
 }
 
 /**
@@ -171,32 +171,32 @@ 
  * @param string $name
  */
 function paquet_finElement($phraseur, $name) {
-	if ($phraseur->err) {
-		return;
-	}
-	$n = $phraseur->contenu['compatible'];
-
-	if (isset($phraseur->versions[$n][$name][0]) and is_array($phraseur->versions[$n][$name][0])) {
-		$attrs = $phraseur->versions[$n][$name][0];
-		unset($phraseur->versions[$n][$name][0]);
-	} else {
-		$attrs = [];
-	}
-
-	$texte = trim($phraseur->versions[$n]['']);
-	$phraseur->versions[$n][''] = '';
-
-	$f = 'info_paquet_' . $name;
-	if (function_exists($f)) {
-		$f($phraseur, $attrs, $texte);
-	} elseif (!$attrs) {
-		$phraseur->versions[$n][$name] = $texte;
-	} else {
-		// Traitement generique. Si $attrs['nom'] n'existe pas, ce n'est pas normal ici
-		$phraseur->versions[$n][$name][$attrs['nom']] = $attrs;
-		#	  echo("<br>pour $name $n " . $attrs['nom']); var_dump($phraseur->versions[$n]);
-	}
-	xml_finElement($phraseur, $name, $attrs);
+    if ($phraseur->err) {
+        return;
+    }
+    $n = $phraseur->contenu['compatible'];
+
+    if (isset($phraseur->versions[$n][$name][0]) and is_array($phraseur->versions[$n][$name][0])) {
+        $attrs = $phraseur->versions[$n][$name][0];
+        unset($phraseur->versions[$n][$name][0]);
+    } else {
+        $attrs = [];
+    }
+
+    $texte = trim($phraseur->versions[$n]['']);
+    $phraseur->versions[$n][''] = '';
+
+    $f = 'info_paquet_' . $name;
+    if (function_exists($f)) {
+        $f($phraseur, $attrs, $texte);
+    } elseif (!$attrs) {
+        $phraseur->versions[$n][$name] = $texte;
+    } else {
+        // Traitement generique. Si $attrs['nom'] n'existe pas, ce n'est pas normal ici
+        $phraseur->versions[$n][$name][$attrs['nom']] = $attrs;
+        #	  echo("<br>pour $name $n " . $attrs['nom']); var_dump($phraseur->versions[$n]);
+    }
+    xml_finElement($phraseur, $name, $attrs);
 }
 
 /**
@@ -208,13 +208,13 @@ 
  * @param string $texte
  */
 function info_paquet_licence($phraseur, $attrs, $texte) {
-	if (isset($attrs['lien'])) {
-		$lien = $attrs['lien'];
-	} else {
-		$lien = '';
-	}
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['licence'][] = ['nom' => $texte, 'url' => $lien];
+    if (isset($attrs['lien'])) {
+        $lien = $attrs['lien'];
+    } else {
+        $lien = '';
+    }
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['licence'][] = ['nom' => $texte, 'url' => $lien];
 }
 
 /**
@@ -226,14 +226,14 @@ 
  * @param string $texte
  */
 function info_paquet_chemin($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	if (isset($attrs['path'])) {
-		if (isset($attrs['type'])) {
-			$phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path'], 'type' => $attrs['type']];
-		} else {
-			$phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path']];
-		}
-	}
+    $n = $phraseur->contenu['compatible'];
+    if (isset($attrs['path'])) {
+        if (isset($attrs['type'])) {
+            $phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path'], 'type' => $attrs['type']];
+        } else {
+            $phraseur->versions[$n]['chemin'][] = ['path' => $attrs['path']];
+        }
+    }
 }
 
 
@@ -247,24 +247,24 @@ 
  * @param string $texte
  */
 function info_paquet_auteur($phraseur, $attrs, $texte) {
-	#  echo 'auteur ', $texte;  var_dump($attrs);
-	if (isset($attrs['mail'])) {
-		if (strpos($attrs['mail'], '@')) {
-			$attrs['mail'] = str_replace('@', ' AT ', $attrs['mail']);
-		}
-		$mail = $attrs['mail'];
-	} else {
-		$mail = '';
-	}
-
-	if (isset($attrs['lien'])) {
-		$lien = $attrs['lien'];
-	} else {
-		$lien = '';
-	}
-
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['auteur'][] = ['nom' => $texte, 'url' => $lien, 'mail' => $mail];
+    #  echo 'auteur ', $texte;  var_dump($attrs);
+    if (isset($attrs['mail'])) {
+        if (strpos($attrs['mail'], '@')) {
+            $attrs['mail'] = str_replace('@', ' AT ', $attrs['mail']);
+        }
+        $mail = $attrs['mail'];
+    } else {
+        $mail = '';
+    }
+
+    if (isset($attrs['lien'])) {
+        $lien = $attrs['lien'];
+    } else {
+        $lien = '';
+    }
+
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['auteur'][] = ['nom' => $texte, 'url' => $lien, 'mail' => $mail];
 }
 
 /**
@@ -277,14 +277,14 @@ 
  */
 function info_paquet_credit($phraseur, $attrs, $texte) {
 
-	if (isset($attrs['lien'])) {
-		$lien = $attrs['lien'];
-	} else {
-		$lien = '';
-	}
+    if (isset($attrs['lien'])) {
+        $lien = $attrs['lien'];
+    } else {
+        $lien = '';
+    }
 
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['credit'][] = ['nom' => $texte, 'url' => $lien];
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['credit'][] = ['nom' => $texte, 'url' => $lien];
 }
 
 /**
@@ -296,8 +296,8 @@ 
  * @param string $texte
  */
 function info_paquet_copyright($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['copyright'][] = $texte;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['copyright'][] = $texte;
 }
 
 /**
@@ -309,9 +309,9 @@ 
  * @param string $texte
  */
 function info_paquet_paquet($phraseur, $attrs, $texte) {
-	$n = 0;
-	$phraseur->versions[$n]['dtd'] = 'paquet';
-	$phraseur->versions[$n]['balise'] = 'paquet';
+    $n = 0;
+    $phraseur->versions[$n]['dtd'] = 'paquet';
+    $phraseur->versions[$n]['balise'] = 'paquet';
 }
 
 /**
@@ -323,8 +323,8 @@ 
  * @param string $texte
  **/
 function info_paquet_traduire($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['traduire'][] = $attrs;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['traduire'][] = $attrs;
 }
 
 /**
@@ -336,8 +336,8 @@ 
  * @param string $texte
  */
 function info_paquet_spip($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['balise'] = 'spip';
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['balise'] = 'spip';
 }
 
 
@@ -349,8 +349,8 @@ 
  * @param string $texte
  */
 function info_paquet_pipeline($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['pipeline'][] = $attrs;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['pipeline'][] = $attrs;
 }
 
 
@@ -363,23 +363,23 @@ 
  * @param string $texte
  */
 function info_paquet_style($phraseur, $attrs, $texte) {
-	$lien = $chemin = $type = $media = '';
-
-	include_spip('inc/utils');
-	if (tester_url_absolue($attrs['source'])) {
-		$lien = $attrs['source'];
-	} else {
-		$chemin = $attrs['source'];
-	}
-	if (isset($attrs['type'])) {
-		$type = $attrs['type'];
-	}
-	if (isset($attrs['media'])) {
-		$media = $attrs['media'];
-	}
-
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['style'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type, 'media' => $media];
+    $lien = $chemin = $type = $media = '';
+
+    include_spip('inc/utils');
+    if (tester_url_absolue($attrs['source'])) {
+        $lien = $attrs['source'];
+    } else {
+        $chemin = $attrs['source'];
+    }
+    if (isset($attrs['type'])) {
+        $type = $attrs['type'];
+    }
+    if (isset($attrs['media'])) {
+        $media = $attrs['media'];
+    }
+
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['style'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type, 'media' => $media];
 }
 
 
@@ -392,20 +392,20 @@ 
  * @param string $texte
  */
 function info_paquet_script($phraseur, $attrs, $texte) {
-	$lien = $chemin = $type = $media = '';
-
-	include_spip('inc/utils');
-	if (tester_url_absolue($attrs['source'])) {
-		$lien = $attrs['source'];
-	} else {
-		$chemin = $attrs['source'];
-	}
-	if (isset($attrs['type'])) {
-		$type = $attrs['type'];
-	}
-
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['script'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type];
+    $lien = $chemin = $type = $media = '';
+
+    include_spip('inc/utils');
+    if (tester_url_absolue($attrs['source'])) {
+        $lien = $attrs['source'];
+    } else {
+        $chemin = $attrs['source'];
+    }
+    if (isset($attrs['type'])) {
+        $type = $attrs['type'];
+    }
+
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['script'][] = ['url' => $lien, 'path' => $chemin, 'type' => $type];
 }
 
 /**
@@ -416,6 +416,6 @@ 
  * @param string $texte
  */
 function info_paquet_genie($phraseur, $attrs, $texte) {
-	$n = $phraseur->contenu['compatible'];
-	$phraseur->versions[$n]['genie'][] = $attrs;
+    $n = $phraseur->contenu['compatible'];
+    $phraseur->versions[$n]['genie'][] = $attrs;
 }

ecrire/plugins/extraire_boutons.php

Indentation +27 added lines, -27 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -21,31 +21,31 @@ 
  * @return <type>
  */
 function plugins_extraire_boutons_dist($arbre) {
-	$les_boutons = null;
-	$ret = ['bouton' => [], 'onglet' => []];
-	// recuperer les boutons et onglets si necessaire
-	spip_xml_match_nodes(',^(bouton|onglet)\s,', $arbre, $les_boutons);
-	if (is_array($les_boutons) && count($les_boutons)) {
-		$ret['bouton'] = [];
-		$ret['onglet'] = [];
-		foreach ($les_boutons as $bouton => $val) {
-			$bouton = spip_xml_decompose_tag($bouton);
-			$type = reset($bouton);
-			$bouton = end($bouton);
-			if (isset($bouton['id'])) {
-				$id = $bouton['id'];
-				$val = reset($val);
-				if (is_array($val)) {
-					$ret[$type][$id]['parent'] = $bouton['parent'] ?? '';
-					$ret[$type][$id]['position'] = $bouton['position'] ?? '';
-					$ret[$type][$id]['titre'] = isset($val['titre']) ? trim(spip_xml_aplatit($val['titre'])) : '';
-					$ret[$type][$id]['icone'] = isset($val['icone']) ? trim(end($val['icone'])) : '';
-					$ret[$type][$id]['action'] = isset($val['url']) ? trim(end($val['url'])) : '';
-					$ret[$type][$id]['parametres'] = isset($val['args']) ? trim(end($val['args'])) : '';
-				}
-			}
-		}
-	}
+    $les_boutons = null;
+    $ret = ['bouton' => [], 'onglet' => []];
+    // recuperer les boutons et onglets si necessaire
+    spip_xml_match_nodes(',^(bouton|onglet)\s,', $arbre, $les_boutons);
+    if (is_array($les_boutons) && count($les_boutons)) {
+        $ret['bouton'] = [];
+        $ret['onglet'] = [];
+        foreach ($les_boutons as $bouton => $val) {
+            $bouton = spip_xml_decompose_tag($bouton);
+            $type = reset($bouton);
+            $bouton = end($bouton);
+            if (isset($bouton['id'])) {
+                $id = $bouton['id'];
+                $val = reset($val);
+                if (is_array($val)) {
+                    $ret[$type][$id]['parent'] = $bouton['parent'] ?? '';
+                    $ret[$type][$id]['position'] = $bouton['position'] ?? '';
+                    $ret[$type][$id]['titre'] = isset($val['titre']) ? trim(spip_xml_aplatit($val['titre'])) : '';
+                    $ret[$type][$id]['icone'] = isset($val['icone']) ? trim(end($val['icone'])) : '';
+                    $ret[$type][$id]['action'] = isset($val['url']) ? trim(end($val['url'])) : '';
+                    $ret[$type][$id]['parametres'] = isset($val['args']) ? trim(end($val['args'])) : '';
+                }
+            }
+        }
+    }
 
-	return $ret;
+    return $ret;
 }

ecrire/plugins/afficher_plugin.php

Indentation +312 added lines, -312 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/charsets');
 include_spip('inc/texte');
@@ -25,214 +25,214 @@ 
 
 // https://code.spip.net/@ligne_plug
 function plugins_afficher_plugin_dist(
-	$url_page,
-	$plug_file,
-	$checked,
-	$actif,
-	$expose = false,
-	$class_li = 'item',
-	$dir_plugins = _DIR_PLUGINS
+    $url_page,
+    $plug_file,
+    $checked,
+    $actif,
+    $expose = false,
+    $class_li = 'item',
+    $dir_plugins = _DIR_PLUGINS
 ) {
 
-	static $id_input = 0;
-	static $versions = [];
-
-	$force_reload = (_request('var_mode') == 'recalcul');
-	$get_infos = charger_fonction('get_infos', 'plugins');
-	$info = $get_infos($plug_file, $force_reload, $dir_plugins);
-	$prefix = $info['prefix'];
-	$cfg = '';
-	$checkable = ($dir_plugins !== _DIR_PLUGINS_DIST);
-	$nom = plugin_nom($info, $dir_plugins, $plug_file);
-	$erreur = '';
-
-	if (!plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
-		$info['slogan'] = _T('plugin_info_non_compatible_spip');
-		$erreur = http_img_pack(
-			'plugin-dis-32.png',
-			_T('plugin_info_non_compatible_spip'),
-			" class='picto_err'",
-			_T('plugin_info_non_compatible_spip')
-		);
-		$class_li .= ' disabled';
-		$checkable = false;
-	} elseif (isset($info['erreur'])) {
-		$class_li .= ' error';
-		$erreur = http_img_pack(
-			'plugin-err-32.png',
-			_T('plugin_info_erreur_xml'),
-			" class='picto_err'",
-			_T('plugin_info_erreur_xml')
-		)
-			. "<div class='erreur'>" . join('<br >', $info['erreur']) . '</div>';
-		$checkable = false;
-	} elseif (isset($GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file])) {
-		$class_li .= ' error';
-		$erreur = http_img_pack(
-			'plugin-err-32.png',
-			_T('plugin_impossible_activer', ['plugin' => $nom]),
-			" class='picto_err'",
-			_T('plugin_impossible_activer', ['plugin' => $nom])
-		)
-			. "<div class='erreur'>" . implode(
-				'<br />',
-				$GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file]
-			) . '</div>';
-	} else {
-		$cfg = $actif ? plugin_bouton_config($plug_file, $info, $dir_plugins) : '';
-		if (defined('_DEV_VERSION_SPIP_COMPAT') and !plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'])) {
-			//$info['slogan'] = _T('plugin_info_non_compatible_spip');
-			$erreur = http_img_pack(
-				'plugin-dis-32.png',
-				_T('plugin_info_non_compatible_spip'),
-				" class='picto_err picto_compat_forcee'",
-				_L('Version incompatible : compatibilité forcée')
-			);
-		}
-	}
-
-	// numerotons les occurrences d'un meme prefix
-	$versions[$prefix] = $id = isset($versions[$prefix]) ? intval($versions[$prefix]) + 1 : '';
-
-	$class_li .= ($actif ? ' actif' : '') . ($expose ? ' on' : '');
-
-	return "<li id='$prefix$id' class='$class_li'>"
-	. ((!$checkable and !$checked)
-		? '' : plugin_checkbox(++$id_input, $dir_plugins . $plug_file, $checked))
-	. plugin_resume($info, $dir_plugins, $plug_file, $url_page)
-	. $cfg
-	. $erreur
-	. (($dir_plugins !== _DIR_PLUGINS_DIST and plugin_est_installe($plug_file))
-		? plugin_desintalle($plug_file, $nom, $dir_plugins) : '')
-	. "<div class='details'>" // pour l'ajax de exec/info_plugin
-	. (!$expose ? '' : affiche_bloc_plugin($plug_file, $info, $dir_plugins))
-	. '</div>'
-	. '</li>';
+    static $id_input = 0;
+    static $versions = [];
+
+    $force_reload = (_request('var_mode') == 'recalcul');
+    $get_infos = charger_fonction('get_infos', 'plugins');
+    $info = $get_infos($plug_file, $force_reload, $dir_plugins);
+    $prefix = $info['prefix'];
+    $cfg = '';
+    $checkable = ($dir_plugins !== _DIR_PLUGINS_DIST);
+    $nom = plugin_nom($info, $dir_plugins, $plug_file);
+    $erreur = '';
+
+    if (!plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
+        $info['slogan'] = _T('plugin_info_non_compatible_spip');
+        $erreur = http_img_pack(
+            'plugin-dis-32.png',
+            _T('plugin_info_non_compatible_spip'),
+            " class='picto_err'",
+            _T('plugin_info_non_compatible_spip')
+        );
+        $class_li .= ' disabled';
+        $checkable = false;
+    } elseif (isset($info['erreur'])) {
+        $class_li .= ' error';
+        $erreur = http_img_pack(
+            'plugin-err-32.png',
+            _T('plugin_info_erreur_xml'),
+            " class='picto_err'",
+            _T('plugin_info_erreur_xml')
+        )
+            . "<div class='erreur'>" . join('<br >', $info['erreur']) . '</div>';
+        $checkable = false;
+    } elseif (isset($GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file])) {
+        $class_li .= ' error';
+        $erreur = http_img_pack(
+            'plugin-err-32.png',
+            _T('plugin_impossible_activer', ['plugin' => $nom]),
+            " class='picto_err'",
+            _T('plugin_impossible_activer', ['plugin' => $nom])
+        )
+            . "<div class='erreur'>" . implode(
+                '<br />',
+                $GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file]
+            ) . '</div>';
+    } else {
+        $cfg = $actif ? plugin_bouton_config($plug_file, $info, $dir_plugins) : '';
+        if (defined('_DEV_VERSION_SPIP_COMPAT') and !plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'])) {
+            //$info['slogan'] = _T('plugin_info_non_compatible_spip');
+            $erreur = http_img_pack(
+                'plugin-dis-32.png',
+                _T('plugin_info_non_compatible_spip'),
+                " class='picto_err picto_compat_forcee'",
+                _L('Version incompatible : compatibilité forcée')
+            );
+        }
+    }
+
+    // numerotons les occurrences d'un meme prefix
+    $versions[$prefix] = $id = isset($versions[$prefix]) ? intval($versions[$prefix]) + 1 : '';
+
+    $class_li .= ($actif ? ' actif' : '') . ($expose ? ' on' : '');
+
+    return "<li id='$prefix$id' class='$class_li'>"
+    . ((!$checkable and !$checked)
+        ? '' : plugin_checkbox(++$id_input, $dir_plugins . $plug_file, $checked))
+    . plugin_resume($info, $dir_plugins, $plug_file, $url_page)
+    . $cfg
+    . $erreur
+    . (($dir_plugins !== _DIR_PLUGINS_DIST and plugin_est_installe($plug_file))
+        ? plugin_desintalle($plug_file, $nom, $dir_plugins) : '')
+    . "<div class='details'>" // pour l'ajax de exec/info_plugin
+    . (!$expose ? '' : affiche_bloc_plugin($plug_file, $info, $dir_plugins))
+    . '</div>'
+    . '</li>';
 }
 
 function plugin_bouton_config($nom, $infos, $dir) {
-	// la verification se base sur le filesystem
-	// il faut donc n'utiliser que des minuscules, par convention
-	$prefix = strtolower($infos['prefix']);
-	// si paquet.xml fournit un squelette, le prendre
-	if (isset($infos['config']) and $infos['config']) {
-		return recuperer_fond(
-			"$dir$nom/" . $infos['config'],
-			[
-				'script' => 'configurer_' . $prefix,
-				'nom' => $nom
-			]
-		);
-	}
-
-	// si le plugin CFG est la, l'essayer
-	if (defined('_DIR_PLUGIN_CFG')) {
-		if (include_spip('inc/cfg')) { // test CFG version >= 1.0.5
-		if ($cfg = icone_lien_cfg("$dir$nom", 'cfg')) {
-				return "<div class='cfg_link'>$cfg</div>";
-		}
-		}
-	}
-
-	// sinon prendre le squelette std sur le nom std
-	return recuperer_fond(
-		'prive/squelettes/inclure/cfg',
-		[
-			'script' => 'configurer_' . $prefix,
-			'nom' => $nom
-		]
-	);
+    // la verification se base sur le filesystem
+    // il faut donc n'utiliser que des minuscules, par convention
+    $prefix = strtolower($infos['prefix']);
+    // si paquet.xml fournit un squelette, le prendre
+    if (isset($infos['config']) and $infos['config']) {
+        return recuperer_fond(
+            "$dir$nom/" . $infos['config'],
+            [
+                'script' => 'configurer_' . $prefix,
+                'nom' => $nom
+            ]
+        );
+    }
+
+    // si le plugin CFG est la, l'essayer
+    if (defined('_DIR_PLUGIN_CFG')) {
+        if (include_spip('inc/cfg')) { // test CFG version >= 1.0.5
+        if ($cfg = icone_lien_cfg("$dir$nom", 'cfg')) {
+                return "<div class='cfg_link'>$cfg</div>";
+        }
+        }
+    }
+
+    // sinon prendre le squelette std sur le nom std
+    return recuperer_fond(
+        'prive/squelettes/inclure/cfg',
+        [
+            'script' => 'configurer_' . $prefix,
+            'nom' => $nom
+        ]
+    );
 }
 
 // checkbox pour activer ou desactiver
 // si ce n'est pas une extension
 
 function plugin_checkbox($id_input, $file, $actif) {
-	$name = substr(md5($file), 0, 16);
-
-	return "<div class='check'>\n"
-	. "<input type='checkbox' name='s$name' id='label_$id_input'"
-	. ($actif ? " checked='checked'" : '')
-	. " class='checkbox'  value='O' />"
-	. "\n<label for='label_$id_input'>" . _T('activer_plugin') . '</label>'
-	. '</div>';
+    $name = substr(md5($file), 0, 16);
+
+    return "<div class='check'>\n"
+    . "<input type='checkbox' name='s$name' id='label_$id_input'"
+    . ($actif ? " checked='checked'" : '')
+    . " class='checkbox'  value='O' />"
+    . "\n<label for='label_$id_input'>" . _T('activer_plugin') . '</label>'
+    . '</div>';
 }
 
 function plugin_nom($info, $dir_plugins, $plug_file) {
-	$prefix = $info['prefix'];
-	$dir = "$dir_plugins$plug_file";
-	// Si dtd paquet, on traite le nom soit par son item de langue soit par sa valeur immediate a l'index "nom"
-	if ($info['dtd'] == 'paquet') {
-		$nom = plugin_typo("{$prefix}_nom", "$dir/lang/paquet-$prefix");
-		if (!$nom) {
-			$nom = typo($info['nom']);
-		}
-	} else {
-		$nom = typo(attribut_html($info['nom']));
-	}
-
-	return trim($nom);
+    $prefix = $info['prefix'];
+    $dir = "$dir_plugins$plug_file";
+    // Si dtd paquet, on traite le nom soit par son item de langue soit par sa valeur immediate a l'index "nom"
+    if ($info['dtd'] == 'paquet') {
+        $nom = plugin_typo("{$prefix}_nom", "$dir/lang/paquet-$prefix");
+        if (!$nom) {
+            $nom = typo($info['nom']);
+        }
+    } else {
+        $nom = typo(attribut_html($info['nom']));
+    }
+
+    return trim($nom);
 }
 
 // Cartouche Resume
 function plugin_resume($info, $dir_plugins, $plug_file, $url_page) {
-	$prefix = $info['prefix'];
-	$dir = "$dir_plugins$plug_file";
-	$slogan = PtoBR(plugin_propre($info['slogan'], "$dir/lang/paquet-$prefix"));
-	// une seule ligne dans le slogan : couper si besoin
-	if (($p = strpos($slogan, '<br />')) !== false) {
-		$slogan = substr($slogan, 0, $p);
-	}
-	// couper par securite
-	$slogan = couper($slogan, 80);
-
-	$nom = plugin_nom($info, $dir_plugins, $plug_file);
-
-	$url = parametre_url($url_page, 'plugin', substr($dir, strlen(_DIR_RACINE)));
-
-	$icon_class = 'icon';
-	$img = '';
-	if (isset($info['logo']) and $i = trim($info['logo'])) {
-		$img = http_img_pack("$dir/$i", '', " width='32' height='32'", '', ['variante_svg_si_possible' => true, 'chemin_image' => false]);
-		if (!extraire_attribut($img, 'src')) {
-			$img = '';
-		}
-	}
-	if (!$img) {
-		$img = http_img_pack('plugin-xx.svg', '', " width='32' height='32'");
-		$icon_class .= ' no-logo';
-	}
-
-	$i = "<div class='$icon_class'><a href='$url' rel='info'>$img</a></div>";
-
-	return "<div class='resume'>"
-	. "<h3><a href='$url' rel='info'>"
-	. $nom
-	. '</a></h3>'
-	. " <span class='version'>" . $info['version'] . '</span>'
-	. " <span class='etat'> - "
-	. plugin_etat_en_clair($info['etat'])
-	. '</span>'
-	. "<div class='short'>" . $slogan . '</div>'
-	. $i
-	. '</div>';
+    $prefix = $info['prefix'];
+    $dir = "$dir_plugins$plug_file";
+    $slogan = PtoBR(plugin_propre($info['slogan'], "$dir/lang/paquet-$prefix"));
+    // une seule ligne dans le slogan : couper si besoin
+    if (($p = strpos($slogan, '<br />')) !== false) {
+        $slogan = substr($slogan, 0, $p);
+    }
+    // couper par securite
+    $slogan = couper($slogan, 80);
+
+    $nom = plugin_nom($info, $dir_plugins, $plug_file);
+
+    $url = parametre_url($url_page, 'plugin', substr($dir, strlen(_DIR_RACINE)));
+
+    $icon_class = 'icon';
+    $img = '';
+    if (isset($info['logo']) and $i = trim($info['logo'])) {
+        $img = http_img_pack("$dir/$i", '', " width='32' height='32'", '', ['variante_svg_si_possible' => true, 'chemin_image' => false]);
+        if (!extraire_attribut($img, 'src')) {
+            $img = '';
+        }
+    }
+    if (!$img) {
+        $img = http_img_pack('plugin-xx.svg', '', " width='32' height='32'");
+        $icon_class .= ' no-logo';
+    }
+
+    $i = "<div class='$icon_class'><a href='$url' rel='info'>$img</a></div>";
+
+    return "<div class='resume'>"
+    . "<h3><a href='$url' rel='info'>"
+    . $nom
+    . '</a></h3>'
+    . " <span class='version'>" . $info['version'] . '</span>'
+    . " <span class='etat'> - "
+    . plugin_etat_en_clair($info['etat'])
+    . '</span>'
+    . "<div class='short'>" . $slogan . '</div>'
+    . $i
+    . '</div>';
 }
 
 function plugin_desintalle($plug_file, $nom, $dir_plugins = null) {
-	if (!$dir_plugins) {
-		$dir_plugins = _DIR_PLUGINS;
-	}
+    if (!$dir_plugins) {
+        $dir_plugins = _DIR_PLUGINS;
+    }
 
-	$action = redirige_action_auteur('desinstaller_plugin', "$dir_plugins::$plug_file", 'admin_plugin');
-	$text = _T('bouton_desinstaller');
-	$text2 = _T('info_desinstaller_plugin');
-	$file = basename($plug_file);
+    $action = redirige_action_auteur('desinstaller_plugin', "$dir_plugins::$plug_file", 'admin_plugin');
+    $text = _T('bouton_desinstaller');
+    $text2 = _T('info_desinstaller_plugin');
+    $file = basename($plug_file);
 
-	return "<div class='actions'>[" .
-	"<a href='$action'
+    return "<div class='actions'>[" .
+    "<a href='$action'
 		onclick='return confirm(\"$text $nom ?\\n$text2\")'>"
-	. $text
-	. '</a>]</div>';
+    . $text
+    . '</a>]</div>';
 }
 
 /**
@@ -246,147 +246,147 @@ 
  *     Traduction de l'état dans la langue en cours
  **/
 function plugin_etat_en_clair($etat) {
-	if (!in_array($etat, ['stable', 'test', 'experimental'])) {
-		$etat = 'developpement';
-	}
+    if (!in_array($etat, ['stable', 'test', 'experimental'])) {
+        $etat = 'developpement';
+    }
 
-	return _T('plugin_etat_' . $etat);
+    return _T('plugin_etat_' . $etat);
 }
 
 // https://code.spip.net/@plugin_propre
 function plugin_propre($texte, $module = '', $propre = 'propre') {
-	// retirer le retour a la racine du module, car le find_in_path se fait depuis la racine
-	if (_DIR_RACINE and strncmp($module, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
-		$module = substr($module, strlen(_DIR_RACINE));
-	}
-	if (preg_match('|^\w+_[\w_]+$|', $texte)) {
-		$texte = _T(($module ? "$module:" : '') . $texte, [], ['force' => false]);
-	}
-
-	return $propre($texte);
+    // retirer le retour a la racine du module, car le find_in_path se fait depuis la racine
+    if (_DIR_RACINE and strncmp($module, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
+        $module = substr($module, strlen(_DIR_RACINE));
+    }
+    if (preg_match('|^\w+_[\w_]+$|', $texte)) {
+        $texte = _T(($module ? "$module:" : '') . $texte, [], ['force' => false]);
+    }
+
+    return $propre($texte);
 }
 
 function plugin_typo($texte, $module = '') {
-	return plugin_propre($texte, $module, 'typo');
+    return plugin_propre($texte, $module, 'typo');
 }
 
 
 // https://code.spip.net/@affiche_bloc_plugin
 function affiche_bloc_plugin($plug_file, $info, $dir_plugins = null) {
-	$log = null;
-	if (!$dir_plugins) {
-		$dir_plugins = _DIR_PLUGINS;
-	}
-
-	$prefix = $info['prefix'];
-	$dir = "$dir_plugins$plug_file/lang/paquet-$prefix";
-
-	$s = '';
-	// TODO: le traiter_multi ici n'est pas beau
-	// cf. description du plugin/_stable_/ortho/plugin.xml
-	// concerne les anciens plugin.xml donc on devrait plus en avoir besoin
-	$description = '';
-	if (isset($info['description'])) {
-		$description = plugin_propre($info['description'], $dir);
-	}
-
-	if (
-		isset($info['documentation'])
-		and $lien = $info['documentation']
-	) {
-		$description .= "<p><em class='site'><a href='$lien' class='spip_out'>" . _T('en_savoir_plus') . '</a></em></p>';
-	}
-	$s .= "<dd class='desc'>" . $description . "</dd>\n";
-
-	if (isset($info['auteur'])) {
-		if (is_array($info['auteur'])) {
-			$a = formater_credits($info['auteur'], ', ');
-		} // pour compat mais ne doit plus arriver
-		else {
-			$a = trim($info['auteur']);
-		}
-		if ($a) {
-			$s .= "<dt class='auteurs'>" . _T('public:par_auteur') . "</dt><dd class='auteurs'>" . PtoBR(propre(
-				$a,
-				$dir
-			)) . "</dd>\n";
-		}
-	}
-
-	if (isset($info['credit'])) {
-		if ($a = formater_credits($info['credit'], ', ')) {
-			$s .= "<dt class='credits'>" . _T('plugin_info_credit') . "</dt><dd class='credits'>" . PtoBR(propre(
-				$a,
-				$dir
-			)) . "</dd>\n";
-		}
-	}
-
-	if (isset($info['licence'])) {
-		if (is_array($info['licence'])) {
-			$a = formater_credits($info['licence'], ', ');
-		} // pour compat mais ne doit plus arriver
-		else {
-			$a = trim($info['licence']);
-		}
-		if ($a) {
-			$s .= "<dt class='licence'>" . _T('intitule_licence') . "</dt><dd class='licence'>" . PtoBR(propre(
-				$a,
-				$dir
-			)) . "</dd>\n";
-		}
-	}
-
-	$s = "<dl class='description'>$s</dl>";
-
-	//
-	// Ajouter les infos techniques
-	//
-	$infotech = [];
-
-	$version = '<dt>' . _T('version') . '</dt><dd>' . $info['version'];
-	// Version VCS
-	if ($vcs = version_vcs_courante($dir_plugins . $plug_file)) {
-		$version .= ' ' . $vcs;
-	}
-	$version .= '</dd>';
-	$infotech[] = $version;
-	$infotech[] = '<dt>' . _T('repertoire_plugins') . '</dt><dd>' . joli_repertoire("$dir_plugins$plug_file") . '</dd>';
-	// source zip le cas echeant
-	$infotech[] = (lire_fichier($dir_plugins . $plug_file . '/install.log', $log)
-		and preg_match(',^source:(.*)$,m', $log, $r))
-		? '<dt>' . _T('plugin_source') . '</dt><dd>' . trim($r[1]) . '</dd>'
-		: '';
-
-	$infotech[] = !$info['necessite'] ? '' :
-		('<dt>' . _T('plugin_info_necessite') . '</dt><dd>' . join(
-			' ',
-			array_map('array_shift', $info['necessite'])
-		) . '</dd>');
-
-	$s .= "<dl class='tech'>"
-		. join('', $infotech)
-		. '</dl>';
-
-
-	return $s;
+    $log = null;
+    if (!$dir_plugins) {
+        $dir_plugins = _DIR_PLUGINS;
+    }
+
+    $prefix = $info['prefix'];
+    $dir = "$dir_plugins$plug_file/lang/paquet-$prefix";
+
+    $s = '';
+    // TODO: le traiter_multi ici n'est pas beau
+    // cf. description du plugin/_stable_/ortho/plugin.xml
+    // concerne les anciens plugin.xml donc on devrait plus en avoir besoin
+    $description = '';
+    if (isset($info['description'])) {
+        $description = plugin_propre($info['description'], $dir);
+    }
+
+    if (
+        isset($info['documentation'])
+        and $lien = $info['documentation']
+    ) {
+        $description .= "<p><em class='site'><a href='$lien' class='spip_out'>" . _T('en_savoir_plus') . '</a></em></p>';
+    }
+    $s .= "<dd class='desc'>" . $description . "</dd>\n";
+
+    if (isset($info['auteur'])) {
+        if (is_array($info['auteur'])) {
+            $a = formater_credits($info['auteur'], ', ');
+        } // pour compat mais ne doit plus arriver
+        else {
+            $a = trim($info['auteur']);
+        }
+        if ($a) {
+            $s .= "<dt class='auteurs'>" . _T('public:par_auteur') . "</dt><dd class='auteurs'>" . PtoBR(propre(
+                $a,
+                $dir
+            )) . "</dd>\n";
+        }
+    }
+
+    if (isset($info['credit'])) {
+        if ($a = formater_credits($info['credit'], ', ')) {
+            $s .= "<dt class='credits'>" . _T('plugin_info_credit') . "</dt><dd class='credits'>" . PtoBR(propre(
+                $a,
+                $dir
+            )) . "</dd>\n";
+        }
+    }
+
+    if (isset($info['licence'])) {
+        if (is_array($info['licence'])) {
+            $a = formater_credits($info['licence'], ', ');
+        } // pour compat mais ne doit plus arriver
+        else {
+            $a = trim($info['licence']);
+        }
+        if ($a) {
+            $s .= "<dt class='licence'>" . _T('intitule_licence') . "</dt><dd class='licence'>" . PtoBR(propre(
+                $a,
+                $dir
+            )) . "</dd>\n";
+        }
+    }
+
+    $s = "<dl class='description'>$s</dl>";
+
+    //
+    // Ajouter les infos techniques
+    //
+    $infotech = [];
+
+    $version = '<dt>' . _T('version') . '</dt><dd>' . $info['version'];
+    // Version VCS
+    if ($vcs = version_vcs_courante($dir_plugins . $plug_file)) {
+        $version .= ' ' . $vcs;
+    }
+    $version .= '</dd>';
+    $infotech[] = $version;
+    $infotech[] = '<dt>' . _T('repertoire_plugins') . '</dt><dd>' . joli_repertoire("$dir_plugins$plug_file") . '</dd>';
+    // source zip le cas echeant
+    $infotech[] = (lire_fichier($dir_plugins . $plug_file . '/install.log', $log)
+        and preg_match(',^source:(.*)$,m', $log, $r))
+        ? '<dt>' . _T('plugin_source') . '</dt><dd>' . trim($r[1]) . '</dd>'
+        : '';
+
+    $infotech[] = !$info['necessite'] ? '' :
+        ('<dt>' . _T('plugin_info_necessite') . '</dt><dd>' . join(
+            ' ',
+            array_map('array_shift', $info['necessite'])
+        ) . '</dd>');
+
+    $s .= "<dl class='tech'>"
+        . join('', $infotech)
+        . '</dl>';
+
+
+    return $s;
 }
 
 function formater_credits($infos, $sep = ', ') {
-	$texte = '';
-
-	foreach ($infos as $_credit) {
-		if ($texte) {
-			$texte .= $sep;
-		}
-		// Si le credit en cours n'est pas un array c'est donc un copyright
-		$texte .=
-			(!is_array($_credit))
-				? PtoBR(propre($_credit))
-				: ($_credit['url'] ? '<a href="' . $_credit['url'] . '">' : '') .
-				$_credit['nom'] .
-				($_credit['url'] ? '</a>' : '');
-	}
-
-	return $texte;
+    $texte = '';
+
+    foreach ($infos as $_credit) {
+        if ($texte) {
+            $texte .= $sep;
+        }
+        // Si le credit en cours n'est pas un array c'est donc un copyright
+        $texte .=
+            (!is_array($_credit))
+                ? PtoBR(propre($_credit))
+                : ($_credit['url'] ? '<a href="' . $_credit['url'] . '">' : '') .
+                $_credit['nom'] .
+                ($_credit['url'] ? '</a>' : '');
+    }
+
+    return $texte;
 }

ecrire/plugins/installer.php

Indentation +135 added lines, -135 removed lines

@@ -18,7 +18,7 @@ 
 
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -54,96 +54,96 @@ 
  */
 function plugins_installer_dist($plug, $action, $dir_type = '_DIR_PLUGINS') {
 
-	// Charger les informations du XML du plugin et vérification de l'existence d'une installation
-	$get_infos = charger_fonction('get_infos', 'plugins');
-	$infos = $get_infos($plug, false, constant($dir_type));
-	if (!isset($infos['install']) or !$infos['install']) {
-		return false;
-	}
-
-	// Passer en chemin absolu si possible, c'est plus efficace
-	$dir = str_replace('_DIR_', '_ROOT_', $dir_type);
-	if (!defined($dir)) {
-		$dir = $dir_type;
-	}
-	$dir = constant($dir);
-	foreach ($infos['install'] as $file) {
-		$file = $dir . $plug . '/' . trim($file);
-		if (file_exists($file)) {
-			include_once($file);
-		}
-	}
-
-	// Détermination de la table meta et du nom de la meta plugin
-	$table = 'meta';
-	if (isset($infos['meta']) and ($infos['meta'] !== 'meta')) {
-		$table = $infos['meta'];
-		// S'assurer que les metas de la table spécifique sont bien accessibles dans la globale
-		lire_metas($table);
-	}
-	$nom_meta = $infos['prefix'] . '_base_version';
-
-	// Détermination de la fonction à appeler et de ses arguments
-	$f = $infos['prefix'] . '_install';
-	if (!function_exists($f)) {
-		$f = isset($infos['schema']) ? 'spip_plugin_install' : '';
-		$arg = $infos;
-		// On passe la table et la meta pour éviter de les recalculer dans la fonction appelée
-		$arg['meta'] = $table;
-		$arg['nom_meta'] = $nom_meta;
-	} else {
-		// Ancienne méthode d'installation - TODO à supprimer à terme
-		// stupide: info deja dans le nom
-		$arg = $infos['prefix'];
-	}
-	$version = $infos['schema'] ?? '';
-
-	if (!$f) {
-		// installation sans operation particuliere
-		$infos['install_test'] = [true, ''];
-		return $infos;
-	}
-
-	// Tester si l'action demandée est nécessaire ou pas.
-	$test = $f('test', $arg, $version);
-	if ($action == 'uninstall') {
-		$test = !$test;
-	}
-	// Si deja fait, on ne fait rien et on ne dit rien
-	if ($test) {
-		return true;
-	}
-
-	// Si install et que l'on a la meta d'installation, c'est un upgrade. On le consigne dans $infos
-	// pour renvoyer le bon message en retour de la fonction.
-	if ($action == 'install' && !empty($GLOBALS[$table][$nom_meta])) {
-		$infos['upgrade'] = true;
-	}
-
-	// executer l'installation ou l'inverse
-	// et renvoyer la trace (mais il faudrait passer en AJAX plutot)
-	ob_start();
-	$f($action, $arg, $version);
-	$aff = ob_get_contents();
-	ob_end_clean();
-
-	// vider le cache des descriptions de tables a chaque (de)installation
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$trouver_table('');
-	$infos['install_test'] = [$f('test', $arg, $version), $aff];
-
-	// Si la table meta n'est pas spip_meta et qu'on est dans la première installation du plugin
-	// on force la création du fichier cache à la date du moment.
-	// On relit les metas de la table pour être sur que la globale soit à jour pour touch_meta.
-	if (
-		($table !== 'meta')
-		and ($action == 'install')
-		and empty($infos['upgrade'])
-	) {
-		touch_meta(false, $table);
-	}
-
-	return $infos;
+    // Charger les informations du XML du plugin et vérification de l'existence d'une installation
+    $get_infos = charger_fonction('get_infos', 'plugins');
+    $infos = $get_infos($plug, false, constant($dir_type));
+    if (!isset($infos['install']) or !$infos['install']) {
+        return false;
+    }
+
+    // Passer en chemin absolu si possible, c'est plus efficace
+    $dir = str_replace('_DIR_', '_ROOT_', $dir_type);
+    if (!defined($dir)) {
+        $dir = $dir_type;
+    }
+    $dir = constant($dir);
+    foreach ($infos['install'] as $file) {
+        $file = $dir . $plug . '/' . trim($file);
+        if (file_exists($file)) {
+            include_once($file);
+        }
+    }
+
+    // Détermination de la table meta et du nom de la meta plugin
+    $table = 'meta';
+    if (isset($infos['meta']) and ($infos['meta'] !== 'meta')) {
+        $table = $infos['meta'];
+        // S'assurer que les metas de la table spécifique sont bien accessibles dans la globale
+        lire_metas($table);
+    }
+    $nom_meta = $infos['prefix'] . '_base_version';
+
+    // Détermination de la fonction à appeler et de ses arguments
+    $f = $infos['prefix'] . '_install';
+    if (!function_exists($f)) {
+        $f = isset($infos['schema']) ? 'spip_plugin_install' : '';
+        $arg = $infos;
+        // On passe la table et la meta pour éviter de les recalculer dans la fonction appelée
+        $arg['meta'] = $table;
+        $arg['nom_meta'] = $nom_meta;
+    } else {
+        // Ancienne méthode d'installation - TODO à supprimer à terme
+        // stupide: info deja dans le nom
+        $arg = $infos['prefix'];
+    }
+    $version = $infos['schema'] ?? '';
+
+    if (!$f) {
+        // installation sans operation particuliere
+        $infos['install_test'] = [true, ''];
+        return $infos;
+    }
+
+    // Tester si l'action demandée est nécessaire ou pas.
+    $test = $f('test', $arg, $version);
+    if ($action == 'uninstall') {
+        $test = !$test;
+    }
+    // Si deja fait, on ne fait rien et on ne dit rien
+    if ($test) {
+        return true;
+    }
+
+    // Si install et que l'on a la meta d'installation, c'est un upgrade. On le consigne dans $infos
+    // pour renvoyer le bon message en retour de la fonction.
+    if ($action == 'install' && !empty($GLOBALS[$table][$nom_meta])) {
+        $infos['upgrade'] = true;
+    }
+
+    // executer l'installation ou l'inverse
+    // et renvoyer la trace (mais il faudrait passer en AJAX plutot)
+    ob_start();
+    $f($action, $arg, $version);
+    $aff = ob_get_contents();
+    ob_end_clean();
+
+    // vider le cache des descriptions de tables a chaque (de)installation
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $trouver_table('');
+    $infos['install_test'] = [$f('test', $arg, $version), $aff];
+
+    // Si la table meta n'est pas spip_meta et qu'on est dans la première installation du plugin
+    // on force la création du fichier cache à la date du moment.
+    // On relit les metas de la table pour être sur que la globale soit à jour pour touch_meta.
+    if (
+        ($table !== 'meta')
+        and ($action == 'install')
+        and empty($infos['upgrade'])
+    ) {
+        touch_meta(false, $table);
+    }
+
+    return $infos;
 }
 
 /**
@@ -159,25 +159,25 @@ 
  * @return bool|void
  */
 function spip_plugin_install($action, $infos, $version_cible) {
-	$nom_meta = $infos['nom_meta'];
-	$table = $infos['meta'];
-	switch ($action) {
-		case 'test':
-			return (isset($GLOBALS[$table])
-				and isset($GLOBALS[$table][$nom_meta])
-				and spip_version_compare($GLOBALS[$table][$nom_meta], $version_cible, '>='));
-			break;
-		case 'install':
-			if (function_exists($upgrade = $infos['prefix'] . '_upgrade')) {
-				$upgrade($nom_meta, $version_cible, $table);
-			}
-			break;
-		case 'uninstall':
-			if (function_exists($vider_tables = $infos['prefix'] . '_vider_tables')) {
-				$vider_tables($nom_meta, $table);
-			}
-			break;
-	}
+    $nom_meta = $infos['nom_meta'];
+    $table = $infos['meta'];
+    switch ($action) {
+        case 'test':
+            return (isset($GLOBALS[$table])
+                and isset($GLOBALS[$table][$nom_meta])
+                and spip_version_compare($GLOBALS[$table][$nom_meta], $version_cible, '>='));
+            break;
+        case 'install':
+            if (function_exists($upgrade = $infos['prefix'] . '_upgrade')) {
+                $upgrade($nom_meta, $version_cible, $table);
+            }
+            break;
+        case 'uninstall':
+            if (function_exists($vider_tables = $infos['prefix'] . '_vider_tables')) {
+                $vider_tables($nom_meta, $table);
+            }
+            break;
+    }
 }
 
 
@@ -196,29 +196,29 @@ 
  * @return array Tableau des plugins actifs
  **/
 function liste_plugin_actifs() {
-	$liste = $GLOBALS['meta']['plugin'] ?? '';
-	if (!$liste) {
-		return [];
-	}
-	if (!is_array($liste = unserialize($liste))) {
-		// compatibilite pre 1.9.2, mettre a jour la meta
-		spip_log("MAJ meta plugin vieille version : $liste", 'plugin');
-		$new = true;
-		[, $liste] = liste_plugin_valides(explode(',', $liste));
-	} else {
-		$new = false;
-		// compat au moment d'une migration depuis version anterieure
-		// si pas de dir_type, alors c'est _DIR_PLUGINS
-		foreach ($liste as $prefix => $infos) {
-			if (!isset($infos['dir_type'])) {
-				$liste[$prefix]['dir_type'] = '_DIR_PLUGINS';
-				$new = true;
-			}
-		}
-	}
-	if ($new) {
-		ecrire_meta('plugin', serialize($liste));
-	}
-
-	return $liste;
+    $liste = $GLOBALS['meta']['plugin'] ?? '';
+    if (!$liste) {
+        return [];
+    }
+    if (!is_array($liste = unserialize($liste))) {
+        // compatibilite pre 1.9.2, mettre a jour la meta
+        spip_log("MAJ meta plugin vieille version : $liste", 'plugin');
+        $new = true;
+        [, $liste] = liste_plugin_valides(explode(',', $liste));
+    } else {
+        $new = false;
+        // compat au moment d'une migration depuis version anterieure
+        // si pas de dir_type, alors c'est _DIR_PLUGINS
+        foreach ($liste as $prefix => $infos) {
+            if (!isset($infos['dir_type'])) {
+                $liste[$prefix]['dir_type'] = '_DIR_PLUGINS';
+                $new = true;
+            }
+        }
+    }
+    if ($new) {
+        ecrire_meta('plugin', serialize($liste));
+    }
+
+    return $liste;
 }