spip / SPIP

ecrire/action/inscrire_auteur.php

Indentation +236 added lines, -236 removed lines

@@ -21,7 +21,7 @@ 
 
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -44,70 +44,70 @@ 
  * @return array|string
  */
 function action_inscrire_auteur_dist($statut, $mail_complet, $nom, $options = []) {
-	if (!is_array($options)) {
-		$options = ['id' => $options];
-	}
-
-	if (function_exists('test_inscription')) {
-		$f = 'test_inscription';
-	} else {
-		$f = 'test_inscription_dist';
-	}
-	$desc = $f($statut, $mail_complet, $nom, $options);
-
-	// erreur ?
-	if (!is_array($desc)) {
-		return _T($desc);
-	}
-
-	include_spip('base/abstract_sql');
-	$res = sql_select('statut, id_auteur, login, email, nom', 'spip_auteurs', 'email=' . sql_quote($desc['email']));
-	// erreur ?
-	if (!$res) {
-		return _T('titre_probleme_technique');
-	}
-
-	$row = sql_fetch($res);
-	sql_free($res);
-	if ($row) {
-		if (isset($options['force_nouveau']) and $options['force_nouveau'] == true) {
-			$desc['id_auteur'] = $row['id_auteur'];
-			$desc = inscription_nouveau($desc);
-		} else {
-			$desc = $row;
-		}
-	} else // s'il n'existe pas deja, creer les identifiants
-	{
-		$desc = inscription_nouveau($desc);
-	}
-
-	// erreur ?
-	if (!is_array($desc)) {
-		return $desc;
-	}
-
-
-	// generer le mot de passe (ou le refaire si compte inutilise)
-	$desc['pass'] = creer_pass_pour_auteur($desc['id_auteur']);
-
-	// attribuer un jeton pour confirmation par clic sur un lien
-	$desc['jeton'] = auteur_attribuer_jeton($desc['id_auteur']);
-
-	// charger de suite cette fonction, pour ses utilitaires
-	$envoyer_inscription = charger_fonction('envoyer_inscription', '');
-	[$sujet, $msg, $from, $head] = $envoyer_inscription($desc, $nom, $statut, $options);
-
-	$notifications = charger_fonction('notifications', 'inc');
-	notifications_envoyer_mails($mail_complet, $msg, $sujet, $from, $head);
-
-	// Notifications
-	$notifications(
-		'inscription',
-		$desc['id_auteur'],
-		['nom' => $desc['nom'], 'email' => $desc['email']]
-	);
-
-	return $desc;
+    if (!is_array($options)) {
+        $options = ['id' => $options];
+    }
+
+    if (function_exists('test_inscription')) {
+        $f = 'test_inscription';
+    } else {
+        $f = 'test_inscription_dist';
+    }
+    $desc = $f($statut, $mail_complet, $nom, $options);
+
+    // erreur ?
+    if (!is_array($desc)) {
+        return _T($desc);
+    }
+
+    include_spip('base/abstract_sql');
+    $res = sql_select('statut, id_auteur, login, email, nom', 'spip_auteurs', 'email=' . sql_quote($desc['email']));
+    // erreur ?
+    if (!$res) {
+        return _T('titre_probleme_technique');
+    }
+
+    $row = sql_fetch($res);
+    sql_free($res);
+    if ($row) {
+        if (isset($options['force_nouveau']) and $options['force_nouveau'] == true) {
+            $desc['id_auteur'] = $row['id_auteur'];
+            $desc = inscription_nouveau($desc);
+        } else {
+            $desc = $row;
+        }
+    } else // s'il n'existe pas deja, creer les identifiants
+    {
+        $desc = inscription_nouveau($desc);
+    }
+
+    // erreur ?
+    if (!is_array($desc)) {
+        return $desc;
+    }
+
+
+    // generer le mot de passe (ou le refaire si compte inutilise)
+    $desc['pass'] = creer_pass_pour_auteur($desc['id_auteur']);
+
+    // attribuer un jeton pour confirmation par clic sur un lien
+    $desc['jeton'] = auteur_attribuer_jeton($desc['id_auteur']);
+
+    // charger de suite cette fonction, pour ses utilitaires
+    $envoyer_inscription = charger_fonction('envoyer_inscription', '');
+    [$sujet, $msg, $from, $head] = $envoyer_inscription($desc, $nom, $statut, $options);
+
+    $notifications = charger_fonction('notifications', 'inc');
+    notifications_envoyer_mails($mail_complet, $msg, $sujet, $from, $head);
+
+    // Notifications
+    $notifications(
+        'inscription',
+        $desc['id_auteur'],
+        ['nom' => $desc['nom'], 'email' => $desc['email']]
+    );
+
+    return $desc;
 }
 
 
@@ -130,23 +130,23 @@ 
  *
  */
 function test_inscription_dist($statut, $mail, $nom, $options) {
-	include_spip('inc/filtres');
-	if (!$r = email_valide($mail)) {
-		return 'info_email_invalide';
-	}
-	$nom = trim(corriger_caracteres($nom));
-	$res = ['email' => $r, 'nom' => $nom, 'prefs' => $statut];
-	if (isset($options['login'])) {
-		$login = trim(corriger_caracteres($options['login']));
-		if ((strlen($login) >= _LOGIN_TROP_COURT) and (strlen($nom) <= 64)) {
-			$res['login'] = $login;
-		}
-	}
-	if (!isset($res['login']) and ((strlen($nom) < _LOGIN_TROP_COURT) or (strlen($nom) > 64))) {
-		return 'ecrire:info_login_trop_court';
-	}
-
-	return $res;
+    include_spip('inc/filtres');
+    if (!$r = email_valide($mail)) {
+        return 'info_email_invalide';
+    }
+    $nom = trim(corriger_caracteres($nom));
+    $res = ['email' => $r, 'nom' => $nom, 'prefs' => $statut];
+    if (isset($options['login'])) {
+        $login = trim(corriger_caracteres($options['login']));
+        if ((strlen($login) >= _LOGIN_TROP_COURT) and (strlen($nom) <= 64)) {
+            $res['login'] = $login;
+        }
+    }
+    if (!isset($res['login']) and ((strlen($nom) < _LOGIN_TROP_COURT) or (strlen($nom) > 64))) {
+        return 'ecrire:info_login_trop_court';
+    }
+
+    return $res;
 }
 
 
@@ -159,33 +159,33 @@ 
  * @return mixed|string
  */
 function inscription_nouveau($desc) {
-	if (!isset($desc['login']) or !strlen($desc['login'])) {
-		$desc['login'] = test_login($desc['nom'], $desc['email']);
-	}
+    if (!isset($desc['login']) or !strlen($desc['login'])) {
+        $desc['login'] = test_login($desc['nom'], $desc['email']);
+    }
 
-	$desc['statut'] = 'nouveau';
-	include_spip('action/editer_auteur');
-	if (isset($desc['id_auteur'])) {
-		$id_auteur = $desc['id_auteur'];
-	} else {
-		$id_auteur = auteur_inserer();
-	}
+    $desc['statut'] = 'nouveau';
+    include_spip('action/editer_auteur');
+    if (isset($desc['id_auteur'])) {
+        $id_auteur = $desc['id_auteur'];
+    } else {
+        $id_auteur = auteur_inserer();
+    }
 
-	if (!$id_auteur) {
-		return _T('titre_probleme_technique');
-	}
+    if (!$id_auteur) {
+        return _T('titre_probleme_technique');
+    }
 
-	$desc['lang'] = $GLOBALS['spip_lang'];
+    $desc['lang'] = $GLOBALS['spip_lang'];
 
-	include_spip('inc/autoriser');
-	// lever l'autorisation pour pouvoir modifier le statut
-	autoriser_exception('modifier', 'auteur', $id_auteur);
-	auteur_modifier($id_auteur, $desc);
-	autoriser_exception('modifier', 'auteur', $id_auteur, false);
+    include_spip('inc/autoriser');
+    // lever l'autorisation pour pouvoir modifier le statut
+    autoriser_exception('modifier', 'auteur', $id_auteur);
+    auteur_modifier($id_auteur, $desc);
+    autoriser_exception('modifier', 'auteur', $id_auteur, false);
 
-	$desc['id_auteur'] = $id_auteur;
+    $desc['id_auteur'] = $id_auteur;
 
-	return $desc;
+    return $desc;
 }
 
 
@@ -202,27 +202,27 @@ 
  * @return string
  */
 function test_login($nom, $mail) {
-	include_spip('inc/charsets');
-	$nom = strtolower(translitteration($nom));
-	$login_base = preg_replace('/[^\w\d_]/', '_', $nom);
-
-	// il faut eviter que le login soit vraiment trop court
-	if (strlen($login_base) < 3) {
-		$mail = strtolower(translitteration(preg_replace('/@.*/', '', $mail)));
-		$login_base = preg_replace('/[^\w\d]/', '_', $mail);
-	}
-	if (strlen($login_base) < 3) {
-		$login_base = 'user';
-	}
-
-	$login = $login_base;
-
-	for ($i = 1;; $i++) {
-		if (!sql_countsel('spip_auteurs', "login='$login'")) {
-			return $login;
-		}
-		$login = $login_base . $i;
-	}
+    include_spip('inc/charsets');
+    $nom = strtolower(translitteration($nom));
+    $login_base = preg_replace('/[^\w\d_]/', '_', $nom);
+
+    // il faut eviter que le login soit vraiment trop court
+    if (strlen($login_base) < 3) {
+        $mail = strtolower(translitteration(preg_replace('/@.*/', '', $mail)));
+        $login_base = preg_replace('/[^\w\d]/', '_', $mail);
+    }
+    if (strlen($login_base) < 3) {
+        $login_base = 'user';
+    }
+
+    $login = $login_base;
+
+    for ($i = 1;; $i++) {
+        if (!sql_countsel('spip_auteurs', "login='$login'")) {
+            return $login;
+        }
+        $login = $login_base . $i;
+    }
 }
 
 
@@ -240,26 +240,26 @@ 
  */
 function envoyer_inscription_dist($desc, $nom, $mode, $options = []) {
 
-	$contexte = array_merge($desc, $options);
-	$contexte['nom'] = $nom;
-	$contexte['mode'] = $mode;
-	$contexte['url_confirm'] = generer_url_action('confirmer_inscription', '', true, true);
-	$contexte['url_confirm'] = parametre_url($contexte['url_confirm'], 'email', $desc['email']);
-	$contexte['url_confirm'] = parametre_url($contexte['url_confirm'], 'jeton', $desc['jeton']);
-	// S'il y a l'option redirect, on l'ajoute directement ici
-	if (isset($options['redirect'])) {
-		$contexte['url_confirm'] = parametre_url($contexte['url_confirm'], 'redirect', $options['redirect']);
-	}
-
-	$modele_mail = 'modeles/mail_inscription';
-	if (isset($options['modele_mail']) and $options['modele_mail']) {
-		$modele_mail = $options['modele_mail'];
-	}
-	$message = recuperer_fond($modele_mail, $contexte);
-	$from = ($options['from'] ?? '');
-	$head = '';
-
-	return ['', $message, $from, $head];
+    $contexte = array_merge($desc, $options);
+    $contexte['nom'] = $nom;
+    $contexte['mode'] = $mode;
+    $contexte['url_confirm'] = generer_url_action('confirmer_inscription', '', true, true);
+    $contexte['url_confirm'] = parametre_url($contexte['url_confirm'], 'email', $desc['email']);
+    $contexte['url_confirm'] = parametre_url($contexte['url_confirm'], 'jeton', $desc['jeton']);
+    // S'il y a l'option redirect, on l'ajoute directement ici
+    if (isset($options['redirect'])) {
+        $contexte['url_confirm'] = parametre_url($contexte['url_confirm'], 'redirect', $options['redirect']);
+    }
+
+    $modele_mail = 'modeles/mail_inscription';
+    if (isset($options['modele_mail']) and $options['modele_mail']) {
+        $modele_mail = $options['modele_mail'];
+    }
+    $message = recuperer_fond($modele_mail, $contexte);
+    $from = ($options['from'] ?? '');
+    $head = '';
+
+    return ['', $message, $from, $head];
 }
 
 
@@ -270,12 +270,12 @@ 
  * @return string
  */
 function creer_pass_pour_auteur($id_auteur) {
-	include_spip('inc/acces');
-	$pass = creer_pass_aleatoire(max(_PASS_LONGUEUR_MINI, 16), $id_auteur);
-	include_spip('action/editer_auteur');
-	auteur_instituer($id_auteur, ['pass' => $pass]);
+    include_spip('inc/acces');
+    $pass = creer_pass_aleatoire(max(_PASS_LONGUEUR_MINI, 16), $id_auteur);
+    include_spip('action/editer_auteur');
+    auteur_instituer($id_auteur, ['pass' => $pass]);
 
-	return $pass;
+    return $pass;
 }
 
 /**
@@ -288,17 +288,17 @@ 
  * @return string
  */
 function tester_statut_inscription($statut_tmp, $id) {
-	include_spip('inc/autoriser');
-	if ($statut_tmp) {
-		return autoriser('inscrireauteur', $statut_tmp, $id) ? $statut_tmp : '';
-	} elseif (
-		autoriser('inscrireauteur', $statut_tmp = '1comite', $id)
-		or autoriser('inscrireauteur', $statut_tmp = '6forum', $id)
-	) {
-		return $statut_tmp;
-	}
-
-	return '';
+    include_spip('inc/autoriser');
+    if ($statut_tmp) {
+        return autoriser('inscrireauteur', $statut_tmp, $id) ? $statut_tmp : '';
+    } elseif (
+        autoriser('inscrireauteur', $statut_tmp = '1comite', $id)
+        or autoriser('inscrireauteur', $statut_tmp = '6forum', $id)
+    ) {
+        return $statut_tmp;
+    }
+
+    return '';
 }
 
 
@@ -312,35 +312,35 @@ 
  * @return array
  */
 function confirmer_statut_inscription($auteur) {
-	// securite
-	if ($auteur['statut'] != 'nouveau') {
-		return $auteur;
-	}
-
-	$s = $auteur['prefs'];
-	// securite, au cas ou prefs aurait ete corrompu (ou deja ecrase par un tableau serialize)
-	if (!preg_match(',^\w+$,', $s)) {
-		$s = '6forum';
-	}
-	include_spip('inc/autoriser');
-	if (!autoriser('inscrireauteur', $s)) {
-		return $auteur;
-	}
-
-	include_spip('inc/autoriser');
-	// accorder l'autorisation de modif du statut auteur
-	autoriser_exception('modifier', 'auteur', $auteur['id_auteur']);
-	include_spip('action/editer_auteur');
-	// changer le statut
-	auteur_modifier($auteur['id_auteur'], ['statut' => $s]);
-	unset($_COOKIE['spip_session']); // forcer la maj de la session
-	// lever l'autorisation de modif du statut auteur
-	autoriser_exception('modifier', 'auteur', $auteur['id_auteur'], false);
-
-	// mettre a jour le statut
-	$auteur['statut'] = $s;
-
-	return $auteur;
+    // securite
+    if ($auteur['statut'] != 'nouveau') {
+        return $auteur;
+    }
+
+    $s = $auteur['prefs'];
+    // securite, au cas ou prefs aurait ete corrompu (ou deja ecrase par un tableau serialize)
+    if (!preg_match(',^\w+$,', $s)) {
+        $s = '6forum';
+    }
+    include_spip('inc/autoriser');
+    if (!autoriser('inscrireauteur', $s)) {
+        return $auteur;
+    }
+
+    include_spip('inc/autoriser');
+    // accorder l'autorisation de modif du statut auteur
+    autoriser_exception('modifier', 'auteur', $auteur['id_auteur']);
+    include_spip('action/editer_auteur');
+    // changer le statut
+    auteur_modifier($auteur['id_auteur'], ['statut' => $s]);
+    unset($_COOKIE['spip_session']); // forcer la maj de la session
+    // lever l'autorisation de modif du statut auteur
+    autoriser_exception('modifier', 'auteur', $auteur['id_auteur'], false);
+
+    // mettre a jour le statut
+    $auteur['statut'] = $s;
+
+    return $auteur;
 }
 
 
@@ -354,20 +354,20 @@ 
  * @return string
  */
 function auteur_attribuer_jeton($id_auteur): string {
-	include_spip('base/abstract_sql');
-	include_spip('inc/acces');
-
-	// s'assurer de l'unicite du jeton pour le couple (email,cookie)
-	do {
-		// Un morceau du jeton est lisible en bdd pour éviter de devoir déchiffrer
-		// tous les jetons connus pour vérifier le jeton d’un auteur.
-		$public = substr(creer_uniqid(), 0, 7) . '.';
-		$jeton = $public . creer_uniqid();
-		$jeton_chiffre_prefixe = $public . Chiffrement::chiffrer($jeton, SpipCles::secret_du_site());
-		sql_updateq('spip_auteurs', ['cookie_oubli' => $jeton_chiffre_prefixe], 'id_auteur=' . intval($id_auteur));
-	} while (sql_countsel('spip_auteurs', 'cookie_oubli=' . sql_quote($jeton_chiffre_prefixe, '', 'string')) > 1);
-
-	return $jeton;
+    include_spip('base/abstract_sql');
+    include_spip('inc/acces');
+
+    // s'assurer de l'unicite du jeton pour le couple (email,cookie)
+    do {
+        // Un morceau du jeton est lisible en bdd pour éviter de devoir déchiffrer
+        // tous les jetons connus pour vérifier le jeton d’un auteur.
+        $public = substr(creer_uniqid(), 0, 7) . '.';
+        $jeton = $public . creer_uniqid();
+        $jeton_chiffre_prefixe = $public . Chiffrement::chiffrer($jeton, SpipCles::secret_du_site());
+        sql_updateq('spip_auteurs', ['cookie_oubli' => $jeton_chiffre_prefixe], 'id_auteur=' . intval($id_auteur));
+    } while (sql_countsel('spip_auteurs', 'cookie_oubli=' . sql_quote($jeton_chiffre_prefixe, '', 'string')) > 1);
+
+    return $jeton;
 }
 
 /**
@@ -381,19 +381,19 @@ 
  * @return string|null
  */
 function auteur_lire_jeton(int $id_auteur, bool $autoInit = false): ?string {
-	include_spip('base/abstract_sql');
-	$jeton_chiffre_prefixe = sql_getfetsel('cookie_oubli', 'spip_auteurs', 'id_auteur=' . $id_auteur);
-	if ($jeton_chiffre_prefixe) {
-		$jeton_chiffre = substr($jeton_chiffre_prefixe, 8);
-		$jeton = Chiffrement::dechiffrer($jeton_chiffre, SpipCles::secret_du_site());
-		if ($jeton) {
-			return $jeton;
-		}
-	}
-	if ($autoInit) {
-		return auteur_attribuer_jeton($id_auteur);
-	}
-	return null;
+    include_spip('base/abstract_sql');
+    $jeton_chiffre_prefixe = sql_getfetsel('cookie_oubli', 'spip_auteurs', 'id_auteur=' . $id_auteur);
+    if ($jeton_chiffre_prefixe) {
+        $jeton_chiffre = substr($jeton_chiffre_prefixe, 8);
+        $jeton = Chiffrement::dechiffrer($jeton_chiffre, SpipCles::secret_du_site());
+        if ($jeton) {
+            return $jeton;
+        }
+    }
+    if ($autoInit) {
+        return auteur_attribuer_jeton($id_auteur);
+    }
+    return null;
 }
 
 /**
@@ -403,24 +403,24 @@ 
  * @return array|bool
  */
 function auteur_verifier_jeton($jeton) {
-	// refuser un jeton corrompu
-	if (preg_match(',[^0-9a-f.],i', $jeton)) {
-		return false;
-	}
-
-	include_spip('base/abstract_sql');
-	$public = substr($jeton, 0, 8);
-
-	// Les auteurs qui ont un jetons ressemblant
-	$auteurs = sql_allfetsel('*', 'spip_auteurs', 'cookie_oubli LIKE ' . sql_quote($public . '%'));
-	foreach ($auteurs as $auteur) {
-		$jeton_chiffre = substr($auteur['cookie_oubli'], 8);
-		$_jeton = Chiffrement::dechiffrer($jeton_chiffre, SpipCles::secret_du_site());
-		if ($_jeton and hash_equals($jeton, $_jeton)) {
-			return $auteur;
-		}
-	}
-	return false;
+    // refuser un jeton corrompu
+    if (preg_match(',[^0-9a-f.],i', $jeton)) {
+        return false;
+    }
+
+    include_spip('base/abstract_sql');
+    $public = substr($jeton, 0, 8);
+
+    // Les auteurs qui ont un jetons ressemblant
+    $auteurs = sql_allfetsel('*', 'spip_auteurs', 'cookie_oubli LIKE ' . sql_quote($public . '%'));
+    foreach ($auteurs as $auteur) {
+        $jeton_chiffre = substr($auteur['cookie_oubli'], 8);
+        $_jeton = Chiffrement::dechiffrer($jeton_chiffre, SpipCles::secret_du_site());
+        if ($_jeton and hash_equals($jeton, $_jeton)) {
+            return $auteur;
+        }
+    }
+    return false;
 }
 
 /**
@@ -430,6 +430,6 @@ 
  * @return bool
  */
 function auteur_effacer_jeton($id_auteur) {
-	include_spip('base/abstract_sql');
-	return sql_updateq('spip_auteurs', ['cookie_oubli' => ''], 'id_auteur=' . intval($id_auteur));
+    include_spip('base/abstract_sql');
+    return sql_updateq('spip_auteurs', ['cookie_oubli' => ''], 'id_auteur=' . intval($id_auteur));
 }

Spacing +11 added lines, -11 removed lines

@@ -61,7 +61,7 @@ 
 	}
 
 	include_spip('base/abstract_sql');
-	$res = sql_select('statut, id_auteur, login, email, nom', 'spip_auteurs', 'email=' . sql_quote($desc['email']));
+	$res = sql_select('statut, id_auteur, login, email, nom', 'spip_auteurs', 'email='.sql_quote($desc['email']));
 	// erreur ?
 	if (!$res) {
 		return _T('titre_probleme_technique');
@@ -217,11 +217,11 @@ 
 
 	$login = $login_base;
 
-	for ($i = 1;; $i++) {
+	for ($i = 1; ; $i++) {
 		if (!sql_countsel('spip_auteurs', "login='$login'")) {
 			return $login;
 		}
-		$login = $login_base . $i;
+		$login = $login_base.$i;
 	}
 }
 
@@ -361,11 +361,11 @@ 
 	do {
 		// Un morceau du jeton est lisible en bdd pour éviter de devoir déchiffrer
 		// tous les jetons connus pour vérifier le jeton d’un auteur.
-		$public = substr(creer_uniqid(), 0, 7) . '.';
-		$jeton = $public . creer_uniqid();
-		$jeton_chiffre_prefixe = $public . Chiffrement::chiffrer($jeton, SpipCles::secret_du_site());
-		sql_updateq('spip_auteurs', ['cookie_oubli' => $jeton_chiffre_prefixe], 'id_auteur=' . intval($id_auteur));
-	} while (sql_countsel('spip_auteurs', 'cookie_oubli=' . sql_quote($jeton_chiffre_prefixe, '', 'string')) > 1);
+		$public = substr(creer_uniqid(), 0, 7).'.';
+		$jeton = $public.creer_uniqid();
+		$jeton_chiffre_prefixe = $public.Chiffrement::chiffrer($jeton, SpipCles::secret_du_site());
+		sql_updateq('spip_auteurs', ['cookie_oubli' => $jeton_chiffre_prefixe], 'id_auteur='.intval($id_auteur));
+	} while (sql_countsel('spip_auteurs', 'cookie_oubli='.sql_quote($jeton_chiffre_prefixe, '', 'string')) > 1);
 
 	return $jeton;
 }
@@ -382,7 +382,7 @@ 
  */
 function auteur_lire_jeton(int $id_auteur, bool $autoInit = false): ?string {
 	include_spip('base/abstract_sql');
-	$jeton_chiffre_prefixe = sql_getfetsel('cookie_oubli', 'spip_auteurs', 'id_auteur=' . $id_auteur);
+	$jeton_chiffre_prefixe = sql_getfetsel('cookie_oubli', 'spip_auteurs', 'id_auteur='.$id_auteur);
 	if ($jeton_chiffre_prefixe) {
 		$jeton_chiffre = substr($jeton_chiffre_prefixe, 8);
 		$jeton = Chiffrement::dechiffrer($jeton_chiffre, SpipCles::secret_du_site());
@@ -412,7 +412,7 @@ 
 	$public = substr($jeton, 0, 8);
 
 	// Les auteurs qui ont un jetons ressemblant
-	$auteurs = sql_allfetsel('*', 'spip_auteurs', 'cookie_oubli LIKE ' . sql_quote($public . '%'));
+	$auteurs = sql_allfetsel('*', 'spip_auteurs', 'cookie_oubli LIKE '.sql_quote($public.'%'));
 	foreach ($auteurs as $auteur) {
 		$jeton_chiffre = substr($auteur['cookie_oubli'], 8);
 		$_jeton = Chiffrement::dechiffrer($jeton_chiffre, SpipCles::secret_du_site());
@@ -431,5 +431,5 @@ 
  */
 function auteur_effacer_jeton($id_auteur) {
 	include_spip('base/abstract_sql');
-	return sql_updateq('spip_auteurs', ['cookie_oubli' => ''], 'id_auteur=' . intval($id_auteur));
+	return sql_updateq('spip_auteurs', ['cookie_oubli' => ''], 'id_auteur='.intval($id_auteur));
 }

ecrire/src/Css/Vars/Collection.php

Indentation +14 added lines, -14 removed lines

@@ -7,21 +7,21 @@
  * @internal
  */
 class Collection {
-	private array $vars = [];
+    private array $vars = [];
 
-	public function add(string $var, string $value) {
-		$this->vars[$var] = $value;
-	}
+    public function add(string $var, string $value) {
+        $this->vars[$var] = $value;
+    }
 
-	public function getString(): string {
-		$string = '';
-		foreach ($this->vars as $key => $value) {
-			$string .= "$key: $value;\n";
-		}
-		return $string;
-	}
+    public function getString(): string {
+        $string = '';
+        foreach ($this->vars as $key => $value) {
+            $string .= "$key: $value;\n";
+        }
+        return $string;
+    }
 
-	public function __toString(): string {
-		return $this->getString();
-	}
+    public function __toString(): string {
+        return $this->getString();
+    }
 }

ecrire/src/Compilateur/Iterateur/Decorator.php

Indentation +571 added lines, -571 removed lines

@@ -8,583 +8,583 @@
 
 class Decorator extends FilterIterator
 {
-	/**
-	 * Conditions de filtrage
-	 * ie criteres de selection.
-	 *
-	 * @var array
-	 */
-	protected $filtre = [];
-
-	/**
-	 * Fonction de filtrage compilee a partir des criteres de filtre.
-	 *
-	 * @var string
-	 */
-	protected $func_filtre;
-
-	/**
-	 * Critere {offset, limit}.
-	 *
-	 * @var int
-	 * @var int
-	 */
-	protected $offset;
-	protected $limit;
-
-	/**
-	 * nombre d'elements recuperes depuis la position 0,
-	 * en tenant compte des filtres.
-	 *
-	 * @var int
-	 */
-	protected $fetched = 0;
-
-	/**
-	 * Y a t'il une erreur ?
-	 *
-	 * @var bool
-	 */
-	protected $err = false;
-
-	// Extension SPIP des iterateurs PHP
-	/**
-	 * type de l'iterateur.
-	 *
-	 * @var string
-	 */
-	protected $type;
-
-	/**
-	 * parametres de l'iterateur.
-	 *
-	 * @var array
-	 */
-	protected $command;
-
-	/**
-	 * infos de compilateur.
-	 *
-	 * @var array
-	 */
-	protected $info;
-
-	/**
-	 * position courante de l'iterateur.
-	 *
-	 * @var int
-	 */
-	protected $pos;
-
-	/**
-	 * nombre total resultats dans l'iterateur.
-	 *
-	 * @var int
-	 */
-	protected $total;
-
-	/**
-	 * nombre maximal de recherche pour $total
-	 * si l'iterateur n'implemente pas de fonction specifique.
-	 */
-	protected $max = 100000;
-
-	/**
-	 * Liste des champs a inserer dans les $row
-	 * retournes par ->fetch().
-	 */
-	protected $select = [];
-	private $iter;
-
-	public function __construct(Iterator $iter, $command, $info) {
-		parent::__construct($iter);
-		parent::rewind(); // remettre a la premiere position (bug? connu de FilterIterator)
-
-		// recuperer l'iterateur transmis
-		$this->iter = $this->getInnerIterator();
-		$this->command = $command;
-		$this->info = $info;
-		$this->pos = 0;
-		$this->fetched = 0;
-
-		// chercher la liste des champs a retourner par
-		// fetch si l'objet ne les calcule pas tout seul
-		if (!method_exists($this->iter, 'fetch')) {
-			$this->calculer_select();
-			$this->calculer_filtres();
-		}
-
-		// emptyIterator critere {si} faux n'a pas d'erreur !
-		if (isset($this->iter->err)) {
-			$this->err = $this->iter->err;
-		}
-
-		// pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite)
-		//$this->total = $this->count();
-	}
-
-	/**
-	 * Drapeau a activer en cas d'echec
-	 * (select SQL errone, non chargement des DATA, etc).
-	 */
-	public function err() {
-		if (method_exists($this->iter, 'err')) {
-			return $this->iter->err();
-		}
-		if (property_exists($this->iter, 'err')) {
-			return $this->iter->err;
-		}
-
-		return false;
-	}
-
-	// recuperer la valeur d'une balise #X
-	// en fonction des methodes
-	// et proprietes disponibles
-	public function get_select($nom) {
-		if (
-			is_object($this->iter)
-			and method_exists($this->iter, $nom)
-		) {
-			try {
-				return $this->iter->{$nom}();
-			} catch (Exception $e) {
-				// #GETCHILDREN sur un fichier de DirectoryIterator ...
-				spip_log("Methode {$nom} en echec sur " . get_class($this->iter));
-				spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode");
-
-				return '';
-			}
-		}
-		/*
+    /**
+     * Conditions de filtrage
+     * ie criteres de selection.
+     *
+     * @var array
+     */
+    protected $filtre = [];
+
+    /**
+     * Fonction de filtrage compilee a partir des criteres de filtre.
+     *
+     * @var string
+     */
+    protected $func_filtre;
+
+    /**
+     * Critere {offset, limit}.
+     *
+     * @var int
+     * @var int
+     */
+    protected $offset;
+    protected $limit;
+
+    /**
+     * nombre d'elements recuperes depuis la position 0,
+     * en tenant compte des filtres.
+     *
+     * @var int
+     */
+    protected $fetched = 0;
+
+    /**
+     * Y a t'il une erreur ?
+     *
+     * @var bool
+     */
+    protected $err = false;
+
+    // Extension SPIP des iterateurs PHP
+    /**
+     * type de l'iterateur.
+     *
+     * @var string
+     */
+    protected $type;
+
+    /**
+     * parametres de l'iterateur.
+     *
+     * @var array
+     */
+    protected $command;
+
+    /**
+     * infos de compilateur.
+     *
+     * @var array
+     */
+    protected $info;
+
+    /**
+     * position courante de l'iterateur.
+     *
+     * @var int
+     */
+    protected $pos;
+
+    /**
+     * nombre total resultats dans l'iterateur.
+     *
+     * @var int
+     */
+    protected $total;
+
+    /**
+     * nombre maximal de recherche pour $total
+     * si l'iterateur n'implemente pas de fonction specifique.
+     */
+    protected $max = 100000;
+
+    /**
+     * Liste des champs a inserer dans les $row
+     * retournes par ->fetch().
+     */
+    protected $select = [];
+    private $iter;
+
+    public function __construct(Iterator $iter, $command, $info) {
+        parent::__construct($iter);
+        parent::rewind(); // remettre a la premiere position (bug? connu de FilterIterator)
+
+        // recuperer l'iterateur transmis
+        $this->iter = $this->getInnerIterator();
+        $this->command = $command;
+        $this->info = $info;
+        $this->pos = 0;
+        $this->fetched = 0;
+
+        // chercher la liste des champs a retourner par
+        // fetch si l'objet ne les calcule pas tout seul
+        if (!method_exists($this->iter, 'fetch')) {
+            $this->calculer_select();
+            $this->calculer_filtres();
+        }
+
+        // emptyIterator critere {si} faux n'a pas d'erreur !
+        if (isset($this->iter->err)) {
+            $this->err = $this->iter->err;
+        }
+
+        // pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite)
+        //$this->total = $this->count();
+    }
+
+    /**
+     * Drapeau a activer en cas d'echec
+     * (select SQL errone, non chargement des DATA, etc).
+     */
+    public function err() {
+        if (method_exists($this->iter, 'err')) {
+            return $this->iter->err();
+        }
+        if (property_exists($this->iter, 'err')) {
+            return $this->iter->err;
+        }
+
+        return false;
+    }
+
+    // recuperer la valeur d'une balise #X
+    // en fonction des methodes
+    // et proprietes disponibles
+    public function get_select($nom) {
+        if (
+            is_object($this->iter)
+            and method_exists($this->iter, $nom)
+        ) {
+            try {
+                return $this->iter->{$nom}();
+            } catch (Exception $e) {
+                // #GETCHILDREN sur un fichier de DirectoryIterator ...
+                spip_log("Methode {$nom} en echec sur " . get_class($this->iter));
+                spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode");
+
+                return '';
+            }
+        }
+        /*
 		if (property_exists($this->iter, $nom)) {
 			return $this->iter->$nom;
 		}*/
-		// cle et valeur par defaut
-		// ICI PLANTAGE SI ON NE CONTROLE PAS $nom
-		if (
-			in_array($nom, ['cle', 'valeur'])
-			and method_exists($this, $nom)
-		) {
-			return $this->{$nom}();
-		}
-
-		// Par defaut chercher en xpath dans la valeur()
-		return table_valeur($this->valeur(), $nom, null);
-	}
-
-	public function next(): void {
-		++$this->pos;
-		parent::next();
-	}
-
-	/**
-	 * revient au depart.
-	 */
-	public function rewind(): void {
-		$this->pos = 0;
-		$this->fetched = 0;
-		parent::rewind();
-	}
-
-	/**
-	 * aller a la position absolue n,
-	 * comptee depuis le debut.
-	 *
-	 * @param int    $n
-	 *                         absolute pos
-	 * @param string $continue
-	 *                         param for sql_ api
-	 *
-	 * @return bool
-	 *              success or fail if not implemented
-	 */
-	public function seek($n = 0, $continue = null) {
-		if ($this->func_filtre or !method_exists($this->iter, 'seek') or !$this->iter->seek($n)) {
-			$this->seek_loop($n);
-		}
-		$this->pos = $n;
-		$this->fetched = $n;
-
-		return true;
-	}
-
-	/**
-	 * Avancer de $saut pas.
-	 *
-	 * @param $saut
-	 * @param $max
-	 *
-	 * @return int
-	 */
-	public function skip($saut, $max = null) {
-		// pas de saut en arriere autorise pour cette fonction
-		if (($saut = intval($saut)) <= 0) {
-			return $this->pos;
-		}
-		$seek = $this->pos + $saut;
-		// si le saut fait depasser le maxi, on libere la resource
-		// et on sort
-		if (is_null($max)) {
-			$max = $this->count();
-		}
-
-		if ($seek >= $max or $seek >= $this->count()) {
-			// sortie plus rapide que de faire next() jusqu'a la fin !
-			$this->free();
-
-			return $max;
-		}
-
-		$this->seek($seek);
-
-		return $this->pos;
-	}
-
-	/**
-	 * Renvoyer un tableau des donnees correspondantes
-	 * a la position courante de l'iterateur
-	 * en controlant si on respecte le filtre
-	 * Appliquer aussi le critere {offset,limit}.
-	 *
-	 * @return array|bool
-	 */
-	public function fetch() {
-		if (method_exists($this->iter, 'fetch')) {
-			return $this->iter->fetch();
-		}
-		while (
-				$this->valid()
-				and (
-					!$this->accept()
-					or (isset($this->offset) and $this->fetched++ < $this->offset)
-				)
-		) {
-			$this->next();
-		}
-
-		if (!$this->valid()) {
-			return false;
-		}
-
-		if (
-				isset($this->limit)
-				and $this->fetched > $this->offset + $this->limit
-		) {
-			return false;
-		}
-
-		$r = [];
-		foreach ($this->select as $nom) {
-			$r[$nom] = $this->get_select($nom);
-		}
-		$this->next();
-
-		return $r;
-	}
-
-	// retourner la cle pour #CLE
-	public function cle() {
-		return $this->key();
-	}
-
-	// retourner la valeur pour #VALEUR
-	public function valeur() {
-		return $this->current();
-	}
-
-	/**
-	 * Accepte-t-on l'entree courante lue ?
-	 * On execute les filtres pour le savoir.
-	 */
-	public function accept(): bool {
-		if ($f = $this->func_filtre) {
-			return $f();
-		}
-
-		return true;
-	}
-
-	/**
-	 * liberer la ressource.
-	 *
-	 * @return bool
-	 */
-	public function free() {
-		if (method_exists($this->iter, 'free')) {
-			$this->iter->free();
-		}
-		$this->pos = $this->total = 0;
-
-		return true;
-	}
-
-	/**
-	 * Compter le nombre total de resultats
-	 * pour #TOTAL_BOUCLE.
-	 *
-	 * @return int
-	 */
-	public function count() {
-		if (is_null($this->total)) {
-			if (
-				method_exists($this->iter, 'count')
-				and !$this->func_filtre
-			) {
-				return $this->total = $this->iter->count();
-			}
-			// compter les lignes et rembobiner
-			$total = 0;
-			$pos = $this->pos; // sauver la position
-			$this->rewind();
-			while ($this->fetch() and $total < $this->max) {
-				++$total;
-			}
-			$this->seek($pos);
-			$this->total = $total;
-		}
-
-		return $this->total;
-	}
-
-	/**
-	 * Assembler le tableau de filtres traduits depuis les conditions SQL
-	 * les filtres vides ou null sont ignores.
-	 *
-	 * @param $filtres
-	 * @param string $operateur
-	 *
-	 * @return null|string
-	 */
-	protected function assembler_filtres($filtres, $operateur = 'AND') {
-		$filtres_string = [];
-		foreach ($filtres as $k => $v) {
-			// si c'est un tableau de OR/AND + 2 sous-filtres, on recurse pour transformer en chaine
-			if (is_array($v) and in_array(reset($v), ['OR', 'AND'])) {
-				$op = array_shift($v);
-				$v = $this->assembler_filtres($v, $op);
-			}
-			if (is_null($v) or !is_string($v) or empty($v)) {
-				continue;
-			}
-			$filtres_string[] = $v;
-		}
-
-		if (!count($filtres_string)) {
-			return null;
-		}
-
-		return '(' . implode(") {$operateur} (", $filtres_string) . ')';
-	}
-
-	/**
-	 * Traduire un element du tableau where SQL en un filtre.
-	 *
-	 * @param $v
-	 *
-	 * @return null|array|string
-	 */
-	protected function traduire_condition_sql_en_filtre($v) {
-		if (is_array($v)) {
-			if ((count($v) >= 2) && ('REGEXP' == $v[0]) && ("'.*'" == $v[2])) {
-				return 'true';
-			}
-			if ((count($v) >= 2) && ('LIKE' == $v[0]) && ("'%'" == $v[2])) {
-				return 'true';
-			}
-			$op = $v[0] ?: $v;
-		} else {
-			$op = $v;
-		}
-		if ((!$op) or (1 == $op) or ('0=0' == $op)) {
-			return 'true';
-		}
-		if ('0=1' === $op) {
-			return 'false';
-		}
-		// traiter {cle IN a,b} ou {valeur !IN a,b}
-		if (preg_match(',^\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\)$,', $op, $regs)) {
-			return $this->composer_filtre($regs[1], 'IN', $regs[3], $regs[2]);
-		}
-
-		// 3 possibilites : count($v) =
-		// * 1 : {x y} ; on recoit $v[0] = y
-		// * 2 : {x !op y} ; on recoit $v[0] = 'NOT', $v[1] = array() // array du type {x op y}
-		// * 3 : {x op y} ; on recoit $v[0] = 'op', $v[1] = x, $v[2] = y
-
-		// 1 : forcement traite par un critere, on passe
-		if (!$v or !is_array($v) or 1 == count($v)) {
-			return null; // sera ignore
-		}
-		if (2 == count($v) and is_array($v[1])) {
-			return $this->composer_filtre($v[1][1], $v[1][0], $v[1][2], 'NOT');
-		}
-		if (3 == count($v)) {
-			// traiter le OR/AND suivi de 2 valeurs
-			if (in_array($op, ['OR', 'AND'])) {
-				array_shift($v);
-				foreach (array_keys($v) as $k) {
-					$v[$k] = $this->traduire_condition_sql_en_filtre($v[$k]);
-					if (null === $v[$k]) {
-						unset($v[$k]);
-					} elseif ('true' === $v[$k]) {
-						if ('OR' === $op) {
-							return 'true';
-						}
-						if ('AND' === $op) {
-							unset($v[$k]);
-						}
-					} elseif ('false' === $v[$k]) {
-						if ('OR' === $op) {
-							unset($v[$k]);
-						}
-						if ('AND' === $op) {
-							return 'false';
-						}
-					}
-				}
-				if (!count($v)) {
-					return null;
-				}
-				if (1 === count($v)) {
-					return reset($v);
-				}
-				array_unshift($v, $op);
-
-				return $v;
-			}
-
-			return $this->composer_filtre($v[1], $v[0], $v[2]);
-		}
-
-		return null;  // sera ignore
-	}
-
-	/**
-	 * Calculer un filtre sur un champ du tableau.
-	 *
-	 * @param $cle
-	 * @param $op
-	 * @param $valeur
-	 * @param false $not
-	 *
-	 * @return null|string
-	 */
-	protected function composer_filtre($cle, $op, $valeur, $not = false) {
-		if (method_exists($this->iter, 'exception_des_criteres')) {
-			if (in_array($cle, $this->iter->exception_des_criteres())) {
-				return null;
-			}
-		}
-		// TODO: analyser le filtre pour refuser ce qu'on ne sait pas traiter ?
-		// mais c'est normalement deja opere par calculer_critere_infixe()
-		// qui regarde la description 'desc' (en casse reelle d'ailleurs : {isDir=1}
-		// ne sera pas vu si l'on a defini desc['field']['isdir'] pour que #ISDIR soit present.
-		// il faudrait peut etre definir les 2 champs isDir et isdir... a reflechir...
-
-		// if (!in_array($cle, array('cle', 'valeur')))
-		//	return;
-
-		$a = '$this->get_select(\'' . $cle . '\')';
-
-		$filtre = '';
-
-		if ('REGEXP' == $op) {
-			$filtre = 'filtrer("match", ' . $a . ', ' . str_replace('\"', '"', $valeur) . ')';
-			$op = '';
-		} else {
-			if ('LIKE' == $op) {
-				$valeur = str_replace(['\"', '_', '%'], ['"', '.', '.*'], preg_quote($valeur));
-				$filtre = 'filtrer("match", ' . $a . ', ' . $valeur . ')';
-				$op = '';
-			} else {
-				if ('=' == $op) {
-					$op = '==';
-				} else {
-					if ('IN' == $op) {
-						$filtre = 'in_array(' . $a . ', array' . $valeur . ')';
-						$op = '';
-					} else {
-						if (!in_array($op, ['<', '<=', '>', '>='])) {
-							spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette
-							$op = '';
-						}
-					}
-				}
-			}
-		}
-
-		if ($op) {
-			$filtre = $a . $op . str_replace('\"', '"', $valeur);
-		}
-
-		if ($not) {
-			$filtre = "!({$filtre})";
-		}
-
-		return $filtre;
-	}
-
-	// calcule les elements a retournes par fetch()
-	// enleve les elements inutiles du select()
-	//
-	private function calculer_select() {
-		if ($select = &$this->command['select']) {
-			foreach ($select as $s) {
-				// /!\ $s = '.nom'
-				if ('.' == $s[0]) {
-					$s = substr($s, 1);
-				}
-				$this->select[] = $s;
-			}
-		}
-	}
-
-	private function calculer_filtres() {
-		// Issu de calculer_select() de public/composer L.519
-		// TODO: externaliser...
-		//
-		// retirer les criteres vides:
-		// {X ?} avec X absent de l'URL
-		// {par #ENV{X}} avec X absent de l'URL
-		// IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil)
-		if ($where = &$this->command['where']) {
-			foreach ($where as $k => $v) {
-				$this->filtre[] = $this->traduire_condition_sql_en_filtre($v);
-			}
-		}
-
-		// critere {2,7}
-		if (isset($this->command['limit']) and $this->command['limit']) {
-			$limit = explode(',', $this->command['limit']);
-			$this->offset = $limit[0];
-			$this->limit = $limit[1];
-		}
-
-		// Creer la fonction de filtrage sur $this
-		if ($this->filtre) {
-			if ($filtres = $this->assembler_filtres($this->filtre)) {
-				$filtres = 'return ' . $filtres . ';';
-				$this->func_filtre = fn () => eval($filtres);
-			} else {
-				$this->func_filtre = null;
-			}
-		}
-	}
-
-	/*
+        // cle et valeur par defaut
+        // ICI PLANTAGE SI ON NE CONTROLE PAS $nom
+        if (
+            in_array($nom, ['cle', 'valeur'])
+            and method_exists($this, $nom)
+        ) {
+            return $this->{$nom}();
+        }
+
+        // Par defaut chercher en xpath dans la valeur()
+        return table_valeur($this->valeur(), $nom, null);
+    }
+
+    public function next(): void {
+        ++$this->pos;
+        parent::next();
+    }
+
+    /**
+     * revient au depart.
+     */
+    public function rewind(): void {
+        $this->pos = 0;
+        $this->fetched = 0;
+        parent::rewind();
+    }
+
+    /**
+     * aller a la position absolue n,
+     * comptee depuis le debut.
+     *
+     * @param int    $n
+     *                         absolute pos
+     * @param string $continue
+     *                         param for sql_ api
+     *
+     * @return bool
+     *              success or fail if not implemented
+     */
+    public function seek($n = 0, $continue = null) {
+        if ($this->func_filtre or !method_exists($this->iter, 'seek') or !$this->iter->seek($n)) {
+            $this->seek_loop($n);
+        }
+        $this->pos = $n;
+        $this->fetched = $n;
+
+        return true;
+    }
+
+    /**
+     * Avancer de $saut pas.
+     *
+     * @param $saut
+     * @param $max
+     *
+     * @return int
+     */
+    public function skip($saut, $max = null) {
+        // pas de saut en arriere autorise pour cette fonction
+        if (($saut = intval($saut)) <= 0) {
+            return $this->pos;
+        }
+        $seek = $this->pos + $saut;
+        // si le saut fait depasser le maxi, on libere la resource
+        // et on sort
+        if (is_null($max)) {
+            $max = $this->count();
+        }
+
+        if ($seek >= $max or $seek >= $this->count()) {
+            // sortie plus rapide que de faire next() jusqu'a la fin !
+            $this->free();
+
+            return $max;
+        }
+
+        $this->seek($seek);
+
+        return $this->pos;
+    }
+
+    /**
+     * Renvoyer un tableau des donnees correspondantes
+     * a la position courante de l'iterateur
+     * en controlant si on respecte le filtre
+     * Appliquer aussi le critere {offset,limit}.
+     *
+     * @return array|bool
+     */
+    public function fetch() {
+        if (method_exists($this->iter, 'fetch')) {
+            return $this->iter->fetch();
+        }
+        while (
+                $this->valid()
+                and (
+                    !$this->accept()
+                    or (isset($this->offset) and $this->fetched++ < $this->offset)
+                )
+        ) {
+            $this->next();
+        }
+
+        if (!$this->valid()) {
+            return false;
+        }
+
+        if (
+                isset($this->limit)
+                and $this->fetched > $this->offset + $this->limit
+        ) {
+            return false;
+        }
+
+        $r = [];
+        foreach ($this->select as $nom) {
+            $r[$nom] = $this->get_select($nom);
+        }
+        $this->next();
+
+        return $r;
+    }
+
+    // retourner la cle pour #CLE
+    public function cle() {
+        return $this->key();
+    }
+
+    // retourner la valeur pour #VALEUR
+    public function valeur() {
+        return $this->current();
+    }
+
+    /**
+     * Accepte-t-on l'entree courante lue ?
+     * On execute les filtres pour le savoir.
+     */
+    public function accept(): bool {
+        if ($f = $this->func_filtre) {
+            return $f();
+        }
+
+        return true;
+    }
+
+    /**
+     * liberer la ressource.
+     *
+     * @return bool
+     */
+    public function free() {
+        if (method_exists($this->iter, 'free')) {
+            $this->iter->free();
+        }
+        $this->pos = $this->total = 0;
+
+        return true;
+    }
+
+    /**
+     * Compter le nombre total de resultats
+     * pour #TOTAL_BOUCLE.
+     *
+     * @return int
+     */
+    public function count() {
+        if (is_null($this->total)) {
+            if (
+                method_exists($this->iter, 'count')
+                and !$this->func_filtre
+            ) {
+                return $this->total = $this->iter->count();
+            }
+            // compter les lignes et rembobiner
+            $total = 0;
+            $pos = $this->pos; // sauver la position
+            $this->rewind();
+            while ($this->fetch() and $total < $this->max) {
+                ++$total;
+            }
+            $this->seek($pos);
+            $this->total = $total;
+        }
+
+        return $this->total;
+    }
+
+    /**
+     * Assembler le tableau de filtres traduits depuis les conditions SQL
+     * les filtres vides ou null sont ignores.
+     *
+     * @param $filtres
+     * @param string $operateur
+     *
+     * @return null|string
+     */
+    protected function assembler_filtres($filtres, $operateur = 'AND') {
+        $filtres_string = [];
+        foreach ($filtres as $k => $v) {
+            // si c'est un tableau de OR/AND + 2 sous-filtres, on recurse pour transformer en chaine
+            if (is_array($v) and in_array(reset($v), ['OR', 'AND'])) {
+                $op = array_shift($v);
+                $v = $this->assembler_filtres($v, $op);
+            }
+            if (is_null($v) or !is_string($v) or empty($v)) {
+                continue;
+            }
+            $filtres_string[] = $v;
+        }
+
+        if (!count($filtres_string)) {
+            return null;
+        }
+
+        return '(' . implode(") {$operateur} (", $filtres_string) . ')';
+    }
+
+    /**
+     * Traduire un element du tableau where SQL en un filtre.
+     *
+     * @param $v
+     *
+     * @return null|array|string
+     */
+    protected function traduire_condition_sql_en_filtre($v) {
+        if (is_array($v)) {
+            if ((count($v) >= 2) && ('REGEXP' == $v[0]) && ("'.*'" == $v[2])) {
+                return 'true';
+            }
+            if ((count($v) >= 2) && ('LIKE' == $v[0]) && ("'%'" == $v[2])) {
+                return 'true';
+            }
+            $op = $v[0] ?: $v;
+        } else {
+            $op = $v;
+        }
+        if ((!$op) or (1 == $op) or ('0=0' == $op)) {
+            return 'true';
+        }
+        if ('0=1' === $op) {
+            return 'false';
+        }
+        // traiter {cle IN a,b} ou {valeur !IN a,b}
+        if (preg_match(',^\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\)$,', $op, $regs)) {
+            return $this->composer_filtre($regs[1], 'IN', $regs[3], $regs[2]);
+        }
+
+        // 3 possibilites : count($v) =
+        // * 1 : {x y} ; on recoit $v[0] = y
+        // * 2 : {x !op y} ; on recoit $v[0] = 'NOT', $v[1] = array() // array du type {x op y}
+        // * 3 : {x op y} ; on recoit $v[0] = 'op', $v[1] = x, $v[2] = y
+
+        // 1 : forcement traite par un critere, on passe
+        if (!$v or !is_array($v) or 1 == count($v)) {
+            return null; // sera ignore
+        }
+        if (2 == count($v) and is_array($v[1])) {
+            return $this->composer_filtre($v[1][1], $v[1][0], $v[1][2], 'NOT');
+        }
+        if (3 == count($v)) {
+            // traiter le OR/AND suivi de 2 valeurs
+            if (in_array($op, ['OR', 'AND'])) {
+                array_shift($v);
+                foreach (array_keys($v) as $k) {
+                    $v[$k] = $this->traduire_condition_sql_en_filtre($v[$k]);
+                    if (null === $v[$k]) {
+                        unset($v[$k]);
+                    } elseif ('true' === $v[$k]) {
+                        if ('OR' === $op) {
+                            return 'true';
+                        }
+                        if ('AND' === $op) {
+                            unset($v[$k]);
+                        }
+                    } elseif ('false' === $v[$k]) {
+                        if ('OR' === $op) {
+                            unset($v[$k]);
+                        }
+                        if ('AND' === $op) {
+                            return 'false';
+                        }
+                    }
+                }
+                if (!count($v)) {
+                    return null;
+                }
+                if (1 === count($v)) {
+                    return reset($v);
+                }
+                array_unshift($v, $op);
+
+                return $v;
+            }
+
+            return $this->composer_filtre($v[1], $v[0], $v[2]);
+        }
+
+        return null;  // sera ignore
+    }
+
+    /**
+     * Calculer un filtre sur un champ du tableau.
+     *
+     * @param $cle
+     * @param $op
+     * @param $valeur
+     * @param false $not
+     *
+     * @return null|string
+     */
+    protected function composer_filtre($cle, $op, $valeur, $not = false) {
+        if (method_exists($this->iter, 'exception_des_criteres')) {
+            if (in_array($cle, $this->iter->exception_des_criteres())) {
+                return null;
+            }
+        }
+        // TODO: analyser le filtre pour refuser ce qu'on ne sait pas traiter ?
+        // mais c'est normalement deja opere par calculer_critere_infixe()
+        // qui regarde la description 'desc' (en casse reelle d'ailleurs : {isDir=1}
+        // ne sera pas vu si l'on a defini desc['field']['isdir'] pour que #ISDIR soit present.
+        // il faudrait peut etre definir les 2 champs isDir et isdir... a reflechir...
+
+        // if (!in_array($cle, array('cle', 'valeur')))
+        //	return;
+
+        $a = '$this->get_select(\'' . $cle . '\')';
+
+        $filtre = '';
+
+        if ('REGEXP' == $op) {
+            $filtre = 'filtrer("match", ' . $a . ', ' . str_replace('\"', '"', $valeur) . ')';
+            $op = '';
+        } else {
+            if ('LIKE' == $op) {
+                $valeur = str_replace(['\"', '_', '%'], ['"', '.', '.*'], preg_quote($valeur));
+                $filtre = 'filtrer("match", ' . $a . ', ' . $valeur . ')';
+                $op = '';
+            } else {
+                if ('=' == $op) {
+                    $op = '==';
+                } else {
+                    if ('IN' == $op) {
+                        $filtre = 'in_array(' . $a . ', array' . $valeur . ')';
+                        $op = '';
+                    } else {
+                        if (!in_array($op, ['<', '<=', '>', '>='])) {
+                            spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette
+                            $op = '';
+                        }
+                    }
+                }
+            }
+        }
+
+        if ($op) {
+            $filtre = $a . $op . str_replace('\"', '"', $valeur);
+        }
+
+        if ($not) {
+            $filtre = "!({$filtre})";
+        }
+
+        return $filtre;
+    }
+
+    // calcule les elements a retournes par fetch()
+    // enleve les elements inutiles du select()
+    //
+    private function calculer_select() {
+        if ($select = &$this->command['select']) {
+            foreach ($select as $s) {
+                // /!\ $s = '.nom'
+                if ('.' == $s[0]) {
+                    $s = substr($s, 1);
+                }
+                $this->select[] = $s;
+            }
+        }
+    }
+
+    private function calculer_filtres() {
+        // Issu de calculer_select() de public/composer L.519
+        // TODO: externaliser...
+        //
+        // retirer les criteres vides:
+        // {X ?} avec X absent de l'URL
+        // {par #ENV{X}} avec X absent de l'URL
+        // IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil)
+        if ($where = &$this->command['where']) {
+            foreach ($where as $k => $v) {
+                $this->filtre[] = $this->traduire_condition_sql_en_filtre($v);
+            }
+        }
+
+        // critere {2,7}
+        if (isset($this->command['limit']) and $this->command['limit']) {
+            $limit = explode(',', $this->command['limit']);
+            $this->offset = $limit[0];
+            $this->limit = $limit[1];
+        }
+
+        // Creer la fonction de filtrage sur $this
+        if ($this->filtre) {
+            if ($filtres = $this->assembler_filtres($this->filtre)) {
+                $filtres = 'return ' . $filtres . ';';
+                $this->func_filtre = fn () => eval($filtres);
+            } else {
+                $this->func_filtre = null;
+            }
+        }
+    }
+
+    /*
 	 * aller a la position $n en parcourant
 	 * un par un tous les elements
 	 */
-	private function seek_loop($n) {
-		if ($this->pos > $n) {
-			$this->rewind();
-		}
+    private function seek_loop($n) {
+        if ($this->pos > $n) {
+            $this->rewind();
+        }
 
-		while ($this->pos < $n and $this->valid()) {
-			$this->next();
-		}
+        while ($this->pos < $n and $this->valid()) {
+            $this->next();
+        }
 
-		return true;
-	}
+        return true;
+    }
 }

Spacing +10 added lines, -10 removed lines

@@ -150,7 +150,7 @@ 
 				return $this->iter->{$nom}();
 			} catch (Exception $e) {
 				// #GETCHILDREN sur un fichier de DirectoryIterator ...
-				spip_log("Methode {$nom} en echec sur " . get_class($this->iter));
+				spip_log("Methode {$nom} en echec sur ".get_class($this->iter));
 				spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode");
 
 				return '';
@@ -374,7 +374,7 @@ 
 			return null;
 		}
 
-		return '(' . implode(") {$operateur} (", $filtres_string) . ')';
+		return '('.implode(") {$operateur} (", $filtres_string).')';
 	}
 
 	/**
@@ -457,7 +457,7 @@ 
 			return $this->composer_filtre($v[1], $v[0], $v[2]);
 		}
 
-		return null;  // sera ignore
+		return null; // sera ignore
 	}
 
 	/**
@@ -485,28 +485,28 @@ 
 		// if (!in_array($cle, array('cle', 'valeur')))
 		//	return;
 
-		$a = '$this->get_select(\'' . $cle . '\')';
+		$a = '$this->get_select(\''.$cle.'\')';
 
 		$filtre = '';
 
 		if ('REGEXP' == $op) {
-			$filtre = 'filtrer("match", ' . $a . ', ' . str_replace('\"', '"', $valeur) . ')';
+			$filtre = 'filtrer("match", '.$a.', '.str_replace('\"', '"', $valeur).')';
 			$op = '';
 		} else {
 			if ('LIKE' == $op) {
 				$valeur = str_replace(['\"', '_', '%'], ['"', '.', '.*'], preg_quote($valeur));
-				$filtre = 'filtrer("match", ' . $a . ', ' . $valeur . ')';
+				$filtre = 'filtrer("match", '.$a.', '.$valeur.')';
 				$op = '';
 			} else {
 				if ('=' == $op) {
 					$op = '==';
 				} else {
 					if ('IN' == $op) {
-						$filtre = 'in_array(' . $a . ', array' . $valeur . ')';
+						$filtre = 'in_array('.$a.', array'.$valeur.')';
 						$op = '';
 					} else {
 						if (!in_array($op, ['<', '<=', '>', '>='])) {
-							spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette
+							spip_log('operateur non reconnu '.$op); // [todo] mettre une erreur de squelette
 							$op = '';
 						}
 					}
@@ -515,7 +515,7 @@ 
 		}
 
 		if ($op) {
-			$filtre = $a . $op . str_replace('\"', '"', $valeur);
+			$filtre = $a.$op.str_replace('\"', '"', $valeur);
 		}
 
 		if ($not) {
@@ -564,7 +564,7 @@ 
 		// Creer la fonction de filtrage sur $this
 		if ($this->filtre) {
 			if ($filtres = $this->assembler_filtres($this->filtre)) {
-				$filtres = 'return ' . $filtres . ';';
+				$filtres = 'return '.$filtres.';';
 				$this->func_filtre = fn () => eval($filtres);
 			} else {
 				$this->func_filtre = null;

ecrire/src/Compilateur/Iterateur/Condition.php

Indentation +8 added lines, -8 removed lines

@@ -9,12 +9,12 @@
  */
 class Condition extends Data
 {
-	/**
-	 * Obtenir les données de la boucle CONDITION.
-	 *
-	 * @param array $command
-	 */
-	protected function select($command) {
-		$this->tableau = [0 => 1];
-	}
+    /**
+     * Obtenir les données de la boucle CONDITION.
+     *
+     * @param array $command
+     */
+    protected function select($command) {
+        $this->tableau = [0 => 1];
+    }
 }

ecrire/src/Compilateur/Iterateur/Sql.php

Indentation +182 added lines, -182 removed lines

@@ -12,193 +12,193 @@
 class Sql extends AbstractIterateur implements Iterator
 {
 
-	/**
-	 * Ressource sql.
-	 *
-	 * @var bool|object
-	 */
-	protected $sqlresult = false;
+    /**
+     * Ressource sql.
+     *
+     * @var bool|object
+     */
+    protected $sqlresult = false;
 
-	/**
-	 * row sql courante.
-	 *
-	 * @var null|array
-	 */
-	protected $row;
+    /**
+     * row sql courante.
+     *
+     * @var null|array
+     */
+    protected $row;
 
-	protected bool $firstseek = false;
+    protected bool $firstseek = false;
 
-	protected int $pos = -1;
+    protected int $pos = -1;
 
-	/*
+    /*
 	 * array command: les commandes d'initialisation
 	 * array info: les infos sur le squelette
 	 */
-	public function __construct(array $command, array $info = []) {
-		$this->type = 'SQL';
-		parent::__construct($command, $info);
-
-		$this->select();
-	}
-
-	/**
-	 * Rembobiner.
-	 *
-	 * @return bool
-	 */
-	public function rewind(): void {
-		if ($this->pos > 0) {
-			$this->seek(0);
-		}
-	}
-
-	/**
-	 * Verifier l'etat de l'iterateur.
-	 */
-	public function valid(): bool {
-		if ($this->err) {
-			return false;
-		}
-		if (!$this->firstseek) {
-			$this->next();
-		}
-
-		return is_array($this->row);
-	}
-
-	/**
-	 * Valeurs sur la position courante.
-	 *
-	 * @return array
-	 */
-	#[\ReturnTypeWillChange]
-	public function current() {
-		return $this->row;
-	}
-
-	#[\ReturnTypeWillChange]
-	public function key() {
-		return $this->pos;
-	}
-
-	/**
-	 * Sauter a une position absolue.
-	 *
-	 * @param int         $n
-	 * @param null|string $continue
-	 *
-	 * @return bool
-	 */
-	public function seek($n = 0, $continue = null) {
-		if (!sql_seek($this->sqlresult, $n, $this->command['connect'], $continue)) {
-			// SQLite ne sait pas seek(), il faut relancer la query
-			// si la position courante est apres la position visee
-			// il faut relancer la requete
-			if ($this->pos > $n) {
-				$this->free();
-				$this->select();
-				$this->valid();
-			}
-			// et utiliser la methode par defaut pour se deplacer au bon endroit
-			// (sera fait en cas d'echec de cette fonction)
-			return false;
-		}
-		$this->row = sql_fetch($this->sqlresult, $this->command['connect']);
-		$this->pos = min($n, $this->count());
-
-		return true;
-	}
-
-	/**
-	 * Avancer d'un cran.
-	 */
-	public function next(): void {
-		$this->row = sql_fetch($this->sqlresult, $this->command['connect']);
-		++$this->pos;
-		$this->firstseek |= true;
-	}
-
-	/**
-	 * Avancer et retourner les donnees pour le nouvel element.
-	 *
-	 * @return null|array|bool
-	 */
-	public function fetch() {
-		if ($this->valid()) {
-			$r = $this->current();
-			$this->next();
-		} else {
-			$r = false;
-		}
-
-		return $r;
-	}
-
-	/**
-	 * liberer les ressources.
-	 *
-	 * @return bool
-	 */
-	public function free() {
-		if (!$this->sqlresult) {
-			return true;
-		}
-		$a = sql_free($this->sqlresult, $this->command['connect']);
-		$this->sqlresult = null;
-
-		return $a;
-	}
-
-	/**
-	 * Compter le nombre de resultats.
-	 *
-	 * @return int
-	 */
-	public function count() {
-		if (is_null($this->total)) {
-			if (!$this->sqlresult) {
-				$this->total = 0;
-			} else {
-				// cas count(*)
-				if (in_array('count(*)', $this->command['select'])) {
-					$this->valid();
-					$s = $this->current();
-					$this->total = $s['count(*)'];
-				} else {
-					$this->total = sql_count($this->sqlresult, $this->command['connect']);
-				}
-			}
-		}
-
-		return $this->total;
-	}
-
-	/**
-	 * selectionner les donnees, ie faire la requete SQL.
-	 */
-	protected function select() {
-		$this->row = null;
-		$v = &$this->command;
-		$this->sqlresult = calculer_select(
-			$v['select'],
-			$v['from'],
-			$v['type'],
-			$v['where'],
-			$v['join'],
-			$v['groupby'],
-			$v['orderby'],
-			$v['limit'],
-			$v['having'],
-			$v['table'],
-			$v['id'],
-			$v['connect'],
-			$this->info
-		);
-		$this->err = !$this->sqlresult;
-		$this->firstseek = false;
-		$this->pos = -1;
-
-		// pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite)
-		//$this->total = $this->count();
-	}
+    public function __construct(array $command, array $info = []) {
+        $this->type = 'SQL';
+        parent::__construct($command, $info);
+
+        $this->select();
+    }
+
+    /**
+     * Rembobiner.
+     *
+     * @return bool
+     */
+    public function rewind(): void {
+        if ($this->pos > 0) {
+            $this->seek(0);
+        }
+    }
+
+    /**
+     * Verifier l'etat de l'iterateur.
+     */
+    public function valid(): bool {
+        if ($this->err) {
+            return false;
+        }
+        if (!$this->firstseek) {
+            $this->next();
+        }
+
+        return is_array($this->row);
+    }
+
+    /**
+     * Valeurs sur la position courante.
+     *
+     * @return array
+     */
+    #[\ReturnTypeWillChange]
+    public function current() {
+        return $this->row;
+    }
+
+    #[\ReturnTypeWillChange]
+    public function key() {
+        return $this->pos;
+    }
+
+    /**
+     * Sauter a une position absolue.
+     *
+     * @param int         $n
+     * @param null|string $continue
+     *
+     * @return bool
+     */
+    public function seek($n = 0, $continue = null) {
+        if (!sql_seek($this->sqlresult, $n, $this->command['connect'], $continue)) {
+            // SQLite ne sait pas seek(), il faut relancer la query
+            // si la position courante est apres la position visee
+            // il faut relancer la requete
+            if ($this->pos > $n) {
+                $this->free();
+                $this->select();
+                $this->valid();
+            }
+            // et utiliser la methode par defaut pour se deplacer au bon endroit
+            // (sera fait en cas d'echec de cette fonction)
+            return false;
+        }
+        $this->row = sql_fetch($this->sqlresult, $this->command['connect']);
+        $this->pos = min($n, $this->count());
+
+        return true;
+    }
+
+    /**
+     * Avancer d'un cran.
+     */
+    public function next(): void {
+        $this->row = sql_fetch($this->sqlresult, $this->command['connect']);
+        ++$this->pos;
+        $this->firstseek |= true;
+    }
+
+    /**
+     * Avancer et retourner les donnees pour le nouvel element.
+     *
+     * @return null|array|bool
+     */
+    public function fetch() {
+        if ($this->valid()) {
+            $r = $this->current();
+            $this->next();
+        } else {
+            $r = false;
+        }
+
+        return $r;
+    }
+
+    /**
+     * liberer les ressources.
+     *
+     * @return bool
+     */
+    public function free() {
+        if (!$this->sqlresult) {
+            return true;
+        }
+        $a = sql_free($this->sqlresult, $this->command['connect']);
+        $this->sqlresult = null;
+
+        return $a;
+    }
+
+    /**
+     * Compter le nombre de resultats.
+     *
+     * @return int
+     */
+    public function count() {
+        if (is_null($this->total)) {
+            if (!$this->sqlresult) {
+                $this->total = 0;
+            } else {
+                // cas count(*)
+                if (in_array('count(*)', $this->command['select'])) {
+                    $this->valid();
+                    $s = $this->current();
+                    $this->total = $s['count(*)'];
+                } else {
+                    $this->total = sql_count($this->sqlresult, $this->command['connect']);
+                }
+            }
+        }
+
+        return $this->total;
+    }
+
+    /**
+     * selectionner les donnees, ie faire la requete SQL.
+     */
+    protected function select() {
+        $this->row = null;
+        $v = &$this->command;
+        $this->sqlresult = calculer_select(
+            $v['select'],
+            $v['from'],
+            $v['type'],
+            $v['where'],
+            $v['join'],
+            $v['groupby'],
+            $v['orderby'],
+            $v['limit'],
+            $v['having'],
+            $v['table'],
+            $v['id'],
+            $v['connect'],
+            $this->info
+        );
+        $this->err = !$this->sqlresult;
+        $this->firstseek = false;
+        $this->pos = -1;
+
+        // pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite)
+        //$this->total = $this->count();
+    }
 }

ecrire/src/Compilateur/Iterateur/AbstractIterateur.php

Indentation +15 added lines, -15 removed lines

@@ -4,24 +4,24 @@
 
 abstract class AbstractIterateur
 {
-	protected string $type;
+    protected string $type;
 
-	/**
-	 * Calcul du total des elements
-	 *
-	 * @var int|null
-	 **/
-	public $total = null;
+    /**
+     * Calcul du total des elements
+     *
+     * @var int|null
+     **/
+    public $total = null;
 
-	/** Erreur presente ? **/
-	public bool $err = false;
+    /** Erreur presente ? **/
+    public bool $err = false;
 
-	protected array $command = [];
+    protected array $command = [];
 
-	protected array $info = [];
+    protected array $info = [];
 
-	public function __construct(array $command, array $info = []) {
-		$this->command = $command;
-		$this->info = $info;
-	}
+    public function __construct(array $command, array $info = []) {
+        $this->command = $command;
+        $this->info = $info;
+    }
 }

ecrire/src/Compilateur/Noeud/Boucle.php

Indentation +363 added lines, -363 removed lines

@@ -7,367 +7,367 @@
  */
 class Boucle
 {
-	/** Type de noeud */
-	public string $type = 'boucle';
-
-	/** Identifiant de la boucle */
-	public string $id_boucle;
-
-	/** Identifiant de la boucle parente */
-	public string $id_parent = '';
-
-	/** Un nom explicite qui peut être affecté manuellement à certaines boucles générées */
-	public string $nom = '';
-
-	/**
-	 * Partie avant toujours affichee
-	 *
-	 * @var string|array
-	 */
-	public $preaff = '';
-
-	/**
-	 * Partie optionnelle avant
-	 *
-	 * @var string|array
-	 */
-	public $avant = '';
-
-	/**
-	 * Pour chaque élément
-	 *
-	 * @var string|array
-	 */
-	public $milieu = '';
-
-	/**
-	 * Partie optionnelle après
-	 *
-	 * @var string|array
-	 */
-	public $apres = '';
-
-	/**
-	 * Partie alternative, si pas de résultat dans la boucle
-	 *
-	 * @var string|array
-	 */
-	public $altern = '';
-
-	/**
-	 * Partie apres toujours affichee
-	 *
-	 * @var string|array
-	 */
-	public $postaff = '';
-
-
-	/**
-	 * La boucle doit-elle sélectionner la langue ?
-	 *
-	 * Valeurs : '', 'oui', 'non'
-	 */
-	public string $lang_select = '';
-
-	/**
-	 * Alias de table d'application de la requête ou nom complet de la table SQL
-	 *
-	 * FIXME: un seul typage (string ?)
-	 *
-	 * @var string|false|null
-	 */
-	public $type_requete = null;
-
-	/**
-	 * La table est elle optionnelle ?
-	 *
-	 * Si oui, aucune erreur ne sera générée si la table demandée n'est pas présente
-	 */
-	public bool $table_optionnelle = false;
-
-	/**
-	 * Nom du fichier de connexion
-	 */
-	public string $sql_serveur = '';
-
-	/**
-	 * Paramètres de la boucle
-	 *
-	 * Description des paramètres passés à la boucle, qui servent ensuite
-	 * au calcul des critères
-	 *
-	 * FIXME: type unique.
-	 * @var false|array
-	 *     - false: erreur de syntaxe
-	 */
-	public $param = [];
-
-	/**
-	 * Critères de la boucle
-	 *
-	 * FIXME: type array unique.
-	 *
-	 * @var string|Critere[]
-	 * - string: phrasage (code brut). Il reste si erreur de critère
-	 * - array: analyse correcte des critères...
-	 */
-	public $criteres = [];
-
-	/**
-	 * Textes insérés entre 2 éléments de boucle (critère inter)
-	 *
-	 * @var string[]
-	 */
-	public array $separateur = [];
-
-	/**
-	 * Liste des jointures possibles avec cette table
-	 *
-	 * Les jointures par défaut de la table sont complétées en priorité
-	 * des jointures déclarées explicitement sur la boucle
-	 *
-	 * @see base_trouver_table_dist()
-	 */
-	public array $jointures = [];
-
-	/**
-	 * Jointures explicites avec cette table
-	 *
-	 * Ces jointures sont utilisées en priorité par rapport aux jointures
-	 * normales possibles pour retrouver les colonnes demandées extérieures
-	 * à la boucle.
-	 *
-	 * @var string|bool
-	 */
-	public $jointures_explicites = false;
-
-	/**
-	 * Nom de la variable PHP stockant le noms de doublons utilisés "$doublons_index"
-	 */
-	public string $doublons = '';
-
-	/**
-	 * Code PHP ajouté au début de chaque itération de boucle.
-	 *
-	 * Utilisé entre autre par les critères {pagination}, {n-a,b}, {a/b}...
-	 */
-	public string $partie = '';
-
-	/**
-	 * Nombre de divisions de la boucle, d'éléments à afficher,
-	 * ou de soustractions d'éléments à faire
-	 *
-	 * Dans les critères limitant le nombre d'éléments affichés
-	 * {a,b}, {a,n-b}, {a/b}, {pagination b}, b est affecté à total_parties.
-	 */
-	public string $total_parties = '';
-
-	/**
-	 * Code PHP ajouté avant l'itération de boucle.
-	 *
-	 * Utilisé entre autre par les critères {pagination}, {a,b}, {a/b}
-	 * pour initialiser les variables de début et de fin d'itération.
-	 */
-	public string $mode_partie = '';
-
-	/**
-	 * Identifiant d'une boucle qui appelle celle-ci de manière récursive
-	 *
-	 * Si une boucle est appelée de manière récursive quelque part par
-	 * une autre boucle comme <BOUCLE_rec(boucle_identifiant) />, cette
-	 * boucle (identifiant) reçoit dans cette propriété l'identifiant
-	 * de l'appelant (rec)
-	 */
-	public string $externe = '';
-
-	// champs pour la construction de la requete SQL
-
-	/**
-	 * Liste des champs à récupérer par la boucle
-	 *
-	 * Expression 'table.nom_champ' ou calculée 'nom_champ AS x'
-	 *
-	 * @var string[]
-	 */
-	public array $select = [];
-
-	/**
-	 * Liste des alias / tables SQL utilisées dans la boucle
-	 *
-	 * L'index est un identifiant (xx dans spip_xx assez souvent) qui servira
-	 * d'alias au nom de la table ; la valeur est le nom de la table SQL désirée.
-	 *
-	 * L'index 0 peut définir le type de sources de données de l'itérateur DATA
-	 *
-	 * @var string[]
-	 */
-	public array $from = [];
-
-	/**
-	 * Liste des alias / type de jointures utilisées dans la boucle
-	 *
-	 * L'index est le nom d'alias (comme pour la propriété $from), et la valeur
-	 * un type de jointure parmi 'INNER', 'LEFT', 'RIGHT', 'OUTER'.
-	 *
-	 * Lorsque le type n'est pas déclaré pour un alias, c'est 'INNER'
-	 * qui sera utilisé par défaut (créant donc un INNER JOIN).
-	 *
-	 * @var string[]
-	 */
-	public array $from_type = [];
-
-	/**
-	 * Liste des conditions WHERE de la boucle
-	 *
-	 * Permet de restreindre les éléments retournés par une boucle
-	 * en fonctions des conditions transmises dans ce tableau.
-	 *
-	 * Ce tableau peut avoir plusieurs niveaux de profondeur.
-	 *
-	 * Les éléments du premier niveau sont reliés par des AND, donc
-	 * chaque élément ajouté directement au where par
-	 * $boucle->where[] = array(...) ou $boucle->where[] = "'expression'"
-	 * est une condition AND en plus.
-	 *
-	 * Par contre, lorsqu'on indique un tableau, il peut décrire des relations
-	 * internes différentes. Soit $expr un tableau d'expressions quelconques de 3 valeurs :
-	 * $expr = array(operateur, val1, val2)
-	 *
-	 * Ces 3 valeurs sont des expressions PHP. L'index 0 désigne l'opérateur
-	 * à réaliser tel que :
-	 *
-	 * - "'='" , "'>='", "'<'", "'IN'", "'REGEXP'", "'LIKE'", ... :
-	 *    val1 et val2 sont des champs et valeurs à utiliser dans la comparaison
-	 *    suivant cet ordre : "val1 operateur val2".
-	 *    Exemple : $boucle->where[] = array("'='", "'articles.statut'", "'\"publie\"'");
-	 * - "'AND'", "'OR'", "'NOT'" :
-	 *    dans ce cas val1 et val2 sont également des expressions
-	 *    de comparaison complètes, et peuvent être eux-même des tableaux comme $expr
-	 *    Exemples :
-	 *    $boucle->where[] = array("'OR'", $expr1, $expr2);
-	 *    $boucle->where[] = array("'NOT'", $expr); // val2 n'existe pas avec NOT
-	 *
-	 * D'autres noms sont possibles pour l'opérateur (le nombre de valeurs diffère) :
-	 * - "'SELF'", "'SUBSELECT'" : indiquent des sous requêtes
-	 * - "'?'" : indique une condition à faire évaluer (val1 ? val2 : val3)
-	 */
-	public array $where = [];
-
-	public array $join = [];
-	public array $having = [];
-	public $limit = '';
-	public array $group = [];
-	public array $order = [];
-	public array $default_order = [];
-	public string $date = 'date';
-	public string $hash = '';
-	public $in = '';
-	public bool $sous_requete = false;
-
-	/**
-	 * Code PHP qui sera ajouté en tout début de la fonction de boucle
-	 *
-	 * Il sert à insérer le code calculant une hierarchie
-	 */
-	public string $hierarchie = '';
-
-	// champs pour la construction du corps PHP
-
-	/**
-	 * Description des sources de données de la boucle
-	 *
-	 * Description des données de la boucle issu de trouver_table
-	 * dans le cadre de l'itérateur SQL et contenant au moins l'index 'field'.
-	 *
-	 * @see base_trouver_table_dist()
-	 */
-	public array $show = [];
-
-	/**
-	 * Nom de la table SQL principale de la boucle, sans son préfixe
-	 */
-	public string $id_table = '';
-
-	/**
-	 * Nom de la clé primaire de la table SQL principale de la boucle
-	 */
-	public string $primary = '';
-
-	/**
-	 * Code PHP compilé de la boucle
-	 *
-	 * FIXME: un seul type (string ?)
-	 *
-	 * - false: boucle fautive ?
-	 *
-	 * @var string|false
-	 */
-	public $return = '';
-
-	public $numrows = false;
-	public $cptrows = false;
-
-	/**
-	 * Description du squelette
-	 *
-	 * Sert pour la gestion d'erreur et la production de code dependant du contexte
-	 *
-	 * Peut contenir les index :
-	 *
-	 * - nom : Nom du fichier de cache
-	 * - gram : Nom de la grammaire du squelette (détermine le phraseur à utiliser)
-	 * - sourcefile : Chemin du squelette
-	 * - squelette : Code du squelette
-	 * - id_mere : Identifiant de la boucle parente
-	 * - documents : Pour embed et img dans les textes
-	 * - session : Pour un cache sessionné par auteur
-	 * - niv : Niveau de tabulation
-	 */
-	public array $descr = [];
-
-	/** Numéro de ligne dans le code source du squelette */
-	public int $ligne = 0;
-
-
-	/**
-	 * table pour stocker les modificateurs de boucle tels que tout, plat ...,
-	 * utilisable par les plugins egalement
-	 *
-	 * @var array<string, mixed>
-	 */
-	public array $modificateur = [];
-
-	/**
-	 * Type d'itérateur utilisé pour cette boucle
-	 *
-	 * - 'SQL' dans le cadre d'une boucle sur une table SQL
-	 * - 'DATA' pour l'itérateur DATA, ...
-	 *
-	 * @var string
-	 */
-	public string $iterateur = ''; // type d'iterateur
-
-	/**
-	 * @var array $debug Textes qui seront insérés dans l’entête de boucle du mode debug
-	 */
-	public array $debug = [];
-
-	/**
-	 * Index de la boucle dont le champ présent dans cette boucle est originaire,
-	 * notamment si le champ a été trouve dans une boucle parente
-	 *
-	 * Tableau nom du champ => index de boucle
-	*/
-	public array $index_champ = [];
-
-	/** Résultat de la compilation (?) (sert au débusqueur) */
-	public string $code = '';
-
-	/** Source des filtres (compatibilité) (?) */
-	public array $fonctions = [];
-
-	// obsoletes, conserves provisoirement pour compatibilite
-	public $tout = false;
-	public $plat = false;
-	public $lien = false;
+    /** Type de noeud */
+    public string $type = 'boucle';
+
+    /** Identifiant de la boucle */
+    public string $id_boucle;
+
+    /** Identifiant de la boucle parente */
+    public string $id_parent = '';
+
+    /** Un nom explicite qui peut être affecté manuellement à certaines boucles générées */
+    public string $nom = '';
+
+    /**
+     * Partie avant toujours affichee
+     *
+     * @var string|array
+     */
+    public $preaff = '';
+
+    /**
+     * Partie optionnelle avant
+     *
+     * @var string|array
+     */
+    public $avant = '';
+
+    /**
+     * Pour chaque élément
+     *
+     * @var string|array
+     */
+    public $milieu = '';
+
+    /**
+     * Partie optionnelle après
+     *
+     * @var string|array
+     */
+    public $apres = '';
+
+    /**
+     * Partie alternative, si pas de résultat dans la boucle
+     *
+     * @var string|array
+     */
+    public $altern = '';
+
+    /**
+     * Partie apres toujours affichee
+     *
+     * @var string|array
+     */
+    public $postaff = '';
+
+
+    /**
+     * La boucle doit-elle sélectionner la langue ?
+     *
+     * Valeurs : '', 'oui', 'non'
+     */
+    public string $lang_select = '';
+
+    /**
+     * Alias de table d'application de la requête ou nom complet de la table SQL
+     *
+     * FIXME: un seul typage (string ?)
+     *
+     * @var string|false|null
+     */
+    public $type_requete = null;
+
+    /**
+     * La table est elle optionnelle ?
+     *
+     * Si oui, aucune erreur ne sera générée si la table demandée n'est pas présente
+     */
+    public bool $table_optionnelle = false;
+
+    /**
+     * Nom du fichier de connexion
+     */
+    public string $sql_serveur = '';
+
+    /**
+     * Paramètres de la boucle
+     *
+     * Description des paramètres passés à la boucle, qui servent ensuite
+     * au calcul des critères
+     *
+     * FIXME: type unique.
+     * @var false|array
+     *     - false: erreur de syntaxe
+     */
+    public $param = [];
+
+    /**
+     * Critères de la boucle
+     *
+     * FIXME: type array unique.
+     *
+     * @var string|Critere[]
+     * - string: phrasage (code brut). Il reste si erreur de critère
+     * - array: analyse correcte des critères...
+     */
+    public $criteres = [];
+
+    /**
+     * Textes insérés entre 2 éléments de boucle (critère inter)
+     *
+     * @var string[]
+     */
+    public array $separateur = [];
+
+    /**
+     * Liste des jointures possibles avec cette table
+     *
+     * Les jointures par défaut de la table sont complétées en priorité
+     * des jointures déclarées explicitement sur la boucle
+     *
+     * @see base_trouver_table_dist()
+     */
+    public array $jointures = [];
+
+    /**
+     * Jointures explicites avec cette table
+     *
+     * Ces jointures sont utilisées en priorité par rapport aux jointures
+     * normales possibles pour retrouver les colonnes demandées extérieures
+     * à la boucle.
+     *
+     * @var string|bool
+     */
+    public $jointures_explicites = false;
+
+    /**
+     * Nom de la variable PHP stockant le noms de doublons utilisés "$doublons_index"
+     */
+    public string $doublons = '';
+
+    /**
+     * Code PHP ajouté au début de chaque itération de boucle.
+     *
+     * Utilisé entre autre par les critères {pagination}, {n-a,b}, {a/b}...
+     */
+    public string $partie = '';
+
+    /**
+     * Nombre de divisions de la boucle, d'éléments à afficher,
+     * ou de soustractions d'éléments à faire
+     *
+     * Dans les critères limitant le nombre d'éléments affichés
+     * {a,b}, {a,n-b}, {a/b}, {pagination b}, b est affecté à total_parties.
+     */
+    public string $total_parties = '';
+
+    /**
+     * Code PHP ajouté avant l'itération de boucle.
+     *
+     * Utilisé entre autre par les critères {pagination}, {a,b}, {a/b}
+     * pour initialiser les variables de début et de fin d'itération.
+     */
+    public string $mode_partie = '';
+
+    /**
+     * Identifiant d'une boucle qui appelle celle-ci de manière récursive
+     *
+     * Si une boucle est appelée de manière récursive quelque part par
+     * une autre boucle comme <BOUCLE_rec(boucle_identifiant) />, cette
+     * boucle (identifiant) reçoit dans cette propriété l'identifiant
+     * de l'appelant (rec)
+     */
+    public string $externe = '';
+
+    // champs pour la construction de la requete SQL
+
+    /**
+     * Liste des champs à récupérer par la boucle
+     *
+     * Expression 'table.nom_champ' ou calculée 'nom_champ AS x'
+     *
+     * @var string[]
+     */
+    public array $select = [];
+
+    /**
+     * Liste des alias / tables SQL utilisées dans la boucle
+     *
+     * L'index est un identifiant (xx dans spip_xx assez souvent) qui servira
+     * d'alias au nom de la table ; la valeur est le nom de la table SQL désirée.
+     *
+     * L'index 0 peut définir le type de sources de données de l'itérateur DATA
+     *
+     * @var string[]
+     */
+    public array $from = [];
+
+    /**
+     * Liste des alias / type de jointures utilisées dans la boucle
+     *
+     * L'index est le nom d'alias (comme pour la propriété $from), et la valeur
+     * un type de jointure parmi 'INNER', 'LEFT', 'RIGHT', 'OUTER'.
+     *
+     * Lorsque le type n'est pas déclaré pour un alias, c'est 'INNER'
+     * qui sera utilisé par défaut (créant donc un INNER JOIN).
+     *
+     * @var string[]
+     */
+    public array $from_type = [];
+
+    /**
+     * Liste des conditions WHERE de la boucle
+     *
+     * Permet de restreindre les éléments retournés par une boucle
+     * en fonctions des conditions transmises dans ce tableau.
+     *
+     * Ce tableau peut avoir plusieurs niveaux de profondeur.
+     *
+     * Les éléments du premier niveau sont reliés par des AND, donc
+     * chaque élément ajouté directement au where par
+     * $boucle->where[] = array(...) ou $boucle->where[] = "'expression'"
+     * est une condition AND en plus.
+     *
+     * Par contre, lorsqu'on indique un tableau, il peut décrire des relations
+     * internes différentes. Soit $expr un tableau d'expressions quelconques de 3 valeurs :
+     * $expr = array(operateur, val1, val2)
+     *
+     * Ces 3 valeurs sont des expressions PHP. L'index 0 désigne l'opérateur
+     * à réaliser tel que :
+     *
+     * - "'='" , "'>='", "'<'", "'IN'", "'REGEXP'", "'LIKE'", ... :
+     *    val1 et val2 sont des champs et valeurs à utiliser dans la comparaison
+     *    suivant cet ordre : "val1 operateur val2".
+     *    Exemple : $boucle->where[] = array("'='", "'articles.statut'", "'\"publie\"'");
+     * - "'AND'", "'OR'", "'NOT'" :
+     *    dans ce cas val1 et val2 sont également des expressions
+     *    de comparaison complètes, et peuvent être eux-même des tableaux comme $expr
+     *    Exemples :
+     *    $boucle->where[] = array("'OR'", $expr1, $expr2);
+     *    $boucle->where[] = array("'NOT'", $expr); // val2 n'existe pas avec NOT
+     *
+     * D'autres noms sont possibles pour l'opérateur (le nombre de valeurs diffère) :
+     * - "'SELF'", "'SUBSELECT'" : indiquent des sous requêtes
+     * - "'?'" : indique une condition à faire évaluer (val1 ? val2 : val3)
+     */
+    public array $where = [];
+
+    public array $join = [];
+    public array $having = [];
+    public $limit = '';
+    public array $group = [];
+    public array $order = [];
+    public array $default_order = [];
+    public string $date = 'date';
+    public string $hash = '';
+    public $in = '';
+    public bool $sous_requete = false;
+
+    /**
+     * Code PHP qui sera ajouté en tout début de la fonction de boucle
+     *
+     * Il sert à insérer le code calculant une hierarchie
+     */
+    public string $hierarchie = '';
+
+    // champs pour la construction du corps PHP
+
+    /**
+     * Description des sources de données de la boucle
+     *
+     * Description des données de la boucle issu de trouver_table
+     * dans le cadre de l'itérateur SQL et contenant au moins l'index 'field'.
+     *
+     * @see base_trouver_table_dist()
+     */
+    public array $show = [];
+
+    /**
+     * Nom de la table SQL principale de la boucle, sans son préfixe
+     */
+    public string $id_table = '';
+
+    /**
+     * Nom de la clé primaire de la table SQL principale de la boucle
+     */
+    public string $primary = '';
+
+    /**
+     * Code PHP compilé de la boucle
+     *
+     * FIXME: un seul type (string ?)
+     *
+     * - false: boucle fautive ?
+     *
+     * @var string|false
+     */
+    public $return = '';
+
+    public $numrows = false;
+    public $cptrows = false;
+
+    /**
+     * Description du squelette
+     *
+     * Sert pour la gestion d'erreur et la production de code dependant du contexte
+     *
+     * Peut contenir les index :
+     *
+     * - nom : Nom du fichier de cache
+     * - gram : Nom de la grammaire du squelette (détermine le phraseur à utiliser)
+     * - sourcefile : Chemin du squelette
+     * - squelette : Code du squelette
+     * - id_mere : Identifiant de la boucle parente
+     * - documents : Pour embed et img dans les textes
+     * - session : Pour un cache sessionné par auteur
+     * - niv : Niveau de tabulation
+     */
+    public array $descr = [];
+
+    /** Numéro de ligne dans le code source du squelette */
+    public int $ligne = 0;
+
+
+    /**
+     * table pour stocker les modificateurs de boucle tels que tout, plat ...,
+     * utilisable par les plugins egalement
+     *
+     * @var array<string, mixed>
+     */
+    public array $modificateur = [];
+
+    /**
+     * Type d'itérateur utilisé pour cette boucle
+     *
+     * - 'SQL' dans le cadre d'une boucle sur une table SQL
+     * - 'DATA' pour l'itérateur DATA, ...
+     *
+     * @var string
+     */
+    public string $iterateur = ''; // type d'iterateur
+
+    /**
+     * @var array $debug Textes qui seront insérés dans l’entête de boucle du mode debug
+     */
+    public array $debug = [];
+
+    /**
+     * Index de la boucle dont le champ présent dans cette boucle est originaire,
+     * notamment si le champ a été trouve dans une boucle parente
+     *
+     * Tableau nom du champ => index de boucle
+     */
+    public array $index_champ = [];
+
+    /** Résultat de la compilation (?) (sert au débusqueur) */
+    public string $code = '';
+
+    /** Source des filtres (compatibilité) (?) */
+    public array $fonctions = [];
+
+    // obsoletes, conserves provisoirement pour compatibilite
+    public $tout = false;
+    public $plat = false;
+    public $lien = false;
 }

ecrire/src/Compilateur/Noeud/Inclure.php

Indentation +52 added lines, -52 removed lines

@@ -7,63 +7,63 @@
  **/
 class Inclure
 {
-	/** Type de noeud */
-	public string $type = 'include';
+    /** Type de noeud */
+    public string $type = 'include';
 
-	/**
-	 * Nom d'un fichier inclu
-	 *
-	 * - Objet Texte si inclusion d'un autre squelette
-	 * - chaîne si inclusion d'un fichier PHP directement
-	 *
-	 * @var string|Texte
-	 */
-	public $texte;
+    /**
+     * Nom d'un fichier inclu
+     *
+     * - Objet Texte si inclusion d'un autre squelette
+     * - chaîne si inclusion d'un fichier PHP directement
+     *
+     * @var string|Texte
+     */
+    public $texte;
 
-	/**
-	 * Inutilisé, propriété générique de l'AST
-	 *
-	 * @var string|array
-	 */
-	public $avant = '';
+    /**
+     * Inutilisé, propriété générique de l'AST
+     *
+     * @var string|array
+     */
+    public $avant = '';
 
-	/**
-	 * Inutilisé, propriété générique de l'AST
-	 *
-	 * @var string|array
-	 */
-	public $apres = '';
+    /**
+     * Inutilisé, propriété générique de l'AST
+     *
+     * @var string|array
+     */
+    public $apres = '';
 
-	/** Numéro de ligne dans le code source du squelette */
-	public int $ligne = 0;
+    /** Numéro de ligne dans le code source du squelette */
+    public int $ligne = 0;
 
-	/**
-	 * Valeurs des paramètres
-	 *
-	 * FIXME: type unique.
-	 * @var false|array
-	 *     - false: erreur de syntaxe
-	 */
-	public $param = [];
+    /**
+     * Valeurs des paramètres
+     *
+     * FIXME: type unique.
+     * @var false|array
+     *     - false: erreur de syntaxe
+     */
+    public $param = [];
 
-	/** Source des filtres (compatibilité) (?) */
-	public array $fonctions = [];
+    /** Source des filtres (compatibilité) (?) */
+    public array $fonctions = [];
 
-	/**
-	 * Description du squelette
-	 *
-	 * Sert pour la gestion d'erreur et la production de code dependant du contexte
-	 *
-	 * Peut contenir les index :
-	 *
-	 * - nom : Nom du fichier de cache
-	 * - gram : Nom de la grammaire du squelette (détermine le phraseur à utiliser)
-	 * - sourcefile : Chemin du squelette
-	 * - squelette : Code du squelette
-	 * - id_mere : Identifiant de la boucle parente
-	 * - documents : Pour embed et img dans les textes
-	 * - session : Pour un cache sessionné par auteur
-	 * - niv : Niveau de tabulation
-	 */
-	public array $descr = [];
+    /**
+     * Description du squelette
+     *
+     * Sert pour la gestion d'erreur et la production de code dependant du contexte
+     *
+     * Peut contenir les index :
+     *
+     * - nom : Nom du fichier de cache
+     * - gram : Nom de la grammaire du squelette (détermine le phraseur à utiliser)
+     * - sourcefile : Chemin du squelette
+     * - squelette : Code du squelette
+     * - id_mere : Identifiant de la boucle parente
+     * - documents : Pour embed et img dans les textes
+     * - session : Pour un cache sessionné par auteur
+     * - niv : Niveau de tabulation
+     */
+    public array $descr = [];
 }

ecrire/src/Compilateur/Noeud/Texte.php

Indentation +22 added lines, -22 removed lines

@@ -7,30 +7,30 @@
  **/
 class Texte
 {
-	/** Type de noeud */
-	public string $type = 'texte';
+    /** Type de noeud */
+    public string $type = 'texte';
 
-	/** Le texte */
-	public string $texte;
+    /** Le texte */
+    public string $texte;
 
-	/**
-	 * Contenu avant le texte.
-	 *
-	 * Vide ou apostrophe simple ou double si le texte en était entouré
-	 *
-	 * @var string|array
-	 */
-	public $avant = '';
+    /**
+     * Contenu avant le texte.
+     *
+     * Vide ou apostrophe simple ou double si le texte en était entouré
+     *
+     * @var string|array
+     */
+    public $avant = '';
 
-	/**
-	 * Contenu après le texte.
-	 *
-	 * Vide ou apostrophe simple ou double si le texte en était entouré
-	 *
-	 * @var string|array
-	 */
-	public $apres = '';
+    /**
+     * Contenu après le texte.
+     *
+     * Vide ou apostrophe simple ou double si le texte en était entouré
+     *
+     * @var string|array
+     */
+    public $apres = '';
 
-	/** Numéro de ligne dans le code source du squelette */
-	public int $ligne = 0;
+    /** Numéro de ligne dans le code source du squelette */
+    public int $ligne = 0;
 }