spip / SPIP

ecrire/xml/indenter.php

Spacing +3 added lines, -3 removed lines

@@ -63,9 +63,9 @@
 	$f = new IndenteurXML();
 	$sax($page, $apply, $f);
 	if (!$f->err) {
-		return $f->entete . $f->res;
+		return $f->entete.$f->res;
 	}
-	spip_log('indentation impossible ' . (is_countable($f->err) ? count($f->err) : 0) . ' erreurs de validation');
+	spip_log('indentation impossible '.(is_countable($f->err) ? count($f->err) : 0).' erreurs de validation');
 
-	return $f->entete . $f->page;
+	return $f->entete.$f->page;
 }

Indentation +37 added lines, -37 removed lines

@@ -11,55 +11,55 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 class IndenteurXML {
 
-	public function debutElement($phraseur, $name, $attrs) {
-		xml_debutElement($this, $name, $attrs);
-	}
+    public function debutElement($phraseur, $name, $attrs) {
+        xml_debutElement($this, $name, $attrs);
+    }
 
-	public function finElement($phraseur, $name) {
-		xml_finElement($this, $name);
-	}
+    public function finElement($phraseur, $name) {
+        xml_finElement($this, $name);
+    }
 
-	public function textElement($phraseur, $data) {
-		xml_textElement($this, $data);
-	}
+    public function textElement($phraseur, $data) {
+        xml_textElement($this, $data);
+    }
 
-	public function piElement($phraseur, $target, $data) {
-		xml_PiElement($this, $target, $data);
-	}
+    public function piElement($phraseur, $target, $data) {
+        xml_PiElement($this, $target, $data);
+    }
 
-	public function defaultElement($phraseur, $data) {
-		xml_defaultElement($this, $data);
-	}
+    public function defaultElement($phraseur, $data) {
+        xml_defaultElement($this, $data);
+    }
 
-	public function phraserTout($phraseur, $data) {
-		xml_parsestring($this, $data);
-	}
+    public function phraserTout($phraseur, $data) {
+        xml_parsestring($this, $data);
+    }
 
-	public $depth = '';
-	public $res = '';
-	public $err = [];
-	public $contenu = [];
-	public $ouvrant = [];
-	public $reperes = [];
-	public $entete = '';
-	public $page = '';
-	public $dtc = null;
-	public $sax = null;
+    public $depth = '';
+    public $res = '';
+    public $err = [];
+    public $contenu = [];
+    public $ouvrant = [];
+    public $reperes = [];
+    public $entete = '';
+    public $page = '';
+    public $dtc = null;
+    public $sax = null;
 }
 
 function xml_indenter_dist($page, $apply = false) {
-	$sax = charger_fonction('sax', 'xml');
-	$f = new IndenteurXML();
-	$sax($page, $apply, $f);
-	if (!$f->err) {
-		return $f->entete . $f->res;
-	}
-	spip_log('indentation impossible ' . (is_countable($f->err) ? count($f->err) : 0) . ' erreurs de validation');
+    $sax = charger_fonction('sax', 'xml');
+    $f = new IndenteurXML();
+    $sax($page, $apply, $f);
+    if (!$f->err) {
+        return $f->entete . $f->res;
+    }
+    spip_log('indentation impossible ' . (is_countable($f->err) ? count($f->err) : 0) . ' erreurs de validation');
 
-	return $f->entete . $f->page;
+    return $f->entete . $f->page;
 }

ecrire/xml/sax.php

Spacing +21 added lines, -22 removed lines

@@ -46,8 +46,8 @@ 
 	$t = $phraseur->ouvrant[$depth] ?? ' ';
 	// espace initial signifie: deja integree au resultat
 	if ($t[0] != ' ') {
-		$phraseur->res .= '<' . $t . '>';
-		$phraseur->ouvrant[$depth] = ' ' . $t;
+		$phraseur->res .= '<'.$t.'>';
+		$phraseur->ouvrant[$depth] = ' '.$t;
 	}
 	$t = $phraseur->contenu[$depth];
 	// n'indenter que s'il y a un separateur avant
@@ -58,14 +58,14 @@ 
 	foreach ($attrs as $k => $v) {
 		$delim = strpos($v, "'") === false ? "'" : '"';
 		$val = xml_entites_html($v);
-		$att .= $sep . $k . '=' . $delim
+		$att .= $sep.$k.'='.$delim
 			. ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
 			. $delim;
 		$sep = "\n $depth";
 	}
 	$phraseur->depth .= '  ';
 	$phraseur->contenu[$phraseur->depth] = '';
-	$phraseur->ouvrant[$phraseur->depth] = $name . $att;
+	$phraseur->ouvrant[$phraseur->depth] = $name.$att;
 	$phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
 }
 
@@ -74,13 +74,13 @@ 
 	$ouv = $phraseur->ouvrant[$phraseur->depth];
 
 	if ($ouv[0] != ' ') {
-		$phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
+		$phraseur->ouvrant[$phraseur->depth] = ' '.$ouv;
 	} else {
 		$ouv = '';
 	}
 	$t = $phraseur->contenu[$phraseur->depth];
 	$phraseur->depth = substr($phraseur->depth, 2);
-	$t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
+	$t = preg_replace("/[\n\t ]+$/", "\n".$phraseur->depth, $t);
 
 	// fusion <balise></balise> en <balise />.
 	// ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
@@ -89,9 +89,9 @@ 
 	// (param fusion_bal)
 
 	if ($t || (($ouv != $name) and !$fusion_bal)) {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . '</' . $name . '>';
+		$phraseur->res .= ($ouv ? ('<'.$ouv.'>') : '').$t.'</'.$name.'>';
 	} else {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ('</' . $name . '>'));
+		$phraseur->res .= ($ouv ? ('<'.$ouv.' />') : ('</'.$name.'>'));
 	}
 }
 
@@ -136,16 +136,15 @@ 
 		coordonnees_erreur(
 			$phraseur,
 			xml_error_string(xml_get_error_code($phraseur->sax))
-			. "<br />\n" .
-			(!$phraseur->depth ? '' :
-				('(' .
-					_T('erreur_balise_non_fermee') .
-					' <tt>' .
-					$phraseur->ouvrant[$phraseur->depth] .
-					'</tt> ' .
-					_T('ligne') .
-					' ' .
-					$phraseur->reperes[$phraseur->depth] .
+			. "<br />\n".
+			(!$phraseur->depth ? '' : ('('.
+					_T('erreur_balise_non_fermee').
+					' <tt>'.
+					$phraseur->ouvrant[$phraseur->depth].
+					'</tt> '.
+					_T('ligne').
+					' '.
+					$phraseur->reperes[$phraseur->depth].
 			") <br />\n"))
 		);
 	}
@@ -188,7 +187,7 @@ 
 	// et escamoter le doctype que sax mange en php5 mais pas en  php4
 	if (!$doctype) {
 		if (!$r = analyser_doctype($page)) {
-			$page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
+			$page = _MESSAGE_DOCTYPE._DOCTYPE_ECRIRE
 				. preg_replace(_REGEXP_DOCTYPE, '', $page);
 			$r = analyser_doctype($page);
 		}
@@ -297,18 +296,18 @@ 
 					'rss-0.91.dtd'
 				];
 			} else {
-				$dtd = $topelement . '.dtd';
+				$dtd = $topelement.'.dtd';
 				$f = find_in_path($dtd);
 				if (file_exists($f)) {
 					return [$entete, 'SYSTEM', $f, $dtd];
 				}
 			}
 		}
-		spip_log('Dtd pas vu pour ' . substr($data, 0, 100));
+		spip_log('Dtd pas vu pour '.substr($data, 0, 100));
 
 		return [];
 	}
-	[$entete, , $topelement, $avail, $suite] = $page;
+	[$entete,, $topelement, $avail, $suite] = $page;
 
 	if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
 		if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {

Indentation +257 added lines, -257 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/charsets');
@@ -24,222 +24,222 @@ 
  * @return string
  */
 function xml_entites_html($texte) {
-	if (
-		!is_string($texte) or !$texte
-		or strpbrk($texte, "&\"'<>") == false
-	) {
-		return $texte;
-	}
-
-	if (!function_exists('spip_htmlspecialchars')) {
-		include_spip('inc/filtres_mini');
-	}
-	$texte = spip_htmlspecialchars($texte, ENT_QUOTES);
-
-	return $texte;
+    if (
+        !is_string($texte) or !$texte
+        or strpbrk($texte, "&\"'<>") == false
+    ) {
+        return $texte;
+    }
+
+    if (!function_exists('spip_htmlspecialchars')) {
+        include_spip('inc/filtres_mini');
+    }
+    $texte = spip_htmlspecialchars($texte, ENT_QUOTES);
+
+    return $texte;
 }
 
 function xml_debutElement($phraseur, $name, $attrs) {
-	$depth = $phraseur->depth;
-
-	$t = $phraseur->ouvrant[$depth] ?? ' ';
-	// espace initial signifie: deja integree au resultat
-	if ($t[0] != ' ') {
-		$phraseur->res .= '<' . $t . '>';
-		$phraseur->ouvrant[$depth] = ' ' . $t;
-	}
-	$t = $phraseur->contenu[$depth];
-	// n'indenter que s'il y a un separateur avant
-	$phraseur->res .= preg_replace("/[\n\t ]+$/", "\n$depth", $t);
-	$phraseur->contenu[$depth] = '';
-	$att = '';
-	$sep = ' ';
-	foreach ($attrs as $k => $v) {
-		$delim = strpos($v, "'") === false ? "'" : '"';
-		$val = xml_entites_html($v);
-		$att .= $sep . $k . '=' . $delim
-			. ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
-			. $delim;
-		$sep = "\n $depth";
-	}
-	$phraseur->depth .= '  ';
-	$phraseur->contenu[$phraseur->depth] = '';
-	$phraseur->ouvrant[$phraseur->depth] = $name . $att;
-	$phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
+    $depth = $phraseur->depth;
+
+    $t = $phraseur->ouvrant[$depth] ?? ' ';
+    // espace initial signifie: deja integree au resultat
+    if ($t[0] != ' ') {
+        $phraseur->res .= '<' . $t . '>';
+        $phraseur->ouvrant[$depth] = ' ' . $t;
+    }
+    $t = $phraseur->contenu[$depth];
+    // n'indenter que s'il y a un separateur avant
+    $phraseur->res .= preg_replace("/[\n\t ]+$/", "\n$depth", $t);
+    $phraseur->contenu[$depth] = '';
+    $att = '';
+    $sep = ' ';
+    foreach ($attrs as $k => $v) {
+        $delim = strpos($v, "'") === false ? "'" : '"';
+        $val = xml_entites_html($v);
+        $att .= $sep . $k . '=' . $delim
+            . ($delim !== '"' ? str_replace('&quot;', '"', $val) : $val)
+            . $delim;
+        $sep = "\n $depth";
+    }
+    $phraseur->depth .= '  ';
+    $phraseur->contenu[$phraseur->depth] = '';
+    $phraseur->ouvrant[$phraseur->depth] = $name . $att;
+    $phraseur->reperes[$phraseur->depth] = xml_get_current_line_number($phraseur->sax);
 }
 
 function xml_finElement($phraseur, $name, $fusion_bal = false) {
-	$ouv = $phraseur->ouvrant[$phraseur->depth];
-
-	if ($ouv[0] != ' ') {
-		$phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
-	} else {
-		$ouv = '';
-	}
-	$t = $phraseur->contenu[$phraseur->depth];
-	$phraseur->depth = substr($phraseur->depth, 2);
-	$t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
-
-	// fusion <balise></balise> en <balise />.
-	// ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
-	// en particulier pour les balises Script et A.
-	// en presence d'attributs ne le faire que si la DTD est dispo et d'accord
-	// (param fusion_bal)
-
-	if ($t || (($ouv != $name) and !$fusion_bal)) {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . '</' . $name . '>';
-	} else {
-		$phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ('</' . $name . '>'));
-	}
+    $ouv = $phraseur->ouvrant[$phraseur->depth];
+
+    if ($ouv[0] != ' ') {
+        $phraseur->ouvrant[$phraseur->depth] = ' ' . $ouv;
+    } else {
+        $ouv = '';
+    }
+    $t = $phraseur->contenu[$phraseur->depth];
+    $phraseur->depth = substr($phraseur->depth, 2);
+    $t = preg_replace("/[\n\t ]+$/", "\n" . $phraseur->depth, $t);
+
+    // fusion <balise></balise> en <balise />.
+    // ATTENTION,  certains clients http croient que fusion ==> pas d'atttributs
+    // en particulier pour les balises Script et A.
+    // en presence d'attributs ne le faire que si la DTD est dispo et d'accord
+    // (param fusion_bal)
+
+    if ($t || (($ouv != $name) and !$fusion_bal)) {
+        $phraseur->res .= ($ouv ? ('<' . $ouv . '>') : '') . $t . '</' . $name . '>';
+    } else {
+        $phraseur->res .= ($ouv ? ('<' . $ouv . ' />') : ('</' . $name . '>'));
+    }
 }
 
 function xml_textElement($phraseur, $data) {
-	$depth = $phraseur->depth;
-	$phraseur->contenu[$depth] .= preg_match('/^script/', $phraseur->ouvrant[$depth])
-		? $data
-		: xml_entites_html($data);
+    $depth = $phraseur->depth;
+    $phraseur->contenu[$depth] .= preg_match('/^script/', $phraseur->ouvrant[$depth])
+        ? $data
+        : xml_entites_html($data);
 }
 
 function xml_piElement($phraseur, $target, $data) {
-	$depth = $phraseur->depth;
-
-	if (strtolower($target) != 'php') {
-		$phraseur->contenu[$depth] .= $data;
-	} else {
-		ob_start();
-		eval($data);
-		$data = ob_get_contents();
-		ob_end_clean();
-		$phraseur->contenu[$depth] .= $data;
-	}
+    $depth = $phraseur->depth;
+
+    if (strtolower($target) != 'php') {
+        $phraseur->contenu[$depth] .= $data;
+    } else {
+        ob_start();
+        eval($data);
+        $data = ob_get_contents();
+        ob_end_clean();
+        $phraseur->contenu[$depth] .= $data;
+    }
 }
 
 
 function xml_defaultElement($phraseur, $data) {
-	$depth = $phraseur->depth;
+    $depth = $phraseur->depth;
 
-	if (!isset($phraseur->contenu[$depth])) {
-		$phraseur->contenu[$depth] = '';
-	}
-	$phraseur->contenu[$depth] .= $data;
+    if (!isset($phraseur->contenu[$depth])) {
+        $phraseur->contenu[$depth] = '';
+    }
+    $phraseur->contenu[$depth] .= $data;
 }
 
 function xml_parsestring($phraseur, $data) {
-	$phraseur->contenu[$phraseur->depth] = '';
-
-	if (!xml_parse($phraseur->sax, $data, true)) {
-		coordonnees_erreur(
-			$phraseur,
-			xml_error_string(xml_get_error_code($phraseur->sax))
-			. "<br />\n" .
-			(!$phraseur->depth ? '' :
-				('(' .
-					_T('erreur_balise_non_fermee') .
-					' <tt>' .
-					$phraseur->ouvrant[$phraseur->depth] .
-					'</tt> ' .
-					_T('ligne') .
-					' ' .
-					$phraseur->reperes[$phraseur->depth] .
-			") <br />\n"))
-		);
-	}
+    $phraseur->contenu[$phraseur->depth] = '';
+
+    if (!xml_parse($phraseur->sax, $data, true)) {
+        coordonnees_erreur(
+            $phraseur,
+            xml_error_string(xml_get_error_code($phraseur->sax))
+            . "<br />\n" .
+            (!$phraseur->depth ? '' :
+                ('(' .
+                    _T('erreur_balise_non_fermee') .
+                    ' <tt>' .
+                    $phraseur->ouvrant[$phraseur->depth] .
+                    '</tt> ' .
+                    _T('ligne') .
+                    ' ' .
+                    $phraseur->reperes[$phraseur->depth] .
+            ") <br />\n"))
+        );
+    }
 }
 
 function coordonnees_erreur($phraseur, $msg) {
-	$entete_length = substr_count($phraseur->entete, "\n");
-	$phraseur->err[] = [
-		$msg,
-		xml_get_current_line_number($phraseur->sax) + $entete_length,
-		xml_get_current_column_number($phraseur->sax)
-	];
+    $entete_length = substr_count($phraseur->entete, "\n");
+    $phraseur->err[] = [
+        $msg,
+        xml_get_current_line_number($phraseur->sax) + $entete_length,
+        xml_get_current_column_number($phraseur->sax)
+    ];
 }
 
 function xml_sax_dist($page, $apply = false, $phraseur = null, $doctype = '', $charset = null) {
-	if (is_null($charset)) {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	if ($apply) {
-		ob_start();
-		if (is_array($apply)) {
-			$r = $page(...$apply);
-		} else {
-			$r = $page();
-		}
-		$page = ob_get_contents();
-		ob_end_clean();
-		// fonction sans aucun "echo", ca doit etre le resultat
-		if (!$page) {
-			$page = $r;
-		}
-	}
-
-	if (!$page) {
-		return '';
-	}
-	// charger la DTD et transcoder les entites,
-	// et escamoter le doctype que sax mange en php5 mais pas en  php4
-	if (!$doctype) {
-		if (!$r = analyser_doctype($page)) {
-			$page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
-				. preg_replace(_REGEXP_DOCTYPE, '', $page);
-			$r = analyser_doctype($page);
-		}
-		[$entete, $avail, $grammaire, $rotlvl] = array_pad($r, 4, null);
-		$page = substr($page, strlen($entete));
-	} else {
-		$avail = 'SYSTEM';
-		$grammaire = $doctype;
-		$rotlvl = basename($grammaire);
-	}
-
-	include_spip('xml/analyser_dtd');
-	$dtc = charger_dtd($grammaire, $avail, $rotlvl);
-	$page = sax_bug($page, $dtc, $charset);
-
-	// compatibilite Tidy espace public
-	if (!$phraseur) {
-		$indenter_xml = charger_fonction('indenter', 'xml');
-
-		return $indenter_xml($page, $apply);
-	}
-
-	$xml_parser = xml_parser_create($charset);
-
-	xml_set_element_handler(
-		$xml_parser,
-		[$phraseur, 'debutElement'],
-		[$phraseur, 'finElement']
-	);
-
-	xml_set_character_data_handler(
-		$xml_parser,
-		[$phraseur, 'textElement']
-	);
-
-	xml_set_processing_instruction_handler(
-		$xml_parser,
-		[$phraseur, 'piElement']
-	);
-
-	xml_set_default_handler(
-		$xml_parser,
-		[$phraseur, 'defaultElement']
-	);
-
-	xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
-
-	$phraseur->sax = $xml_parser;
-	if (isset($entete)) {
-		$phraseur->entete = $entete;
-	}
-	$phraseur->page = $page;
-	$phraseur->dtc = $dtc;
-	$phraseur->phraserTout($xml_parser, $page);
-	xml_parser_free($xml_parser);
-	$phraseur->sax = '';
-
-	return $phraseur;
+    if (is_null($charset)) {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    if ($apply) {
+        ob_start();
+        if (is_array($apply)) {
+            $r = $page(...$apply);
+        } else {
+            $r = $page();
+        }
+        $page = ob_get_contents();
+        ob_end_clean();
+        // fonction sans aucun "echo", ca doit etre le resultat
+        if (!$page) {
+            $page = $r;
+        }
+    }
+
+    if (!$page) {
+        return '';
+    }
+    // charger la DTD et transcoder les entites,
+    // et escamoter le doctype que sax mange en php5 mais pas en  php4
+    if (!$doctype) {
+        if (!$r = analyser_doctype($page)) {
+            $page = _MESSAGE_DOCTYPE . _DOCTYPE_ECRIRE
+                . preg_replace(_REGEXP_DOCTYPE, '', $page);
+            $r = analyser_doctype($page);
+        }
+        [$entete, $avail, $grammaire, $rotlvl] = array_pad($r, 4, null);
+        $page = substr($page, strlen($entete));
+    } else {
+        $avail = 'SYSTEM';
+        $grammaire = $doctype;
+        $rotlvl = basename($grammaire);
+    }
+
+    include_spip('xml/analyser_dtd');
+    $dtc = charger_dtd($grammaire, $avail, $rotlvl);
+    $page = sax_bug($page, $dtc, $charset);
+
+    // compatibilite Tidy espace public
+    if (!$phraseur) {
+        $indenter_xml = charger_fonction('indenter', 'xml');
+
+        return $indenter_xml($page, $apply);
+    }
+
+    $xml_parser = xml_parser_create($charset);
+
+    xml_set_element_handler(
+        $xml_parser,
+        [$phraseur, 'debutElement'],
+        [$phraseur, 'finElement']
+    );
+
+    xml_set_character_data_handler(
+        $xml_parser,
+        [$phraseur, 'textElement']
+    );
+
+    xml_set_processing_instruction_handler(
+        $xml_parser,
+        [$phraseur, 'piElement']
+    );
+
+    xml_set_default_handler(
+        $xml_parser,
+        [$phraseur, 'defaultElement']
+    );
+
+    xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
+
+    $phraseur->sax = $xml_parser;
+    if (isset($entete)) {
+        $phraseur->entete = $entete;
+    }
+    $phraseur->page = $page;
+    $phraseur->dtc = $dtc;
+    $phraseur->phraserTout($xml_parser, $page);
+    xml_parser_free($xml_parser);
+    $phraseur->sax = '';
+
+    return $phraseur;
 }
 
 // SAX ne dit pas si une Entite est dans un attribut ou non.
@@ -250,24 +250,24 @@ 
 // sinon on se rabat sur ce qu'en connait SPIP en standard.
 
 function sax_bug($data, $dtc, $charset = null) {
-	if (is_null($charset)) {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-
-	if ($dtc) {
-		$trans = [];
-
-		foreach ($dtc->entites as $k => $v) {
-			if (!strpos(' amp lt gt quot ', (string) $k)) {
-				$trans["&$k;"] = $v;
-			}
-		}
-		$data = strtr($data, $trans);
-	} else {
-		$data = html2unicode($data, true);
-	}
-
-	return unicode2charset($data, $charset);
+    if (is_null($charset)) {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+
+    if ($dtc) {
+        $trans = [];
+
+        foreach ($dtc->entites as $k => $v) {
+            if (!strpos(' amp lt gt quot ', (string) $k)) {
+                $trans["&$k;"] = $v;
+            }
+        }
+        $data = strtr($data, $trans);
+    } else {
+        $data = html2unicode($data, true);
+    }
+
+    return unicode2charset($data, $charset);
 }
 
 // Retirer < ? xml... ? > et autre PI, ainsi que les commentaires en debut
@@ -277,52 +277,52 @@ 
 // les autres formats RSS n'ont pas de DTD,
 // mais un XML Schema que SPIP ne fait pas encore lire.
 function analyser_doctype($data) {
-	if (!preg_match(_REGEXP_DOCTYPE, $data, $page)) {
-		if (preg_match(_REGEXP_XML, $data, $page)) {
-			[, $entete, $topelement] = $page;
-			if ($topelement == 'rss') {
-				return [
-					$entete,
-					'PUBLIC',
-					_DOCTYPE_RSS,
-					'rss-0.91.dtd'
-				];
-			} else {
-				$dtd = $topelement . '.dtd';
-				$f = find_in_path($dtd);
-				if (file_exists($f)) {
-					return [$entete, 'SYSTEM', $f, $dtd];
-				}
-			}
-		}
-		spip_log('Dtd pas vu pour ' . substr($data, 0, 100));
-
-		return [];
-	}
-	[$entete, , $topelement, $avail, $suite] = $page;
-
-	if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
-		if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {
-			return [];
-		}
-	}
-	[, $rotlvl, $suite] = $r;
-
-	if (!$suite) {
-		if ($avail != 'SYSTEM') {
-			return [];
-		}
-		$grammaire = $rotlvl;
-		$rotlvl = '';
-	} else {
-		if (!preg_match('/^"([^"]*)"\s*$/', $suite, $r)) {
-			if (!preg_match("/^'([^']*)'\s*$/", $suite, $r)) {
-				return [];
-			}
-		}
-
-		$grammaire = $r[1];
-	}
-
-	return [$entete, $avail, $grammaire, $rotlvl];
+    if (!preg_match(_REGEXP_DOCTYPE, $data, $page)) {
+        if (preg_match(_REGEXP_XML, $data, $page)) {
+            [, $entete, $topelement] = $page;
+            if ($topelement == 'rss') {
+                return [
+                    $entete,
+                    'PUBLIC',
+                    _DOCTYPE_RSS,
+                    'rss-0.91.dtd'
+                ];
+            } else {
+                $dtd = $topelement . '.dtd';
+                $f = find_in_path($dtd);
+                if (file_exists($f)) {
+                    return [$entete, 'SYSTEM', $f, $dtd];
+                }
+            }
+        }
+        spip_log('Dtd pas vu pour ' . substr($data, 0, 100));
+
+        return [];
+    }
+    [$entete, , $topelement, $avail, $suite] = $page;
+
+    if (!preg_match('/^"([^"]*)"\s*(.*)$/', $suite, $r)) {
+        if (!preg_match("/^'([^']*)'\s*(.*)$/", $suite, $r)) {
+            return [];
+        }
+    }
+    [, $rotlvl, $suite] = $r;
+
+    if (!$suite) {
+        if ($avail != 'SYSTEM') {
+            return [];
+        }
+        $grammaire = $rotlvl;
+        $rotlvl = '';
+    } else {
+        if (!preg_match('/^"([^"]*)"\s*$/', $suite, $r)) {
+            if (!preg_match("/^'([^']*)'\s*$/", $suite, $r)) {
+                return [];
+            }
+        }
+
+        $grammaire = $r[1];
+    }
+
+    return [$entete, $avail, $grammaire, $rotlvl];
 }

ecrire/xml/analyser_dtd.php

Spacing +7 added lines, -7 removed lines

@@ -29,7 +29,7 @@ 
 		$grammaire = find_in_path($grammaire);
 	}
 
-	$file = _DIR_CACHE_XML . preg_replace('/[^\w.]/', '_', $rotlvl) . '.gz';
+	$file = _DIR_CACHE_XML.preg_replace('/[^\w.]/', '_', $rotlvl).'.gz';
 
 	if (lire_fichier($file, $r)) {
 		if (!$grammaire) {
@@ -56,7 +56,7 @@ 
 				$dtc->peres[$k] = $v;
 			}
 
-			spip_log("Analyser DTD $avail $grammaire (" . spip_timer('dtd') . ') ' . (is_countable($dtc->macros) ? count($dtc->macros) : 0) . ' macros, ' . (is_countable($dtc->elements) ? count($dtc->elements) : 0) . ' elements, ' . (is_countable($dtc->attributs) ? count($dtc->attributs) : 0) . " listes d'attributs, " . (is_countable($dtc->entites) ? count($dtc->entites) : 0) . ' entites');
+			spip_log("Analyser DTD $avail $grammaire (".spip_timer('dtd').') '.(is_countable($dtc->macros) ? count($dtc->macros) : 0).' macros, '.(is_countable($dtc->elements) ? count($dtc->elements) : 0).' elements, '.(is_countable($dtc->attributs) ? count($dtc->attributs) : 0)." listes d'attributs, ".(is_countable($dtc->entites) ? count($dtc->entites) : 0).' entites');
 			#	$r = $dtc->regles; ksort($r);foreach($r as $l => $v) {$t=array_keys($dtc->attributs[$l]);echo "<b>$l</b> '$v' ", count($t), " attributs: ", join (', ',$t);$t=$dtc->peres[$l];echo "<br />",count($t), " peres: ", @join (', ',$t), "<br />\n";}exit;
 			ecrire_fichier($file, serialize($dtc), true);
 		}
@@ -173,7 +173,7 @@ 
 			}
 		}
 		if (!is_string($r)) {
-			spip_log("erreur $r dans la DTD  " . substr($dtd, 0, 80) . '.....');
+			spip_log("erreur $r dans la DTD  ".substr($dtd, 0, 80).'.....');
 
 			return false;
 		}
@@ -221,7 +221,7 @@ 
 			($n[0] == 'PUBLIC')
 			and !tester_url_absolue($n[1])
 		) {
-			$n[1] = substr($grammaire, 0, strrpos($grammaire, '/') + 1) . $n[1];
+			$n[1] = substr($grammaire, 0, strrpos($grammaire, '/') + 1).$n[1];
 		}
 		analyser_dtd($n[1], $n[0], $dtc);
 	}
@@ -249,7 +249,7 @@ 
 	}
 
 	if ($dtc->macros[$m[1]] == 'INCLUDE') {
-		$retour = $r[1] . substr($m[2], strlen($r[0]));
+		$retour = $r[1].substr($m[2], strlen($r[0]));
 	} else {
 		$retour = substr($m[2], strlen($r[0]));
 	}
@@ -282,7 +282,7 @@ 
 		spip_log("redefinition de l'entite $nom");
 	}
 	if ($k6) {
-		return $k6 . $dtd;
+		return $k6.$dtd;
 	} // cas du synonyme complet
 	$val = expanserEntite(($k2 ? $k3 : ($k4 ? $k5 : $k6)), $dtc->macros);
 
@@ -390,7 +390,7 @@ 
 	if (preg_match_all("/\s*(\S+)\s+(([(][^)]*[)])|(\S+))\s+([^\s']*)(\s*'[^']*')?/", $val, $r2, PREG_SET_ORDER)) {
 		foreach ($r2 as $m2) {
 			$v = preg_match('/^\w+$/', $m2[2]) ? $m2[2]
-				: ('/^' . preg_replace('/\s+/', '', $m2[2]) . '$/');
+				: ('/^'.preg_replace('/\s+/', '', $m2[2]).'$/');
 			$m21 = expanserEntite($m2[1], $dtc->macros);
 			$m25 = expanserEntite($m2[5], $dtc->macros);
 			$dtc->attributs[$nom][$m21] = [$v, $m25];

Indentation +335 added lines, -335 removed lines

@@ -11,58 +11,58 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('xml/interfaces');
 
 function charger_dtd($grammaire, $avail, $rotlvl) {
-	$r = null;
-	static $dtd = []; # cache bien utile pour le validateur en boucle
-
-	if (isset($dtd[$grammaire])) {
-		return $dtd[$grammaire];
-	}
-
-	if ($avail == 'SYSTEM') {
-		$grammaire = find_in_path($grammaire);
-	}
-
-	$file = _DIR_CACHE_XML . preg_replace('/[^\w.]/', '_', $rotlvl) . '.gz';
-
-	if (lire_fichier($file, $r)) {
-		if (!$grammaire) {
-			return [];
-		}
-		if (($avail == 'SYSTEM') and filemtime($file) < filemtime($grammaire)) {
-			$r = false;
-		}
-	}
-
-	if ($r) {
-		$dtc = unserialize($r);
-	} else {
-		spip_timer('dtd');
-		$dtc = new DTC();
-		// L'analyseur retourne un booleen de reussite et modifie $dtc.
-		// Retourner vide en cas d'echec
-		if (!analyser_dtd($grammaire, $avail, $dtc)) {
-			$dtc = [];
-		} else {
-			// tri final pour presenter les suggestions de corrections
-			foreach ($dtc->peres as $k => $v) {
-				asort($v);
-				$dtc->peres[$k] = $v;
-			}
-
-			spip_log("Analyser DTD $avail $grammaire (" . spip_timer('dtd') . ') ' . (is_countable($dtc->macros) ? count($dtc->macros) : 0) . ' macros, ' . (is_countable($dtc->elements) ? count($dtc->elements) : 0) . ' elements, ' . (is_countable($dtc->attributs) ? count($dtc->attributs) : 0) . " listes d'attributs, " . (is_countable($dtc->entites) ? count($dtc->entites) : 0) . ' entites');
-			#	$r = $dtc->regles; ksort($r);foreach($r as $l => $v) {$t=array_keys($dtc->attributs[$l]);echo "<b>$l</b> '$v' ", count($t), " attributs: ", join (', ',$t);$t=$dtc->peres[$l];echo "<br />",count($t), " peres: ", @join (', ',$t), "<br />\n";}exit;
-			ecrire_fichier($file, serialize($dtc), true);
-		}
-	}
-	$dtd[$grammaire] = $dtc;
-
-	return $dtc;
+    $r = null;
+    static $dtd = []; # cache bien utile pour le validateur en boucle
+
+    if (isset($dtd[$grammaire])) {
+        return $dtd[$grammaire];
+    }
+
+    if ($avail == 'SYSTEM') {
+        $grammaire = find_in_path($grammaire);
+    }
+
+    $file = _DIR_CACHE_XML . preg_replace('/[^\w.]/', '_', $rotlvl) . '.gz';
+
+    if (lire_fichier($file, $r)) {
+        if (!$grammaire) {
+            return [];
+        }
+        if (($avail == 'SYSTEM') and filemtime($file) < filemtime($grammaire)) {
+            $r = false;
+        }
+    }
+
+    if ($r) {
+        $dtc = unserialize($r);
+    } else {
+        spip_timer('dtd');
+        $dtc = new DTC();
+        // L'analyseur retourne un booleen de reussite et modifie $dtc.
+        // Retourner vide en cas d'echec
+        if (!analyser_dtd($grammaire, $avail, $dtc)) {
+            $dtc = [];
+        } else {
+            // tri final pour presenter les suggestions de corrections
+            foreach ($dtc->peres as $k => $v) {
+                asort($v);
+                $dtc->peres[$k] = $v;
+            }
+
+            spip_log("Analyser DTD $avail $grammaire (" . spip_timer('dtd') . ') ' . (is_countable($dtc->macros) ? count($dtc->macros) : 0) . ' macros, ' . (is_countable($dtc->elements) ? count($dtc->elements) : 0) . ' elements, ' . (is_countable($dtc->attributs) ? count($dtc->attributs) : 0) . " listes d'attributs, " . (is_countable($dtc->entites) ? count($dtc->entites) : 0) . ' entites');
+            #	$r = $dtc->regles; ksort($r);foreach($r as $l => $v) {$t=array_keys($dtc->attributs[$l]);echo "<b>$l</b> '$v' ", count($t), " attributs: ", join (', ',$t);$t=$dtc->peres[$l];echo "<br />",count($t), " peres: ", @join (', ',$t), "<br />\n";}exit;
+            ecrire_fichier($file, serialize($dtc), true);
+        }
+    }
+    $dtd[$grammaire] = $dtc;
+
+    return $dtc;
 }
 
 // Compiler une regle de production en une Regexp qu'on appliquera sur la
@@ -74,153 +74,153 @@ 
 // et parentheser le tout pour que  | + * ? s'applique dessus.
 
 function compilerRegle($val) {
-	$x = str_replace(
-		'()',
-		'',
-		preg_replace(
-			'/\s*,\s*/',
-			'',
-			preg_replace(
-				'/(\w+)\s*/',
-				'(?:\1 )',
-				preg_replace(
-					'/\s*\)/',
-					')',
-					preg_replace(
-						'/\s*([(+*|?])\s*/',
-						'\1',
-						preg_replace('/\s*#\w+\s*[,|]?\s*/', '', $val)
-					)
-				)
-			)
-		)
-	);
-
-	return $x;
+    $x = str_replace(
+        '()',
+        '',
+        preg_replace(
+            '/\s*,\s*/',
+            '',
+            preg_replace(
+                '/(\w+)\s*/',
+                '(?:\1 )',
+                preg_replace(
+                    '/\s*\)/',
+                    ')',
+                    preg_replace(
+                        '/\s*([(+*|?])\s*/',
+                        '\1',
+                        preg_replace('/\s*#\w+\s*[,|]?\s*/', '', $val)
+                    )
+                )
+            )
+        )
+    );
+
+    return $x;
 }
 
 
 function analyser_dtd($loc, $avail, &$dtc) {
-	// creer le repertoire de cache si ce n'est fait
-	// (utile aussi pour le resultat de la compil)
-	$file = sous_repertoire(_DIR_CACHE_XML);
-	// si DTD locale, ignorer ce repertoire pour le moment
-	if ($avail == 'SYSTEM') {
-		$file = $loc;
-		if (_DIR_RACINE and strncmp($file, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
-			$file = substr($file, strlen(_DIR_RACINE));
-		}
-		$file = find_in_path($file);
-	} else {
-		$file .= preg_replace('/[^\w.]/', '_', $loc);
-	}
-
-	$dtd = '';
-	if (@is_readable($file)) {
-		lire_fichier($file, $dtd);
-	} else {
-		if ($avail == 'PUBLIC') {
-			include_spip('inc/distant');
-			$dtd = recuperer_url($loc);
-			$dtd = trim($dtd['page'] ?? '');
-			if ($dtd) {
-				ecrire_fichier($file, $dtd, true);
-			}
-		}
-	}
-
-	$dtd = ltrim($dtd);
-	if (!$dtd) {
-		spip_log("DTD '$loc' ($file) inaccessible");
-
-		return false;
-	} else {
-		spip_log("analyse de la DTD $loc ");
-	}
-
-	while ($dtd) {
-		if ($dtd[0] != '<') {
-			$r = analyser_dtd_lexeme($dtd, $dtc, $loc);
-		} elseif ($dtd[1] != '!') {
-			$r = analyser_dtd_pi($dtd, $dtc, $loc);
-		} elseif ($dtd[2] == '[') {
-			$r = analyser_dtd_data($dtd, $dtc, $loc);
-		} else {
-			switch ($dtd[3]) {
-				case '%':
-					$r = analyser_dtd_data($dtd, $dtc, $loc);
-					break;
-				case 'T':
-					$r = analyser_dtd_attlist($dtd, $dtc, $loc);
-					break;
-				case 'L':
-					$r = analyser_dtd_element($dtd, $dtc, $loc);
-					break;
-				case 'N':
-					$r = analyser_dtd_entity($dtd, $dtc, $loc);
-					break;
-				case 'O':
-					$r = analyser_dtd_notation($dtd, $dtc, $loc);
-					break;
-				case '-':
-					$r = analyser_dtd_comment($dtd, $dtc, $loc);
-					break;
-				default:
-					$r = -1;
-			}
-		}
-		if (!is_string($r)) {
-			spip_log("erreur $r dans la DTD  " . substr($dtd, 0, 80) . '.....');
-
-			return false;
-		}
-		$dtd = $r;
-	}
-
-	return true;
+    // creer le repertoire de cache si ce n'est fait
+    // (utile aussi pour le resultat de la compil)
+    $file = sous_repertoire(_DIR_CACHE_XML);
+    // si DTD locale, ignorer ce repertoire pour le moment
+    if ($avail == 'SYSTEM') {
+        $file = $loc;
+        if (_DIR_RACINE and strncmp($file, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
+            $file = substr($file, strlen(_DIR_RACINE));
+        }
+        $file = find_in_path($file);
+    } else {
+        $file .= preg_replace('/[^\w.]/', '_', $loc);
+    }
+
+    $dtd = '';
+    if (@is_readable($file)) {
+        lire_fichier($file, $dtd);
+    } else {
+        if ($avail == 'PUBLIC') {
+            include_spip('inc/distant');
+            $dtd = recuperer_url($loc);
+            $dtd = trim($dtd['page'] ?? '');
+            if ($dtd) {
+                ecrire_fichier($file, $dtd, true);
+            }
+        }
+    }
+
+    $dtd = ltrim($dtd);
+    if (!$dtd) {
+        spip_log("DTD '$loc' ($file) inaccessible");
+
+        return false;
+    } else {
+        spip_log("analyse de la DTD $loc ");
+    }
+
+    while ($dtd) {
+        if ($dtd[0] != '<') {
+            $r = analyser_dtd_lexeme($dtd, $dtc, $loc);
+        } elseif ($dtd[1] != '!') {
+            $r = analyser_dtd_pi($dtd, $dtc, $loc);
+        } elseif ($dtd[2] == '[') {
+            $r = analyser_dtd_data($dtd, $dtc, $loc);
+        } else {
+            switch ($dtd[3]) {
+                case '%':
+                    $r = analyser_dtd_data($dtd, $dtc, $loc);
+                    break;
+                case 'T':
+                    $r = analyser_dtd_attlist($dtd, $dtc, $loc);
+                    break;
+                case 'L':
+                    $r = analyser_dtd_element($dtd, $dtc, $loc);
+                    break;
+                case 'N':
+                    $r = analyser_dtd_entity($dtd, $dtc, $loc);
+                    break;
+                case 'O':
+                    $r = analyser_dtd_notation($dtd, $dtc, $loc);
+                    break;
+                case '-':
+                    $r = analyser_dtd_comment($dtd, $dtc, $loc);
+                    break;
+                default:
+                    $r = -1;
+            }
+        }
+        if (!is_string($r)) {
+            spip_log("erreur $r dans la DTD  " . substr($dtd, 0, 80) . '.....');
+
+            return false;
+        }
+        $dtd = $r;
+    }
+
+    return true;
 }
 
 function analyser_dtd_comment($dtd, &$dtc, $grammaire) {
-	// ejecter les commentaires, surtout quand ils contiennent du code.
-	// Option /s car sur plusieurs lignes parfois
+    // ejecter les commentaires, surtout quand ils contiennent du code.
+    // Option /s car sur plusieurs lignes parfois
 
-	if (!preg_match('/^<!--.*?-->\s*(.*)$/s', $dtd, $m)) {
-		return -6;
-	}
+    if (!preg_match('/^<!--.*?-->\s*(.*)$/s', $dtd, $m)) {
+        return -6;
+    }
 
-	return $m[1];
+    return $m[1];
 }
 
 function analyser_dtd_pi($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<\?.*?>\s*(.*)$/s', $dtd, $m)) {
-		return -10;
-	}
+    if (!preg_match('/^<\?.*?>\s*(.*)$/s', $dtd, $m)) {
+        return -10;
+    }
 
-	return $m[1];
+    return $m[1];
 }
 
 function analyser_dtd_lexeme($dtd, &$dtc, $grammaire) {
 
-	if (!preg_match(_REGEXP_ENTITY_DEF, $dtd, $m)) {
-		return -9;
-	}
-
-	[, $s] = $m;
-	$n = $dtc->macros[$s];
-
-	if (is_array($n)) {
-		// en cas d'inclusion, l'espace de nom est le meme
-		// mais gaffe aux DTD dont l'URL est relative a l'engloblante
-		if (
-			($n[0] == 'PUBLIC')
-			and !tester_url_absolue($n[1])
-		) {
-			$n[1] = substr($grammaire, 0, strrpos($grammaire, '/') + 1) . $n[1];
-		}
-		analyser_dtd($n[1], $n[0], $dtc);
-	}
-
-	return ltrim(substr($dtd, strlen($m[0])));
+    if (!preg_match(_REGEXP_ENTITY_DEF, $dtd, $m)) {
+        return -9;
+    }
+
+    [, $s] = $m;
+    $n = $dtc->macros[$s];
+
+    if (is_array($n)) {
+        // en cas d'inclusion, l'espace de nom est le meme
+        // mais gaffe aux DTD dont l'URL est relative a l'engloblante
+        if (
+            ($n[0] == 'PUBLIC')
+            and !tester_url_absolue($n[1])
+        ) {
+            $n[1] = substr($grammaire, 0, strrpos($grammaire, '/') + 1) . $n[1];
+        }
+        analyser_dtd($n[1], $n[0], $dtc);
+    }
+
+    return ltrim(substr($dtd, strlen($m[0])));
 }
 
 // il faudrait gerer plus proprement les niveaux d'inclusion:
@@ -228,83 +228,83 @@ 
 
 function analyser_dtd_data($dtd, &$dtc, $grammaire) {
 
-	if (!preg_match(_REGEXP_INCLUDE_USE, $dtd, $m)) {
-		return -11;
-	}
-	if (
-		!preg_match(
-			'/^((\s*<!(\[\s*%\s*[^;]*;\s*\[([^]<]*<[^>]*>)*[^]<]*\]\]>)|([^]>]*>))*[^]<]*)\]\]>\s*/s',
-			$m[2],
-			$r
-		)
-	) {
-		return -12;
-	}
-
-	if ($dtc->macros[$m[1]] == 'INCLUDE') {
-		$retour = $r[1] . substr($m[2], strlen($r[0]));
-	} else {
-		$retour = substr($m[2], strlen($r[0]));
-	}
-
-	return $retour;
+    if (!preg_match(_REGEXP_INCLUDE_USE, $dtd, $m)) {
+        return -11;
+    }
+    if (
+        !preg_match(
+            '/^((\s*<!(\[\s*%\s*[^;]*;\s*\[([^]<]*<[^>]*>)*[^]<]*\]\]>)|([^]>]*>))*[^]<]*)\]\]>\s*/s',
+            $m[2],
+            $r
+        )
+    ) {
+        return -12;
+    }
+
+    if ($dtc->macros[$m[1]] == 'INCLUDE') {
+        $retour = $r[1] . substr($m[2], strlen($r[0]));
+    } else {
+        $retour = substr($m[2], strlen($r[0]));
+    }
+
+    return $retour;
 }
 
 function analyser_dtd_notation($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<!NOTATION.*?>\s*(.*)$/s', $dtd, $m)) {
-		return -8;
-	}
-	spip_log('analyser_dtd_notation a ecrire');
+    if (!preg_match('/^<!NOTATION.*?>\s*(.*)$/s', $dtd, $m)) {
+        return -8;
+    }
+    spip_log('analyser_dtd_notation a ecrire');
 
-	return $m[1];
+    return $m[1];
 }
 
 function analyser_dtd_entity($dtd, &$dtc, $grammaire) {
-	if (!preg_match(_REGEXP_ENTITY_DECL, $dtd, $m)) {
-		return -2;
-	}
-
-	[$t, $term, $nom, $type, $k1, $k2, $k3, $k4, $k5, $k6, $c, $q, $alt, $dtd] = $m;
-
-	if (isset($dtc->macros[$nom]) and $dtc->macros[$nom]) {
-		return $dtd;
-	}
-	if (isset($dtc->entites[$nom])) {
-		spip_log("redefinition de l'entite $nom");
-	}
-	if ($k6) {
-		return $k6 . $dtd;
-	} // cas du synonyme complet
-	$val = expanserEntite(($k2 ? $k3 : ($k4 ? $k5 : $k6)), $dtc->macros);
-
-	// cas particulier double evaluation: 'PUBLIC "..." "...."'
-	if (preg_match('/(PUBLIC|SYSTEM)\s+"([^"]*)"\s*("([^"]*)")?\s*$/s', $val, $r)) {
-		[$t, $type, $val, $q, $alt] = $r;
-	}
-
-	if (!$term) {
-		$dtc->entites[$nom] = $val;
-	} elseif (!$type) {
-		$dtc->macros[$nom] = $val;
-	} else {
-		if (($type == 'SYSTEM') and !$alt) {
-			$alt = $val;
-		}
-		if (!$alt) {
-			$dtc->macros[$nom] = $val;
-		} else {
-			if (
-				($type == 'PUBLIC')
-				and (strpos($alt, '/') === false)
-			) {
-				$alt = preg_replace(',/[^/]+$,', '/', $grammaire)
-					. $alt;
-			}
-			$dtc->macros[$nom] = [$type, $alt];
-		}
-	}
-
-	return $dtd;
+    if (!preg_match(_REGEXP_ENTITY_DECL, $dtd, $m)) {
+        return -2;
+    }
+
+    [$t, $term, $nom, $type, $k1, $k2, $k3, $k4, $k5, $k6, $c, $q, $alt, $dtd] = $m;
+
+    if (isset($dtc->macros[$nom]) and $dtc->macros[$nom]) {
+        return $dtd;
+    }
+    if (isset($dtc->entites[$nom])) {
+        spip_log("redefinition de l'entite $nom");
+    }
+    if ($k6) {
+        return $k6 . $dtd;
+    } // cas du synonyme complet
+    $val = expanserEntite(($k2 ? $k3 : ($k4 ? $k5 : $k6)), $dtc->macros);
+
+    // cas particulier double evaluation: 'PUBLIC "..." "...."'
+    if (preg_match('/(PUBLIC|SYSTEM)\s+"([^"]*)"\s*("([^"]*)")?\s*$/s', $val, $r)) {
+        [$t, $type, $val, $q, $alt] = $r;
+    }
+
+    if (!$term) {
+        $dtc->entites[$nom] = $val;
+    } elseif (!$type) {
+        $dtc->macros[$nom] = $val;
+    } else {
+        if (($type == 'SYSTEM') and !$alt) {
+            $alt = $val;
+        }
+        if (!$alt) {
+            $dtc->macros[$nom] = $val;
+        } else {
+            if (
+                ($type == 'PUBLIC')
+                and (strpos($alt, '/') === false)
+            ) {
+                $alt = preg_replace(',/[^/]+$,', '/', $grammaire)
+                    . $alt;
+            }
+            $dtc->macros[$nom] = [$type, $alt];
+        }
+    }
+
+    return $dtd;
 }
 
 // Dresser le tableau des filles potentielles de l'element
@@ -317,76 +317,76 @@ 
 // Fin du controle en finElement
 
 function analyser_dtd_element($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<!ELEMENT\s+([^>\s]+)([^>]*)>\s*(.*)$/s', $dtd, $m)) {
-		return -3;
-	}
-
-	[, $nom, $contenu, $dtd] = $m;
-	$nom = expanserEntite($nom, $dtc->macros);
-
-	if (isset($dtc->elements[$nom])) {
-		spip_log("redefinition de l'element $nom dans la DTD");
-
-		return -4;
-	}
-	$filles = [];
-	$contenu = expanserEntite($contenu, $dtc->macros);
-	$val = $contenu ? compilerRegle($contenu) : '(?:EMPTY )';
-	if ($val == '(?:EMPTY )') {
-		$dtc->regles[$nom] = 'EMPTY';
-	} elseif ($val == '(?:ANY )') {
-		$dtc->regles[$nom] = 'ANY';
-	} else {
-		$last = substr($val, -1);
-		if (
-			preg_match('/ \w/', $val)
-			or (!empty($last) and strpos('*+?', $last) === false)
-		) {
-			$dtc->regles[$nom] = "/^$val$/";
-		} else {
-			$dtc->regles[$nom] = $last;
-		}
-		$filles = array_values(preg_split('/\W+/', $val, -1, PREG_SPLIT_NO_EMPTY));
-
-		foreach ($filles as $k) {
-			if (!isset($dtc->peres[$k])) {
-				$dtc->peres[$k] = [];
-			}
-			if (!in_array($nom, $dtc->peres[$k])) {
-				$dtc->peres[$k][] = $nom;
-			}
-		}
-	}
-	$dtc->pcdata[$nom] = (strpos($contenu, '#PCDATA') === false);
-	$dtc->elements[$nom] = $filles;
-
-	return $dtd;
+    if (!preg_match('/^<!ELEMENT\s+([^>\s]+)([^>]*)>\s*(.*)$/s', $dtd, $m)) {
+        return -3;
+    }
+
+    [, $nom, $contenu, $dtd] = $m;
+    $nom = expanserEntite($nom, $dtc->macros);
+
+    if (isset($dtc->elements[$nom])) {
+        spip_log("redefinition de l'element $nom dans la DTD");
+
+        return -4;
+    }
+    $filles = [];
+    $contenu = expanserEntite($contenu, $dtc->macros);
+    $val = $contenu ? compilerRegle($contenu) : '(?:EMPTY )';
+    if ($val == '(?:EMPTY )') {
+        $dtc->regles[$nom] = 'EMPTY';
+    } elseif ($val == '(?:ANY )') {
+        $dtc->regles[$nom] = 'ANY';
+    } else {
+        $last = substr($val, -1);
+        if (
+            preg_match('/ \w/', $val)
+            or (!empty($last) and strpos('*+?', $last) === false)
+        ) {
+            $dtc->regles[$nom] = "/^$val$/";
+        } else {
+            $dtc->regles[$nom] = $last;
+        }
+        $filles = array_values(preg_split('/\W+/', $val, -1, PREG_SPLIT_NO_EMPTY));
+
+        foreach ($filles as $k) {
+            if (!isset($dtc->peres[$k])) {
+                $dtc->peres[$k] = [];
+            }
+            if (!in_array($nom, $dtc->peres[$k])) {
+                $dtc->peres[$k][] = $nom;
+            }
+        }
+    }
+    $dtc->pcdata[$nom] = (strpos($contenu, '#PCDATA') === false);
+    $dtc->elements[$nom] = $filles;
+
+    return $dtd;
 }
 
 
 function analyser_dtd_attlist($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<!ATTLIST\s+(\S+)\s+([^>]*)>\s*(.*)/s', $dtd, $m)) {
-		return -5;
-	}
-
-	[, $nom, $val, $dtd] = $m;
-	$nom = expanserEntite($nom, $dtc->macros);
-	$val = expanserEntite($val, $dtc->macros);
-	if (!isset($dtc->attributs[$nom])) {
-		$dtc->attributs[$nom] = [];
-	}
-
-	if (preg_match_all("/\s*(\S+)\s+(([(][^)]*[)])|(\S+))\s+([^\s']*)(\s*'[^']*')?/", $val, $r2, PREG_SET_ORDER)) {
-		foreach ($r2 as $m2) {
-			$v = preg_match('/^\w+$/', $m2[2]) ? $m2[2]
-				: ('/^' . preg_replace('/\s+/', '', $m2[2]) . '$/');
-			$m21 = expanserEntite($m2[1], $dtc->macros);
-			$m25 = expanserEntite($m2[5], $dtc->macros);
-			$dtc->attributs[$nom][$m21] = [$v, $m25];
-		}
-	}
-
-	return $dtd;
+    if (!preg_match('/^<!ATTLIST\s+(\S+)\s+([^>]*)>\s*(.*)/s', $dtd, $m)) {
+        return -5;
+    }
+
+    [, $nom, $val, $dtd] = $m;
+    $nom = expanserEntite($nom, $dtc->macros);
+    $val = expanserEntite($val, $dtc->macros);
+    if (!isset($dtc->attributs[$nom])) {
+        $dtc->attributs[$nom] = [];
+    }
+
+    if (preg_match_all("/\s*(\S+)\s+(([(][^)]*[)])|(\S+))\s+([^\s']*)(\s*'[^']*')?/", $val, $r2, PREG_SET_ORDER)) {
+        foreach ($r2 as $m2) {
+            $v = preg_match('/^\w+$/', $m2[2]) ? $m2[2]
+                : ('/^' . preg_replace('/\s+/', '', $m2[2]) . '$/');
+            $m21 = expanserEntite($m2[1], $dtc->macros);
+            $m25 = expanserEntite($m2[5], $dtc->macros);
+            $dtc->attributs[$nom][$m21] = [$v, $m25];
+        }
+    }
+
+    return $dtd;
 }
 
 
@@ -402,26 +402,26 @@ 
  * @return string|array
  **/
 function expanserEntite($val, $macros = []) {
-	static $vu = [];
-	if (!is_string($val)) {
-		return $vu;
-	}
-
-	if (preg_match_all(_REGEXP_ENTITY_USE, $val, $r, PREG_SET_ORDER)) {
-		foreach ($r as $m) {
-			$ent = $m[1];
-			// il peut valoir ""
-			if (!isset($macros[$ent])) {
-				spip_log("Entite $ent inconnu");
-			} else {
-				if (!isset($vu[$ent])) {
-					$vu[$ent] = 0;
-				}
-				++$vu[$ent];
-				$val = str_replace($m[0], $macros[$ent], $val);
-			}
-		}
-	}
-
-	return trim(preg_replace('/\s+/', ' ', $val));
+    static $vu = [];
+    if (!is_string($val)) {
+        return $vu;
+    }
+
+    if (preg_match_all(_REGEXP_ENTITY_USE, $val, $r, PREG_SET_ORDER)) {
+        foreach ($r as $m) {
+            $ent = $m[1];
+            // il peut valoir ""
+            if (!isset($macros[$ent])) {
+                spip_log("Entite $ent inconnu");
+            } else {
+                if (!isset($vu[$ent])) {
+                    $vu[$ent] = 0;
+                }
+                ++$vu[$ent];
+                $val = str_replace($m[0], $macros[$ent], $val);
+            }
+        }
+    }
+
+    return trim(preg_replace('/\s+/', ' ', $val));
 }

prive/formulaires/instituer_objet.php

Indentation +108 added lines, -108 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/editer');
@@ -32,17 +32,17 @@ 
  * @return array
  */
 function lister_statuts_proposes($desc, $publiable = true) {
-	if (!isset($desc['statut_textes_instituer'])) {
-		return false;
-	}
+    if (!isset($desc['statut_textes_instituer'])) {
+        return false;
+    }
 
-	$l = $desc['statut_textes_instituer'];
-	if (!$publiable) {
-		unset($l['publie']);
-		unset($l['refuse']);
-	}
+    $l = $desc['statut_textes_instituer'];
+    if (!$publiable) {
+        unset($l['publie']);
+        unset($l['refuse']);
+    }
 
-	return $l;
+    return $l;
 }
 
 /**
@@ -64,54 +64,54 @@ 
  *     Environnement du formulaire ou false si aucun affichage à faire.
  */
 function formulaires_instituer_objet_charger_dist($objet, $id_objet, $retour = '', $editable = true) {
-	$editable = ($editable ? true : false);
-
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-
-	if (!isset($desc['statut_textes_instituer'])) {
-		return false;
-	}
-
-	if (!autoriser('modifier', $objet, $id_objet)) {
-		$editable = false;
-	}
-
-	// charger le contenu de l'objet
-	// dont son champ statut
-	$v = formulaires_editer_objet_charger($objet, $id_objet, 0, 0, '', '');
-
-	$publiable = true;
-	$statuts = lister_statuts_proposes($desc);
-	// tester si on a le droit de publier, si un statut publie existe
-	if (isset($statuts['publie'])) {
-		if (!autoriser('instituer', $objet, $id_objet, null, ['statut' => 'publie'])) {
-			if ($v['statut'] == 'publie') {
-				$editable = false;
-			} else {
-				$publiable = false;
-			}
-		}
-	}
-	$statuts = lister_statuts_proposes($desc, $editable ? $publiable : true);
-	if (count($statuts) == 1 and isset($statuts[$v['statut']])) {
-		$editable = false;
-	}
-
-	$valeurs = [
-		'editable' => $editable,
-		'statut' => $v['statut'],
-		'_objet' => $objet,
-		'_id_objet' => $id_objet,
-		'_statuts' => $statuts,
-		'_publiable' => $publiable,
-		'_label' => $desc['texte_changer_statut'] ?? 'texte_article_statut',
-		'_aide' => $desc['aide_changer_statut'] ?? '',
-		'_hidden' => "<input type='hidden' name='statut_old' value='" . $v['statut'] . "' />",
-	];
-
-	#if (!count($valeurs['statuts']))
-	return $valeurs;
+    $editable = ($editable ? true : false);
+
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+
+    if (!isset($desc['statut_textes_instituer'])) {
+        return false;
+    }
+
+    if (!autoriser('modifier', $objet, $id_objet)) {
+        $editable = false;
+    }
+
+    // charger le contenu de l'objet
+    // dont son champ statut
+    $v = formulaires_editer_objet_charger($objet, $id_objet, 0, 0, '', '');
+
+    $publiable = true;
+    $statuts = lister_statuts_proposes($desc);
+    // tester si on a le droit de publier, si un statut publie existe
+    if (isset($statuts['publie'])) {
+        if (!autoriser('instituer', $objet, $id_objet, null, ['statut' => 'publie'])) {
+            if ($v['statut'] == 'publie') {
+                $editable = false;
+            } else {
+                $publiable = false;
+            }
+        }
+    }
+    $statuts = lister_statuts_proposes($desc, $editable ? $publiable : true);
+    if (count($statuts) == 1 and isset($statuts[$v['statut']])) {
+        $editable = false;
+    }
+
+    $valeurs = [
+        'editable' => $editable,
+        'statut' => $v['statut'],
+        '_objet' => $objet,
+        '_id_objet' => $id_objet,
+        '_statuts' => $statuts,
+        '_publiable' => $publiable,
+        '_label' => $desc['texte_changer_statut'] ?? 'texte_article_statut',
+        '_aide' => $desc['aide_changer_statut'] ?? '',
+        '_hidden' => "<input type='hidden' name='statut_old' value='" . $v['statut'] . "' />",
+    ];
+
+    #if (!count($valeurs['statuts']))
+    return $valeurs;
 }
 
 /**
@@ -131,35 +131,35 @@ 
  *     Tableau des erreurs
  */
 function formulaires_instituer_objet_verifier_dist($objet, $id_objet, $retour = '', $editable = true) {
-	$erreurs = [];
-	// charger le contenu de l'objet
-	// dont son champ statut
-	$v = formulaires_editer_objet_charger($objet, $id_objet, 0, 0, '', '');
-
-	if ($v['statut'] !== _request('statut_old')) {
-		$erreurs['statut'] = _T('instituer_erreur_statut_a_change');
-	} else {
-		$table = table_objet_sql($objet);
-		$desc = lister_tables_objets_sql($table);
-
-		$publiable = true;
-		if (
-			isset($v['id_rubrique'])
-			and !autoriser('publierdans', 'rubrique', $v['id_rubrique'])
-		) {
-			$publiable = false;
-		}
-		$l = lister_statuts_proposes($desc, $publiable);
-		$statut = _request('statut');
-		if (
-			!isset($l[$statut])
-			or !autoriser('instituer', $objet, $id_objet, '', ['statut' => $statut])
-		) {
-			$erreurs['statut'] = _T('instituer_erreur_statut_non_autorise');
-		}
-	}
-
-	return $erreurs;
+    $erreurs = [];
+    // charger le contenu de l'objet
+    // dont son champ statut
+    $v = formulaires_editer_objet_charger($objet, $id_objet, 0, 0, '', '');
+
+    if ($v['statut'] !== _request('statut_old')) {
+        $erreurs['statut'] = _T('instituer_erreur_statut_a_change');
+    } else {
+        $table = table_objet_sql($objet);
+        $desc = lister_tables_objets_sql($table);
+
+        $publiable = true;
+        if (
+            isset($v['id_rubrique'])
+            and !autoriser('publierdans', 'rubrique', $v['id_rubrique'])
+        ) {
+            $publiable = false;
+        }
+        $l = lister_statuts_proposes($desc, $publiable);
+        $statut = _request('statut');
+        if (
+            !isset($l[$statut])
+            or !autoriser('instituer', $objet, $id_objet, '', ['statut' => $statut])
+        ) {
+            $erreurs['statut'] = _T('instituer_erreur_statut_non_autorise');
+        }
+    }
+
+    return $erreurs;
 }
 
 /**
@@ -178,25 +178,25 @@ 
  */
 function formulaires_instituer_objet_traiter_dist($objet, $id_objet, $retour = '', $editable = true) {
 
-	$c = ['statut' => _request('statut')];
-	// si on a envoye une 'date_posterieure', l'enregistrer
-	// todo dans le HTML
-	if ($d = _request('date_posterieure')) {
-		$c['date'] = $d;
-	}
-
-
-	include_spip('action/editer_objet');
-	if ($err = objet_instituer($objet, $id_objet, $c)) {
-		$res = ['message_erreur' => $err];
-	} else {
-		$res = ['message_ok' => _T('info_modification_enregistree')];
-		if ($retour) {
-			$res['redirect'] = $retour;
-		}
-		set_request('statut');
-		set_request('date_posterieure');
-	}
-
-	return $res;
+    $c = ['statut' => _request('statut')];
+    // si on a envoye une 'date_posterieure', l'enregistrer
+    // todo dans le HTML
+    if ($d = _request('date_posterieure')) {
+        $c['date'] = $d;
+    }
+
+
+    include_spip('action/editer_objet');
+    if ($err = objet_instituer($objet, $id_objet, $c)) {
+        $res = ['message_erreur' => $err];
+    } else {
+        $res = ['message_ok' => _T('info_modification_enregistree')];
+        if ($retour) {
+            $res['redirect'] = $retour;
+        }
+        set_request('statut');
+        set_request('date_posterieure');
+    }
+
+    return $res;
 }

Spacing +1 added lines, -1 removed lines

@@ -107,7 +107,7 @@
 		'_publiable' => $publiable,
 		'_label' => $desc['texte_changer_statut'] ?? 'texte_article_statut',
 		'_aide' => $desc['aide_changer_statut'] ?? '',
-		'_hidden' => "<input type='hidden' name='statut_old' value='" . $v['statut'] . "' />",
+		'_hidden' => "<input type='hidden' name='statut_old' value='".$v['statut']."' />",
 	];
 
 	#if (!count($valeurs['statuts']))

prive/formulaires/editer_liens.php

Indentation +352 added lines, -352 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Formulaires
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -36,25 +36,25 @@ 
  *   ($table_source,$objet,$id_objet,$objet_lien)
  */
 function determine_source_lien_objet($a, $b, $c) {
-	$table_source = $objet_lien = $objet = $id_objet = null;
-	// auteurs, article, 23 :
-	// associer des auteurs à l'article 23, sur la table pivot spip_auteurs_liens
-	if (is_numeric($c) and !is_numeric($b)) {
-		$table_source = table_objet($a);
-		$objet_lien = objet_type($a);
-		$objet = objet_type($b);
-		$id_objet = $c;
-	}
-	// article, 23, auteurs
-	// associer des auteurs à l'article 23, sur la table pivot spip_articles_liens
-	if (is_numeric($b) and !is_numeric($c)) {
-		$table_source = table_objet($c);
-		$objet_lien = objet_type($a);
-		$objet = objet_type($a);
-		$id_objet = $b;
-	}
-
-	return [$table_source, $objet, $id_objet, $objet_lien];
+    $table_source = $objet_lien = $objet = $id_objet = null;
+    // auteurs, article, 23 :
+    // associer des auteurs à l'article 23, sur la table pivot spip_auteurs_liens
+    if (is_numeric($c) and !is_numeric($b)) {
+        $table_source = table_objet($a);
+        $objet_lien = objet_type($a);
+        $objet = objet_type($b);
+        $id_objet = $c;
+    }
+    // article, 23, auteurs
+    // associer des auteurs à l'article 23, sur la table pivot spip_articles_liens
+    if (is_numeric($b) and !is_numeric($c)) {
+        $table_source = table_objet($c);
+        $objet_lien = objet_type($a);
+        $objet = objet_type($a);
+        $id_objet = $b;
+    }
+
+    return [$table_source, $objet, $id_objet, $objet_lien];
 }
 
 /**
@@ -80,93 +80,93 @@ 
  */
 function formulaires_editer_liens_charger_dist($a, $b, $c, $options = []) {
 
-	// compat avec ancienne signature ou le 4eme argument est $editable
-	if (!is_array($options)) {
-		$options = ['editable' => $options];
-	} elseif (!isset($options['editable'])) {
-		$options['editable'] = true;
-	}
-
-	$editable = $options['editable'];
-
-	[$table_source, $objet, $id_objet, $objet_lien] = determine_source_lien_objet($a, $b, $c);
-	if (!$table_source or !$objet or !$objet_lien or !$id_objet) {
-		return false;
-	}
-
-	$objet_source = objet_type($table_source);
-	$table_sql_source = table_objet_sql($objet_source);
-
-	// verifier existence de la table xxx_liens
-	include_spip('action/editer_liens');
-	if (!objet_associable($objet_lien)) {
-		return false;
-	}
-
-	// L'éditabilité :) est définie par un test permanent (par exemple "associermots") ET le 4ème argument
-	include_spip('inc/autoriser');
-	$editable = ($editable and autoriser('associer' . $table_source, $objet, $id_objet)
-		and autoriser('modifier', $objet, $id_objet));
-
-	if (
-		!$editable and !count(objet_trouver_liens(
-			[$objet_lien => '*'],
-			[($objet_lien == $objet_source ? $objet : $objet_source) => $id_objet]
-		))
-	) {
-		return false;
-	}
-
-	// squelettes de vue et de d'association
-	// ils sont différents si des rôles sont définis.
-	$skel_vue = $table_source . '_lies';
-	$skel_ajout = $table_source . '_associer';
-
-	// description des roles
-	include_spip('inc/roles');
-	if ($roles = roles_presents($objet_source, $objet)) {
-		// on demande de nouveaux squelettes en conséquence
-		$skel_vue = $table_source . '_roles_lies';
-		$skel_ajout = $table_source . '_roles_associer';
-	}
-
-	$oups = _request('_oups') ?? '';
-	if ($oups) {
-		if (unserialize(base64_decode($oups))) {
-			// on est bon, rien a faire
-		} elseif (unserialize($oups)) {
-			// il faut encoder
-			$oups = base64_encode($oups);
-		} else {
-			$oups = '';
-		}
-	}
-	$valeurs = [
-		'id' => "$table_source-$objet-$id_objet-$objet_lien", // identifiant unique pour les id du form
-		'_vue_liee' => $skel_vue,
-		'_vue_ajout' => $skel_ajout,
-		'_objet_lien' => $objet_lien,
-		'id_lien_ajoute' => _request('id_lien_ajoute'),
-		'objet' => $objet,
-		'id_objet' => $id_objet,
-		'objet_source' => $objet_source,
-		'table_source' => $table_source,
-		'recherche' => '',
-		'visible' => 0,
-		'ajouter_lien' => '',
-		'supprimer_lien' => '',
-		'qualifier_lien' => '',
-		'ordonner_lien' => '',
-		'desordonner_liens' => '',
-		'_roles' => $roles, # description des roles
-		'_oups' => $oups,
-		'editable' => $editable,
-	];
-
-	// les options non definies dans $valeurs sont passees telles quelles au formulaire html
-	$valeurs = array_merge($options, $valeurs);
-
-	return $valeurs;
+    // compat avec ancienne signature ou le 4eme argument est $editable
+    if (!is_array($options)) {
+        $options = ['editable' => $options];
+    } elseif (!isset($options['editable'])) {
+        $options['editable'] = true;
+    }
+
+    $editable = $options['editable'];
+
+    [$table_source, $objet, $id_objet, $objet_lien] = determine_source_lien_objet($a, $b, $c);
+    if (!$table_source or !$objet or !$objet_lien or !$id_objet) {
+        return false;
+    }
+
+    $objet_source = objet_type($table_source);
+    $table_sql_source = table_objet_sql($objet_source);
+
+    // verifier existence de la table xxx_liens
+    include_spip('action/editer_liens');
+    if (!objet_associable($objet_lien)) {
+        return false;
+    }
+
+    // L'éditabilité :) est définie par un test permanent (par exemple "associermots") ET le 4ème argument
+    include_spip('inc/autoriser');
+    $editable = ($editable and autoriser('associer' . $table_source, $objet, $id_objet)
+        and autoriser('modifier', $objet, $id_objet));
+
+    if (
+        !$editable and !count(objet_trouver_liens(
+            [$objet_lien => '*'],
+            [($objet_lien == $objet_source ? $objet : $objet_source) => $id_objet]
+        ))
+    ) {
+        return false;
+    }
+
+    // squelettes de vue et de d'association
+    // ils sont différents si des rôles sont définis.
+    $skel_vue = $table_source . '_lies';
+    $skel_ajout = $table_source . '_associer';
+
+    // description des roles
+    include_spip('inc/roles');
+    if ($roles = roles_presents($objet_source, $objet)) {
+        // on demande de nouveaux squelettes en conséquence
+        $skel_vue = $table_source . '_roles_lies';
+        $skel_ajout = $table_source . '_roles_associer';
+    }
+
+    $oups = _request('_oups') ?? '';
+    if ($oups) {
+        if (unserialize(base64_decode($oups))) {
+            // on est bon, rien a faire
+        } elseif (unserialize($oups)) {
+            // il faut encoder
+            $oups = base64_encode($oups);
+        } else {
+            $oups = '';
+        }
+    }
+    $valeurs = [
+        'id' => "$table_source-$objet-$id_objet-$objet_lien", // identifiant unique pour les id du form
+        '_vue_liee' => $skel_vue,
+        '_vue_ajout' => $skel_ajout,
+        '_objet_lien' => $objet_lien,
+        'id_lien_ajoute' => _request('id_lien_ajoute'),
+        'objet' => $objet,
+        'id_objet' => $id_objet,
+        'objet_source' => $objet_source,
+        'table_source' => $table_source,
+        'recherche' => '',
+        'visible' => 0,
+        'ajouter_lien' => '',
+        'supprimer_lien' => '',
+        'qualifier_lien' => '',
+        'ordonner_lien' => '',
+        'desordonner_liens' => '',
+        '_roles' => $roles, # description des roles
+        '_oups' => $oups,
+        'editable' => $editable,
+    ];
+
+    // les options non definies dans $valeurs sont passees telles quelles au formulaire html
+    $valeurs = array_merge($options, $valeurs);
+
+    return $valeurs;
 }
 
 /**
@@ -210,165 +210,165 @@ 
  * @return array
  */
 function formulaires_editer_liens_traiter_dist($a, $b, $c, $options = []) {
-	// compat avec ancienne signature ou le 4eme argument est $editable
-	if (!is_array($options)) {
-		$options = ['editable' => $options];
-	} elseif (!isset($options['editable'])) {
-		$options['editable'] = true;
-	}
-
-	$editable = $options['editable'];
-
-	$res = ['editable' => $editable ? true : false];
-	[$table_source, $objet, $id_objet, $objet_lien] = determine_source_lien_objet($a, $b, $c);
-	if (!$table_source or !$objet or !$objet_lien) {
-		return $res;
-	}
-
-
-	if (_request('tout_voir')) {
-		set_request('recherche', '');
-	}
-
-	include_spip('inc/autoriser');
-	if (autoriser('modifier', $objet, $id_objet)) {
-		// annuler les suppressions du coup d'avant !
-		if (
-			_request('annuler_oups')
-			and $oups = _request('_oups')
-			and $oups = base64_decode($oups)
-			and $oups = unserialize($oups)
-		) {
-			if ($oups_objets = charger_fonction("editer_liens_oups_{$table_source}_{$objet}_{$objet_lien}", 'action', true)) {
-				$oups_objets($oups);
-			} else {
-				$objet_source = objet_type($table_source);
-				include_spip('action/editer_liens');
-				foreach ($oups as $oup) {
-					if ($objet_lien == $objet_source) {
-						objet_associer([$objet_source => $oup[$objet_source]], [$objet => $oup[$objet]], $oup);
-					} else {
-						objet_associer([$objet => $oup[$objet]], [$objet_source => $oup[$objet_source]], $oup);
-					}
-				}
-			}
-			# oups ne persiste que pour la derniere action, si suppression
-			set_request('_oups');
-		}
-
-		$supprimer = _request('supprimer_lien');
-		$ajouter = _request('ajouter_lien');
-		$ordonner = _request('ordonner_lien');
-
-		if (_request('desordonner_liens')) {
-			include_spip('action/editer_liens');
-			objet_qualifier_liens([$objet_lien => '*'], [$objet => $id_objet], ['rang_lien' => 0]);
-		}
-
-		// il est possible de preciser dans une seule variable un remplacement :
-		// remplacer_lien[old][new]
-		if ($remplacer = _request('remplacer_lien')) {
-			foreach ($remplacer as $k => $v) {
-				if ($old = lien_verifier_action($k, '')) {
-					foreach (is_array($v) ? $v : [$v] as $kn => $vn) {
-						if ($new = lien_verifier_action($kn, $vn)) {
-							$supprimer[$old] = 'x';
-							$ajouter[$new] = '+';
-						}
-					}
-				}
-			}
-		}
-
-		if ($supprimer) {
-			if (
-				$supprimer_objets = charger_fonction(
-					"editer_liens_supprimer_{$table_source}_{$objet}_{$objet_lien}",
-					'action',
-					true
-				)
-			) {
-				$oups = $supprimer_objets($supprimer);
-			} else {
-				include_spip('action/editer_liens');
-				$oups = [];
-
-				foreach ($supprimer as $k => $v) {
-					if ($lien = lien_verifier_action($k, $v)) {
-						$lien = explode('-', $lien);
-						[$objet_source, $ids, $objet_lie, $idl, $role] = array_pad($lien, 5, null);
-						// appliquer une condition sur le rôle si défini ('*' pour tous les roles)
-						$cond = (!is_null($role) ? ['role' => $role] : []);
-						if ($objet_lien == $objet_source) {
-							$oups = array_merge(
-								$oups,
-								objet_trouver_liens([$objet_source => $ids], [$objet_lie => $idl], $cond)
-							);
-							objet_dissocier([$objet_source => $ids], [$objet_lie => $idl], $cond);
-						} else {
-							$oups = array_merge(
-								$oups,
-								objet_trouver_liens([$objet_lie => $idl], [$objet_source => $ids], $cond)
-							);
-							objet_dissocier([$objet_lie => $idl], [$objet_source => $ids], $cond);
-						}
-					}
-				}
-			}
-			set_request('_oups', $oups ? base64_encode(serialize($oups)) : null);
-		}
-
-		if ($ajouter) {
-			if (
-				$ajouter_objets = charger_fonction("editer_liens_ajouter_{$table_source}_{$objet}_{$objet_lien}", 'action', true)
-			) {
-				$ajout_ok = $ajouter_objets($ajouter);
-			} else {
-				$ajout_ok = false;
-				include_spip('action/editer_liens');
-				foreach ($ajouter as $k => $v) {
-					if ($lien = lien_verifier_action($k, $v)) {
-						$ajout_ok = true;
-						[$objet1, $ids, $objet2, $idl] = explode('-', $lien);
-						$qualifs = lien_retrouver_qualif($objet_lien, $lien);
-						if ($objet_lien == $objet1) {
-							lien_ajouter_liaisons($objet1, $ids, $objet2, $idl, $qualifs);
-						} else {
-							lien_ajouter_liaisons($objet2, $idl, $objet1, $ids, $qualifs);
-						}
-						set_request('id_lien_ajoute', $ids);
-					}
-				}
-			}
-			# oups ne persiste que pour la derniere action, si suppression
-			# une suppression suivie d'un ajout dans le meme hit est un remplacement
-			# non annulable !
-			if ($ajout_ok) {
-				set_request('_oups');
-			}
-		}
-
-		if ($ordonner) {
-			include_spip('action/editer_liens');
-			foreach ($ordonner as $k => $rang_lien) {
-				if ($lien = lien_verifier_action($k, '')) {
-					[$objet1, $ids, $objet2, $idl] = explode('-', $lien);
-					$qualif = ['rang_lien' => $rang_lien];
-
-					if ($objet_lien == $objet1) {
-						objet_qualifier_liens([$objet1 => $ids], [$objet2 => $idl], $qualif);
-					} else {
-						objet_qualifier_liens([$objet2 => $idl], [$objet1 => $ids], $qualif);
-					}
-					set_request('id_lien_ajoute', $ids);
-					set_request('_oups');
-				}
-			}
-		}
-	}
-
-
-	return $res;
+    // compat avec ancienne signature ou le 4eme argument est $editable
+    if (!is_array($options)) {
+        $options = ['editable' => $options];
+    } elseif (!isset($options['editable'])) {
+        $options['editable'] = true;
+    }
+
+    $editable = $options['editable'];
+
+    $res = ['editable' => $editable ? true : false];
+    [$table_source, $objet, $id_objet, $objet_lien] = determine_source_lien_objet($a, $b, $c);
+    if (!$table_source or !$objet or !$objet_lien) {
+        return $res;
+    }
+
+
+    if (_request('tout_voir')) {
+        set_request('recherche', '');
+    }
+
+    include_spip('inc/autoriser');
+    if (autoriser('modifier', $objet, $id_objet)) {
+        // annuler les suppressions du coup d'avant !
+        if (
+            _request('annuler_oups')
+            and $oups = _request('_oups')
+            and $oups = base64_decode($oups)
+            and $oups = unserialize($oups)
+        ) {
+            if ($oups_objets = charger_fonction("editer_liens_oups_{$table_source}_{$objet}_{$objet_lien}", 'action', true)) {
+                $oups_objets($oups);
+            } else {
+                $objet_source = objet_type($table_source);
+                include_spip('action/editer_liens');
+                foreach ($oups as $oup) {
+                    if ($objet_lien == $objet_source) {
+                        objet_associer([$objet_source => $oup[$objet_source]], [$objet => $oup[$objet]], $oup);
+                    } else {
+                        objet_associer([$objet => $oup[$objet]], [$objet_source => $oup[$objet_source]], $oup);
+                    }
+                }
+            }
+            # oups ne persiste que pour la derniere action, si suppression
+            set_request('_oups');
+        }
+
+        $supprimer = _request('supprimer_lien');
+        $ajouter = _request('ajouter_lien');
+        $ordonner = _request('ordonner_lien');
+
+        if (_request('desordonner_liens')) {
+            include_spip('action/editer_liens');
+            objet_qualifier_liens([$objet_lien => '*'], [$objet => $id_objet], ['rang_lien' => 0]);
+        }
+
+        // il est possible de preciser dans une seule variable un remplacement :
+        // remplacer_lien[old][new]
+        if ($remplacer = _request('remplacer_lien')) {
+            foreach ($remplacer as $k => $v) {
+                if ($old = lien_verifier_action($k, '')) {
+                    foreach (is_array($v) ? $v : [$v] as $kn => $vn) {
+                        if ($new = lien_verifier_action($kn, $vn)) {
+                            $supprimer[$old] = 'x';
+                            $ajouter[$new] = '+';
+                        }
+                    }
+                }
+            }
+        }
+
+        if ($supprimer) {
+            if (
+                $supprimer_objets = charger_fonction(
+                    "editer_liens_supprimer_{$table_source}_{$objet}_{$objet_lien}",
+                    'action',
+                    true
+                )
+            ) {
+                $oups = $supprimer_objets($supprimer);
+            } else {
+                include_spip('action/editer_liens');
+                $oups = [];
+
+                foreach ($supprimer as $k => $v) {
+                    if ($lien = lien_verifier_action($k, $v)) {
+                        $lien = explode('-', $lien);
+                        [$objet_source, $ids, $objet_lie, $idl, $role] = array_pad($lien, 5, null);
+                        // appliquer une condition sur le rôle si défini ('*' pour tous les roles)
+                        $cond = (!is_null($role) ? ['role' => $role] : []);
+                        if ($objet_lien == $objet_source) {
+                            $oups = array_merge(
+                                $oups,
+                                objet_trouver_liens([$objet_source => $ids], [$objet_lie => $idl], $cond)
+                            );
+                            objet_dissocier([$objet_source => $ids], [$objet_lie => $idl], $cond);
+                        } else {
+                            $oups = array_merge(
+                                $oups,
+                                objet_trouver_liens([$objet_lie => $idl], [$objet_source => $ids], $cond)
+                            );
+                            objet_dissocier([$objet_lie => $idl], [$objet_source => $ids], $cond);
+                        }
+                    }
+                }
+            }
+            set_request('_oups', $oups ? base64_encode(serialize($oups)) : null);
+        }
+
+        if ($ajouter) {
+            if (
+                $ajouter_objets = charger_fonction("editer_liens_ajouter_{$table_source}_{$objet}_{$objet_lien}", 'action', true)
+            ) {
+                $ajout_ok = $ajouter_objets($ajouter);
+            } else {
+                $ajout_ok = false;
+                include_spip('action/editer_liens');
+                foreach ($ajouter as $k => $v) {
+                    if ($lien = lien_verifier_action($k, $v)) {
+                        $ajout_ok = true;
+                        [$objet1, $ids, $objet2, $idl] = explode('-', $lien);
+                        $qualifs = lien_retrouver_qualif($objet_lien, $lien);
+                        if ($objet_lien == $objet1) {
+                            lien_ajouter_liaisons($objet1, $ids, $objet2, $idl, $qualifs);
+                        } else {
+                            lien_ajouter_liaisons($objet2, $idl, $objet1, $ids, $qualifs);
+                        }
+                        set_request('id_lien_ajoute', $ids);
+                    }
+                }
+            }
+            # oups ne persiste que pour la derniere action, si suppression
+            # une suppression suivie d'un ajout dans le meme hit est un remplacement
+            # non annulable !
+            if ($ajout_ok) {
+                set_request('_oups');
+            }
+        }
+
+        if ($ordonner) {
+            include_spip('action/editer_liens');
+            foreach ($ordonner as $k => $rang_lien) {
+                if ($lien = lien_verifier_action($k, '')) {
+                    [$objet1, $ids, $objet2, $idl] = explode('-', $lien);
+                    $qualif = ['rang_lien' => $rang_lien];
+
+                    if ($objet_lien == $objet1) {
+                        objet_qualifier_liens([$objet1 => $ids], [$objet2 => $idl], $qualif);
+                    } else {
+                        objet_qualifier_liens([$objet2 => $idl], [$objet1 => $ids], $qualif);
+                    }
+                    set_request('id_lien_ajoute', $ids);
+                    set_request('_oups');
+                }
+            }
+        }
+    }
+
+
+    return $res;
 }
 
 
@@ -391,24 +391,24 @@ 
  * @return string Action demandée si trouvée, sinon ''
  */
 function lien_verifier_action($k, $v) {
-	$action = '';
-	if (preg_match(',^\w+-[\w*]+-[\w*]+-[\w*]+(-[\w*])?,', $k)) {
-		$action = $k;
-	}
-	if (preg_match(',^\w+-[\w*]+-[\w*]+-[\w*]+(-[\w*])?,', $v)) {
-		if (is_numeric($k)) {
-			$action = $v;
-		}
-		if (_request($k)) {
-			$action = $v;
-		}
-	}
-	// ajout un role null fictif (plus pratique) si pas défini
-	if ($action and count(explode('-', $action)) == 4) {
-		$action .= '-';
-	}
-
-	return $action;
+    $action = '';
+    if (preg_match(',^\w+-[\w*]+-[\w*]+-[\w*]+(-[\w*])?,', $k)) {
+        $action = $k;
+    }
+    if (preg_match(',^\w+-[\w*]+-[\w*]+-[\w*]+(-[\w*])?,', $v)) {
+        if (is_numeric($k)) {
+            $action = $v;
+        }
+        if (_request($k)) {
+            $action = $v;
+        }
+    }
+    // ajout un role null fictif (plus pratique) si pas défini
+    if ($action and count(explode('-', $action)) == 4) {
+        $action .= '-';
+    }
+
+    return $action;
 }
 
 
@@ -424,66 +424,66 @@ 
  *   Liste des qualifs pour chaque lien. Tableau vide s'il n'y en a pas.
  **/
 function lien_retrouver_qualif($objet_lien, $lien) {
-	// un role est défini dans la liaison
-	$defs = explode('-', $lien);
-	[$objet1, , $objet2, , $role] = array_pad($defs, 5, null);
-	if ($objet_lien == $objet1) {
-		$colonne_role = roles_colonne($objet1, $objet2);
-	} else {
-		$colonne_role = roles_colonne($objet2, $objet1);
-	}
-
-	// cas ou le role est defini en 5e argument de l'action sur le lien (suppression, ajout rapide sans autre attribut)
-	if ($role) {
-		return [
-			// un seul lien avec ce role
-			[$colonne_role => $role]
-		];
-	}
-
-	// retrouver les rôles postés pour cette liaison, s'il y en a.
-	$qualifier_lien = _request('qualifier_lien');
-	if (!$qualifier_lien or !is_array($qualifier_lien)) {
-		return [];
-	}
-
-	// pas avec l'action complete (incluant le role)
-	$qualif = [];
-	if (
-		(!isset($qualifier_lien[$lien]) or !$qualif = $qualifier_lien[$lien])
-		and count($defs) == 5
-	) {
-		// on tente avec l'action sans le role
-		array_pop($defs);
-		$lien = implode('-', $defs);
-		if (!isset($qualifier_lien[$lien]) or !$qualif = $qualifier_lien[$lien]) {
-			$qualif = [];
-		}
-	}
-
-	// $qualif de la forme array(role=>array(...),valeur=>array(...),....)
-	// on le reforme en array(array(role=>..,valeur=>..,..),array(role=>..,valeur=>..,..),...)
-	$qualifs = [];
-	while (is_countable($qualif) ? count($qualif) : 0) {
-		$q = [];
-		foreach ($qualif as $att => $values) {
-			if (is_array($values)) {
-				$q[$att] = array_shift($qualif[$att]);
-				if (!(is_countable($qualif[$att]) ? count($qualif[$att]) : 0)) {
-					unset($qualif[$att]);
-				}
-			} else {
-				$q[$att] = $values;
-				unset($qualif[$att]);
-			}
-		}
-		// pas de rôle vide
-		if (!$colonne_role or !isset($q[$colonne_role]) or $q[$colonne_role]) {
-			$qualifs[] = $q;
-		}
-	}
-
-	return $qualifs;
+    // un role est défini dans la liaison
+    $defs = explode('-', $lien);
+    [$objet1, , $objet2, , $role] = array_pad($defs, 5, null);
+    if ($objet_lien == $objet1) {
+        $colonne_role = roles_colonne($objet1, $objet2);
+    } else {
+        $colonne_role = roles_colonne($objet2, $objet1);
+    }
+
+    // cas ou le role est defini en 5e argument de l'action sur le lien (suppression, ajout rapide sans autre attribut)
+    if ($role) {
+        return [
+            // un seul lien avec ce role
+            [$colonne_role => $role]
+        ];
+    }
+
+    // retrouver les rôles postés pour cette liaison, s'il y en a.
+    $qualifier_lien = _request('qualifier_lien');
+    if (!$qualifier_lien or !is_array($qualifier_lien)) {
+        return [];
+    }
+
+    // pas avec l'action complete (incluant le role)
+    $qualif = [];
+    if (
+        (!isset($qualifier_lien[$lien]) or !$qualif = $qualifier_lien[$lien])
+        and count($defs) == 5
+    ) {
+        // on tente avec l'action sans le role
+        array_pop($defs);
+        $lien = implode('-', $defs);
+        if (!isset($qualifier_lien[$lien]) or !$qualif = $qualifier_lien[$lien]) {
+            $qualif = [];
+        }
+    }
+
+    // $qualif de la forme array(role=>array(...),valeur=>array(...),....)
+    // on le reforme en array(array(role=>..,valeur=>..,..),array(role=>..,valeur=>..,..),...)
+    $qualifs = [];
+    while (is_countable($qualif) ? count($qualif) : 0) {
+        $q = [];
+        foreach ($qualif as $att => $values) {
+            if (is_array($values)) {
+                $q[$att] = array_shift($qualif[$att]);
+                if (!(is_countable($qualif[$att]) ? count($qualif[$att]) : 0)) {
+                    unset($qualif[$att]);
+                }
+            } else {
+                $q[$att] = $values;
+                unset($qualif[$att]);
+            }
+        }
+        // pas de rôle vide
+        if (!$colonne_role or !isset($q[$colonne_role]) or $q[$colonne_role]) {
+            $qualifs[] = $q;
+        }
+    }
+
+    return $qualifs;
 }
 
 /**
@@ -502,12 +502,12 @@ 
  **/
 function lien_ajouter_liaisons($objet_source, $ids, $objet_lien, $idl, $qualifs) {
 
-	// retrouver la colonne de roles s'il y en a a lier
-	if (is_array($qualifs) and count($qualifs)) {
-		foreach ($qualifs as $qualif) {
-			objet_associer([$objet_source => $ids], [$objet_lien => $idl], $qualif);
-		}
-	} else {
-		objet_associer([$objet_source => $ids], [$objet_lien => $idl]);
-	}
+    // retrouver la colonne de roles s'il y en a a lier
+    if (is_array($qualifs) and count($qualifs)) {
+        foreach ($qualifs as $qualif) {
+            objet_associer([$objet_source => $ids], [$objet_lien => $idl], $qualif);
+        }
+    } else {
+        objet_associer([$objet_source => $ids], [$objet_lien => $idl]);
+    }
 }

Spacing +6 added lines, -6 removed lines

@@ -105,7 +105,7 @@ 
 
 	// L'éditabilité :) est définie par un test permanent (par exemple "associermots") ET le 4ème argument
 	include_spip('inc/autoriser');
-	$editable = ($editable and autoriser('associer' . $table_source, $objet, $id_objet)
+	$editable = ($editable and autoriser('associer'.$table_source, $objet, $id_objet)
 		and autoriser('modifier', $objet, $id_objet));
 
 	if (
@@ -119,15 +119,15 @@ 
 
 	// squelettes de vue et de d'association
 	// ils sont différents si des rôles sont définis.
-	$skel_vue = $table_source . '_lies';
-	$skel_ajout = $table_source . '_associer';
+	$skel_vue = $table_source.'_lies';
+	$skel_ajout = $table_source.'_associer';
 
 	// description des roles
 	include_spip('inc/roles');
 	if ($roles = roles_presents($objet_source, $objet)) {
 		// on demande de nouveaux squelettes en conséquence
-		$skel_vue = $table_source . '_roles_lies';
-		$skel_ajout = $table_source . '_roles_associer';
+		$skel_vue = $table_source.'_roles_lies';
+		$skel_ajout = $table_source.'_roles_associer';
 	}
 
 	$oups = _request('_oups') ?? '';
@@ -426,7 +426,7 @@ 
 function lien_retrouver_qualif($objet_lien, $lien) {
 	// un role est défini dans la liaison
 	$defs = explode('-', $lien);
-	[$objet1, , $objet2, , $role] = array_pad($defs, 5, null);
+	[$objet1,, $objet2,, $role] = array_pad($defs, 5, null);
 	if ($objet_lien == $objet1) {
 		$colonne_role = roles_colonne($objet1, $objet2);
 	} else {

prive/formulaires/dater.php

Indentation +266 added lines, -266 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -45,136 +45,136 @@ 
  **/
 function formulaires_dater_charger_dist($objet, $id_objet, $retour = '', $options = []) {
 
-	$jour = null;
-	$mois = null;
-	$annee = null;
-	$heure = null;
-	$minute = null;
-	$objet = objet_type($objet);
-	if (!$objet or !intval($id_objet)) {
-		return false;
-	}
-
-	if (!is_array($options)) {
-		$options = unserialize($options);
-	}
-
-	$_id_objet = id_table_objet($objet);
-	$table = table_objet($objet);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table($table);
-
-	if (!$desc) {
-		return false;
-	}
-
-	$champ_date = $desc['date'] ?: 'date';
-	if (isset($options['champ_date']) and $options['champ_date']) {
-		$champ_date = $options['champ_date'];
-	}
-	if (!isset($desc['field'][$champ_date])) {
-		return false;
-	}
-
-	$valeurs = [
-		'objet' => $objet,
-		'id_objet' => $id_objet,
-		'id' => $id_objet,
-	];
-
-
-	$select = "$champ_date as date";
-	$champ_date_redac = 'date_redac';
-	if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
-		$champ_date_redac = $options['champ_date_redac'];
-	}
-	if (isset($desc['field'][$champ_date_redac])) {
-		$select .= ",$champ_date_redac as date_redac";
-	}
-	if (isset($desc['field']['statut'])) {
-		$select .= ',statut';
-	}
-
-
-	$row = sql_fetsel($select, $desc['table'], "$_id_objet=" . intval($id_objet));
-	$statut = $row['statut'] ?? 'publie'; // pas de statut => publie
-
-	$valeurs['editable'] = autoriser('dater', $objet, $id_objet, null, ['statut' => $statut]);
-
-	$possedeDateRedac = false;
-
-	if (
-		isset($row['date_redac']) and
-		$regs = recup_date($row['date_redac'], false)
-	) {
-		$annee_redac = $regs[0];
-		$mois_redac = $regs[1];
-		$jour_redac = $regs[2];
-		$heure_redac = $regs[3];
-		$minute_redac = $regs[4];
-		$possedeDateRedac = true;
-		// attention : les vrai dates de l'annee 1 sont stockee avec +9000 => 9001
-		// mais reviennent ici en annee 1 par recup_date
-		// on verifie donc que le intval($row['date_redac']) qui ressort l'annee
-		// est bien lui aussi <=1 : dans ce cas c'est une date sql 'nulle' ou presque, selon
-		// le gestionnnaire sql utilise (0001-01-01 pour PG par exemple)
-		if (intval($row['date_redac']) <= 1 and ($annee_redac <= 1) and ($mois_redac <= 1) and ($jour_redac <= 1)) {
-			$possedeDateRedac = false;
-		}
-	} else {
-		$annee_redac = $mois_redac = $jour_redac = $heure_redac = $minute_redac = 0;
-	}
-
-	if ($regs = recup_date($row['date'], false)) {
-		$annee = $regs[0];
-		$mois = $regs[1];
-		$jour = $regs[2];
-		$heure = $regs[3];
-		$minute = $regs[4];
-	}
-
-	// attention, si la variable s'appelle date ou date_redac, le compilo va
-	// la normaliser, ce qu'on ne veut pas ici.
-	$valeurs['afficher_date_redac'] = ($possedeDateRedac ? $row['date_redac'] : '');
-	$valeurs['date_redac_jour'] = dater_formater_saisie_jour($jour_redac, $mois_redac, $annee_redac);
-	$valeurs['date_redac_heure'] = "$heure_redac:$minute_redac";
-
-	$valeurs['afficher_date'] = $row['date'];
-	$valeurs['date_jour'] = dater_formater_saisie_jour($jour, $mois, $annee);
-	$valeurs['date_heure'] = "$heure:$minute";
-
-	$valeurs['sans_redac'] = !$possedeDateRedac;
-
-	if (isset($options['date_redac'])) {
-		$valeurs['_editer_date_anterieure'] = $options['date_redac'];
-	} else {
-		$valeurs['_editer_date_anterieure'] = ($objet == 'article' and ($GLOBALS['meta']['articles_redac'] != 'non' or $possedeDateRedac));
-	}
-	$valeurs['_label_date'] = (($statut == 'publie') ?
-		_T('texte_date_publication_objet') : _T('texte_date_creation_objet'));
-	if (isset($options['label_date']) and $options['label_date']) {
-		$valeurs['_label_date'] = $options['label_date'];
-	}
-	if (isset($options['label_date_redac']) and $options['label_date_redac']) {
-		$valeurs['_label_date_redac'] = $options['label_date_redac'];
-	}
-	if (isset($options['texte_sans_date_redac']) and $options['texte_sans_date_redac']) {
-		$valeurs['_texte_sans_date_redac'] = $options['texte_sans_date_redac'];
-	}
-	if (isset($options['class']) and $options['class']) {
-		$valeurs['_class'] = $options['class'];
-	}
-
-	$valeurs['_saisie_en_cours'] = (_request('_saisie_en_cours') !== null or _request('date_jour') !== null);
-
-	// cas ou l'on ne peut pas dater mais on peut modifier la date de redac anterieure
-	// https://core.spip.net/issues/3494
-	$valeurs['_editer_date'] = $valeurs['editable'];
-	if ($valeurs['_editer_date_anterieure'] and !$valeurs['editable']) {
-		$valeurs['editable'] = autoriser('modifier', $objet, $id_objet);
-	}
-
-	return $valeurs;
+    $jour = null;
+    $mois = null;
+    $annee = null;
+    $heure = null;
+    $minute = null;
+    $objet = objet_type($objet);
+    if (!$objet or !intval($id_objet)) {
+        return false;
+    }
+
+    if (!is_array($options)) {
+        $options = unserialize($options);
+    }
+
+    $_id_objet = id_table_objet($objet);
+    $table = table_objet($objet);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table($table);
+
+    if (!$desc) {
+        return false;
+    }
+
+    $champ_date = $desc['date'] ?: 'date';
+    if (isset($options['champ_date']) and $options['champ_date']) {
+        $champ_date = $options['champ_date'];
+    }
+    if (!isset($desc['field'][$champ_date])) {
+        return false;
+    }
+
+    $valeurs = [
+        'objet' => $objet,
+        'id_objet' => $id_objet,
+        'id' => $id_objet,
+    ];
+
+
+    $select = "$champ_date as date";
+    $champ_date_redac = 'date_redac';
+    if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
+        $champ_date_redac = $options['champ_date_redac'];
+    }
+    if (isset($desc['field'][$champ_date_redac])) {
+        $select .= ",$champ_date_redac as date_redac";
+    }
+    if (isset($desc['field']['statut'])) {
+        $select .= ',statut';
+    }
+
+
+    $row = sql_fetsel($select, $desc['table'], "$_id_objet=" . intval($id_objet));
+    $statut = $row['statut'] ?? 'publie'; // pas de statut => publie
+
+    $valeurs['editable'] = autoriser('dater', $objet, $id_objet, null, ['statut' => $statut]);
+
+    $possedeDateRedac = false;
+
+    if (
+        isset($row['date_redac']) and
+        $regs = recup_date($row['date_redac'], false)
+    ) {
+        $annee_redac = $regs[0];
+        $mois_redac = $regs[1];
+        $jour_redac = $regs[2];
+        $heure_redac = $regs[3];
+        $minute_redac = $regs[4];
+        $possedeDateRedac = true;
+        // attention : les vrai dates de l'annee 1 sont stockee avec +9000 => 9001
+        // mais reviennent ici en annee 1 par recup_date
+        // on verifie donc que le intval($row['date_redac']) qui ressort l'annee
+        // est bien lui aussi <=1 : dans ce cas c'est une date sql 'nulle' ou presque, selon
+        // le gestionnnaire sql utilise (0001-01-01 pour PG par exemple)
+        if (intval($row['date_redac']) <= 1 and ($annee_redac <= 1) and ($mois_redac <= 1) and ($jour_redac <= 1)) {
+            $possedeDateRedac = false;
+        }
+    } else {
+        $annee_redac = $mois_redac = $jour_redac = $heure_redac = $minute_redac = 0;
+    }
+
+    if ($regs = recup_date($row['date'], false)) {
+        $annee = $regs[0];
+        $mois = $regs[1];
+        $jour = $regs[2];
+        $heure = $regs[3];
+        $minute = $regs[4];
+    }
+
+    // attention, si la variable s'appelle date ou date_redac, le compilo va
+    // la normaliser, ce qu'on ne veut pas ici.
+    $valeurs['afficher_date_redac'] = ($possedeDateRedac ? $row['date_redac'] : '');
+    $valeurs['date_redac_jour'] = dater_formater_saisie_jour($jour_redac, $mois_redac, $annee_redac);
+    $valeurs['date_redac_heure'] = "$heure_redac:$minute_redac";
+
+    $valeurs['afficher_date'] = $row['date'];
+    $valeurs['date_jour'] = dater_formater_saisie_jour($jour, $mois, $annee);
+    $valeurs['date_heure'] = "$heure:$minute";
+
+    $valeurs['sans_redac'] = !$possedeDateRedac;
+
+    if (isset($options['date_redac'])) {
+        $valeurs['_editer_date_anterieure'] = $options['date_redac'];
+    } else {
+        $valeurs['_editer_date_anterieure'] = ($objet == 'article' and ($GLOBALS['meta']['articles_redac'] != 'non' or $possedeDateRedac));
+    }
+    $valeurs['_label_date'] = (($statut == 'publie') ?
+        _T('texte_date_publication_objet') : _T('texte_date_creation_objet'));
+    if (isset($options['label_date']) and $options['label_date']) {
+        $valeurs['_label_date'] = $options['label_date'];
+    }
+    if (isset($options['label_date_redac']) and $options['label_date_redac']) {
+        $valeurs['_label_date_redac'] = $options['label_date_redac'];
+    }
+    if (isset($options['texte_sans_date_redac']) and $options['texte_sans_date_redac']) {
+        $valeurs['_texte_sans_date_redac'] = $options['texte_sans_date_redac'];
+    }
+    if (isset($options['class']) and $options['class']) {
+        $valeurs['_class'] = $options['class'];
+    }
+
+    $valeurs['_saisie_en_cours'] = (_request('_saisie_en_cours') !== null or _request('date_jour') !== null);
+
+    // cas ou l'on ne peut pas dater mais on peut modifier la date de redac anterieure
+    // https://core.spip.net/issues/3494
+    $valeurs['_editer_date'] = $valeurs['editable'];
+    if ($valeurs['_editer_date_anterieure'] and !$valeurs['editable']) {
+        $valeurs['editable'] = autoriser('modifier', $objet, $id_objet);
+    }
+
+    return $valeurs;
 }
 
 /**
@@ -192,20 +192,20 @@ 
  *     Date formatée tel que `02/10/2012`
  **/
 function dater_formater_saisie_jour($jour, $mois, $annee, $sep = '/') {
-	$annee = str_pad($annee, 4, '0', STR_PAD_LEFT);
-	if (intval($jour)) {
-		$jour = str_pad($jour, 2, '0', STR_PAD_LEFT);
-		$mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
+    $annee = str_pad($annee, 4, '0', STR_PAD_LEFT);
+    if (intval($jour)) {
+        $jour = str_pad($jour, 2, '0', STR_PAD_LEFT);
+        $mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
 
-		return "$jour$sep$mois$sep$annee";
-	}
-	if (intval($mois)) {
-		$mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
+        return "$jour$sep$mois$sep$annee";
+    }
+    if (intval($mois)) {
+        $mois = str_pad($mois, 2, '0', STR_PAD_LEFT);
 
-		return "$mois$sep$annee";
-	}
+        return "$mois$sep$annee";
+    }
 
-	return $annee;
+    return $annee;
 }
 
 /**
@@ -224,7 +224,7 @@ 
  *     Hash du formulaire
  **/
 function formulaires_dater_identifier_dist($objet, $id_objet, $retour = '', $options = []) {
-	return serialize([$objet, $id_objet]);
+    return serialize([$objet, $id_objet]);
 }
 
 /**
@@ -242,30 +242,30 @@ 
  *     Tableau des erreurs
  */
 function formulaires_dater_verifier_dist($objet, $id_objet, $retour = '', $options = []) {
-	$erreurs = [];
-
-	// ouvrir le formulaire en edition ?
-	if (_request('_saisie_en_cours')) {
-		$erreurs['message_erreur'] = '';
-
-		return $erreurs;
-	}
-
-	if (_request('changer')) {
-		foreach (['date', 'date_redac'] as $k) {
-			if ($v = _request($k . '_jour') and !dater_recuperer_date_saisie($v, $k)) {
-				$erreurs[$k] = _T('format_date_incorrecte');
-			} elseif ($v = _request($k . '_heure') and !dater_recuperer_heure_saisie($v)) {
-				$erreurs[$k] = _T('format_heure_incorrecte');
-			}
-		}
-
-		if (!_request('date_jour')) {
-			$erreurs['date'] = _T('info_obligatoire');
-		}
-	}
-
-	return $erreurs;
+    $erreurs = [];
+
+    // ouvrir le formulaire en edition ?
+    if (_request('_saisie_en_cours')) {
+        $erreurs['message_erreur'] = '';
+
+        return $erreurs;
+    }
+
+    if (_request('changer')) {
+        foreach (['date', 'date_redac'] as $k) {
+            if ($v = _request($k . '_jour') and !dater_recuperer_date_saisie($v, $k)) {
+                $erreurs[$k] = _T('format_date_incorrecte');
+            } elseif ($v = _request($k . '_heure') and !dater_recuperer_heure_saisie($v)) {
+                $erreurs[$k] = _T('format_heure_incorrecte');
+            }
+        }
+
+        if (!_request('date_jour')) {
+            $erreurs['date'] = _T('info_obligatoire');
+        }
+    }
+
+    return $erreurs;
 }
 
 /**
@@ -283,79 +283,79 @@ 
  *     Retours des traitements
  */
 function formulaires_dater_traiter_dist($objet, $id_objet, $retour = '', $options = []) {
-	$res = ['editable' => ' '];
-
-	if (_request('changer')) {
-		$table = table_objet($objet);
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$desc = $trouver_table($table);
-
-		if (!$desc) {
-			return ['message_erreur' => _L('erreur')];
-		} #impossible en principe
-
-		$champ_date = $desc['date'] ?: 'date';
-		if (isset($options['champ_date']) and $options['champ_date']) {
-			$champ_date = $options['champ_date'];
-		}
-
-		$set = [];
-
-		$charger = charger_fonction('charger', 'formulaires/dater/');
-		$v = $charger($objet, $id_objet, $retour, $options);
-
-		if ($v['_editer_date']) {
-			if (!$d = dater_recuperer_date_saisie(_request('date_jour'))) {
-				$d = [date('Y'), date('m'), date('d')];
-			}
-			if (!$h = dater_recuperer_heure_saisie(_request('date_heure'))) {
-				$h = [0, 0];
-			}
-
-			$set[$champ_date] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
-		}
-
-		$champ_date_redac = 'date_redac';
-		if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
-			$champ_date_redac = $options['champ_date_redac'];
-		}
-		if (isset($desc['field'][$champ_date_redac]) and $v['_editer_date_anterieure']) {
-			if (!_request('date_redac_jour') or _request('sans_redac')) {
-				$set[$champ_date_redac] = sql_format_date(0, 0, 0, 0, 0, 0);
-			} else {
-				if (!$d = dater_recuperer_date_saisie(_request('date_redac_jour'), 'date_redac')) {
-					$d = [date('Y'), date('m'), date('d')];
-				}
-				if (!$h = dater_recuperer_heure_saisie(_request('date_redac_heure'))) {
-					$h = [0, 0];
-				}
-				$set[$champ_date_redac] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
-			}
-		}
-
-		if (count($set)) {
-			$publie_avant = objet_test_si_publie($objet, $id_objet);
-			include_spip('action/editer_objet');
-			objet_modifier($objet, $id_objet, $set);
-			$publie_apres = objet_test_si_publie($objet, $id_objet);
-			if ($publie_avant !== $publie_apres) {
-				// on refuse ajax pour forcer le rechargement de la page ici
-				// on refera traiter une 2eme fois, mais c'est sans consequence
-				refuser_traiter_formulaire_ajax();
-			}
-		}
-	}
-
-	if ($retour) {
-		$res['redirect'] = $retour;
-	}
-
-	set_request('date_jour');
-	set_request('date_redac_jour');
-	set_request('date_heure');
-	set_request('date_redac_heure');
-
-	return $res;
+    $res = ['editable' => ' '];
+
+    if (_request('changer')) {
+        $table = table_objet($objet);
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $desc = $trouver_table($table);
+
+        if (!$desc) {
+            return ['message_erreur' => _L('erreur')];
+        } #impossible en principe
+
+        $champ_date = $desc['date'] ?: 'date';
+        if (isset($options['champ_date']) and $options['champ_date']) {
+            $champ_date = $options['champ_date'];
+        }
+
+        $set = [];
+
+        $charger = charger_fonction('charger', 'formulaires/dater/');
+        $v = $charger($objet, $id_objet, $retour, $options);
+
+        if ($v['_editer_date']) {
+            if (!$d = dater_recuperer_date_saisie(_request('date_jour'))) {
+                $d = [date('Y'), date('m'), date('d')];
+            }
+            if (!$h = dater_recuperer_heure_saisie(_request('date_heure'))) {
+                $h = [0, 0];
+            }
+
+            $set[$champ_date] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
+        }
+
+        $champ_date_redac = 'date_redac';
+        if (isset($options['champ_date_redac']) and $options['champ_date_redac']) {
+            $champ_date_redac = $options['champ_date_redac'];
+        }
+        if (isset($desc['field'][$champ_date_redac]) and $v['_editer_date_anterieure']) {
+            if (!_request('date_redac_jour') or _request('sans_redac')) {
+                $set[$champ_date_redac] = sql_format_date(0, 0, 0, 0, 0, 0);
+            } else {
+                if (!$d = dater_recuperer_date_saisie(_request('date_redac_jour'), 'date_redac')) {
+                    $d = [date('Y'), date('m'), date('d')];
+                }
+                if (!$h = dater_recuperer_heure_saisie(_request('date_redac_heure'))) {
+                    $h = [0, 0];
+                }
+                $set[$champ_date_redac] = sql_format_date($d[0], $d[1], $d[2], $h[0], $h[1]);
+            }
+        }
+
+        if (count($set)) {
+            $publie_avant = objet_test_si_publie($objet, $id_objet);
+            include_spip('action/editer_objet');
+            objet_modifier($objet, $id_objet, $set);
+            $publie_apres = objet_test_si_publie($objet, $id_objet);
+            if ($publie_avant !== $publie_apres) {
+                // on refuse ajax pour forcer le rechargement de la page ici
+                // on refera traiter une 2eme fois, mais c'est sans consequence
+                refuser_traiter_formulaire_ajax();
+            }
+        }
+    }
+
+    if ($retour) {
+        $res['redirect'] = $retour;
+    }
+
+    set_request('date_jour');
+    set_request('date_redac_jour');
+    set_request('date_heure');
+    set_request('date_redac_heure');
+
+    return $res;
 }
 
 /**
@@ -366,24 +366,24 @@ 
  * @return array|string Chaîne vide si date invalide, tableau (année, mois, jour) sinon.
  */
 function dater_recuperer_date_saisie($post, $quoi = 'date') {
-	if (!preg_match('#^(?:(?:([0-9]{1,2})[/-])?([0-9]{1,2})[/-])?([0-9]{4}|[0-9]{1,2})#', $post, $regs)) {
-		return '';
-	}
-	if ($quoi == 'date_redac') {
-		if ($regs[3] <> '' and $regs[3] < 1001) {
-			$regs[3] += 9000;
-		}
-
-		return [$regs[3], $regs[2], $regs[1]];
-	} else {
-		if (
-			checkdate(intval($regs[2]), intval($regs[1]), intval($regs[3]))
-			and $t = mktime(0, 0, 0, $regs[2], $regs[1], $regs[3])
-		) {
-			return [date('Y', $t), date('m', $t), date('d', $t)];
-		}
-		return '';
-	}
+    if (!preg_match('#^(?:(?:([0-9]{1,2})[/-])?([0-9]{1,2})[/-])?([0-9]{4}|[0-9]{1,2})#', $post, $regs)) {
+        return '';
+    }
+    if ($quoi == 'date_redac') {
+        if ($regs[3] <> '' and $regs[3] < 1001) {
+            $regs[3] += 9000;
+        }
+
+        return [$regs[3], $regs[2], $regs[1]];
+    } else {
+        if (
+            checkdate(intval($regs[2]), intval($regs[1]), intval($regs[3]))
+            and $t = mktime(0, 0, 0, $regs[2], $regs[1], $regs[3])
+        ) {
+            return [date('Y', $t), date('m', $t), date('d', $t)];
+        }
+        return '';
+    }
 }
 
 /**
@@ -393,12 +393,12 @@ 
  * @return array
  */
 function dater_recuperer_heure_saisie($post) {
-	if (!preg_match('#([0-9]{1,2})(?:[h:](?:([0-9]{1,2}))?)?#', $post, $regs)) {
-		return '';
-	}
-	if ($regs[1] > 23 or $regs[2] > 59) {
-		return '';
-	}
-
-	return [$regs[1], $regs[2]];
+    if (!preg_match('#([0-9]{1,2})(?:[h:](?:([0-9]{1,2}))?)?#', $post, $regs)) {
+        return '';
+    }
+    if ($regs[1] > 23 or $regs[2] > 59) {
+        return '';
+    }
+
+    return [$regs[1], $regs[2]];
 }

Spacing +3 added lines, -3 removed lines

@@ -96,7 +96,7 @@ 
 	}
 
 
-	$row = sql_fetsel($select, $desc['table'], "$_id_objet=" . intval($id_objet));
+	$row = sql_fetsel($select, $desc['table'], "$_id_objet=".intval($id_objet));
 	$statut = $row['statut'] ?? 'publie'; // pas de statut => publie
 
 	$valeurs['editable'] = autoriser('dater', $objet, $id_objet, null, ['statut' => $statut]);
@@ -253,9 +253,9 @@ 
 
 	if (_request('changer')) {
 		foreach (['date', 'date_redac'] as $k) {
-			if ($v = _request($k . '_jour') and !dater_recuperer_date_saisie($v, $k)) {
+			if ($v = _request($k.'_jour') and !dater_recuperer_date_saisie($v, $k)) {
 				$erreurs[$k] = _T('format_date_incorrecte');
-			} elseif ($v = _request($k . '_heure') and !dater_recuperer_heure_saisie($v)) {
+			} elseif ($v = _request($k.'_heure') and !dater_recuperer_heure_saisie($v)) {
 				$erreurs[$k] = _T('format_heure_incorrecte');
 			}
 		}

ecrire/inc/filtres_selecteur_generique.php

Spacing +4 added lines, -4 removed lines

@@ -158,7 +158,7 @@ 
 
 	// si id numerique et un seul objet possible, pas d'ambiguite
 	if (is_numeric($ref) and count($objets) === 1) {
-		$ref = reset($objets) . $ref;
+		$ref = reset($objets).$ref;
 	}
 
 	// Si la référence ne correspond à rien, c'est fini
@@ -166,7 +166,7 @@ 
 		return json_export(false);
 	}
 	// Sinon on récupère les infos utiles
-	[$type, , $id, , , , ] = array_pad($match, 7, null);
+	[$type,, $id,,,,] = array_pad($match, 7, null);
 
 	// On regarde si le type trouvé fait partie des objets sélectionnables
 	if (!in_array(table_objet($type), $objets)) {
@@ -211,8 +211,8 @@ 
 		$types = (is_array($types) ? array_filter($types) : []);
 
 		// recuperer tous les freres et soeurs de la rubrique visee
-		$id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . intval($id_rubrique));
-		$fratrie = sql_allfetsel('id_rubrique', 'spip_rubriques', 'id_parent=' . intval($id_parent));
+		$id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique='.intval($id_rubrique));
+		$fratrie = sql_allfetsel('id_rubrique', 'spip_rubriques', 'id_parent='.intval($id_parent));
 		$fratrie = array_column($fratrie, 'id_rubrique');
 		$has = sql_allfetsel('DISTINCT id_parent', 'spip_rubriques', sql_in('id_parent', $fratrie));
 		$has = array_column($has, 'id_parent');

Indentation +144 added lines, -144 removed lines

@@ -7,7 +7,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -28,51 +28,51 @@ 
  *     - afficher : tableau des objets à afficher (mais pas forcément sélectionnables)
  */
 function selecteur_lister_objets($includelist = [], $excludelist = []) {
-	static $liste_selecteurs, $liste_parents;
-
-	if (!$liste_selecteurs) {
-		$liste_selecteurs = find_all_in_path('formulaires/selecteur/', 'hierarchie-[\w]+[.]html$');
-	}
-	$objets_selectionner = [];
-	foreach ($liste_selecteurs as $fichier => $chemin) {
-		$objets_selectionner[] = preg_replace('/^hierarchie-([\w]+)[.]html$/', '$1', $fichier);
-	}
-
-	// S'il y a une whitelist on ne garde que ce qui est dedans
-	if (!empty($includelist)) {
-		$includelist = array_map('table_objet', $includelist);
-		$objets_selectionner = array_intersect($objets_selectionner, $includelist);
-	}
-	// On supprime ce qui est dans la liste d’exclusion
-	$excludelist = array_map('table_objet', $excludelist);
-	// On enlève toujours la racine
-	$excludelist[] = 'racine';
-	$objets_selectionner = array_diff($objets_selectionner, $excludelist);
-
-	// Ensuite on cherche ce qu'on doit afficher : au moins ceux qu'on peut sélectionner
-	$objets_afficher = $objets_selectionner;
-
-	// Il faut alors chercher d'éventuels parents obligatoires en plus :
-	// lister-trucs-bidules.html => on doit afficher des "trucs" pour trouver des "bidules"
-	if (!$liste_parents) {
-		$liste_parents = find_all_in_path('formulaires/selecteur/', 'lister-[\w]+-[\w]+[.]html$');
-	}
-	foreach ($liste_parents as $fichier => $chemin) {
-		preg_match('/^lister-([\w]+)-([\w]+)[.]html$/', $fichier, $captures);
-		$parent = $captures[1];
-		$type = $captures[2];
-		// Si le type fait partie de ce qu'on doit afficher alors on ajoute aussi le parent à l'affichage
-		if (in_array($type, $objets_afficher)) {
-			$objets_afficher[] = $parent;
-		}
-	}
-
-	$objets = [
-		'selectionner' => array_unique($objets_selectionner),
-		'afficher' => array_unique($objets_afficher),
-	];
-
-	return $objets;
+    static $liste_selecteurs, $liste_parents;
+
+    if (!$liste_selecteurs) {
+        $liste_selecteurs = find_all_in_path('formulaires/selecteur/', 'hierarchie-[\w]+[.]html$');
+    }
+    $objets_selectionner = [];
+    foreach ($liste_selecteurs as $fichier => $chemin) {
+        $objets_selectionner[] = preg_replace('/^hierarchie-([\w]+)[.]html$/', '$1', $fichier);
+    }
+
+    // S'il y a une whitelist on ne garde que ce qui est dedans
+    if (!empty($includelist)) {
+        $includelist = array_map('table_objet', $includelist);
+        $objets_selectionner = array_intersect($objets_selectionner, $includelist);
+    }
+    // On supprime ce qui est dans la liste d’exclusion
+    $excludelist = array_map('table_objet', $excludelist);
+    // On enlève toujours la racine
+    $excludelist[] = 'racine';
+    $objets_selectionner = array_diff($objets_selectionner, $excludelist);
+
+    // Ensuite on cherche ce qu'on doit afficher : au moins ceux qu'on peut sélectionner
+    $objets_afficher = $objets_selectionner;
+
+    // Il faut alors chercher d'éventuels parents obligatoires en plus :
+    // lister-trucs-bidules.html => on doit afficher des "trucs" pour trouver des "bidules"
+    if (!$liste_parents) {
+        $liste_parents = find_all_in_path('formulaires/selecteur/', 'lister-[\w]+-[\w]+[.]html$');
+    }
+    foreach ($liste_parents as $fichier => $chemin) {
+        preg_match('/^lister-([\w]+)-([\w]+)[.]html$/', $fichier, $captures);
+        $parent = $captures[1];
+        $type = $captures[2];
+        // Si le type fait partie de ce qu'on doit afficher alors on ajoute aussi le parent à l'affichage
+        if (in_array($type, $objets_afficher)) {
+            $objets_afficher[] = $parent;
+        }
+    }
+
+    $objets = [
+        'selectionner' => array_unique($objets_selectionner),
+        'afficher' => array_unique($objets_afficher),
+    ];
+
+    return $objets;
 }
 
 /**
@@ -99,31 +99,31 @@ 
  *     liste des couples (objets => id_objet) ou liste des identifiants d'un type d'objet.
  **/
 function picker_selected($selected, $type = '') {
-	$select = [];
-	$type = preg_replace(',\W,', '', $type);
-
-	if ($selected and !is_array($selected)) {
-		$selected = explode(',', $selected);
-	}
-
-	if (is_array($selected)) {
-		foreach ($selected as $value) {
-			// Si c'est le bon format déjà
-			if (preg_match('/^([\w]+)[|]([0-9]+)$/', $value, $captures)) {
-				$objet = $captures[1];
-				$id_objet = intval($captures[2]);
-
-				// Si on cherche un type et que c'est le bon, on renvoit un tableau que d'identifiants
-				if (is_string($type) and $type == $objet and ($id_objet or in_array($objet, ['racine', 'rubrique']))) {
-					$select[] = $id_objet;
-				} elseif (!$type and ($id_objet or in_array($objet, ['racine', 'rubrique']))) {
-					$select[] = ['objet' => $objet, 'id_objet' => $id_objet];
-				}
-			}
-		}
-	}
-
-	return $select;
+    $select = [];
+    $type = preg_replace(',\W,', '', $type);
+
+    if ($selected and !is_array($selected)) {
+        $selected = explode(',', $selected);
+    }
+
+    if (is_array($selected)) {
+        foreach ($selected as $value) {
+            // Si c'est le bon format déjà
+            if (preg_match('/^([\w]+)[|]([0-9]+)$/', $value, $captures)) {
+                $objet = $captures[1];
+                $id_objet = intval($captures[2]);
+
+                // Si on cherche un type et que c'est le bon, on renvoit un tableau que d'identifiants
+                if (is_string($type) and $type == $objet and ($id_objet or in_array($objet, ['racine', 'rubrique']))) {
+                    $select[] = $id_objet;
+                } elseif (!$type and ($id_objet or in_array($objet, ['racine', 'rubrique']))) {
+                    $select[] = ['objet' => $objet, 'id_objet' => $id_objet];
+                }
+            }
+        }
+    }
+
+    return $select;
 }
 
 /**
@@ -140,49 +140,49 @@ 
  *     Booléen indiquant si les articles sont sélectionnables
  */
 function picker_identifie_id_rapide($ref, $rubriques_ou_objets = false, $articles = false) {
-	include_spip('inc/json');
-	include_spip('inc/lien');
-
-	// On construit un tableau des objets sélectionnables suivant les paramètres
-	$objets = [];
-	if ($rubriques_ou_objets and is_array($rubriques_ou_objets)) {
-		$objets = $rubriques_ou_objets;
-	} else {
-		if ($rubriques_ou_objets) {
-			$objets[] = 'rubriques';
-		}
-		if ($articles) {
-			$objets[] = 'articles';
-		}
-	}
-
-	// si id numerique et un seul objet possible, pas d'ambiguite
-	if (is_numeric($ref) and count($objets) === 1) {
-		$ref = reset($objets) . $ref;
-	}
-
-	// Si la référence ne correspond à rien, c'est fini
-	if (!($match = typer_raccourci($ref))) {
-		return json_export(false);
-	}
-	// Sinon on récupère les infos utiles
-	[$type, , $id, , , , ] = array_pad($match, 7, null);
-
-	// On regarde si le type trouvé fait partie des objets sélectionnables
-	if (!in_array(table_objet($type), $objets)) {
-		return json_export(false);
-	}
-
-	// Maintenant que tout est bon, on cherche les informations sur cet objet
-	include_spip('inc/filtres');
-	if (!$titre = generer_objet_info($id, $type, 'titre')) {
-		return json_export(false);
-	}
-
-	// On simplifie le texte
-	$titre = attribut_html($titre);
-
-	return json_export(['type' => $type, 'id' => "$type|$id", 'titre' => $titre]);
+    include_spip('inc/json');
+    include_spip('inc/lien');
+
+    // On construit un tableau des objets sélectionnables suivant les paramètres
+    $objets = [];
+    if ($rubriques_ou_objets and is_array($rubriques_ou_objets)) {
+        $objets = $rubriques_ou_objets;
+    } else {
+        if ($rubriques_ou_objets) {
+            $objets[] = 'rubriques';
+        }
+        if ($articles) {
+            $objets[] = 'articles';
+        }
+    }
+
+    // si id numerique et un seul objet possible, pas d'ambiguite
+    if (is_numeric($ref) and count($objets) === 1) {
+        $ref = reset($objets) . $ref;
+    }
+
+    // Si la référence ne correspond à rien, c'est fini
+    if (!($match = typer_raccourci($ref))) {
+        return json_export(false);
+    }
+    // Sinon on récupère les infos utiles
+    [$type, , $id, , , , ] = array_pad($match, 7, null);
+
+    // On regarde si le type trouvé fait partie des objets sélectionnables
+    if (!in_array(table_objet($type), $objets)) {
+        return json_export(false);
+    }
+
+    // Maintenant que tout est bon, on cherche les informations sur cet objet
+    include_spip('inc/filtres');
+    if (!$titre = generer_objet_info($id, $type, 'titre')) {
+        return json_export(false);
+    }
+
+    // On simplifie le texte
+    $titre = attribut_html($titre);
+
+    return json_export(['type' => $type, 'id' => "$type|$id", 'titre' => $titre]);
 }
 
 /**
@@ -205,34 +205,34 @@ 
  *     Comme le filtre `oui` : espace (` `) si rubrique à afficher, chaîne vide sinon.
  */
 function test_enfants_rubrique($id_rubrique, $types = []) {
-	static $has_child = [];
-
-	if (!isset($has_child[$id_rubrique])) {
-		$types = (is_array($types) ? array_filter($types) : []);
-
-		// recuperer tous les freres et soeurs de la rubrique visee
-		$id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . intval($id_rubrique));
-		$fratrie = sql_allfetsel('id_rubrique', 'spip_rubriques', 'id_parent=' . intval($id_parent));
-		$fratrie = array_column($fratrie, 'id_rubrique');
-		$has = sql_allfetsel('DISTINCT id_parent', 'spip_rubriques', sql_in('id_parent', $fratrie));
-		$has = array_column($has, 'id_parent');
-		$fratrie = array_diff($fratrie, $has);
-
-		while (count($fratrie) and is_array($types) and count($types)) {
-			$type = array_shift($types);
-			$h = sql_allfetsel('DISTINCT id_rubrique', table_objet_sql($type), sql_in('id_rubrique', $fratrie));
-			$h = array_column($h, 'id_rubrique');
-			$has = array_merge($has, $h);
-			$fratrie = array_diff($fratrie, $h);
-		}
-
-		if (count($has)) {
-			$has_child = $has_child + array_combine($has, array_pad([], count($has), true));
-		}
-		if (count($fratrie)) {
-			$has_child = $has_child + array_combine($fratrie, array_pad([], count($fratrie), false));
-		}
-	}
-
-	return $has_child[$id_rubrique] ? ' ' : '';
+    static $has_child = [];
+
+    if (!isset($has_child[$id_rubrique])) {
+        $types = (is_array($types) ? array_filter($types) : []);
+
+        // recuperer tous les freres et soeurs de la rubrique visee
+        $id_parent = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique=' . intval($id_rubrique));
+        $fratrie = sql_allfetsel('id_rubrique', 'spip_rubriques', 'id_parent=' . intval($id_parent));
+        $fratrie = array_column($fratrie, 'id_rubrique');
+        $has = sql_allfetsel('DISTINCT id_parent', 'spip_rubriques', sql_in('id_parent', $fratrie));
+        $has = array_column($has, 'id_parent');
+        $fratrie = array_diff($fratrie, $has);
+
+        while (count($fratrie) and is_array($types) and count($types)) {
+            $type = array_shift($types);
+            $h = sql_allfetsel('DISTINCT id_rubrique', table_objet_sql($type), sql_in('id_rubrique', $fratrie));
+            $h = array_column($h, 'id_rubrique');
+            $has = array_merge($has, $h);
+            $fratrie = array_diff($fratrie, $h);
+        }
+
+        if (count($has)) {
+            $has_child = $has_child + array_combine($has, array_pad([], count($has), true));
+        }
+        if (count($fratrie)) {
+            $has_child = $has_child + array_combine($fratrie, array_pad([], count($fratrie), false));
+        }
+    }
+
+    return $has_child[$id_rubrique] ? ' ' : '';
 }

ecrire/notifications/instituerarticle.php

Indentation +44 added lines, -44 removed lines

@@ -11,53 +11,53 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Fonction appelee par divers pipelines
 function notifications_instituerarticle_dist($quoi, $id_article, $options) {
 
-	// ne devrait jamais se produire
-	if ($options['statut'] == $options['statut_ancien']) {
-		spip_log('statut inchange', 'notifications');
-
-		return;
-	}
-
-	include_spip('inc/texte');
-
-	$modele = '';
-	if ($options['statut'] == 'publie') {
-		if (
-			$GLOBALS['meta']['post_dates'] == 'non'
-			and strtotime($options['date']) > time()
-		) {
-			$modele = 'notifications/article_valide';
-		} else {
-			$modele = 'notifications/article_publie';
-		}
-	}
-
-	if ($options['statut'] == 'prop' and $options['statut_ancien'] != 'publie') {
-		$modele = 'notifications/article_propose';
-	}
-
-	if ($modele) {
-		$destinataires = [];
-		if ($GLOBALS['meta']['suivi_edito'] == 'oui') {
-			$destinataires = explode(',', $GLOBALS['meta']['adresse_suivi']);
-		}
-
-
-		$destinataires = pipeline(
-			'notifications_destinataires',
-			[
-				'args' => ['quoi' => $quoi, 'id' => $id_article, 'options' => $options],
-				'data' => $destinataires
-			]
-		);
-
-		$texte = email_notification_article($id_article, $modele);
-		notifications_envoyer_mails($destinataires, $texte);
-	}
+    // ne devrait jamais se produire
+    if ($options['statut'] == $options['statut_ancien']) {
+        spip_log('statut inchange', 'notifications');
+
+        return;
+    }
+
+    include_spip('inc/texte');
+
+    $modele = '';
+    if ($options['statut'] == 'publie') {
+        if (
+            $GLOBALS['meta']['post_dates'] == 'non'
+            and strtotime($options['date']) > time()
+        ) {
+            $modele = 'notifications/article_valide';
+        } else {
+            $modele = 'notifications/article_publie';
+        }
+    }
+
+    if ($options['statut'] == 'prop' and $options['statut_ancien'] != 'publie') {
+        $modele = 'notifications/article_propose';
+    }
+
+    if ($modele) {
+        $destinataires = [];
+        if ($GLOBALS['meta']['suivi_edito'] == 'oui') {
+            $destinataires = explode(',', $GLOBALS['meta']['adresse_suivi']);
+        }
+
+
+        $destinataires = pipeline(
+            'notifications_destinataires',
+            [
+                'args' => ['quoi' => $quoi, 'id' => $id_article, 'options' => $options],
+                'data' => $destinataires
+            ]
+        );
+
+        $texte = email_notification_article($id_article, $modele);
+        notifications_envoyer_mails($destinataires, $texte);
+    }
 }

ecrire/req/sqlite3.php

Indentation +8 added lines, -8 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -21,18 +21,18 @@ 
 
 
 function req_sqlite3_dist($addr, $port, $login, $pass, $db = '', $prefixe = '') {
-	return req_sqlite_dist($addr, $port, $login, $pass, $db, $prefixe, $sqlite_version = 3);
+    return req_sqlite_dist($addr, $port, $login, $pass, $db, $prefixe, $sqlite_version = 3);
 }
 
 
 function spip_sqlite3_constantes() {
-	if (!defined('SPIP_SQLITE3_ASSOC')) {
-		define('SPIP_SQLITE3_ASSOC', PDO::FETCH_ASSOC);
-		define('SPIP_SQLITE3_NUM', PDO::FETCH_NUM);
-		define('SPIP_SQLITE3_BOTH', PDO::FETCH_BOTH);
-	}
+    if (!defined('SPIP_SQLITE3_ASSOC')) {
+        define('SPIP_SQLITE3_ASSOC', PDO::FETCH_ASSOC);
+        define('SPIP_SQLITE3_NUM', PDO::FETCH_NUM);
+        define('SPIP_SQLITE3_BOTH', PDO::FETCH_BOTH);
+    }
 }
 
 function spip_versions_sqlite3() {
-	return _sqlite_charger_version(3) ? 3 : false;
+    return _sqlite_charger_version(3) ? 3 : false;
 }