spip / SPIP

ecrire/inc/nfslock.php

Indentation +92 added lines, -92 removed lines

@@ -7,7 +7,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/acces');
@@ -101,93 +101,93 @@ 
  * @return int|bool Timestamp du verrou, false si erreur
  */
 function spip_nfslock($fichier, $max_age = 0) {
-	$tries = 0;
+    $tries = 0;
 
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
 
-	/*
+    /*
 	 * 1. create a tmp file with a psuedo random file name. we also make
 	 *    tpath which is a buffer to store the full pathname of the tmp file.
 	 */
 
-	$id = creer_uniqid();
-	$tpath = _DIR_TMP . "slock.$id";
-	$tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
-	if (!$tmpfd) {  /* open failed */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $id = creer_uniqid();
+    $tpath = _DIR_TMP . "slock.$id";
+    $tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
+    if (!$tmpfd) {  /* open failed */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //NFSL_SYSF
-	}
+        return false; //NFSL_SYSF
+    }
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file.
 	 *    then start looping trying to lock it
 	 */
 
-	while ($tries < 10) {
-		/*
+    while ($tries < 10) {
+        /*
 		 * 3. link tmp file to lock file.  if it goes, we win and we clean
 		 *    up and return the st_ctime of the lock file.
 		 */
 
-		if (link($tpath, $lock_file) == 1) {
-			spip_unlink($tpath); /* got it! */
-			@fclose($tmpfd);
-			if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
-				spip_unlink($lock_file);
+        if (link($tpath, $lock_file) == 1) {
+            spip_unlink($tpath); /* got it! */
+            @fclose($tmpfd);
+            if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
+                spip_unlink($lock_file);
 
-				return false; // (NFSL_SYSF);
-			}
+                return false; // (NFSL_SYSF);
+            }
 
-			return ($our_tmp['ctime']);
-		}
+            return ($our_tmp['ctime']);
+        }
 
-		/*
+        /*
 		 * 4. the lock failed.  check for a stale lock file, being mindful
 		 *    of NFS and the fact the time is set from the NFS server.  we
 		 *    do a write on the tmp file to update its time to the server's
 		 *    idea of "now."
 		 */
 
-		$old_stat = lstat($lock_file);
-		if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
-			break;
-		} /* something bogus is going on */
+        $old_stat = lstat($lock_file);
+        if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
+            break;
+        } /* something bogus is going on */
 
 
-		if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
-			spip_unlink($lock_file); /* break the stale lock */
-			$tries++;
-			/* It is CRITICAL that we sleep after breaking
+        if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
+            spip_unlink($lock_file); /* break the stale lock */
+            $tries++;
+            /* It is CRITICAL that we sleep after breaking
 			 * the lock. Otherwise, we could race with
 			 * another process and unlink it's newly-
 			 * created file.
 			 */
-			sleep(1 + random_int(0, 4));
-			continue;
-		}
+            sleep(1 + random_int(0, 4));
+            continue;
+        }
 
-		/*
+        /*
 		 * 5. try again
 		 */
 
-		$tries++;
-		sleep(1 + random_int(0, 4));
-	}
+        $tries++;
+        sleep(1 + random_int(0, 4));
+    }
 
-	/*
+    /*
 	 * 6. give up, failure.
 	 */
 
-	spip_unlink($tpath);
-	@fclose($tmpfd);
+    spip_unlink($tpath);
+    @fclose($tmpfd);
 
-	return false; //(NFSL_LOCKED);
+    return false; //(NFSL_LOCKED);
 }
 
 /**
@@ -231,75 +231,75 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfsunlock($fichier, $birth, $max_age = 0, $test = false) {
-	$id = creer_uniqid();
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
+    $id = creer_uniqid();
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
 
-	/*
+    /*
 	 * 1. Build a temp file and stat that to get an idea of what the server
 	 *    thinks the current time is (our_tmp.st_ctime)..
 	 */
 
-	$tpath = _DIR_TMP . "stime.$id";
-	$tmpfd = @fopen($tpath, 'w');
-	if (
-		(!$tmpfd)
-		or (@fputs($tmpfd, 'zz', 2) != 2)
-		or !($our_tmp = fstat($tmpfd))
-	) {
-		/* The open failed, or we can't write the file, or we can't stat it */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $tpath = _DIR_TMP . "stime.$id";
+    $tmpfd = @fopen($tpath, 'w');
+    if (
+        (!$tmpfd)
+        or (@fputs($tmpfd, 'zz', 2) != 2)
+        or !($our_tmp = fstat($tmpfd))
+    ) {
+        /* The open failed, or we can't write the file, or we can't stat it */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //(NFSL_SYSF);
-	}
+        return false; //(NFSL_SYSF);
+    }
 
-	@fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
-	spip_unlink($tpath);
+    @fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
+    spip_unlink($tpath);
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file
 	 */
 
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
-	/*
+    /*
 	 * 3. If the ctime hasn't been modified, unlink the file and return. If the
 	 *    lock has expired, sleep the usual random interval before returning.
 	 *    If we didn't sleep, there could be a race if the caller immediately
 	 *    tries to relock the file.
 	 */
 
-	if (
-		($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
-		&& ($old_stat['ctime'] == $birth)
-	) {  /* hasn't been modified since birth */
-		if (!$test) {
-			spip_unlink($lock_file);
-		}      /* so the lock is ours to remove */
-		if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
-			if (!$test) {
-				return false;
-			} //(NFSL_LOST);
-			sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
-		}
-
-		return true;//(NFSL_OK);			/* success */
-	}
-
-	/*
+    if (
+        ($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
+        && ($old_stat['ctime'] == $birth)
+    ) {  /* hasn't been modified since birth */
+        if (!$test) {
+            spip_unlink($lock_file);
+        }      /* so the lock is ours to remove */
+        if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
+            if (!$test) {
+                return false;
+            } //(NFSL_LOST);
+            sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
+        }
+
+        return true;//(NFSL_OK);			/* success */
+    }
+
+    /*
 	 * 4. Either ctime has been modified, or the entire lock file is missing.
 	 *    If the lock should still be ours, based on the ctime of the temp
 	 *    file, return with NFSL_STOLEN. If not, then our lock is expired and
 	 *    someone else has grabbed the file, so return NFSL_LOST.
 	 */
 
-	if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
-		return false;
-	} //(NFSL_STOLEN);
+    if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
+        return false;
+    } //(NFSL_STOLEN);
 
-	return false; //(NFSL_LOST);	/* The lock must have expired first. */
+    return false; //(NFSL_LOST);	/* The lock must have expired first. */
 }
 
 
@@ -323,5 +323,5 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfslock_test($fichier, $birth, $max_age = 0) {
-	return spip_nfsunlock($fichier, $birth, $max_age, true);
+    return spip_nfsunlock($fichier, $birth, $max_age, true);
 }

ecrire/inc/csv.php

Indentation +108 added lines, -108 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,118 +33,118 @@ 
  **/
 function analyse_csv($t) {
 
-	// Quel est le séparateur ?
-	$virg = substr_count($t, ',');
-	$pvirg = substr_count($t, ';');
-	$tab = substr_count($t, "\t");
-	if ($virg > $pvirg) {
-		$sep = ',';
-		$hs = ',';
-	} else {
-		$sep = ';';
-		$hs = '&#59;';
-		$virg = $pvirg;
-	}
-	// un certain nombre de tab => le séparateur est tab
-	if ($tab > $virg / 10) {
-		$sep = "\t";
-		$hs = "\t";
-	}
+    // Quel est le séparateur ?
+    $virg = substr_count($t, ',');
+    $pvirg = substr_count($t, ';');
+    $tab = substr_count($t, "\t");
+    if ($virg > $pvirg) {
+        $sep = ',';
+        $hs = ',';
+    } else {
+        $sep = ';';
+        $hs = '&#59;';
+        $virg = $pvirg;
+    }
+    // un certain nombre de tab => le séparateur est tab
+    if ($tab > $virg / 10) {
+        $sep = "\t";
+        $hs = "\t";
+    }
 
-	// un separateur suivi de 3 guillemets attention !
-	// attention au ; ou , suceptible d'etre confondu avec un separateur
-	// on substitue un # et on remplacera a la fin
-	$t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
-	$t = str_replace('""', '&#34#', $t);
-	preg_match_all('/"[^"]*"/', $t, $r);
-	foreach ($r[0] as $cell) {
-		$t = str_replace(
-			$cell,
-			str_replace(
-				$sep,
-				$hs,
-				str_replace(
-					"\n",
-					'``**``', // échapper les saut de lignes, on les remettra après.
-					substr($cell, 1, -1)
-				)
-			),
-			$t
-		);
-	}
+    // un separateur suivi de 3 guillemets attention !
+    // attention au ; ou , suceptible d'etre confondu avec un separateur
+    // on substitue un # et on remplacera a la fin
+    $t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
+    $t = str_replace('""', '&#34#', $t);
+    preg_match_all('/"[^"]*"/', $t, $r);
+    foreach ($r[0] as $cell) {
+        $t = str_replace(
+            $cell,
+            str_replace(
+                $sep,
+                $hs,
+                str_replace(
+                    "\n",
+                    '``**``', // échapper les saut de lignes, on les remettra après.
+                    substr($cell, 1, -1)
+                )
+            ),
+            $t
+        );
+    }
 
-	$t = preg_replace(
-		'/\r?\n/',
-		"\n",
-		preg_replace('/[\r\n]+/', "\n", $t)
-	);
+    $t = preg_replace(
+        '/\r?\n/',
+        "\n",
+        preg_replace('/[\r\n]+/', "\n", $t)
+    );
 
-	[$entete, $corps] = explode("\n", $t, 2);
-	$caption = '';
-	// sauter la ligne de tete formee seulement de separateurs
-	if (substr_count($entete, $sep) == strlen($entete)) {
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si une seule colonne, en faire le titre
-	if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
-		$caption = "\n||" . $l[1] . '|';
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si premiere colonne vide, le raccourci doit quand meme produire <th...
-	if ($entete[0] == $sep) {
-		$entete = ' ' . $entete;
-	}
+    [$entete, $corps] = explode("\n", $t, 2);
+    $caption = '';
+    // sauter la ligne de tete formee seulement de separateurs
+    if (substr_count($entete, $sep) == strlen($entete)) {
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si une seule colonne, en faire le titre
+    if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
+        $caption = "\n||" . $l[1] . '|';
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si premiere colonne vide, le raccourci doit quand meme produire <th...
+    if ($entete[0] == $sep) {
+        $entete = ' ' . $entete;
+    }
 
-	$lignes = explode("\n", $corps);
+    $lignes = explode("\n", $corps);
 
-	// retrait des lignes vides finales
-	while (
-		count($lignes) > 0
-		and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
-	) {
-		unset($lignes[count($lignes) - 1]);
-	}
-	//  calcul du  nombre de colonne a chaque ligne
-	$nbcols = [];
-	$max = $mil = substr_count($entete, $sep);
-	foreach ($lignes as $k => $v) {
-		if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
-			if ($max > $nbcols[$k]) {
-				$mil = $nbcols[$k];
-			} else {
-				$mil = $max;
-				$max = $nbcols[$k];
-			}
-		}
-	}
-	// Si pas le meme nombre, cadrer au nombre max
-	if ($mil <> $max) {
-		foreach ($nbcols as $k => $v) {
-			if ($v < $max) {
-				$lignes[$k] .= str_repeat($sep, $max - $v);
-			}
-		}
-	}
-	// et retirer les colonnes integralement vides
-	while (true) {
-		$nbcols = ($entete[strlen($entete) - 1] === $sep);
-		foreach ($lignes as $v) {
-			$nbcols &= ($v[strlen($v) - 1] === $sep);
-		}
-		if (!$nbcols) {
-			break;
-		}
-		$entete = substr($entete, 0, -1);
-		foreach ($lignes as $k => $v) {
-			$lignes[$k] = substr($v, 0, -1);
-		}
-	}
+    // retrait des lignes vides finales
+    while (
+        count($lignes) > 0
+        and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
+    ) {
+        unset($lignes[count($lignes) - 1]);
+    }
+    //  calcul du  nombre de colonne a chaque ligne
+    $nbcols = [];
+    $max = $mil = substr_count($entete, $sep);
+    foreach ($lignes as $k => $v) {
+        if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
+            if ($max > $nbcols[$k]) {
+                $mil = $nbcols[$k];
+            } else {
+                $mil = $max;
+                $max = $nbcols[$k];
+            }
+        }
+    }
+    // Si pas le meme nombre, cadrer au nombre max
+    if ($mil <> $max) {
+        foreach ($nbcols as $k => $v) {
+            if ($v < $max) {
+                $lignes[$k] .= str_repeat($sep, $max - $v);
+            }
+        }
+    }
+    // et retirer les colonnes integralement vides
+    while (true) {
+        $nbcols = ($entete[strlen($entete) - 1] === $sep);
+        foreach ($lignes as $v) {
+            $nbcols &= ($v[strlen($v) - 1] === $sep);
+        }
+        if (!$nbcols) {
+            break;
+        }
+        $entete = substr($entete, 0, -1);
+        foreach ($lignes as $k => $v) {
+            $lignes[$k] = substr($v, 0, -1);
+        }
+    }
 
-	foreach ($lignes as &$l) {
-		$l = str_replace('&#34#', '"', $l);
-		$l = str_replace('``**``', "\n", $l);
-		$l = explode($sep, $l);
-	}
+    foreach ($lignes as &$l) {
+        $l = str_replace('&#34#', '"', $l);
+        $l = str_replace('``**``', "\n", $l);
+        $l = explode($sep, $l);
+    }
 
-	return [explode($sep, $entete), $lignes, $caption];
+    return [explode($sep, $entete), $lignes, $caption];
 }

ecrire/inc/puce_statut.php

Indentation +236 added lines, -236 removed lines

@@ -18,18 +18,18 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_ACTIVER_PUCE_RAPIDE')) {
-	/**
-	 * Activer le changement rapide de statut sur les listes d'objets ?
-	 *
-	 * Peut ralentir un site sur des listes très longues.
-	 *
-	 * @var bool
-	 **/
-	define('_ACTIVER_PUCE_RAPIDE', true);
+    /**
+     * Activer le changement rapide de statut sur les listes d'objets ?
+     *
+     * Peut ralentir un site sur des listes très longues.
+     *
+     * @var bool
+     **/
+    define('_ACTIVER_PUCE_RAPIDE', true);
 }
 
 /**
@@ -57,31 +57,31 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  */
 function inc_puce_statut_dist(
-	$id_objet,
-	$statut,
-	$id_parent,
-	$type,
-	$ajax = false,
-	$menu_rapide = _ACTIVER_PUCE_RAPIDE
+    $id_objet,
+    $statut,
+    $id_parent,
+    $type,
+    $ajax = false,
+    $menu_rapide = _ACTIVER_PUCE_RAPIDE
 ) {
-	static $f_puce_statut = [];
-	$type = objet_type($type);
-	// cas prioritaire : fonction perso, qui permet aussi de gerer les cas historiques
-	if (!isset($f_puce_statut[$type]) or is_null($f_puce_statut[$type])) {
-		$f_puce_statut[$type] = charger_fonction($type, 'puce_statut', true);
-	}
-	if ($f_puce_statut[$type]) {
-		return $f_puce_statut[$type]($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide);
-	}
-
-	// si statut_image trouve quelque chose (et '' est quelque chose)
-	// composer une puce, avec si possible changement rapide
-	elseif (!is_null($puce = puce_statut_changement_rapide($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide))) {
-		return $puce;
-	} // sinon fausse puce avec le type de l'image
-	else {
-		return http_img_pack("$type-16.png", '');
-	}
+    static $f_puce_statut = [];
+    $type = objet_type($type);
+    // cas prioritaire : fonction perso, qui permet aussi de gerer les cas historiques
+    if (!isset($f_puce_statut[$type]) or is_null($f_puce_statut[$type])) {
+        $f_puce_statut[$type] = charger_fonction($type, 'puce_statut', true);
+    }
+    if ($f_puce_statut[$type]) {
+        return $f_puce_statut[$type]($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide);
+    }
+
+    // si statut_image trouve quelque chose (et '' est quelque chose)
+    // composer une puce, avec si possible changement rapide
+    elseif (!is_null($puce = puce_statut_changement_rapide($id_objet, $statut, $id_parent, $type, $ajax, $menu_rapide))) {
+        return $puce;
+    } // sinon fausse puce avec le type de l'image
+    else {
+        return http_img_pack("$type-16.png", '');
+    }
 }
 
 /**
@@ -110,41 +110,41 @@ 
  *   null si pas capable de déterminer l'image
  */
 function statut_image($objet, $statut) {
-	$src = null;
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-	if (isset($desc['statut_images'])) {
-		// si une declaration statut_images
-		// mais rien pour le statut demande, ne rien afficher
-		$src = '';
-		if (isset($desc['statut_images'][$statut])) {
-			$src = $desc['statut_images'][$statut];
-		} // sinon image par defaut ?
-		elseif (isset($desc['statut_images'][0])) {
-			$src = $desc['statut_images'][0];
-		}
-	} else {
-		switch ($statut) {
-			case 'prepa':
-				$src = 'puce-preparer-xx.svg?12px';
-				break;
-			case 'prop':
-				$src = 'puce-proposer-xx.svg?12px';
-				break;
-			case 'publie':
-				$src = 'puce-publier-xx.svg?12px';
-				break;
-			case 'refuse':
-				$src = 'puce-refuser-xx.svg?12px';
-				break;
-			case 'poubelle':
-			case 'poub':
-				$src = 'puce-supprimer-xx.svg?12px';
-				break;
-		}
-	}
-
-	return $src;
+    $src = null;
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+    if (isset($desc['statut_images'])) {
+        // si une declaration statut_images
+        // mais rien pour le statut demande, ne rien afficher
+        $src = '';
+        if (isset($desc['statut_images'][$statut])) {
+            $src = $desc['statut_images'][$statut];
+        } // sinon image par defaut ?
+        elseif (isset($desc['statut_images'][0])) {
+            $src = $desc['statut_images'][0];
+        }
+    } else {
+        switch ($statut) {
+            case 'prepa':
+                $src = 'puce-preparer-xx.svg?12px';
+                break;
+            case 'prop':
+                $src = 'puce-proposer-xx.svg?12px';
+                break;
+            case 'publie':
+                $src = 'puce-publier-xx.svg?12px';
+                break;
+            case 'refuse':
+                $src = 'puce-refuser-xx.svg?12px';
+                break;
+            case 'poubelle':
+            case 'poub':
+                $src = 'puce-supprimer-xx.svg?12px';
+                break;
+        }
+    }
+
+    return $src;
 }
 
 /**
@@ -172,40 +172,40 @@ 
  * @return string
  */
 function statut_titre($objet, $statut) {
-	$titre = '';
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-	if (isset($desc['statut_titres'])) {
-		// si une declaration statut_titres
-		// mais rien pour le statut demande, ne rien afficher
-		if (isset($desc['statut_titres'][$statut])) {
-			$titre = $desc['statut_titres'][$statut];
-		} // sinon image par defaut ?
-		elseif (isset($desc['statut_titres'][0])) {
-			$titre = $desc['statut_titres'][0];
-		}
-	} else {
-		switch ($statut) {
-			case 'prepa':
-				$titre = 'texte_statut_en_cours_redaction';
-				break;
-			case 'prop':
-				$titre = 'texte_statut_propose_evaluation';
-				break;
-			case 'publie':
-				$titre = 'texte_statut_publie';
-				break;
-			case 'refuse':
-				$titre = 'texte_statut_refuse';
-				break;
-			case 'poubelle':
-			case 'poub':
-				$titre = 'texte_statut_poubelle';
-				break;
-		}
-	}
-
-	return $titre ? _T($titre) : '';
+    $titre = '';
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+    if (isset($desc['statut_titres'])) {
+        // si une declaration statut_titres
+        // mais rien pour le statut demande, ne rien afficher
+        if (isset($desc['statut_titres'][$statut])) {
+            $titre = $desc['statut_titres'][$statut];
+        } // sinon image par defaut ?
+        elseif (isset($desc['statut_titres'][0])) {
+            $titre = $desc['statut_titres'][0];
+        }
+    } else {
+        switch ($statut) {
+            case 'prepa':
+                $titre = 'texte_statut_en_cours_redaction';
+                break;
+            case 'prop':
+                $titre = 'texte_statut_propose_evaluation';
+                break;
+            case 'publie':
+                $titre = 'texte_statut_publie';
+                break;
+            case 'refuse':
+                $titre = 'texte_statut_refuse';
+                break;
+            case 'poubelle':
+            case 'poub':
+                $titre = 'texte_statut_poubelle';
+                break;
+        }
+    }
+
+    return $titre ? _T($titre) : '';
 }
 
 
@@ -225,37 +225,37 @@ 
  * @return string
  */
 function statut_texte_instituer($objet, $statut) {
-	$texte = '';
-	$table = table_objet_sql($objet);
-	$desc = lister_tables_objets_sql($table);
-	if (isset($desc['statut_textes_instituer'])) {
-		// si une declaration statut_titres
-		// mais rien pour le statut demande, ne rien afficher
-		if (isset($desc['statut_textes_instituer'][$statut])) {
-			$texte = $desc['statut_textes_instituer'][$statut];
-		}
-	} else {
-		switch ($statut) {
-			case 'prepa':
-				$texte = 'texte_statut_en_cours_redaction';
-				break;
-			case 'prop':
-				$texte = 'texte_statut_propose_evaluation';
-				break;
-			case 'publie':
-				$texte = 'texte_statut_publie';
-				break;
-			case 'refuse':
-				$texte = 'texte_statut_refuse';
-				break;
-			case 'poubelle':
-			case 'poub':
-				$texte = 'texte_statut_poubelle';
-				break;
-		}
-	}
-
-	return $texte ? _T($texte) : '';
+    $texte = '';
+    $table = table_objet_sql($objet);
+    $desc = lister_tables_objets_sql($table);
+    if (isset($desc['statut_textes_instituer'])) {
+        // si une declaration statut_titres
+        // mais rien pour le statut demande, ne rien afficher
+        if (isset($desc['statut_textes_instituer'][$statut])) {
+            $texte = $desc['statut_textes_instituer'][$statut];
+        }
+    } else {
+        switch ($statut) {
+            case 'prepa':
+                $texte = 'texte_statut_en_cours_redaction';
+                break;
+            case 'prop':
+                $texte = 'texte_statut_propose_evaluation';
+                break;
+            case 'publie':
+                $texte = 'texte_statut_publie';
+                break;
+            case 'refuse':
+                $texte = 'texte_statut_refuse';
+                break;
+            case 'poubelle':
+            case 'poub':
+                $texte = 'texte_statut_poubelle';
+                break;
+        }
+    }
+
+    return $texte ? _T($texte) : '';
 }
 
 
@@ -275,16 +275,16 @@ 
  * @return string
  */
 function puce_statut_auteur_dist($id, $statut, $id_parent, $type, $ajax = '', $menu_rapide = _ACTIVER_PUCE_RAPIDE) {
-	$img = statut_image('auteur', $statut);
-	if (!$img) {
-		return '';
-	}
-	$alt = statut_titre('auteur', $statut);
+    $img = statut_image('auteur', $statut);
+    if (!$img) {
+        return '';
+    }
+    $alt = statut_titre('auteur', $statut);
 
-	$fond = '';
-	$titre = '';
+    $fond = '';
+    $titre = '';
 
-	/*
+    /*
 	if ($type != 'auteur') {
 	  $img2 = chemin_image('del-16.png');
 	  $titre = _T('titre_image_redacteur');
@@ -294,12 +294,12 @@ 
 	}
 	*/
 
-	return http_img_pack($img, $alt, $fond, $alt);
+    return http_img_pack($img, $alt, $fond, $alt);
 }
 
 
 function puce_statut_rubrique_dist($id, $statut, $id_rubrique, $type, $ajax = '', $menu_rapide = _ACTIVER_PUCE_RAPIDE) {
-	return http_img_pack('rubrique-16.png', '');
+    return http_img_pack('rubrique-16.png', '');
 }
 
 /**
@@ -323,110 +323,110 @@ 
  *     Code HTML de l'image de puce de statut à insérer (et du menu de changement si présent)
  **/
 function puce_statut_changement_rapide(
-	$id,
-	$statut,
-	$id_rubrique,
-	$type = 'article',
-	$ajax = false,
-	$menu_rapide = _ACTIVER_PUCE_RAPIDE
+    $id,
+    $statut,
+    $id_rubrique,
+    $type = 'article',
+    $ajax = false,
+    $menu_rapide = _ACTIVER_PUCE_RAPIDE
 ) {
-	$src = statut_image($type, $statut);
-	if (!$src) {
-		return $src;
-	}
-
-	if (
-		!$id
-		or !_SPIP_AJAX
-		or !$menu_rapide
-	) {
-		$ajax_node = '';
-	} else {
-		$ajax_node = " class='imgstatut$type$id'";
-	}
-
-
-	$t = statut_titre($type, $statut);
-	$inser_puce = http_img_pack($src, $t, $ajax_node, $t);
-
-	if (!$ajax_node) {
-		return $inser_puce;
-	}
-
-	$table = table_objet_sql($type);
-	$desc = lister_tables_objets_sql($table);
-	if (!isset($desc['statut_textes_instituer'])) {
-		return $inser_puce;
-	}
-
-	if (!function_exists('autoriser')) {
-		include_spip('inc/autoriser');
-	}
-
-	// cas ou l'on a un parent connu (devrait disparaitre au profit du second cas plus generique)
-	if ($id_rubrique) {
-		if (!autoriser('publierdans', 'rubrique', $id_rubrique)) {
-			return $inser_puce;
-		}
-	} // si pas d'id_rubrique fourni, tester directement instituer type avec le statut publie
-	else {
-		if (!autoriser('instituer', $type, $id, null, ['statut' => 'publie'])) {
-			return $inser_puce;
-		}
-	}
-
-	$coord = array_flip(array_keys($desc['statut_textes_instituer']));
-	if (!isset($coord[$statut])) {
-		return $inser_puce;
-	}
-
-	$unit = 18/*widh de img*/ + 0/*padding*/
-	;
-	$margin = 0; /* marge a gauche + droite */
-	$zero = 0 /*border*/ + $margin / 2 + 0 /*padding*/
-	;
-	$clip = $zero + ($unit * $coord[$statut]);
-
-	if ($ajax) {
-		$width = $unit * (is_countable($desc['statut_textes_instituer']) ? count($desc['statut_textes_instituer']) : 0) + $margin;
-		$out = "<span class='puce_objet_fixe $type'>"
-			. $inser_puce
-			. '</span>'
-			. "<span class='puce_objet_popup $type statutdecal$type$id' style='width:{$width}px;margin-left:-{$clip}px;'>";
-		$i = 0;
-		foreach ($desc['statut_textes_instituer'] as $s => $t) {
-			$out .= afficher_script_statut($id, $type, -$zero - $i++ * $unit, statut_image($type, $s), $s, _T($t));
-		}
-		$out .= '</span>';
-
-		return $out;
-	} else {
-		$nom = 'puce_statut_';
-		$action = generer_url_ecrire('puce_statut', '', true);
-		$lang_dir = lang_dir(lang_typo());
-
-		return "<span class='puce_objet $type' id='$nom$type$id' dir='$lang_dir' data-puce-nom='$nom' data-puce-type='$type' data-puce-id='$id' data-puce-action='$action'>"
-		. $inser_puce
-		. '</span>';
-	}
+    $src = statut_image($type, $statut);
+    if (!$src) {
+        return $src;
+    }
+
+    if (
+        !$id
+        or !_SPIP_AJAX
+        or !$menu_rapide
+    ) {
+        $ajax_node = '';
+    } else {
+        $ajax_node = " class='imgstatut$type$id'";
+    }
+
+
+    $t = statut_titre($type, $statut);
+    $inser_puce = http_img_pack($src, $t, $ajax_node, $t);
+
+    if (!$ajax_node) {
+        return $inser_puce;
+    }
+
+    $table = table_objet_sql($type);
+    $desc = lister_tables_objets_sql($table);
+    if (!isset($desc['statut_textes_instituer'])) {
+        return $inser_puce;
+    }
+
+    if (!function_exists('autoriser')) {
+        include_spip('inc/autoriser');
+    }
+
+    // cas ou l'on a un parent connu (devrait disparaitre au profit du second cas plus generique)
+    if ($id_rubrique) {
+        if (!autoriser('publierdans', 'rubrique', $id_rubrique)) {
+            return $inser_puce;
+        }
+    } // si pas d'id_rubrique fourni, tester directement instituer type avec le statut publie
+    else {
+        if (!autoriser('instituer', $type, $id, null, ['statut' => 'publie'])) {
+            return $inser_puce;
+        }
+    }
+
+    $coord = array_flip(array_keys($desc['statut_textes_instituer']));
+    if (!isset($coord[$statut])) {
+        return $inser_puce;
+    }
+
+    $unit = 18/*widh de img*/ + 0/*padding*/
+    ;
+    $margin = 0; /* marge a gauche + droite */
+    $zero = 0 /*border*/ + $margin / 2 + 0 /*padding*/
+    ;
+    $clip = $zero + ($unit * $coord[$statut]);
+
+    if ($ajax) {
+        $width = $unit * (is_countable($desc['statut_textes_instituer']) ? count($desc['statut_textes_instituer']) : 0) + $margin;
+        $out = "<span class='puce_objet_fixe $type'>"
+            . $inser_puce
+            . '</span>'
+            . "<span class='puce_objet_popup $type statutdecal$type$id' style='width:{$width}px;margin-left:-{$clip}px;'>";
+        $i = 0;
+        foreach ($desc['statut_textes_instituer'] as $s => $t) {
+            $out .= afficher_script_statut($id, $type, -$zero - $i++ * $unit, statut_image($type, $s), $s, _T($t));
+        }
+        $out .= '</span>';
+
+        return $out;
+    } else {
+        $nom = 'puce_statut_';
+        $action = generer_url_ecrire('puce_statut', '', true);
+        $lang_dir = lang_dir(lang_typo());
+
+        return "<span class='puce_objet $type' id='$nom$type$id' dir='$lang_dir' data-puce-nom='$nom' data-puce-type='$type' data-puce-id='$id' data-puce-action='$action'>"
+        . $inser_puce
+        . '</span>';
+    }
 }
 
 
 function afficher_script_statut($id, $type, $n, $img, $statut, $titre, $act = '') {
-	$h = generer_action_auteur('instituer_objet', "$type-$id-$statut");
-	$t = supprimer_tags($titre);
+    $h = generer_action_auteur('instituer_objet', "$type-$id-$statut");
+    $t = supprimer_tags($titre);
 
-	return "<a href=\"#\" data-puce-id=\"$id\" data-puce-type=\"$type\" data-puce-decal=\"$n\" data-puce-action=\"$h\" title=\"$t\"$act>" . http_img_pack($img, $t) . '</a>';
+    return "<a href=\"#\" data-puce-id=\"$id\" data-puce-type=\"$type\" data-puce-decal=\"$n\" data-puce-action=\"$h\" title=\"$t\"$act>" . http_img_pack($img, $t) . '</a>';
 }
 
 // compat
 // La couleur du statut
 
 function puce_statut($statut, $atts = '') {
-	$src = statut_image('article', $statut);
-	if (!$src) {
-		return '';
-	}
+    $src = statut_image('article', $statut);
+    if (!$src) {
+        return '';
+    }
 
-	return http_img_pack($src, statut_titre('article', $statut), $atts);
+    return http_img_pack($src, statut_titre('article', $statut), $atts);
 }

ecrire/inc/securiser_action.php

Indentation +213 added lines, -213 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -50,19 +50,19 @@ 
  * @return array|string
  */
 function inc_securiser_action_dist($action = '', $arg = '', $redirect = '', $mode = false, $att = '', $public = false) {
-	if ($action) {
-		return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
-	} else {
-		$arg = _request('arg');
-		$hash = _request('hash');
-		$action = _request('action') ?: _request('formulaire_action');
-		if ($a = verifier_action_auteur("$action-$arg", $hash)) {
-			return $arg;
-		}
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	}
+    if ($action) {
+        return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
+    } else {
+        $arg = _request('arg');
+        $hash = _request('hash');
+        $action = _request('action') ?: _request('formulaire_action');
+        if ($a = verifier_action_auteur("$action-$arg", $hash)) {
+            return $arg;
+        }
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    }
 }
 
 /**
@@ -81,29 +81,29 @@ 
  */
 function demander_confirmation_avant_action($titre, $titre_bouton, $url_action = null) {
 
-	if (!$url_action) {
-		$url_action = self();
-		$action = _request('action');
-		$url_action = parametre_url($url_action, 'action', $action, '&');
-	}
-	else {
-		$action = parametre_url($url_action, 'action');
-	}
-
-	$arg = parametre_url($url_action, 'arg');
-	$confirm = md5("$action:$arg:" . realpath(__FILE__));
-	if (_request('confirm_action') === $confirm) {
-		return true;
-	}
-
-	$url_confirm = parametre_url($url_action, 'confirm_action', $confirm, '&');
-	include_spip('inc/filtres');
-	$bouton_action = bouton_action($titre_bouton, $url_confirm);
-	$corps = "<div style='text-align:center;'>$bouton_action</div>";
-
-	include_spip('inc/minipres');
-	echo minipres($titre, $corps);
-	exit;
+    if (!$url_action) {
+        $url_action = self();
+        $action = _request('action');
+        $url_action = parametre_url($url_action, 'action', $action, '&');
+    }
+    else {
+        $action = parametre_url($url_action, 'action');
+    }
+
+    $arg = parametre_url($url_action, 'arg');
+    $confirm = md5("$action:$arg:" . realpath(__FILE__));
+    if (_request('confirm_action') === $confirm) {
+        return true;
+    }
+
+    $url_confirm = parametre_url($url_action, 'confirm_action', $confirm, '&');
+    include_spip('inc/filtres');
+    $bouton_action = bouton_action($titre_bouton, $url_confirm);
+    $corps = "<div style='text-align:center;'>$bouton_action</div>";
+
+    include_spip('inc/minipres');
+    echo minipres($titre, $corps);
+    exit;
 }
 
 /**
@@ -135,34 +135,34 @@ 
  */
 function securiser_action_auteur($action, $arg, $redirect = '', $mode = false, $att = '', $public = false) {
 
-	// mode URL ou array
-	if (!is_string($mode)) {
-		$hash = calculer_action_auteur("$action-$arg", is_numeric($att) ? $att : null);
-
-		$r = rawurlencode($redirect);
-		if ($mode === -1) {
-			return ['action' => $action, 'arg' => $arg, 'hash' => $hash];
-		} else {
-			return generer_url_action(
-				$action,
-				'arg=' . rawurlencode($arg) . "&hash=$hash" . (!$r ? '' : "&redirect=$r"),
-				$mode,
-				$public
-			);
-		}
-	}
-
-	// mode formulaire
-	$hash = calculer_action_auteur("$action-$arg");
-	$att .= " style='margin: 0px; border: 0px'";
-	if ($redirect) {
-		$redirect = "\n\t\t<input name='redirect' type='hidden' value='" . str_replace("'", '&#39;', $redirect) . "' />";
-	}
-	$mode .= $redirect . "
+    // mode URL ou array
+    if (!is_string($mode)) {
+        $hash = calculer_action_auteur("$action-$arg", is_numeric($att) ? $att : null);
+
+        $r = rawurlencode($redirect);
+        if ($mode === -1) {
+            return ['action' => $action, 'arg' => $arg, 'hash' => $hash];
+        } else {
+            return generer_url_action(
+                $action,
+                'arg=' . rawurlencode($arg) . "&hash=$hash" . (!$r ? '' : "&redirect=$r"),
+                $mode,
+                $public
+            );
+        }
+    }
+
+    // mode formulaire
+    $hash = calculer_action_auteur("$action-$arg");
+    $att .= " style='margin: 0px; border: 0px'";
+    if ($redirect) {
+        $redirect = "\n\t\t<input name='redirect' type='hidden' value='" . str_replace("'", '&#39;', $redirect) . "' />";
+    }
+    $mode .= $redirect . "
 <input name='hash' type='hidden' value='$hash' />
 <input name='arg' type='hidden' value='$arg' />";
 
-	return generer_form_action($action, $mode, $att, $public);
+    return generer_form_action($action, $mode, $att, $public);
 }
 
 /**
@@ -172,48 +172,48 @@ 
  * @return array
  */
 function caracteriser_auteur($id_auteur = null) {
-	static $caracterisation = [];
-
-	if (is_null($id_auteur) and !isset($GLOBALS['visiteur_session']['id_auteur'])) {
-		// si l'auteur courant n'est pas connu alors qu'il peut demander une action
-		// c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
-		// S'il n'avait pas le droit de realiser cette action, le hash sera faux.
-		if (
-			isset($_COOKIE['spip_session'])
-			and (preg_match('/^(\d+)/', $_COOKIE['spip_session'], $r))
-		) {
-			return [$r[1], ''];
-			// Necessaire aux forums anonymes.
-			// Pour le reste, ca echouera.
-		} else {
-			return ['0', ''];
-		}
-	}
-	// Eviter l'acces SQL si le pass est connu de PHP
-	if (is_null($id_auteur)) {
-		$id_auteur = $GLOBALS['visiteur_session']['id_auteur'] ?? 0;
-		if (isset($GLOBALS['visiteur_session']['pass']) and $GLOBALS['visiteur_session']['pass']) {
-			return $caracterisation[$id_auteur] = [$id_auteur, $GLOBALS['visiteur_session']['pass']];
-		}
-	}
-
-	if (isset($caracterisation[$id_auteur])) {
-		return $caracterisation[$id_auteur];
-	}
-
-	if ($id_auteur) {
-		include_spip('base/abstract_sql');
-		$t = sql_fetsel('id_auteur, pass', 'spip_auteurs', "id_auteur=$id_auteur");
-		if ($t) {
-			return $caracterisation[$id_auteur] = [$t['id_auteur'], $t['pass']];
-		}
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	} // Visiteur anonyme, pour ls forums par exemple
-	else {
-		return ['0', ''];
-	}
+    static $caracterisation = [];
+
+    if (is_null($id_auteur) and !isset($GLOBALS['visiteur_session']['id_auteur'])) {
+        // si l'auteur courant n'est pas connu alors qu'il peut demander une action
+        // c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
+        // S'il n'avait pas le droit de realiser cette action, le hash sera faux.
+        if (
+            isset($_COOKIE['spip_session'])
+            and (preg_match('/^(\d+)/', $_COOKIE['spip_session'], $r))
+        ) {
+            return [$r[1], ''];
+            // Necessaire aux forums anonymes.
+            // Pour le reste, ca echouera.
+        } else {
+            return ['0', ''];
+        }
+    }
+    // Eviter l'acces SQL si le pass est connu de PHP
+    if (is_null($id_auteur)) {
+        $id_auteur = $GLOBALS['visiteur_session']['id_auteur'] ?? 0;
+        if (isset($GLOBALS['visiteur_session']['pass']) and $GLOBALS['visiteur_session']['pass']) {
+            return $caracterisation[$id_auteur] = [$id_auteur, $GLOBALS['visiteur_session']['pass']];
+        }
+    }
+
+    if (isset($caracterisation[$id_auteur])) {
+        return $caracterisation[$id_auteur];
+    }
+
+    if ($id_auteur) {
+        include_spip('base/abstract_sql');
+        $t = sql_fetsel('id_auteur, pass', 'spip_auteurs', "id_auteur=$id_auteur");
+        if ($t) {
+            return $caracterisation[$id_auteur] = [$t['id_auteur'], $t['pass']];
+        }
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    } // Visiteur anonyme, pour ls forums par exemple
+    else {
+        return ['0', ''];
+    }
 }
 
 /**
@@ -228,28 +228,28 @@ 
  * @return string
  */
 function _action_auteur($action, $id_auteur, $pass, $alea) {
-	static $sha = [];
-	if (!isset($sha[$id_auteur . $pass . $alea])) {
-		if (!isset($GLOBALS['meta'][$alea])) {
-			if (!$exec = _request('exec') or !autoriser_sans_cookie($exec)) {
-				include_spip('inc/acces');
-				charger_aleas();
-				if (empty($GLOBALS['meta'][$alea])) {
-					include_spip('inc/minipres');
-					echo minipres();
-					spip_log("$alea indisponible");
-					exit;
-				}
-			}
-		}
-		include_spip('auth/sha256.inc');
-		$sha[$id_auteur . $pass . $alea] = spip_sha256($id_auteur . $pass . @$GLOBALS['meta'][$alea]);
-	}
-	if (function_exists('sha1')) {
-		return sha1($action . $sha[$id_auteur . $pass . $alea]);
-	} else {
-		return md5($action . $sha[$id_auteur . $pass . $alea]);
-	}
+    static $sha = [];
+    if (!isset($sha[$id_auteur . $pass . $alea])) {
+        if (!isset($GLOBALS['meta'][$alea])) {
+            if (!$exec = _request('exec') or !autoriser_sans_cookie($exec)) {
+                include_spip('inc/acces');
+                charger_aleas();
+                if (empty($GLOBALS['meta'][$alea])) {
+                    include_spip('inc/minipres');
+                    echo minipres();
+                    spip_log("$alea indisponible");
+                    exit;
+                }
+            }
+        }
+        include_spip('auth/sha256.inc');
+        $sha[$id_auteur . $pass . $alea] = spip_sha256($id_auteur . $pass . @$GLOBALS['meta'][$alea]);
+    }
+    if (function_exists('sha1')) {
+        return sha1($action . $sha[$id_auteur . $pass . $alea]);
+    } else {
+        return md5($action . $sha[$id_auteur . $pass . $alea]);
+    }
 }
 
 /**
@@ -260,9 +260,9 @@ 
  * @return string
  */
 function calculer_action_auteur($action, $id_auteur = null) {
-	[$id_auteur, $pass] = caracteriser_auteur($id_auteur);
+    [$id_auteur, $pass] = caracteriser_auteur($id_auteur);
 
-	return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
+    return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
 }
 
 
@@ -275,15 +275,15 @@ 
  * @return bool
  */
 function verifier_action_auteur($action, $hash) {
-	[$id_auteur, $pass] = caracteriser_auteur();
-	if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere')) {
-		return true;
-	}
-	if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien')) {
-		return true;
-	}
-
-	return false;
+    [$id_auteur, $pass] = caracteriser_auteur();
+    if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere')) {
+        return true;
+    }
+    if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien')) {
+        return true;
+    }
+
+    return false;
 }
 
 //
@@ -299,29 +299,29 @@ 
  * @return string
  */
 function secret_du_site() {
-	if (!isset($GLOBALS['meta']['secret_du_site'])) {
-		include_spip('base/abstract_sql');
-		$GLOBALS['meta']['secret_du_site'] = sql_getfetsel('valeur', 'spip_meta', "nom='secret_du_site'");
-	}
-	if (
-		!isset($GLOBALS['meta']['secret_du_site'])
-		or (strlen($GLOBALS['meta']['secret_du_site']) < 64)
-	) {
-		include_spip('inc/acces');
-		include_spip('auth/sha256.inc');
-		ecrire_meta(
-			'secret_du_site',
-			spip_sha256(
-				$_SERVER['DOCUMENT_ROOT']
-				. ($_SERVER['SERVER_SIGNATURE'] ?? '')
-				. creer_uniqid()
-			),
-			'non'
-		);
-		lire_metas(); // au cas ou ecrire_meta() ne fonctionne pas
-	}
-
-	return $GLOBALS['meta']['secret_du_site'];
+    if (!isset($GLOBALS['meta']['secret_du_site'])) {
+        include_spip('base/abstract_sql');
+        $GLOBALS['meta']['secret_du_site'] = sql_getfetsel('valeur', 'spip_meta', "nom='secret_du_site'");
+    }
+    if (
+        !isset($GLOBALS['meta']['secret_du_site'])
+        or (strlen($GLOBALS['meta']['secret_du_site']) < 64)
+    ) {
+        include_spip('inc/acces');
+        include_spip('auth/sha256.inc');
+        ecrire_meta(
+            'secret_du_site',
+            spip_sha256(
+                $_SERVER['DOCUMENT_ROOT']
+                . ($_SERVER['SERVER_SIGNATURE'] ?? '')
+                . creer_uniqid()
+            ),
+            'non'
+        );
+        lire_metas(); // au cas ou ecrire_meta() ne fonctionne pas
+    }
+
+    return $GLOBALS['meta']['secret_du_site'];
 }
 
 /**
@@ -331,11 +331,11 @@ 
  * @return string
  */
 function calculer_cle_action($action) {
-	if (function_exists('sha1')) {
-		return sha1($action . secret_du_site());
-	} else {
-		return md5($action . secret_du_site());
-	}
+    if (function_exists('sha1')) {
+        return sha1($action . secret_du_site());
+    } else {
+        return md5($action . secret_du_site());
+    }
 }
 
 /**
@@ -346,7 +346,7 @@ 
  * @return bool
  */
 function verifier_cle_action($action, $cle) {
-	return ($cle == calculer_cle_action($action));
+    return ($cle == calculer_cle_action($action));
 }
 
 
@@ -363,19 +363,19 @@ 
  * @return string Token, de la forme "{id}*{hash}"
  */
 function calculer_token_previsu($url, $id_auteur = null, $alea = 'alea_ephemere') {
-	if (is_null($id_auteur)) {
-		if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
-			$id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
-		}
-	}
-	if (!$id_auteur = intval($id_auteur)) {
-		return '';
-	}
-	// On nettoie l’URL de tous les var_.
-	$url = nettoyer_uri_var($url);
-
-	$token = _action_auteur('previsualiser-' . $url, $id_auteur, null, $alea);
-	return "$id_auteur-$token";
+    if (is_null($id_auteur)) {
+        if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
+            $id_auteur = $GLOBALS['visiteur_session']['id_auteur'];
+        }
+    }
+    if (!$id_auteur = intval($id_auteur)) {
+        return '';
+    }
+    // On nettoie l’URL de tous les var_.
+    $url = nettoyer_uri_var($url);
+
+    $token = _action_auteur('previsualiser-' . $url, $id_auteur, null, $alea);
+    return "$id_auteur-$token";
 }
 
 
@@ -393,31 +393,31 @@ 
  *     + Tableau (id auteur, type d’objet, id_objet) sinon.
  */
 function verifier_token_previsu($token) {
-	// retrouver auteur / hash
-	$e = explode('-', $token, 2);
-	if (count($e) == 2 and is_numeric(reset($e))) {
-		$id_auteur = intval(reset($e));
-	} else {
-		return false;
-	}
-
-	// calculer le type et id de l’url actuelle
-	include_spip('inc/urls');
-	include_spip('inc/filtres_mini');
-	$url = url_absolue(self());
-
-	// verifier le token
-	$_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere');
-	if (!$_token or $token !== $_token) {
-		$_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere_ancien');
-		if (!$_token or $token !== $_token) {
-			return false;
-		}
-	}
-
-	return [
-		'id_auteur' => $id_auteur,
-	];
+    // retrouver auteur / hash
+    $e = explode('-', $token, 2);
+    if (count($e) == 2 and is_numeric(reset($e))) {
+        $id_auteur = intval(reset($e));
+    } else {
+        return false;
+    }
+
+    // calculer le type et id de l’url actuelle
+    include_spip('inc/urls');
+    include_spip('inc/filtres_mini');
+    $url = url_absolue(self());
+
+    // verifier le token
+    $_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere');
+    if (!$_token or $token !== $_token) {
+        $_token = calculer_token_previsu($url, $id_auteur, 'alea_ephemere_ancien');
+        if (!$_token or $token !== $_token) {
+            return false;
+        }
+    }
+
+    return [
+        'id_auteur' => $id_auteur,
+    ];
 }
 
 /**
@@ -426,13 +426,13 @@ 
  * @return bool|array
  */
 function decrire_token_previsu() {
-	static $desc = null;
-	if (is_null($desc)) {
-		if ($token = _request('var_previewtoken')) {
-			$desc = verifier_token_previsu($token);
-		} else {
-			$desc = false;
-		}
-	}
-	return $desc;
+    static $desc = null;
+    if (is_null($desc)) {
+        if ($token = _request('var_previewtoken')) {
+            $desc = verifier_token_previsu($token);
+        } else {
+            $desc = false;
+        }
+    }
+    return $desc;
 }

ecrire/inc/svg.php

Indentation +448 added lines, -448 removed lines

@@ -17,13 +17,13 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('IMG_SVG')) {
-	// complete 	IMG_BMP | IMG_GIF | IMG_JPG | IMG_PNG | IMG_WBMP | IMG_XPM | IMG_WEBP
-	define('IMG_SVG', 128);
-	define('IMAGETYPE_SVG', 19);
+    // complete 	IMG_BMP | IMG_GIF | IMG_JPG | IMG_PNG | IMG_WBMP | IMG_XPM | IMG_WEBP
+    define('IMG_SVG', 128);
+    define('IMAGETYPE_SVG', 19);
 }
 
 /**
@@ -39,39 +39,39 @@ 
  *   false si on a pas pu charger l'image
  */
 function svg_charger($fichier, $maxlen = null) {
-	if (strpos($fichier, 'data:image/svg+xml') === 0) {
-		$image = explode(';', $fichier, 2);
-		$image = end($image);
-		if (strpos($image, 'base64,') === 0) {
-			$image = base64_decode(substr($image, 7));
-		}
-		if (strpos($image, '<svg') !== false) {
-			return $image;
-		}
-		// encodage inconnu ou autre format d'image ?
-		return false;
-	}
-	// c'est peut etre deja une image svg ?
-	if (strpos($fichier, '<svg') !== false) {
-		return $fichier;
-	}
-	if (!file_exists($fichier)) {
-		$fichier  = supprimer_timestamp($fichier);
-		if (!file_exists($fichier)) {
-			return false;
-		}
-	}
-	if (is_null($maxlen)) {
-		$image = file_get_contents($fichier);
-	}
-	else {
-		$image = file_get_contents($fichier, false, null, 0, $maxlen);
-	}
-	// est-ce bien une image svg ?
-	if (strpos($image, '<svg') !== false) {
-		return $image;
-	}
-	return false;
+    if (strpos($fichier, 'data:image/svg+xml') === 0) {
+        $image = explode(';', $fichier, 2);
+        $image = end($image);
+        if (strpos($image, 'base64,') === 0) {
+            $image = base64_decode(substr($image, 7));
+        }
+        if (strpos($image, '<svg') !== false) {
+            return $image;
+        }
+        // encodage inconnu ou autre format d'image ?
+        return false;
+    }
+    // c'est peut etre deja une image svg ?
+    if (strpos($fichier, '<svg') !== false) {
+        return $fichier;
+    }
+    if (!file_exists($fichier)) {
+        $fichier  = supprimer_timestamp($fichier);
+        if (!file_exists($fichier)) {
+            return false;
+        }
+    }
+    if (is_null($maxlen)) {
+        $image = file_get_contents($fichier);
+    }
+    else {
+        $image = file_get_contents($fichier, false, null, 0, $maxlen);
+    }
+    // est-ce bien une image svg ?
+    if (strpos($image, '<svg') !== false) {
+        return $image;
+    }
+    return false;
 }
 
 /**
@@ -80,28 +80,28 @@ 
  * @return array|bool
  */
 function svg_lire_balise_svg($fichier) {
-	if (!$debut_fichier = svg_charger($fichier, 4096)) {
-		return false;
-	}
-
-	if (($ps = stripos($debut_fichier, '<svg')) !== false) {
-		$pe = stripos($debut_fichier, '>', $ps);
-		$balise_svg = substr($debut_fichier, $ps, $pe - $ps + 1);
-
-		if (preg_match_all(',([\w:\-]+)=,Uims', $balise_svg, $matches)) {
-			if (!function_exists('extraire_attribut')) {
-				include_spip('inc/filtres');
-			}
-			$attributs = [];
-			foreach ($matches[1] as $att) {
-				$attributs[$att] = extraire_attribut($balise_svg, $att);
-			}
-
-			return [$balise_svg, $attributs];
-		}
-	}
-
-	return false;
+    if (!$debut_fichier = svg_charger($fichier, 4096)) {
+        return false;
+    }
+
+    if (($ps = stripos($debut_fichier, '<svg')) !== false) {
+        $pe = stripos($debut_fichier, '>', $ps);
+        $balise_svg = substr($debut_fichier, $ps, $pe - $ps + 1);
+
+        if (preg_match_all(',([\w:\-]+)=,Uims', $balise_svg, $matches)) {
+            if (!function_exists('extraire_attribut')) {
+                include_spip('inc/filtres');
+            }
+            $attributs = [];
+            foreach ($matches[1] as $att) {
+                $attributs[$att] = extraire_attribut($balise_svg, $att);
+            }
+
+            return [$balise_svg, $attributs];
+        }
+    }
+
+    return false;
 }
 
 /**
@@ -111,12 +111,12 @@ 
  */
 function svg_lire_attributs($img) {
 
-	if ($svg_infos = svg_lire_balise_svg($img)) {
-		[$balise_svg, $attributs] = $svg_infos;
-		return $attributs;
-	}
+    if ($svg_infos = svg_lire_balise_svg($img)) {
+        [$balise_svg, $attributs] = $svg_infos;
+        return $attributs;
+    }
 
-	return false;
+    return false;
 }
 
 /**
@@ -126,38 +126,38 @@ 
  * @return bool|float|int
  */
 function svg_dimension_to_pixels($dimension, $precision = 2) {
-	if (preg_match(',^(-?\d+(\.\d+)?)([^\d]*),i', trim($dimension), $m)) {
-		switch (strtolower($m[2])) {
-			case '%':
-				// on ne sait pas faire :(
-				return false;
-				break;
-			case 'em':
-				return round($m[1] * 16, $precision); // 16px font-size par defaut
-				break;
-			case 'ex':
-				return round($m[1] * 16, $precision); // 16px font-size par defaut
-				break;
-			case 'pc':
-				return round($m[1] * 16, $precision); // 1/6 inch = 96px/6 in CSS
-				break;
-			case 'cm':
-				return round($m[1] * 96 / 2.54, $precision); // 96px / 2.54cm;
-				break;
-			case 'mm':
-				return round($m[1] * 96 / 25.4, $precision); // 96px / 25.4mm;
-				break;
-			case 'in':
-				return round($m[1] * 96, $precision); // 1 inch = 96px in CSS
-				break;
-			case 'px':
-			case 'pt':
-			default:
-				return $m[1];
-				break;
-		}
-	}
-	return false;
+    if (preg_match(',^(-?\d+(\.\d+)?)([^\d]*),i', trim($dimension), $m)) {
+        switch (strtolower($m[2])) {
+            case '%':
+                // on ne sait pas faire :(
+                return false;
+                break;
+            case 'em':
+                return round($m[1] * 16, $precision); // 16px font-size par defaut
+                break;
+            case 'ex':
+                return round($m[1] * 16, $precision); // 16px font-size par defaut
+                break;
+            case 'pc':
+                return round($m[1] * 16, $precision); // 1/6 inch = 96px/6 in CSS
+                break;
+            case 'cm':
+                return round($m[1] * 96 / 2.54, $precision); // 96px / 2.54cm;
+                break;
+            case 'mm':
+                return round($m[1] * 96 / 25.4, $precision); // 96px / 25.4mm;
+                break;
+            case 'in':
+                return round($m[1] * 96, $precision); // 1 inch = 96px in CSS
+                break;
+            case 'px':
+            case 'pt':
+            default:
+                return $m[1];
+                break;
+        }
+    }
+    return false;
 }
 
 /**
@@ -168,15 +168,15 @@ 
  * @return string
  */
 function svg_change_balise_svg($svg, $old_balise_svg, $attributs) {
-	$new_balise_svg = '<svg';
-	foreach ($attributs as $k => $v) {
-		$new_balise_svg .= " $k=\"" . entites_html($v) . '"';
-	}
-	$new_balise_svg .= '>';
-
-	$p = strpos($svg, $old_balise_svg);
-	$svg = substr_replace($svg, $new_balise_svg, $p, strlen($old_balise_svg));
-	return $svg;
+    $new_balise_svg = '<svg';
+    foreach ($attributs as $k => $v) {
+        $new_balise_svg .= " $k=\"" . entites_html($v) . '"';
+    }
+    $new_balise_svg .= '>';
+
+    $p = strpos($svg, $old_balise_svg);
+    $svg = substr_replace($svg, $new_balise_svg, $p, strlen($old_balise_svg));
+    return $svg;
 }
 
 /**
@@ -188,15 +188,15 @@ 
  */
 function svg_insert_shapes($svg, $shapes, $start = true) {
 
-	if ($start === false or $start === 'end') {
-		$svg = str_replace('</svg>', $shapes . '</svg>', $svg);
-	}
-	else {
-		$p = stripos($svg, '<svg');
-		$p = strpos($svg, '>', $p);
-		$svg = substr_replace($svg, $shapes, $p + 1, 0);
-	}
-	return $svg;
+    if ($start === false or $start === 'end') {
+        $svg = str_replace('</svg>', $shapes . '</svg>', $svg);
+    }
+    else {
+        $p = stripos($svg, '<svg');
+        $p = strpos($svg, '>', $p);
+        $svg = substr_replace($svg, $shapes, $p + 1, 0);
+    }
+    return $svg;
 }
 
 /**
@@ -209,13 +209,13 @@ 
  * @return string
  */
 function svg_clip_in_box($svg, $x, $y, $width, $height) {
-	$rect = "<rect x=\"$x\" y=\"$y\" width=\"$width\" height=\"$height\" />";
-	$id = 'clip-' . substr(md5($rect . strlen($svg)), 0, 8);
-	$clippath = "<clipPath id=\"$id\">$rect</clipPath>";
-	$g = "<g clip-path=\"url(#$id)\">";
-	$svg = svg_insert_shapes($svg, $clippath . $g);
-	$svg = svg_insert_shapes($svg, '</g>', false);
-	return $svg;
+    $rect = "<rect x=\"$x\" y=\"$y\" width=\"$width\" height=\"$height\" />";
+    $id = 'clip-' . substr(md5($rect . strlen($svg)), 0, 8);
+    $clippath = "<clipPath id=\"$id\">$rect</clipPath>";
+    $g = "<g clip-path=\"url(#$id)\">";
+    $svg = svg_insert_shapes($svg, $clippath . $g);
+    $svg = svg_insert_shapes($svg, '</g>', false);
+    return $svg;
 }
 
 /**
@@ -226,22 +226,22 @@ 
  * @return bool|string
  */
 function svg_redimensionner($img, $new_width, $new_height) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $attributs] = $svg_infos;
-		if (!isset($attributs['viewBox'])) {
-			$attributs['viewBox'] = '0 0 ' . $attributs['width'] . ' ' . $attributs['height'];
-		}
-		$attributs['width'] = strval($new_width);
-		$attributs['height'] = strval($new_height);
-
-		$svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
-		return $svg;
-	}
-
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $attributs] = $svg_infos;
+        if (!isset($attributs['viewBox'])) {
+            $attributs['viewBox'] = '0 0 ' . $attributs['width'] . ' ' . $attributs['height'];
+        }
+        $attributs['width'] = strval($new_width);
+        $attributs['height'] = strval($new_height);
+
+        $svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
+        return $svg;
+    }
+
+    return $img;
 }
 
 /**
@@ -250,15 +250,15 @@ 
  * @return string
  */
 function svg_couleur_to_hexa($couleur) {
-	if (strpos($couleur, 'rgb(') === 0) {
-		$c = explode(',', substr($couleur, 4));
-		$couleur = _couleur_dec_to_hex(intval($c[0]), intval($c[1]), intval($c[2]));
-	}
-	else {
-		$couleur = couleur_html_to_hex($couleur);
-	}
-	$couleur = '#' . ltrim($couleur, '#');
-	return $couleur;
+    if (strpos($couleur, 'rgb(') === 0) {
+        $c = explode(',', substr($couleur, 4));
+        $couleur = _couleur_dec_to_hex(intval($c[0]), intval($c[1]), intval($c[2]));
+    }
+    else {
+        $couleur = couleur_html_to_hex($couleur);
+    }
+    $couleur = '#' . ltrim($couleur, '#');
+    return $couleur;
 }
 
 /**
@@ -267,11 +267,11 @@ 
  * @return array
  */
 function svg_couleur_to_rgb($couleur) {
-	if (strpos($couleur, 'rgb(') === 0) {
-		$c = explode(',', substr($couleur, 4));
-		return ['red' => intval($c[0]),'green' => intval($c[1]),'blue' => intval($c[2])];
-	}
-	return _couleur_hex_to_dec($couleur);
+    if (strpos($couleur, 'rgb(') === 0) {
+        $c = explode(',', substr($couleur, 4));
+        return ['red' => intval($c[0]),'green' => intval($c[1]),'blue' => intval($c[2])];
+    }
+    return _couleur_hex_to_dec($couleur);
 }
 
 
@@ -281,70 +281,70 @@ 
  * @return array
  */
 function svg_getimagesize_from_attr($attributs) {
-	$width = 350; // default width
-	$height = 150; // default height
-
-	$viewBox = "0 0 $width $height";
-	if (isset($attributs['viewBox'])) {
-		$viewBox = $attributs['viewBox'];
-		$viewBox = preg_replace(',\s+,', ' ', $viewBox);
-	}
-	// et on la convertit en px
-	$viewBox = explode(' ', $viewBox);
-	$viewBox = array_map('svg_dimension_to_pixels', $viewBox);
-	if (!$viewBox[2]) {
-		$viewBox[2] = $width;
-	}
-	if (!$viewBox[3]) {
-		$viewBox[3] = $height;
-	}
-
-	$coeff = 1;
-	if (
-		isset($attributs['width'])
-		and $w = svg_dimension_to_pixels($attributs['width'])
-	) {
-		$width = $w;
-	}
-	else {
-		// si on recupere la taille de la viewbox mais si la viewbox est petite on met un multiplicateur pour la taille finale
-		$width = $viewBox[2];
-		if ($width < 1) {
-			$coeff = max($coeff, 1000);
-		}
-		elseif ($width < 10) {
-			$coeff = max($coeff, 100);
-		}
-		elseif ($width < 100) {
-			$coeff = max($coeff, 10);
-		}
-	}
-	if (
-		isset($attributs['height'])
-		and $h = svg_dimension_to_pixels($attributs['height'])
-	) {
-		$height = $h;
-	}
-	else {
-		$height = $viewBox[3];
-		if ($height < 1) {
-			$coeff = max($coeff, 1000);
-		}
-		elseif ($height < 10) {
-			$coeff = max($coeff, 100);
-		}
-		elseif ($height < 100) {
-			$coeff = max($coeff, 10);
-		}
-	}
-
-	// arrondir le width et height en pixel in fine
-	$width = round($coeff * $width);
-	$height = round($coeff * $height);
-
-	$viewBox = implode(' ', $viewBox);
-
-	return [$width, $height, $viewBox];
+    $width = 350; // default width
+    $height = 150; // default height
+
+    $viewBox = "0 0 $width $height";
+    if (isset($attributs['viewBox'])) {
+        $viewBox = $attributs['viewBox'];
+        $viewBox = preg_replace(',\s+,', ' ', $viewBox);
+    }
+    // et on la convertit en px
+    $viewBox = explode(' ', $viewBox);
+    $viewBox = array_map('svg_dimension_to_pixels', $viewBox);
+    if (!$viewBox[2]) {
+        $viewBox[2] = $width;
+    }
+    if (!$viewBox[3]) {
+        $viewBox[3] = $height;
+    }
+
+    $coeff = 1;
+    if (
+        isset($attributs['width'])
+        and $w = svg_dimension_to_pixels($attributs['width'])
+    ) {
+        $width = $w;
+    }
+    else {
+        // si on recupere la taille de la viewbox mais si la viewbox est petite on met un multiplicateur pour la taille finale
+        $width = $viewBox[2];
+        if ($width < 1) {
+            $coeff = max($coeff, 1000);
+        }
+        elseif ($width < 10) {
+            $coeff = max($coeff, 100);
+        }
+        elseif ($width < 100) {
+            $coeff = max($coeff, 10);
+        }
+    }
+    if (
+        isset($attributs['height'])
+        and $h = svg_dimension_to_pixels($attributs['height'])
+    ) {
+        $height = $h;
+    }
+    else {
+        $height = $viewBox[3];
+        if ($height < 1) {
+            $coeff = max($coeff, 1000);
+        }
+        elseif ($height < 10) {
+            $coeff = max($coeff, 100);
+        }
+        elseif ($height < 100) {
+            $coeff = max($coeff, 10);
+        }
+    }
+
+    // arrondir le width et height en pixel in fine
+    $width = round($coeff * $width);
+    $height = round($coeff * $height);
+
+    $viewBox = implode(' ', $viewBox);
+
+    return [$width, $height, $viewBox];
 }
 
 /**
@@ -360,25 +360,25 @@ 
  * @return string
  */
 function svg_force_viewBox_px($img, $force_width_and_height = false) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $attributs] = $svg_infos;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $attributs] = $svg_infos;
 
-		[$width, $height, $viewBox] = svg_getimagesize_from_attr($attributs);
+        [$width, $height, $viewBox] = svg_getimagesize_from_attr($attributs);
 
-		if ($force_width_and_height) {
-			$attributs['width'] = $width;
-			$attributs['height'] = $height;
-		}
+        if ($force_width_and_height) {
+            $attributs['width'] = $width;
+            $attributs['height'] = $height;
+        }
 
-		$attributs['viewBox'] = $viewBox;
+        $attributs['viewBox'] = $viewBox;
 
-		$svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
-		return $svg;
-	}
-	return $img;
+        $svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -387,12 +387,12 @@ 
  * @return array|mixed
  */
 function svg_extract_couleurs($img) {
-	if ($svg = svg_charger($img)) {
-		if (preg_match_all('/(#[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f])|(rgb\([\s\d]+,[\s\d]+,[\s\d]+\))|(#[0-9a-f][0-9a-f][0-9a-f])/imS', $svg, $matches)) {
-			return $matches[0];
-		}
-	}
-	return [];
+    if ($svg = svg_charger($img)) {
+        if (preg_match_all('/(#[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f])|(rgb\([\s\d]+,[\s\d]+,[\s\d]+\))|(#[0-9a-f][0-9a-f][0-9a-f])/imS', $svg, $matches)) {
+            return $matches[0];
+        }
+    }
+    return [];
 }
 
 /**
@@ -403,58 +403,58 @@ 
  * @return bool|string
  */
 function svg_recadrer($img, $new_width, $new_height, $offset_width, $offset_height, $background_color = '') {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $attributs] = $svg_infos;
-		$viewBox = explode(' ', $attributs['viewBox']);
-
-		$viewport_w = $new_width;
-		$viewport_h = $new_height;
-		$viewport_ox = $offset_width;
-		$viewport_oy = $offset_height;
-
-		// si on a un width/height qui rescale, il faut rescaler
-		if (
-			isset($attributs['width'])
-			and $w = svg_dimension_to_pixels($attributs['width'])
-			and isset($attributs['height'])
-			and $h = svg_dimension_to_pixels($attributs['height'])
-		) {
-			$xscale = $viewBox[2] / $w;
-			$viewport_w = round($viewport_w * $xscale, 2);
-			$viewport_ox = round($viewport_ox * $xscale, 2);
-			$yscale = $viewBox[3] / $h;
-			$viewport_h = round($viewport_h * $yscale, 2);
-			$viewport_oy = round($viewport_oy * $yscale, 2);
-		}
-
-		if ($viewport_w > $viewBox[2] or $viewport_h > $viewBox[3]) {
-			$svg = svg_clip_in_box($svg, $viewBox[0], $viewBox[1], $viewBox[2], $viewBox[3]);
-		}
-
-		// maintenant on redefinit la viewBox
-		$viewBox[0] += $viewport_ox;
-		$viewBox[1] += $viewport_oy;
-		$viewBox[2] = $viewport_w;
-		$viewBox[3] = $viewport_h;
-
-		$attributs['viewBox'] = implode(' ', $viewBox);
-		$attributs['width'] = strval($new_width);
-		$attributs['height'] = strval($new_height);
-
-		$svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
-
-		// ajouter un background
-		if ($background_color and $background_color !== 'transparent') {
-			$svg = svg_ajouter_background($svg, $background_color);
-		}
-
-		return $svg;
-	}
-
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $attributs] = $svg_infos;
+        $viewBox = explode(' ', $attributs['viewBox']);
+
+        $viewport_w = $new_width;
+        $viewport_h = $new_height;
+        $viewport_ox = $offset_width;
+        $viewport_oy = $offset_height;
+
+        // si on a un width/height qui rescale, il faut rescaler
+        if (
+            isset($attributs['width'])
+            and $w = svg_dimension_to_pixels($attributs['width'])
+            and isset($attributs['height'])
+            and $h = svg_dimension_to_pixels($attributs['height'])
+        ) {
+            $xscale = $viewBox[2] / $w;
+            $viewport_w = round($viewport_w * $xscale, 2);
+            $viewport_ox = round($viewport_ox * $xscale, 2);
+            $yscale = $viewBox[3] / $h;
+            $viewport_h = round($viewport_h * $yscale, 2);
+            $viewport_oy = round($viewport_oy * $yscale, 2);
+        }
+
+        if ($viewport_w > $viewBox[2] or $viewport_h > $viewBox[3]) {
+            $svg = svg_clip_in_box($svg, $viewBox[0], $viewBox[1], $viewBox[2], $viewBox[3]);
+        }
+
+        // maintenant on redefinit la viewBox
+        $viewBox[0] += $viewport_ox;
+        $viewBox[1] += $viewport_oy;
+        $viewBox[2] = $viewport_w;
+        $viewBox[3] = $viewport_h;
+
+        $attributs['viewBox'] = implode(' ', $viewBox);
+        $attributs['width'] = strval($new_width);
+        $attributs['height'] = strval($new_height);
+
+        $svg = svg_change_balise_svg($svg, $balise_svg, $attributs);
+
+        // ajouter un background
+        if ($background_color and $background_color !== 'transparent') {
+            $svg = svg_ajouter_background($svg, $background_color);
+        }
+
+        return $svg;
+    }
+
+    return $img;
 }
 
 /**
@@ -464,26 +464,26 @@ 
  * @return bool|string
  */
 function svg_ajouter_background($img, $background_color) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($background_color and $background_color !== 'transparent') {
-			[$balise_svg, $attributs] = $svg_infos;
-
-			$background_color = svg_couleur_to_hexa($background_color);
-			if (isset($attributs['viewBox'])) {
-				$viewBox = explode(' ', $attributs['viewBox']);
-				$rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\"/>";
-			}
-			else {
-				$rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
-			}
-			$svg = svg_insert_shapes($svg, $rect);
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($background_color and $background_color !== 'transparent') {
+            [$balise_svg, $attributs] = $svg_infos;
+
+            $background_color = svg_couleur_to_hexa($background_color);
+            if (isset($attributs['viewBox'])) {
+                $viewBox = explode(' ', $attributs['viewBox']);
+                $rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\"/>";
+            }
+            else {
+                $rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
+            }
+            $svg = svg_insert_shapes($svg, $rect);
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 
@@ -494,26 +494,26 @@ 
  * @return bool|string
  */
 function svg_ajouter_voile($img, $background_color, $opacity) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($background_color and $background_color !== 'transparent') {
-			[$balise_svg, $attributs] = $svg_infos;
-
-			$background_color = svg_couleur_to_hexa($background_color);
-			if (isset($attributs['viewBox'])) {
-				$viewBox = explode(' ', $attributs['viewBox']);
-				$rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\" opacity=\"$opacity\"/>";
-			}
-			else {
-				$rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
-			}
-			$svg = svg_insert_shapes($svg, $rect, false);
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($background_color and $background_color !== 'transparent') {
+            [$balise_svg, $attributs] = $svg_infos;
+
+            $background_color = svg_couleur_to_hexa($background_color);
+            if (isset($attributs['viewBox'])) {
+                $viewBox = explode(' ', $attributs['viewBox']);
+                $rect = '<rect x="' . $viewBox[0] . '" y="' . $viewBox[1] . '" width="' . $viewBox[2] . '" height="' . $viewBox[3] . "\" fill=\"$background_color\" opacity=\"$opacity\"/>";
+            }
+            else {
+                $rect = "<rect width=\"100%\" height=\"100%\" fill=\"$background_color\"/>";
+            }
+            $svg = svg_insert_shapes($svg, $rect, false);
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 
@@ -524,27 +524,27 @@ 
  * @return bool|string
  */
 function svg_transformer($img, $attributs) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($attributs) {
-			[$balise_svg, ] = $svg_infos;
-			$g = '<g';
-			foreach ($attributs as $k => $v) {
-				if (strlen($v)) {
-					$g .= " $k=\"" . attribut_html($v) . '"';
-				}
-			}
-			if (strlen($g) > 2) {
-				$g .= '>';
-				$svg = svg_insert_shapes($svg, $g);
-				$svg = svg_insert_shapes($svg, '</g>', false);
-			}
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($attributs) {
+            [$balise_svg, ] = $svg_infos;
+            $g = '<g';
+            foreach ($attributs as $k => $v) {
+                if (strlen($v)) {
+                    $g .= " $k=\"" . attribut_html($v) . '"';
+                }
+            }
+            if (strlen($g) > 2) {
+                $g .= '>';
+                $svg = svg_insert_shapes($svg, $g);
+                $svg = svg_insert_shapes($svg, '</g>', false);
+            }
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -555,21 +555,21 @@ 
  * @return bool|string
  */
 function svg_apply_filter($img, $filter_def) {
-	if (
-		$svg = svg_charger($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		if ($filter_def) {
-			[$balise_svg, ] = $svg_infos;
-			$filter_id = 'filter-' . substr(md5($filter_def . strlen($svg)), 0, 8);
-			$filter = "<defs><filter id=\"$filter_id\">$filter_def</filter></defs>";
-			$g = "<g filter=\"url(#$filter_id)\">";
-			$svg = svg_insert_shapes($svg, $filter . $g);
-			$svg = svg_insert_shapes($svg, '</g>', false);
-		}
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_charger($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        if ($filter_def) {
+            [$balise_svg, ] = $svg_infos;
+            $filter_id = 'filter-' . substr(md5($filter_def . strlen($svg)), 0, 8);
+            $filter = "<defs><filter id=\"$filter_id\">$filter_def</filter></defs>";
+            $g = "<g filter=\"url(#$filter_id)\">";
+            $svg = svg_insert_shapes($svg, $filter . $g);
+            $svg = svg_insert_shapes($svg, '</g>', false);
+        }
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -579,8 +579,8 @@ 
  * @return string
  */
 function svg_filter_blur($img, $blur_width) {
-	$blur_width = intval($blur_width);
-	return svg_apply_filter($img, "<feGaussianBlur stdDeviation=\"$blur_width\"/>");
+    $blur_width = intval($blur_width);
+    return svg_apply_filter($img, "<feGaussianBlur stdDeviation=\"$blur_width\"/>");
 }
 
 /**
@@ -590,10 +590,10 @@ 
  * @return bool|string
  */
 function svg_filter_grayscale($img, $intensity) {
-	$value = round(1.0 - $intensity, 2);
-	//$filter = "<feColorMatrix type=\"matrix\" values=\"0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0 0 0 1 0\"/>";
-	$filter = "<feColorMatrix type=\"saturate\" values=\"$value\"/>";
-	return svg_apply_filter($img, $filter);
+    $value = round(1.0 - $intensity, 2);
+    //$filter = "<feColorMatrix type=\"matrix\" values=\"0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0.3333 0.3333 0.3333 0 0 0 0 0 1 0\"/>";
+    $filter = "<feColorMatrix type=\"saturate\" values=\"$value\"/>";
+    return svg_apply_filter($img, $filter);
 }
 
 /**
@@ -603,8 +603,8 @@ 
  * @return bool|string
  */
 function svg_filter_sepia($img, $intensity) {
-	$filter = '<feColorMatrix type="matrix" values="0.30 0.30 0.30 0.0 0 0.25 0.25 0.25 0.0 0 0.20 0.20 0.20 0.0 0 0.00 0.00 0.00 1 0"/>';
-	return svg_apply_filter($img, $filter);
+    $filter = '<feColorMatrix type="matrix" values="0.30 0.30 0.30 0.0 0 0.25 0.25 0.25 0.0 0 0.20 0.20 0.20 0.0 0 0.00 0.00 0.00 1 0"/>';
+    return svg_apply_filter($img, $filter);
 }
 
 /**
@@ -614,31 +614,31 @@ 
  * @return bool|string
  */
 function svg_flip($img, $HorV) {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $atts] = $svg_infos;
-		$viewBox = explode(' ', $atts['viewBox']);
-
-		if (!in_array($HorV, ['h', 'H'])) {
-			$transform = 'scale(-1,1)';
-
-			$x = intval($viewBox[0]) + intval($viewBox[2] / 2);
-			$mx = -$x;
-			$transform = "translate($x, 0) $transform translate($mx, 0)";
-		}
-		else {
-			$transform = 'scale(1,-1)';
-
-			$y = intval($viewBox[1]) + intval($viewBox[3] / 2);
-			$my = -$y;
-			$transform = "translate(0, $y) $transform translate(0, $my)";
-		}
-		$svg = svg_transformer($svg, ['transform' => $transform]);
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $atts] = $svg_infos;
+        $viewBox = explode(' ', $atts['viewBox']);
+
+        if (!in_array($HorV, ['h', 'H'])) {
+            $transform = 'scale(-1,1)';
+
+            $x = intval($viewBox[0]) + intval($viewBox[2] / 2);
+            $mx = -$x;
+            $transform = "translate($x, 0) $transform translate($mx, 0)";
+        }
+        else {
+            $transform = 'scale(1,-1)';
+
+            $y = intval($viewBox[1]) + intval($viewBox[3] / 2);
+            $my = -$y;
+            $transform = "translate(0, $y) $transform translate(0, $my)";
+        }
+        $svg = svg_transformer($svg, ['transform' => $transform]);
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -652,20 +652,20 @@ 
  * @return bool|string
  */
 function svg_rotate($img, $angle, $center_x, $center_y) {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $svg_infos = svg_lire_balise_svg($svg)
-	) {
-		[$balise_svg, $atts] = $svg_infos;
-		$viewBox = explode(' ', $atts['viewBox']);
-
-		$center_x = round($viewBox[0] + $center_x * $viewBox[2]);
-		$center_y = round($viewBox[1] + $center_y * $viewBox[3]);
-		$svg = svg_transformer($svg, ['transform' => "rotate($angle $center_x $center_y)"]);
-
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $svg_infos = svg_lire_balise_svg($svg)
+    ) {
+        [$balise_svg, $atts] = $svg_infos;
+        $viewBox = explode(' ', $atts['viewBox']);
+
+        $center_x = round($viewBox[0] + $center_x * $viewBox[2]);
+        $center_y = round($viewBox[1] + $center_y * $viewBox[3]);
+        $svg = svg_transformer($svg, ['transform' => "rotate($angle $center_x $center_y)"]);
+
+        return $svg;
+    }
+    return $img;
 }
 
 /**
@@ -677,41 +677,41 @@ 
  * @return bool|mixed|string
  */
 function svg_filtrer_couleurs($img, $callback_filter) {
-	if (
-		$svg = svg_force_viewBox_px($img)
-		and $colors = svg_extract_couleurs($svg)
-	) {
-		$colors = array_unique($colors);
-
-		$short = [];
-		$long = [];
-		while (count($colors)) {
-			$c = array_shift($colors);
-			if (strlen($c) == 4) {
-				$short[] = $c;
-			}
-			else {
-				$long[] = $c;
-			}
-		}
-
-		$colors = [...$long, ...$short];
-		$new_colors = [];
-		$colors = array_flip($colors);
-		foreach ($colors as $c => $k) {
-			$colors[$c] = "@@@COLOR$$k$@@@";
-		}
-
-
-		foreach ($colors as $original => $replace) {
-			$new = svg_couleur_to_hexa($original);
-			$new_colors[$replace] = $callback_filter($new);
-		}
-
-		$svg = str_replace(array_keys($colors), array_values($colors), $svg);
-		$svg = str_replace(array_keys($new_colors), array_values($new_colors), $svg);
-
-		return $svg;
-	}
-	return $img;
+    if (
+        $svg = svg_force_viewBox_px($img)
+        and $colors = svg_extract_couleurs($svg)
+    ) {
+        $colors = array_unique($colors);
+
+        $short = [];
+        $long = [];
+        while (count($colors)) {
+            $c = array_shift($colors);
+            if (strlen($c) == 4) {
+                $short[] = $c;
+            }
+            else {
+                $long[] = $c;
+            }
+        }
+
+        $colors = [...$long, ...$short];
+        $new_colors = [];
+        $colors = array_flip($colors);
+        foreach ($colors as $c => $k) {
+            $colors[$c] = "@@@COLOR$$k$@@@";
+        }
+
+
+        foreach ($colors as $original => $replace) {
+            $new = svg_couleur_to_hexa($original);
+            $new_colors[$replace] = $callback_filter($new);
+        }
+
+        $svg = str_replace(array_keys($colors), array_values($colors), $svg);
+        $svg = str_replace(array_keys($new_colors), array_values($new_colors), $svg);
+
+        return $svg;
+    }
+    return $img;
 }

ecrire/inc/filtres_boites.php

Indentation +38 added lines, -38 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -44,18 +44,18 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_BOITE_OUVRIR_dist($p) {
-	$_titre = interprete_argument_balise(1, $p);
-	$_class = interprete_argument_balise(2, $p);
-	$_head_class = interprete_argument_balise(3, $p);
-	$_titre = ($_titre ?: "''");
-	$_class = ($_class ? ", $_class" : ", 'simple'");
-	$_head_class = ($_head_class ? ", $_head_class" : '');
-
-	$f = chercher_filtre('boite_ouvrir');
-	$p->code = "$f($_titre$_class$_head_class)";
-	$p->interdire_scripts = false;
-
-	return $p;
+    $_titre = interprete_argument_balise(1, $p);
+    $_class = interprete_argument_balise(2, $p);
+    $_head_class = interprete_argument_balise(3, $p);
+    $_titre = ($_titre ?: "''");
+    $_class = ($_class ? ", $_class" : ", 'simple'");
+    $_head_class = ($_head_class ? ", $_head_class" : '');
+
+    $f = chercher_filtre('boite_ouvrir');
+    $p->code = "$f($_titre$_class$_head_class)";
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 /**
@@ -75,14 +75,14 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_BOITE_PIED_dist($p) {
-	$_class = interprete_argument_balise(1, $p);
-	$_class = ($_class ? "$_class" : '');
+    $_class = interprete_argument_balise(1, $p);
+    $_class = ($_class ? "$_class" : '');
 
-	$f = chercher_filtre('boite_pied');
-	$p->code = "$f($_class)";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('boite_pied');
+    $p->code = "$f($_class)";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 
@@ -102,11 +102,11 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_BOITE_FERMER_dist($p) {
-	$f = chercher_filtre('boite_fermer');
-	$p->code = "$f()";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('boite_fermer');
+    $p->code = "$f()";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -128,16 +128,16 @@ 
  *     HTML du début de la boîte
  */
 function boite_ouvrir($titre, $class = '', $head_class = '', $id = '') {
-	$class = "box $class";
-	$head_class = "box__header $head_class clearfix";
-	// dans l'espace prive, titrer en h3 si pas de balise <hn>
-	if (test_espace_prive() and strlen($titre) and strpos($titre, '<h') === false) {
-		$titre = "<h3>$titre</h3>";
-	}
-
-	return '<div class="' . $class . ($id ? "\" id=\"$id" : '') . '">'
-	. ($titre ? "<div class=\"$head_class\">$titre<!--/hd--></div>" : '')
-	. '<div class="box__body clearfix">';
+    $class = "box $class";
+    $head_class = "box__header $head_class clearfix";
+    // dans l'espace prive, titrer en h3 si pas de balise <hn>
+    if (test_espace_prive() and strlen($titre) and strpos($titre, '<h') === false) {
+        $titre = "<h3>$titre</h3>";
+    }
+
+    return '<div class="' . $class . ($id ? "\" id=\"$id" : '') . '">'
+    . ($titre ? "<div class=\"$head_class\">$titre<!--/hd--></div>" : '')
+    . '<div class="box__body clearfix">';
 }
 
 
@@ -154,10 +154,10 @@ 
  *     HTML de transition vers le pied de la boîte
  */
 function boite_pied($class = 'act') {
-	$class = "box__footer $class";
+    $class = "box__footer $class";
 
-	return '</div>'
-	. "<div class=\"$class clearfix\">";
+    return '</div>'
+    . "<div class=\"$class clearfix\">";
 }
 
 
@@ -172,6 +172,6 @@ 
  *     HTML de fin de la boîte
  */
 function boite_fermer() {
-	return '</div>'
-	. '</div>';
+    return '</div>'
+    . '</div>';
 }

ecrire/inc/boutons.php

Indentation +82 added lines, -82 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,51 +25,51 @@ 
  * privée ou dans un de ses sous menus
  */
 class Bouton {
-	/** @var string L'icone à mettre dans le bouton */
-	public $icone;
-
-	/** @var string Le nom de l'entrée d'i18n associé */
-	public $libelle;
-
-	/** @var null|string L'URL de la page (null => ?exec=nom) */
-	public $url = null;
-
-	/** @var null|string|array Arguments supplementaires de l'URL */
-	public $urlArg = null;
-
-	/** @var null|string URL du javascript */
-	public $url2 = null;
-
-	/** @var null|string Pour ouvrir dans une fenetre a part */
-	public $target = null;
-
-	/** @var null|mixed Sous-barre de boutons / onglets */
-	public $sousmenu = null;
-
-	/**
-	 * Définit un bouton
-	 *
-	 * @param string $icone
-	 *    L'icone à mettre dans le bouton
-	 * @param string $libelle
-	 *    Le nom de l'entrée i18n associé
-	 * @param null|string $url
-	 *    L'URL de la page
-	 * @param null|string|array $urlArg
-	 *    Arguments supplémentaires de l'URL
-	 * @param null|string $url2
-	 *    URL du javascript
-	 * @param null|mixed $target
-	 *    Pour ouvrir une fenêtre à part
-	 */
-	public function __construct($icone, $libelle, $url = null, $urlArg = null, $url2 = null, $target = null) {
-		$this->icone = $icone;
-		$this->libelle = $libelle;
-		$this->url = $url;
-		$this->urlArg = $urlArg;
-		$this->url2 = $url2;
-		$this->target = $target;
-	}
+    /** @var string L'icone à mettre dans le bouton */
+    public $icone;
+
+    /** @var string Le nom de l'entrée d'i18n associé */
+    public $libelle;
+
+    /** @var null|string L'URL de la page (null => ?exec=nom) */
+    public $url = null;
+
+    /** @var null|string|array Arguments supplementaires de l'URL */
+    public $urlArg = null;
+
+    /** @var null|string URL du javascript */
+    public $url2 = null;
+
+    /** @var null|string Pour ouvrir dans une fenetre a part */
+    public $target = null;
+
+    /** @var null|mixed Sous-barre de boutons / onglets */
+    public $sousmenu = null;
+
+    /**
+     * Définit un bouton
+     *
+     * @param string $icone
+     *    L'icone à mettre dans le bouton
+     * @param string $libelle
+     *    Le nom de l'entrée i18n associé
+     * @param null|string $url
+     *    L'URL de la page
+     * @param null|string|array $urlArg
+     *    Arguments supplémentaires de l'URL
+     * @param null|string $url2
+     *    URL du javascript
+     * @param null|mixed $target
+     *    Pour ouvrir une fenêtre à part
+     */
+    public function __construct($icone, $libelle, $url = null, $urlArg = null, $url2 = null, $target = null) {
+        $this->icone = $icone;
+        $this->libelle = $libelle;
+        $this->url = $url;
+        $this->urlArg = $urlArg;
+        $this->url2 = $url2;
+        $this->target = $target;
+    }
 }
 
 
@@ -86,35 +86,35 @@ 
  */
 function definir_barre_onglets($script) {
 
-	$onglets = [];
-	$liste_onglets = [];
-
-	// ajouter les onglets issus des plugin via paquet.xml
-	if (function_exists('onglets_plugins')) {
-		$liste_onglets = onglets_plugins();
-	}
-
-
-	foreach ($liste_onglets as $id => $infos) {
-		if (
-			($parent = $infos['parent'])
-			&& $parent == $script
-			&& autoriser('onglet', "_$id")
-		) {
-			$onglets[$id] = new Bouton(
-				isset($infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
-				$infos['titre'],  // titre
-				(isset($infos['action']) and $infos['action'])
-					? generer_url_ecrire(
-						$infos['action'],
-						(isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : ''
-					)
-					: null
-			);
-		}
-	}
-
-	return pipeline('ajouter_onglets', ['data' => $onglets, 'args' => $script]);
+    $onglets = [];
+    $liste_onglets = [];
+
+    // ajouter les onglets issus des plugin via paquet.xml
+    if (function_exists('onglets_plugins')) {
+        $liste_onglets = onglets_plugins();
+    }
+
+
+    foreach ($liste_onglets as $id => $infos) {
+        if (
+            ($parent = $infos['parent'])
+            && $parent == $script
+            && autoriser('onglet', "_$id")
+        ) {
+            $onglets[$id] = new Bouton(
+                isset($infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
+                $infos['titre'],  // titre
+                (isset($infos['action']) and $infos['action'])
+                    ? generer_url_ecrire(
+                        $infos['action'],
+                        (isset($infos['parametres']) and $infos['parametres']) ? $infos['parametres'] : ''
+                    )
+                    : null
+            );
+        }
+    }
+
+    return pipeline('ajouter_onglets', ['data' => $onglets, 'args' => $script]);
 }
 
 
@@ -133,14 +133,14 @@ 
  * @return string
  */
 function barre_onglets($rubrique, $ongletCourant, $class = 'barre_onglet') {
-	include_spip('inc/presentation');
+    include_spip('inc/presentation');
 
-	$res = '';
+    $res = '';
 
-	foreach (definir_barre_onglets($rubrique) as $exec => $onglet) {
-		$url = $onglet->url ?: generer_url_ecrire($exec);
-		$res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
-	}
+    foreach (definir_barre_onglets($rubrique) as $exec => $onglet) {
+        $url = $onglet->url ?: generer_url_ecrire($exec);
+        $res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
+    }
 
-	return !$res ? '' : (debut_onglet($class) . $res . fin_onglet());
+    return !$res ? '' : (debut_onglet($class) . $res . fin_onglet());
 }

ecrire/inc/charsets.php

Indentation +733 added lines, -733 removed lines

@@ -22,7 +22,7 @@ 
 
 // securité
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // se faciliter la lecture du charset
@@ -42,45 +42,45 @@ 
  *     - false si le charset n'est pas décrit dans le répertoire charsets/
  **/
 function load_charset($charset = 'AUTO') {
-	if ($charset == 'AUTO') {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	$charset = trim(strtolower($charset));
-	if (isset($GLOBALS['CHARSET'][$charset])) {
-		return $charset;
-	}
-
-	if ($charset == 'utf-8') {
-		$GLOBALS['CHARSET'][$charset] = [];
-
-		return $charset;
-	}
-
-	// Quelques synonymes
-	if ($charset == '') {
-		$charset = 'iso-8859-1';
-	} else {
-		if ($charset == 'windows-1250') {
-			$charset = 'cp1250';
-		} else {
-			if ($charset == 'windows-1251') {
-				$charset = 'cp1251';
-			} else {
-				if ($charset == 'windows-1256') {
-					$charset = 'cp1256';
-				}
-			}
-		}
-	}
-
-	if (find_in_path($charset . '.php', 'charsets/', true)) {
-		return $charset;
-	} else {
-		spip_log("Erreur: pas de fichier de conversion 'charsets/$charset'");
-		$GLOBALS['CHARSET'][$charset] = [];
-
-		return false;
-	}
+    if ($charset == 'AUTO') {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    $charset = trim(strtolower($charset));
+    if (isset($GLOBALS['CHARSET'][$charset])) {
+        return $charset;
+    }
+
+    if ($charset == 'utf-8') {
+        $GLOBALS['CHARSET'][$charset] = [];
+
+        return $charset;
+    }
+
+    // Quelques synonymes
+    if ($charset == '') {
+        $charset = 'iso-8859-1';
+    } else {
+        if ($charset == 'windows-1250') {
+            $charset = 'cp1250';
+        } else {
+            if ($charset == 'windows-1251') {
+                $charset = 'cp1251';
+            } else {
+                if ($charset == 'windows-1256') {
+                    $charset = 'cp1256';
+                }
+            }
+        }
+    }
+
+    if (find_in_path($charset . '.php', 'charsets/', true)) {
+        return $charset;
+    } else {
+        spip_log("Erreur: pas de fichier de conversion 'charsets/$charset'");
+        $GLOBALS['CHARSET'][$charset] = [];
+
+        return false;
+    }
 }
 
 
@@ -91,31 +91,31 @@ 
  *     true si toutes les fonctions mb nécessaires sont présentes
  **/
 function init_mb_string() {
-	static $mb;
-
-	// verifier que tout est present (fonctions mb_string pour php >= 4.0.6)
-	// et que le charset interne est connu de mb_string
-	if (!$mb) {
-		if (
-			function_exists('mb_internal_encoding')
-			and function_exists('mb_detect_order')
-			and function_exists('mb_substr')
-			and function_exists('mb_strlen')
-			and function_exists('mb_strtolower')
-			and function_exists('mb_strtoupper')
-			and function_exists('mb_encode_mimeheader')
-			and function_exists('mb_encode_numericentity')
-			and function_exists('mb_decode_numericentity')
-			and mb_detect_order(lire_config('charset', _DEFAULT_CHARSET))
-		) {
-			mb_internal_encoding('utf-8');
-			$mb = 1;
-		} else {
-			$mb = -1;
-		}
-	}
-
-	return ($mb == 1);
+    static $mb;
+
+    // verifier que tout est present (fonctions mb_string pour php >= 4.0.6)
+    // et que le charset interne est connu de mb_string
+    if (!$mb) {
+        if (
+            function_exists('mb_internal_encoding')
+            and function_exists('mb_detect_order')
+            and function_exists('mb_substr')
+            and function_exists('mb_strlen')
+            and function_exists('mb_strtolower')
+            and function_exists('mb_strtoupper')
+            and function_exists('mb_encode_mimeheader')
+            and function_exists('mb_encode_numericentity')
+            and function_exists('mb_decode_numericentity')
+            and mb_detect_order(lire_config('charset', _DEFAULT_CHARSET))
+        ) {
+            mb_internal_encoding('utf-8');
+            $mb = 1;
+        } else {
+            $mb = -1;
+        }
+    }
+
+    return ($mb == 1);
 }
 
 /**
@@ -130,21 +130,21 @@ 
  *     true si iconv fonctionne correctement
  **/
 function test_iconv() {
-	static $iconv_ok;
-
-	if (!$iconv_ok) {
-		if (!function_exists('iconv')) {
-			$iconv_ok = -1;
-		} else {
-			if (utf_32_to_unicode(@iconv('utf-8', 'utf-32', 'chaine de test')) == 'chaine de test') {
-				$iconv_ok = 1;
-			} else {
-				$iconv_ok = -1;
-			}
-		}
-	}
-
-	return ($iconv_ok == 1);
+    static $iconv_ok;
+
+    if (!$iconv_ok) {
+        if (!function_exists('iconv')) {
+            $iconv_ok = -1;
+        } else {
+            if (utf_32_to_unicode(@iconv('utf-8', 'utf-32', 'chaine de test')) == 'chaine de test') {
+                $iconv_ok = 1;
+            } else {
+                $iconv_ok = -1;
+            }
+        }
+    }
+
+    return ($iconv_ok == 1);
 }
 
 
@@ -157,18 +157,18 @@ 
  *     true si PCRE supporte l'UTF-8 correctement
  **/
 function test_pcre_unicode() {
-	static $pcre_ok = 0;
-
-	if (!$pcre_ok) {
-		$s = ' ' . chr(195) . chr(169) . 't' . chr(195) . chr(169) . ' ';
-		if (preg_match(',\W...\W,u', $s)) {
-			$pcre_ok = 1;
-		} else {
-			$pcre_ok = -1;
-		}
-	}
-
-	return $pcre_ok == 1;
+    static $pcre_ok = 0;
+
+    if (!$pcre_ok) {
+        $s = ' ' . chr(195) . chr(169) . 't' . chr(195) . chr(169) . ' ';
+        if (preg_match(',\W...\W,u', $s)) {
+            $pcre_ok = 1;
+        } else {
+            $pcre_ok = -1;
+        }
+    }
+
+    return $pcre_ok == 1;
 }
 
 /**
@@ -184,22 +184,22 @@ 
  *    Plage de caractères
  **/
 function pcre_lettres_unicode() {
-	static $plage_unicode;
-
-	if (!$plage_unicode) {
-		if (test_pcre_unicode()) {
-			// cf. http://www.unicode.org/charts/
-			$plage_unicode = '\w' // iso-latin
-				. '\x{100}-\x{24f}' // europeen etendu
-				. '\x{300}-\x{1cff}' // des tas de trucs
-			;
-		} else {
-			// fallback a trois sous
-			$plage_unicode = '\w';
-		}
-	}
-
-	return $plage_unicode;
+    static $plage_unicode;
+
+    if (!$plage_unicode) {
+        if (test_pcre_unicode()) {
+            // cf. http://www.unicode.org/charts/
+            $plage_unicode = '\w' // iso-latin
+                . '\x{100}-\x{24f}' // europeen etendu
+                . '\x{300}-\x{1cff}' // des tas de trucs
+            ;
+        } else {
+            // fallback a trois sous
+            $plage_unicode = '\w';
+        }
+    }
+
+    return $plage_unicode;
 }
 
 
@@ -217,7 +217,7 @@ 
  *    Plage de caractères
  **/
 function plage_punct_unicode() {
-	return '\xE2(\x80[\x80-\xBF]|\x81[\x80-\xAF])';
+    return '\xE2(\x80[\x80-\xBF]|\x81[\x80-\xAF])';
 }
 
 /**
@@ -237,75 +237,75 @@ 
  *     Texte corrigé
  **/
 function corriger_caracteres_windows($texte, $charset = 'AUTO', $charset_cible = 'unicode') {
-	static $trans;
-
-	if (is_array($texte)) {
-		return array_map('corriger_caracteres_windows', $texte);
-	}
-
-	if ($charset == 'AUTO') {
-		$charset = lire_config('charset', _DEFAULT_CHARSET);
-	}
-	if ($charset == 'utf-8') {
-		$p = chr(194);
-		if (strpos($texte, $p) == false) {
-			return $texte;
-		}
-	} else {
-		if ($charset == 'iso-8859-1') {
-			$p = '';
-		} else {
-			return $texte;
-		}
-	}
-
-	if (!isset($trans[$charset][$charset_cible])) {
-		$trans[$charset][$charset_cible] = [
-			$p . chr(128) => '€',
-			$p . chr(129) => ' ', # pas affecte
-			$p . chr(130) => '‚',
-			$p . chr(131) => 'ƒ',
-			$p . chr(132) => '„',
-			$p . chr(133) => '…',
-			$p . chr(134) => '†',
-			$p . chr(135) => '‡',
-			$p . chr(136) => 'ˆ',
-			$p . chr(137) => '‰',
-			$p . chr(138) => 'Š',
-			$p . chr(139) => '‹',
-			$p . chr(140) => 'Œ',
-			$p . chr(141) => ' ', # pas affecte
-			$p . chr(142) => 'Ž',
-			$p . chr(143) => ' ', # pas affecte
-			$p . chr(144) => ' ', # pas affecte
-			$p . chr(145) => '‘',
-			$p . chr(146) => '’',
-			$p . chr(147) => '“',
-			$p . chr(148) => '”',
-			$p . chr(149) => '•',
-			$p . chr(150) => '–',
-			$p . chr(151) => '—',
-			$p . chr(152) => '˜',
-			$p . chr(153) => '™',
-			$p . chr(154) => 'š',
-			$p . chr(155) => '›',
-			$p . chr(156) => 'œ',
-			$p . chr(157) => ' ', # pas affecte
-			$p . chr(158) => 'ž',
-			$p . chr(159) => 'Ÿ',
-		];
-		if ($charset_cible != 'unicode') {
-			foreach ($trans[$charset][$charset_cible] as $k => $c) {
-				$trans[$charset][$charset_cible][$k] = unicode2charset($c, $charset_cible);
-			}
-		}
-	}
-
-	return @str_replace(
-		array_keys($trans[$charset][$charset_cible]),
-		array_values($trans[$charset][$charset_cible]),
-		$texte
-	);
+    static $trans;
+
+    if (is_array($texte)) {
+        return array_map('corriger_caracteres_windows', $texte);
+    }
+
+    if ($charset == 'AUTO') {
+        $charset = lire_config('charset', _DEFAULT_CHARSET);
+    }
+    if ($charset == 'utf-8') {
+        $p = chr(194);
+        if (strpos($texte, $p) == false) {
+            return $texte;
+        }
+    } else {
+        if ($charset == 'iso-8859-1') {
+            $p = '';
+        } else {
+            return $texte;
+        }
+    }
+
+    if (!isset($trans[$charset][$charset_cible])) {
+        $trans[$charset][$charset_cible] = [
+            $p . chr(128) => '€',
+            $p . chr(129) => ' ', # pas affecte
+            $p . chr(130) => '‚',
+            $p . chr(131) => 'ƒ',
+            $p . chr(132) => '„',
+            $p . chr(133) => '…',
+            $p . chr(134) => '†',
+            $p . chr(135) => '‡',
+            $p . chr(136) => 'ˆ',
+            $p . chr(137) => '‰',
+            $p . chr(138) => 'Š',
+            $p . chr(139) => '‹',
+            $p . chr(140) => 'Œ',
+            $p . chr(141) => ' ', # pas affecte
+            $p . chr(142) => 'Ž',
+            $p . chr(143) => ' ', # pas affecte
+            $p . chr(144) => ' ', # pas affecte
+            $p . chr(145) => '‘',
+            $p . chr(146) => '’',
+            $p . chr(147) => '“',
+            $p . chr(148) => '”',
+            $p . chr(149) => '•',
+            $p . chr(150) => '–',
+            $p . chr(151) => '—',
+            $p . chr(152) => '˜',
+            $p . chr(153) => '™',
+            $p . chr(154) => 'š',
+            $p . chr(155) => '›',
+            $p . chr(156) => 'œ',
+            $p . chr(157) => ' ', # pas affecte
+            $p . chr(158) => 'ž',
+            $p . chr(159) => 'Ÿ',
+        ];
+        if ($charset_cible != 'unicode') {
+            foreach ($trans[$charset][$charset_cible] as $k => $c) {
+                $trans[$charset][$charset_cible][$k] = unicode2charset($c, $charset_cible);
+            }
+        }
+    }
+
+    return @str_replace(
+        array_keys($trans[$charset][$charset_cible]),
+        array_values($trans[$charset][$charset_cible]),
+        $texte
+    );
 }
 
 
@@ -322,26 +322,26 @@ 
  *     Texte converti
  **/
 function html2unicode($texte, $secure = false) {
-	if (strpos($texte, '&') === false) {
-		return $texte;
-	}
-	static $trans = [];
-	if (!$trans) {
-		load_charset('html');
-		foreach ($GLOBALS['CHARSET']['html'] as $key => $val) {
-			$trans["&$key;"] = $val;
-		}
-	}
-
-	if ($secure) {
-		return str_replace(array_keys($trans), array_values($trans), $texte);
-	} else {
-		return str_replace(
-			['&', '"', '<', '>'],
-			['&', '"', '<', '>'],
-			str_replace(array_keys($trans), array_values($trans), $texte)
-		);
-	}
+    if (strpos($texte, '&') === false) {
+        return $texte;
+    }
+    static $trans = [];
+    if (!$trans) {
+        load_charset('html');
+        foreach ($GLOBALS['CHARSET']['html'] as $key => $val) {
+            $trans["&$key;"] = $val;
+        }
+    }
+
+    if ($secure) {
+        return str_replace(array_keys($trans), array_values($trans), $texte);
+    } else {
+        return str_replace(
+            ['&amp;', '&quot;', '&lt;', '&gt;'],
+            ['&', '"', '<', '>'],
+            str_replace(array_keys($trans), array_values($trans), $texte)
+        );
+    }
 }
 
 
@@ -356,16 +356,16 @@ 
  *     Texte converti
  **/
 function mathml2unicode($texte) {
-	static $trans;
-	if (!$trans) {
-		load_charset('mathml');
+    static $trans;
+    if (!$trans) {
+        load_charset('mathml');
 
-		foreach ($GLOBALS['CHARSET']['mathml'] as $key => $val) {
-			$trans["&$key;"] = $val;
-		}
-	}
+        foreach ($GLOBALS['CHARSET']['mathml'] as $key => $val) {
+            $trans["&$key;"] = $val;
+        }
+    }
 
-	return str_replace(array_keys($trans), array_values($trans), $texte);
+    return str_replace(array_keys($trans), array_values($trans), $texte);
 }
 
 
@@ -387,75 +387,75 @@ 
  *     Texte converti en unicode
  **/
 function charset2unicode($texte, $charset = 'AUTO' /* $forcer: obsolete*/) {
-	static $trans;
-
-	if ($charset == 'AUTO') {
-		$charset = lire_config('charset', _DEFAULT_CHARSET);
-	}
-
-	if ($charset == '') {
-		$charset = 'iso-8859-1';
-	}
-	$charset = strtolower($charset);
-
-	switch ($charset) {
-		case 'utf-8':
-		case 'utf8':
-			return utf_8_to_unicode($texte);
-
-		case 'iso-8859-1':
-			$texte = corriger_caracteres_windows($texte, 'iso-8859-1');
-		// pas de break; ici, on suit sur default:
-
-		default:
-			// mbstring presente ?
-			if (init_mb_string()) {
-				$order = mb_detect_order();
-				try {
-					# mb_string connait-il $charset?
-					if ($order and mb_detect_order($charset)) {
-						$s = mb_convert_encoding($texte, 'utf-8', $charset);
-						if ($s && $s != $texte) {
-							return utf_8_to_unicode($s);
-						}
-					}
-				} catch (\Error $e) {
-					// Le charset n'existe probablement pas
-				} finally {
-					mb_detect_order($order); # remettre comme precedemment
-				}
-			}
-
-			// Sinon, peut-etre connaissons-nous ce charset ?
-			if (!isset($trans[$charset])) {
-				if (
-					$cset = load_charset($charset)
-					and is_array($GLOBALS['CHARSET'][$cset])
-				) {
-					foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
-						$trans[$charset][chr($key)] = '&#' . $val . ';';
-					}
-				}
-			}
-			if (isset($trans[$charset]) and is_countable($trans[$charset]) ? count($trans[$charset]) : 0) {
-				return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
-			}
-
-			// Sinon demander a iconv (malgre le fait qu'il coupe quand un
-			// caractere n'appartient pas au charset, mais c'est un probleme
-			// surtout en utf-8, gere ci-dessus)
-			if (test_iconv()) {
-				$s = iconv($charset, 'utf-32le', $texte);
-				if ($s) {
-					return utf_32_to_unicode($s);
-				}
-			}
-
-			// Au pire ne rien faire
-			spip_log("erreur charset '$charset' non supporte");
-
-			return $texte;
-	}
+    static $trans;
+
+    if ($charset == 'AUTO') {
+        $charset = lire_config('charset', _DEFAULT_CHARSET);
+    }
+
+    if ($charset == '') {
+        $charset = 'iso-8859-1';
+    }
+    $charset = strtolower($charset);
+
+    switch ($charset) {
+        case 'utf-8':
+        case 'utf8':
+            return utf_8_to_unicode($texte);
+
+        case 'iso-8859-1':
+            $texte = corriger_caracteres_windows($texte, 'iso-8859-1');
+        // pas de break; ici, on suit sur default:
+
+        default:
+            // mbstring presente ?
+            if (init_mb_string()) {
+                $order = mb_detect_order();
+                try {
+                    # mb_string connait-il $charset?
+                    if ($order and mb_detect_order($charset)) {
+                        $s = mb_convert_encoding($texte, 'utf-8', $charset);
+                        if ($s && $s != $texte) {
+                            return utf_8_to_unicode($s);
+                        }
+                    }
+                } catch (\Error $e) {
+                    // Le charset n'existe probablement pas
+                } finally {
+                    mb_detect_order($order); # remettre comme precedemment
+                }
+            }
+
+            // Sinon, peut-etre connaissons-nous ce charset ?
+            if (!isset($trans[$charset])) {
+                if (
+                    $cset = load_charset($charset)
+                    and is_array($GLOBALS['CHARSET'][$cset])
+                ) {
+                    foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
+                        $trans[$charset][chr($key)] = '&#' . $val . ';';
+                    }
+                }
+            }
+            if (isset($trans[$charset]) and is_countable($trans[$charset]) ? count($trans[$charset]) : 0) {
+                return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
+            }
+
+            // Sinon demander a iconv (malgre le fait qu'il coupe quand un
+            // caractere n'appartient pas au charset, mais c'est un probleme
+            // surtout en utf-8, gere ci-dessus)
+            if (test_iconv()) {
+                $s = iconv($charset, 'utf-32le', $texte);
+                if ($s) {
+                    return utf_32_to_unicode($s);
+                }
+            }
+
+            // Au pire ne rien faire
+            spip_log("erreur charset '$charset' non supporte");
+
+            return $texte;
+    }
 }
 
 
@@ -474,44 +474,44 @@ 
  *     Texte transformé dans le charset souhaité
  **/
 function unicode2charset($texte, $charset = 'AUTO') {
-	static $CHARSET_REVERSE = [];
-	static $trans = [];
-
-	if ($charset == 'AUTO') {
-		$charset = lire_config('charset', _DEFAULT_CHARSET);
-	}
-
-	switch ($charset) {
-		case 'utf-8':
-			return unicode_to_utf_8($texte);
-			break;
-
-		default:
-			$charset = load_charset($charset);
-
-			if (empty($CHARSET_REVERSE[$charset])) {
-				$CHARSET_REVERSE[$charset] = array_flip($GLOBALS['CHARSET'][$charset]);
-			}
-
-			if (!isset($trans[$charset])) {
-				$trans[$charset] = [];
-				$t = &$trans[$charset];
-				for ($e = 128; $e < 255; $e++) {
-					$h = dechex($e);
-					if ($s = isset($CHARSET_REVERSE[$charset][$e])) {
-						$s = $CHARSET_REVERSE[$charset][$e];
-						$t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($s);
-						$t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($s);
-					} else {
-						$t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($e);
-						$t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($e);
-					}
-				}
-			}
-			$texte = str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
-
-			return $texte;
-	}
+    static $CHARSET_REVERSE = [];
+    static $trans = [];
+
+    if ($charset == 'AUTO') {
+        $charset = lire_config('charset', _DEFAULT_CHARSET);
+    }
+
+    switch ($charset) {
+        case 'utf-8':
+            return unicode_to_utf_8($texte);
+            break;
+
+        default:
+            $charset = load_charset($charset);
+
+            if (empty($CHARSET_REVERSE[$charset])) {
+                $CHARSET_REVERSE[$charset] = array_flip($GLOBALS['CHARSET'][$charset]);
+            }
+
+            if (!isset($trans[$charset])) {
+                $trans[$charset] = [];
+                $t = &$trans[$charset];
+                for ($e = 128; $e < 255; $e++) {
+                    $h = dechex($e);
+                    if ($s = isset($CHARSET_REVERSE[$charset][$e])) {
+                        $s = $CHARSET_REVERSE[$charset][$e];
+                        $t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($s);
+                        $t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($s);
+                    } else {
+                        $t['&#' . $e . ';'] = $t['&#0' . $e . ';'] = $t['&#00' . $e . ';'] = chr($e);
+                        $t['&#x' . $h . ';'] = $t['&#x0' . $h . ';'] = $t['&#x00' . $h . ';'] = chr($e);
+                    }
+                }
+            }
+            $texte = str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
+
+            return $texte;
+    }
 }
 
 
@@ -529,40 +529,40 @@ 
  *     Texte transformé dans le charset site
  **/
 function importer_charset($texte, $charset = 'AUTO') {
-	$s = null;
-	static $trans = [];
-	// on traite le cas le plus frequent iso-8859-1 vers utf directement pour aller plus vite !
-	if (($charset == 'iso-8859-1') && ($GLOBALS['meta']['charset'] == 'utf-8')) {
-		$texte = corriger_caracteres_windows($texte, 'iso-8859-1', $GLOBALS['meta']['charset']);
-		if (init_mb_string()) {
-			if (
-				$order = mb_detect_order() # mb_string connait-il $charset?
-				and mb_detect_order($charset)
-			) {
-				$s = mb_convert_encoding($texte, 'utf-8', $charset);
-			}
-			mb_detect_order($order); # remettre comme precedemment
-			return $s;
-		}
-		// Sinon, peut-etre connaissons-nous ce charset ?
-		if (!isset($trans[$charset])) {
-			if (
-				$cset = load_charset($charset)
-				and is_array($GLOBALS['CHARSET'][$cset])
-			) {
-				foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
-					$trans[$charset][chr($key)] = unicode2charset('&#' . $val . ';');
-				}
-			}
-		}
-		if (is_countable($trans[$charset]) ? count($trans[$charset]) : 0) {
-			return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
-		}
-
-		return $texte;
-	}
-
-	return unicode2charset(charset2unicode($texte, $charset));
+    $s = null;
+    static $trans = [];
+    // on traite le cas le plus frequent iso-8859-1 vers utf directement pour aller plus vite !
+    if (($charset == 'iso-8859-1') && ($GLOBALS['meta']['charset'] == 'utf-8')) {
+        $texte = corriger_caracteres_windows($texte, 'iso-8859-1', $GLOBALS['meta']['charset']);
+        if (init_mb_string()) {
+            if (
+                $order = mb_detect_order() # mb_string connait-il $charset?
+                and mb_detect_order($charset)
+            ) {
+                $s = mb_convert_encoding($texte, 'utf-8', $charset);
+            }
+            mb_detect_order($order); # remettre comme precedemment
+            return $s;
+        }
+        // Sinon, peut-etre connaissons-nous ce charset ?
+        if (!isset($trans[$charset])) {
+            if (
+                $cset = load_charset($charset)
+                and is_array($GLOBALS['CHARSET'][$cset])
+            ) {
+                foreach ($GLOBALS['CHARSET'][$cset] as $key => $val) {
+                    $trans[$charset][chr($key)] = unicode2charset('&#' . $val . ';');
+                }
+            }
+        }
+        if (is_countable($trans[$charset]) ? count($trans[$charset]) : 0) {
+            return str_replace(array_keys($trans[$charset]), array_values($trans[$charset]), $texte);
+        }
+
+        return $texte;
+    }
+
+    return unicode2charset(charset2unicode($texte, $charset));
 }
 
 
@@ -578,92 +578,92 @@ 
  **/
 function utf_8_to_unicode($source) {
 
-	// mb_string : methode rapide
-	if (init_mb_string()) {
-		$convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
-
-		return mb_encode_numericentity($source, $convmap, 'UTF-8');
-	}
-
-	// Sinon methode pas a pas
-	static $decrement;
-	static $shift;
-
-	// Cf. php.net, par Ronen. Adapte pour compatibilite < php4
-	if (!is_array($decrement)) {
-		// array used to figure what number to decrement from character order value
-		// according to number of characters used to map unicode to ascii by utf-8
-		$decrement[4] = 240;
-		$decrement[3] = 224;
-		$decrement[2] = 192;
-		$decrement[1] = 0;
-		// the number of bits to shift each charNum by
-		$shift[1][0] = 0;
-		$shift[2][0] = 6;
-		$shift[2][1] = 0;
-		$shift[3][0] = 12;
-		$shift[3][1] = 6;
-		$shift[3][2] = 0;
-		$shift[4][0] = 18;
-		$shift[4][1] = 12;
-		$shift[4][2] = 6;
-		$shift[4][3] = 0;
-	}
-
-	$pos = 0;
-	$len = strlen($source);
-	$encodedString = '';
-	while ($pos < $len) {
-		$char = '';
-		$ischar = false;
-		$asciiPos = ord(substr($source, $pos, 1));
-		if (($asciiPos >= 240) && ($asciiPos <= 255)) {
-			// 4 chars representing one unicode character
-			$thisLetter = substr($source, $pos, 4);
-			$pos += 4;
-		} else {
-			if (($asciiPos >= 224) && ($asciiPos <= 239)) {
-				// 3 chars representing one unicode character
-				$thisLetter = substr($source, $pos, 3);
-				$pos += 3;
-			} else {
-				if (($asciiPos >= 192) && ($asciiPos <= 223)) {
-					// 2 chars representing one unicode character
-					$thisLetter = substr($source, $pos, 2);
-					$pos += 2;
-				} else {
-					// 1 char (lower ascii)
-					$thisLetter = substr($source, $pos, 1);
-					$pos += 1;
-					$char = $thisLetter;
-					$ischar = true;
-				}
-			}
-		}
-
-		if ($ischar) {
-			$encodedString .= $char;
-		} else {  // process the string representing the letter to a unicode entity
-			$thisLen = strlen($thisLetter);
-			$thisPos = 0;
-			$decimalCode = 0;
-			while ($thisPos < $thisLen) {
-				$thisCharOrd = ord(substr($thisLetter, $thisPos, 1));
-				if ($thisPos == 0) {
-					$charNum = intval($thisCharOrd - $decrement[$thisLen]);
-					$decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
-				} else {
-					$charNum = intval($thisCharOrd - 128);
-					$decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
-				}
-				$thisPos++;
-			}
-			$encodedLetter = '&#' . preg_replace('/^0+/', '', $decimalCode) . ';';
-			$encodedString .= $encodedLetter;
-		}
-	}
-
-	return $encodedString;
+    // mb_string : methode rapide
+    if (init_mb_string()) {
+        $convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
+
+        return mb_encode_numericentity($source, $convmap, 'UTF-8');
+    }
+
+    // Sinon methode pas a pas
+    static $decrement;
+    static $shift;
+
+    // Cf. php.net, par Ronen. Adapte pour compatibilite < php4
+    if (!is_array($decrement)) {
+        // array used to figure what number to decrement from character order value
+        // according to number of characters used to map unicode to ascii by utf-8
+        $decrement[4] = 240;
+        $decrement[3] = 224;
+        $decrement[2] = 192;
+        $decrement[1] = 0;
+        // the number of bits to shift each charNum by
+        $shift[1][0] = 0;
+        $shift[2][0] = 6;
+        $shift[2][1] = 0;
+        $shift[3][0] = 12;
+        $shift[3][1] = 6;
+        $shift[3][2] = 0;
+        $shift[4][0] = 18;
+        $shift[4][1] = 12;
+        $shift[4][2] = 6;
+        $shift[4][3] = 0;
+    }
+
+    $pos = 0;
+    $len = strlen($source);
+    $encodedString = '';
+    while ($pos < $len) {
+        $char = '';
+        $ischar = false;
+        $asciiPos = ord(substr($source, $pos, 1));
+        if (($asciiPos >= 240) && ($asciiPos <= 255)) {
+            // 4 chars representing one unicode character
+            $thisLetter = substr($source, $pos, 4);
+            $pos += 4;
+        } else {
+            if (($asciiPos >= 224) && ($asciiPos <= 239)) {
+                // 3 chars representing one unicode character
+                $thisLetter = substr($source, $pos, 3);
+                $pos += 3;
+            } else {
+                if (($asciiPos >= 192) && ($asciiPos <= 223)) {
+                    // 2 chars representing one unicode character
+                    $thisLetter = substr($source, $pos, 2);
+                    $pos += 2;
+                } else {
+                    // 1 char (lower ascii)
+                    $thisLetter = substr($source, $pos, 1);
+                    $pos += 1;
+                    $char = $thisLetter;
+                    $ischar = true;
+                }
+            }
+        }
+
+        if ($ischar) {
+            $encodedString .= $char;
+        } else {  // process the string representing the letter to a unicode entity
+            $thisLen = strlen($thisLetter);
+            $thisPos = 0;
+            $decimalCode = 0;
+            while ($thisPos < $thisLen) {
+                $thisCharOrd = ord(substr($thisLetter, $thisPos, 1));
+                if ($thisPos == 0) {
+                    $charNum = intval($thisCharOrd - $decrement[$thisLen]);
+                    $decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
+                } else {
+                    $charNum = intval($thisCharOrd - 128);
+                    $decimalCode += ($charNum << $shift[$thisLen][$thisPos]);
+                }
+                $thisPos++;
+            }
+            $encodedLetter = '&#' . preg_replace('/^0+/', '', $decimalCode) . ';';
+            $encodedString .= $encodedLetter;
+        }
+    }
+
+    return $encodedString;
 }
 
 /**
@@ -682,32 +682,32 @@ 
  **/
 function utf_32_to_unicode($source) {
 
-	// mb_string : methode rapide
-	if (init_mb_string()) {
-		$convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
-		$source = mb_encode_numericentity($source, $convmap, 'UTF-32LE');
-
-		return str_replace(chr(0), '', $source);
-	}
-
-	// Sinon methode lente
-	$texte = '';
-	while ($source) {
-		$words = unpack('V*', substr($source, 0, 1024));
-		$source = substr($source, 1024);
-		foreach ($words as $word) {
-			if ($word < 128) {
-				$texte .= chr($word);
-			} // ignorer le BOM - http://www.unicode.org/faq/utf_bom.html
-			else {
-				if ($word != 65279) {
-					$texte .= '&#' . $word . ';';
-				}
-			}
-		}
-	}
-
-	return $texte;
+    // mb_string : methode rapide
+    if (init_mb_string()) {
+        $convmap = [0x7F, 0xFFFFFF, 0x0, 0xFFFFFF];
+        $source = mb_encode_numericentity($source, $convmap, 'UTF-32LE');
+
+        return str_replace(chr(0), '', $source);
+    }
+
+    // Sinon methode lente
+    $texte = '';
+    while ($source) {
+        $words = unpack('V*', substr($source, 0, 1024));
+        $source = substr($source, 1024);
+        foreach ($words as $word) {
+            if ($word < 128) {
+                $texte .= chr($word);
+            } // ignorer le BOM - http://www.unicode.org/faq/utf_bom.html
+            else {
+                if ($word != 65279) {
+                    $texte .= '&#' . $word . ';';
+                }
+            }
+        }
+    }
+
+    return $texte;
 }
 
 
@@ -724,21 +724,21 @@ 
  *    Caractère utf8 si trouvé, '' sinon
  **/
 function caractere_utf_8($num) {
-	$num = intval($num);
-	if ($num < 128) {
-		return chr($num);
-	}
-	if ($num < 2048) {
-		return chr(($num >> 6) + 192) . chr(($num & 63) + 128);
-	}
-	if ($num < 65536) {
-		return chr(($num >> 12) + 224) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
-	}
-	if ($num < 1_114_112) {
-		return chr(($num >> 18) + 240) . chr((($num >> 12) & 63) + 128) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
-	}
-
-	return '';
+    $num = intval($num);
+    if ($num < 128) {
+        return chr($num);
+    }
+    if ($num < 2048) {
+        return chr(($num >> 6) + 192) . chr(($num & 63) + 128);
+    }
+    if ($num < 65536) {
+        return chr(($num >> 12) + 224) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
+    }
+    if ($num < 1_114_112) {
+        return chr(($num >> 18) + 240) . chr((($num >> 12) & 63) + 128) . chr((($num >> 6) & 63) + 128) . chr(($num & 63) + 128);
+    }
+
+    return '';
 }
 
 /**
@@ -751,42 +751,42 @@ 
  **/
 function unicode_to_utf_8($texte) {
 
-	// 1. Entites &#128; et suivantes
-	$vu = [];
-	if (
-		preg_match_all(
-			',&#0*([1-9][0-9][0-9]+);,S',
-			$texte,
-			$regs,
-			PREG_SET_ORDER
-		)
-	) {
-		foreach ($regs as $reg) {
-			if ($reg[1] > 127 and !isset($vu[$reg[0]])) {
-				$vu[$reg[0]] = caractere_utf_8($reg[1]);
-			}
-		}
-	}
-	//$texte = str_replace(array_keys($vu), array_values($vu), $texte);
-
-	// 2. Entites > &#xFF;
-	//$vu = array();
-	if (
-		preg_match_all(
-			',&#x0*([1-9a-f][0-9a-f][0-9a-f]+);,iS',
-			$texte,
-			$regs,
-			PREG_SET_ORDER
-		)
-	) {
-		foreach ($regs as $reg) {
-			if (!isset($vu[$reg[0]])) {
-				$vu[$reg[0]] = caractere_utf_8(hexdec($reg[1]));
-			}
-		}
-	}
-
-	return str_replace(array_keys($vu), array_values($vu), $texte);
+    // 1. Entites &#128; et suivantes
+    $vu = [];
+    if (
+        preg_match_all(
+            ',&#0*([1-9][0-9][0-9]+);,S',
+            $texte,
+            $regs,
+            PREG_SET_ORDER
+        )
+    ) {
+        foreach ($regs as $reg) {
+            if ($reg[1] > 127 and !isset($vu[$reg[0]])) {
+                $vu[$reg[0]] = caractere_utf_8($reg[1]);
+            }
+        }
+    }
+    //$texte = str_replace(array_keys($vu), array_values($vu), $texte);
+
+    // 2. Entites > &#xFF;
+    //$vu = array();
+    if (
+        preg_match_all(
+            ',&#x0*([1-9a-f][0-9a-f][0-9a-f]+);,iS',
+            $texte,
+            $regs,
+            PREG_SET_ORDER
+        )
+    ) {
+        foreach ($regs as $reg) {
+            if (!isset($vu[$reg[0]])) {
+                $vu[$reg[0]] = caractere_utf_8(hexdec($reg[1]));
+            }
+        }
+    }
+
+    return str_replace(array_keys($vu), array_values($vu), $texte);
 }
 
 /**
@@ -798,15 +798,15 @@ 
  *     Texte converti
  **/
 function unicode_to_javascript($texte) {
-	$vu = [];
-	while (preg_match(',&#0*([0-9]+);,S', $texte, $regs) and !isset($vu[$regs[1]])) {
-		$num = $regs[1];
-		$vu[$num] = true;
-		$s = '\u' . sprintf('%04x', $num);
-		$texte = str_replace($regs[0], $s, $texte);
-	}
-
-	return $texte;
+    $vu = [];
+    while (preg_match(',&#0*([0-9]+);,S', $texte, $regs) and !isset($vu[$regs[1]])) {
+        $num = $regs[1];
+        $vu[$num] = true;
+        $s = '\u' . sprintf('%04x', $num);
+        $texte = str_replace($regs[0], $s, $texte);
+    }
+
+    return $texte;
 }
 
 /**
@@ -818,11 +818,11 @@ 
  *     Texte converti
  **/
 function javascript_to_unicode($texte) {
-	while (preg_match(',%u([0-9A-F][0-9A-F][0-9A-F][0-9A-F]),', $texte, $regs)) {
-		$texte = str_replace($regs[0], '&#' . hexdec($regs[1]) . ';', $texte);
-	}
+    while (preg_match(',%u([0-9A-F][0-9A-F][0-9A-F][0-9A-F]),', $texte, $regs)) {
+        $texte = str_replace($regs[0], '&#' . hexdec($regs[1]) . ';', $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -834,11 +834,11 @@ 
  *     Texte converti
  **/
 function javascript_to_binary($texte) {
-	while (preg_match(',%([0-9A-F][0-9A-F]),', $texte, $regs)) {
-		$texte = str_replace($regs[0], chr(hexdec($regs[1])), $texte);
-	}
+    while (preg_match(',%([0-9A-F][0-9A-F]),', $texte, $regs)) {
+        $texte = str_replace($regs[0], chr(hexdec($regs[1])), $texte);
+    }
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -856,26 +856,26 @@ 
  * @return string
  */
 function translitteration_rapide($texte, $charset = 'AUTO', $complexe = '') {
-	static $trans = [];
-	if ($charset == 'AUTO') {
-		$charset = $GLOBALS['meta']['charset'];
-	}
-	if (!strlen($texte)) {
-		return $texte;
-	}
-
-	$table_translit = 'translit' . $complexe;
-
-	// 2. Translitterer grace a la table predefinie
-	if (!isset($trans[$complexe])) {
-		$trans[$complexe] = [];
-		load_charset($table_translit);
-		foreach ($GLOBALS['CHARSET'][$table_translit] as $key => $val) {
-			$trans[$complexe][caractere_utf_8($key)] = $val;
-		}
-	}
-
-	return str_replace(array_keys($trans[$complexe]), array_values($trans[$complexe]), $texte);
+    static $trans = [];
+    if ($charset == 'AUTO') {
+        $charset = $GLOBALS['meta']['charset'];
+    }
+    if (!strlen($texte)) {
+        return $texte;
+    }
+
+    $table_translit = 'translit' . $complexe;
+
+    // 2. Translitterer grace a la table predefinie
+    if (!isset($trans[$complexe])) {
+        $trans[$complexe] = [];
+        load_charset($table_translit);
+        foreach ($GLOBALS['CHARSET'][$table_translit] as $key => $val) {
+            $trans[$complexe][caractere_utf_8($key)] = $val;
+        }
+    }
+
+    return str_replace(array_keys($trans[$complexe]), array_values($trans[$complexe]), $texte);
 }
 
 /**
@@ -898,14 +898,14 @@ 
  * @return string
  */
 function translitteration($texte, $charset = 'AUTO', $complexe = '') {
-	// 0. Supprimer les caracteres illegaux
-	include_spip('inc/filtres');
-	$texte = corriger_caracteres($texte);
+    // 0. Supprimer les caracteres illegaux
+    include_spip('inc/filtres');
+    $texte = corriger_caracteres($texte);
 
-	// 1. Passer le charset et les &eacute en utf-8
-	$texte = unicode_to_utf_8(html2unicode(charset2unicode($texte, $charset)));
+    // 1. Passer le charset et les &eacute en utf-8
+    $texte = unicode_to_utf_8(html2unicode(charset2unicode($texte, $charset)));
 
-	return translitteration_rapide($texte, $charset, $complexe);
+    return translitteration_rapide($texte, $charset, $complexe);
 }
 
 /**
@@ -920,17 +920,17 @@ 
  * @return string
  */
 function translitteration_complexe($texte, $chiffres = false) {
-	$texte = translitteration($texte, 'AUTO', 'complexe');
+    $texte = translitteration($texte, 'AUTO', 'complexe');
 
-	if ($chiffres) {
-		$texte = preg_replace_callback(
-			"/[aeiuoyd]['`?~.^+(-]{1,2}/S",
-			fn($m) => translitteration_chiffree($m[0]),
-			$texte
-		);
-	}
+    if ($chiffres) {
+        $texte = preg_replace_callback(
+            "/[aeiuoyd]['`?~.^+(-]{1,2}/S",
+            fn($m) => translitteration_chiffree($m[0]),
+            $texte
+        );
+    }
 
-	return $texte;
+    return $texte;
 }
 
 /**
@@ -942,7 +942,7 @@ 
  * @return string
  */
 function translitteration_chiffree($car) {
-	return strtr($car, "'`?~.^+(-", '123456789');
+    return strtr($car, "'`?~.^+(-", '123456789');
 }
 
 
@@ -955,7 +955,7 @@ 
  *    true s'il a un BOM
  **/
 function bom_utf8($texte) {
-	return (substr($texte, 0, 3) == chr(0xEF) . chr(0xBB) . chr(0xBF));
+    return (substr($texte, 0, 3) == chr(0xEF) . chr(0xBB) . chr(0xBF));
 }
 
 /**
@@ -972,21 +972,21 @@ 
  *     true si c'est le cas
  **/
 function is_utf8($string) {
-	return !strlen(
-		preg_replace(
-			',[\x09\x0A\x0D\x20-\x7E]'            # ASCII
-			. '|[\xC2-\xDF][\x80-\xBF]'             # non-overlong 2-byte
-			. '|\xE0[\xA0-\xBF][\x80-\xBF]'         # excluding overlongs
-			. '|[\xE1-\xEC\xEE\xEF][\x80-\xBF]{2}'  # straight 3-byte
-			. '|\xED[\x80-\x9F][\x80-\xBF]'         # excluding surrogates
-			. '|\xF0[\x90-\xBF][\x80-\xBF]{2}'      # planes 1-3
-			. '|[\xF1-\xF3][\x80-\xBF]{3}'          # planes 4-15
-			. '|\xF4[\x80-\x8F][\x80-\xBF]{2}'      # plane 16
-			. ',sS',
-			'',
-			$string
-		)
-	);
+    return !strlen(
+        preg_replace(
+            ',[\x09\x0A\x0D\x20-\x7E]'            # ASCII
+            . '|[\xC2-\xDF][\x80-\xBF]'             # non-overlong 2-byte
+            . '|\xE0[\xA0-\xBF][\x80-\xBF]'         # excluding overlongs
+            . '|[\xE1-\xEC\xEE\xEF][\x80-\xBF]{2}'  # straight 3-byte
+            . '|\xED[\x80-\x9F][\x80-\xBF]'         # excluding surrogates
+            . '|\xF0[\x90-\xBF][\x80-\xBF]{2}'      # planes 1-3
+            . '|[\xF1-\xF3][\x80-\xBF]{3}'          # planes 4-15
+            . '|\xF4[\x80-\x8F][\x80-\xBF]{2}'      # plane 16
+            . ',sS',
+            '',
+            $string
+        )
+    );
 }
 
 /**
@@ -998,13 +998,13 @@ 
  *     true si c'est le cas
  **/
 function is_ascii($string) {
-	return !strlen(
-		preg_replace(
-			',[\x09\x0A\x0D\x20-\x7E],sS',
-			'',
-			$string
-		)
-	);
+    return !strlen(
+        preg_replace(
+            ',[\x09\x0A\x0D\x20-\x7E],sS',
+            '',
+            $string
+        )
+    );
 }
 
 /**
@@ -1023,53 +1023,53 @@ 
  **/
 function transcoder_page($texte, $headers = '') {
 
-	// Si tout est < 128 pas la peine d'aller plus loin
-	if (is_ascii($texte)) {
-		#spip_log('charset: ascii');
-		return $texte;
-	}
-
-	if (bom_utf8($texte)) {
-		// Reconnaitre le BOM utf-8 (0xEFBBBF)
-		$charset = 'utf-8';
-		$texte = substr($texte, 3);
-	} elseif (preg_match(',<[?]xml[^>]*encoding[^>]*=[^>]*([-_a-z0-9]+?),UimsS', $texte, $regs)) {
-		// charset precise par le contenu (xml)
-		$charset = trim(strtolower($regs[1]));
-	} elseif (
-		// charset precise par le contenu (html)
-		preg_match(',<(meta|html|body)[^>]*charset[^>]*=[^>]*([#-_a-z0-9]+?),UimsS', $texte, $regs)
-		# eviter toute balise SPIP tel que #CHARSET ou #CONFIG d'un squelette
-		and false === strpos($regs[2], '#')
-		and $tmp = trim(strtolower($regs[2]))
-	) {
-		$charset = $tmp;
-	} elseif (preg_match(',charset=([-_a-z0-9]+),i', $headers, $regs)) {
-		// charset de la reponse http
-		$charset = trim(strtolower($regs[1]));
-	} else {
-		$charset = '';
-	}
-
-
-	// normaliser les noms du shif-jis japonais
-	if (preg_match(',^(x|shift)[_-]s?jis$,i', $charset)) {
-		$charset = 'shift-jis';
-	}
-
-	if ($charset) {
-		spip_log("charset: $charset");
-	} else {
-		// valeur par defaut
-		if (is_utf8($texte)) {
-			$charset = 'utf-8';
-		} else {
-			$charset = 'iso-8859-1';
-		}
-		spip_log("charset probable: $charset");
-	}
-
-	return importer_charset($texte, $charset);
+    // Si tout est < 128 pas la peine d'aller plus loin
+    if (is_ascii($texte)) {
+        #spip_log('charset: ascii');
+        return $texte;
+    }
+
+    if (bom_utf8($texte)) {
+        // Reconnaitre le BOM utf-8 (0xEFBBBF)
+        $charset = 'utf-8';
+        $texte = substr($texte, 3);
+    } elseif (preg_match(',<[?]xml[^>]*encoding[^>]*=[^>]*([-_a-z0-9]+?),UimsS', $texte, $regs)) {
+        // charset precise par le contenu (xml)
+        $charset = trim(strtolower($regs[1]));
+    } elseif (
+        // charset precise par le contenu (html)
+        preg_match(',<(meta|html|body)[^>]*charset[^>]*=[^>]*([#-_a-z0-9]+?),UimsS', $texte, $regs)
+        # eviter toute balise SPIP tel que #CHARSET ou #CONFIG d'un squelette
+        and false === strpos($regs[2], '#')
+        and $tmp = trim(strtolower($regs[2]))
+    ) {
+        $charset = $tmp;
+    } elseif (preg_match(',charset=([-_a-z0-9]+),i', $headers, $regs)) {
+        // charset de la reponse http
+        $charset = trim(strtolower($regs[1]));
+    } else {
+        $charset = '';
+    }
+
+
+    // normaliser les noms du shif-jis japonais
+    if (preg_match(',^(x|shift)[_-]s?jis$,i', $charset)) {
+        $charset = 'shift-jis';
+    }
+
+    if ($charset) {
+        spip_log("charset: $charset");
+    } else {
+        // valeur par defaut
+        if (is_utf8($texte)) {
+            $charset = 'utf-8';
+        } else {
+            $charset = 'iso-8859-1';
+        }
+        spip_log("charset probable: $charset");
+    }
+
+    return importer_charset($texte, $charset);
 }
 
 
@@ -1093,26 +1093,26 @@ 
  *     Le texte coupé
  **/
 function spip_substr($c, $start = 0, $length = null) {
-	// Si ce n'est pas utf-8, utiliser substr
-	if ($GLOBALS['meta']['charset'] != 'utf-8') {
-		if ($length) {
-			return substr($c, $start, $length);
-		} else {
-			substr($c, $start);
-		}
-	}
-
-	// Si utf-8, voir si on dispose de mb_string
-	if (init_mb_string()) {
-		if ($length) {
-			return mb_substr($c, $start, $length);
-		} else {
-			return mb_substr($c, $start);
-		}
-	}
-
-	// Version manuelle (cf. ci-dessous)
-	return spip_substr_manuelle($c, $start, $length);
+    // Si ce n'est pas utf-8, utiliser substr
+    if ($GLOBALS['meta']['charset'] != 'utf-8') {
+        if ($length) {
+            return substr($c, $start, $length);
+        } else {
+            substr($c, $start);
+        }
+    }
+
+    // Si utf-8, voir si on dispose de mb_string
+    if (init_mb_string()) {
+        if ($length) {
+            return mb_substr($c, $start, $length);
+        } else {
+            return mb_substr($c, $start);
+        }
+    }
+
+    // Version manuelle (cf. ci-dessous)
+    return spip_substr_manuelle($c, $start, $length);
 }
 
 
@@ -1131,40 +1131,40 @@ 
  **/
 function spip_substr_manuelle($c, $start, $length = null) {
 
-	// Cas pathologique
-	if ($length === 0) {
-		return '';
-	}
-
-	// S'il y a un demarrage, on se positionne
-	if ($start > 0) {
-		$c = substr($c, strlen(spip_substr_manuelle($c, 0, $start)));
-	} elseif ($start < 0) {
-		return spip_substr_manuelle($c, spip_strlen($c) + $start, $length);
-	}
-
-	if (!$length) {
-		return $c;
-	}
-
-	if ($length > 0) {
-		// on prend n fois la longueur desiree, pour etre surs d'avoir tout
-		// (un caractere utf-8 prenant au maximum n bytes)
-		$n = 0;
-		while (preg_match(',[\x80-\xBF]{' . (++$n) . '},', $c)) {
-			;
-		}
-		$c = substr($c, 0, $n * $length);
-		// puis, tant qu'on est trop long, on coupe...
-		while (($l = spip_strlen($c)) > $length) {
-			$c = substr($c, 0, $length - $l);
-		}
-
-		return $c;
-	}
-
-	// $length < 0
-	return spip_substr_manuelle($c, 0, spip_strlen($c) + $length);
+    // Cas pathologique
+    if ($length === 0) {
+        return '';
+    }
+
+    // S'il y a un demarrage, on se positionne
+    if ($start > 0) {
+        $c = substr($c, strlen(spip_substr_manuelle($c, 0, $start)));
+    } elseif ($start < 0) {
+        return spip_substr_manuelle($c, spip_strlen($c) + $start, $length);
+    }
+
+    if (!$length) {
+        return $c;
+    }
+
+    if ($length > 0) {
+        // on prend n fois la longueur desiree, pour etre surs d'avoir tout
+        // (un caractere utf-8 prenant au maximum n bytes)
+        $n = 0;
+        while (preg_match(',[\x80-\xBF]{' . (++$n) . '},', $c)) {
+            ;
+        }
+        $c = substr($c, 0, $n * $length);
+        // puis, tant qu'on est trop long, on coupe...
+        while (($l = spip_strlen($c)) > $length) {
+            $c = substr($c, 0, $length - $l);
+        }
+
+        return $c;
+    }
+
+    // $length < 0
+    return spip_substr_manuelle($c, 0, spip_strlen($c) + $length);
 }
 
 /**
@@ -1178,14 +1178,14 @@ 
  *     La chaîne avec une majuscule sur le premier mot
  */
 function spip_ucfirst($c) {
-	// Si on n'a pas mb_* ou si ce n'est pas utf-8, utiliser ucfirst
-	if (!init_mb_string() or $GLOBALS['meta']['charset'] != 'utf-8') {
-		return ucfirst($c);
-	}
+    // Si on n'a pas mb_* ou si ce n'est pas utf-8, utiliser ucfirst
+    if (!init_mb_string() or $GLOBALS['meta']['charset'] != 'utf-8') {
+        return ucfirst($c);
+    }
 
-	$lettre1 = mb_strtoupper(spip_substr($c, 0, 1));
+    $lettre1 = mb_strtoupper(spip_substr($c, 0, 1));
 
-	return $lettre1 . spip_substr($c, 1);
+    return $lettre1 . spip_substr($c, 1);
 }
 
 /**
@@ -1199,12 +1199,12 @@ 
  *     La chaîne en minuscules
  */
 function spip_strtolower($c) {
-	// Si on n'a pas mb_* ou si ce n'est pas utf-8, utiliser strtolower
-	if (!init_mb_string() or $GLOBALS['meta']['charset'] != 'utf-8') {
-		return strtolower($c);
-	}
+    // Si on n'a pas mb_* ou si ce n'est pas utf-8, utiliser strtolower
+    if (!init_mb_string() or $GLOBALS['meta']['charset'] != 'utf-8') {
+        return strtolower($c);
+    }
 
-	return mb_strtolower($c);
+    return mb_strtolower($c);
 }
 
 /**
@@ -1218,23 +1218,23 @@ 
  *     Longueur de la chaîne
  */
 function spip_strlen($c) {
-	// On transforme les sauts de ligne pour ne pas compter deux caractères
-	$c = str_replace("\r\n", "\n", $c);
-
-	// Si ce n'est pas utf-8, utiliser strlen
-	if ($GLOBALS['meta']['charset'] != 'utf-8') {
-		return strlen($c);
-	}
-
-	// Sinon, utiliser mb_strlen() si disponible
-	if (init_mb_string()) {
-		return mb_strlen($c);
-	}
-
-	// Methode manuelle : on supprime les bytes 10......,
-	// on compte donc les ascii (0.......) et les demarrages
-	// de caracteres utf-8 (11......)
-	return strlen(preg_replace(',[\x80-\xBF],S', '', $c));
+    // On transforme les sauts de ligne pour ne pas compter deux caractères
+    $c = str_replace("\r\n", "\n", $c);
+
+    // Si ce n'est pas utf-8, utiliser strlen
+    if ($GLOBALS['meta']['charset'] != 'utf-8') {
+        return strlen($c);
+    }
+
+    // Sinon, utiliser mb_strlen() si disponible
+    if (init_mb_string()) {
+        return mb_strlen($c);
+    }
+
+    // Methode manuelle : on supprime les bytes 10......,
+    // on compte donc les ascii (0.......) et les demarrages
+    // de caracteres utf-8 (11......)
+    return strlen(preg_replace(',[\x80-\xBF],S', '', $c));
 }
 
 // Initialisation
@@ -1244,16 +1244,16 @@ 
 // dans les preg_replace pour ne pas casser certaines lettres accentuees :
 // en utf-8 chr(195).chr(160) = a` alors qu'en iso-latin chr(160) = nbsp
 if (
-	!isset($GLOBALS['meta']['pcre_u'])
-	or (isset($_GET['var_mode']) and !isset($_GET['var_profile']))
+    !isset($GLOBALS['meta']['pcre_u'])
+    or (isset($_GET['var_mode']) and !isset($_GET['var_profile']))
 ) {
-	include_spip('inc/meta');
-	ecrire_meta(
-		'pcre_u',
-		$u = (lire_config('charset', _DEFAULT_CHARSET) == 'utf-8'
-			and test_pcre_unicode())
-			? 'u' : ''
-	);
+    include_spip('inc/meta');
+    ecrire_meta(
+        'pcre_u',
+        $u = (lire_config('charset', _DEFAULT_CHARSET) == 'utf-8'
+            and test_pcre_unicode())
+            ? 'u' : ''
+    );
 }
 
 
@@ -1269,17 +1269,17 @@ 
  *     en unicode : &#128169;
  */
 function utf8_noplanes($x) {
-	$regexp_utf8_4bytes = '/(
+    $regexp_utf8_4bytes = '/(
       \xF0[\x90-\xBF][\x80-\xBF]{2}     # planes 1-3
    | [\xF1-\xF3][\x80-\xBF]{3}          # planes 4-15
    |  \xF4[\x80-\x8F][\x80-\xBF]{2}     # plane 16
 )/xS';
-	if (preg_match_all($regexp_utf8_4bytes, $x, $z, PREG_PATTERN_ORDER)) {
-		foreach ($z[0] as $k) {
-			$ku = utf_8_to_unicode($k);
-			$x = str_replace($k, $ku, $x);
-		}
-	}
-
-	return $x;
+    if (preg_match_all($regexp_utf8_4bytes, $x, $z, PREG_PATTERN_ORDER)) {
+        foreach ($z[0] as $k) {
+            $ku = utf_8_to_unicode($k);
+            $x = str_replace($k, $ku, $x);
+        }
+    }
+
+    return $x;
 }

ecrire/inc/cvt_multietapes.php

Indentation +165 added lines, -165 removed lines

@@ -66,7 +66,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -77,46 +77,46 @@ 
  * @return array
  */
 function cvtmulti_recuperer_post_precedents($form) {
-	include_spip('inc/filtres');
-	if (
-		$form
-		and $c = _request('cvtm_prev_post')
-		and $c = decoder_contexte_ajax($c, $form)
-	) {
-		#var_dump($c);
+    include_spip('inc/filtres');
+    if (
+        $form
+        and $c = _request('cvtm_prev_post')
+        and $c = decoder_contexte_ajax($c, $form)
+    ) {
+        #var_dump($c);
 
-		# reinjecter dans la bonne variable pour permettre de retrouver
-		# toutes les saisies dans un seul tableau
-		if ($_SERVER['REQUEST_METHOD'] == 'POST') {
-			$store = &$_POST;
-		} else {
-			$store = &$_GET;
-		}
+        # reinjecter dans la bonne variable pour permettre de retrouver
+        # toutes les saisies dans un seul tableau
+        if ($_SERVER['REQUEST_METHOD'] == 'POST') {
+            $store = &$_POST;
+        } else {
+            $store = &$_GET;
+        }
 
-		foreach ($c as $k => $v) { // on ecrase pas si saisi a nouveau !
-		if (!isset($store[$k])) {
-				$_REQUEST[$k] = $store[$k] = $v;
-		} // mais si tableau des deux cotes, on merge avec priorite a la derniere saisie
-			elseif (
-				is_array($store[$k])
-				and is_array($v)
-				and $z = array_keys($v)
-				and !is_numeric(reset($z))
-				and $z = array_keys($store[$k])
-				and !is_numeric(reset($z))
-			) {
-				$_REQUEST[$k] = $store[$k] = array_merge($v, $store[$k]);
-			}
-		}
+        foreach ($c as $k => $v) { // on ecrase pas si saisi a nouveau !
+        if (!isset($store[$k])) {
+                $_REQUEST[$k] = $store[$k] = $v;
+        } // mais si tableau des deux cotes, on merge avec priorite a la derniere saisie
+            elseif (
+                is_array($store[$k])
+                and is_array($v)
+                and $z = array_keys($v)
+                and !is_numeric(reset($z))
+                and $z = array_keys($store[$k])
+                and !is_numeric(reset($z))
+            ) {
+                $_REQUEST[$k] = $store[$k] = array_merge($v, $store[$k]);
+            }
+        }
 
-		// vider pour eviter un second appel a verifier_n
-		// en cas de double implementation (unipotence)
-		set_request('cvtm_prev_post');
+        // vider pour eviter un second appel a verifier_n
+        // en cas de double implementation (unipotence)
+        set_request('cvtm_prev_post');
 
-		return [$c['_etape'], $c['_etapes']];
-	}
+        return [$c['_etape'], $c['_etapes']];
+    }
 
-	return false;
+    return false;
 }
 
 /**
@@ -129,28 +129,28 @@ 
  * @return array
  */
 function cvtmulti_sauver_post($form, $je_suis_poste, &$valeurs) {
-	if (!isset($valeurs['_cvtm_prev_post'])) {
-		$post = ['_etape' => $valeurs['_etape'], '_etapes' => $valeurs['_etapes']];
-		foreach (array_keys($valeurs) as $champ) {
-			if (substr($champ, 0, 1) !== '_') {
-				if ($je_suis_poste || (isset($valeurs['_forcer_request']) && $valeurs['_forcer_request'])) {
-					if (($v = _request($champ)) !== null) {
-						$post[$champ] = $v;
-					}
-				}
-			}
-		}
-		include_spip('inc/filtres');
-		$c = encoder_contexte_ajax($post, $form);
-		if (!isset($valeurs['_hidden'])) {
-			$valeurs['_hidden'] = '';
-		}
-		$valeurs['_hidden'] .= "<input type='hidden' name='cvtm_prev_post' value='$c' />";
-		// marquer comme fait, pour eviter double encodage (unipotence)
-		$valeurs['_cvtm_prev_post'] = true;
-	}
+    if (!isset($valeurs['_cvtm_prev_post'])) {
+        $post = ['_etape' => $valeurs['_etape'], '_etapes' => $valeurs['_etapes']];
+        foreach (array_keys($valeurs) as $champ) {
+            if (substr($champ, 0, 1) !== '_') {
+                if ($je_suis_poste || (isset($valeurs['_forcer_request']) && $valeurs['_forcer_request'])) {
+                    if (($v = _request($champ)) !== null) {
+                        $post[$champ] = $v;
+                    }
+                }
+            }
+        }
+        include_spip('inc/filtres');
+        $c = encoder_contexte_ajax($post, $form);
+        if (!isset($valeurs['_hidden'])) {
+            $valeurs['_hidden'] = '';
+        }
+        $valeurs['_hidden'] .= "<input type='hidden' name='cvtm_prev_post' value='$c' />";
+        // marquer comme fait, pour eviter double encodage (unipotence)
+        $valeurs['_cvtm_prev_post'] = true;
+    }
 
-	return $valeurs;
+    return $valeurs;
 }
 
 
@@ -164,14 +164,14 @@ 
  * @return array
  */
 function cvtmulti_formulaire_charger($flux) {
-	if (
-		is_array($flux['data'])
-		and isset($flux['data']['_etapes'])
-	) {
-		$flux['data'] = cvtmulti_formulaire_charger_etapes($flux['args'], $flux['data']);
-	}
+    if (
+        is_array($flux['data'])
+        and isset($flux['data']['_etapes'])
+    ) {
+        $flux['data'] = cvtmulti_formulaire_charger_etapes($flux['args'], $flux['data']);
+    }
 
-	return $flux;
+    return $flux;
 }
 
 /**
@@ -181,19 +181,19 @@ 
  * @return array
  */
 function cvtmulti_formulaire_charger_etapes($args, $valeurs) {
-	if (!isset($valeurs['_etape'])) {
-		$form = $args['form'];
-		$je_suis_poste = $args['je_suis_poste'];
-		$nb_etapes = $valeurs['_etapes'];
-		$etape = _request('_etape');
-		$etape = min(max($etape, 1), $nb_etapes);
-		set_request('_etape', $etape);
-		$valeurs['_etape'] = $etape;
+    if (!isset($valeurs['_etape'])) {
+        $form = $args['form'];
+        $je_suis_poste = $args['je_suis_poste'];
+        $nb_etapes = $valeurs['_etapes'];
+        $etape = _request('_etape');
+        $etape = min(max($etape, 1), $nb_etapes);
+        set_request('_etape', $etape);
+        $valeurs['_etape'] = $etape;
 
-		// sauver les posts de cette etape pour les avoir a la prochaine etape
-		$valeurs = cvtmulti_sauver_post($form, $je_suis_poste, $valeurs);
-	}
-	return $valeurs;
+        // sauver les posts de cette etape pour les avoir a la prochaine etape
+        $valeurs = cvtmulti_sauver_post($form, $je_suis_poste, $valeurs);
+    }
+    return $valeurs;
 }
 
 
@@ -206,8 +206,8 @@ 
  * @return array
  */
 function cvtmulti_formulaire_verifier($flux) {
-	$flux['data'] = cvtmulti_formulaire_verifier_etapes($flux['args'], $flux['data']);
-	return $flux;
+    $flux['data'] = cvtmulti_formulaire_verifier_etapes($flux['args'], $flux['data']);
+    return $flux;
 }
 
 /**
@@ -218,87 +218,87 @@ 
  * @return array
  */
 function cvtmulti_formulaire_verifier_etapes($args, $erreurs) {
-	#var_dump('Pipe verifier');
+    #var_dump('Pipe verifier');
 
-	if (
-		$form = $args['form']
-		and ($e = cvtmulti_recuperer_post_precedents($form)) !== false
-	) {
-		// recuperer l'etape saisie et le nombre d'etapes total
-		[$etape, $etapes] = $e;
-		$etape_demandee = intval(_request('aller_a_etape')); // possibilite de poster un entier dans aller_a_etape
+    if (
+        $form = $args['form']
+        and ($e = cvtmulti_recuperer_post_precedents($form)) !== false
+    ) {
+        // recuperer l'etape saisie et le nombre d'etapes total
+        [$etape, $etapes] = $e;
+        $etape_demandee = intval(_request('aller_a_etape')); // possibilite de poster un entier dans aller_a_etape
 
-		$args['etape_saisie'] = $etape;
-		$args['etapes'] = $etapes;
-		// lancer les verifs pour chaque etape deja saisie de 1 a $etape
-		$erreurs_etapes = [];
-		$derniere_etape_ok = 0;
-		$e = 0;
-		while ($e < max($etape, $etape_demandee - 1) and $e < $etapes) {
-			$e++;
-			$erreurs_etapes[$e] = [];
-			if ($verifier = charger_fonction("verifier_$e", "formulaires/$form/", true)) {
-				$erreurs_etapes[$e] = call_user_func_array($verifier, $args['args']);
-			} elseif ($verifier = charger_fonction('verifier_etape', "formulaires/$form/", true)) {
-				$a = $args['args'];
-				array_unshift($a, $e);
-				$erreurs_etapes[$e] = call_user_func_array($verifier, $a);
-			}
-			// et on appelle un pipeline dedie aux etapes, plus easy
-			$args['etape'] = $e;
-			$args['etape_demandee'] = $etape_demandee;
-			$erreurs_etapes[$e] = pipeline(
-				'formulaire_verifier_etape',
-				[
-					'args' => $args,
-					'data' => $erreurs_etapes[$e]
-				]
-			);
+        $args['etape_saisie'] = $etape;
+        $args['etapes'] = $etapes;
+        // lancer les verifs pour chaque etape deja saisie de 1 a $etape
+        $erreurs_etapes = [];
+        $derniere_etape_ok = 0;
+        $e = 0;
+        while ($e < max($etape, $etape_demandee - 1) and $e < $etapes) {
+            $e++;
+            $erreurs_etapes[$e] = [];
+            if ($verifier = charger_fonction("verifier_$e", "formulaires/$form/", true)) {
+                $erreurs_etapes[$e] = call_user_func_array($verifier, $args['args']);
+            } elseif ($verifier = charger_fonction('verifier_etape', "formulaires/$form/", true)) {
+                $a = $args['args'];
+                array_unshift($a, $e);
+                $erreurs_etapes[$e] = call_user_func_array($verifier, $a);
+            }
+            // et on appelle un pipeline dedie aux etapes, plus easy
+            $args['etape'] = $e;
+            $args['etape_demandee'] = $etape_demandee;
+            $erreurs_etapes[$e] = pipeline(
+                'formulaire_verifier_etape',
+                [
+                    'args' => $args,
+                    'data' => $erreurs_etapes[$e]
+                ]
+            );
 
-			if ($derniere_etape_ok == $e - 1 and !(is_countable($erreurs_etapes[$e]) ? count($erreurs_etapes[$e]) : 0)) {
-				$derniere_etape_ok = $e;
-			}
-			// possibilite de poster dans _retour_etape_x ou aller_a_etape
-			if (!is_null(_request("_retour_etape_$e"))) {
-				$etape_demandee = $e;
-			}
-			// Il se peut que les verifications ait décidé de faire sauter des étapes
-			if ($aller_a_etape = intval(_request('aller_a_etape'))) {
-				$etape_demandee = $aller_a_etape; // possibilite de poster un entier dans aller_a_etape
-			}
-		}
+            if ($derniere_etape_ok == $e - 1 and !(is_countable($erreurs_etapes[$e]) ? count($erreurs_etapes[$e]) : 0)) {
+                $derniere_etape_ok = $e;
+            }
+            // possibilite de poster dans _retour_etape_x ou aller_a_etape
+            if (!is_null(_request("_retour_etape_$e"))) {
+                $etape_demandee = $e;
+            }
+            // Il se peut que les verifications ait décidé de faire sauter des étapes
+            if ($aller_a_etape = intval(_request('aller_a_etape'))) {
+                $etape_demandee = $aller_a_etape; // possibilite de poster un entier dans aller_a_etape
+            }
+        }
 
 
-		// si la derniere etape OK etait la derniere
-		// on renvoie le flux inchange et ca declenche traiter
-		if (
-			$derniere_etape_ok == $etapes
-			and (!$etape_demandee or $etape_demandee >= $etapes)
-		) {
-			return $erreurs;
-		} else {
-			$etape = $derniere_etape_ok + 1;
-			if ($etape_demandee > 0 and $etape_demandee < $etape) {
-				$etape = $etape_demandee;
-			}
-			$etape = min($etape, $etapes);
-			#var_dump("prochaine etape $etape");
-			// retourner les erreurs de l'etape ciblee
-			$erreurs = $erreurs_etapes[$etape] ?? [];
-			// Ne pas se tromper dans le texte du message d'erreur : la clé '_etapes' n'est pas une erreur !
-			if ($erreurs) {
-				if (!isset($erreurs['message_erreur'])) {
-					$erreurs['message_erreur'] = singulier_ou_pluriel(is_countable($erreurs) ? count($erreurs) : 0, 'avis_1_erreur_saisie', 'avis_nb_erreurs_saisie');
-				}
-			} else {
-				$erreurs['message_erreur'] = '';
-			}
-			$erreurs['_etapes'] = "etape suivante $etape";
-			set_request('_etape', $etape);
-		}
-	}
+        // si la derniere etape OK etait la derniere
+        // on renvoie le flux inchange et ca declenche traiter
+        if (
+            $derniere_etape_ok == $etapes
+            and (!$etape_demandee or $etape_demandee >= $etapes)
+        ) {
+            return $erreurs;
+        } else {
+            $etape = $derniere_etape_ok + 1;
+            if ($etape_demandee > 0 and $etape_demandee < $etape) {
+                $etape = $etape_demandee;
+            }
+            $etape = min($etape, $etapes);
+            #var_dump("prochaine etape $etape");
+            // retourner les erreurs de l'etape ciblee
+            $erreurs = $erreurs_etapes[$etape] ?? [];
+            // Ne pas se tromper dans le texte du message d'erreur : la clé '_etapes' n'est pas une erreur !
+            if ($erreurs) {
+                if (!isset($erreurs['message_erreur'])) {
+                    $erreurs['message_erreur'] = singulier_ou_pluriel(is_countable($erreurs) ? count($erreurs) : 0, 'avis_1_erreur_saisie', 'avis_nb_erreurs_saisie');
+                }
+            } else {
+                $erreurs['message_erreur'] = '';
+            }
+            $erreurs['_etapes'] = "etape suivante $etape";
+            set_request('_etape', $etape);
+        }
+    }
 
-	return $erreurs;
+    return $erreurs;
 }
 
 /**
@@ -310,17 +310,17 @@ 
  * @return array
  */
 function cvtmulti_styliser($flux) {
-	if (
-		strncmp($flux['args']['fond'], 'formulaires/', 12) == 0
-		and isset($flux['args']['contexte']['_etapes'])
-		and isset($flux['args']['contexte']['_etape'])
-		and ($e = $flux['args']['contexte']['_etape']) > 1
-		and $ext = $flux['args']['ext']
-		and $f = $flux['data']
-		and file_exists($f . "_$e.$ext")
-	) {
-		$flux['data'] = $f . "_$e";
-	}
+    if (
+        strncmp($flux['args']['fond'], 'formulaires/', 12) == 0
+        and isset($flux['args']['contexte']['_etapes'])
+        and isset($flux['args']['contexte']['_etape'])
+        and ($e = $flux['args']['contexte']['_etape']) > 1
+        and $ext = $flux['args']['ext']
+        and $f = $flux['data']
+        and file_exists($f . "_$e.$ext")
+    ) {
+        $flux['data'] = $f . "_$e";
+    }
 
-	return $flux;
+    return $flux;
 }