spip / SPIP

ecrire/balise/url_.php

Spacing +11 added lines, -11 removed lines

@@ -76,7 +76,7 @@ 
 	if ($s = trouver_nom_serveur_distant($p)) {
 
 		// si une fonction de generation des url a ete definie pour ce connect l'utiliser
-		if (function_exists($f = 'generer_generer_url_' . $s)) {
+		if (function_exists($f = 'generer_generer_url_'.$s)) {
 			return $f($type, $_id, $s);
 		}
 		if (!$GLOBALS['connexions'][strtolower($s)]['spip_connect_version']) {
@@ -86,8 +86,8 @@ 
 		# exception des urls de documents sur un serveur distant...
 		if ($type == 'document') {
 			return
-				"quete_meta('adresse_site', $s) . '/' .\n\t" .
-				"quete_meta('dir_img', $s) . \n\t" .
+				"quete_meta('adresse_site', $s) . '/' .\n\t".
+				"quete_meta('dir_img', $s) . \n\t".
 				"quete_fichier($_id,$s)";
 		}
 		$s = ", '', '', $s, quete_meta('type_urls', $s)";
@@ -231,7 +231,7 @@ 
  */
 function balise_URL_SITE_SPIP_dist($p) {
 	$p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')";
-	$p->code = "spip_htmlspecialchars(" . $p->code . ")";
+	$p->code = "spip_htmlspecialchars(".$p->code.")";
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -272,7 +272,7 @@ 
 	if ($s = trouver_nom_serveur_distant($p)) {
 		// si une fonction de generation des url a ete definie pour ce connect l'utiliser
 		// elle devra aussi traiter le cas derogatoire type=page
-		if (function_exists($f = 'generer_generer_url_' . $s)) {
+		if (function_exists($f = 'generer_generer_url_'.$s)) {
 			if ($args and $args !== "''") {
 				$code .= ", $args";
 			}
@@ -280,7 +280,7 @@ 
 			$p->code = $code;
 			return $p;
 		}
-		$s = 'connect=' . addslashes($s);
+		$s = 'connect='.addslashes($s);
 		$args = (($args and $args !== "''") ? "$args . '&$s'" : "'$s'");
 	}
 
@@ -295,7 +295,7 @@ 
 		$code = "generer_url_public($code, $args$noentities)";
 	}
 	$p->code = $code;
-	spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO);
+	spip_log("Calcul url page : connect vaut $s ca donne :".$p->code." args $args", _LOG_INFO);
 
 	#$p->interdire_scripts = true;
 	return $p;
@@ -339,7 +339,7 @@ 
 			$fonc .= ",$args$noentities";
 		}
 	}
-	$p->code = 'generer_url_ecrire(' . $fonc . ')';
+	$p->code = 'generer_url_ecrire('.$fonc.')';
 	$p->interdire_scripts = false;
 
 	return $p;
@@ -374,17 +374,17 @@ 
 
 	$args = interprete_argument_balise(2, $p);
 	if ($args != "''" && $args !== null) {
-		$p->code .= "," . $args;
+		$p->code .= ",".$args;
 	}
 	$redirect = interprete_argument_balise(3, $p);
 	if ($redirect != "''" && $redirect !== null) {
 		if ($args == "''" || $args === null) {
 			$p->code .= ",''";
 		}
-		$p->code .= "," . $redirect;
+		$p->code .= ",".$redirect;
 	}
 
-	$p->code = "generer_action_auteur(" . $p->code . ")";
+	$p->code = "generer_action_auteur(".$p->code.")";
 	$p->interdire_scripts = false;
 
 	return $p;

prive/formulaires/login.php

Spacing +6 added lines, -6 removed lines

@@ -134,7 +134,7 @@ 
 
 	// Si on est connecte, appeler traiter()
 	// et lancer la redirection si besoin
-	if (!$valeurs['editable'] and $loge and _request('formulaire_action')!=='login') {
+	if (!$valeurs['editable'] and $loge and _request('formulaire_action') !== 'login') {
 		$traiter = charger_fonction('traiter', 'formulaires/login');
 		$res = $traiter($cible, $login, $prive);
 		$valeurs = array_merge($valeurs, $res);
@@ -144,7 +144,7 @@ 
 			# preparer un lien pour quand redirige_formulaire ne fonctionne pas
 			$m = redirige_formulaire($res['redirect']);
 			$valeurs['_deja_loge'] = inserer_attribut(
-				'<a>' . _T('login_par_ici') . "</a>$m",
+				'<a>'._T('login_par_ici')."</a>$m",
 				'href',
 				$res['redirect']
 			);
@@ -290,7 +290,7 @@ 
 function login_autoriser() {
 	include_spip('inc/autoriser');
 	if (!autoriser('ecrire')) {
-		$h = generer_url_action('logout', 'logout=prive&url=' . urlencode(self()));
+		$h = generer_url_action('logout', 'logout=prive&url='.urlencode(self()));
 
 		return array(
 			'message_erreur' => '<h1>'
@@ -298,7 +298,7 @@ 
 				. '</h1><p>'
 				. _T('texte_erreur_visiteur')
 				. "</p><p class='retour'>[<a href='$h'>"
-				. _T('icone_deconnecter') . '</a>]</p>'
+				. _T('icone_deconnecter').'</a>]</p>'
 		);
 	}
 
@@ -350,7 +350,7 @@ 
 		// transformer la cible absolue en cible relative
 		// pour pas echouer quand la meta adresse_site est foireuse
 		if (strncmp($cible, $u = url_de_base(), strlen($u)) == 0) {
-			$cible = './' . substr($cible, strlen($u));
+			$cible = './'.substr($cible, strlen($u));
 		} elseif (tester_url_absolue($cible) and !defined('_AUTORISER_LOGIN_ABS_REDIRECT')) {
 			// si c'est une url absolue, refuser la redirection
 			// sauf si cette securite est levee volontairement par le webmestre
@@ -362,7 +362,7 @@ 
 	if ($cible and ($cible != self('&')) and ($cible != self())) {
 		$res['redirect'] = $cible;
 		$res['message_ok'] = inserer_attribut(
-			'<a>' . _T('login_par_ici') . '</a>',
+			'<a>'._T('login_par_ici').'</a>',
 			'href',
 			$cible
 		);

ecrire/inc/autoriser.php

Spacing +38 added lines, -38 removed lines

@@ -114,7 +114,7 @@ 
 // mais apres la fonction autoriser()
 if ($f = find_in_path('mes_fonctions.php')) {
 	global $dossier_squelettes;
-	include_once(_ROOT_CWD . $f);
+	include_once(_ROOT_CWD.$f);
 }
 
 
@@ -148,7 +148,7 @@ 
 		$qui = $GLOBALS['visiteur_session'] ? $GLOBALS['visiteur_session'] : array();
 		$qui = array_merge(array('statut' => '', 'id_auteur' => 0, 'webmestre' => 'non'), $qui);
 	} elseif (is_numeric($qui)) {
-		$qui = sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . $qui);
+		$qui = sql_fetsel('*', 'spip_auteurs', 'id_auteur='.$qui);
 	}
 
 	// Admins restreints, on construit ici (pas generique mais...)
@@ -158,8 +158,8 @@ 
 	}
 
 	spip_log(
-		"autoriser $faire $type $id (" . (isset($qui['nom']) ? $qui['nom'] : '') . ') ?',
-		'autoriser' . _LOG_DEBUG
+		"autoriser $faire $type $id (".(isset($qui['nom']) ? $qui['nom'] : '').') ?',
+		'autoriser'._LOG_DEBUG
 	);
 
 	// passer par objet_type pour avoir les alias
@@ -170,7 +170,7 @@ 
 	if ((isset($GLOBALS['autoriser_exception'][$faire][$type][$id]) and autoriser_exception($faire, $type, $id, 'verifier'))
 	  or (isset($GLOBALS['autoriser_exception'][$faire][$type]['*']) and autoriser_exception($faire, $type, '*', 'verifier'))
 	) {
-		spip_log("autoriser ($faire, $type, $id, " . (isset($qui['nom']) ? $qui['nom'] : '') . ') : OK Exception', 'autoriser' . _LOG_DEBUG);
+		spip_log("autoriser ($faire, $type, $id, ".(isset($qui['nom']) ? $qui['nom'] : '').') : OK Exception', 'autoriser'._LOG_DEBUG);
 		return true;
 	}
 
@@ -179,18 +179,18 @@ 
 	// autoriser_faire[_dist], autoriser_defaut[_dist]
 	$fonctions = $type
 		? array(
-			'autoriser_' . $type . '_' . $faire,
-			'autoriser_' . $type . '_' . $faire . '_dist',
-			'autoriser_' . $type,
-			'autoriser_' . $type . '_dist',
-			'autoriser_' . $faire,
-			'autoriser_' . $faire . '_dist',
+			'autoriser_'.$type.'_'.$faire,
+			'autoriser_'.$type.'_'.$faire.'_dist',
+			'autoriser_'.$type,
+			'autoriser_'.$type.'_dist',
+			'autoriser_'.$faire,
+			'autoriser_'.$faire.'_dist',
 			'autoriser_defaut',
 			'autoriser_defaut_dist'
 		)
 		: array(
-			'autoriser_' . $faire,
-			'autoriser_' . $faire . '_dist',
+			'autoriser_'.$faire,
+			'autoriser_'.$faire.'_dist',
 			'autoriser_defaut',
 			'autoriser_defaut_dist'
 		);
@@ -203,8 +203,8 @@ 
 	}
 
 	spip_log(
-		"$f($faire, $type, $id, " . (isset($qui['nom']) ? $qui['nom'] : '') . ') : ' . ($a ? 'OK' : 'niet'),
-		'autoriser' . _LOG_DEBUG
+		"$f($faire, $type, $id, ".(isset($qui['nom']) ? $qui['nom'] : '').') : '.($a ? 'OK' : 'niet'),
+		'autoriser'._LOG_DEBUG
 	);
 
 	return $a;
@@ -332,7 +332,7 @@ 
 function autoriser_previsualiser_dist($faire, $type, $id, $qui, $opt) {
 
 	// Le visiteur a-t-il un statut prevu par la config ?
-	if (strpos($GLOBALS['meta']['preview'], ',' . $qui['statut'] . ',') !== false) {
+	if (strpos($GLOBALS['meta']['preview'], ','.$qui['statut'].',') !== false) {
 		return test_previsualiser_objet_champ($type, $id, $qui, $opt);
 	}
 
@@ -389,7 +389,7 @@ 
 				} // pas de champ passe a la demande => NIET
 				$previsu = explode(',', $c['previsu']);
 				// regarder si ce statut est autorise pour l'auteur
-				if (in_array($opt[$champ] . '/auteur', $previsu)) {
+				if (in_array($opt[$champ].'/auteur', $previsu)) {
 
 					// retrouver l’id_auteur qui a filé un lien de prévisu éventuellement,
 					// sinon l’auteur en session
@@ -404,11 +404,11 @@ 
 
 					if (!$id_auteur) {
 						return false;
-					} elseif(autoriser('previsualiser' . $opt[$champ], $type, '', $id_auteur)) {
+					} elseif (autoriser('previsualiser'.$opt[$champ], $type, '', $id_auteur)) {
 						// dans ce cas (admin en general), pas de filtrage sur ce statut
 					} elseif (!sql_countsel(
 						'spip_auteurs_liens',
-						'id_auteur=' . intval($id_auteur) . ' AND objet=' . sql_quote($type) . ' AND id_objet=' . intval($id)
+						'id_auteur='.intval($id_auteur).' AND objet='.sql_quote($type).' AND id_objet='.intval($id)
 					)) {
 						return false;
 					} // pas auteur de cet objet => NIET
@@ -446,16 +446,16 @@ 
 			// multilinguisme par secteur et objet rattaché à une rubrique
 			$primary = id_table_objet($type);
 			if ($table != 'spip_rubriques') {
-				$id_rubrique = sql_getfetsel('id_rubrique', "$table", "$primary=" . intval($id));
+				$id_rubrique = sql_getfetsel('id_rubrique', "$table", "$primary=".intval($id));
 			} else {
 				$id_rubrique = $id;
 			}
-			$id_secteur = sql_getfetsel('id_secteur', 'spip_rubriques', 'id_rubrique=' . intval($id_rubrique));
+			$id_secteur = sql_getfetsel('id_secteur', 'spip_rubriques', 'id_rubrique='.intval($id_rubrique));
 			if (!$id_secteur > 0) {
 				$id_secteur = $id_rubrique;
 			}
-			$langue_secteur = sql_getfetsel('lang', 'spip_rubriques', 'id_rubrique=' . intval($id_secteur));
-			$langue_objet = sql_getfetsel('lang', "$table", "$primary=" . intval($id));
+			$langue_secteur = sql_getfetsel('lang', 'spip_rubriques', 'id_rubrique='.intval($id_secteur));
+			$langue_objet = sql_getfetsel('lang', "$table", "$primary=".intval($id));
 			if ($langue_secteur != $langue_objet) {
 				// configuration incohérente, on laisse l'utilisateur corriger la situation
 				return true;
@@ -463,7 +463,7 @@ 
 			if ($table != 'spip_rubriques') { // le choix de la langue se fait seulement sur les rubriques
 				return false;
 			} else {
-				$id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . intval($id));
+				$id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique='.intval($id));
 				if ($id_parent != 0) {
 					// sous-rubriques : pas de choix de langue
 					return false;
@@ -511,7 +511,7 @@ 
 	
 	if (!isset($opt['statut'])) {
 		if (isset($desc['field']['statut'])) {
-			$statut = sql_getfetsel('statut', $desc['table'], id_table_objet($type) . '=' . intval($id));
+			$statut = sql_getfetsel('statut', $desc['table'], id_table_objet($type).'='.intval($id));
 		} else {
 			$statut = 'publie';
 		} // pas de statut => publie
@@ -669,11 +669,11 @@ 
 		return false;
 	}
 
-	if (sql_countsel('spip_rubriques', 'id_parent=' . intval($id))) {
+	if (sql_countsel('spip_rubriques', 'id_parent='.intval($id))) {
 		return false;
 	}
 
-	if (sql_countsel('spip_articles', 'id_rubrique=' . intval($id) . " AND (statut<>'poubelle')")) {
+	if (sql_countsel('spip_articles', 'id_rubrique='.intval($id)." AND (statut<>'poubelle')")) {
 		return false;
 	}
 
@@ -705,7 +705,7 @@ 
  * @return bool          true s'il a le droit, false sinon
  **/
 function autoriser_article_modifier_dist($faire, $type, $id, $qui, $opt) {
-	$r = sql_fetsel('id_rubrique,statut', 'spip_articles', 'id_article=' . sql_quote($id));
+	$r = sql_fetsel('id_rubrique,statut', 'spip_articles', 'id_article='.sql_quote($id));
 
 	return
 		$r
@@ -716,7 +716,7 @@ 
 				(!isset($opt['statut']) or $opt['statut'] !== 'publie')
 				and in_array($qui['statut'], array('0minirezo', '1comite'))
 				and in_array($r['statut'], array('prop', 'prepa', 'poubelle'))
-				and auteurs_objet('article', $id, 'id_auteur=' . $qui['id_auteur'])
+				and auteurs_objet('article', $id, 'id_auteur='.$qui['id_auteur'])
 			)
 		);
 }
@@ -764,7 +764,7 @@ 
 		if (!$id) {
 			return false;
 		}
-		$statut = sql_getfetsel('statut', 'spip_articles', 'id_article=' . intval($id));
+		$statut = sql_getfetsel('statut', 'spip_articles', 'id_article='.intval($id));
 	}
 
 	return
@@ -775,7 +775,7 @@ 
 		or
 		($id
 			and $qui['id_auteur']
-			and auteurs_objet('article', $id, 'id_auteur=' . $qui['id_auteur']));
+			and auteurs_objet('article', $id, 'id_auteur='.$qui['id_auteur']));
 }
 
 
@@ -793,8 +793,8 @@ 
  **/
 function autoriser_voir_dist($faire, $type, $id, $qui, $opt) {
 	# securite, mais on aurait pas du arriver ici !
-	if (function_exists($f = 'autoriser_' . $type . '_voir')
-		or function_exists($f = 'autoriser_' . $type . '_voir_dist')) {
+	if (function_exists($f = 'autoriser_'.$type.'_voir')
+		or function_exists($f = 'autoriser_'.$type.'_voir_dist')) {
 		return $f($faire, $type, $id, $qui, $opt);
 	}
 
@@ -912,7 +912,7 @@ 
 	$n = sql_fetsel(
 		'A.id_article',
 		'spip_auteurs_liens AS L LEFT JOIN spip_articles AS A ON (L.objet=\'article\' AND L.id_objet=A.id_article)',
-		"A.statut='publie' AND L.id_auteur=" . sql_quote($id)
+		"A.statut='publie' AND L.id_auteur=".sql_quote($id)
 	);
 
 	return $n ? true : false;
@@ -1118,7 +1118,7 @@ 
 		and $r = sql_allfetsel(
 			'id_objet',
 			'spip_auteurs_liens',
-			'id_auteur=' . intval($id_auteur) . " AND objet='rubrique' AND id_objet!=0"
+			'id_auteur='.intval($id_auteur)." AND objet='rubrique' AND id_objet!=0"
 		)
 		and count($r)
 	) {
@@ -1733,8 +1733,8 @@ 
 function auteurs_objet($objet, $id_objet, $cond = '') {
 	$objet = objet_type($objet);
 	$where = array(
-		'objet=' . sql_quote($objet),
-		'id_objet=' . intval($id_objet)
+		'objet='.sql_quote($objet),
+		'id_objet='.intval($id_objet)
 	);
 	if (!empty($cond)) {
 		if (is_array($cond)) {
@@ -1768,7 +1768,7 @@ 
 	return sql_allfetsel(
 		'id_auteur',
 		'spip_auteurs_liens',
-		"objet='article' AND id_objet=" . intval($id_article) . ($cond ? " AND $cond" : '')
+		"objet='article' AND id_objet=".intval($id_article).($cond ? " AND $cond" : '')
 	);
 }
 

ecrire/genie/optimiser.php

Spacing +5 added lines, -5 removed lines

@@ -51,9 +51,9 @@ 
  */
 function optimiser_caches_contextes() {
 	sous_repertoire(_DIR_CACHE, 'contextes');
-	if (is_dir( $d = _DIR_CACHE . 'contextes')) {
+	if (is_dir($d = _DIR_CACHE.'contextes')) {
 		include_spip('inc/invalideur');
-		purger_repertoire($d, ['mtime' => time() - 48*24*3600, 'limit' => 10000]);
+		purger_repertoire($d, ['mtime' => time() - 48 * 24 * 3600, 'limit' => 10000]);
 	}
 }
 
@@ -140,8 +140,8 @@ 
 	sql_free($sel);
 
 	if ($in) {
-		sql_delete($table, sql_in($id, array_keys($in)) . ($and ? " AND $and" : ''));
-		spip_log("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: " . implode(', ', array_keys($in)), 'genie'._LOG_DEBUG);
+		sql_delete($table, sql_in($id, array_keys($in)).($and ? " AND $and" : ''));
+		spip_log("optimiser_sansref: Numeros des entrees $id supprimees dans la table $table: ".implode(', ', array_keys($in)), 'genie'._LOG_DEBUG);
 	}
 
 	return count($in);
@@ -217,7 +217,7 @@ 
 	if (!defined('_AUTEURS_DELAI_REJET_NOUVEAU')) {
 		define('_AUTEURS_DELAI_REJET_NOUVEAU', 45 * 24 * 3600);
 	}
-	sql_delete("spip_auteurs", "statut='nouveau' AND maj < " . sql_quote(date('Y-m-d', time() - intval(_AUTEURS_DELAI_REJET_NOUVEAU))));
+	sql_delete("spip_auteurs", "statut='nouveau' AND maj < ".sql_quote(date('Y-m-d', time() - intval(_AUTEURS_DELAI_REJET_NOUVEAU))));
 
 	/**
 	 * Permet aux plugins de compléter l'optimisation suite aux éléments disparus

ecrire/action/editer_auteur.php

Spacing +5 added lines, -5 removed lines

@@ -95,7 +95,7 @@ 
 	$champs['source'] = $source ? $source : 'spip';
 
 	$champs['login'] = '';
-	$champs['statut'] = '5poubelle';  // inutilisable tant qu'il n'a pas ete renseigne et institue
+	$champs['statut'] = '5poubelle'; // inutilisable tant qu'il n'a pas ete renseigne et institue
 	$champs['webmestre'] = 'non';
 	if (empty($champs['imessage'])) {
 		$champs['imessage'] = 'oui';
@@ -324,7 +324,7 @@ 
 		$champs['pass'] = $c['pass'];
 	}
 
-	$statut = $statut_ancien = sql_getfetsel('statut', 'spip_auteurs', 'id_auteur=' . intval($id_auteur));
+	$statut = $statut_ancien = sql_getfetsel('statut', 'spip_auteurs', 'id_auteur='.intval($id_auteur));
 
 	if (isset($c['statut'])
 		and (autoriser('modifier', 'auteur', $id_auteur, null, array('statut' => $c['statut'])))
@@ -380,7 +380,7 @@ 
 	// commencer par traiter les cas particuliers des logins et pass
 	// avant les autres ecritures en base
 	if (isset($champs['login']) or isset($champs['pass'])) {
-		$auth_methode = sql_getfetsel('source', 'spip_auteurs', 'id_auteur=' . intval($id_auteur));
+		$auth_methode = sql_getfetsel('source', 'spip_auteurs', 'id_auteur='.intval($id_auteur));
 		include_spip('inc/auth');
 		if (isset($champs['login']) and strlen($champs['login'])) {
 			if (!auth_modifier_login($auth_methode, $champs['login'], $id_auteur)) {
@@ -388,7 +388,7 @@ 
 			}
 		}
 		if (isset($champs['pass']) and strlen($champs['pass'])) {
-			$champs['login'] = sql_getfetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur));
+			$champs['login'] = sql_getfetsel('login', 'spip_auteurs', 'id_auteur='.intval($id_auteur));
 			if (!auth_modifier_pass($auth_methode, $champs['login'], $champs['pass'], $id_auteur)) {
 				$erreurs[] = 'ecrire:impossible_modifier_pass_auteur';
 			}
@@ -401,7 +401,7 @@ 
 	if (!count($champs)) {
 		return implode(' ', array_map('_T', $erreurs));
 	}
-	sql_updateq('spip_auteurs', $champs, 'id_auteur=' . $id_auteur);
+	sql_updateq('spip_auteurs', $champs, 'id_auteur='.$id_auteur);
 
 	// .. mettre a jour les fichiers .htpasswd et .htpasswd-admin
 	if ($flag_ecrire_acces

ecrire/maj/2021.php

Spacing +2 added lines, -2 removed lines

@@ -23,6 +23,6 @@
 }
 
 $GLOBALS['maj'][2021021800] = [
-	['sql_alter', "TABLE spip_auteurs CHANGE imessage imessage VARCHAR(3) DEFAULT '' NOT NULL" ],
-	['sql_updateq', "spip_auteurs", ['imessage' => 'oui'], "imessage != 'non' OR imessage IS NULL" ],
+	['sql_alter', "TABLE spip_auteurs CHANGE imessage imessage VARCHAR(3) DEFAULT '' NOT NULL"],
+	['sql_updateq', "spip_auteurs", ['imessage' => 'oui'], "imessage != 'non' OR imessage IS NULL"],
 ];

ecrire/inc/texte_mini.php

Spacing +29 added lines, -29 removed lines

@@ -44,7 +44,7 @@ 
 	// celle du texte) et public (spip_lang est la langue du texte)
 	$dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
 
-	$p = 'puce' . (test_espace_prive() ? '_prive' : '');
+	$p = 'puce'.(test_espace_prive() ? '_prive' : '');
 	if ($dir == 'rtl') {
 		$p .= '_rtl';
 	}
@@ -67,7 +67,7 @@ 
 }
 
 if (!defined('_BALISES_BLOCS_REGEXP')) {
-	define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
+	define('_BALISES_BLOCS_REGEXP', ',</?('._BALISES_BLOCS.')[>[:space:]],iS');
 }
 
 //
@@ -85,7 +85,7 @@ 
 
 	// Tester si on echappe en span ou en div
 	if (is_null($mode) or !in_array($mode, array('div', 'span'))) {
-		$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
+		$mode = preg_match(',</?('._BALISES_BLOCS.')[>[:space:]],iS', $rempl) ? 'div' : 'span';
 	}
 
 	// Decouper en morceaux, base64 a des probleme selon la taille de la pile
@@ -117,11 +117,11 @@ 
 	// echapper les < dans <code>
 	// on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
 	if (strpos($pre, "<") !== false
-		and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)){
+		and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)) {
 
-		foreach ($matches as $m){
-			if ($m[1]==='code'){
-				$code = "<code" . $m[2] . ">" . spip_htmlspecialchars($m[3]) . "</code>";
+		foreach ($matches as $m) {
+			if ($m[1] === 'code') {
+				$code = "<code".$m[2].">".spip_htmlspecialchars($m[3])."</code>";
 				$pre = str_replace($m[0], $code, $pre);
 			}
 		}
@@ -132,7 +132,7 @@ 
 // Echapper les <code>...</ code>
 // https://code.spip.net/@traiter_echap_code_dist
 function traiter_echap_code_dist($regs) {
-	list(, , $att, $corps) = $regs;
+	list(,, $att, $corps) = $regs;
 	$echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
 
 	// ne pas mettre le <div...> s'il n'y a qu'une ligne
@@ -143,9 +143,9 @@ 
 		$echap = nl2br($echap);
 		$echap = "<div style='text-align: left;' "
 			. "class='spip_code' dir='ltr'><code$att>"
-			. $echap . "</code></div>";
+			. $echap."</code></div>";
 	} else {
-		$echap = "<code$att class='spip_code' dir='ltr'>" . $echap . "</code>";
+		$echap = "<code$att class='spip_code' dir='ltr'>".$echap."</code>";
 	}
 
 	$echap = str_replace("\t", "&nbsp; &nbsp; &nbsp; &nbsp; ", $echap);
@@ -222,10 +222,10 @@ 
 				$echap = $regs[0];
 			} // sinon les traiter selon le cas
 			else {
-				if (function_exists($f = 'traiter_echap_' . strtolower($regs[1]))) {
+				if (function_exists($f = 'traiter_echap_'.strtolower($regs[1]))) {
 					$echap = $f($regs);
 				} else {
-					if (function_exists($f = $f . '_dist')) {
+					if (function_exists($f = $f.'_dist')) {
 						$echap = $f($regs);
 					}
 				}
@@ -245,7 +245,7 @@ 
 	// (derogatoire car on ne peut pas faire passer < ? ... ? >
 	// dans une callback autonommee
 	if (strpos($preg ? $preg : _PROTEGE_BLOCS, 'script') !== false) {
-		if (strpos($letexte, "<" . "?") !== false and preg_match_all(',<[?].*($|[?]>),UisS',
+		if (strpos($letexte, "<"."?") !== false and preg_match_all(',<[?].*($|[?]>),UisS',
 				$letexte, $matches, PREG_SET_ORDER)
 		) {
 			foreach ($matches as $regs) {
@@ -270,7 +270,7 @@ 
 		$max_prof = 5;
 		while (strpos($letexte, "<") !== false
 			and
-			preg_match_all(',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
+			preg_match_all(',<(span|div)\sclass=[\'"]base64'.$source.'[\'"]\s(.*)>\s*</\1>,UmsS',
 				$letexte, $regs, PREG_SET_ORDER)
 			and $max_prof--) {
 			foreach ($regs as $reg) {
@@ -283,7 +283,7 @@ 
 					}
 				}
 				if ($at) {
-					$rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
+					$rempl = '<'.$reg[1].'>'.$rempl.'</'.$reg[1].'>';
 					foreach ($at as $attr => $a) {
 						$rempl = inserer_attribut($rempl, $attr, $a);
 					}
@@ -362,8 +362,8 @@ 
 	$texte = nettoyer_raccourcis_typo($texte);
 
 	// balises de sauts de ligne et paragraphe
-	$texte = preg_replace("/<p( [^>]*)?" . ">/", "\r", $texte);
-	$texte = preg_replace("/<br( [^>]*)?" . ">/", "\n", $texte);
+	$texte = preg_replace("/<p( [^>]*)?".">/", "\r", $texte);
+	$texte = preg_replace("/<br( [^>]*)?".">/", "\n", $texte);
 
 	// on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
 	$texte = str_replace("\n\n", "\r", $texte);
@@ -371,7 +371,7 @@ 
 	// supprimer les tags
 	$texte = supprimer_tags($texte);
 	$texte = trim(str_replace("\n", " ", $texte));
-	$texte .= "\n";  // marquer la fin
+	$texte .= "\n"; // marquer la fin
 
 	// corriger la longueur de coupe
 	// en fonction de la presence de caracteres utf
@@ -386,7 +386,7 @@ 
 	// couper au mot precedent
 	$long = spip_substr($texte, 0, max($taille - 4, 1));
 	$u = $GLOBALS['meta']['pcre_u'];
-	$court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+	$court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/".$u, "\\1", $long);
 	if (is_null($suite)) {
 		$suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
 	}
@@ -396,7 +396,7 @@ 
 	if (spip_strlen($court) < max(0.75 * $taille, 2)) {
 		$points = '';
 		$long = spip_substr($texte, 0, $taille);
-		$texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+		$texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/".$u, "\\1", $long);
 		// encore trop court ? couper au caractere
 		if (spip_strlen($texte) < 0.75 * $taille) {
 			$texte = $long;
@@ -416,7 +416,7 @@ 
 	// supprimer l'eventuelle entite finale mal coupee
 	$texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
 
-	return quote_amp(trim($texte)) . $points;
+	return quote_amp(trim($texte)).$points;
 }
 
 
@@ -429,16 +429,16 @@ 
 				define('_PROTEGE_JS_MODELES', creer_uniqid());
 			}
 			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
+				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript'._PROTEGE_JS_MODELES), $t);
 			}
 		}
-		if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
+		if (preg_match_all(',<\?php.*?($|\?'.'>),isS', $t, $r, PREG_SET_ORDER)) {
 			if (!defined('_PROTEGE_PHP_MODELES')) {
 				include_spip('inc/acces');
 				define('_PROTEGE_PHP_MODELES', creer_uniqid());
 			}
 			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
+				$t = str_replace($regs[0], code_echappement($regs[0], 'php'._PROTEGE_PHP_MODELES), $t);
 			}
 		}
 	}
@@ -473,7 +473,7 @@ 
  * @param bool $strict
  * @return string
  */
-function echapper_html_suspect($texte, $strict=true) {
+function echapper_html_suspect($texte, $strict = true) {
 	static $echapper_html_suspect;
 	if (!$texte or !is_string($texte)) {
 		return $texte;
@@ -495,8 +495,8 @@ 
 	// quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
 	// car sinon on declenche sur les modeles ou ressources
 	if (!$strict and
-	  (strpos($texte,'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
-	  ){
+	  (strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
+	  ) {
 		return $texte;
 	}
 
@@ -575,9 +575,9 @@ 
  **/
 function supprime_img($letexte, $message = null) {
 	if ($message === null) {
-		$message = '(' . _T('img_indisponible') . ')';
+		$message = '('._T('img_indisponible').')';
 	}
 
-	return preg_replace(',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
+	return preg_replace(',<(img|doc|emb)([0-9]+)(\|([^>]*))?'.'\s*/?'.'>,i',
 		$message, $letexte);
 }

ecrire/public/phraser_html.php

Spacing +35 added lines, -35 removed lines

@@ -48,19 +48,19 @@ 
  * Nom d'une balise #TOTO
  *
  * Écriture alambiquée pour rester compatible avec les hexadecimaux des vieux squelettes */
-define('NOM_DE_CHAMP', "#((" . NOM_DE_BOUCLE . "):)?(([A-F]*[G-Z_][A-Z_0-9]*)|[A-Z_]+)\b(\*{0,2})");
+define('NOM_DE_CHAMP', "#((".NOM_DE_BOUCLE."):)?(([A-F]*[G-Z_][A-Z_0-9]*)|[A-Z_]+)\b(\*{0,2})");
 /** Balise complète [...(#TOTO) ... ] */
-define('CHAMP_ETENDU', '/\[([^]\[]*)\(' . NOM_DE_CHAMP . '([^[)]*\)[^]\[]*)\]/S');
+define('CHAMP_ETENDU', '/\[([^]\[]*)\('.NOM_DE_CHAMP.'([^[)]*\)[^]\[]*)\]/S');
 
 define('BALISE_INCLURE', '/<INCLU[DR]E[[:space:]]*(\(([^)]*)\))?/S');
 define('BALISE_POLYGLOTTE', ',<multi>(.*)</multi>,Uims');
 define('BALISE_IDIOMES', ',<:(([a-z0-9_]+):)?([a-z0-9_]*)({([^\|=>]*=[^\|>]*)})?((\|[^>]*)?:/?>),iS');
-define('BALISE_IDIOMES_ARGS', '@^\s*([^= ]*)\s*=\s*((' . NOM_DE_CHAMP . '[{][^}]*})?[^,]*)\s*,?\s*@s');
+define('BALISE_IDIOMES_ARGS', '@^\s*([^= ]*)\s*=\s*(('.NOM_DE_CHAMP.'[{][^}]*})?[^,]*)\s*,?\s*@s');
 
 /** Champ sql dans parenthèse ex: (id_article) */
 define('SQL_ARGS', '(\([^)]*\))');
 /** Fonction SQL sur un champ ex: SUM(visites) */
-define('CHAMP_SQL_PLUS_FONC', '`?([A-Z_\/][A-Z_\/0-9.]*)' . SQL_ARGS . '?`?');
+define('CHAMP_SQL_PLUS_FONC', '`?([A-Z_\/][A-Z_\/0-9.]*)'.SQL_ARGS.'?`?');
 
 // https://code.spip.net/@phraser_inclure
 function phraser_inclure($texte, $ligne, $result) {
@@ -217,7 +217,7 @@ 
  * @return array
  **/
 function phraser_champs($texte, $ligne, $result) {
-	while (preg_match("/" . NOM_DE_CHAMP . "/S", $texte, $match)) {
+	while (preg_match("/".NOM_DE_CHAMP."/S", $texte, $match)) {
 		$p = strpos($texte, $match[0]);
 		// texte après la balise
 		$suite = substr($texte, $p + strlen($match[0]));
@@ -369,7 +369,7 @@ 
 			$collecte[] = $champ;
 			$args = ltrim($regs[count($regs) - 1]);
 		} else {
-			if (!preg_match("/" . NOM_DE_CHAMP . "([{|])/", $arg, $r)) {
+			if (!preg_match("/".NOM_DE_CHAMP."([{|])/", $arg, $r)) {
 				// 0 est un aveu d'impuissance. A completer
 				$arg = phraser_champs_exterieurs($arg, 0, $sep, $result);
 
@@ -454,7 +454,7 @@ 
 function phraser_champs_exterieurs($texte, $ligne, $sep, $nested) {
 	$res = array();
 	while (($p = strpos($texte, "%$sep")) !== false) {
-		if (!preg_match(',^%' . preg_quote($sep) . '([0-9]+)@,', substr($texte, $p), $m)) {
+		if (!preg_match(',^%'.preg_quote($sep).'([0-9]+)@,', substr($texte, $p), $m)) {
 			break;
 		}
 		$debut = substr($texte, 0, $p);
@@ -495,7 +495,7 @@ 
 			$pos_apres = 0;
 			$result = phraser_args($match[7], ")", $sep, $result, $champ, $pos_apres);
 			phraser_vieux($champ);
-			$champ->avant =	phraser_champs_exterieurs($match[1], $n, $sep, $result);
+			$champ->avant = phraser_champs_exterieurs($match[1], $n, $sep, $result);
 			$debut = substr($match[7], $pos_apres + 1);
 			if (!empty($debut)) {
 				$n += substr_count(substr($texte, 0, strpos($texte, $debut)), "\n");
@@ -625,7 +625,7 @@ 
 					// une maniere tres sale de supprimer les "' autour de {critere "xxx","yyy"}
 					if (preg_match(',^(["\'])(.*)\1$,', $m[4])) {
 						$c = null;
-						eval('$c = ' . $m[4] . ';');
+						eval('$c = '.$m[4].';');
 						if (isset($c)) {
 							$m[4] = $c;
 						}
@@ -703,7 +703,7 @@ 
 
 					if (preg_match(',^ *([0-9-]+) *(/) *(.+) *$,', $param, $m)) {
 						$crit = phraser_critere_infixe($m[1], $m[3], $v, '/', '', '');
-					} elseif (preg_match(',^([!]?)(' . CHAMP_SQL_PLUS_FONC .
+					} elseif (preg_match(',^([!]?)('.CHAMP_SQL_PLUS_FONC.
 						')[[:space:]]*(\??)(!?)(<=?|>=?|==?|\b(?:IN|LIKE)\b)(.*)$,is', $param, $m)) {
 						$a2 = trim($m[8]);
 						if ($a2 and ($a2[0] == "'" or $a2[0] == '"') and ($a2[0] == substr($a2, -1))) {
@@ -713,8 +713,8 @@ 
 							(($m[2] == 'lang_select') ? $m[2] : $m[7]),
 							$m[6], $m[5]);
 						$crit->exclus = $m[1];
-					} elseif (preg_match("/^([!]?)\s*(" .
-						CHAMP_SQL_PLUS_FONC .
+					} elseif (preg_match("/^([!]?)\s*(".
+						CHAMP_SQL_PLUS_FONC.
 						")\s*(\??)(.*)$/is", $param, $m)) {
 						// contient aussi les comparaisons implicites !
 						// Comme ci-dessus: 
@@ -816,11 +816,11 @@ 
 	$current_pos = $pos_debut_texte;
 	while (($pos_boucle = strpos($texte, BALISE_BOUCLE, $current_pos)) !== false) {
 		$current_pos = $pos_boucle + 1;
-		$pos_parent = strpos($texte,'(', $pos_boucle);
+		$pos_parent = strpos($texte, '(', $pos_boucle);
 
 		$id_boucle = '';
 		if ($pos_parent !== false) {
-			$id_boucle = trim(substr($texte,$pos_boucle + strlen(BALISE_BOUCLE), $pos_parent - $pos_boucle - strlen(BALISE_BOUCLE)));
+			$id_boucle = trim(substr($texte, $pos_boucle + strlen(BALISE_BOUCLE), $pos_parent - $pos_boucle - strlen(BALISE_BOUCLE)));
 		}
 		if ($pos_parent === false
 		  or (strlen($id_boucle) and !(is_numeric($id_boucle) or strpos($id_boucle, '_') === 0))) {
@@ -831,7 +831,7 @@ 
 
 			// un id_boucle pour l'affichage de l'erreur
 			if (!strlen($id_boucle)) {
-				$id_boucle = substr($texte,$pos_boucle + strlen(BALISE_BOUCLE), 15);
+				$id_boucle = substr($texte, $pos_boucle + strlen(BALISE_BOUCLE), 15);
 			}
 			$result->id_boucle = $id_boucle;
 			$err_b = array('zbug_erreur_boucle_syntaxe', array('id' => $id_boucle));
@@ -854,11 +854,11 @@ 
 
 			// un id_boucle pour l'affichage de l'erreur sur les boucle anonymes
 			if (!strlen($id_boucle)) {
-				$boucle['id_boucle_err'] = substr($texte,$pos_boucle + strlen(BALISE_BOUCLE), 15);
+				$boucle['id_boucle_err'] = substr($texte, $pos_boucle + strlen(BALISE_BOUCLE), 15);
 			}
 
 			// trouver sa position de depart reelle : au <Bxx> ou au <BBxx>
-			$precond_boucle = BALISE_PRECOND_BOUCLE . $id_boucle . '>';
+			$precond_boucle = BALISE_PRECOND_BOUCLE.$id_boucle.'>';
 			$pos_precond = strpos($texte, $precond_boucle, $id_boucle ? $pos_debut_texte : $pos_derniere_boucle_anonyme);
 			if ($pos_precond !== false
 				and $pos_precond < $boucle['debut_boucle']) {
@@ -867,7 +867,7 @@ 
 				$boucle['pos_precond_inside'] = $pos_precond + strlen($precond_boucle);
 			}
 
-			$preaff_boucle = BALISE_PREAFF_BOUCLE . $id_boucle . '>';
+			$preaff_boucle = BALISE_PREAFF_BOUCLE.$id_boucle.'>';
 			$pos_preaff = strpos($texte, $preaff_boucle, $id_boucle ? $pos_debut_texte : $pos_derniere_boucle_anonyme);
 			if ($pos_preaff !== false
 				and $pos_preaff < $boucle['debut_boucle']) {
@@ -913,26 +913,26 @@ 
 	$pos_anonyme_next = null;
 	// si c'est une boucle anonyme, chercher la position de la prochaine boucle anonyme
 	if (!strlen($id_boucle)) {
-		$pos_anonyme_next = strpos($texte, BALISE_BOUCLE . '(', $pos_courante);
+		$pos_anonyme_next = strpos($texte, BALISE_BOUCLE.'(', $pos_courante);
 	}
 
 	//
 	// 1. Recuperer la partie conditionnelle apres
 	//
-	$apres_boucle = BALISE_POSTCOND_BOUCLE . $id_boucle . ">";
+	$apres_boucle = BALISE_POSTCOND_BOUCLE.$id_boucle.">";
 	$pos_apres = strpos($texte, $apres_boucle, $pos_courante);
 	if ($pos_apres !== false
 		and (!$pos_anonyme_next or $pos_apres < $pos_anonyme_next)) {
 		$boucle['pos_postcond'] = $pos_apres;
 		$pos_apres += strlen($apres_boucle);
 		$boucle['pos_postcond_inside'] = $pos_apres;
-		$pos_courante = $pos_apres ;
+		$pos_courante = $pos_apres;
 	}
 
 	//
 	// 2. Récuperer la partie alternative apres
 	//
-	$altern_boucle = BALISE_ALT_BOUCLE . $id_boucle . ">";
+	$altern_boucle = BALISE_ALT_BOUCLE.$id_boucle.">";
 	$pos_altern = strpos($texte, $altern_boucle, $pos_courante);
 	if ($pos_altern !== false
 		and (!$pos_anonyme_next or $pos_altern < $pos_anonyme_next)) {
@@ -945,14 +945,14 @@ 
 	//
 	// 3. Recuperer la partie footer non alternative
 	//
-	$postaff_boucle = BALISE_POSTAFF_BOUCLE . $id_boucle . ">";
+	$postaff_boucle = BALISE_POSTAFF_BOUCLE.$id_boucle.">";
 	$pos_postaff = strpos($texte, $postaff_boucle, $pos_courante);
 	if ($pos_postaff !== false
 	  and (!$pos_anonyme_next or $pos_postaff < $pos_anonyme_next)) {
 		$boucle['pos_postaff'] = $pos_postaff;
 		$pos_postaff += strlen($postaff_boucle);
 		$boucle['pos_postaff_inside'] = $pos_postaff;
-		$pos_courante = $pos_postaff ;
+		$pos_courante = $pos_postaff;
 	}
 
 	return $boucle;
@@ -964,7 +964,7 @@ 
  * @param null|string $boucle_placeholder
  * @param null|object $boucle
  */
-function phraser_boucle_placeholder(&$champ, $boucle_placeholder=null, $boucle = null) {
+function phraser_boucle_placeholder(&$champ, $boucle_placeholder = null, $boucle = null) {
 	static $boucles_connues = array();
 	// si c'est un appel pour memoriser une boucle, memorisons la
 	if (is_string($champ) and !empty($boucle_placeholder) and !empty($boucle)) {
@@ -992,7 +992,7 @@ 
  * @return string
  */
 function public_generer_boucle_placeholder($id_boucle, &$boucle, $boucle_placeholder, $nb_lignes) {
-	$placeholder = "[(#{$boucle_placeholder}{" . $id_boucle . '})' . str_pad("", $nb_lignes, "\n") . "]";
+	$placeholder = "[(#{$boucle_placeholder}{".$id_boucle.'})'.str_pad("", $nb_lignes, "\n")."]";
 	//memoriser la boucle a reinjecter
 	$id_boucle = "$id_boucle";
 	phraser_boucle_placeholder($id_boucle, $boucle_placeholder, $boucle);
@@ -1005,7 +1005,7 @@ 
 	// definir un placholder pour les boucles dont on est sur d'avoir aucune occurence dans le squelette
 	if (is_null($boucle_placeholder)) {
 		do {
-			$boucle_placeholder = "BOUCLE_PLACEHOLDER_" . strtoupper(md5(uniqid()));
+			$boucle_placeholder = "BOUCLE_PLACEHOLDER_".strtoupper(md5(uniqid()));
 		} while (strpos($texte, $boucle_placeholder) !== false);
 	}
 
@@ -1025,7 +1025,7 @@ 
 
 		// boucle anonyme ?
 		if (!strlen($id_boucle)) {
-			$id_boucle = '_anon_L' . $ligne_milieu . '_' . substr(md5('anonyme:' .$id_parent.':'. json_encode($boucle)), 0, 8);
+			$id_boucle = '_anon_L'.$ligne_milieu.'_'.substr(md5('anonyme:'.$id_parent.':'.json_encode($boucle)), 0, 8);
 		}
 
 		$pos_debut_boucle = $pos_courante;
@@ -1039,7 +1039,7 @@ 
 
 			$pos_avant = $boucle['pos_precond_inside'];
 			$result->avant = substr($texte, $pos_avant, $pos_courante - $pos_avant);
-			$ligne_avant = $ligne_debut_texte +  public_compte_ligne($texte, $pos_debut_texte, $pos_avant);
+			$ligne_avant = $ligne_debut_texte + public_compte_ligne($texte, $pos_debut_texte, $pos_avant);
 		}
 
 		// Regarder si on a une partie inconditionnelle avant <BB_xxx>
@@ -1049,7 +1049,7 @@ 
 
 			$pos_preaff = $boucle['pos_preaff_inside'];
 			$result->preaff = substr($texte, $pos_preaff, $end_preaff - $pos_preaff);
-			$ligne_preaff = $ligne_debut_texte +  public_compte_ligne($texte, $pos_debut_texte, $pos_preaff);
+			$ligne_preaff = $ligne_debut_texte + public_compte_ligne($texte, $pos_debut_texte, $pos_preaff);
 		}
 
 		$result->id_boucle = $id_boucle;
@@ -1105,7 +1105,7 @@ 
 		} else {
 			$pos_milieu += 1;
 
-			$fin_boucle = BALISE_FIN_BOUCLE . $id_boucle_search . ">";
+			$fin_boucle = BALISE_FIN_BOUCLE.$id_boucle_search.">";
 			$pos_fin = strpos($texte, $fin_boucle, $pos_milieu);
 			if ($pos_fin === false) {
 				$err_b = array(
@@ -1118,7 +1118,7 @@ 
 			else {
 				// verifier une eventuelle imbrication d'une boucle homonyme
 				// (interdite, generera une erreur plus loin, mais permet de signaler la bonne erreur)
-				$search_debut_boucle = BALISE_BOUCLE . $id_boucle_search . '(';
+				$search_debut_boucle = BALISE_BOUCLE.$id_boucle_search.'(';
 				$search_from = $pos_milieu;
 				$nb_open = 1;
 				$nb_close = 1;
@@ -1138,7 +1138,7 @@ 
 						$nb_open++;
 						$search_from = $p + 1;
 					}
-				} while($nb_close < $nb_open and $maxiter++ < 5);
+				} while ($nb_close < $nb_open and $maxiter++ < 5);
 
 				$pos_courante = $pos_fin + strlen($fin_boucle);
 			}
@@ -1154,7 +1154,7 @@ 
 		if ($boucle['pos_postcond']) {
 			$result->apres = substr($texte, $pos_courante, $boucle['pos_postcond'] - $pos_courante);
 			$ligne_suite += public_compte_ligne($texte, $pos_courante, $boucle['pos_postcond_inside']);
-			$pos_courante = $boucle['pos_postcond_inside'] ;
+			$pos_courante = $boucle['pos_postcond_inside'];
 		}
 
 
@@ -1210,7 +1210,7 @@ 
 		// reserver la place dans la pile des boucles pour compiler ensuite dans le bon ordre
 		// ie les boucles qui apparaissent dans les partie conditionnelles doivent etre compilees apres cette boucle
 		// si il y a deja une boucle de ce nom, cela declenchera une erreur ensuite
-		if (empty($boucles[$id_boucle])){
+		if (empty($boucles[$id_boucle])) {
 			$boucles[$id_boucle] = null;
 		}
 		$result->preaff = public_phraser_html_dist($result->preaff, $id_parent, $boucles, $descr, $ligne_preaff, $boucle_placeholder);

ecrire/public/compiler.php

Spacing +115 added lines, -123 removed lines

@@ -97,7 +97,7 @@ 
 				preg_match(",^([^=]*)(=?)(.*)$,m", $var->texte, $m);
 				$m = array_pad($m, 3, null);
 				$var = $m[1];
-				$auto = false;;
+				$auto = false; ;
 				if ($m[2]) {
 					$v = $m[3];
 					if (preg_match(',^[\'"](.*)[\'"]$,', $v, $m)) {
@@ -121,7 +121,7 @@ 
 						: calculer_liste($val, $p->descr, $boucles, $id_boucle);
 					if ($var !== 1) {
 						$val = ($echap ? "\'$var\' => ' . argumenter_squelette(" : "'$var' => ")
-							. $val . ($echap ? ") . '" : " ");
+							. $val.($echap ? ") . '" : " ");
 					} else {
 						$val = $echap ? "'.$val.'" : $val;
 					}
@@ -142,7 +142,7 @@ 
 	if (!$lang) {
 		$lang = '$GLOBALS["spip_lang"]';
 	}
-	$l['lang'] = ($echap ? "\'lang\' => ' . argumenter_squelette(" : "'lang' => ") . $lang . ($echap ? ") . '" : " ");
+	$l['lang'] = ($echap ? "\'lang\' => ' . argumenter_squelette(" : "'lang' => ").$lang.($echap ? ") . '" : " ");
 
 	return $l;
 }
@@ -171,7 +171,7 @@ 
 	$_contexte = argumenter_inclure($p->param, false, $p, $boucles, $id_boucle, true, '', true);
 	if (is_string($p->texte)) {
 		$fichier = $p->texte;
-		$code = "\"".str_replace('"','\"',$fichier)."\"";
+		$code = "\"".str_replace('"', '\"', $fichier)."\"";
 
 	} else {
 		$code = calculer_liste($p->texte, $p->descr, $boucles, $id_boucle);
@@ -185,7 +185,7 @@ 
 		$trace = $p->fonctions;
 		while (is_array($trace)
 		  and $trace = array_filter($trace)
-			and count($trace)==1) {
+			and count($trace) == 1) {
 			$trace = reset($trace);
 		}
 		$erreur_p_i_i = array(
@@ -219,7 +219,7 @@ 
 		return false;
 	} // j'aurais voulu toucher le fond ...
 
-	$contexte = 'array(' . $_contexte . ')';
+	$contexte = 'array('.$_contexte.')';
 
 	if ($env) {
 		$contexte = "array_merge('.var_export(\$Pile[0],1).',$contexte)";
@@ -234,11 +234,11 @@ 
 			$_options[] = $ajax;
 		}
 		$code = " ' . argumenter_squelette($code) . '";
-		$code = "echo " . sprintf(CODE_RECUPERER_FOND, $code, $contexte, implode(',', $_options),
-				"_request(\"connect\")") . ';';
+		$code = "echo ".sprintf(CODE_RECUPERER_FOND, $code, $contexte, implode(',', $_options),
+				"_request(\"connect\")").';';
 	}
 
-	return "\n'<'.'" . "?php " . $code . "\n?'." . "'>'";
+	return "\n'<'.'"."?php ".$code."\n?'."."'>'";
 }
 
 
@@ -318,17 +318,17 @@ 
 					$id = $id_table;
 					$statut = preg_replace(',\W,', '', $s['champ']); // securite
 				}
-				$mstatut = $id . '.' . $statut;
+				$mstatut = $id.'.'.$statut;
 
 				$arg_ignore_previsu = ($ignore_previsu ? ",true" : '');
 				include_spip('public/quete');
 				if (isset($s['post_date']) and $s['post_date']
 					and $GLOBALS['meta']["post_dates"] == 'non'
 				) {
-					$date = $id . '.' . preg_replace(',\W,', '', $s['post_date']); // securite
+					$date = $id.'.'.preg_replace(',\W,', '', $s['post_date']); // securite
 					array_unshift($boucle->where,
 						$echapper ?
-							"\nquete_condition_postdates('$date'," . _q($boucle->sql_serveur) . "$arg_ignore_previsu)"
+							"\nquete_condition_postdates('$date',"._q($boucle->sql_serveur)."$arg_ignore_previsu)"
 							:
 							quete_condition_postdates($date, $boucle->sql_serveur, $ignore_previsu)
 					);
@@ -336,9 +336,9 @@ 
 				array_unshift($boucle->where,
 					$echapper ?
 						"\nquete_condition_statut('$mstatut',"
-						. _q($s['previsu']) . ","
-						. _q($s['publie']) . ","
-						. _q($boucle->sql_serveur) . "$arg_ignore_previsu)"
+						. _q($s['previsu']).","
+						. _q($s['publie']).","
+						. _q($boucle->sql_serveur)."$arg_ignore_previsu)"
 						:
 						quete_condition_statut($mstatut, $s['previsu'], $s['publie'], $boucle->sql_serveur, $ignore_previsu)
 				);
@@ -372,14 +372,14 @@ 
 	if (_request('var_mode_affiche') != 'resultat') {
 		$trace = '';
 	} else {
-		$_trace = $boucles[$id_boucle]->descr['nom'] . $id_boucle;
+		$_trace = $boucles[$id_boucle]->descr['nom'].$id_boucle;
 		$_trace = "\$GLOBALS['debug_objets']['resultat']['$_trace']";
 		$trace = "
 		if (empty($_trace)) { 
 			$_trace = []; 
 		}
 		if (count($_trace) < 3) { 
-			$_trace" . "[] = \$t0; 
+			$_trace"."[] = \$t0; 
 		}";
 	}
 
@@ -413,7 +413,7 @@ 
 	return
 		// Numrows[$nom] peut ne pas être encore defini
 		"\n\t\$save_numrows = (isset(\$Numrows['$nom']) ? \$Numrows['$nom'] : array());"
-		. "\n\t\$t0 = " . $boucles[$id_boucle]->return . ";"
+		. "\n\t\$t0 = ".$boucles[$id_boucle]->return.";"
 		. "\n\t\$Numrows['$nom'] = (\$save_numrows);"
 		. $trace
 		. "\n\treturn \$t0;";
@@ -481,7 +481,7 @@ 
 	// faudrait expanser le foreach a la compil, car y en a souvent qu'un 
 	// et puis faire un [] plutot qu'un "','."
 	if ($boucle->doublons) {
-		$corps .= "\n\t\t\tforeach(" . $boucle->doublons . ' as $k) $doublons[$k] .= "," . ' .
+		$corps .= "\n\t\t\tforeach(".$boucle->doublons.' as $k) $doublons[$k] .= "," . '.
 			index_pile($id_boucle, $primary, $boucles)
 			. "; // doublons\n";
 	}
@@ -508,13 +508,13 @@ 
 		$corps .=
 			"\n\t\tlang_select_public("
 			. index_pile($id_boucle, 'lang', $boucles)
-			. ", '" . $boucle->lang_select . "'"
+			. ", '".$boucle->lang_select."'"
 			. (in_array($type_boucle, array(
 				'articles',
 				'rubriques',
 				'hierarchie',
 				'breves'
-			)) ? ', ' . index_pile($id_boucle, 'titre', $boucles) : '')
+			)) ? ', '.index_pile($id_boucle, 'titre', $boucles) : '')
 			. ');';
 	} else {
 		$init_lang = '';
@@ -535,26 +535,22 @@ 
 
 	// gestion optimale des separateurs et des boucles constantes
 	if (count($boucle->separateur)) {
-		$code_sep = ("'" . str_replace("'", "\'", join('', $boucle->separateur)) . "'");
+		$code_sep = ("'".str_replace("'", "\'", join('', $boucle->separateur))."'");
 	}
 
 	$corps .=
 		((!$boucle->separateur) ?
-			(($constant && !$corps && !$flag_cpt) ? $return :
-				(($return === "''") ? '' :
-					("\n\t\t" . '$t0 .= ' . $return . ";"))) :
-			("\n\t\t\$t1 " .
+			(($constant && !$corps && !$flag_cpt) ? $return : (($return === "''") ? '' : ("\n\t\t".'$t0 .= '.$return.";"))) : ("\n\t\t\$t1 ".
 				((strpos($return, '$t1.') === 0) ?
-					(".=" . substr($return, 4)) :
-					('= ' . $return)) .
-				";\n\t\t" .
-				'$t0 .= ((strlen($t1) && strlen($t0)) ? ' . $code_sep . " : '') . \$t1;"));
+					(".=".substr($return, 4)) : ('= '.$return)).
+				";\n\t\t".
+				'$t0 .= ((strlen($t1) && strlen($t0)) ? '.$code_sep." : '') . \$t1;"));
 
 	// Calculer les invalideurs si c'est une boucle non constante et si on
 	// souhaite invalider ces elements
 	if (!$constant and $primary) {
 		include_spip('inc/invalideur');
-		$corps = calcul_invalideurs($corps, $primary,$boucles, $id_boucle);
+		$corps = calcul_invalideurs($corps, $primary, $boucles, $id_boucle);
 	}
 
 	// gerer le compteur de boucle 
@@ -629,7 +625,7 @@ 
 		$corps,
 		$fin_lang,
 		$trace,
-		'BOUCLE' . $id_boucle . ' @ ' . ($boucle->descr['sourcefile'])
+		'BOUCLE'.$id_boucle.' @ '.($boucle->descr['sourcefile'])
 	);
 
 #	var_dump($a);exit;
@@ -650,20 +646,20 @@ 
  **/
 function calculer_requete_sql($boucle) {
 	$init = array();
-	$init[] = calculer_dec('table', "'" . $boucle->id_table . "'");
-	$init[] = calculer_dec('id', "'" . $boucle->id_boucle . "'");
+	$init[] = calculer_dec('table', "'".$boucle->id_table."'");
+	$init[] = calculer_dec('id', "'".$boucle->id_boucle."'");
 	# En absence de champ c'est un decompte :
 	$init[] = calculer_dec('from', calculer_from($boucle));
 	$init[] = calculer_dec('type', calculer_from_type($boucle));
 	$init[] = calculer_dec('groupby',
-		'array(' . (($g = join("\",\n\t\t\"", $boucle->group)) ? '"' . $g . '"' : '') . ")");
-	$init[] = calculer_dec('select', 'array("' . join("\",\n\t\t\"", $boucle->select) . "\")");
-	$init[] = calculer_dec('orderby', 'array(' . calculer_order($boucle) . ")");
+		'array('.(($g = join("\",\n\t\t\"", $boucle->group)) ? '"'.$g.'"' : '').")");
+	$init[] = calculer_dec('select', 'array("'.join("\",\n\t\t\"", $boucle->select)."\")");
+	$init[] = calculer_dec('orderby', 'array('.calculer_order($boucle).")");
 	$init[] = calculer_dec('where', calculer_dump_array($boucle->where));
 	$init[] = calculer_dec('join', calculer_dump_join($boucle->join));
 	$init[] = calculer_dec('limit',
 		(strpos($boucle->limit, 'intval') === false ?
-			"'" . $boucle->limit . "'"
+			"'".$boucle->limit."'"
 			:
 			$boucle->limit));
 	$init[] = calculer_dec('having', calculer_dump_array($boucle->having));
@@ -672,17 +668,17 @@ 
 	// ou recalculée à chaque passage (vide)
 	foreach ($init as $i) {
 		if (reset($i)) {
-			$s .= "\n\t\t" . end($i);
+			$s .= "\n\t\t".end($i);
 		} # statique
 		else {
-			$d .= "\n\t" . end($i);
+			$d .= "\n\t".end($i);
 		} # dynamique
 	}
 
 	return ($boucle->hierarchie ? "\n\t$boucle->hierarchie" : '')
 	. $boucle->in
 	. $boucle->hash
-	. "\n\t" . 'if (!isset($command[\'table\'])) {'
+	. "\n\t".'if (!isset($command[\'table\'])) {'
 	. $s
 	. "\n\t}"
 	. $d;
@@ -765,7 +761,7 @@ 
  *    - index 1 : Code de l'affectation
  **/
 function calculer_dec($nom, $val) {
-	$static = 'if (!isset($command[\'' . $nom . '\'])) ';
+	$static = 'if (!isset($command[\''.$nom.'\'])) ';
 	// si une variable apparait dans le calcul de la clause
 	// il faut la re-evaluer a chaque passage
 	if (
@@ -782,7 +778,7 @@ 
 		$static = "";
 	}
 
-	return array($static, '$command[\'' . $nom . '\'] = ' . $val . ';');
+	return array($static, '$command[\''.$nom.'\'] = '.$val.';');
 }
 
 /**
@@ -807,17 +803,17 @@ 
 	}
 	$res = "";
 	if ($a and $a[0] == "'?'") {
-		return ("(" . calculer_dump_array($a[1]) .
-			" ? " . calculer_dump_array($a[2]) .
-			" : " . calculer_dump_array($a[3]) .
+		return ("(".calculer_dump_array($a[1]).
+			" ? ".calculer_dump_array($a[2]).
+			" : ".calculer_dump_array($a[3]).
 			")");
 	} else {
 		foreach ($a as $k => $v) {
-			$showk = (is_numeric($k) ? '' : sql_quote($k) . ' => ');
-			$res .= ", " . $showk . calculer_dump_array($v);
+			$showk = (is_numeric($k) ? '' : sql_quote($k).' => ');
+			$res .= ", ".$showk.calculer_dump_array($v);
 		}
 
-		return "\n\t\t\tarray(" . substr($res, 2) . ')';
+		return "\n\t\t\tarray(".substr($res, 2).')';
 	}
 }
 
@@ -825,10 +821,10 @@ 
 function calculer_dump_join($a) {
 	$res = "";
 	foreach ($a as $k => $v) {
-		$res .= ", '$k' => array(" . implode(',', $v) . ")";
+		$res .= ", '$k' => array(".implode(',', $v).")";
 	}
 
-	return 'array(' . substr($res, 2) . ')';
+	return 'array('.substr($res, 2).')';
 }
 
 /**
@@ -845,7 +841,7 @@ 
 		$res .= ",'$k' => '$v'";
 	}
 
-	return 'array(' . substr($res, 1) . ')';
+	return 'array('.substr($res, 1).')';
 }
 
 /**
@@ -863,7 +859,7 @@ 
 		$res .= ",'$k' => '$v'";
 	}
 
-	return 'array(' . substr($res, 1) . ')';
+	return 'array('.substr($res, 1).')';
 }
 
 // https://code.spip.net/@calculer_order
@@ -932,17 +928,17 @@ 
 				) {
 					$res .= " .\n$tab$code";
 				} else {
-					$res = substr($res, 0, -1) . substr($code, 1);
+					$res = substr($res, 0, -1).substr($code, 1);
 				}
 			}
 
-			return '(' . substr($res, 2 + $descr['niv']) . ')';
+			return '('.substr($res, 2 + $descr['niv']).')';
 		}
 	} else {
-		$nom = $descr['nom'] . $id_boucle . ($descr['niv'] ? $descr['niv'] : '');
+		$nom = $descr['nom'].$id_boucle.($descr['niv'] ? $descr['niv'] : '');
 
-		return "join('', array_map('array_shift', \$GLOBALS['debug_objets']['sequence']['$nom'] = array(" . join(" ,\n$tab",
-			$codes) . ")))";
+		return "join('', array_map('array_shift', \$GLOBALS['debug_objets']['sequence']['$nom'] = array(".join(" ,\n$tab",
+			$codes).")))";
 	}
 }
 
@@ -971,7 +967,7 @@ 
 			// texte seul
 			case 'texte':
 				$code = sandbox_composer_texte($p->texte, $p);
-				$commentaire = strlen($p->texte) . " signes";
+				$commentaire = strlen($p->texte)." signes";
 				$avant = '';
 				$apres = '';
 				$altern = "''";
@@ -980,14 +976,14 @@ 
 			case 'polyglotte':
 				$code = "";
 				foreach ($p->traductions as $k => $v) {
-					$code .= ",'" .
-						str_replace(array("\\", "'"), array("\\\\", "\\'"), $k) .
-						"' => '" .
-						str_replace(array("\\", "'"), array("\\\\", "\\'"), $v) .
+					$code .= ",'".
+						str_replace(array("\\", "'"), array("\\\\", "\\'"), $k).
+						"' => '".
+						str_replace(array("\\", "'"), array("\\\\", "\\'"), $v).
 						"'";
 				}
-				$code = "choisir_traduction(array(" .
-					substr($code, 1) .
+				$code = "choisir_traduction(array(".
+					substr($code, 1).
 					"))";
 				$commentaire = '&';
 				$avant = '';
@@ -1003,7 +999,7 @@ 
 					$err_e_c = true;
 					$code = "''";
 				} else {
-					$commentaire = '<INCLURE ' . addslashes(str_replace("\n", ' ', $code)) . '>';
+					$commentaire = '<INCLURE '.addslashes(str_replace("\n", ' ', $code)).'>';
 					$avant = '';
 					$apres = '';
 					$altern = "''";
@@ -1030,8 +1026,8 @@ 
 					$err_e_c = true;
 					$code = "''";
 				} else {
-					$code = 'BOUCLE' .
-						str_replace("-", "_", $nom) . $descr['nom'] .
+					$code = 'BOUCLE'.
+						str_replace("-", "_", $nom).$descr['nom'].
 						'($Cache, $Pile, $doublons, $Numrows, $SP)';
 					$commentaire = "?$nom";
 					if (!$boucles[$nom]->milieu
@@ -1072,24 +1068,22 @@ 
 				foreach ($p->arg as $k => $v) {
 					$_v = calculer_liste($v, $descr, $boucles, $id_boucle);
 					if ($k) {
-						$l[] = _q($k) . ' => ' . $_v;
+						$l[] = _q($k).' => '.$_v;
 					} else {
 						$code = $_v;
 					}
 				}
 				// Si le module n'est pas fourni, l'expliciter sauf si calculé
 				if ($p->module) {
-					$m = $p->module . ':' . $p->nom_champ;
+					$m = $p->module.':'.$p->nom_champ;
 				} elseif ($p->nom_champ) {
-					$m = MODULES_IDIOMES . ':' . $p->nom_champ;
+					$m = MODULES_IDIOMES.':'.$p->nom_champ;
 				} else {
 					$m = '';
 				}
 
-				$code = (!$code ? "'$m'" :
-						($m ? "'$m' . $code" :
-							("(strpos(\$x=$code, ':') ? \$x : ('" . MODULES_IDIOMES . ":' . \$x))")))
-					. (!$l ? '' : (", array(" . implode(",\n", $l) . ")"));
+				$code = (!$code ? "'$m'" : ($m ? "'$m' . $code" : ("(strpos(\$x=$code, ':') ? \$x : ('".MODULES_IDIOMES.":' . \$x))")))
+					. (!$l ? '' : (", array(".implode(",\n", $l).")"));
 				$code = "_T($code)";
 				if ($p->param) {
 					$p->id_boucle = $id_boucle;
@@ -1112,7 +1106,7 @@ 
 				$p->type_requete = $type;
 
 				$code = calculer_champ($p);
-				$commentaire = '#' . $p->nom_champ . $p->etoile;
+				$commentaire = '#'.$p->nom_champ.$p->etoile;
 				$avant = calculer_liste($p->avant,
 					$descr, $boucles, $id_boucle);
 				$apres = calculer_liste($p->apres,
@@ -1143,10 +1137,9 @@ 
 		if ($code != "''") {
 			$code = compile_retour($code, $avant, $apres, $altern, $tab, $descr['niv']);
 			$codes[] = (($mode == 'validation') ?
-				"array($code, '$commentaire', " . $p->ligne . ")"
+				"array($code, '$commentaire', ".$p->ligne.")"
 				: (($mode == 'code') ?
-					"\n// $commentaire\n$code" :
-					$code));
+					"\n// $commentaire\n$code" : $code));
 		}
 	} // foreach
 
@@ -1197,28 +1190,28 @@ 
 	if ($apres === "''") {
 		$apres = '';
 	}
-	if ($avant or $apres or ($altern !== "''")){
-		if (preg_match(_REGEXP_CONCAT_NON_VIDE, $code)){
+	if ($avant or $apres or ($altern !== "''")) {
+		if (preg_match(_REGEXP_CONCAT_NON_VIDE, $code)) {
 			$t = $code;
 			$cond = '';
 		} elseif (preg_match(_REGEXP_COND_VIDE_NONVIDE, $code, $r)) {
 			$t = $r[2];
-			$cond = '!' . $r[1];
+			$cond = '!'.$r[1];
 		} else {
-			if (preg_match(_REGEXP_COND_NONVIDE_VIDE, $code, $r)){
+			if (preg_match(_REGEXP_COND_NONVIDE_VIDE, $code, $r)) {
 				$t = $r[2];
 				$cond = $r[1];
 			} else {
-				$t = '$t' . $n;
+				$t = '$t'.$n;
 				$cond = "($t = $code)!==''";
 			}
 		}
 
-		$res = (!$avant ? "" : "$avant . ") .
-			$t .
+		$res = (!$avant ? "" : "$avant . ").
+			$t.
 			(!$apres ? "" : " . $apres");
 
-		if ($res!==$t){
+		if ($res !== $t) {
 			$res = "($res)";
 		}
 
@@ -1268,12 +1261,12 @@ 
 
 	// rendre inertes les echappements de #[](){}<>
 	$i = 0;
-	while (false !== strpos($squelette, $inerte = '-INERTE' . $i)) {
+	while (false !== strpos($squelette, $inerte = '-INERTE'.$i)) {
 		$i++;
 	}
 	$squelette = preg_replace_callback(',\\\\([#[()\]{}<>]),',
 		function($a) use ($inerte) {
-			return "$inerte-" . ord($a[1]) . '-';
+			return "$inerte-".ord($a[1]).'-';
 		},
 		$squelette,
 		-1,
@@ -1290,7 +1283,7 @@ 
 	// Phraser le squelette, selon sa grammaire
 
 	$boucles = array();
-	$f = charger_fonction('phraser_' . $gram, 'public');
+	$f = charger_fonction('phraser_'.$gram, 'public');
 
 	$squelette = $f($squelette, '', $boucles, $descr);
 
@@ -1309,7 +1302,7 @@ 
 			$boucles[$i]->descr['squelette'] = preg_replace_callback(
 				",$inerte-(\d+)-,",
 				function($a) {
-					return "\\\\" . chr($a[1]);
+					return "\\\\".chr($a[1]);
 				},
 				$boucle->descr['squelette']
 			);
@@ -1321,19 +1314,19 @@ 
 		include_spip('public/decompiler');
 		foreach ($boucles as $id => $boucle) {
 			if ($id) {
-				$decomp = "\n/* BOUCLE " .
-					$boucle->type_requete .
-					" " .
-					str_replace('*/', '* /', public_decompiler($boucle, $gram, 0, 'criteres')) .
-					($boucle->debug ? "\n *\n * " . implode("\n * ", $boucle->debug) . "\n" : '') .
+				$decomp = "\n/* BOUCLE ".
+					$boucle->type_requete.
+					" ".
+					str_replace('*/', '* /', public_decompiler($boucle, $gram, 0, 'criteres')).
+					($boucle->debug ? "\n *\n * ".implode("\n * ", $boucle->debug)."\n" : '').
 					" */\n";
 			} else {
-				$decomp = ("\n/*\n" .
+				$decomp = ("\n/*\n".
 					str_replace('*/', '* /', public_decompiler($squelette, $gram))
 					. "\n*/");
 			}
-			$boucles[$id]->return = $decomp . $boucle->return;
-			$GLOBALS['debug_objets']['code'][$nom . $id] = $boucle->return;
+			$boucles[$id]->return = $decomp.$boucle->return;
+			$GLOBALS['debug_objets']['code'][$nom.$id] = $boucle->return;
 		}
 	}
 
@@ -1356,7 +1349,7 @@ 
 		}
 	}
 	foreach ($boucles as $id => $boucle) {
-		$GLOBALS['debug_objets']['boucle'][$nom . $id] = $boucle;
+		$GLOBALS['debug_objets']['boucle'][$nom.$id] = $boucle;
 	}
 	$descr['documents'] = compile_inclure_doublons($squelette);
 
@@ -1440,8 +1433,7 @@ 
 						} else {
 							$boucles[$id]->type_requete = false;
 							$boucle = $boucles[$id];
-							$x = (!$boucle->sql_serveur ? '' :
-									($boucle->sql_serveur . ":")) .
+							$x = (!$boucle->sql_serveur ? '' : ($boucle->sql_serveur.":")).
 								$type;
 							$msg = array(
 								'zbug_table_inconnue',
@@ -1527,13 +1519,13 @@ 
 			if (
 				// fonction de boucle avec serveur & table
 				(!$serveur or
-					((!function_exists($f = "boucle_" . $serveur . "_" . $table))
-						and (!function_exists($f = $f . "_dist"))
+					((!function_exists($f = "boucle_".$serveur."_".$table))
+						and (!function_exists($f = $f."_dist"))
 					)
 				)
 				// fonction de boucle avec table
-				and (!function_exists($f = "boucle_" . $table))
-				and (!function_exists($f = $f . "_dist"))
+				and (!function_exists($f = "boucle_".$table))
+				and (!function_exists($f = $f."_dist"))
 			) {
 				// fonction de boucle standard 
 				if (!function_exists($f = 'boucle_DEFAUT')) {
@@ -1541,20 +1533,20 @@ 
 				}
 			}
 
-			$req = "\n\n\tstatic \$command = array();\n\t" .
-				"static \$connect;\n\t" .
-				"\$command['connect'] = \$connect = " .
-				_q($boucle->sql_serveur) .
-				";" .
+			$req = "\n\n\tstatic \$command = array();\n\t".
+				"static \$connect;\n\t".
+				"\$command['connect'] = \$connect = ".
+				_q($boucle->sql_serveur).
+				";".
 				$f($id, $boucles);
 		} else {
 			$req = ("\n\treturn '';");
 		}
 
 		$boucles[$id]->return =
-			"\n\nfunction BOUCLE" . strtr($id, "-", "_") . $nom .
-			'(&$Cache, &$Pile, &$doublons, &$Numrows, $SP) {' .
-			$req .
+			"\n\nfunction BOUCLE".strtr($id, "-", "_").$nom.
+			'(&$Cache, &$Pile, &$doublons, &$Numrows, $SP) {'.
+			$req.
 			"\n}\n";
 	}
 
@@ -1564,7 +1556,7 @@ 
 		return false;
 	}
 
-	$principal = "\nfunction " . $nom . '($Cache, $Pile, $doublons = array(), $Numrows = array(), $SP = 0) {
+	$principal = "\nfunction ".$nom.'($Cache, $Pile, $doublons = array(), $Numrows = array(), $SP = 0) {
 '
 		// reporter de maniere securisee les doublons inclus
 		. '
@@ -1572,15 +1564,15 @@ 
 		$doublons = nettoyer_env_doublons($Pile[0]["doublons"]);
 
 	$connect = ' .
-		_q($connect) . ';
+		_q($connect).';
 	$page = ' .
 		// ATTENTION, le calcul de l'expression $corps affectera $Cache
 		// c'est pourquoi on l'affecte a la variable auxiliaire $page.
 		// avant de referencer $Cache
-		$corps . ";
+		$corps.";
 
 	return analyse_resultat_skel(" . var_export($nom, true)
-		. ", \$Cache, \$page, " . var_export($sourcefile, true) . ");
+		. ", \$Cache, \$page, ".var_export($sourcefile, true).");
 }";
 
 	$secondes = spip_timer('calcul_skel');
@@ -1594,10 +1586,10 @@ 
 	$code->return = '
 //
 // Fonction principale du squelette ' .
-		$sourcefile .
-		($connect ? " pour $connect" : '') .
-		(!CODE_COMMENTE ? '' : "\n// Temps de compilation total: $secondes") .
-		"\n//\n" .
+		$sourcefile.
+		($connect ? " pour $connect" : '').
+		(!CODE_COMMENTE ? '' : "\n// Temps de compilation total: $secondes").
+		"\n//\n".
 		$principal;
 
 	$boucles[''] = $code;
@@ -1649,7 +1641,7 @@ 
  **/
 function requeteur_data_dist(&$boucles, &$boucle, &$id) {
 	include_spip('iterateur/data');
-	if ($h = charger_fonction($boucle->type_requete . '_to_array', 'inc', true)) {
+	if ($h = charger_fonction($boucle->type_requete.'_to_array', 'inc', true)) {
 		$g = charger_fonction('data', 'iterateur');
 		$boucles[$id] = $g($boucle);
 		// from[0] stocke le type de data (rss, yql, ...)