");
$url_relecture = parametre_url(self(),'var_mode','preview','&');
$js = "";
if (!defined('_VAR_PREVIEW_EXCEPTION')){
$url_relecture = parametre_url($url_relecture,'var_relecture',previsu_cle_temporaire(),'&');
$label = "Relecture temporaire";
}
else {
$label = _T('previsualisation');
$js = "jQuery('.spip-previsu').html('Relecture temporaire');";
}
$js .= "jQuery('#spip-admin').append('$label');";
$js = "jQuery(function(){ $js });";
$js = "";
$flux = substr_replace($flux,$js,$p,0);
}
return $flux;
}
if (!defined('_ECRIRE_INC_VERSION')) return;
/**
* une fonction qui regarde si $texte est une chaine de langue
* de la forme <:qqch:>
* si oui applique _T()
* si non applique typo() suivant le mode choisi
*
* @param unknown_type $valeur Une valeur à tester. Si c'est un tableau, la fonction s'appliquera récursivement dessus.
* @param string $mode_typo Le mode d'application de la fonction typo(), avec trois valeurs possibles "toujours", "jamais" ou "multi".
* @return unknown_type Retourne la valeur éventuellement modifiée.
*/
if (!function_exists('_T_ou_typo')) {
function _T_ou_typo($valeur, $mode_typo='toujours') {
// Si la valeur est bien une chaine (et pas non plus un entier déguisé)
if (is_string($valeur) and !intval($valeur)){
// Si la chaine est du type <:truc:> on passe à _T()
if (preg_match('/^\<:(.*?):\>$/', $valeur, $match))
$valeur = _T($match[1]);
// Sinon on la passe a typo()
else {
if (!in_array($mode_typo, array('toujours', 'multi', 'jamais')))
$mode_typo = 'toujours';
if ($mode_typo == 'toujours' or ($mode_typo == 'multi' and strpos($valeur, '') !== false)){
include_spip('inc/texte');
$valeur = typo($valeur);
}
}
}
// Si c'est un tableau, on reapplique la fonction récursivement
elseif (is_array($valeur)){
foreach ($valeur as $cle => $valeur2){
$valeur[$cle] = _T_ou_typo($valeur2, $mode_typo);
}
}
return $valeur;
}
}
/*
* Insère toutes les valeurs du tableau $arr2 après (ou avant) $cle dans le tableau $arr1.
* Si $cle n'est pas trouvé, les valeurs de $arr2 seront ajoutés à la fin de $arr1.
*
* La fonction garde autant que possible les associations entre les clés. Elle fonctionnera donc aussi bien
* avec des tableaux à index numérique que des tableaux associatifs.
* Attention tout de même, elle utilise array_merge() donc les valeurs de clés étant en conflits seront écrasées.
*
* @param array $arr1 Tableau dans lequel se fera l'insertion
* @param unknown_type $cle Clé de $arr1 après (ou avant) laquelle se fera l'insertion
* @param array $arr2 Tableau contenant les valeurs à insérer
* @param bool $avant Indique si l'insertion se fait avant la clé (par défaut c'est après)
* @return array Retourne le tableau avec l'insertion
*/
if (!function_exists('spip_array_insert')) {
function spip_array_insert($arr1, $cle, $arr2, $avant=false){
$index = array_search($cle, array_keys($arr1));
if($index === false){
$index = count($arr1); // insert @ end of array if $key not found
}
else {
if(!$avant){
$index++;
}
}
$fin = array_splice($arr1, $index);
return array_merge($arr1, $arr2, $fin);
}
}
/*
* Une fonction extrêmement pratique, mais qui n'est disponible qu'à partir de PHP 5.3 !
* cf. http://www.php.net/manual/fr/function.array-replace-recursive.php
*/
if (!function_exists('array_replace_recursive')){
function array_replace_recursive($array, $array1){
function recurse($array, $array1){
foreach ($array1 as $key => $value){
// create new key in $array, if it is empty or not an array
if (!isset($array[$key]) || (isset($array[$key]) && !is_array($array[$key])))
$array[$key] = array();
// overwrite the value in the base array
if (is_array($value))
$value = recurse($array[$key], $value);
$array[$key] = $value;
}
return $array;
}
// handle the arguments, merge one by one
$args = func_get_args();
$array = $args[0];
if (!is_array($array))
return $array;
for ($i = 1; $i < count($args); $i++)
if (is_array($args[$i]))
$array = recurse($array, $args[$i]);
return $array;
}
}
if (!function_exists('text_truncate')) {
/**
* Truncates text.
*
* Cuts a string to the length of $length and replaces the last characters
* with the ending if the text is longer than length.
*
* ### Options:
*
* - `ending` Will be used as Ending and appended to the trimmed string
* - `exact` If false, $text will not be cut mid-word
* - `html` If true, HTML tags would be handled correctly
*
* @param string $text String to truncate.
* @param integer $length Length of returned string, including ellipsis.
* @param array $options An array of html attributes and options.
* @return string Trimmed string.
* @access public
* @link http://book.cakephp.org/view/1469/Text#truncate-1625
*/
function text_truncate($text, $length = 100, $options = array()) {
$default = array(
'ending' => '...', 'exact' => true, 'html' => false
);
$options = array_merge($default, $options);
extract($options);
if ($html) {
if (mb_strlen(preg_replace('/<.*?>/', '', $text)) <= $length) {
return $text;
}
$totalLength = mb_strlen(strip_tags($ending));
$openTags = array();
$truncate = '';
preg_match_all('/(<\/?([\w+]+)[^>]*>)?([^<>]*)/', $text, $tags, PREG_SET_ORDER);
foreach ($tags as $tag) {
if (!preg_match('/img|br|input|hr|area|base|basefont|col|frame|isindex|link|meta|param/s', $tag[2])) {
if (preg_match('/<[\w]+[^>]*>/s', $tag[0])) {
array_unshift($openTags, $tag[2]);
} else if (preg_match('/<\/([\w]+)[^>]*>/s', $tag[0], $closeTag)) {
$pos = array_search($closeTag[1], $openTags);
if ($pos !== false) {
array_splice($openTags, $pos, 1);
}
}
}
$truncate .= $tag[1];
$contentLength = mb_strlen(preg_replace('/&[0-9a-z]{2,8};|&#[0-9]{1,7};|&#x[0-9a-f]{1,6};/i', ' ', $tag[3]));
if ($contentLength + $totalLength > $length) {
$left = $length - $totalLength;
$entitiesLength = 0;
if (preg_match_all('/&[0-9a-z]{2,8};|&#[0-9]{1,7};|&#x[0-9a-f]{1,6};/i', $tag[3], $entities, PREG_OFFSET_CAPTURE)) {
foreach ($entities[0] as $entity) {
if ($entity[1] + 1 - $entitiesLength <= $left) {
$left--;
$entitiesLength += mb_strlen($entity[0]);
} else {
break;
}
}
}
$truncate .= mb_substr($tag[3], 0 , $left + $entitiesLength);
break;
} else {
$truncate .= $tag[3];
$totalLength += $contentLength;
}
if ($totalLength >= $length) {
break;
}
}
} else {
if (mb_strlen($text) <= $length) {
return $text;
} else {
$truncate = mb_substr($text, 0, $length - mb_strlen($ending));
}
}
if (!$exact) {
$spacepos = mb_strrpos($truncate, ' ');
if (isset($spacepos)) {
if ($html) {
$bits = mb_substr($truncate, $spacepos);
preg_match_all('/<\/([a-z]+)>/', $bits, $droppedTags, PREG_SET_ORDER);
if (!empty($droppedTags)) {
foreach ($droppedTags as $closingTag) {
if (!in_array($closingTag[1], $openTags)) {
array_unshift($openTags, $closingTag[1]);
}
}
}
}
$truncate = mb_substr($truncate, 0, $spacepos);
}
}
$truncate .= $ending;
if ($html) {
foreach ($openTags as $tag) {
$truncate .= '';
}
}
return $truncate;
}
}