spip / SPIP

ecrire/public.php

Indentation +188 added lines, -188 removed lines

@@ -21,193 +21,193 @@
 // par souci de compatiilite).
 
 if (isset($GLOBALS['_INC_PUBLIC']) and $GLOBALS['_INC_PUBLIC']) {
-	echo recuperer_fond($fond, $contexte_inclus, [], _request('connect') ?? '');
+    echo recuperer_fond($fond, $contexte_inclus, [], _request('connect') ?? '');
 } else {
-	$GLOBALS['_INC_PUBLIC'] = 1;
-	define('_PIPELINE_SUFFIX', test_espace_prive() ? '_prive' : '');
-
-	// Faut-il initialiser SPIP ? (oui dans le cas general)
-	if (!defined('_DIR_RESTREINT_ABS')) {
-		if (
-			defined('_DIR_RESTREINT')
-			and @file_exists(_ROOT_RESTREINT . 'inc_version.php')
-		) {
-			include_once _ROOT_RESTREINT . 'inc_version.php';
-		} else {
-			die('inc_version absent ?');
-		}
-	} // $fond defini dans le fichier d'appel ?
-
-	else {
-		if (isset($fond) and !_request('fond')) {
-		} // fond demande dans l'url par page=xxxx ?
-		else {
-			if (isset($_GET[_SPIP_PAGE])) {
-				$fond = (string)$_GET[_SPIP_PAGE];
-
-				// Securite
-				if (
-					strstr($fond, '/')
-					and !(
-						isset($GLOBALS['visiteur_session']) // pour eviter d'evaluer la suite pour les anonymes
-						and include_spip('inc/autoriser')
-						and autoriser('webmestre'))
-				) {
-					include_spip('inc/minipres');
-					echo minipres();
-					exit;
-				}
-				// l'argument Page a priorite sur l'argument action
-				// le cas se presente a cause des RewriteRule d'Apache
-				// qui permettent d'ajouter un argument dans la QueryString
-				// mais pas d'en retirer un en conservant les autres.
-				if (isset($_GET['action']) and $_GET['action'] === $fond) {
-					unset($_GET['action']);
-				}
-				# sinon, fond par defaut
-			} else {
-				// sinon fond par defaut (cf. assembler.php)
-				$fond = pipeline('detecter_fond_par_defaut', '');
-			}
-		}
-	}
-
-	$tableau_des_temps = [];
-
-	// Particularites de certains squelettes
-	if ($fond == 'login') {
-		$forcer_lang = true;
-	}
-
-	if (
-		isset($forcer_lang) and $forcer_lang and ($forcer_lang !== 'non')
-		and !_request('action')
-		and $_SERVER['REQUEST_METHOD'] != 'POST'
-	) {
-		include_spip('inc/lang');
-		verifier_lang_url();
-	}
-
-	$lang = !isset($_GET['lang']) ? '' : lang_select($_GET['lang']);
-
-	// Charger l'aiguilleur des traitements derogatoires
-	// (action en base SQL, formulaires CVT, AJax)
-	if (_request('action') or _request('var_ajax') or _request('formulaire_action')) {
-		include_spip('public/aiguiller');
-		if (
-			// cas des appels actions ?action=xxx
-			traiter_appels_actions()
-			or
-			// cas des hits ajax sur les inclusions ajax
-			traiter_appels_inclusions_ajax()
-			or
-			// cas des formulaires charger/verifier/traiter
-			traiter_formulaires_dynamiques()
-		) {
-			// lancer les taches sur affichage final, comme le cron
-			// mais sans rien afficher
-			$GLOBALS['html'] = false; // ne rien afficher
-			pipeline('affichage_final' . _PIPELINE_SUFFIX, '');
-			exit; // le hit est fini !
-		}
-	}
-
-	// Il y a du texte a produire, charger le metteur en page
-	include_spip('public/assembler');
-	$page = assembler($fond, _request('connect') ?? '');
-
-	if (isset($page['status'])) {
-		include_spip('inc/headers');
-		http_response_code($page['status']);
-	}
-
-	// Content-Type ?
-	if (!isset($page['entetes']['Content-Type'])) {
-		$charset = $GLOBALS['meta']['charset'] ?? 'utf-8';
-		$page['entetes']['Content-Type'] = 'text/html; charset=' . $charset;
-		$html = true;
-	} else {
-		$html = preg_match(',^\s*text/html,', $page['entetes']['Content-Type']);
-	}
-
-	// Tester si on est admin et il y a des choses supplementaires a dire
-	// type tableau pour y mettre des choses au besoin.
-	$debug = ((_request('var_mode') == 'debug') or $tableau_des_temps) ? [1] : [];
-
-	// affiche-t-on les boutons d'administration ? voir f_admin()
-	$affiche_boutons_admin = ($html and (
-			(isset($_COOKIE['spip_admin']) and (!isset($flag_preserver) or !$flag_preserver))
-			or ($debug and include_spip('inc/autoriser') and autoriser('debug'))
-			or (defined('_VAR_PREVIEW') and _VAR_PREVIEW)
-		));
-
-	if ($affiche_boutons_admin) {
-		include_spip('balise/formulaire_admin');
-	}
-
-
-	// Execution de la page calculee
-
-	// traitements sur les entetes avant envoi
-	// peut servir pour le plugin de stats
-	$page['entetes'] = pipeline('affichage_entetes_final' . _PIPELINE_SUFFIX, $page['entetes']);
-
-
-	// eval $page et affecte $res
-	include _ROOT_RESTREINT . 'public/evaluer_page.php';
-	envoyer_entetes($page['entetes']);
-	if ($res === false) {
-		include_spip('inc/autoriser');
-		$err = _T('zbug_erreur_execution_page');
-		if (autoriser('webmestre')) {
-			$err .= "\n<hr />\n"
-				. highlight_string($page['codephp'], true)
-				. "\n<hr />\n";
-		}
-		$msg = [$err];
-		erreur_squelette($msg);
-	}
-
-	//
-	// Envoyer le resultat apres post-traitements
-	//
-	// (c'est ici qu'on fait var_recherche, validation, boutons d'admin,
-	// cf. public/assembler.php)
-	echo pipeline('affichage_final' . _PIPELINE_SUFFIX, $page['texte']);
-
-	if ($lang) {
-		lang_select();
-	}
-	// l'affichage de la page a pu lever des erreurs (inclusion manquante)
-	// il faut tester a nouveau
-	$debug = ((_request('var_mode') == 'debug') or $tableau_des_temps) ? [1] : [];
-
-	// Appel au debusqueur en cas d'erreurs ou de demande de trace
-	// at last
-	if ($debug) {
-		// en cas d'erreur, retester l'affichage
-		if ($html and ($affiche_boutons_admin or $debug)) {
-			$var_mode_affiche = _request('var_mode_affiche');
-			$var_mode_objet = _request('var_mode_objet');
-			$GLOBALS['debug_objets'][$var_mode_affiche][$var_mode_objet . 'tout'] = ($var_mode_affiche == 'validation' ? $page['texte'] : '');
-			echo erreur_squelette(false);
-		}
-	} else {
-		if (
-			isset($GLOBALS['meta']['date_prochain_postdate'])
-			and $GLOBALS['meta']['date_prochain_postdate'] <= time()
-		) {
-			include_spip('inc/rubriques');
-			calculer_prochain_postdate(true);
-		}
-
-		// Effectuer une tache de fond ?
-		// si _DIRECT_CRON_FORCE est present, on force l'appel
-		if (defined('_DIRECT_CRON_FORCE')) {
-			cron();
-		}
-
-		// sauver le cache chemin si necessaire
-		save_path_cache();
-	}
+    $GLOBALS['_INC_PUBLIC'] = 1;
+    define('_PIPELINE_SUFFIX', test_espace_prive() ? '_prive' : '');
+
+    // Faut-il initialiser SPIP ? (oui dans le cas general)
+    if (!defined('_DIR_RESTREINT_ABS')) {
+        if (
+            defined('_DIR_RESTREINT')
+            and @file_exists(_ROOT_RESTREINT . 'inc_version.php')
+        ) {
+            include_once _ROOT_RESTREINT . 'inc_version.php';
+        } else {
+            die('inc_version absent ?');
+        }
+    } // $fond defini dans le fichier d'appel ?
+
+    else {
+        if (isset($fond) and !_request('fond')) {
+        } // fond demande dans l'url par page=xxxx ?
+        else {
+            if (isset($_GET[_SPIP_PAGE])) {
+                $fond = (string)$_GET[_SPIP_PAGE];
+
+                // Securite
+                if (
+                    strstr($fond, '/')
+                    and !(
+                        isset($GLOBALS['visiteur_session']) // pour eviter d'evaluer la suite pour les anonymes
+                        and include_spip('inc/autoriser')
+                        and autoriser('webmestre'))
+                ) {
+                    include_spip('inc/minipres');
+                    echo minipres();
+                    exit;
+                }
+                // l'argument Page a priorite sur l'argument action
+                // le cas se presente a cause des RewriteRule d'Apache
+                // qui permettent d'ajouter un argument dans la QueryString
+                // mais pas d'en retirer un en conservant les autres.
+                if (isset($_GET['action']) and $_GET['action'] === $fond) {
+                    unset($_GET['action']);
+                }
+                # sinon, fond par defaut
+            } else {
+                // sinon fond par defaut (cf. assembler.php)
+                $fond = pipeline('detecter_fond_par_defaut', '');
+            }
+        }
+    }
+
+    $tableau_des_temps = [];
+
+    // Particularites de certains squelettes
+    if ($fond == 'login') {
+        $forcer_lang = true;
+    }
+
+    if (
+        isset($forcer_lang) and $forcer_lang and ($forcer_lang !== 'non')
+        and !_request('action')
+        and $_SERVER['REQUEST_METHOD'] != 'POST'
+    ) {
+        include_spip('inc/lang');
+        verifier_lang_url();
+    }
+
+    $lang = !isset($_GET['lang']) ? '' : lang_select($_GET['lang']);
+
+    // Charger l'aiguilleur des traitements derogatoires
+    // (action en base SQL, formulaires CVT, AJax)
+    if (_request('action') or _request('var_ajax') or _request('formulaire_action')) {
+        include_spip('public/aiguiller');
+        if (
+            // cas des appels actions ?action=xxx
+            traiter_appels_actions()
+            or
+            // cas des hits ajax sur les inclusions ajax
+            traiter_appels_inclusions_ajax()
+            or
+            // cas des formulaires charger/verifier/traiter
+            traiter_formulaires_dynamiques()
+        ) {
+            // lancer les taches sur affichage final, comme le cron
+            // mais sans rien afficher
+            $GLOBALS['html'] = false; // ne rien afficher
+            pipeline('affichage_final' . _PIPELINE_SUFFIX, '');
+            exit; // le hit est fini !
+        }
+    }
+
+    // Il y a du texte a produire, charger le metteur en page
+    include_spip('public/assembler');
+    $page = assembler($fond, _request('connect') ?? '');
+
+    if (isset($page['status'])) {
+        include_spip('inc/headers');
+        http_response_code($page['status']);
+    }
+
+    // Content-Type ?
+    if (!isset($page['entetes']['Content-Type'])) {
+        $charset = $GLOBALS['meta']['charset'] ?? 'utf-8';
+        $page['entetes']['Content-Type'] = 'text/html; charset=' . $charset;
+        $html = true;
+    } else {
+        $html = preg_match(',^\s*text/html,', $page['entetes']['Content-Type']);
+    }
+
+    // Tester si on est admin et il y a des choses supplementaires a dire
+    // type tableau pour y mettre des choses au besoin.
+    $debug = ((_request('var_mode') == 'debug') or $tableau_des_temps) ? [1] : [];
+
+    // affiche-t-on les boutons d'administration ? voir f_admin()
+    $affiche_boutons_admin = ($html and (
+            (isset($_COOKIE['spip_admin']) and (!isset($flag_preserver) or !$flag_preserver))
+            or ($debug and include_spip('inc/autoriser') and autoriser('debug'))
+            or (defined('_VAR_PREVIEW') and _VAR_PREVIEW)
+        ));
+
+    if ($affiche_boutons_admin) {
+        include_spip('balise/formulaire_admin');
+    }
+
+
+    // Execution de la page calculee
+
+    // traitements sur les entetes avant envoi
+    // peut servir pour le plugin de stats
+    $page['entetes'] = pipeline('affichage_entetes_final' . _PIPELINE_SUFFIX, $page['entetes']);
+
+
+    // eval $page et affecte $res
+    include _ROOT_RESTREINT . 'public/evaluer_page.php';
+    envoyer_entetes($page['entetes']);
+    if ($res === false) {
+        include_spip('inc/autoriser');
+        $err = _T('zbug_erreur_execution_page');
+        if (autoriser('webmestre')) {
+            $err .= "\n<hr />\n"
+                . highlight_string($page['codephp'], true)
+                . "\n<hr />\n";
+        }
+        $msg = [$err];
+        erreur_squelette($msg);
+    }
+
+    //
+    // Envoyer le resultat apres post-traitements
+    //
+    // (c'est ici qu'on fait var_recherche, validation, boutons d'admin,
+    // cf. public/assembler.php)
+    echo pipeline('affichage_final' . _PIPELINE_SUFFIX, $page['texte']);
+
+    if ($lang) {
+        lang_select();
+    }
+    // l'affichage de la page a pu lever des erreurs (inclusion manquante)
+    // il faut tester a nouveau
+    $debug = ((_request('var_mode') == 'debug') or $tableau_des_temps) ? [1] : [];
+
+    // Appel au debusqueur en cas d'erreurs ou de demande de trace
+    // at last
+    if ($debug) {
+        // en cas d'erreur, retester l'affichage
+        if ($html and ($affiche_boutons_admin or $debug)) {
+            $var_mode_affiche = _request('var_mode_affiche');
+            $var_mode_objet = _request('var_mode_objet');
+            $GLOBALS['debug_objets'][$var_mode_affiche][$var_mode_objet . 'tout'] = ($var_mode_affiche == 'validation' ? $page['texte'] : '');
+            echo erreur_squelette(false);
+        }
+    } else {
+        if (
+            isset($GLOBALS['meta']['date_prochain_postdate'])
+            and $GLOBALS['meta']['date_prochain_postdate'] <= time()
+        ) {
+            include_spip('inc/rubriques');
+            calculer_prochain_postdate(true);
+        }
+
+        // Effectuer une tache de fond ?
+        // si _DIRECT_CRON_FORCE est present, on force l'appel
+        if (defined('_DIRECT_CRON_FORCE')) {
+            cron();
+        }
+
+        // sauver le cache chemin si necessaire
+        save_path_cache();
+    }
 }

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/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/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;
 }

ecrire/maj/legacy/v30.php

Indentation +230 added lines, -230 removed lines

@@ -18,18 +18,18 @@ 
  * @package SPIP\Core\SQL\Upgrade
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
 $GLOBALS['maj'][16428] = [
-	['maj_liens', 'auteur'], // creer la table liens
-	['maj_liens', 'auteur', 'article'],
-	['sql_drop_table', 'spip_auteurs_articles'],
-	['maj_liens', 'auteur', 'rubrique'],
-	['sql_drop_table', 'spip_auteurs_rubriques'],
-	['maj_liens', 'auteur', 'message'],
-	['sql_drop_table', 'spip_auteurs_messages'],
+    ['maj_liens', 'auteur'], // creer la table liens
+    ['maj_liens', 'auteur', 'article'],
+    ['sql_drop_table', 'spip_auteurs_articles'],
+    ['maj_liens', 'auteur', 'rubrique'],
+    ['sql_drop_table', 'spip_auteurs_rubriques'],
+    ['maj_liens', 'auteur', 'message'],
+    ['sql_drop_table', 'spip_auteurs_messages'],
 ];
 
 /**
@@ -55,89 +55,89 @@ 
  */
 function maj_liens($pivot, $l = '') {
 
-	@define('_LOG_FILTRE_GRAVITE', 8);
-
-	$exceptions_pluriel = ['forum' => 'forum', 'syndic' => 'syndic'];
-
-	$pivot = preg_replace(',[^\w],', '', $pivot); // securite
-	$pivots = ($exceptions_pluriel[$pivot] ?? $pivot . 's');
-	$liens = 'spip_' . $pivots . '_liens';
-	$id_pivot = 'id_' . $pivot;
-	// Creer spip_auteurs_liens
-	global $tables_auxiliaires;
-	if (!$l) {
-		include_spip('base/auxiliaires');
-		include_spip('base/create');
-		creer_ou_upgrader_table($liens, $tables_auxiliaires[$liens], false);
-	} else {
-		// Preparer
-		$l = preg_replace(',[^\w],', '', $l); // securite
-		$primary = "id_$l";
-		$objet = ($l == 'syndic' ? 'site' : $l);
-		$ls = ($exceptions_pluriel[$l] ?? $l . 's');
-		$ancienne_table = 'spip_' . $pivots . '_' . $ls;
-		$pool = 400;
-
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		if (!$desc = $trouver_table($ancienne_table)) {
-			return;
-		}
-
-		// securite pour ne pas perdre de donnees
-		if (!$trouver_table($liens)) {
-			return;
-		}
-
-		$champs = $desc['field'];
-		if (isset($champs['maj'])) {
-			unset($champs['maj']);
-		}
-		if (isset($champs[$primary])) {
-			unset($champs[$primary]);
-		}
-
-		$champs = array_keys($champs);
-		// ne garder que les champs qui existent sur la table destination
-		if ($desc_cible = $trouver_table($liens)) {
-			$champs = array_intersect($champs, array_keys($desc_cible['field']));
-		}
-
-		$champs[] = "$primary as id_objet";
-		$champs[] = "'$objet' as objet";
-		$champs = implode(', ', $champs);
-
-		// Recopier les donnees
-		$sub_pool = 100;
-		while ($ids = array_map('reset', sql_allfetsel("$primary", $ancienne_table, '', '', '', "0,$sub_pool"))) {
-			$insert = [];
-			foreach ($ids as $id) {
-				$n = sql_countsel($liens, "objet='$objet' AND id_objet=" . intval($id));
-				while ($t = sql_allfetsel($champs, $ancienne_table, "$primary=" . intval($id), '', $id_pivot, "$n,$pool")) {
-					$n += is_countable($t) ? count($t) : 0;
-					// empiler en s'assurant a minima de l'unicite
-					while ($r = array_shift($t)) {
-						$insert[$r[$id_pivot] . ':' . $r['id_objet']] = $r;
-					}
-					if (count($insert) >= $sub_pool) {
-						maj_liens_insertq_multi_check($liens, $insert, $tables_auxiliaires[$liens]);
-						$insert = [];
-					}
-					// si timeout, sortir, la relance nous ramenera dans cette fonction
-					// et on verifiera/repartira de la
-					if (time() >= _TIME_OUT) {
-						return;
-					}
-				}
-				if (time() >= _TIME_OUT) {
-					return;
-				}
-			}
-			if (count($insert)) {
-				maj_liens_insertq_multi_check($liens, $insert, $tables_auxiliaires[$liens]);
-			}
-			sql_delete($ancienne_table, sql_in($primary, $ids));
-		}
-	}
+    @define('_LOG_FILTRE_GRAVITE', 8);
+
+    $exceptions_pluriel = ['forum' => 'forum', 'syndic' => 'syndic'];
+
+    $pivot = preg_replace(',[^\w],', '', $pivot); // securite
+    $pivots = ($exceptions_pluriel[$pivot] ?? $pivot . 's');
+    $liens = 'spip_' . $pivots . '_liens';
+    $id_pivot = 'id_' . $pivot;
+    // Creer spip_auteurs_liens
+    global $tables_auxiliaires;
+    if (!$l) {
+        include_spip('base/auxiliaires');
+        include_spip('base/create');
+        creer_ou_upgrader_table($liens, $tables_auxiliaires[$liens], false);
+    } else {
+        // Preparer
+        $l = preg_replace(',[^\w],', '', $l); // securite
+        $primary = "id_$l";
+        $objet = ($l == 'syndic' ? 'site' : $l);
+        $ls = ($exceptions_pluriel[$l] ?? $l . 's');
+        $ancienne_table = 'spip_' . $pivots . '_' . $ls;
+        $pool = 400;
+
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        if (!$desc = $trouver_table($ancienne_table)) {
+            return;
+        }
+
+        // securite pour ne pas perdre de donnees
+        if (!$trouver_table($liens)) {
+            return;
+        }
+
+        $champs = $desc['field'];
+        if (isset($champs['maj'])) {
+            unset($champs['maj']);
+        }
+        if (isset($champs[$primary])) {
+            unset($champs[$primary]);
+        }
+
+        $champs = array_keys($champs);
+        // ne garder que les champs qui existent sur la table destination
+        if ($desc_cible = $trouver_table($liens)) {
+            $champs = array_intersect($champs, array_keys($desc_cible['field']));
+        }
+
+        $champs[] = "$primary as id_objet";
+        $champs[] = "'$objet' as objet";
+        $champs = implode(', ', $champs);
+
+        // Recopier les donnees
+        $sub_pool = 100;
+        while ($ids = array_map('reset', sql_allfetsel("$primary", $ancienne_table, '', '', '', "0,$sub_pool"))) {
+            $insert = [];
+            foreach ($ids as $id) {
+                $n = sql_countsel($liens, "objet='$objet' AND id_objet=" . intval($id));
+                while ($t = sql_allfetsel($champs, $ancienne_table, "$primary=" . intval($id), '', $id_pivot, "$n,$pool")) {
+                    $n += is_countable($t) ? count($t) : 0;
+                    // empiler en s'assurant a minima de l'unicite
+                    while ($r = array_shift($t)) {
+                        $insert[$r[$id_pivot] . ':' . $r['id_objet']] = $r;
+                    }
+                    if (count($insert) >= $sub_pool) {
+                        maj_liens_insertq_multi_check($liens, $insert, $tables_auxiliaires[$liens]);
+                        $insert = [];
+                    }
+                    // si timeout, sortir, la relance nous ramenera dans cette fonction
+                    // et on verifiera/repartira de la
+                    if (time() >= _TIME_OUT) {
+                        return;
+                    }
+                }
+                if (time() >= _TIME_OUT) {
+                    return;
+                }
+            }
+            if (count($insert)) {
+                maj_liens_insertq_multi_check($liens, $insert, $tables_auxiliaires[$liens]);
+            }
+            sql_delete($ancienne_table, sql_in($primary, $ids));
+        }
+    }
 }
 
 /**
@@ -151,86 +151,86 @@ 
  * @return void
  **/
 function maj_liens_insertq_multi_check($table, $couples, $desc = []) {
-	$n_before = sql_countsel($table);
-	sql_insertq_multi($table, $couples, $desc);
-	$n_after = sql_countsel($table);
-	if (($n_after - $n_before) == count($couples)) {
-		return;
-	}
-	// si ecart, on recommence l'insertion ligne par ligne...
-	// moins rapide mais secure : seul le couple en doublon echouera, et non toute la serie
-	foreach ($couples as $c) {
-		sql_insertq($table, $c, $desc);
-	}
+    $n_before = sql_countsel($table);
+    sql_insertq_multi($table, $couples, $desc);
+    $n_after = sql_countsel($table);
+    if (($n_after - $n_before) == count($couples)) {
+        return;
+    }
+    // si ecart, on recommence l'insertion ligne par ligne...
+    // moins rapide mais secure : seul le couple en doublon echouera, et non toute la serie
+    foreach ($couples as $c) {
+        sql_insertq($table, $c, $desc);
+    }
 }
 
 $GLOBALS['maj'][17311] = [
-	[
-		'ecrire_meta',
-		'multi_objets',
-		implode(
-			',',
-			array_diff(
-				[
-					(isset($GLOBALS['meta']['multi_rubriques']) and $GLOBALS['meta']['multi_rubriques'] == 'oui')
-						? 'spip_rubriques' : '',
-					(isset($GLOBALS['meta']['multi_articles']) and $GLOBALS['meta']['multi_articles'] == 'oui')
-						? 'spip_articles' : ''
-				],
-				['']
-			)
-		)
-	],
-	[
-		'ecrire_meta',
-		'gerer_trad_objets',
-		implode(
-			',',
-			array_diff(
-				[
-					(isset($GLOBALS['meta']['gerer_trad']) and $GLOBALS['meta']['gerer_trad'] == 'oui')
-						? 'spip_articles' : ''
-				],
-				['']
-			)
-		)
-	],
+    [
+        'ecrire_meta',
+        'multi_objets',
+        implode(
+            ',',
+            array_diff(
+                [
+                    (isset($GLOBALS['meta']['multi_rubriques']) and $GLOBALS['meta']['multi_rubriques'] == 'oui')
+                        ? 'spip_rubriques' : '',
+                    (isset($GLOBALS['meta']['multi_articles']) and $GLOBALS['meta']['multi_articles'] == 'oui')
+                        ? 'spip_articles' : ''
+                ],
+                ['']
+            )
+        )
+    ],
+    [
+        'ecrire_meta',
+        'gerer_trad_objets',
+        implode(
+            ',',
+            array_diff(
+                [
+                    (isset($GLOBALS['meta']['gerer_trad']) and $GLOBALS['meta']['gerer_trad'] == 'oui')
+                        ? 'spip_articles' : ''
+                ],
+                ['']
+            )
+        )
+    ],
 ];
 $GLOBALS['maj'][17555] = [
-	['sql_alter', "TABLE spip_resultats ADD table_objet varchar(30) DEFAULT '' NOT NULL"],
-	['sql_alter', "TABLE spip_resultats ADD serveur char(16) DEFAULT '' NOT NULL"],
+    ['sql_alter', "TABLE spip_resultats ADD table_objet varchar(30) DEFAULT '' NOT NULL"],
+    ['sql_alter', "TABLE spip_resultats ADD serveur char(16) DEFAULT '' NOT NULL"],
 ];
 
 $GLOBALS['maj'][17563] = [
-	['sql_alter', "TABLE spip_articles ADD virtuel VARCHAR(255) DEFAULT '' NOT NULL"],
-	['sql_update', 'spip_articles', ['virtuel' => 'SUBSTRING(chapo,2)', 'chapo' => "''"], "chapo LIKE '=_%'"],
+    ['sql_alter', "TABLE spip_articles ADD virtuel VARCHAR(255) DEFAULT '' NOT NULL"],
+    ['sql_update', 'spip_articles', ['virtuel' => 'SUBSTRING(chapo,2)', 'chapo' => "''"], "chapo LIKE '=_%'"],
 ];
 
 $GLOBALS['maj'][17577] = [
-	['maj_tables', ['spip_jobs', 'spip_jobs_liens']],
+    ['maj_tables', ['spip_jobs', 'spip_jobs_liens']],
 ];
 
 $GLOBALS['maj'][17743] = [
-	['sql_update', 'spip_auteurs', ['prefs' => 'bio', 'bio' => "''"], "statut='nouveau' AND bio<>''"],
+    ['sql_update', 'spip_auteurs', ['prefs' => 'bio', 'bio' => "''"], "statut='nouveau' AND bio<>''"],
 ];
 
 $GLOBALS['maj'][18219] = [
-	['sql_alter', 'TABLE spip_rubriques DROP id_import'],
-	['sql_alter', 'TABLE spip_rubriques DROP export'],
+    ['sql_alter', 'TABLE spip_rubriques DROP id_import'],
+    ['sql_alter', 'TABLE spip_rubriques DROP export'],
 ];
 
 $GLOBALS['maj'][18310] = [
-	['sql_alter', "TABLE spip_auteurs_liens CHANGE vu vu VARCHAR(6) DEFAULT 'non' NOT NULL"],
+    ['sql_alter', "TABLE spip_auteurs_liens CHANGE vu vu VARCHAR(6) DEFAULT 'non' NOT NULL"],
 ];
 
 $GLOBALS['maj'][18597] = [
-	['sql_alter', "TABLE spip_rubriques ADD profondeur smallint(5) DEFAULT '0' NOT NULL"],
-	['maj_propager_les_secteurs'],
+    ['sql_alter', "TABLE spip_rubriques ADD profondeur smallint(5) DEFAULT '0' NOT NULL"],
+    ['maj_propager_les_secteurs'],
 ];
 
 $GLOBALS['maj'][18955] = [
-	['sql_alter', 'TABLE spip_auteurs_liens ADD INDEX id_objet (id_objet)'],
-	['sql_alter', 'TABLE spip_auteurs_liens ADD INDEX objet (objet)'],
+    ['sql_alter', 'TABLE spip_auteurs_liens ADD INDEX id_objet (id_objet)'],
+    ['sql_alter', 'TABLE spip_auteurs_liens ADD INDEX objet (objet)'],
 ];
 
 /**
@@ -239,8 +239,8 @@ 
  * @uses propager_les_secteurs()
  **/
 function maj_propager_les_secteurs() {
-	include_spip('inc/rubriques');
-	propager_les_secteurs();
+    include_spip('inc/rubriques');
+    propager_les_secteurs();
 }
 
 /**
@@ -253,87 +253,87 @@ 
 function maj_collation_sqlite() {
 
 
-	include_spip('base/dump');
-	$tables = base_lister_toutes_tables();
-
-	// rien a faire si base non sqlite
-	if (strncmp($GLOBALS['connexions'][0]['type'], 'sqlite', 6) !== 0) {
-		return;
-	}
-
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	// forcer le vidage de cache
-	$trouver_table('');
-
-	// cas particulier spip_auteurs : retablir le collate binary sur le login
-	$desc = $trouver_table('spip_auteurs');
-	spip_log('spip_auteurs : ' . var_export($desc['field'], true), 'maj.' . _LOG_INFO_IMPORTANTE);
-	if (stripos($desc['field']['login'], 'BINARY') === false) {
-		spip_log('Retablir champ login BINARY sur table spip_auteurs', 'maj');
-		sql_alter('table spip_auteurs change login login VARCHAR(255) BINARY');
-		$trouver_table('');
-		$new_desc = $trouver_table('spip_auteurs');
-		spip_log('Apres conversion spip_auteurs : ' . var_export($new_desc['field'], true), 'maj.' . _LOG_INFO_IMPORTANTE);
-	}
-
-	foreach ($tables as $table) {
-		if (time() >= _TIME_OUT) {
-			return;
-		}
-		if ($desc = $trouver_table($table)) {
-			$desc_collate = _sqlite_remplacements_definitions_table($desc['field']);
-			if ($d = array_diff($desc['field'], $desc_collate)) {
-				spip_log("Table $table COLLATE incorrects", 'maj');
-
-				// cas particulier spip_urls :
-				// supprimer les doublons avant conversion sinon echec (on garde les urls les plus recentes)
-				if ($table == 'spip_urls') {
-					// par date DESC pour conserver les urls les plus recentes
-					$data = sql_allfetsel('*', 'spip_urls', '', '', 'date DESC');
-					$urls = [];
-					foreach ($data as $d) {
-						$key = $d['id_parent'] . '::' . strtolower($d['url']);
-						if (!isset($urls[$key])) {
-							$urls[$key] = true;
-						} else {
-							spip_log(
-								'Suppression doublon dans spip_urls avant conversion : ' . serialize($d),
-								'maj.' . _LOG_INFO_IMPORTANTE
-							);
-							sql_delete('spip_urls', 'id_parent=' . sql_quote($d['id_parent']) . ' AND url=' . sql_quote($d['url']));
-						}
-					}
-				}
-				foreach ($desc['field'] as $field => $type) {
-					if ($desc['field'][$field] !== $desc_collate[$field]) {
-						spip_log("Conversion COLLATE table $table", 'maj.' . _LOG_INFO_IMPORTANTE);
-						sql_alter("table $table change $field $field " . $desc_collate[$field]);
-						$trouver_table('');
-						$new_desc = $trouver_table($table);
-						spip_log(
-							"Apres conversion $table : " . var_export($new_desc['field'], true),
-							'maj.' . _LOG_INFO_IMPORTANTE
-						);
-						continue 2; // inutile de continuer pour cette table : un seul alter remet tout a jour en sqlite
-					}
-				}
-			}
-		}
-	}
-
-	// forcer le vidage de cache
-	$trouver_table('');
+    include_spip('base/dump');
+    $tables = base_lister_toutes_tables();
+
+    // rien a faire si base non sqlite
+    if (strncmp($GLOBALS['connexions'][0]['type'], 'sqlite', 6) !== 0) {
+        return;
+    }
+
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    // forcer le vidage de cache
+    $trouver_table('');
+
+    // cas particulier spip_auteurs : retablir le collate binary sur le login
+    $desc = $trouver_table('spip_auteurs');
+    spip_log('spip_auteurs : ' . var_export($desc['field'], true), 'maj.' . _LOG_INFO_IMPORTANTE);
+    if (stripos($desc['field']['login'], 'BINARY') === false) {
+        spip_log('Retablir champ login BINARY sur table spip_auteurs', 'maj');
+        sql_alter('table spip_auteurs change login login VARCHAR(255) BINARY');
+        $trouver_table('');
+        $new_desc = $trouver_table('spip_auteurs');
+        spip_log('Apres conversion spip_auteurs : ' . var_export($new_desc['field'], true), 'maj.' . _LOG_INFO_IMPORTANTE);
+    }
+
+    foreach ($tables as $table) {
+        if (time() >= _TIME_OUT) {
+            return;
+        }
+        if ($desc = $trouver_table($table)) {
+            $desc_collate = _sqlite_remplacements_definitions_table($desc['field']);
+            if ($d = array_diff($desc['field'], $desc_collate)) {
+                spip_log("Table $table COLLATE incorrects", 'maj');
+
+                // cas particulier spip_urls :
+                // supprimer les doublons avant conversion sinon echec (on garde les urls les plus recentes)
+                if ($table == 'spip_urls') {
+                    // par date DESC pour conserver les urls les plus recentes
+                    $data = sql_allfetsel('*', 'spip_urls', '', '', 'date DESC');
+                    $urls = [];
+                    foreach ($data as $d) {
+                        $key = $d['id_parent'] . '::' . strtolower($d['url']);
+                        if (!isset($urls[$key])) {
+                            $urls[$key] = true;
+                        } else {
+                            spip_log(
+                                'Suppression doublon dans spip_urls avant conversion : ' . serialize($d),
+                                'maj.' . _LOG_INFO_IMPORTANTE
+                            );
+                            sql_delete('spip_urls', 'id_parent=' . sql_quote($d['id_parent']) . ' AND url=' . sql_quote($d['url']));
+                        }
+                    }
+                }
+                foreach ($desc['field'] as $field => $type) {
+                    if ($desc['field'][$field] !== $desc_collate[$field]) {
+                        spip_log("Conversion COLLATE table $table", 'maj.' . _LOG_INFO_IMPORTANTE);
+                        sql_alter("table $table change $field $field " . $desc_collate[$field]);
+                        $trouver_table('');
+                        $new_desc = $trouver_table($table);
+                        spip_log(
+                            "Apres conversion $table : " . var_export($new_desc['field'], true),
+                            'maj.' . _LOG_INFO_IMPORTANTE
+                        );
+                        continue 2; // inutile de continuer pour cette table : un seul alter remet tout a jour en sqlite
+                    }
+                }
+            }
+        }
+    }
+
+    // forcer le vidage de cache
+    $trouver_table('');
 }
 
 
 $GLOBALS['maj'][19236] = [
-	['sql_updateq', 'spip_meta', ['impt' => 'oui'], "nom='version_installee'"], // version base principale
-	['sql_updateq', 'spip_meta', ['impt' => 'oui'], "nom LIKE '%_base_version'"],  // version base plugins
-	['maj_collation_sqlite'],
+    ['sql_updateq', 'spip_meta', ['impt' => 'oui'], "nom='version_installee'"], // version base principale
+    ['sql_updateq', 'spip_meta', ['impt' => 'oui'], "nom LIKE '%_base_version'"],  // version base plugins
+    ['maj_collation_sqlite'],
 ];
 
 $GLOBALS['maj'][19268] = [
-	['supprimer_toutes_sessions'],
+    ['supprimer_toutes_sessions'],
 ];
 
 /**
@@ -342,13 +342,13 @@ 
  * Obligera tous les auteurs à se reconnecter !
  **/
 function supprimer_toutes_sessions() {
-	spip_log('supprimer sessions auteur');
-	if ($dir = opendir(_DIR_SESSIONS)) {
-		while (($f = readdir($dir)) !== false) {
-			spip_unlink(_DIR_SESSIONS . $f);
-			if (time() >= _TIME_OUT) {
-				return;
-			}
-		}
-	}
+    spip_log('supprimer sessions auteur');
+    if ($dir = opendir(_DIR_SESSIONS)) {
+        while (($f = readdir($dir)) !== false) {
+            spip_unlink(_DIR_SESSIONS . $f);
+            if (time() >= _TIME_OUT) {
+                return;
+            }
+        }
+    }
 }

ecrire/action/instituer_objet.php

Indentation +19 added lines, -19 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -29,24 +29,24 @@ 
  */
 function action_instituer_objet_dist($arg = null) {
 
-	if (is_null($arg)) {
-		$securiser_action = charger_fonction('securiser_action', 'inc');
-		$arg = $securiser_action();
-	}
+    if (is_null($arg)) {
+        $securiser_action = charger_fonction('securiser_action', 'inc');
+        $arg = $securiser_action();
+    }
 
-	[$objet, $id_objet, $statut] = preg_split('/\W/', $arg);
-	if (!$statut) {
-		$statut = _request('statut_nouv');
-	} // cas POST
-	if (!$statut) {
-		return;
-	} // impossible mais sait-on jamais
+    [$objet, $id_objet, $statut] = preg_split('/\W/', $arg);
+    if (!$statut) {
+        $statut = _request('statut_nouv');
+    } // cas POST
+    if (!$statut) {
+        return;
+    } // impossible mais sait-on jamais
 
-	if (
-		$id_objet = intval($id_objet)
-		and autoriser('instituer', $objet, $id_objet, '', ['statut' => $statut])
-	) {
-		include_spip('action/editer_objet');
-		objet_modifier($objet, $id_objet, ['statut' => $statut]);
-	}
+    if (
+        $id_objet = intval($id_objet)
+        and autoriser('instituer', $objet, $id_objet, '', ['statut' => $statut])
+    ) {
+        include_spip('action/editer_objet');
+        objet_modifier($objet, $id_objet, ['statut' => $statut]);
+    }
 }

ecrire/action/editer_liens.php

Indentation +574 added lines, -574 removed lines

@@ -29,7 +29,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // charger la gestion les rôles sur les objets
@@ -47,22 +47,22 @@ 
  *     - array(clé primaire, nom de la table de lien) si associable
  */
 function objet_associable($objet) {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$table_sql = table_objet_sql($objet);
-
-	$l = '';
-	if (
-		$primary = id_table_objet($objet)
-		and $trouver_table($l = $table_sql . '_liens', '', true, ['log_missing' => false])
-		and !preg_match(',[^\w],', $primary)
-		and !preg_match(',[^\w],', $l)
-	) {
-		return [$primary, $l];
-	}
-
-	spip_log("Objet $objet non associable : ne dispose pas d'une cle primaire $primary OU d'une table liens $l");
-
-	return false;
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $table_sql = table_objet_sql($objet);
+
+    $l = '';
+    if (
+        $primary = id_table_objet($objet)
+        and $trouver_table($l = $table_sql . '_liens', '', true, ['log_missing' => false])
+        and !preg_match(',[^\w],', $primary)
+        and !preg_match(',[^\w],', $l)
+    ) {
+        return [$primary, $l];
+    }
+
+    spip_log("Objet $objet non associable : ne dispose pas d'une cle primaire $primary OU d'une table liens $l");
+
+    return false;
 }
 
 /**
@@ -88,13 +88,13 @@ 
  * @return bool|int
  */
 function objet_associer($objets_source, $objets_lies, $qualif = null) {
-	$modifs = objet_traiter_liaisons('lien_insert', $objets_source, $objets_lies, $qualif);
+    $modifs = objet_traiter_liaisons('lien_insert', $objets_source, $objets_lies, $qualif);
 
-	if ($qualif) {
-		objet_qualifier_liens($objets_source, $objets_lies, $qualif);
-	}
+    if ($qualif) {
+        objet_qualifier_liens($objets_source, $objets_lies, $qualif);
+    }
 
-	return $modifs; // pas d'erreur
+    return $modifs; // pas d'erreur
 }
 
 
@@ -128,7 +128,7 @@ 
  * @return bool|int
  */
 function objet_dissocier($objets_source, $objets_lies, $cond = null) {
-	return objet_traiter_liaisons('lien_delete', $objets_source, $objets_lies, $cond);
+    return objet_traiter_liaisons('lien_delete', $objets_source, $objets_lies, $cond);
 }
 
 
@@ -153,7 +153,7 @@ 
  * @return bool|int
  */
 function objet_qualifier_liens($objets_source, $objets_lies, $qualif) {
-	return objet_traiter_liaisons('lien_set', $objets_source, $objets_lies, $qualif);
+    return objet_traiter_liaisons('lien_set', $objets_source, $objets_lies, $qualif);
 }
 
 
@@ -188,7 +188,7 @@ 
  *     Liste des trouvailles
  */
 function objet_trouver_liens($objets_source, $objets_lies, $cond = null) {
-	return objet_traiter_liaisons('lien_find', $objets_source, $objets_lies, $cond);
+    return objet_traiter_liaisons('lien_find', $objets_source, $objets_lies, $cond);
 }
 
 
@@ -212,8 +212,8 @@ 
  * @return int
  */
 function objet_optimiser_liens($objets_source, $objets_lies) {
-	spip_log('objet_optimiser_liens : ' . json_encode($objets_source, JSON_THROW_ON_ERROR) . ', ' . json_encode($objets_lies, JSON_THROW_ON_ERROR), 'genie' . _LOG_DEBUG);
-	return objet_traiter_liaisons('lien_optimise', $objets_source, $objets_lies);
+    spip_log('objet_optimiser_liens : ' . json_encode($objets_source, JSON_THROW_ON_ERROR) . ', ' . json_encode($objets_lies, JSON_THROW_ON_ERROR), 'genie' . _LOG_DEBUG);
+    return objet_traiter_liaisons('lien_optimise', $objets_source, $objets_lies);
 }
 
 
@@ -233,37 +233,37 @@ 
  *     Nombre de liens copiés
  */
 function objet_dupliquer_liens($objet, $id_source, $id_cible, $types = null, $exclure_types = null) {
-	include_spip('base/objets');
-	$tables = lister_tables_objets_sql();
-	$n = 0;
-	foreach ($tables as $table_sql => $infos) {
-		if (
-			(is_null($types) or in_array($infos['type'], $types))
-			and (is_null($exclure_types) or !in_array($infos['type'], $exclure_types))
-		) {
-			if (objet_associable($infos['type'])) {
-				$liens = (($infos['type'] == $objet) ?
-					objet_trouver_liens([$objet => $id_source], '*')
-					:
-					objet_trouver_liens([$infos['type'] => '*'], [$objet => $id_source]));
-				foreach ($liens as $lien) {
-					$n++;
-					if ($infos['type'] == $objet) {
-						if (
-							(is_null($types) or in_array($lien['objet'], $types))
-							and (is_null($exclure_types) or !in_array($lien['objet'], $exclure_types))
-						) {
-							objet_associer([$objet => $id_cible], [$lien['objet'] => $lien[$lien['objet']]], $lien);
-						}
-					} else {
-						objet_associer([$infos['type'] => $lien[$infos['type']]], [$objet => $id_cible], $lien);
-					}
-				}
-			}
-		}
-	}
-
-	return $n;
+    include_spip('base/objets');
+    $tables = lister_tables_objets_sql();
+    $n = 0;
+    foreach ($tables as $table_sql => $infos) {
+        if (
+            (is_null($types) or in_array($infos['type'], $types))
+            and (is_null($exclure_types) or !in_array($infos['type'], $exclure_types))
+        ) {
+            if (objet_associable($infos['type'])) {
+                $liens = (($infos['type'] == $objet) ?
+                    objet_trouver_liens([$objet => $id_source], '*')
+                    :
+                    objet_trouver_liens([$infos['type'] => '*'], [$objet => $id_source]));
+                foreach ($liens as $lien) {
+                    $n++;
+                    if ($infos['type'] == $objet) {
+                        if (
+                            (is_null($types) or in_array($lien['objet'], $types))
+                            and (is_null($exclure_types) or !in_array($lien['objet'], $exclure_types))
+                        ) {
+                            objet_associer([$objet => $id_cible], [$lien['objet'] => $lien[$lien['objet']]], $lien);
+                        }
+                    } else {
+                        objet_associer([$infos['type'] => $lien[$infos['type']]], [$objet => $id_cible], $lien);
+                    }
+                }
+            }
+        }
+    }
+
+    return $n;
 }
 
 /**
@@ -305,38 +305,38 @@ 
  * @return bool|int|array
  */
 function objet_traiter_liaisons($operation, $objets_source, $objets_lies, $set = null) {
-	// accepter une syntaxe minimale pour supprimer tous les liens
-	if ($objets_lies == '*') {
-		$objets_lies = ['*' => '*'];
-	}
-	$modifs = 0; // compter le nombre de modifications
-	$echec = null;
-	foreach ($objets_source as $objet => $ids) {
-		if ($a = objet_associable($objet)) {
-			[$primary, $l] = $a;
-			if (!is_array($ids)) {
-				$ids = [$ids];
-			} elseif (reset($ids) == 'NOT') {
-				// si on demande un array('NOT',...) => recuperer la liste d'ids correspondants
-				$where = lien_where($primary, $ids, '*', '*');
-				$ids = sql_allfetsel($primary, $l, $where);
-				$ids = array_map('reset', $ids);
-			}
-			foreach ($ids as $id) {
-				$res = $operation($objet, $primary, $l, $id, $objets_lies, $set);
-				if ($res === false) {
-					spip_log("objet_traiter_liaisons [Echec] : $operation sur $objet/$primary/$l/$id", _LOG_ERREUR);
-					$echec = true;
-				} else {
-					$modifs = ($modifs ? (is_array($res) ? array_merge($modifs, $res) : $modifs + $res) : $res);
-				}
-			}
-		} else {
-			$echec = true;
-		}
-	}
-
-	return ($echec ? false : $modifs); // pas d'erreur
+    // accepter une syntaxe minimale pour supprimer tous les liens
+    if ($objets_lies == '*') {
+        $objets_lies = ['*' => '*'];
+    }
+    $modifs = 0; // compter le nombre de modifications
+    $echec = null;
+    foreach ($objets_source as $objet => $ids) {
+        if ($a = objet_associable($objet)) {
+            [$primary, $l] = $a;
+            if (!is_array($ids)) {
+                $ids = [$ids];
+            } elseif (reset($ids) == 'NOT') {
+                // si on demande un array('NOT',...) => recuperer la liste d'ids correspondants
+                $where = lien_where($primary, $ids, '*', '*');
+                $ids = sql_allfetsel($primary, $l, $where);
+                $ids = array_map('reset', $ids);
+            }
+            foreach ($ids as $id) {
+                $res = $operation($objet, $primary, $l, $id, $objets_lies, $set);
+                if ($res === false) {
+                    spip_log("objet_traiter_liaisons [Echec] : $operation sur $objet/$primary/$l/$id", _LOG_ERREUR);
+                    $echec = true;
+                } else {
+                    $modifs = ($modifs ? (is_array($res) ? array_merge($modifs, $res) : $modifs + $res) : $res);
+                }
+            }
+        } else {
+            $echec = true;
+        }
+    }
+
+    return ($echec ? false : $modifs); // pas d'erreur
 }
 
 
@@ -365,117 +365,117 @@ 
  *     Nombre d'insertions faites, false si échec.
  */
 function lien_insert($objet_source, $primary, $table_lien, $id, $objets, $qualif) {
-	$ins = 0;
-	$echec = null;
-	if (is_null($qualif)) {
-		$qualif = [];
-	}
-
-	foreach ($objets as $objet => $id_objets) {
-		if (!is_array($id_objets)) {
-			$id_objets = [$id_objets];
-		}
-
-		// role, colonne, where par défaut
-		[$role, $colonne_role, $cond] =
-			roles_trouver_dans_qualif($objet_source, $objet, $qualif);
-
-		foreach ($id_objets as $id_objet) {
-			$objet = (($objet == '*') ? $objet : objet_type($objet)); # securite
-
-			$insertions = [
-				'id_objet' => $id_objet,
-				'objet' => $objet,
-				$primary => $id
-			];
-			// rôle en plus s'il est défini
-			if ($role) {
-				$insertions += [
-					$colonne_role => $role
-				];
-			}
-
-			if (lien_triables($table_lien)) {
-				if (isset($qualif['rang_lien'])) {
-					$rang = $qualif['rang_lien'];
-				}
-				else {
-					$where = lien_where($primary, $id, $objet, $id_objet);
-					// si il y a deja un lien pour ce couple (avec un autre role?) on reprend le meme rang si non nul
-					if (!$rang = intval(sql_getfetsel('rang_lien', $table_lien, $where))) {
-						$where = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet);
-						$rang = intval(sql_getfetsel('max(rang_lien)', $table_lien, $where));
-						// si aucun lien n'a de rang, on en introduit pas, on garde zero
-						if ($rang > 0) {
-							$rang = intval($rang) + 1;
-						}
-					}
-				}
-				$insertions['rang_lien'] = $rang;
-			}
-
-			$args = [
-				'table_lien' => $table_lien,
-				'objet_source' => $objet_source,
-				'id_objet_source' => $id,
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-				'role' => $role,
-				'colonne_role' => $colonne_role,
-				'action' => 'insert',
-			];
-
-			// Envoyer aux plugins
-			$insertions = pipeline(
-				'pre_edition_lien',
-				[
-					'args' => $args,
-					'data' => $insertions
-				]
-			);
-			$args['id_objet'] = $insertions['id_objet'];
-
-			$where = lien_where($primary, $id, $objet, $id_objet, $cond);
-
-			if (
-				($id_objet = intval($insertions['id_objet']) or in_array($objet, ['site', 'rubrique']))
-				and !sql_getfetsel($primary, $table_lien, $where)
-			) {
-				if (lien_triables($table_lien) and isset($insertions['rang_lien']) and intval($insertions['rang_lien'])) {
-					$where_meme_lien = lien_where($primary, $id, $objet, $id_objet);
-					$where_meme_lien = implode(' AND ', $where_meme_lien);
-					// on decale les liens de rang_lien>=la valeur inseree pour faire la place
-					// sauf sur le meme lien avec un role eventuellement different
-					$w = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet, ['rang_lien>=' . intval($insertions['rang_lien']), "NOT($where_meme_lien)"]);
-					sql_update($table_lien, ['rang_lien' => 'rang_lien+1'], $w);
-				}
-
-				$e = sql_insertq($table_lien, $insertions);
-				if ($e !== false) {
-					$ins++;
-					lien_propage_date_modif($objet, $id_objet);
-					lien_propage_date_modif($objet_source, $id);
-					// Envoyer aux plugins
-					pipeline(
-						'post_edition_lien',
-						[
-							'args' => $args,
-							'data' => $insertions
-						]
-					);
-				} else {
-					$echec = true;
-				}
-			}
-		}
-	}
-	// si on a fait des insertions, on reordonne les liens concernes
-	// pas la peine si $qualif['rang_lien'] etait fournie, on va passer dans lien_set a suivre et donc finir le recomptage
-	if ($ins > 0 and empty($qualif['rang_lien'])) {
-		lien_ordonner($objet_source, $primary, $table_lien, $id, $objets);
-	}
-
-	return ($echec ? false : $ins);
+    $ins = 0;
+    $echec = null;
+    if (is_null($qualif)) {
+        $qualif = [];
+    }
+
+    foreach ($objets as $objet => $id_objets) {
+        if (!is_array($id_objets)) {
+            $id_objets = [$id_objets];
+        }
+
+        // role, colonne, where par défaut
+        [$role, $colonne_role, $cond] =
+            roles_trouver_dans_qualif($objet_source, $objet, $qualif);
+
+        foreach ($id_objets as $id_objet) {
+            $objet = (($objet == '*') ? $objet : objet_type($objet)); # securite
+
+            $insertions = [
+                'id_objet' => $id_objet,
+                'objet' => $objet,
+                $primary => $id
+            ];
+            // rôle en plus s'il est défini
+            if ($role) {
+                $insertions += [
+                    $colonne_role => $role
+                ];
+            }
+
+            if (lien_triables($table_lien)) {
+                if (isset($qualif['rang_lien'])) {
+                    $rang = $qualif['rang_lien'];
+                }
+                else {
+                    $where = lien_where($primary, $id, $objet, $id_objet);
+                    // si il y a deja un lien pour ce couple (avec un autre role?) on reprend le meme rang si non nul
+                    if (!$rang = intval(sql_getfetsel('rang_lien', $table_lien, $where))) {
+                        $where = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet);
+                        $rang = intval(sql_getfetsel('max(rang_lien)', $table_lien, $where));
+                        // si aucun lien n'a de rang, on en introduit pas, on garde zero
+                        if ($rang > 0) {
+                            $rang = intval($rang) + 1;
+                        }
+                    }
+                }
+                $insertions['rang_lien'] = $rang;
+            }
+
+            $args = [
+                'table_lien' => $table_lien,
+                'objet_source' => $objet_source,
+                'id_objet_source' => $id,
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+                'role' => $role,
+                'colonne_role' => $colonne_role,
+                'action' => 'insert',
+            ];
+
+            // Envoyer aux plugins
+            $insertions = pipeline(
+                'pre_edition_lien',
+                [
+                    'args' => $args,
+                    'data' => $insertions
+                ]
+            );
+            $args['id_objet'] = $insertions['id_objet'];
+
+            $where = lien_where($primary, $id, $objet, $id_objet, $cond);
+
+            if (
+                ($id_objet = intval($insertions['id_objet']) or in_array($objet, ['site', 'rubrique']))
+                and !sql_getfetsel($primary, $table_lien, $where)
+            ) {
+                if (lien_triables($table_lien) and isset($insertions['rang_lien']) and intval($insertions['rang_lien'])) {
+                    $where_meme_lien = lien_where($primary, $id, $objet, $id_objet);
+                    $where_meme_lien = implode(' AND ', $where_meme_lien);
+                    // on decale les liens de rang_lien>=la valeur inseree pour faire la place
+                    // sauf sur le meme lien avec un role eventuellement different
+                    $w = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet, ['rang_lien>=' . intval($insertions['rang_lien']), "NOT($where_meme_lien)"]);
+                    sql_update($table_lien, ['rang_lien' => 'rang_lien+1'], $w);
+                }
+
+                $e = sql_insertq($table_lien, $insertions);
+                if ($e !== false) {
+                    $ins++;
+                    lien_propage_date_modif($objet, $id_objet);
+                    lien_propage_date_modif($objet_source, $id);
+                    // Envoyer aux plugins
+                    pipeline(
+                        'post_edition_lien',
+                        [
+                            'args' => $args,
+                            'data' => $insertions
+                        ]
+                    );
+                } else {
+                    $echec = true;
+                }
+            }
+        }
+    }
+    // si on a fait des insertions, on reordonne les liens concernes
+    // pas la peine si $qualif['rang_lien'] etait fournie, on va passer dans lien_set a suivre et donc finir le recomptage
+    if ($ins > 0 and empty($qualif['rang_lien'])) {
+        lien_ordonner($objet_source, $primary, $table_lien, $id, $objets);
+    }
+
+    return ($echec ? false : $ins);
 }
 
 
@@ -488,47 +488,47 @@ 
  * @param array|string $objets
  */
 function lien_ordonner($objet_source, $primary, $table_lien, $id, $objets) {
-	if (!lien_triables($table_lien)) {
-		return;
-	}
-
-	$deja_reordonne = [];
-
-	foreach ($objets as $objet => $id_objets) {
-		if (!is_array($id_objets)) {
-			$id_objets = [$id_objets];
-		}
-
-		foreach ($id_objets as $id_objet) {
-			if (empty($deja_reordonne[$id][$objet][$id_objet])) {
-				$objet = (($objet == '*') ? $objet : objet_type($objet)); # securite
-
-				$where = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet);
-				$liens = sql_allfetsel("$primary, id_objet, objet, rang_lien", $table_lien, $where, '', 'rang_lien');
-
-				$rangs = array_column($liens, 'rang_lien');
-				if (count($rangs) and (max($rangs) > 0 or min($rangs) < 0)) {
-					$rang = 1;
-					foreach ($liens as $lien) {
-						if (empty($deja_reordonne[$lien[$primary]][$lien['objet']][$lien['id_objet']])) {
-							$where = lien_where($primary, $lien[$primary], $lien['objet'], $lien['id_objet'], ['rang_lien!=' . intval($rang)]);
-							sql_updateq($table_lien, ['rang_lien' => $rang], $where);
-
-							if (empty($deja_reordonne[$lien[$primary]])) {
-								$deja_reordonne[$lien[$primary]] = [];
-							}
-							if (empty($deja_reordonne[$lien[$primary]][$lien['objet']])) {
-								$deja_reordonne[$lien[$primary]][$lien['objet']] = [];
-							}
-							$deja_reordonne[$lien[$primary]][$lien['objet']][$lien['id_objet']] = $rang;
-
-							$rang++;
-						}
-					}
-				}
-			}
-		}
-	}
+    if (!lien_triables($table_lien)) {
+        return;
+    }
+
+    $deja_reordonne = [];
+
+    foreach ($objets as $objet => $id_objets) {
+        if (!is_array($id_objets)) {
+            $id_objets = [$id_objets];
+        }
+
+        foreach ($id_objets as $id_objet) {
+            if (empty($deja_reordonne[$id][$objet][$id_objet])) {
+                $objet = (($objet == '*') ? $objet : objet_type($objet)); # securite
+
+                $where = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet);
+                $liens = sql_allfetsel("$primary, id_objet, objet, rang_lien", $table_lien, $where, '', 'rang_lien');
+
+                $rangs = array_column($liens, 'rang_lien');
+                if (count($rangs) and (max($rangs) > 0 or min($rangs) < 0)) {
+                    $rang = 1;
+                    foreach ($liens as $lien) {
+                        if (empty($deja_reordonne[$lien[$primary]][$lien['objet']][$lien['id_objet']])) {
+                            $where = lien_where($primary, $lien[$primary], $lien['objet'], $lien['id_objet'], ['rang_lien!=' . intval($rang)]);
+                            sql_updateq($table_lien, ['rang_lien' => $rang], $where);
+
+                            if (empty($deja_reordonne[$lien[$primary]])) {
+                                $deja_reordonne[$lien[$primary]] = [];
+                            }
+                            if (empty($deja_reordonne[$lien[$primary]][$lien['objet']])) {
+                                $deja_reordonne[$lien[$primary]][$lien['objet']] = [];
+                            }
+                            $deja_reordonne[$lien[$primary]][$lien['objet']][$lien['id_objet']] = $rang;
+
+                            $rang++;
+                        }
+                    }
+                }
+            }
+        }
+    }
 }
 
 
@@ -539,18 +539,18 @@ 
  * @return mixed
  */
 function lien_triables($table_lien) {
-	static $triables = [];
-	if (!isset($triables[$table_lien])) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$desc = $trouver_table($table_lien);
-		if ($desc and isset($desc['field']['rang_lien'])) {
-			$triables[$table_lien] = true;
-		}
-		else {
-			$triables[$table_lien] = false;
-		}
-	}
-	return $triables[$table_lien];
+    static $triables = [];
+    if (!isset($triables[$table_lien])) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $desc = $trouver_table($table_lien);
+        if ($desc and isset($desc['field']['rang_lien'])) {
+            $triables[$table_lien] = true;
+        }
+        else {
+            $triables[$table_lien] = false;
+        }
+    }
+    return $triables[$table_lien];
 }
 
 
@@ -566,52 +566,52 @@ 
  * @return array                        Liste des conditions
  */
 function lien_where($primary, $id_source, $objet, $id_objet, $cond = []) {
-	if (
-		(!is_array($id_source) and !strlen($id_source))
-		or !strlen($objet)
-		or (!is_array($id_objet) and !strlen($id_objet))
-	) {
-		return ['0=1'];
-	} // securite
-
-	$not = '';
-	if (is_array($id_source) and reset($id_source) == 'NOT') {
-		$not = array_shift($id_source);
-		$id_source = reset($id_source);
-	}
-
-	$where = $cond;
-
-	if ($id_source !== '*') {
-		$where[] = (is_array($id_source) ? sql_in(
-			addslashes($primary),
-			array_map('intval', $id_source),
-			$not
-		) : addslashes($primary) . ($not ? '<>' : '=') . intval($id_source));
-	} elseif ($not) {
-		$where[] = '0=1';
-	} // idiot mais quand meme
-
-	$not = '';
-	if (is_array($id_objet) and reset($id_objet) == 'NOT') {
-		$not = array_shift($id_objet);
-		$id_objet = reset($id_objet);
-	}
-
-	if ($objet !== '*') {
-		$where[] = 'objet=' . sql_quote($objet);
-	}
-	if ($id_objet !== '*') {
-		$where[] = (is_array($id_objet) ? sql_in(
-			'id_objet',
-			array_map('intval', $id_objet),
-			$not
-		) : 'id_objet' . ($not ? '<>' : '=') . intval($id_objet));
-	} elseif ($not) {
-		$where[] = '0=1';
-	} // idiot mais quand meme
-
-	return $where;
+    if (
+        (!is_array($id_source) and !strlen($id_source))
+        or !strlen($objet)
+        or (!is_array($id_objet) and !strlen($id_objet))
+    ) {
+        return ['0=1'];
+    } // securite
+
+    $not = '';
+    if (is_array($id_source) and reset($id_source) == 'NOT') {
+        $not = array_shift($id_source);
+        $id_source = reset($id_source);
+    }
+
+    $where = $cond;
+
+    if ($id_source !== '*') {
+        $where[] = (is_array($id_source) ? sql_in(
+            addslashes($primary),
+            array_map('intval', $id_source),
+            $not
+        ) : addslashes($primary) . ($not ? '<>' : '=') . intval($id_source));
+    } elseif ($not) {
+        $where[] = '0=1';
+    } // idiot mais quand meme
+
+    $not = '';
+    if (is_array($id_objet) and reset($id_objet) == 'NOT') {
+        $not = array_shift($id_objet);
+        $id_objet = reset($id_objet);
+    }
+
+    if ($objet !== '*') {
+        $where[] = 'objet=' . sql_quote($objet);
+    }
+    if ($id_objet !== '*') {
+        $where[] = (is_array($id_objet) ? sql_in(
+            'id_objet',
+            array_map('intval', $id_objet),
+            $not
+        ) : 'id_objet' . ($not ? '<>' : '=') . intval($id_objet));
+    } elseif ($not) {
+        $where[] = '0=1';
+    } // idiot mais quand meme
+
+    return $where;
 }
 
 /**
@@ -626,13 +626,13 @@ 
  */
 function lien_rang_where($table_lien, $primary, $id_source, $objet, $id_objet, $cond = []) {
 
-	// si on veut compter les rangs autrement que le core ne le fait par defaut, fournir le where adhoc
-	if (function_exists($f = 'lien_rang_where_' . $table_lien)) {
-		return $f($primary, $id_source, $objet, $id_objet, $cond);
-	}
+    // si on veut compter les rangs autrement que le core ne le fait par defaut, fournir le where adhoc
+    if (function_exists($f = 'lien_rang_where_' . $table_lien)) {
+        return $f($primary, $id_source, $objet, $id_objet, $cond);
+    }
 
-	// par defaut c'est un rang compté pour tous les id_source d'un couple objet-id_objet
-	return lien_where($primary, '*', $objet, $id_objet, $cond);
+    // par defaut c'est un rang compté pour tous les id_source d'un couple objet-id_objet
+    return lien_where($primary, '*', $objet, $id_objet, $cond);
 }
 
 /**
@@ -663,90 +663,90 @@ 
  */
 function lien_delete($objet_source, $primary, $table_lien, $id, $objets, $cond = null) {
 
-	$retire = [];
-	$dels = 0;
-	$echec = false;
-	if (is_null($cond)) {
-		$cond = [];
-	}
-
-	foreach ($objets as $objet => $id_objets) {
-		$objet = ($objet == '*') ? $objet : objet_type($objet); # securite
-		if (!is_array($id_objets) or reset($id_objets) == 'NOT') {
-			$id_objets = [$id_objets];
-		}
-		foreach ($id_objets as $id_objet) {
-			[$cond, $colonne_role, $role] = roles_creer_condition_role($objet_source, $objet, $cond);
-			// id_objet peut valoir '*'
-			$where = lien_where($primary, $id, $objet, $id_objet, $cond);
-
-			// lire les liens existants pour propager la date de modif
-			$select = "$primary,id_objet,objet";
-			if ($colonne_role) {
-				$select .= ",$colonne_role";
-			}
-			$liens = sql_allfetsel($select, $table_lien, $where);
-
-			// iterer sur les liens pour permettre aux plugins de gerer
-			foreach ($liens as $l) {
-				$args = [
-					'table_lien' => $table_lien,
-					'objet_source' => $objet_source,
-					'id_objet_source' => $l[$primary],
-					'objet' => $l['objet'],
-					'id_objet' => $l['id_objet'],
-					'colonne_role' => $colonne_role,
-					'role' => ($colonne_role ? $l[$colonne_role] : ''),
-					'action' => 'delete',
-				];
-
-				// Envoyer aux plugins
-				$l = pipeline(
-					'pre_edition_lien',
-					[
-						'args' => $args,
-						'data' => $l
-					]
-				);
-				$args['id_objet'] = $id_o = $l['id_objet'];
-
-				if ($id_o = intval($l['id_objet']) or in_array($l['objet'], ['site', 'rubrique'])) {
-					$where = lien_where($primary, $l[$primary], $l['objet'], $id_o, $cond);
-					$e = sql_delete($table_lien, $where);
-					if ($e !== false) {
-						$dels += $e;
-						lien_propage_date_modif($l['objet'], $id_o);
-						lien_propage_date_modif($objet_source, $l[$primary]);
-					} else {
-						$echec = true;
-					}
-					$retire[] = [
-						'source' => [$objet_source => $l[$primary]],
-						'lien' => [$l['objet'] => $id_o],
-						'type' => $l['objet'],
-						'role' => ($colonne_role ? $l[$colonne_role] : ''),
-						'id' => $id_o
-					];
-					// Envoyer aux plugins
-					pipeline(
-						'post_edition_lien',
-						[
-							'args' => $args,
-							'data' => $l
-						]
-					);
-				}
-			}
-		}
-	}
-	// si on a supprime des liens, on reordonne les liens concernes
-	if ($dels) {
-		lien_ordonner($objet_source, $primary, $table_lien, $id, $objets);
-	}
-
-	pipeline('trig_supprimer_objets_lies', $retire);
-
-	return ($echec ? false : $dels);
+    $retire = [];
+    $dels = 0;
+    $echec = false;
+    if (is_null($cond)) {
+        $cond = [];
+    }
+
+    foreach ($objets as $objet => $id_objets) {
+        $objet = ($objet == '*') ? $objet : objet_type($objet); # securite
+        if (!is_array($id_objets) or reset($id_objets) == 'NOT') {
+            $id_objets = [$id_objets];
+        }
+        foreach ($id_objets as $id_objet) {
+            [$cond, $colonne_role, $role] = roles_creer_condition_role($objet_source, $objet, $cond);
+            // id_objet peut valoir '*'
+            $where = lien_where($primary, $id, $objet, $id_objet, $cond);
+
+            // lire les liens existants pour propager la date de modif
+            $select = "$primary,id_objet,objet";
+            if ($colonne_role) {
+                $select .= ",$colonne_role";
+            }
+            $liens = sql_allfetsel($select, $table_lien, $where);
+
+            // iterer sur les liens pour permettre aux plugins de gerer
+            foreach ($liens as $l) {
+                $args = [
+                    'table_lien' => $table_lien,
+                    'objet_source' => $objet_source,
+                    'id_objet_source' => $l[$primary],
+                    'objet' => $l['objet'],
+                    'id_objet' => $l['id_objet'],
+                    'colonne_role' => $colonne_role,
+                    'role' => ($colonne_role ? $l[$colonne_role] : ''),
+                    'action' => 'delete',
+                ];
+
+                // Envoyer aux plugins
+                $l = pipeline(
+                    'pre_edition_lien',
+                    [
+                        'args' => $args,
+                        'data' => $l
+                    ]
+                );
+                $args['id_objet'] = $id_o = $l['id_objet'];
+
+                if ($id_o = intval($l['id_objet']) or in_array($l['objet'], ['site', 'rubrique'])) {
+                    $where = lien_where($primary, $l[$primary], $l['objet'], $id_o, $cond);
+                    $e = sql_delete($table_lien, $where);
+                    if ($e !== false) {
+                        $dels += $e;
+                        lien_propage_date_modif($l['objet'], $id_o);
+                        lien_propage_date_modif($objet_source, $l[$primary]);
+                    } else {
+                        $echec = true;
+                    }
+                    $retire[] = [
+                        'source' => [$objet_source => $l[$primary]],
+                        'lien' => [$l['objet'] => $id_o],
+                        'type' => $l['objet'],
+                        'role' => ($colonne_role ? $l[$colonne_role] : ''),
+                        'id' => $id_o
+                    ];
+                    // Envoyer aux plugins
+                    pipeline(
+                        'post_edition_lien',
+                        [
+                            'args' => $args,
+                            'data' => $l
+                        ]
+                    );
+                }
+            }
+        }
+    }
+    // si on a supprime des liens, on reordonne les liens concernes
+    if ($dels) {
+        lien_ordonner($objet_source, $primary, $table_lien, $id, $objets);
+    }
+
+    pipeline('trig_supprimer_objets_lies', $retire);
+
+    return ($echec ? false : $dels);
 }
 
 
@@ -769,67 +769,67 @@ 
  * @return bool|int
  */
 function lien_optimise($objet_source, $primary, $table_lien, $id, $objets) {
-	include_spip('genie/optimiser');
-	$echec = false;
-	$dels = 0;
-	foreach ($objets as $objet => $id_objets) {
-		$objet = ($objet == '*') ? $objet : objet_type($objet); # securite
-		if (!is_array($id_objets) or reset($id_objets) == 'NOT') {
-			$id_objets = [$id_objets];
-		}
-		foreach ($id_objets as $id_objet) {
-			$where = lien_where($primary, $id, $objet, $id_objet);
-			# les liens vers un objet inexistant
-			$r = sql_select('DISTINCT objet', $table_lien, $where);
-			while ($t = sql_fetch($r)) {
-				$type = $t['objet'];
-				$spip_table_objet = table_objet_sql($type);
-				$id_table_objet = id_table_objet($type);
-				$res = sql_select(
-					"L.$primary AS id,L.id_objet",
-					// la condition de jointure inclue L.objet='xxx' pour ne joindre que les bonnes lignes
-					// du coups toutes les lignes avec un autre objet ont un id_xxx=NULL puisque LEFT JOIN
-					// il faut les eliminier en repetant la condition dans le where L.objet='xxx'
-					"$table_lien AS L
+    include_spip('genie/optimiser');
+    $echec = false;
+    $dels = 0;
+    foreach ($objets as $objet => $id_objets) {
+        $objet = ($objet == '*') ? $objet : objet_type($objet); # securite
+        if (!is_array($id_objets) or reset($id_objets) == 'NOT') {
+            $id_objets = [$id_objets];
+        }
+        foreach ($id_objets as $id_objet) {
+            $where = lien_where($primary, $id, $objet, $id_objet);
+            # les liens vers un objet inexistant
+            $r = sql_select('DISTINCT objet', $table_lien, $where);
+            while ($t = sql_fetch($r)) {
+                $type = $t['objet'];
+                $spip_table_objet = table_objet_sql($type);
+                $id_table_objet = id_table_objet($type);
+                $res = sql_select(
+                    "L.$primary AS id,L.id_objet",
+                    // la condition de jointure inclue L.objet='xxx' pour ne joindre que les bonnes lignes
+                    // du coups toutes les lignes avec un autre objet ont un id_xxx=NULL puisque LEFT JOIN
+                    // il faut les eliminier en repetant la condition dans le where L.objet='xxx'
+                    "$table_lien AS L
 									LEFT JOIN $spip_table_objet AS O
 										ON (O.$id_table_objet=L.id_objet AND L.objet=" . sql_quote($type) . ')',
-					'L.objet=' . sql_quote($type) . " AND O.$id_table_objet IS NULL"
-				);
-				// sur une cle primaire composee, pas d'autres solutions que de virer un a un
-				while ($row = sql_fetch($res)) {
-					if ($primary === 'id_document' and in_array($type, ['site', 'rubrique']) and !intval($row['id_objet'])) {
-						continue; // gaffe, c'est le logo du site ou des rubriques!
-					}
-					$e = sql_delete(
-						$table_lien,
-						["$primary=" . $row['id'], 'id_objet=' . $row['id_objet'], 'objet=' . sql_quote($type)]
-					);
-					if ($e != false) {
-						$dels += $e;
-						spip_log(
-							'lien_optimise: Entree ' . $row['id'] . '/' . $row['id_objet'] . "/$type supprimee dans la table $table_lien",
-							'genie' . _LOG_INFO_IMPORTANTE
-						);
-					}
-				}
-			}
-
-			# les liens depuis un objet inexistant
-			$table_source = table_objet_sql($objet_source);
-			// filtrer selon $id, $objet, $id_objet eventuellement fournis
-			// (en general '*' pour chaque)
-			$where = lien_where("L.$primary", $id, $objet, $id_objet);
-			$where[] = "O.$primary IS NULL";
-			$res = sql_select(
-				"L.$primary AS id",
-				"$table_lien AS L LEFT JOIN $table_source AS O ON L.$primary=O.$primary",
-				$where
-			);
-			$dels += optimiser_sansref($table_lien, $primary, $res);
-		}
-	}
-
-	return ($echec ? false : $dels);
+                    'L.objet=' . sql_quote($type) . " AND O.$id_table_objet IS NULL"
+                );
+                // sur une cle primaire composee, pas d'autres solutions que de virer un a un
+                while ($row = sql_fetch($res)) {
+                    if ($primary === 'id_document' and in_array($type, ['site', 'rubrique']) and !intval($row['id_objet'])) {
+                        continue; // gaffe, c'est le logo du site ou des rubriques!
+                    }
+                    $e = sql_delete(
+                        $table_lien,
+                        ["$primary=" . $row['id'], 'id_objet=' . $row['id_objet'], 'objet=' . sql_quote($type)]
+                    );
+                    if ($e != false) {
+                        $dels += $e;
+                        spip_log(
+                            'lien_optimise: Entree ' . $row['id'] . '/' . $row['id_objet'] . "/$type supprimee dans la table $table_lien",
+                            'genie' . _LOG_INFO_IMPORTANTE
+                        );
+                    }
+                }
+            }
+
+            # les liens depuis un objet inexistant
+            $table_source = table_objet_sql($objet_source);
+            // filtrer selon $id, $objet, $id_objet eventuellement fournis
+            // (en general '*' pour chaque)
+            $where = lien_where("L.$primary", $id, $objet, $id_objet);
+            $where[] = "O.$primary IS NULL";
+            $res = sql_select(
+                "L.$primary AS id",
+                "$table_lien AS L LEFT JOIN $table_source AS O ON L.$primary=O.$primary",
+                $where
+            );
+            $dels += optimiser_sansref($table_lien, $primary, $res);
+        }
+    }
+
+    return ($echec ? false : $dels);
 }
 
 
@@ -861,92 +861,92 @@ 
  *     Nombre de modifications faites, false si échec.
  */
 function lien_set($objet_source, $primary, $table_lien, $id, $objets, $qualif) {
-	$echec = null;
-	$ok = 0;
-	$reordonner = false;
-	if (!$qualif) {
-		return false;
-	}
-	// nettoyer qualif qui peut venir directement d'un objet_trouver_lien :
-	unset($qualif[$primary]);
-	unset($qualif[$objet_source]);
-	if (isset($qualif['objet'])) {
-		unset($qualif[$qualif['objet']]);
-	}
-	unset($qualif['objet']);
-	unset($qualif['id_objet']);
-	foreach ($objets as $objet => $id_objets) {
-		// role, colonne, where par défaut
-		[$role, $colonne_role, $cond] =
-			roles_trouver_dans_qualif($objet_source, $objet, $qualif);
-
-		$objet = ($objet == '*') ? $objet : objet_type($objet); # securite
-		if (!is_array($id_objets) or reset($id_objets) == 'NOT') {
-			$id_objets = [$id_objets];
-		}
-		foreach ($id_objets as $id_objet) {
-			$args = [
-				'table_lien' => $table_lien,
-				'objet_source' => $objet_source,
-				'id_objet_source' => $id,
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-				'role' => $role,
-				'colonne_role' => $colonne_role,
-				'action' => 'modifier',
-			];
-
-			// Envoyer aux plugins
-			$qualif = pipeline(
-				'pre_edition_lien',
-				[
-					'args' => $args,
-					'data' => $qualif,
-				]
-			);
-			$args['id_objet'] = $id_objet;
-
-			if (lien_triables($table_lien) and isset($qualif['rang_lien'])) {
-				if (intval($qualif['rang_lien'])) {
-					// on decale les liens de rang_lien>=la valeur inseree pour faire la place
-					// sauf sur le meme lien avec un role eventuellement different
-					$where_meme_lien = lien_where($primary, $id, $objet, $id_objet);
-					$where_meme_lien = implode(' AND ', $where_meme_lien);
-					$w = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet, ['rang_lien>=' . intval($qualif['rang_lien']), "NOT($where_meme_lien)"]);
-					sql_update($table_lien, ['rang_lien' => 'rang_lien+1'], $w);
-				}
-				// tous les liens de même rôle recoivent le rang indiqué aussi
-				if (roles_colonne($objet_source, $objet)) {
-					$w = lien_where($primary, $id, $objet, $id_objet);
-					sql_updateq($table_lien, ['rang_lien' => intval($qualif['rang_lien'])], $w);
-				}
-				$reordonner = true;
-			}
-
-			$where = lien_where($primary, $id, $objet, $id_objet, $cond);
-			$e = sql_updateq($table_lien, $qualif, $where);
-
-			if ($e === false) {
-				$echec = true;
-			} else {
-				// Envoyer aux plugins
-				pipeline(
-					'post_edition_lien',
-					[
-						'args' => $args,
-						'data' => $qualif
-					]
-				);
-				$ok++;
-			}
-		}
-	}
-	// si on a fait des modif de rang, on reordonne les liens concernes
-	if ($reordonner) {
-		lien_ordonner($objet_source, $primary, $table_lien, $id, $objets);
-	}
-
-	return ($echec ? false : $ok);
+    $echec = null;
+    $ok = 0;
+    $reordonner = false;
+    if (!$qualif) {
+        return false;
+    }
+    // nettoyer qualif qui peut venir directement d'un objet_trouver_lien :
+    unset($qualif[$primary]);
+    unset($qualif[$objet_source]);
+    if (isset($qualif['objet'])) {
+        unset($qualif[$qualif['objet']]);
+    }
+    unset($qualif['objet']);
+    unset($qualif['id_objet']);
+    foreach ($objets as $objet => $id_objets) {
+        // role, colonne, where par défaut
+        [$role, $colonne_role, $cond] =
+            roles_trouver_dans_qualif($objet_source, $objet, $qualif);
+
+        $objet = ($objet == '*') ? $objet : objet_type($objet); # securite
+        if (!is_array($id_objets) or reset($id_objets) == 'NOT') {
+            $id_objets = [$id_objets];
+        }
+        foreach ($id_objets as $id_objet) {
+            $args = [
+                'table_lien' => $table_lien,
+                'objet_source' => $objet_source,
+                'id_objet_source' => $id,
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+                'role' => $role,
+                'colonne_role' => $colonne_role,
+                'action' => 'modifier',
+            ];
+
+            // Envoyer aux plugins
+            $qualif = pipeline(
+                'pre_edition_lien',
+                [
+                    'args' => $args,
+                    'data' => $qualif,
+                ]
+            );
+            $args['id_objet'] = $id_objet;
+
+            if (lien_triables($table_lien) and isset($qualif['rang_lien'])) {
+                if (intval($qualif['rang_lien'])) {
+                    // on decale les liens de rang_lien>=la valeur inseree pour faire la place
+                    // sauf sur le meme lien avec un role eventuellement different
+                    $where_meme_lien = lien_where($primary, $id, $objet, $id_objet);
+                    $where_meme_lien = implode(' AND ', $where_meme_lien);
+                    $w = lien_rang_where($table_lien, $primary, $id, $objet, $id_objet, ['rang_lien>=' . intval($qualif['rang_lien']), "NOT($where_meme_lien)"]);
+                    sql_update($table_lien, ['rang_lien' => 'rang_lien+1'], $w);
+                }
+                // tous les liens de même rôle recoivent le rang indiqué aussi
+                if (roles_colonne($objet_source, $objet)) {
+                    $w = lien_where($primary, $id, $objet, $id_objet);
+                    sql_updateq($table_lien, ['rang_lien' => intval($qualif['rang_lien'])], $w);
+                }
+                $reordonner = true;
+            }
+
+            $where = lien_where($primary, $id, $objet, $id_objet, $cond);
+            $e = sql_updateq($table_lien, $qualif, $where);
+
+            if ($e === false) {
+                $echec = true;
+            } else {
+                // Envoyer aux plugins
+                pipeline(
+                    'post_edition_lien',
+                    [
+                        'args' => $args,
+                        'data' => $qualif
+                    ]
+                );
+                $ok++;
+            }
+        }
+    }
+    // si on a fait des modif de rang, on reordonne les liens concernes
+    if ($reordonner) {
+        lien_ordonner($objet_source, $primary, $table_lien, $id, $objets);
+    }
+
+    return ($echec ? false : $ok);
 }
 
 /**
@@ -976,23 +976,23 @@ 
  * @return array
  */
 function lien_find($objet_source, $primary, $table_lien, $id, $objets, $cond = null) {
-	$trouve = [];
-	foreach ($objets as $objet => $id_objets) {
-		$objet = ($objet == '*') ? $objet : objet_type($objet); # securite
-		// gerer les roles s'il y en a dans $cond
-		[$cond] = roles_creer_condition_role($objet_source, $objet, $cond, true);
-		// lien_where prend en charge les $id_objets sous forme int ou array
-		$where = lien_where($primary, $id, $objet, $id_objets, $cond);
-		$liens = sql_allfetsel('*', $table_lien, $where);
-		// ajouter les entrees objet_source et objet cible par convenance
-		foreach ($liens as $l) {
-			$l[$objet_source] = $l[$primary];
-			$l[$l['objet']] = $l['id_objet'];
-			$trouve[] = $l;
-		}
-	}
-
-	return $trouve;
+    $trouve = [];
+    foreach ($objets as $objet => $id_objets) {
+        $objet = ($objet == '*') ? $objet : objet_type($objet); # securite
+        // gerer les roles s'il y en a dans $cond
+        [$cond] = roles_creer_condition_role($objet_source, $objet, $cond, true);
+        // lien_where prend en charge les $id_objets sous forme int ou array
+        $where = lien_where($primary, $id, $objet, $id_objets, $cond);
+        $liens = sql_allfetsel('*', $table_lien, $where);
+        // ajouter les entrees objet_source et objet cible par convenance
+        foreach ($liens as $l) {
+            $l[$objet_source] = $l[$primary];
+            $l[$l['objet']] = $l['id_objet'];
+            $trouve[] = $l;
+        }
+    }
+
+    return $trouve;
 }
 
 /**
@@ -1003,26 +1003,26 @@ 
  * @param array|int $ids
  */
 function lien_propage_date_modif($objet, $ids) {
-	static $done = [];
-	$hash = md5($objet . serialize($ids));
-
-	// sql_updateq, peut être un rien lent.
-	// On évite de l'appeler 2 fois sur les mêmes choses
-	if (isset($done[$hash])) {
-		return;
-	}
-
-	$trouver_table = charger_fonction('trouver_table', 'base');
-
-	$table = table_objet_sql($objet);
-	if (
-		$desc = $trouver_table($table)
-		and isset($desc['field']['date_modif'])
-	) {
-		$primary = id_table_objet($objet);
-		$where = (is_array($ids) ? sql_in($primary, array_map('intval', $ids)) : "$primary=" . intval($ids));
-		sql_updateq($table, ['date_modif' => date('Y-m-d H:i:s')], $where);
-	}
-
-	$done[$hash] = true;
+    static $done = [];
+    $hash = md5($objet . serialize($ids));
+
+    // sql_updateq, peut être un rien lent.
+    // On évite de l'appeler 2 fois sur les mêmes choses
+    if (isset($done[$hash])) {
+        return;
+    }
+
+    $trouver_table = charger_fonction('trouver_table', 'base');
+
+    $table = table_objet_sql($objet);
+    if (
+        $desc = $trouver_table($table)
+        and isset($desc['field']['date_modif'])
+    ) {
+        $primary = id_table_objet($objet);
+        $where = (is_array($ids) ? sql_in($primary, array_map('intval', $ids)) : "$primary=" . intval($ids));
+        sql_updateq($table, ['date_modif' => date('Y-m-d H:i:s')], $where);
+    }
+
+    $done[$hash] = true;
 }

ecrire/action/instituer_langue_rubrique.php

Indentation +35 added lines, -35 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,41 +25,41 @@ 
  **/
 function action_instituer_langue_rubrique_dist() {
 
-	$securiser_action = charger_fonction('securiser_action', 'inc');
-	$arg = $securiser_action();
-	$changer_lang = _request('changer_lang');
+    $securiser_action = charger_fonction('securiser_action', 'inc');
+    $arg = $securiser_action();
+    $changer_lang = _request('changer_lang');
 
-	[$id_rubrique, $id_parent] = preg_split('/\W/', $arg);
+    [$id_rubrique, $id_parent] = preg_split('/\W/', $arg);
 
-	if (
-		$changer_lang
-		and $id_rubrique > 0
-		and $GLOBALS['meta']['multi_rubriques'] == 'oui'
-		and ($GLOBALS['meta']['multi_secteurs'] == 'non' or $id_parent == 0)
-	) {
-		if ($changer_lang != 'herit') {
-			sql_updateq(
-				'spip_rubriques',
-				['lang' => $changer_lang, 'langue_choisie' => 'oui'],
-				"id_rubrique=$id_rubrique"
-			);
-		} else {
-			if ($id_parent == 0) {
-				$langue_parent = $GLOBALS['meta']['langue_site'];
-			} else {
-				$langue_parent = sql_getfetsel('lang', 'spip_rubriques', "id_rubrique=$id_parent");
-			}
-			sql_updateq(
-				'spip_rubriques',
-				['lang' => $langue_parent, 'langue_choisie' => 'non'],
-				"id_rubrique=$id_rubrique"
-			);
-		}
-		include_spip('inc/rubriques');
-		calculer_langues_rubriques();
+    if (
+        $changer_lang
+        and $id_rubrique > 0
+        and $GLOBALS['meta']['multi_rubriques'] == 'oui'
+        and ($GLOBALS['meta']['multi_secteurs'] == 'non' or $id_parent == 0)
+    ) {
+        if ($changer_lang != 'herit') {
+            sql_updateq(
+                'spip_rubriques',
+                ['lang' => $changer_lang, 'langue_choisie' => 'oui'],
+                "id_rubrique=$id_rubrique"
+            );
+        } else {
+            if ($id_parent == 0) {
+                $langue_parent = $GLOBALS['meta']['langue_site'];
+            } else {
+                $langue_parent = sql_getfetsel('lang', 'spip_rubriques', "id_rubrique=$id_parent");
+            }
+            sql_updateq(
+                'spip_rubriques',
+                ['lang' => $langue_parent, 'langue_choisie' => 'non'],
+                "id_rubrique=$id_rubrique"
+            );
+        }
+        include_spip('inc/rubriques');
+        calculer_langues_rubriques();
 
-		// invalider les caches marques de cette rubrique
-		include_spip('inc/invalideur');
-		suivre_invalideur("id='rubrique/$id_rubrique'");
-	}
+        // invalider les caches marques de cette rubrique
+        include_spip('inc/invalideur');
+        suivre_invalideur("id='rubrique/$id_rubrique'");
+    }
 }