From a0fc1969a01fa7cbe8324f305d95ede82333bbd6 Mon Sep 17 00:00:00 2001
From: Cerdic <cedric@yterium.com>
Date: Tue, 27 Jan 2009 18:08:41 +0000
Subject: [PATCH] "les filtres images et couleur avances de SPIP sortent du
core pour leur permettre d'evoluer et de s'enrichir plus vite A cette
occasion, on rationalise les nommages : - les fonction nommees image_xxx
prennent toutes en entree une image et rendent une image (dans un squelette,
les filtres peuvent s'appliqer aussi sur du #TEXTE) Elles sont chainables. -
les fonctions nommees couleur_xxx prennent toutes en entree une couleur et
rendent une couleur (hexa sur 6 caracteres) Elles sont chainables.
Toutes les fonctions commencant par image_ ou couleur_ et ne correspondant pas a cette description sont prefixees par un _ et deplacees dans
inc/filtres_images_lib_mini.php
qui est la librairie mini de fonctions image et couleur non utilisables dans les squelettes
La compatibilite des anciens nommages pourra etre obtenue avec le plugin des filtres images du _core_
"
---
.gitattributes | 2 +-
ecrire/action/tester.php | 6 +-
ecrire/exec/accueil.php | 2 +-
ecrire/inc/afficher_objets.php | 2 +-
ecrire/inc/filtres.php | 83 +-
ecrire/inc/filtres_images.php | 2545 ------------------------
ecrire/inc/filtres_images_lib_mini.php | 909 +++++++++
ecrire/inc/filtres_images_mini.php | 745 +------
ecrire/inc/math.php | 6 +-
ecrire/inc/vieilles_defs.php | 2 +-
prive/style_prive.html | 6 +-
prive/style_prive_formulaires.html | 14 +-
12 files changed, 970 insertions(+), 3352 deletions(-)
delete mode 100644 ecrire/inc/filtres_images.php
create mode 100644 ecrire/inc/filtres_images_lib_mini.php
diff --git a/.gitattributes b/.gitattributes
index 9116959d79..e4d4784511 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -213,7 +213,7 @@ ecrire/inc/editer_auteurs.php -text
ecrire/inc/editer_mots.php -text
ecrire/inc/envoyer_mail.php -text
ecrire/inc/export.php -text
-ecrire/inc/filtres_images.php -text
+ecrire/inc/filtres_images_lib_mini.php -text
ecrire/inc/filtres_images_mini.php -text
ecrire/inc/filtres_mini.php -text
ecrire/inc/formater_article.php -text
diff --git a/ecrire/action/tester.php b/ecrire/action/tester.php
index 0f57e26fc7..fc997416b5 100644
--- a/ecrire/action/tester.php
+++ b/ecrire/action/tester.php
@@ -126,12 +126,12 @@ function action_tester_dist() {
// et maintenant envoyer la vignette de tests
if (in_array($arg,array("gd1","gd2","imagick","convert","netpbm"))) {
include_spip('inc/filtres');
- include_spip('inc/filtres_images');
+ include_spip('inc/filtres_images_mini');
$taille_preview = 150;
- $image = image_valeurs_trans(_DIR_IMG_PACK.'test_image.jpg',"reduire-$taille_preview-$taille_preview",'jpg');
+ $image = _image_valeurs_trans(_DIR_IMG_PACK.'test_image.jpg',"reduire-$taille_preview-$taille_preview",'jpg');
$image['fichier_dest']=_DIR_VAR."test_$arg";
- if ($preview = image_creer_vignette($image, $taille_preview, $taille_preview, $arg, true)
+ if ($preview = _image_creer_vignette($image, $taille_preview, $taille_preview, $arg, true)
AND ($preview['width'] * $preview['height'] > 0))
redirige_par_entete($preview['fichier']);
}
diff --git a/ecrire/exec/accueil.php b/ecrire/exec/accueil.php
index fd71e511df..c2e2f43b24 100644
--- a/ecrire/exec/accueil.php
+++ b/ecrire/exec/accueil.php
@@ -264,7 +264,7 @@ function etat_base_accueil()
$chercher_logo = charger_fonction('chercher_logo', 'inc');
if ($r = $chercher_logo(0, 'id_syndic', 'on')) {
list($fid, $dir, $nom, $format) = $r;
- include_spip('inc/filtres_images');
+ include_spip('inc/filtres_images_mini');
$r = image_reduire("<img src='$fid' alt='' />", 170, 170);
if ($r)
$res ="<div style='text-align:center; margin-bottom: 5px;'>$r</div>";
diff --git a/ecrire/inc/afficher_objets.php b/ecrire/inc/afficher_objets.php
index ad8644f382..fe4cd8d25e 100644
--- a/ecrire/inc/afficher_objets.php
+++ b/ecrire/inc/afficher_objets.php
@@ -289,7 +289,7 @@ function afficher_objet_boucle($row, $own)
OR $chercher_logo = charger_fonction_logo_if())
if ($logo = $chercher_logo($id_objet, $primary, 'on')) {
list($fid, $dir, $nom, $format) = $logo;
- include_spip('inc/filtres_images');
+ include_spip('inc/filtres_images_mini');
$logo = image_reduire("<img src='$fid' alt='' />", 26, 20);
if ($logo)
$flogo = "\n<span style='float: $spip_lang_right; margin-top: -2px; margin-bottom: -2px;'>$logo</span>";
diff --git a/ecrire/inc/filtres.php b/ecrire/inc/filtres.php
index 632e54c8a9..d2380e5670 100644
--- a/ecrire/inc/filtres.php
+++ b/ecrire/inc/filtres.php
@@ -170,49 +170,17 @@ function version_svn_courante($dir) {
return 0;
}
-//
-// Fonctions graphiques
-//
// La matrice est necessaire pour ne filtrer _que_ des fonctions definies dans filtres_images
// et laisser passer les fonctions personnelles baptisees image_...
-$GLOBALS['spip_matrice']['image_valeurs_trans'] = true;
-$GLOBALS['spip_matrice']['image_graver'] = true;
-$GLOBALS['spip_matrice']['image_reduire'] = true;
-$GLOBALS['spip_matrice']['image_reduire_par'] = true;
-$GLOBALS['spip_matrice']['image_recadre'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_alpha'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_flip_vertical'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_flip_horizontal'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_masque'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_nb'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_flou'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_RotateBicubic'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_rotation'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_distance_pixel'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_decal_couleur'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_gamma'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_decal_couleur_127'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_sepia'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_aplatir'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_format'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_couleur_extraire'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_select'] = true;
-$GLOBALS['spip_matrice']['image_renforcement'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_imagick'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['image_ramasse_miettes'] = true;
-$GLOBALS['spip_matrice']['image_passe_partout'] = true;
-
-$GLOBALS['spip_matrice']['couleur_dec_to_hex'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_hex_to_dec'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_extreme'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_inverser'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_eclaircir'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_foncer'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_foncer_si_claire'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_eclaircir_si_foncee'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_saturation'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_web'] = 'inc/filtres_images.php';
-$GLOBALS['spip_matrice']['couleur_4096'] = 'inc/filtres_images.php';
+$GLOBALS['spip_matrice']['image_graver'] = 'inc/filtres_images_mini.php';
+$GLOBALS['spip_matrice']['image_select'] = 'inc/filtres_images_mini.php';
+$GLOBALS['spip_matrice']['image_reduire'] = 'inc/filtres_images_mini.php';
+$GLOBALS['spip_matrice']['image_reduire_par'] = 'inc/filtres_images_mini.php';
+$GLOBALS['spip_matrice']['image_passe_partout'] = 'inc/filtres_images_mini.php';
+
+$GLOBALS['spip_matrice']['couleur_html_to_hex'] = 'inc/filtres_images_mini.php';
+$GLOBALS['spip_matrice']['couleur_foncer'] = 'inc/filtres_images_mini.php';
+$GLOBALS['spip_matrice']['couleur_eclaircir'] = 'inc/filtres_images_mini.php';
// charge les fonctions graphiques et applique celle demandee
// http://doc.spip.org/@filtrer
@@ -300,37 +268,16 @@ function image_filtrer($args){
}
// pour les feuilles de style
-function image_bg ($img, $couleur, $pos="") {
- if (!function_exists("imagecreatetruecolor"))
+function filtre_background_image_dist ($img, $couleur, $pos="") {
+ if (!function_exists("imagecreatetruecolor")
+ OR !include_spip('filtres/images_transforme')
+ OR !function_exists('image_sepia')
+ OR !function_exists('image_aplatir')
+ )
return "background-color: #$couleur;";
- include_spip('inc/filtres_images');
return "background: url(".url_absolue(extraire_attribut(image_aplatir(image_sepia($img, $couleur),"gif","cccccc", 64, true), "src")).") $pos;";
}
-// Pour assurer la compatibilite avec les anciens nom des filtres image_xxx
-// commencent par "image_"
-// http://doc.spip.org/@reduire_image
-function reduire_image($texte, $taille = -1, $taille_y = -1) {
- return filtrer('image_graver',
- filtrer('image_reduire',$texte, $taille, $taille_y)
- );
-}
-// http://doc.spip.org/@valeurs_image_trans
-function valeurs_image_trans($img, $effet, $forcer_format = false) {
- include_spip('inc/filtres_images');
- return image_valeurs_trans($img, $effet, $forcer_format = false);
-}
-// http://doc.spip.org/@couleur_extraire
-function couleur_extraire($img, $x=10, $y=6) {
- return filtrer('image_couleur_extraire',$img, $x, $y);
-}
-// http://doc.spip.org/@image_typo
-function image_typo() {
- include_spip('inc/filtres_images');
- $tous = func_get_args();
- return call_user_func_array('produire_image_typo', $tous);
-}
-
//
// Retourner taille d'une image
// pour les filtres |largeur et |hauteur
diff --git a/ecrire/inc/filtres_images.php b/ecrire/inc/filtres_images.php
deleted file mode 100644
index a0a779737e..0000000000
--- a/ecrire/inc/filtres_images.php
+++ /dev/null
@@ -1,2545 +0,0 @@
-<?php
-/***************************************************************************\
- * SPIP, Systeme de publication pour l'internet *
- * *
- * Copyright (c) 2001-2009 *
- * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
- * *
- * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
- * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
-\***************************************************************************/
-
-include_spip('inc/filtres_images_mini');
-
-// Transforme l'image en PNG transparent
-// alpha = 0: aucune transparence
-// alpha = 127: completement transparent
-// http://doc.spip.org/@image_alpha
-function image_alpha($im, $alpha = 63)
-{
- $fonction = array('image_alpha', func_get_args());
- $image = image_valeurs_trans($im, "alpha-$alpha", "png",$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- // Creation de l'image en deux temps
- // de facon a conserver les GIF transparents
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im2 = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im2, false);
- @imagesavealpha($im2,true);
- $color_t = ImageColorAllocateAlpha( $im2, 255, 255, 255 , 127 );
- imagefill ($im2, 0, 0, $color_t);
- imagecopy($im2, $im, 0, 0, 0, 0, $x_i, $y_i);
-
- $im_ = imagecreatetruecolor($x_i, $y_i);
- imagealphablending ($im_, FALSE );
- imagesavealpha ( $im_, TRUE );
-
-
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y = 0; $y < $y_i; $y++) {
- $rgb = ImageColorAt($im2, $x, $y);
-
- if (function_exists('imagecolorallocatealpha')) {
- $a = ($rgb >> 24) & 0xFF;
- $r = ($rgb >> 16) & 0xFF;
- $g = ($rgb >> 8) & 0xFF;
- $b = $rgb & 0xFF;
-
-
- $a_ = $alpha + $a - round($a*$alpha/127);
- $rgb = imagecolorallocatealpha($im_, $r, $g, $b, $a_);
- }
- imagesetpixel ( $im_, $x, $y, $rgb );
- }
- }
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- imagedestroy($im2);
- }
-
-
- return image_ecrire_tag($image,array('src'=>$dest));
-
-}
-
-// http://doc.spip.org/@image_recadre
-function image_recadre($im,$width,$height,$position='center', $background_color='white')
-{
- $fonction = array('image_recadre', func_get_args());
- $image = image_valeurs_trans($im, "recadre-$width-$height-$position-$background_color",false,$fonction);
-
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- if ($width==0) $width=$x_i;
- if ($height==0) $height=$y_i;
-
- $offset_width = $x_i-$width;
- $offset_height = $y_i-$height;
- $position=strtolower($position);
- if (strpos($position,'left')!==FALSE){
- if (preg_match(';left=(\d{1}\d+);', $position, $left)){
- $offset_width=$left[1];
- }
- else{
- $offset_width=0;
- }
- }
- elseif (strpos($position,'right')!==FALSE)
- $offset_width=$offset_width;
- else
- $offset_width=intval(ceil($offset_width/2));
-
- if (strpos($position,'top')!==FALSE){
- if (preg_match(';top=(\d{1}\d+);', $position, $top)){
- $offset_height=$top[1];
- }
- else{
- $offset_height=0;
- }
- }
- elseif (strpos($position,'bottom')!==FALSE)
- $offset_height=$offset_height;
- else
- $offset_height=intval(ceil($offset_height/2));
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($width, $height);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
-
- if ($background_color=='transparent')
- $color_t = imagecolorallocatealpha( $im_, 255, 255, 255 , 127 );
- else {
- $bg = couleur_hex_to_dec($background_color);
- $color_t = imagecolorallocate( $im_, $bg['red'], $bg['green'], $bg['blue']);
- }
- imagefill ($im_, 0, 0, $color_t);
- imagecopy($im_, $im, max(0,-$offset_width), max(0,-$offset_height), max(0,$offset_width), max(0,$offset_height), min($width,$x_i), min($height,$y_i));
-
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest,'width'=>$width,'height'=>$height));
-}
-
-// http://doc.spip.org/@image_flip_vertical
-function image_flip_vertical($im)
-{
- $fonction = array('image_flip_vertical', func_get_args());
- $image = image_valeurs_trans($im, "flip_v", false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
-
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y = 0; $y < $y_i; $y++) {
- imagecopy($im_, $im, $x_i - $x - 1, $y, $x, $y, 1, 1);
- }
- }
-
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-// http://doc.spip.org/@image_flip_horizontal
-function image_flip_horizontal($im)
-{
- $fonction = array('image_flip_horizontal', func_get_args());
- $image = image_valeurs_trans($im, "flip_h",false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
-
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y = 0; $y < $y_i; $y++) {
- imagecopy($im_, $im, $x, $y_i - $y - 1, $x, $y, 1, 1);
- }
- }
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-// http://doc.spip.org/@image_masque
-function image_masque($im, $masque, $pos="") {
- // Passer, en plus de l'image d'origine,
- // une image de "masque": un fichier PNG24 transparent.
- // Le decoupage se fera selon la transparence du "masque",
- // et les couleurs seront eclaircies/foncees selon de couleur du masque.
- // Pour ne pas modifier la couleur, le masque doit etre en gris 50%.
- //
- // Si l'image source est plus grande que le masque, alors cette image est reduite a la taille du masque.
- // Sinon, c'est la taille de l'image source qui est utilisee.
- //
- // $pos est une variable libre, qui permet de passer left=..., right=..., bottom=..., top=...
- // dans ce cas, le pasque est place a ces positions sur l'image d'origine,
- // et evidemment cette image d'origine n'est pas redimensionnee
- //
- // Positionnement horizontal: text-align=left, right, center
- // Positionnement vertical : vertical-align: top, bottom, middle
- // (les positionnements left, right, top, left sont relativement inutiles, mais coherence avec CSS)
- //
- // Choix du mode de fusion: mode=masque, normal, eclaircir, obscurcir, produit, difference
- // masque: mode par defaut
- // normal: place la nouvelle image par dessus l'ancienne
- // eclaircir: place uniquement les points plus clairs
- // obscurcir: place uniquement les points plus fonc'es
- // produit: multiplie par le masque (points noirs rendent l'image noire, points blancs ne changent rien)
- // difference: remplit avec l'ecart entre les couleurs d'origine et du masque
-
- $mode = "masque";
-
-
- $numargs = func_num_args();
- $arg_list = func_get_args();
- $texte = $arg_list[0];
- for ($i = 1; $i < $numargs; $i++) {
- if ( ($p = strpos($arg_list[$i],"=")) !==false) {
- $nom_variable = substr($arg_list[$i], 0, $p);
- $val_variable = substr($arg_list[$i], $p+1);
- $variable["$nom_variable"] = $val_variable;
- $defini["$nom_variable"] = 1;
- }
- }
- if ($defini["mode"]) $mode = $variable["mode"];
-
- $masque = find_in_path($masque);
- $pos = md5(serialize($variable).@filemtime($masque));
-
- $fonction = array('image_masque', func_get_args());
- $image = image_valeurs_trans($im, "masque-$masque-$pos", "png",$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
-
- if ($defini["right"] OR $defini["left"] OR $defini["bottom"] OR $defini["top"] OR $defini["text-align"] OR $defini["vertical-align"]) {
- $placer = true;
- }
- else $placer = false;
-
- if ($creer) {
-
- $mask = image_valeurs_trans($masque,"");
- if (!is_array($mask)) return("");
- $im_m = $mask["fichier"];
- $x_m = $mask["largeur"];
- $y_m = $mask["hauteur"];
-
- $im2 = $mask["fonction_imagecreatefrom"]($masque);
- if ($mask["format_source"] == "gif" AND function_exists('ImageCopyResampled')) {
- $im2_ = imagecreatetruecolor($x_m, $y_m);
- // Si un GIF est transparent,
- // fabriquer un PNG transparent
- // Conserver la transparence
- if (function_exists("imageAntiAlias")) imageAntiAlias($im2_,true);
- @imagealphablending($im2_, false);
- @imagesavealpha($im2_,true);
- @ImageCopyResampled($im2_, $im2, 0, 0, 0, 0, $x_m, $y_m, $x_m, $y_m);
- imagedestroy($im2);
- $im2 = $im2_;
- }
-
- if ($placer) {
- // On fabriquer une version "agrandie" du masque,
- // aux dimensions de l'image source
- // et on "installe" le masque dans cette image
- // ainsi: aucun redimensionnement
-
- $dx = 0;
- $dy = 0;
-
- if ($defini["right"]) {
- $right = $variable["right"];
- $dx = ($x_i - $x_m) - $right;
- }
- if ($defini["bottom"]) {
- $bottom = $variable["bottom"];
- $dy = ($y_i - $y_m) - $bottom;
- }
- if ($defini["top"]) {
- $top = $variable["top"];
- $dy = $top;
- }
- if ($defini["left"]) {
- $left = $variable["left"];
- $dx = $left;
- }
- if ($defini["text-align"]) {
- $align = $variable["text-align"];
- if ($align == "right") {
- $right = 0;
- $dx = ($x_i - $x_m);
- } else if ($align == "left") {
- $left = 0;
- $dx = 0;
- } else if ($align = "center") {
- $dx = round( ($x_i - $x_m) / 2 ) ;
- }
- }
- if ($defini["vertical-align"]) {
- $valign = $variable["vertical-align"];
- if ($valign == "bottom") {
- $bottom = 0;
- $dy = ($y_i - $y_m);
- } else if ($valign == "top") {
- $top = 0;
- $dy = 0;
- } else if ($valign = "middle") {
- $dy = round( ($y_i - $y_m) / 2 ) ;
- }
- }
-
-
- $im3 = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im3, false);
- @imagesavealpha($im3,true);
- if ($mode == "masque") $color_t = ImageColorAllocateAlpha( $im3, 128, 128, 128 , 0 );
- else $color_t = ImageColorAllocateAlpha( $im3, 128, 128, 128 , 127 );
- imagefill ($im3, 0, 0, $color_t);
-
-
-
- imagecopy ( $im3, $im2, $dx, $dy, 0, 0, $x_m, $y_m);
-
- imagedestroy($im2);
- $im2 = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im2, false);
- @imagesavealpha($im2,true);
-
-
-
- imagecopy ( $im2, $im3, 0, 0, 0, 0, $x_i, $y_i);
- imagedestroy($im3);
- $x_m = $x_i;
- $y_m = $y_i;
- }
-
-
- $rapport = $x_i / $x_m;
- if (($y_i / $y_m) < $rapport ) {
- $rapport = $y_i / $y_m;
- }
-
- $x_d = ceil($x_i / $rapport);
- $y_d = ceil($y_i / $rapport);
-
-
- if ($x_i < $x_m OR $y_i < $y_m) {
- $x_dest = $x_i;
- $y_dest = $y_i;
- $x_dec = 0;
- $y_dec = 0;
- } else {
- $x_dest = $x_m;
- $y_dest = $y_m;
- $x_dec = round(($x_d - $x_m) /2);
- $y_dec = round(($y_d - $y_m) /2);
- }
-
-
- $nouveau = image_valeurs_trans(image_reduire($im, $x_d, $y_d),"");
- if (!is_array($nouveau)) return("");
- $im_n = $nouveau["fichier"];
-
-
- $im = $nouveau["fonction_imagecreatefrom"]($im_n);
- imagepalettetotruecolor($im);
- if ($nouveau["format_source"] == "gif" AND function_exists('ImageCopyResampled')) {
- $im_ = imagecreatetruecolor($x_dest, $y_dest);
- // Si un GIF est transparent,
- // fabriquer un PNG transparent
- // Conserver la transparence
- if (function_exists("imageAntiAlias")) imageAntiAlias($im_,true);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- @ImageCopyResampled($im_, $im, 0, 0, 0, 0, $x_dest, $y_dest, $x_dest, $y_dest);
- imagedestroy($im);
- $im = $im_;
- }
- $im_ = imagecreatetruecolor($x_dest, $y_dest);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
-
-
- for ($x = 0; $x < $x_dest; $x++) {
- for ($y=0; $y < $y_dest; $y++) {
- $rgb = ImageColorAt($im2, $x, $y);
- $a = ($rgb >> 24) & 0xFF;
- $r = ($rgb >> 16) & 0xFF;
- $g = ($rgb >> 8) & 0xFF;
- $b = $rgb & 0xFF;
-
-
- $rgb2 = ImageColorAt($im, $x+$x_dec, $y+$y_dec);
- $a2 = ($rgb2 >> 24) & 0xFF;
- $r2 = ($rgb2 >> 16) & 0xFF;
- $g2 = ($rgb2 >> 8) & 0xFF;
- $b2 = $rgb2 & 0xFF;
-
-
-
- if ($mode == "normal") {
- $v = (127 - $a) / 127;
- if ($v == 1) {
- $r_ = $r;
- $g_ = $g;
- $b_ = $b;
- } else {
- $v2 = (127 - $a2) / 127;
- if ($v+$v2 == 0) {
- $r_ = $r2;
- $g_ = $g2;
- $b_ = $b2;
- } else if ($v2 ==0) {
- $r_ = $r;
- $g_ = $g;
- $b_ = $b;
- } else if ($v == 0) {
- $r_ = $r2;
- $g_ = $g2;
- $b_ = $b2;
- }else {
- $r_ = $r + (($r2 - $r) * $v2 * (1 - $v));
- $g_ = $g + (($g2 - $g) * $v2 * (1 - $v));
- $b_ = $b + (($b2 - $b) * $v2 * (1 - $v));
- }
- }
- $a_ = min($a,$a2);
- } elseif ($mode == "produit" OR $mode == "difference") {
-
- if ($mode == "produit") {
- $r = ($r/255) * $r2;
- $g = ($g/255) * $g2;
- $b = ($b/255) * $b2;
- } else if ($mode == "difference") {
- $r = abs($r-$r2);
- $g = abs($g-$g2);
- $b = abs($b-$b2);
- }
-
- $r = max(0, min($r, 255));
- $g = max(0, min($g, 255));
- $b = max(0, min($b, 255));
-
- $v = (127 - $a) / 127;
- if ($v == 1) {
- $r_ = $r;
- $g_ = $g;
- $b_ = $b;
- } else {
- $v2 = (127 - $a2) / 127;
- if ($v+$v2 == 0) {
- $r_ = $r2;
- $g_ = $g2;
- $b_ = $b2;
- } else {
- $r_ = $r + (($r2 - $r) * $v2 * (1 - $v));
- $g_ = $g + (($g2 - $g) * $v2 * (1 - $v));
- $b_ = $b + (($b2 - $b) * $v2 * (1 - $v));
- }
- }
-
-
- $a_ = $a2;
- } elseif ($mode == "eclaircir" OR $mode == "obscurcir") {
- $v = (127 - $a) / 127;
- if ($v == 1) {
- $r_ = $r;
- $g_ = $g;
- $b_ = $b;
- } else {
- $v2 = (127 - $a2) / 127;
- if ($v+$v2 == 0) {
- $r_ = $r2;
- $g_ = $g2;
- $b_ = $b2;
- } else {
- $r_ = $r + (($r2 - $r) * $v2 * (1 - $v));
- $g_ = $g + (($g2 - $g) * $v2 * (1 - $v));
- $b_ = $b + (($b2 - $b) * $v2 * (1 - $v));
- }
- }
- if ($mode == "eclaircir") {
- $r_ = max ($r_, $r2);
- $g_ = max ($g_, $g2);
- $b_ = max ($b_, $b2);
- } else {
- $r_ = min ($r_, $r2);
- $g_ = min ($g_, $g2);
- $b_ = min ($b_, $b2);
- }
-
- $a_ = min($a,$a2);
- } else {
- $r_ = $r2 + 1 * ($r - 127);
- $r_ = max(0, min($r_, 255));
- $g_ = $g2 + 1 * ($g - 127);
- $g_ = max(0, min($g_, 255));
- $b_ = $b2 + 1 * ($b - 127);
- $b_ = max(0, min($b_, 255));
-
- $a_ = $a + $a2 - round($a*$a2/127);
- }
-
- $color = ImageColorAllocateAlpha( $im_, $r_, $g_, $b_ , $a_ );
- imagesetpixel ($im_, $x, $y, $color);
- }
- }
-
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- imagedestroy($im2);
-
- }
- $x_dest = largeur($dest);
- $y_dest = hauteur($dest);
- return image_ecrire_tag($image,array('src'=>$dest,'width'=>$x_dest,'height'=>$y_dest));
-}
-
-// Passage de l'image en noir et blanc
-// un noir & blanc "photo" n'est pas "neutre": les composantes de couleur sont
-// ponderees pour obtenir le niveau de gris;
-// on peut ici regler cette ponderation en "pour mille"
-// http://doc.spip.org/@image_nb
-function image_nb($im, $val_r = 299, $val_g = 587, $val_b = 114)
-{
- $fonction = array('image_nb', func_get_args());
- $image = image_valeurs_trans($im, "nb-$val_r-$val_g-$val_b",false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- // Methode precise
- // resultat plus beau, mais tres lourd
- // Et: indispensable pour preserver transparence!
-
- if ($creer) {
- // Creation de l'image en deux temps
- // de facon a conserver les GIF transparents
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
- imagecopy($im_, $im, 0, 0, 0, 0, $x_i, $y_i);
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y=0; $y < $y_i; $y++) {
- $rgb = ImageColorAt($im_, $x, $y);
- $a = ($rgb >> 24) & 0xFF;
- $r = ($rgb >> 16) & 0xFF;
- $g = ($rgb >> 8) & 0xFF;
- $b = $rgb & 0xFF;
-
- $c = round(($val_r * $r / 1000) + ($val_g * $g / 1000) + ($val_b * $b / 1000));
- if ($c < 0) $c = 0;
- if ($c > 254) $c = 254;
-
-
- $color = ImageColorAllocateAlpha( $im_, $c, $c, $c , $a );
- imagesetpixel ($im_, $x, $y, $color);
- }
- }
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-// http://doc.spip.org/@image_flou
-function image_flou($im,$niveau=3)
-{
- // Il s'agit d'une modification du script blur qu'on trouve un peu partout:
- // + la transparence est geree correctement
- // + les dimensions de l'image sont augmentees pour flouter les bords
- $coeffs = array (
- array ( 1),
- array ( 1, 1),
- array ( 1, 2, 1),
- array ( 1, 3, 3, 1),
- array ( 1, 4, 6, 4, 1),
- array ( 1, 5, 10, 10, 5, 1),
- array ( 1, 6, 15, 20, 15, 6, 1),
- array ( 1, 7, 21, 35, 35, 21, 7, 1),
- array ( 1, 8, 28, 56, 70, 56, 28, 8, 1),
- array ( 1, 9, 36, 84, 126, 126, 84, 36, 9, 1),
- array ( 1, 10, 45, 120, 210, 252, 210, 120, 45, 10, 1),
- array ( 1, 11, 55, 165, 330, 462, 462, 330, 165, 55, 11, 1)
- );
-
- $fonction = array('image_flou', func_get_args());
- $image = image_valeurs_trans($im, "flou-$niveau", false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
- $sum = pow (2, $niveau);
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- // Methode precise
- // resultat plus beau, mais tres lourd
- // Et: indispensable pour preserver transparence!
-
- if ($creer) {
- // Creation de l'image en deux temps
- // de facon a conserver les GIF transparents
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $temp1 = imagecreatetruecolor($x_i+$niveau, $y_i);
- $temp2 = imagecreatetruecolor($x_i+$niveau, $y_i+$niveau);
-
- @imagealphablending($temp1, false);
- @imagesavealpha($temp1,true);
- @imagealphablending($temp2, false);
- @imagesavealpha($temp2,true);
-
-
- for ($i = 0; $i < $x_i+$niveau; $i++) {
- for ($j=0; $j < $y_i; $j++) {
- $suma=0;
- $sumr=0;
- $sumg=0;
- $sumb=0;
- $sum = 0;
- $sum_ = 0;
- for ( $k=0 ; $k <= $niveau ; ++$k ) {
- $color = imagecolorat($im, $i_ = ($i-$niveau)+$k , $j);
-
- $a = ($color >> 24) & 0xFF;
- $r = ($color >> 16) & 0xFF;
- $g = ($color >> 8) & 0xFF;
- $b = ($color) & 0xFF;
-
- if ($i_ < 0 OR $i_ >= $x_i) $a = 127;
-
- $coef = $coeffs[$niveau][$k];
- $suma += $a*$coef;
- $ac = ((127-$a) / 127);
-
- $ac = $ac*$ac;
-
- $sumr += $r * $coef * $ac;
- $sumg += $g * $coef * $ac;
- $sumb += $b * $coef * $ac;
- $sum += $coef * $ac;
- $sum_ += $coef;
- }
- if ($sum > 0) $color = ImageColorAllocateAlpha ($temp1, $sumr/$sum, $sumg/$sum, $sumb/$sum, $suma/$sum_);
- else $color = ImageColorAllocateAlpha ($temp1, 255, 255, 255, 127);
- imagesetpixel($temp1,$i,$j,$color);
- }
- }
- imagedestroy($im);
- for ($i = 0; $i < $x_i+$niveau; $i++) {
- for ($j=0; $j < $y_i+$niveau; $j++) {
- $suma=0;
- $sumr=0;
- $sumg=0;
- $sumb=0;
- $sum = 0;
- $sum_ = 0;
- for ( $k=0 ; $k <= $niveau ; ++$k ) {
- $color = imagecolorat($temp1, $i, $j_ = $j-$niveau+$k);
- $a = ($color >> 24) & 0xFF;
- $r = ($color >> 16) & 0xFF;
- $g = ($color >> 8) & 0xFF;
- $b = ($color) & 0xFF;
- if ($j_ < 0 OR $j_ >= $y_i) $a = 127;
-
- $suma += $a*$coeffs[$niveau][$k];
- $ac = ((127-$a) / 127);
-
- $sumr += $r * $coeffs[$niveau][$k] * $ac;
- $sumg += $g * $coeffs[$niveau][$k] * $ac;
- $sumb += $b * $coeffs[$niveau][$k] * $ac;
- $sum += $coeffs[$niveau][$k] * $ac;
- $sum_ += $coeffs[$niveau][$k];
-
- }
- if ($sum > 0) $color = ImageColorAllocateAlpha ($temp2, $sumr/$sum, $sumg/$sum, $sumb/$sum, $suma/$sum_);
- else $color = ImageColorAllocateAlpha ($temp2, 255, 255, 255, 127);
- imagesetpixel($temp2,$i,$j,$color);
- }
- }
-
- image_gd_output($temp2,$image);
- imagedestroy($temp1);
- imagedestroy($temp2);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest,'width'=>($x_i+$niveau),'height'=>($y_i+$niveau)));
-}
-
-// http://doc.spip.org/@image_RotateBicubic
-function image_RotateBicubic($src_img, $angle, $bicubic=0) {
-
- if (round($angle/90)*90 == $angle) {
- $droit = true;
- if (round($angle/180)*180 == $angle) $rot = 180;
- else $rot = 90;
- }
- else $droit = false;
-
- // convert degrees to radians
- $angle = $angle + 180;
- $angle = deg2rad($angle);
-
-
-
- $src_x = imagesx($src_img);
- $src_y = imagesy($src_img);
-
-
- $center_x = floor(($src_x-1)/2);
- $center_y = floor(($src_y-1)/2);
-
- $cosangle = cos($angle);
- $sinangle = sin($angle);
-
- // calculer dimensions en simplifiant angles droits, ce qui evite "floutage"
- // des rotations a angle droit
- if (!$droit) {
- $corners=array(array(0,0), array($src_x,0), array($src_x,$src_y), array(0,$src_y));
-
- foreach($corners as $key=>$value) {
- $value[0]-=$center_x; //Translate coords to center for rotation
- $value[1]-=$center_y;
- $temp=array();
- $temp[0]=$value[0]*$cosangle+$value[1]*$sinangle;
- $temp[1]=$value[1]*$cosangle-$value[0]*$sinangle;
- $corners[$key]=$temp;
- }
-
- $min_x=1000000000000000;
- $max_x=-1000000000000000;
- $min_y=1000000000000000;
- $max_y=-1000000000000000;
-
- foreach($corners as $key => $value) {
- if($value[0]<$min_x)
- $min_x=$value[0];
- if($value[0]>$max_x)
- $max_x=$value[0];
-
- if($value[1]<$min_y)
- $min_y=$value[1];
- if($value[1]>$max_y)
- $max_y=$value[1];
- }
-
- $rotate_width=ceil($max_x-$min_x);
- $rotate_height=ceil($max_y-$min_y);
- }
- else {
- if ($rot == 180) {
- $rotate_height = $src_y;
- $rotate_width = $src_x;
- } else {
- $rotate_height = $src_x;
- $rotate_width = $src_y;
- }
- $bicubic = false;
- }
-
-
- $rotate=imagecreatetruecolor($rotate_width,$rotate_height);
- imagealphablending($rotate, false);
- imagesavealpha($rotate, true);
-
- $cosangle = cos($angle);
- $sinangle = sin($angle);
-
- // arrondir pour rotations angle droit (car cos et sin dans {-1,0,1})
- if ($droit) {
- $cosangle = round($cosangle);
- $sinangle = round($sinangle);
- }
-
- $newcenter_x = ($rotate_width-1)/2;
- $newcenter_y = ($rotate_height-1)/2;
-
-
- for ($y = 0; $y < $rotate_height; $y++) {
- for ($x = 0; $x < $rotate_width; $x++) {
- // rotate...
- $old_x = ((($newcenter_x-$x) * $cosangle + ($newcenter_y-$y) * $sinangle))
- + $center_x;
- $old_y = ((($newcenter_y-$y) * $cosangle - ($newcenter_x-$x) * $sinangle))
- + $center_y;
-
- $old_x = ceil($old_x);
- $old_y = ceil($old_y);
-
- if ( $old_x >= 0 && $old_x < $src_x
- && $old_y >= 0 && $old_y < $src_y ) {
- if ($bicubic == true) {
- $xo = $old_x;
- $x0 = floor($xo);
- $x1 = ceil($xo);
- $yo = $old_y;
- $y0 = floor($yo);
- $y1 = ceil($yo);
-
- // on prend chaque point, mais on pondere en fonction de la distance
- $rgb = ImageColorAt($src_img, $x0, $y0);
- $a1 = ($rgb >> 24) & 0xFF;
- $r1 = ($rgb >> 16) & 0xFF;
- $g1 = ($rgb >> 8) & 0xFF;
- $b1 = $rgb & 0xFF;
- $d1 = image_distance_pixel($xo, $yo, $x0, $y0);
-
- $rgb = ImageColorAt($src_img, $x1, $y0);
- $a2 = ($rgb >> 24) & 0xFF;
- $r2 = ($rgb >> 16) & 0xFF;
- $g2 = ($rgb >> 8) & 0xFF;
- $b2 = $rgb & 0xFF;
- $d2 = image_distance_pixel($xo, $yo, $x1, $y0);
-
- $rgb = ImageColorAt($src_img,$x0, $y1);
- $a3 = ($rgb >> 24) & 0xFF;
- $r3 = ($rgb >> 16) & 0xFF;
- $g3 = ($rgb >> 8) & 0xFF;
- $b3 = $rgb & 0xFF;
- $d3 = image_distance_pixel($xo, $yo, $x0, $y1);
-
- $rgb = ImageColorAt($src_img,$x1, $y1);
- $a4 = ($rgb >> 24) & 0xFF;
- $r4 = ($rgb >> 16) & 0xFF;
- $g4 = ($rgb >> 8) & 0xFF;
- $b4 = $rgb & 0xFF;
- $d4 = image_distance_pixel($xo, $yo, $x1, $y1);
-
- $ac1 = ((127-$a1) / 127);
- $ac2 = ((127-$a2) / 127);
- $ac3 = ((127-$a3) / 127);
- $ac4 = ((127-$a4) / 127);
-
- // limiter impact des couleurs transparentes,
- // mais attention tout transp: division par 0
- if ($ac1*$d1 + $ac2*$d2 + $ac3+$d3 + $ac4+$d4 > 0) {
- if ($ac1 > 0) $d1 = $d1 * $ac1;
- if ($ac2 > 0) $d2 = $d2 * $ac2;
- if ($ac3 > 0) $d3 = $d3 * $ac3;
- if ($ac4 > 0) $d4 = $d4 * $ac4;
- }
-
- $tot = $d1 + $d2 + $d3 + $d4;
-
- $r = round((($d1*$r1)+($d2*$r2)+($d3*$r3)+($d4*$r4))/$tot);
- $g = round((($d1*$g1+($d2*$g2)+$d3*$g3+$d4*$g4))/$tot);
- $b = round((($d1*$b1+($d2*$b2)+$d3*$b3+$d4*$b4))/$tot);
- $a = round((($d1*$a1+($d2*$a2)+$d3*$a3+$d4*$a4))/$tot);
- $color = imagecolorallocatealpha($src_img, $r,$g,$b,$a);
- } else {
- $color = imagecolorat($src_img, round($old_x), round($old_y));
- }
- } else {
- // this line sets the background colour
- $color = imagecolorallocatealpha($src_img, 255, 255, 255, 127);
- }
- @imagesetpixel($rotate, $x, $y, $color);
- }
- }
- return $rotate;
-}
-
-// permet de faire tourner une image d'un angle quelconque
-// la fonction "crop" n'est pas implementee...
-// http://doc.spip.org/@image_rotation
-function image_rotation($im, $angle, $crop=false)
-{
- $fonction = array('image_rotation', func_get_args());
- $image = image_valeurs_trans($im, "rot-$angle-$crop", "png", $fonction);
- if (!$image) return("");
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- $effectuer_gd = true;
-
- if (function_exists('imagick_rotate')) {
- $mask = imagick_getcanvas( "#ff0000", $x, $y );
- $handle = imagick_readimage ($im);
- if ($handle && imagick_isopaqueimage( $handle )) {
- imagick_rotate( $handle, $angle);
- imagick_writeimage( $handle, $dest);
- $effectuer_gd = false;
- }
- }
- elseif(is_callable(array('Imagick','rotateImage'))){
- $imagick = new Imagick();
- $imagick->readImage($im);
- $imagick->rotateImage(new ImagickPixel('#ffffff'), $angle);
- $imagick->writeImage($dest);
- $effectuer_gd = false;
- }
- if ($effectuer_gd) {
- // Creation de l'image en deux temps
- // de facon a conserver les GIF transparents
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im = image_RotateBicubic($im, $angle, true);
- image_gd_output($im,$image);
- imagedestroy($im);
- }
- }
- list ($src_y,$src_x) = taille_image($dest);
- return image_ecrire_tag($image,array('src'=>$dest,'width'=>$src_x,'height'=>$src_y));
-}
-
-// Permet d'appliquer un filtre php_imagick a une image
-// par exemple: [(#LOGO_ARTICLE||image_imagick{imagick_wave,20,60})]
-// liste des fonctions: http://www.linux-nantes.org/~fmonnier/doc/imagick/
-// http://doc.spip.org/@image_imagick
-function image_imagick () {
- $tous = func_get_args();
- $img = $tous[0];
- $fonc = $tous[1];
- $tous[0]="";
- $tous_var = join($tous, "-");
-
- $fonction = array('image_imagick', func_get_args());
- $image = image_valeurs_trans($img, "$tous_var", "png",$fonction);
- if (!$image) return("");
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- if (function_exists($fonc)) {
-
- $handle = imagick_readimage ($im);
- $arr[0] = $handle;
- for ($i=2; $i < count($tous); $i++) $arr[] = $tous[$i];
- call_user_func_array($fonc, $arr);
- // Creer image dans fichier temporaire, puis renommer vers "bon" fichier
- // de facon a eviter time_out pendant creation de l'image definitive
- $tmp = preg_replace(",[.]png$,i", "-tmp.png", $dest);
- imagick_writeimage( $handle, $tmp);
- rename($tmp, $dest);
- ecrire_fichier($dest.".src",serialize($image));
- }
- }
- list ($src_y,$src_x) = taille_image($dest);
- return image_ecrire_tag($image,array('src'=>$dest,'width'=>$src_x,'height'=>$src_y));
-
-}
-
-
-// $src_img - a GD image resource
-// $angle - degrees to rotate clockwise, in degrees
-// returns a GD image resource
-// script de php.net lourdement corrig'e
-// (le bicubic deconnait completement,
-// et j'ai ajoute la ponderation par la distance au pixel)
-
-// http://doc.spip.org/@image_distance_pixel
-function image_distance_pixel($xo, $yo, $x0, $y0) {
- $vx = $xo - $x0;
- $vy = $yo - $y0;
- $d = 1 - (sqrt(($vx)*($vx) + ($vy)*($vy)) / sqrt(2));
- return $d;
-}
-
-// http://doc.spip.org/@image_decal_couleur
-function image_decal_couleur($coul, $gamma) {
- $coul = $coul + $gamma;
-
- if ($coul > 255) $coul = 255;
- if ($coul < 0) $coul = 0;
- return $coul;
-}
-// Permet de rendre une image
-// plus claire (gamma > 0)
-// ou plus foncee (gamma < 0)
-// http://doc.spip.org/@image_gamma
-function image_gamma($im, $gamma = 0)
-{
- $fonction = array('image_gamma', func_get_args());
- $image = image_valeurs_trans($im, "gamma-$gamma",false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- // Creation de l'image en deux temps
- // de facon a conserver les GIF transparents
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
- imagecopy($im_, $im, 0, 0, 0, 0, $x_i, $y_i);
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y=0; $y < $y_i; $y++) {
- $rgb = ImageColorAt($im_, $x, $y);
- $a = ($rgb >> 24) & 0xFF;
- $r = ($rgb >> 16) & 0xFF;
- $g = ($rgb >> 8) & 0xFF;
- $b = $rgb & 0xFF;
-
- $r = image_decal_couleur($r, $gamma);
- $g = image_decal_couleur($g, $gamma);
- $b = image_decal_couleur($b, $gamma);
-
- $color = ImageColorAllocateAlpha( $im_, $r, $g, $b , $a );
- imagesetpixel ($im_, $x, $y, $color);
- }
- }
- image_gd_output($im_,$image);
- }
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-// Passe l'image en "sepia"
-// On peut fixer les valeurs RVB
-// de la couleur "complementaire" pour forcer une dominante
-
-// http://doc.spip.org/@image_decal_couleur_127
-function image_decal_couleur_127 ($coul, $val) {
- if ($coul < 127) $y = round((($coul - 127) / 127) * $val) + $val;
- else if ($coul >= 127) $y = round((($coul - 127) / 128) * (255-$val)) + $val;
- else $y= $coul;
-
- if ($y < 0) $y = 0;
- if ($y > 255) $y = 255;
- return $y;
-}
-//function image_sepia($im, $dr = 137, $dv = 111, $db = 94)
-// http://doc.spip.org/@image_sepia
-function image_sepia($im, $rgb = "896f5e")
-{
-
- if (!function_exists("imagecreatetruecolor")) return $im;
-
- $couleurs = couleur_hex_to_dec($rgb);
- $dr= $couleurs["red"];
- $dv= $couleurs["green"];
- $db= $couleurs["blue"];
-
- $fonction = array('image_sepia', func_get_args());
- $image = image_valeurs_trans($im, "sepia-$dr-$dv-$db",false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- // Creation de l'image en deux temps
- // de facon a conserver les GIF transparents
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
- imagecopy($im_, $im, 0, 0, 0, 0, $x_i, $y_i);
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y=0; $y < $y_i; $y++) {
- $rgb = ImageColorAt($im_, $x, $y);
- $a = ($rgb >> 24) & 0xFF;
- $r = ($rgb >> 16) & 0xFF;
- $g = ($rgb >> 8) & 0xFF;
- $b = $rgb & 0xFF;
-
- $r = round(.299 * $r + .587 * $g + .114 * $b);
- $g = $r;
- $b = $r;
-
-
- $r = image_decal_couleur_127($r, $dr);
- $g = image_decal_couleur_127($g, $dv);
- $b = image_decal_couleur_127($b, $db);
-
- $color = ImageColorAllocateAlpha( $im_, $r, $g, $b , $a );
- imagesetpixel ($im_, $x, $y, $color);
- }
- }
- image_gd_output($im_,$image);
- imagedestroy($im_);
- imagedestroy($im);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-
-// Renforcer la nettete d'une image
-// http://doc.spip.org/@image_renforcement
-function image_renforcement($im, $k=0.5)
-{
- $fonction = array('image_flou', func_get_args());
- $image = image_valeurs_trans($im, "renforcement-$k",false,$fonction);
- if (!$image) return("");
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
- $creer = $image["creer"];
-
- if ($creer) {
- $im = $image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- $color_t = ImageColorAllocateAlpha( $im_, 255, 255, 255 , 127 );
- imagefill ($im_, 0, 0, $color_t);
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y=0; $y < $y_i; $y++) {
-
- $rgb[1][0]=imagecolorat($im,$x,$y-1);
- $rgb[0][1]=imagecolorat($im,$x-1,$y);
- $rgb[1][1]=imagecolorat($im,$x,$y);
- $rgb[2][1]=imagecolorat($im,$x+1,$y);
- $rgb[1][2]=imagecolorat($im,$x,$y+1);
-
-
- if ($x-1 < 0) $rgb[0][1] = $rgb[1][1];
- if ($y-1 < 0) $rgb[1][0] = $rgb[1][1];
- if ($x+1 == $x_i) $rgb[2][1] = $rgb[1][1];
- if ($y+1 == $y_i) $rgb[1][2] = $rgb[1][1];
-
- $a = ($rgb[0][0] >> 24) & 0xFF;
- $r = -$k *(($rgb[1][0] >> 16) & 0xFF) +
- -$k *(($rgb[0][1] >> 16) & 0xFF) +
- (1+4*$k) *(($rgb[1][1] >> 16) & 0xFF) +
- -$k *(($rgb[2][1] >> 16) & 0xFF) +
- -$k *(($rgb[1][2] >> 16) & 0xFF) ;
-
- $g = -$k *(($rgb[1][0] >> 8) & 0xFF) +
- -$k *(($rgb[0][1] >> 8) & 0xFF) +
- (1+4*$k) *(($rgb[1][1] >> 8) & 0xFF) +
- -$k *(($rgb[2][1] >> 8) & 0xFF) +
- -$k *(($rgb[1][2] >> 8) & 0xFF) ;
-
- $b = -$k *($rgb[1][0] & 0xFF) +
- -$k *($rgb[0][1] & 0xFF) +
- (1+4*$k) *($rgb[1][1] & 0xFF) +
- -$k *($rgb[2][1] & 0xFF) +
- -$k *($rgb[1][2] & 0xFF) ;
-
- $r=min(255,max(0,$r));
- $g=min(255,max(0,$g));
- $b=min(255,max(0,$b));
-
-
- $color = ImageColorAllocateAlpha( $im_, $r, $g, $b , $a );
- imagesetpixel ($im_, $x, $y, $color);
- }
- }
- image_gd_output($im_,$image);
- }
-
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-
-// 1/ Aplatir une image semi-transparente (supprimer couche alpha)
-// en remplissant la transparence avec couleur choisir $coul.
-// 2/ Forcer le format de sauvegarde (jpg, png, gif)
-// pour le format jpg, $qualite correspond au niveau de compression (defaut 85)
-// pour le format gif, $qualite correspond au nombre de couleurs dans la palette (defaut 128)
-// pour le format png, $qualite correspond au nombre de couleur dans la palette ou si 0 a une image truecolor (defaut truecolor)
-// attention, seul 128 est supporte en l'etat (production d'images avec palette reduite pas satisfaisante)
-// http://doc.spip.org/@image_aplatir
-// 3/ $transparence a "true" permet de conserver la transparence (utile pour conversion GIF)
-// http://doc.spip.org/@image_aplatir
-function image_aplatir($im, $format='jpg', $coul='000000', $qualite=NULL, $transparence=false)
-{
- if ($qualite===NULL){
- if ($format=='jpg') $qualite=_IMG_GD_QUALITE;
- elseif ($format=='png') $qualite=0;
- else $qualite=128;
- }
- $fonction = array('image_aplatir', func_get_args());
- $image = image_valeurs_trans($im, "aplatir-$format-$coul-$qualite-$transparence", $format, $fonction);
-
- if (!$image) return("");
-
- include_spip('inc/filtres');
- $couleurs = couleur_hex_to_dec($coul);
- $dr= $couleurs["red"];
- $dv= $couleurs["green"];
- $db= $couleurs["blue"];
-
- $x_i = $image["largeur"];
- $y_i = $image["hauteur"];
-
- $im = $image["fichier"];
- $dest = $image["fichier_dest"];
-
- $creer = $image["creer"];
-
- if ($creer) {
- $im = @$image["fonction_imagecreatefrom"]($im);
- imagepalettetotruecolor($im);
- $im_ = imagecreatetruecolor($x_i, $y_i);
- if ($image["format_source"] == "gif" AND function_exists('ImageCopyResampled')) {
- // Si un GIF est transparent,
- // fabriquer un PNG transparent
- // Conserver la transparence
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- if (function_exists("imageAntiAlias")) imageAntiAlias($im_,true);
- @ImageCopyResampled($im_, $im, 0, 0, 0, 0, $x_i, $y_i, $x_i, $y_i);
- imagedestroy($im);
- $im = $im_;
- }
-
- // allouer la couleur de fond
- if ($transparence) {
- @imagealphablending($im_, false);
- @imagesavealpha($im_,true);
- $color_t = imagecolorallocatealpha( $im_, $dr, $dv, $db, 127);
- }
- else $color_t = ImageColorAllocate( $im_, $dr, $dv, $db);
-
- imagefill ($im_, 0, 0, $color_t);
-
- //??
- //$dist = abs($trait);
-
- $transp_x = false;
-
- for ($x = 0; $x < $x_i; $x++) {
- for ($y=0; $y < $y_i; $y++) {
-
- $rgb = ImageColorAt($im, $x, $y);
- $a = ($rgb >> 24) & 0xFF;
- $r = ($rgb >> 16) & 0xFF;
- $g = ($rgb >> 8) & 0xFF;
- $b = $rgb & 0xFF;
-
- $a = (127-$a) / 127;
-
- if ($a == 1) { // Limiter calculs
- $r = $r;
- $g = $g;
- $b = $b;
- }
- else if ($a == 0) { // Limiter calculs
- $r = $dr;
- $g = $dv;
- $b = $db;
-
- $transp_x = $x; // Memoriser un point transparent
- $transp_y = $y;
-
- } else {
- $r = round($a * $r + $dr * (1-$a));
- $g = round($a * $g + $dv * (1-$a));
- $b = round($a * $b + $db * (1-$a));
- }
- $a = (1-$a) *127;
- $color = ImageColorAllocateAlpha( $im_, $r, $g, $b, $a);
- imagesetpixel ($im_, $x, $y, $color);
- }
- }
- // passer en palette si besoin
- if ($format=='gif' OR ($format=='png' AND $qualite!==0)){
- // creer l'image finale a palette (on recycle l'image initiale)
-
-
- @imagetruecolortopalette($im,true,$qualite);
-
-
- //$im = imagecreate($x_i, $y_i);
- // copier l'image true color vers la palette
- imagecopy($im, $im_, 0, 0, 0, 0, $x_i, $y_i);
- // matcher les couleurs au mieux par rapport a l'image initiale
- // si la fonction est disponible (php>=4.3)
- if (function_exists('imagecolormatch'))
- @imagecolormatch($im_, $im);
-
- if ($format=='gif' && $transparence && $transp_x) {
- $color_t = ImagecolorAt( $im, $transp_x, $transp_y);
- if ($format == "gif" && $transparence) @imagecolortransparent($im, $color_t);
- }
-
-
- // produire le resultat
- image_gd_output($im, $image, $qualite);
- }
- else
- image_gd_output($im_, $image, $qualite);
- imagedestroy($im_);
- imagedestroy($im);
- }
- return image_ecrire_tag($image,array('src'=>$dest));
-}
-
-
-// Enregistrer une image dans un format donne
-// (conserve la transparence gif, png, ico)
-// utilise [->@image_aplatir]
-// http://doc.spip.org/@image_format
-function image_format($img, $format='png') {
- $qualite = null;
- if ($format=='png8') {$format='png';$qualite=128;}
- return image_aplatir($img, $format, 'cccccc', $qualite, true);
-}
-
-
-
-// A partir d'une image,
-// recupere une couleur
-// renvoit sous la forme hexadecimale ("F26C4E" par exemple).
-// Par defaut, la couleur choisie se trouve un peu au-dessus du centre de l'image.
-// On peut forcer un point en fixant $x et $y, entre 0 et 20.
-// http://doc.spip.org/@image_couleur_extraire
-function image_couleur_extraire($img, $x=10, $y=6) {
-
- $cache = image_valeurs_trans($img, "coul-$x-$y", "php");
- if (!$cache) return "F26C4E";
-
- $fichier = $cache["fichier"];
- $dest = $cache["fichier_dest"];
- $terminaison = $cache["format_source"];
-
- $creer = $cache["creer"];
- if ($creer) {
- if (!$GLOBALS["couleur_extraite"]["$fichier-$x-$y"]) {
- if (file_exists($fichier)) {
- list($width, $height) = getimagesize($fichier);
-
-
- $newwidth = 20;
- $newheight = 20;
-
- $thumb = imagecreate($newwidth, $newheight);
-
- if (preg_match(",\.jpe?g$,i", $fichier)) $source = imagecreatefromjpeg($fichier);
- if (preg_match(",\.gif$,i", $fichier)) $source = imagecreatefromgif($fichier);
- if (preg_match(",\.png$,i", $fichier)) $source = imagecreatefrompng($fichier);
- imagepalettetotruecolor($source);
-
- imagecopyresized($thumb, $source, 0, 0, 0, 0, $newwidth, $newheight, $width, $height);
-
- // get a color
- $color_index = imagecolorat($thumb, $x, $y);
-
- // make it human readable
- $color_tran = imagecolorsforindex($thumb, $color_index);
-
- $couleur = couleur_dec_to_hex($color_tran["red"], $color_tran["green"], $color_tran["blue"]);
- }
- else {
- $couleur = "F26C4E";
- }
- $GLOBALS["couleur_extraite"]["$fichier-$x-$y"] = $couleur;
-
- $handle = fopen($dest, 'w');
- fwrite($handle, "<"."?php \$GLOBALS[\"couleur_extraite\"][\"".$fichier."-".$x."-".$y."\"] = \"".$couleur."\"; ?".">");
- fclose($handle);
-
- }
- // Mettre en cache le resultat
-
- } else {
- include("$dest");
- }
-
-
- return $GLOBALS["couleur_extraite"]["$fichier-$x-$y"];
-}
-
-// http://doc.spip.org/@couleur_html_to_hex
-function couleur_html_to_hex($couleur){
- $couleurs_html=array(
- 'aqua'=>'00FFFF','black'=>'000000','blue'=>'0000FF','fuchsia'=>'FF00FF','gray'=>'808080','green'=>'008000','lime'=>'00FF00','maroon'=>'800000',
- 'navy'=>'000080','olive'=>'808000','purple'=>'800080','red'=>'FF0000','silver'=>'C0C0C0','teal'=>'008080','white'=>'FFFFFF','yellow'=>'FFFF00');
- if (isset($couleurs_html[$lc=strtolower($couleur)]))
- return $couleurs_html[$lc];
- return $couleur;
-}
-
-// http://doc.spip.org/@couleur_dec_to_hex
-function couleur_dec_to_hex($red, $green, $blue) {
- $red = dechex($red);
- $green = dechex($green);
- $blue = dechex($blue);
-
- if (strlen($red) == 1) $red = "0".$red;
- if (strlen($green) == 1) $green = "0".$green;
- if (strlen($blue) == 1) $blue = "0".$blue;
-
- return "$red$green$blue";
-}
-
-// http://doc.spip.org/@couleur_hex_to_dec
-function couleur_hex_to_dec($couleur) {
- $couleur = couleur_html_to_hex($couleur);
- $couleur = preg_replace(",^#,","",$couleur);
- $retour["red"] = hexdec(substr($couleur, 0, 2));
- $retour["green"] = hexdec(substr($couleur, 2, 2));
- $retour["blue"] = hexdec(substr($couleur, 4, 2));
-
- return $retour;
-}
-
-// http://doc.spip.org/@couleur_multiple_de_trois
-function couleur_multiple_de_trois($val) {
- $val = hexdec($val);
- $val = round($val / 3) * 3;
- $val = dechex($val);
- return $val;
-
-}
-
-// http://doc.spip.org/@couleur_web
-function couleur_web($couleur) {
- $r = couleur_multiple_de_trois(substr($couleur, 0, 1));
- $v = couleur_multiple_de_trois(substr($couleur, 2, 1));
- $b = couleur_multiple_de_trois(substr($couleur, 4, 1));
-
- return "$r$r$v$v$b$b";
-}
-
-// http://doc.spip.org/@couleur_4096
-function couleur_4096($couleur) {
- $r = (substr($couleur, 0, 1));
- $v = (substr($couleur, 2, 1));
- $b = (substr($couleur, 4, 1));
-
- return "$r$r$v$v$b$b";
-}
-
-
-// http://doc.spip.org/@couleur_extreme
-function couleur_extreme ($couleur, $limite=0.5) {
- // force la couleur au noir ou au blanc le plus proche
- // -> donc couleur foncee devient noire
- // et couleur claire devient blanche
- // -> la limite est une valeur de 0 a 255, permettant de regler le point limite entre le passage noir ou blanc
-
- $couleurs = couleur_hex_to_dec($couleur);
- $red = $couleurs["red"];
- $green = $couleurs["green"];
- $blue = $couleurs["blue"];
-
-
- /*
- $moyenne = round(($red+$green+$blue)/3);
-
- if ($moyenne > $limite) $couleur_texte = "ffffff";
- else $couleur_texte = "000000";
- */
-
- $hsl = couleur_rgb2hsl ($red, $green, $blue);
-
- if ($hsl["l"] > $limite) $couleur_texte = "ffffff";
- else $couleur_texte = "000000";
-
- return $couleur_texte;
-}
-
-// http://doc.spip.org/@couleur_inverser
-function couleur_inverser ($couleur) {
- $couleurs = couleur_hex_to_dec($couleur);
- $red = 255 - $couleurs["red"];
- $green = 255 - $couleurs["green"];
- $blue = 255 - $couleurs["blue"];
-
- $couleur = couleur_dec_to_hex($red, $green, $blue);
-
- return $couleur;
-}
-
-// http://doc.spip.org/@couleur_eclaircir
-function couleur_eclaircir ($couleur) {
- $couleurs = couleur_hex_to_dec($couleur);
-
- $red = $couleurs["red"] + round((255 - $couleurs["red"])/2);
- $green = $couleurs["green"] + round((255 - $couleurs["green"])/2);
- $blue = $couleurs["blue"] + round((255 - $couleurs["blue"])/2);
-
- $couleur = couleur_dec_to_hex($red, $green, $blue);
-
- return $couleur;
-
-}
-// http://doc.spip.org/@couleur_foncer
-function couleur_foncer ($couleur) {
- $couleurs = couleur_hex_to_dec($couleur);
-
- $red = $couleurs["red"] - round(($couleurs["red"])/2);
- $green = $couleurs["green"] - round(($couleurs["green"])/2);
- $blue = $couleurs["blue"] - round(($couleurs["blue"])/2);
-
- $couleur = couleur_dec_to_hex($red, $green, $blue);
-
- return $couleur;
-}
-// http://doc.spip.org/@couleur_foncer_si_claire
-function couleur_foncer_si_claire ($couleur) {
- // ne foncer que les couleurs claires
- // utile pour ecrire sur fond blanc,
- // mais sans changer quand la couleur est deja foncee
- $couleurs = couleur_hex_to_dec($couleur);
- $red = $couleurs["red"];
- $green = $couleurs["green"];
- $blue = $couleurs["blue"];
-
- $moyenne = round(($red+$green+$blue)/3);
-
- if ($moyenne > 122) return couleur_foncer($couleur);
- else return $couleur;
-}
-// http://doc.spip.org/@couleur_eclaircir_si_foncee
-function couleur_eclaircir_si_foncee ($couleur) {
- $couleurs = couleur_hex_to_dec($couleur);
- $red = $couleurs["red"];
- $green = $couleurs["green"];
- $blue = $couleurs["blue"];
-
- $moyenne = round(($red+$green+$blue)/3);
-
- if ($moyenne < 123) return couleur_eclaircir($couleur);
- else return $couleur;
-}
-
-
-// http://doc.spip.org/@couleur_saturation
-function couleur_saturation($couleur, $val) {
- if ($couleur == "ffffff") $couleur = "eeeeee";
-
- $couleurs = couleur_hex_to_dec($couleur);
- $r= 255 - $couleurs["red"];
- $g= 255 - $couleurs["green"];
- $b= 255 - $couleurs["blue"];
-
- $max = max($r,$g,$b);
-
- $r = 255 - $r / $max * 255 * $val;
- $g = 255 - $g / $max * 255 * $val;
- $b = 255 - $b / $max * 255 * $val;
-
- $couleur = couleur_dec_to_hex($r, $g, $b);
-
- return $couleur;
-
-}
-
-
-
-// http://doc.spip.org/@couleur_rgb2hsv
-function couleur_rgb2hsv ($R,$G,$B) {
- $var_R = ( $R / 255 ) ; //Where RGB values = 0 ÷ 255
- $var_G = ( $G / 255 );
- $var_B = ( $B / 255 );
-
- $var_Min = min( $var_R, $var_G, $var_B ) ; //Min. value of RGB
- $var_Max = max( $var_R, $var_G, $var_B ) ; //Max. value of RGB
- $del_Max = $var_Max - $var_Min ; //Delta RGB value
-
- $V = $var_Max;
- $L = ( $var_Max + $var_Min ) / 2;
-
- if ( $del_Max == 0 ) //This is a gray, no chroma...
- {
- $H = 0 ; //HSL results = 0 ÷ 1
- $S = 0 ;
- }
- else //Chromatic data...
- {
- $S = $del_Max / $var_Max;
-
- $del_R = ( ( ( $var_Max - $var_R ) / 6 ) + ( $del_Max / 2 ) ) / $del_Max;
- $del_G = ( ( ( $var_Max - $var_G ) / 6 ) + ( $del_Max / 2 ) ) / $del_Max;
- $del_B = ( ( ( $var_Max - $var_B ) / 6 ) + ( $del_Max / 2 ) ) / $del_Max;
-
- if ( $var_R == $var_Max ) $H = $del_B - $del_G;
- else if ( $var_G == $var_Max ) $H = ( 1 / 3 ) + $del_R - $del_B;
- else if ( $var_B == $var_Max ) $H = ( 2 / 3 ) + $del_G - $del_R;
-
- if ( $H < 0 ) $H = $H + 1;
- if ( $H > 1 ) $H = $H - 1;
- }
-
- $ret["h"] = $H;
- $ret["s"] = $S;
- $ret["v"] = $V;
-
- return $ret;
-}
-
-
-// http://doc.spip.org/@couleur_hsv2rgb
-function couleur_hsv2rgb ($H,$S,$V) {
-
- if ( $S == 0 ) //HSV values = 0 ÷ 1
- {
- $R = $V * 255;
- $G = $V * 255;
- $B = $V * 255;
- }
- else
- {
- $var_h = $H * 6;
- if ( $var_h == 6 ) $var_h = 0 ; //H must be < 1
- $var_i = floor( $var_h ) ; //Or ... var_i = floor( var_h )
- $var_1 = $V * ( 1 - $S );
- $var_2 = $V * ( 1 - $S * ( $var_h - $var_i ) );
- $var_3 = $V * ( 1 - $S * ( 1 - ( $var_h - $var_i ) ) );
-
-
- if ( $var_i == 0 ) { $var_r = $V ; $var_g = $var_3 ; $var_b = $var_1 ; }
- else if ( $var_i == 1 ) { $var_r = $var_2 ; $var_g = $V ; $var_b = $var_1 ; }
- else if ( $var_i == 2 ) { $var_r = $var_1 ; $var_g = $V ; $var_b = $var_3 ; }
- else if ( $var_i == 3 ) { $var_r = $var_1 ; $var_g = $var_2 ; $var_b = $V ; }
- else if ( $var_i == 4 ) { $var_r = $var_3 ; $var_g = $var_1 ; $var_b = $V ; }
- else { $var_r = $V ; $var_g = $var_1 ; $var_b = $var_2; }
-
- $R = $var_r * 255; //RGB results = 0 ÷ 255
- $G = $var_g * 255;
- $B = $var_b * 255;
- }
- $ret["r"] = floor($R);
- $ret["g"] = floor($G);
- $ret["b"] = floor($B);
-
- return $ret;
-}
-
-
-// http://doc.spip.org/@couleur_rgb2hsl
-function couleur_rgb2hsl ($R,$G,$B) {
- $var_R = ( $R / 255 ) ; //Where RGB values = 0 ÷ 255
- $var_G = ( $G / 255 );
- $var_B = ( $B / 255 );
-
- $var_Min = min( $var_R, $var_G, $var_B ) ; //Min. value of RGB
- $var_Max = max( $var_R, $var_G, $var_B ) ; //Max. value of RGB
- $del_Max = $var_Max - $var_Min ; //Delta RGB value
-
- $L = ( $var_Max + $var_Min ) / 2;
-
- if ( $del_Max == 0 ) //This is a gray, no chroma...
- {
- $H = 0 ; //HSL results = 0 ÷ 1
- $S = 0 ;
- }
- else //Chromatic data...
- {
- if ($L < 0.5 ) $S = $del_Max / ( $var_Max+ $var_Min);
- else $S = $del_Max/ ( 2 - $var_Max - $var_Min);
-
- $del_R = ( ( ( $var_Max- $var_R) / 6 ) + ( $del_Max / 2 ) ) / $del_Max;
- $del_G = ( ( ( $var_Max- $var_G) / 6 ) + ( $del_Max / 2 ) ) / $del_Max;
- $del_B = ( ( ( $var_Max- $var_B) / 6 ) + ( $del_Max / 2 ) ) / $del_Max;
-
- if ( $var_R == $var_Max) $H= $del_B - $del_G;
- else if ( $var_G == $var_Max) $H= ( 1 / 3 ) + $del_R - $del_B;
- else if ( $var_B == $var_Max) $H= ( 2 / 3 ) + $del_G - $del_R;
-
- if ( $H < 0 ) $H+= 1;
- if ( $H > 1 ) $H-= 1;
- }
-
- $ret["h"] = $H;
- $ret["s"] = $S;
- $ret["l"] = $L;
-
- return $ret;
-}
-
-
-// http://doc.spip.org/@hue_2_rgb
-function hue_2_rgb( $v1, $v2, $vH ) {
- if ( $vH < 0 ) $vH += 1;
- if ( $vH > 1 ) $vH -= 1;
- if ( ( 6 * $vH ) < 1 ) return ( $v1 + ( $v2 - $v1 ) * 6 * $vH );
- if ( ( 2 * $vH ) < 1 ) return ( $v2 );
- if ( ( 3 * $vH ) < 2 ) return ( $v1 + ( $v2 - $v1 ) * ( ( 2 / 3 ) - $vH ) * 6 );
- return ( $v1 );
-}
-
-// http://doc.spip.org/@couleur_hsl2rgb
-function couleur_hsl2rgb ($H,$S,$L) {
-
- if ( $S == 0 ) //HSV values = 0 ÷ 1
- {
- $R = $V * 255;
- $G = $V * 255;
- $B = $V * 255;
- }
- else
- {
- if ( $L < 0.5 ) $var_2 = $L * ( 1 + $S );
- else $var_2 = ( $L + $S ) - ( $S * $L );
-
- $var_1 = 2 * $L - $var_2;
-
- $R = 255 * hue_2_rgb( $var_1, $var_2, $H + ( 1 / 3 ) ) ;
- $G = 255 * hue_2_rgb( $var_1, $var_2, $H );
- $B = 255 * hue_2_rgb( $var_1, $var_2, $H - ( 1 / 3 ) );
- }
- $ret["r"] = floor($R);
- $ret["g"] = floor($G);
- $ret["b"] = floor($B);
-
- return $ret;
-}
-
-
-
-
-// Image typographique
-
-// Fonctions pour l'arabe
-
-
-// http://doc.spip.org/@rtl_mb_ord
-function rtl_mb_ord($char){
-
- if (($c = ord($char)) < 216) return $c;
- else return 256 * rtl_mb_ord(substr($char, 0, -1)) + ord(substr($char, -1));
-
-/* return (strlen($char) < 2) ?
- ord($char) : 256 * mb_ord(substr($char, 0, -1))
- + ord(substr($char, -1));
-
-*/
- }
-
-
-
-// http://doc.spip.org/@rtl_reverse
-function rtl_reverse($mot, $rtl_global) {
-
- $ponctuations = array("«","»", "“", "â€", ",", ".", " ", ":", ";", "(", ")", "ØŒ", "ØŸ", "?", "!", " ");
- foreach($ponctuations as $ponct) {
- $ponctuation[$ponct] = true;
- }
-
-
-
- for ($i = 0; $i < spip_strlen($mot); $i++) {
- $lettre = spip_substr($mot, $i, 1);
-
-
- $code = rtl_mb_ord($lettre);
-// echo "<li>$lettre - $code";
-
-
-// echo "<li>$code";
- if (($code >= 54928 && $code <= 56767) || ($code >= 15707294 && $code <= 15711164)) {
- $rtl = true;
- }
- else $rtl = false;
-
- if ($lettre == "Ù " || $lettre == "Ù¡" || $lettre == "Ù¢" || $lettre == "Ù£" || $lettre == "Ù¤" || $lettre == "Ù¥"
- || $lettre == "Ù¦" || $lettre == "Ù§" || $lettre == "Ù¨" || $lettre == "Ù©") $rtl = false;
-
- if ($ponctuation[$lettre]) {
- $rtl = $rtl_global;
-
- if ($rtl) {
- switch ($lettre) {
- case "(": $lettre = ")"; break;
- case ")": $lettre = "("; break;
- case "«": $lettre = "»"; break;
- case "»": $lettre = "«"; break;
- case "“": $lettre = "â€"; break;
- case "â€": $lettre = "“"; break;
- }
- }
- }
-
-
- if ($rtl) $res = $lettre.$res;
- else $res = $res.$lettre;
-
- }
- return $res;
-}
-
-
-
-// http://doc.spip.org/@rtl_visuel
-function rtl_visuel($texte, $rtl_global) {
- // hebreu + arabe: 54928 => 56767
- // hebreu + presentation A: 15707294 => 15710140
- // arabe presentation: 15708336 => 15711164
-
-// echo hexdec("efb7bc");
-
- // premiere passe pour determiner s'il y a du rtl
- // de facon a placer ponctuation et mettre les mots dans l'ordre
-
-
-
-
- $arabic_letters = array(
- array("ÙŠ", // lettre 0
- "ï»±", // isolee 1
- "ﻳ", // debut 2
- "ï»´", // milieu 3
- "ﻲ"),
- array("ب", // lettre 0
- "ïº", // isolee 1
- "ﺑ", // debut 2
- "ﺒ", // milieu 3
- "ïº"),
- array("ا", // lettre 0
- "ا", // isolee 1
- "ïº", // debut 2
- "ïº", // milieu 3
- "ﺎ"),
- array("Ø¥", // lettre 0
- "Ø¥", // isolee 1
- "Ø¥", // debut 2
- "ﺈ", // milieu 3
- "ﺈ"),
- array("Ù„", // lettre 0
- "ï»", // isolee 1
- "ﻟ", // debut 2
- "ï» ", // milieu 3
- "ﻞ"),
- array("Ø®", // lettre 0
- "ﺥ", // isolee 1
- "ﺧ", // debut 2
- "ﺨ", // milieu 3
- "ﺦ"),
- array("ج", // lettre 0
- "ïº", // isolee 1
- "ﺟ", // debut 2
- "ïº ", // milieu 3
- "ﺞ"),
- array("س", // lettre 0
- "ﺱ", // isolee 1
- "ﺳ", // debut 2
- "ﺴ", // milieu 3
- "ﺲ"),
- array("Ù†", // lettre 0
- "ﻥ", // isolee 1
- "ﻧ", // debut 2
- "ﻨ", // milieu 3
- "ﻦ"),
- array("Ø´", // lettre 0
- "ﺵ", // isolee 1
- "ﺷ", // debut 2
- "ﺸ", // milieu 3
- "ﺶ"),
- array("Ù‚", // lettre 0
- "ﻕ", // isolee 1
- "ï»—", // debut 2
- "ﻘ", // milieu 3
- "ï»–"),
- array("Ø", // lettre 0
- "ﺡ", // isolee 1
- "ﺣ", // debut 2
- "ﺤ", // milieu 3
- "ﺢ"),
- array("Ù…", // lettre 0
- "ﻡ", // isolee 1
- "ﻣ", // debut 2
- "ﻤ", // milieu 3
- "ﻢ"),
- array("ر", // lettre 0
- "ر", // isolee 1
- "ïº", // debut 2
- "ﺮ", // milieu 3
- "ﺮ"),
- array("ع", // lettre 0
- "ع", // isolee 1
- "ﻋ", // debut 2
- "ﻌ", // milieu 3
- "ﻊ"),
- array("Ùˆ", // lettre 0
- "Ùˆ", // isolee 1
- "ï»", // debut 2
- "ï»®", // milieu 3
- "ï»®"),
- array("Ø©", // lettre 0
- "Ø©", // isolee 1
- "Ø©", // debut 2
- "ﺔ", // milieu 3
- "ﺔ"),
- array("Ù", // lettre 0
- "ﻑ", // isolee 1
- "ﻓ", // debut 2
- "ï»”", // milieu 3
- "ï»’"),
- array("ï»»", // lettre 0
- "ï»»", // isolee 1
- "ï»»", // debut 2
- "ﻼ", // milieu 3
- "ﻼ"),
- array("Ø", // lettre 0
- "ﺡ", // isolee 1
- "ﺣ", // debut 2
- "ﺤ", // milieu 3
- "ﺢ"),
- array("ت", // lettre 0
- "ﺕ", // isolee 1
- "ﺗ", // debut 2
- "ﺘ", // milieu 3
- "ﺖ"),
- array("ض", // lettre 0
- "ﺽ", // isolee 1
- "ﺿ", // debut 2
- "ﻀ", // milieu 3
- "ﺾ"),
- array("Ùƒ", // lettre 0
- "Ùƒ", // isolee 1
- "ï»›", // debut 2
- "ﻜ", // milieu 3
- "ﻚ"),
- array("Ù‡", // lettre 0
- "ﻩ", // isolee 1
- "ﻫ", // debut 2
- "ﻬ", // milieu 3
- "ﻪ"),
- array("ÙŠ", // lettre 0
- "ÙŠ", // isolee 1
- "ﻳ", // debut 2
- "ï»´", // milieu 3
- "ﻲ"),
- array("ئ", // lettre 0
- "ﺉ", // isolee 1
- "ﺋ", // debut 2
- "ﺌ", // milieu 3
- "ﺊ"),
- array("ص", // lettre 0
- "ﺹ", // isolee 1
- "ﺻ", // debut 2
- "ﺼ", // milieu 3
- "ﺺ"),
- array("Ø«", // lettre 0
- "ﺙ", // isolee 1
- "ﺛ", // debut 2
- "ﺜ", // milieu 3
- "ﺚ"),
- array("ï»·", // lettre 0
- "ï»·", // isolee 1
- "ï»·", // debut 2
- "ﻸ", // milieu 3
- "ﻸ"),
- array("د", // lettre 0
- "ﺩ", // isolee 1
- "ﺩ", // debut 2
- "ﺪ", // milieu 3
- "ﺪ"),
- array("Ø°", // lettre 0
- "ﺫ", // isolee 1
- "ﺫ", // debut 2
- "ﺬ", // milieu 3
- "ﺬ"),
- array("Ø·", // lettre 0
- "ï»", // isolee 1
- "ﻃ", // debut 2
- "ﻄ", // milieu 3
- "ﻂ"),
- array("Ø¢", // lettre 0
- "Ø¢", // isolee 1
- "Ø¢", // debut 2
- "ﺂ", // milieu 3
- "ﺂ"),
- array("Ø£", // lettre 0
- "Ø£", // isolee 1
- "Ø£", // debut 2
- "ﺄ", // milieu 3
- "ﺄ"),
- array("ؤ", // lettre 0
- "ؤ", // isolee 1
- "ؤ", // debut 2
- "ﺆ", // milieu 3
- "ﺆ"),
- array("ز", // lettre 0
- "ز", // isolee 1
- "ز", // debut 2
- "ﺰ", // milieu 3
- "ﺰ"),
- array("ظ", // lettre 0
- "ظ", // isolee 1
- "ﻇ", // debut 2
- "ﻈ", // milieu 3
- "ﻆ"),
- array("غ", // lettre 0
- "غ", // isolee 1
- "ï»", // debut 2
- "ï»", // milieu 3
- "ﻎ"),
- array("Ù‰", // lettre 0
- "Ù‰", // isolee 1
- "ﯨ", // debut 2
- "ﯩ", // milieu 3
- "ï»°"),
- array("Ù¾", // lettre 0
- "Ù¾", // isolee 1
- "ï˜", // debut 2
- "ï™", // milieu 3
- "ï—"),
- array("Ú†", // lettre 0
- "Ú†", // isolee 1
- "ï¼", // debut 2
- "ï½", // milieu 3
- "ï»")
- );
-
- if(init_mb_string() AND mb_regex_encoding() !== "UTF-8") echo "Attention: dans php.ini, il faut indiquer:<br /><strong>mbstring.internal_encoding = UTF-8</strong>";
-
-
- $texte = explode(" ", $texte);
-
- foreach ($texte as $mot) {
- $res = "";
-
-
-
- // Inserer des indicateurs de debut/fin
- $mot = "^".$mot."^";
-
- $mot = preg_replace(", ,u", " ", $mot);
- $mot = preg_replace(",«,u", "«", $mot);
- $mot = preg_replace(",»,u", "»", $mot);
-
-
-
-
- // ponctuations
- $ponctuations = array("«","»", "“", "â€", ",", ".", " ", ":", ";", "(", ")", "ØŒ", "ØŸ", "?", "!"," ");
- foreach($ponctuations as $ponct) {
- $mot = str_replace("$ponct", "^$ponct^", $mot);
- }
-
- // lettres forcant coupure
- $mot = preg_replace(",ا,u", "ا^", $mot);
- $mot = preg_replace(",د,u", "د^", $mot);
- $mot = preg_replace(",Ø£,u", "Ø£^", $mot);
- $mot = preg_replace(",Ø¥,u", "Ø¥^", $mot);
- $mot = preg_replace(",Ø£,u", "Ø£^", $mot);
- $mot = preg_replace(",ر,u", "ر^", $mot);
- $mot = preg_replace(",Ø°,u", "Ø°^", $mot);
- $mot = preg_replace(",ز,u", "ز^", $mot);
- $mot = preg_replace(",Ùˆ,u", "Ùˆ^", $mot);
- $mot = preg_replace(",Ùˆ,u", "Ùˆ^", $mot);
- $mot = preg_replace(",ؤ,u", "ؤ^", $mot);
- $mot = preg_replace(",Ø©,u", "Ø©^", $mot);
- // $mot = preg_replace(",Ù„,u", "^Ù„", $mot);
- // $mot = preg_replace(",,", "^", $mot);
-
-
- $mot = preg_replace(",Ù ,u", "^Ù ^", $mot);
- $mot = preg_replace(",Ù¡,u", "^Ù¡^", $mot);
- $mot = preg_replace(",Ù¢,u", "^Ù¢^", $mot);
- $mot = preg_replace(",Ù£,u", "^Ù£^", $mot);
- $mot = preg_replace(",Ù¤,u", "^Ù¤^", $mot);
- $mot = preg_replace(",Ù¥,u", "^Ù¥^", $mot);
- $mot = preg_replace(",Ù¦,u", "^Ù¦^", $mot);
- $mot = preg_replace(",Ù§,u", "^Ù§^", $mot);
- $mot = preg_replace(",Ù¨,u", "^Ù¨^", $mot);
- $mot = preg_replace(",Ù©,u", "^Ù©^", $mot);
-
-
- // Ligatures
- $mot = preg_replace(",لا,u", "ﻻ", $mot);
- $mot = preg_replace(",لأ,u", "ﻷ", $mot);
-
-
- foreach ($arabic_letters as $a_l) {
- $mot = preg_replace(",([^\^])".$a_l[0]."([^\^]),u", "\\1".$a_l[3]."\\2", $mot);
- $mot = preg_replace(",\^".$a_l[0]."([^\^]),u", "^".$a_l[2]."\\1", $mot);
- $mot = preg_replace(",([^\^])".$a_l[0]."\^,u", "\\1".$a_l[4]."^", $mot);
- // il semble qu'il ne soit pas necessaire de remplacer
- // la lettre isolee
- // $mot = preg_replace(",\^".$a_l[0]."\^,u", "^".$a_l[1]."^", $mot);
- }
-
-
-
- $mot = preg_replace(",\^,u", "", $mot);
-
- $res = $mot;
- $res = rtl_reverse($mot, $rtl_global);
-
- /*
- $rtl = false;
- for ($i = 0; $i < spip_strlen($mot); $i++) {
- $lettre = spip_substr($mot, $i, 1);
- $code = rtl_mb_ord($lettre);
- if (($code >= 54928 && $code <= 56767) || ($code >= 15708336 && $code <= 15711164)) $rtl = true;
- }
- */
-
-
- if ($rtl_global) $retour = $res . " " . $retour;
- else $retour = $retour. " ".$res;
- }
-
-
- return $retour;
-}
-
-
-
-
-// http://doc.spip.org/@printWordWrapped
-function printWordWrapped($image, $top, $left, $maxWidth, $font, $couleur, $text, $textSize, $align="left", $hauteur_ligne = 0) {
- static $memps = array();
-
- // imageftbbox exige un float, et settype aime le double pour php < 4.2.0
- settype($textSize, 'double');
-
- // calculer les couleurs ici, car fonctionnement different selon TTF ou PS
- $black = imagecolorallocatealpha($image, hexdec("0x{".substr($couleur, 0,2)."}"), hexdec("0x{".substr($couleur, 2,2)."}"), hexdec("0x{".substr($couleur, 4,2)."}"), 0);
- $grey2 = imagecolorallocatealpha($image, hexdec("0x{".substr($couleur, 0,2)."}"), hexdec("0x{".substr($couleur, 2,2)."}"), hexdec("0x{".substr($couleur, 4,2)."}"), 127);
-
- // Gaffe, T1Lib ne fonctionne carrement pas bien des qu'on sort de ASCII
- // C'est dommage, parce que la rasterisation des caracteres est autrement plus jolie qu'avec TTF.
- // A garder sous le coude en attendant que ca ne soit plus une grosse bouse.
- // Si police Postscript et que fonction existe...
- if (
- false AND
- strtolower(substr($font,-4)) == ".pfb"
- AND function_exists("imagepstext")) {
- // Traitement specifique pour polices PostScript (experimental)
- $textSizePs = round(1.32 * $textSize);
- if (!$fontps = $memps["$font"]) {
- $fontps = imagepsloadfont($font);
- // Est-ce qu'il faut reencoder? Pas testable proprement, alors...
- // imagepsencodefont($fontps,find_in_path('polices/standard.enc'));
- $memps["$font"] = $fontps;
- }
- }
-
- $rtl_global = false;
- for ($i = 0; $i < spip_strlen($text); $i++) {
- $lettre = spip_substr($text, $i, 1);
- $code = rtl_mb_ord($lettre);
- if (($code >= 54928 && $code <= 56767) || ($code >= 15707294 && $code <= 15711164)) {
- $rtl_global = true;
- }
- }
-
-
- // split the text into an array of single words
- $words = explode(' ', $text);
-
- // les espaces
- foreach($words as $k=>$v)
- $words[$k] = str_replace(array('~'), array(' '), $v);
-
-
- if ($hauteur_ligne == 0) $lineHeight = floor($textSize * 1.3);
- else $lineHeight = $hauteur_ligne;
-
- $dimensions_espace = imageftbbox($textSize, 0, $font, ' ', array());
- $largeur_espace = $dimensions_espace[2] - $dimensions_espace[0];
- $retour["espace"] = $largeur_espace;
-
-
- $line = '';
- while (count($words) > 0) {
-
- $mot = $words[0];
-
- if ($rtl_global) $mot = rtl_visuel($mot,$rtl_global);
-
- $dimensions = imageftbbox($textSize, 0, $font, $line.' '.$mot, array());
- $lineWidth = $dimensions[2] - $dimensions[0]; // get the length of this line, if the word is to be included
- if ($lineWidth > $maxWidth) { // if this makes the text wider that anticipated
- $lines[] = $line; // add the line to the others
- $line = ''; // empty it (the word will be added outside the loop)
- }
- $line .= ' '.$words[0]; // add the word to the current sentence
- $words = array_slice($words, 1); // remove the word from the array
- }
- if ($line != '') { $lines[] = $line; } // add the last line to the others, if it isn't empty
- $height = count($lines) * $lineHeight; // the height of all the lines total
- // do the actual printing
- $i = 0;
-
- // Deux passes pour recuperer, d'abord, largeur_ligne
- // necessaire pour alignement right et center
- foreach ($lines as $line) {
- if ($rtl_global) $line = rtl_visuel($line, $rtl_global);
-
- $dimensions = imageftbbox($textSize, 0, $font, $line, array());
- $largeur_ligne = $dimensions[2] - $dimensions[0];
- if ($largeur_ligne > $largeur_max) $largeur_max = $largeur_ligne;
- }
-
- foreach ($lines as $i => $line) {
- if ($rtl_global) $line = rtl_visuel($line, $rtl_global);
-
- $dimensions = imageftbbox($textSize, 0, $font, $line, array());
- $largeur_ligne = $dimensions[2] - $dimensions[0];
- if ($align == "right") $left_pos = $largeur_max - $largeur_ligne;
- else if ($align == "center") $left_pos = floor(($largeur_max - $largeur_ligne)/2);
- else $left_pos = 0;
-
-
- if ($fontps) {
- $line = trim($line);
- imagepstext ($image, "$line", $fontps, $textSizePs, $black, $grey2, $left + $left_pos, $top + $lineHeight * $i, 0, 0, 0, 16);
- }
- else imagefttext($image, $textSize, 0, $left + $left_pos, $top + $lineHeight * $i, $black, $font, trim($line), array());
- }
- $retour["height"] = $height;# + round(0.3 * $hauteur_ligne);
- $retour["width"] = $largeur_max;
-
- return $retour;
-}
-//array imagefttext ( resource image, float size, float angle, int x, int y, int col, string font_file, string text [, array extrainfo] )
-//array imagettftext ( resource image, float size, float angle, int x, int y, int color, string fontfile, string text )
-
-// http://doc.spip.org/@produire_image_typo
-function produire_image_typo() {
- /*
- arguments autorises:
-
- $texte : le texte a transformer; attention: c'est toujours le premier argument, et c'est automatique dans les filtres
- $couleur : la couleur du texte dans l'image - pas de dieze
- $police: nom du fichier de la police (inclure terminaison)
- $largeur: la largeur maximale de l'image ; attention, l'image retournee a une largeur inferieure, selon les limites reelles du texte
- $hauteur_ligne: la hauteur de chaque ligne de texte si texte sur plusieurs lignes
- (equivalent a "line-height")
- $padding: forcer de l'espace autour du placement du texte; necessaire pour polices a la con qui "depassent" beaucoup de leur boite
- $align: alignement left, right, center
- */
-
-
-
- // Recuperer les differents arguments
- $numargs = func_num_args();
- $arg_list = func_get_args();
- $texte = $arg_list[0];
- for ($i = 1; $i < $numargs; $i++) {
- if (($p = strpos($arg_list[$i], "="))!==FALSE) {
- $nom_variable = substr($arg_list[$i], 0, $p);
- $val_variable = substr($arg_list[$i], $p+1);
-
- $variable["$nom_variable"] = $val_variable;
- }
-
- }
-
- // Construire requete et nom fichier
- $text = str_replace(" ", "~", $texte);
- $text = preg_replace(",(\r|\n)+,ms", " ", $text);
- include_spip('inc/charsets');
- $text = html2unicode(strip_tags($text));
- if (strlen($text) == 0) return "";
-
- $taille = $variable["taille"];
- if ($taille < 1) $taille = 16;
-
- $couleur = couleur_html_to_hex($variable["couleur"]);
- if (strlen($couleur) < 6) $couleur = "000000";
-
- $alt = $texte;
-
- $align = $variable["align"];
- if (!$variable["align"]) $align="left";
-
- $police = $variable["police"];
- if (strlen($police) < 2) $police = "dustismo.ttf";
-
- $largeur = $variable["largeur"];
- if ($largeur < 5) $largeur = 600;
-
- if ($variable["hauteur_ligne"] > 0) $hauteur_ligne = $variable["hauteur_ligne"];
- else $hauteur_ligne = 0;
- if ($variable["padding"] > 0) $padding = $variable["padding"];
- else $padding = 0;
-
-
-
- $string = "$text-$taille-$couleur-$align-$police-$largeur-$hauteur_ligne-$padding";
- $query = md5($string);
- $dossier = sous_repertoire(_DIR_VAR, 'cache-texte');
- $fichier = "$dossier$query.png";
-
- $flag_gd_typo = function_exists("imageftbbox")
- && function_exists('imageCreateTrueColor');
-
-
- if (file_exists($fichier))
- $image = $fichier;
- else if (!$flag_gd_typo)
- return $texte;
- else {
- $font = find_in_path('polices/'.$police);
- if (!$font) {
- spip_log(_T('fichier_introuvable', array('fichier' => $police)));
- $font = find_in_path('polices/'."dustismo.ttf");
- }
-
- $imgbidon = imageCreateTrueColor($largeur, 45);
- $retour = printWordWrapped($imgbidon, $taille+5, 0, $largeur, $font, $couleur, $text, $taille, 'left', $hauteur_ligne);
- $hauteur = $retour["height"];
- $largeur_reelle = $retour["width"];
- $espace = $retour["espace"];
- imagedestroy($imgbidon);
-
- $im = imageCreateTrueColor($largeur_reelle-$espace+(2*$padding), $hauteur+5+(2*$padding));
- imagealphablending ($im, FALSE );
- imagesavealpha ( $im, TRUE );
-
- // Creation de quelques couleurs
-
- $grey2 = imagecolorallocatealpha($im, hexdec("0x{".substr($couleur, 0,2)."}"), hexdec("0x{".substr($couleur, 2,2)."}"), hexdec("0x{".substr($couleur, 4,2)."}"), 127);
- ImageFilledRectangle ($im,0,0,$largeur_reelle+(2*$padding),$hauteur+5+(2*$padding),$grey2);
-
- // Le texte a dessiner
- printWordWrapped($im, $taille+5+$padding, $padding, $largeur, $font, $couleur, $text, $taille, $align, $hauteur_ligne);
-
-
- // Utiliser imagepng() donnera un texte plus claire,
- // compare a l'utilisation de la fonction imagejpeg()
- imagepng($im, $fichier);
- imagedestroy($im);
-
- $image = $fichier;
- }
-
-
- $dimensions = getimagesize($image);
- $largeur = $dimensions[0];
- $hauteur = $dimensions[1];
- return inserer_attribut("<img src='$image' width='$largeur' height='$hauteur' style='width:".$largeur."px;height:".$hauteur."px;' />", 'alt', $alt);
-}
-
-
-
-//
-// Produire des fichiers au format .ico
-// avec du code recupere de :
-//
-//////////////////////////////////////////////////////////////
-/// phpThumb() by James Heinrich <info@silisoftware.com> //
-// available at http://phpthumb.sourceforge.net ///
-//////////////////////////////////////////////////////////////
-class phpthumb_functions {
-// http://doc.spip.org/@GetPixelColor
- function GetPixelColor(&$img, $x, $y) {
- if (!is_resource($img)) {
- return false;
- }
- return @ImageColorsForIndex($img, @ImageColorAt($img, $x, $y));
- }
-// http://doc.spip.org/@LittleEndian2String
- function LittleEndian2String($number, $minbytes=1) {
- $intstring = '';
- while ($number > 0) {
- $intstring = $intstring.chr($number & 255);
- $number >>= 8;
- }
- return str_pad($intstring, $minbytes, "\x00", STR_PAD_RIGHT);
- }
-// http://doc.spip.org/@GD2ICOstring
- function GD2ICOstring(&$gd_image_array) {
- foreach ($gd_image_array as $key => $gd_image) {
-
- $ImageWidths[$key] = ImageSX($gd_image);
- $ImageHeights[$key] = ImageSY($gd_image);
- $bpp[$key] = ImageIsTrueColor($gd_image) ? 32 : 24;
- $totalcolors[$key] = ImageColorsTotal($gd_image);
-
- $icXOR[$key] = '';
- for ($y = $ImageHeights[$key] - 1; $y >= 0; $y--) {
- for ($x = 0; $x < $ImageWidths[$key]; $x++) {
- $argb = phpthumb_functions::GetPixelColor($gd_image, $x, $y);
- $a = round(255 * ((127 - $argb['alpha']) / 127));
- $r = $argb['red'];
- $g = $argb['green'];
- $b = $argb['blue'];
-
- if ($bpp[$key] == 32) {
- $icXOR[$key] .= chr($b).chr($g).chr($r).chr($a);
- } elseif ($bpp[$key] == 24) {
- $icXOR[$key] .= chr($b).chr($g).chr($r);
- }
-
- if ($a < 128) {
- @$icANDmask[$key][$y] .= '1';
- } else {
- @$icANDmask[$key][$y] .= '0';
- }
- }
- // mask bits are 32-bit aligned per scanline
- while (strlen($icANDmask[$key][$y]) % 32) {
- $icANDmask[$key][$y] .= '0';
- }
- }
- $icAND[$key] = '';
- foreach ($icANDmask[$key] as $y => $scanlinemaskbits) {
- for ($i = 0; $i < strlen($scanlinemaskbits); $i += 8) {
- $icAND[$key] .= chr(bindec(str_pad(substr($scanlinemaskbits, $i, 8), 8, '0', STR_PAD_LEFT)));
- }
- }
-
- }
-
- foreach ($gd_image_array as $key => $gd_image) {
- $biSizeImage = $ImageWidths[$key] * $ImageHeights[$key] * ($bpp[$key] / 8);
-
- // BITMAPINFOHEADER - 40 bytes
- $BitmapInfoHeader[$key] = '';
- $BitmapInfoHeader[$key] .= "\x28\x00\x00\x00"; // DWORD biSize;
- $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageWidths[$key], 4); // LONG biWidth;
- // The biHeight member specifies the combined
- // height of the XOR and AND masks.
- $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageHeights[$key] * 2, 4); // LONG biHeight;
- $BitmapInfoHeader[$key] .= "\x01\x00"; // WORD biPlanes;
- $BitmapInfoHeader[$key] .= chr($bpp[$key])."\x00"; // wBitCount;
- $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD biCompression;
- $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($biSizeImage, 4); // DWORD biSizeImage;
- $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // LONG biXPelsPerMeter;
- $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // LONG biYPelsPerMeter;
- $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD biClrUsed;
- $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD biClrImportant;
- }
-
-
- $icondata = "\x00\x00"; // idReserved; // Reserved (must be 0)
- $icondata .= "\x01\x00"; // idType; // Resource Type (1 for icons)
- $icondata .= phpthumb_functions::LittleEndian2String(count($gd_image_array), 2); // idCount; // How many images?
-
- $dwImageOffset = 6 + (count($gd_image_array) * 16);
- foreach ($gd_image_array as $key => $gd_image) {
- // ICONDIRENTRY idEntries[1]; // An entry for each image (idCount of 'em)
-
- $icondata .= chr($ImageWidths[$key]); // bWidth; // Width, in pixels, of the image
- $icondata .= chr($ImageHeights[$key]); // bHeight; // Height, in pixels, of the image
- $icondata .= chr($totalcolors[$key]); // bColorCount; // Number of colors in image (0 if >=8bpp)
- $icondata .= "\x00"; // bReserved; // Reserved ( must be 0)
-
- $icondata .= "\x01\x00"; // wPlanes; // Color Planes
- $icondata .= chr($bpp[$key])."\x00"; // wBitCount; // Bits per pixel
-
- $dwBytesInRes = 40 + strlen($icXOR[$key]) + strlen($icAND[$key]);
- $icondata .= phpthumb_functions::LittleEndian2String($dwBytesInRes, 4); // dwBytesInRes; // How many bytes in this resource?
-
- $icondata .= phpthumb_functions::LittleEndian2String($dwImageOffset, 4); // dwImageOffset; // Where in the file is this image?
- $dwImageOffset += strlen($BitmapInfoHeader[$key]);
- $dwImageOffset += strlen($icXOR[$key]);
- $dwImageOffset += strlen($icAND[$key]);
- }
-
- foreach ($gd_image_array as $key => $gd_image) {
- $icondata .= $BitmapInfoHeader[$key];
- $icondata .= $icXOR[$key];
- $icondata .= $icAND[$key];
- }
-
- return $icondata;
- }
-
-}
-
-?>
diff --git a/ecrire/inc/filtres_images_lib_mini.php b/ecrire/inc/filtres_images_lib_mini.php
new file mode 100644
index 0000000000..8ec24fbc77
--- /dev/null
+++ b/ecrire/inc/filtres_images_lib_mini.php
@@ -0,0 +1,909 @@
+<?php
+
+/***************************************************************************\
+ * SPIP, Systeme de publication pour l'internet *
+ * *
+ * Copyright (c) 2001-2009 *
+ * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
+ * *
+ * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
+ * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
+\***************************************************************************/
+
+
+if (!defined("_ECRIRE_INC_VERSION")) return;
+include_spip('inc/filtres'); // par precaution
+
+
+/**
+ * Transforme une couleur vectorielle R,G,B en hexa
+ *
+ * @param int $red
+ * @param int $green
+ * @param int $blue
+ * @return string
+ */
+function _couleur_dec_to_hex($red, $green, $blue) {
+ $red = dechex($red);
+ $green = dechex($green);
+ $blue = dechex($blue);
+
+ if (strlen($red) == 1) $red = "0".$red;
+ if (strlen($green) == 1) $green = "0".$green;
+ if (strlen($blue) == 1) $blue = "0".$blue;
+
+ return "$red$green$blue";
+}
+
+/**
+ * Transforme une couleur hexa en vectorielle R,G,B
+ *
+ * @param string $couleur
+ * @return array
+ */
+function _couleur_hex_to_dec($couleur) {
+ $couleur = couleur_html_to_hex($couleur);
+ $couleur = preg_replace(",^#,","",$couleur);
+ $retour["red"] = hexdec(substr($couleur, 0, 2));
+ $retour["green"] = hexdec(substr($couleur, 2, 2));
+ $retour["blue"] = hexdec(substr($couleur, 4, 2));
+
+ return $retour;
+}
+
+
+function statut_effacer_images_temporaires($stat){
+ static $statut = false; // par defaut on grave toute les images
+ if ($stat==='get') return $statut;
+ $statut = $stat?true:false;
+}
+
+// http://doc.spip.org/@cherche_image_nommee
+function cherche_image_nommee($nom, $formats = array ('gif', 'jpg', 'png')) {
+
+ if (strncmp(_DIR_IMG, $nom,$n=strlen(_DIR_IMG))==0) {
+ $nom = substr($nom,$n);
+ } else if (strncmp(_DIR_IMG_PACK, $nom,$n=strlen(_DIR_IMG_PACK))==0) {
+ $nom = substr($nom,$n);
+ } else if (strncmp(_DIR_IMG_ICONE_DIST, $nom,$n=strlen(_DIR_IMG_ICONES_DIST))==0) {
+ $nom = substr($nom,$n);
+ }
+ $pos = strrpos($nom, "/");
+ if ($pos > 0) {
+ $chemin = substr($nom, 0, $pos+1);
+ $nom = substr($nom, $pos+1);
+ } else {
+ $chemin = "";
+ }
+
+ reset($formats);
+ while (list(, $format) = each($formats)) {
+ if (@file_exists(_DIR_IMG . "$chemin$nom.$format")){
+ return array((_DIR_IMG . $chemin), $nom, $format);
+ } else if (@file_exists(_DIR_IMG_PACK . "$chemin$nom.$format")){
+ return array((_DIR_IMG_PACK . $chemin), $nom, $format);
+ } else if (@file_exists(_DIR_IMG_ICONES_DIST . "$chemin$nom.$format")){
+ return array((_DIR_IMG_ICONES_DIST . $chemin), $nom, $format);
+ }
+ }
+}
+
+// Fonctions de traitement d'image
+// uniquement pour GD2
+// http://doc.spip.org/@image_valeurs_trans
+function _image_valeurs_trans($img, $effet, $forcer_format = false, $fonction_creation = NULL) {
+ static $images_recalcul = array();
+ if (strlen($img)==0) return false;
+
+ $source = trim(extraire_attribut($img, 'src'));
+ if (strlen($source) < 1){
+ $source = $img;
+ $img = "<img src='$source' />";
+ }
+
+ // les protocoles web prennent au moins 3 lettres
+ if (preg_match(';^(\w{3,7}://);', $source)){
+ include_spip('inc/distant');
+ $fichier = _DIR_RACINE . copie_locale($source);
+ if (!$fichier) return "";
+ } else {
+ // enlever le timestamp eventuel
+ $source=preg_replace(',[?][0-9]+$,','',$source);
+ $fichier = $source;
+ }
+
+ $terminaison_dest = "";
+ if (preg_match(",^(?>.*)(?<=\.(gif|jpg|png)),", $fichier, $regs)) {
+ $terminaison = $regs[1];
+ $terminaison_dest = $terminaison;
+
+ if ($terminaison == "gif") $terminaison_dest = "png";
+ }
+ if ($forcer_format!==false) $terminaison_dest = $forcer_format;
+
+ if (!$terminaison_dest) return false;
+
+ $term_fonction = $terminaison;
+ if ($term_fonction == "jpg") $term_fonction = "jpeg";
+
+ $nom_fichier = substr($fichier, 0, strlen($fichier) - 4);
+ $fichier_dest = $nom_fichier;
+
+ if (@file_exists($f = $fichier)){
+ list ($ret["hauteur"],$ret["largeur"]) = taille_image($img);
+ $date_src = @filemtime($f);
+ }
+ elseif (@file_exists($f = "$fichier.src")
+ AND lire_fichier($f,$valeurs)
+ AND $valeurs=unserialize($valeurs)) {
+ $ret["hauteur"] = $valeurs["hauteur_dest"];
+ $ret["largeur"] = $valeurs["largeur_dest"];
+ $date_src = $valeurs["date"];
+ }
+
+ // pas de fichier source par la
+ if (!($ret["hauteur"] OR $ret["largeur"]))
+ return false;
+
+ // cas general :
+ // on a un dossier cache commun et un nom de fichier qui varie avec l'effet
+ // cas particulier de reduire :
+ // un cache par dimension, et le nom de fichier est conserve, suffixe par la dimension aussi
+ $cache = "cache-gd2";
+ if (substr($effet,0,7)=='reduire') {
+ list(,$maxWidth,$maxHeight) = explode('-',$effet);
+ list ($destWidth,$destHeight) = _image_ratio($ret['largeur'], $ret['hauteur'], $maxWidth, $maxHeight);
+ $ret['largeur_dest'] = $destWidth;
+ $ret['hauteur_dest'] = $destHeight;
+ $effet = "L{$destWidth}xH$destHeight";
+ $cache = "cache-vignettes";
+ $fichier_dest = basename($fichier_dest);
+ if (($ret['largeur']<=$maxWidth)&&($ret['hauteur']<=$maxHeight)){
+ // on garde la terminaison initiale car image simplement copiee
+ // et on postfixe son nom avec un md5 du path
+ $terminaison_dest = $terminaison;
+ $fichier_dest .= '-'.substr(md5("$fichier"),0,5);
+ }
+ else
+ $fichier_dest .= '-'.substr(md5("$fichier-$effet"),0,5);
+ $cache = sous_repertoire(_DIR_VAR, $cache);
+ $cache = sous_repertoire($cache, $effet);
+ # cherche un cache existant
+ /*foreach (array('gif','jpg','png') as $fmt)
+ if (@file_exists($cache . $fichier_dest . '.' . $fmt)) {
+ $terminaison_dest = $fmt;
+ }*/
+ }
+ else {
+ $fichier_dest = md5("$fichier-$effet");
+ $cache = sous_repertoire(_DIR_VAR, $cache);
+ }
+
+ $fichier_dest = $cache . $fichier_dest . "." .$terminaison_dest;
+
+ $GLOBALS["images_calculees"][] = $fichier_dest;
+
+ $creer = true;
+ // si recalcul des images demande, recalculer chaque image une fois
+ if (isset($GLOBALS['var_images']) && $GLOBALS['var_images'] && !isset($images_recalcul[$fichier_dest])){
+ $images_recalcul[$fichier_dest] = true;
+ }
+ else {
+ if (@file_exists($f = $fichier_dest)){
+ if (filemtime($f)>=$date_src)
+ $creer = false;
+ }
+ else if (@file_exists($f = "$fichier_dest.src")
+ AND lire_fichier($f,$valeurs)
+ AND $valeurs=unserialize($valeurs)
+ AND $valeurs["date"]>=$date_src)
+ $creer = false;
+ }
+ if ($creer) {
+ if (!file_exists($fichier)) {
+ if (!file_exists("$fichier.src")) {
+ spip_log("Image absente : $fichier");
+ return false;
+ }
+ # on reconstruit l'image source absente a partir de la chaine des .src
+ reconstruire_image_intermediaire($fichier);
+ }
+ }
+ // todo: si une image png est nommee .jpg, le reconnaitre avec le bon $f
+ $f = "imagecreatefrom".$term_fonction;
+ if (!function_exists($f)) return false;
+ $ret["fonction_imagecreatefrom"] = $f;
+ $ret["fichier"] = $fichier;
+ $ret["fonction_image"] = "_image_image".$terminaison_dest;
+ $ret["fichier_dest"] = $fichier_dest;
+ $ret["format_source"] = $terminaison;
+ $ret["format_dest"] = $terminaison_dest;
+ $ret["date_src"] = $date_src;
+ $ret["creer"] = $creer;
+ $ret["class"] = extraire_attribut($img, 'class');
+ $ret["alt"] = extraire_attribut($img, 'alt');
+ $ret["style"] = extraire_attribut($img, 'style');
+ $ret["tag"] = $img;
+ if ($fonction_creation){
+ $ret["reconstruction"] = $fonction_creation;
+ # ecrire ici comment creer le fichier, car il est pas sur qu'on l'ecrira reelement
+ # cas de image_reduire qui finalement ne reduit pas l'image source
+ # ca evite d'essayer de le creer au prochain hit si il n'est pas la
+ #ecrire_fichier($ret['fichier_dest'].'.src',serialize($ret),true);
+ }
+ return $ret;
+}
+
+// http://doc.spip.org/@image_imagepng
+function _image_imagepng($img,$fichier) {
+ if (!function_exists('imagepng')) return false;
+ $tmp = $fichier.".tmp";
+ $ret = imagepng($img,$tmp);
+
+ $taille_test = getimagesize($tmp);
+ if ($taille_test[0] < 1) return false;
+
+ spip_unlink($fichier); // le fichier peut deja exister
+ @rename($tmp, $fichier);
+ return $ret;
+}
+
+// http://doc.spip.org/@image_imagegif
+function _image_imagegif($img,$fichier) {
+ if (!function_exists('imagegif')) return false;
+ $tmp = $fichier.".tmp";
+ $ret = imagegif($img,$tmp);
+
+ $taille_test = getimagesize($tmp);
+ if ($taille_test[0] < 1) return false;
+
+
+ spip_unlink($fichier); // le fichier peut deja exister
+ @rename($tmp, $fichier);
+ return $ret;
+}
+// http://doc.spip.org/@image_imagejpg
+function _image_imagejpg($img,$fichier,$qualite=_IMG_GD_QUALITE) {
+ if (!function_exists('imagejpeg')) return false;
+ $tmp = $fichier.".tmp";
+ $ret = imagejpeg($img,$tmp, $qualite);
+
+ $taille_test = getimagesize($tmp);
+ if ($taille_test[0] < 1) return false;
+
+ spip_unlink($fichier); // le fichier peut deja exister
+ @rename($tmp, $fichier);
+ return $ret;
+}
+// http://doc.spip.org/@image_imageico
+function _image_imageico($img, $fichier) {
+ $gd_image_array = array($img);
+
+ return ecrire_fichier($fichier, phpthumb_functions::GD2ICOstring($gd_image_array));
+}
+
+// $qualite est utilise pour la qualite de compression des jpeg
+// http://doc.spip.org/@image_gd_output
+function _image_gd_output($img,$valeurs, $qualite=_IMG_GD_QUALITE){
+ $fonction = "_image_image".$valeurs['format_dest'];
+ $ret = false;
+ #un flag pour reperer les images gravees
+ $lock =
+ !statut_effacer_images_temporaires('get') // si la fonction n'a pas ete activee, on grave tout
+ OR (file_exists($valeurs['fichier_dest']) AND !file_exists($valeurs['fichier_dest'].'.src'));
+ if (
+ function_exists($fonction)
+ && ($ret = $fonction($img,$valeurs['fichier_dest'],$qualite)) # on a reussi a creer l'image
+ && isset($valeurs['reconstruction']) # et on sait comment la resonctruire le cas echeant
+ && !$lock
+ )
+ if (file_exists($valeurs['fichier_dest'])){
+ $valeurs['date'] = @filemtime($valeurs['fichier_dest']); // pour la retrouver apres disparition
+ ecrire_fichier($valeurs['fichier_dest'].'.src',serialize($valeurs),true);
+ }
+ return $ret;
+}
+
+// http://doc.spip.org/@reconstruire_image_intermediaire
+function reconstruire_image_intermediaire($fichier_manquant){
+ $reconstruire = array();
+ $fichier = $fichier_manquant;
+ while (
+ !file_exists($fichier)
+ AND lire_fichier($src = "$fichier.src",$source)
+ AND $valeurs=unserialize($source)
+ AND ($fichier = $valeurs['fichier']) # l'origine est connue (on ne verifie pas son existence, qu'importe ...)
+ ) {
+ spip_unlink($src); // si jamais on a un timeout pendant la reconstruction, elle se fera naturellement au hit suivant
+ $reconstruire[] = $valeurs['reconstruction'];
+ }
+ while (count($reconstruire)){
+ $r = array_pop($reconstruire);
+ $fonction = $r[0];
+ $args = $r[1];
+ call_user_func_array($fonction, $args);
+ }
+ // cette image intermediaire est commune a plusieurs series de filtre, il faut la conserver
+ // mais l'on peut nettoyer les miettes de sa creation
+ ramasse_miettes($fichier_manquant);
+}
+
+// http://doc.spip.org/@ramasse_miettes
+function ramasse_miettes($fichier){
+ if (!lire_fichier($src = "$fichier.src",$source)
+ OR !$valeurs=unserialize($source)) return;
+ spip_unlink($src); # on supprime la reference a sa source pour marquer cette image comme non intermediaire
+ while (
+ ($fichier = $valeurs['fichier']) # l'origine est connue (on ne verifie pas son existence, qu'importe ...)
+ AND (substr($fichier,0,strlen(_DIR_VAR))==_DIR_VAR) # et est dans local
+ AND (lire_fichier($src = "$fichier.src",$source)) # le fichier a une source connue (c'est donc une image calculee intermediaire)
+ AND ($valeurs=unserialize($source)) # et valide
+ ) {
+ # on efface le fichier
+ spip_unlink($fichier);
+ # mais laisse le .src qui permet de savoir comment reconstruire l'image si besoin
+ #spip_unlink($src);
+ }
+}
+
+// http://doc.spip.org/@image_graver
+function image_graver($img){
+ $fichier = extraire_attribut($img, 'src');
+ if (($p=strpos($fichier,'?'))!==FALSE)
+ $fichier=substr($fichier,0,$p);
+ if (strlen($fichier) < 1)
+ $fichier = $img;
+ # si jamais le fichier final n'a pas ete calcule car suppose temporaire
+ if (!file_exists($fichier))
+ reconstruire_image_intermediaire($fichier);
+ ramasse_miettes($fichier);
+ return $img; // on ne change rien
+}
+
+// Transforme une image a palette indexee (256 couleurs max) en "vraies" couleurs RGB
+// http://doc.spip.org/@imagepalettetotruecolor
+ function imagepalettetotruecolor(&$img) {
+ if (!imageistruecolor($img) AND function_exists(imagecreatetruecolor)) {
+ $w = imagesx($img);
+ $h = imagesy($img);
+ $img1 = imagecreatetruecolor($w,$h);
+ //Conserver la transparence si possible
+ if(function_exists('ImageCopyResampled')) {
+ if (function_exists("imageAntiAlias")) imageAntiAlias($img1,true);
+ @imagealphablending($img1, false);
+ @imagesavealpha($img1,true);
+ @ImageCopyResampled($img1, $img, 0, 0, 0, 0, $w, $h, $w, $h);
+ } else {
+ imagecopy($img1,$img,0,0,0,0,$w,$h);
+ }
+
+ $img = $img1;
+ }
+}
+
+// http://doc.spip.org/@image_tag_changer_taille
+function _image_tag_changer_taille($tag,$width,$height,$style=false){
+ if ($style===false) $style = extraire_attribut($tag,'style');
+ // enlever le width et height du style
+ $style = preg_replace(",(^|;)\s*(width|height)\s*:\s*[^;]+,ims","",$style);
+ if ($style AND $style{0}==';') $style=substr($style,1);
+ // mettre des attributs de width et height sur les images,
+ // ca accelere le rendu du navigateur
+ // ca permet aux navigateurs de reserver la bonne taille
+ // quand on a desactive l'affichage des images.
+ $tag = inserer_attribut($tag,'width',$width);
+ $tag = inserer_attribut($tag,'height',$height);
+ $style = "height:".$height."px;width:".$width."px;".$style;
+ // attributs deprecies. Transformer en CSS
+ if ($espace = extraire_attribut($tag, 'hspace')){
+ $style = "margin:${espace}px;".$style;
+ $tag = inserer_attribut($tag,'hspace','');
+ }
+ $tag = inserer_attribut($tag,'style',$style);
+ return $tag;
+}
+
+// function d'ecriture du de la balise img en sortie des filtre image
+// reprend le tag initial et surcharge les tags modifies
+function _image_ecrire_tag($valeurs,$surcharge){
+ $tag = str_replace(">","/>",str_replace("/>",">",$valeurs['tag'])); // fermer les tags img pas bien fermes;
+
+ // le style
+ $style = $valeurs['style'];
+ if (isset($surcharge['style'])){
+ $style = $surcharge['style'];
+ unset($surcharge['style']);
+ }
+
+ // traiter specifiquement la largeur et la hauteur
+ $width = $valeurs['largeur'];
+ if (isset($surcharge['width'])){
+ $width = $surcharge['width'];
+ unset($surcharge['width']);
+ }
+ $height = $valeurs['hauteur'];
+ if (isset($surcharge['height'])){
+ $height = $surcharge['height'];
+ unset($surcharge['height']);
+ }
+
+ $tag = _image_tag_changer_taille($tag,$width,$height,$style);
+ // traiter specifiquement le src qui peut etre repris dans un onmouseout
+ // on remplace toute les ref a src dans le tag
+ $src = extraire_attribut($tag,'src');
+ if (isset($surcharge['src'])){
+ $tag = str_replace($src,$surcharge['src'],$tag);
+ $src = $surcharge['src'];
+ unset($surcharge['src']);
+ }
+
+ $class = $valeurs['class'];
+ if (isset($surcharge['class'])){
+ $class = $surcharge['class'];
+ unset($surcharge['class']);
+ }
+ if(strlen($class))
+ $tag = inserer_attribut($tag,'class',$class);
+
+ if (count($surcharge))
+ foreach($surcharge as $attribut=>$valeur)
+ $tag = inserer_attribut($tag,$attribut,$valeur);
+
+ return $tag;
+}
+
+function _image_creer_vignette($valeurs, $maxWidth, $maxHeight, $process='AUTO', $force=false, $test_cache_only = false) {
+ // ordre de preference des formats graphiques pour creer les vignettes
+ // le premier format disponible, selon la methode demandee, est utilise
+ $image = $valeurs['fichier'];
+ $format = $valeurs['format_source'];
+ $destdir = dirname($valeurs['fichier_dest']);
+ $destfile = basename($valeurs['fichier_dest'],".".$valeurs["format_dest"]);
+
+ $format_sortie = $valeurs['format_dest'];
+
+ // liste des formats qu'on sait lire
+ $img = isset($GLOBALS['meta']['formats_graphiques'])
+ ? (strpos($GLOBALS['meta']['formats_graphiques'], $format)!==false)
+ : false;
+
+ // si le doc n'est pas une image, refuser
+ if (!$force AND !$img) return;
+ $destination = "$destdir/$destfile";
+
+ // chercher un cache
+ $vignette = '';
+ if ($test_cache_only AND !$vignette) return;
+
+ // utiliser le cache ?
+ if (!$test_cache_only)
+ if ($force OR !$vignette OR (@filemtime($vignette) < @filemtime($image))) {
+
+ $creation = true;
+ // calculer la taille
+ if (($srcWidth=$valeurs['largeur']) && ($srcHeight=$valeurs['hauteur'])){
+ if (!($destWidth=$valeurs['largeur_dest']) || !($destHeight=$valeurs['hauteur_dest']))
+ list ($destWidth,$destHeight) = _image_ratio($valeurs['largeur'], $valeurs['hauteur'], $maxWidth, $maxHeight);
+ }
+ elseif ($process == 'convert' OR $process == 'imagick') {
+ $destWidth = $maxWidth;
+ $destHeight = $maxHeight;
+ } else {
+ spip_log("echec $process sur $image");
+ return;
+ }
+
+ // Si l'image est de la taille demandee (ou plus petite), simplement
+ // la retourner
+ if ($srcWidth
+ AND $srcWidth <= $maxWidth AND $srcHeight <= $maxHeight) {
+ $vignette = $destination.'.'.$format;
+ @copy($image, $vignette);
+ }
+ // imagemagick en ligne de commande
+ else if ($process == 'convert') {
+ define('_CONVERT_COMMAND', 'convert');
+ define ('_RESIZE_COMMAND', _CONVERT_COMMAND.' -quality 85 -resize %xx%y! %src %dest');
+ $vignette = $destination.".".$format_sortie;
+ $commande = str_replace(
+ array('%x', '%y', '%src', '%dest'),
+ array(
+ $destWidth,
+ $destHeight,
+ escapeshellcmd($image),
+ escapeshellcmd($vignette)
+ ),
+ _RESIZE_COMMAND);
+ spip_log($commande);
+ exec($commande);
+ if (!@file_exists($vignette)) {
+ spip_log("echec convert sur $vignette");
+ return; // echec commande
+ }
+ }
+ else
+ // imagick (php4-imagemagick)
+ if ($process == 'imagick') {
+ $vignette = "$destination.".$format_sortie;
+ $handle = imagick_readimage($image);
+ imagick_resize($handle, $destWidth, $destHeight, IMAGICK_FILTER_LANCZOS, 0.75);
+ imagick_write($handle, $vignette);
+ if (!@file_exists($vignette)) {
+ spip_log("echec imagick sur $vignette");
+ return;
+ }
+ }
+ else
+ // netpbm
+ if ($process == "netpbm") {
+ define('_PNMSCALE_COMMAND', 'pnmscale'); // chemin a changer dans mes_options
+ if (_PNMSCALE_COMMAND == '') return;
+ $vignette = $destination.".".$format_sortie;
+ $pnmtojpeg_command = str_replace("pnmscale", "pnmtojpeg", _PNMSCALE_COMMAND);
+ if ($format == "jpg") {
+
+ $jpegtopnm_command = str_replace("pnmscale", "jpegtopnm", _PNMSCALE_COMMAND);
+ exec("$jpegtopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
+ if (!($s = @filesize($vignette)))
+ spip_unlink($vignette);
+ if (!@file_exists($vignette)) {
+ spip_log("echec netpbm-jpg sur $vignette");
+ return;
+ }
+ } else if ($format == "gif") {
+ $giftopnm_command = str_replace("pnmscale", "giftopnm", _PNMSCALE_COMMAND);
+ exec("$giftopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
+ if (!($s = @filesize($vignette)))
+ spip_unlink($vignette);
+ if (!@file_exists($vignette)) {
+ spip_log("echec netpbm-gif sur $vignette");
+ return;
+ }
+ } else if ($format == "png") {
+ $pngtopnm_command = str_replace("pnmscale", "pngtopnm", _PNMSCALE_COMMAND);
+ exec("$pngtopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
+ if (!($s = @filesize($vignette)))
+ spip_unlink($vignette);
+ if (!@file_exists($vignette)) {
+ spip_log("echec netpbm-png sur $vignette");
+ return;
+ }
+ }
+ }
+ // gd ou gd2
+ else if ($process == 'gd1' OR $process == 'gd2') {
+ if (_IMG_GD_MAX_PIXELS && $srcWidth*$srcHeight>_IMG_GD_MAX_PIXELS){
+ spip_log("vignette gd1/gd2 impossible : ".$srcWidth*$srcHeight."pixels");
+ return;
+ }
+ $destFormat = $format_sortie;
+ if (!$destFormat) {
+ spip_log("pas de format pour $image");
+ return;
+ }
+
+ $fonction_imagecreatefrom = $valeurs['fonction_imagecreatefrom'];
+ if (!function_exists($fonction_imagecreatefrom))
+ return '';
+ $srcImage = @$fonction_imagecreatefrom($image);
+ if (!$srcImage) {
+ spip_log("echec gd1/gd2");
+ return;
+ }
+
+ // Initialisation de l'image destination
+ if ($process == 'gd2' AND $destFormat != "gif")
+ $destImage = ImageCreateTrueColor($destWidth, $destHeight);
+ if (!$destImage)
+ $destImage = ImageCreate($destWidth, $destHeight);
+
+ // Recopie de l'image d'origine avec adaptation de la taille
+ $ok = false;
+ if (($process == 'gd2') AND function_exists('ImageCopyResampled')) {
+ if ($format == "gif") {
+ // Si un GIF est transparent,
+ // fabriquer un PNG transparent
+ $transp = imagecolortransparent($srcImage);
+ if ($transp > 0) $destFormat = "png";
+ }
+ if ($destFormat == "png") {
+ // Conserver la transparence
+ if (function_exists("imageAntiAlias")) imageAntiAlias($destImage,true);
+ @imagealphablending($destImage, false);
+ @imagesavealpha($destImage,true);
+ }
+ $ok = @ImageCopyResampled($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
+ }
+ if (!$ok)
+ $ok = ImageCopyResized($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
+
+ // Sauvegarde de l'image destination
+ $valeurs['fichier_dest'] = $vignette = "$destination.$destFormat";
+ $valeurs['format_dest'] = $format = $destFormat;
+ _image_gd_output($destImage,$valeurs);
+
+ if ($srcImage)
+ ImageDestroy($srcImage);
+ ImageDestroy($destImage);
+ }
+ }
+ $size = @getimagesize($vignette);
+ // Gaffe: en safe mode, pas d'acces a la vignette,
+ // donc risque de balancer "width='0'", ce qui masque l'image sous MSIE
+ if ($size[0] < 1) $size[0] = $destWidth;
+ if ($size[1] < 1) $size[1] = $destHeight;
+
+ $retour['width'] = $largeur = $size[0];
+ $retour['height'] = $hauteur = $size[1];
+
+ $retour['fichier'] = $vignette;
+ $retour['format'] = $format;
+ $retour['date'] = @filemtime($vignette);
+
+ // renvoyer l'image
+ return $retour;
+}
+
+// Calculer le ratio
+// http://doc.spip.org/@image_ratio
+function _image_ratio ($srcWidth, $srcHeight, $maxWidth, $maxHeight) {
+ $ratioWidth = $srcWidth/$maxWidth;
+ $ratioHeight = $srcHeight/$maxHeight;
+
+ if ($ratioWidth <=1 AND $ratioHeight <=1) {
+ $destWidth = $srcWidth;
+ $destHeight = $srcHeight;
+ } else if ($ratioWidth < $ratioHeight) {
+ $destWidth = $srcWidth/$ratioHeight;
+ $destHeight = $maxHeight;
+ }
+ else {
+ $destWidth = $maxWidth;
+ $destHeight = $srcHeight/$ratioWidth;
+ }
+ return array (ceil($destWidth), ceil($destHeight),
+ max($ratioWidth,$ratioHeight));
+}
+
+// Calculer le ratio ajuste sur la plus petite dimension
+// http://doc.spip.org/@ratio_passe_partout
+function ratio_passe_partout ($srcWidth, $srcHeight, $maxWidth, $maxHeight) {
+ $ratioWidth = $srcWidth/$maxWidth;
+ $ratioHeight = $srcHeight/$maxHeight;
+
+ if ($ratioWidth <=1 AND $ratioHeight <=1) {
+ $destWidth = $srcWidth;
+ $destHeight = $srcHeight;
+ } else if ($ratioWidth > $ratioHeight) {
+ $destWidth = $srcWidth/$ratioHeight;
+ $destHeight = $maxHeight;
+ }
+ else {
+ $destWidth = $maxWidth;
+ $destHeight = $srcHeight/$ratioWidth;
+ }
+ return array (floor($destWidth), floor($destHeight),
+ min($ratioWidth,$ratioHeight));
+}
+
+// http://doc.spip.org/@process_image_reduire
+function process_image_reduire($fonction,$img,$taille,$taille_y,$force,$cherche_image,$process){
+ $image = false;
+ if (($process == 'AUTO') AND isset($GLOBALS['meta']['image_process']))
+ $process = $GLOBALS['meta']['image_process'];
+ # determiner le format de sortie
+ $format_sortie = false; // le choix par defaut sera bon
+ if ($process == "netpbm") $format_sortie = "jpg";
+ else if ($process == 'gd1' OR $process == 'gd2') {
+ $image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}",$format_sortie,$fonction);
+ // on verifie que l'extension choisie est bonne (en principe oui)
+ $gd_formats = explode(',',$GLOBALS['meta']["gd_formats"]);
+ if (!in_array($image['format_dest'],$gd_formats)
+ OR ($image['format_dest']=='gif' AND !function_exists('ImageGif'))
+ ) {
+ if ($image['format_source'] == 'jpg')
+ $formats_sortie = array('jpg','png','gif');
+ else // les gif sont passes en png preferentiellement pour etre homogene aux autres filtres images
+ $formats_sortie = array('png','jpg','gif');
+ // Choisir le format destination
+ // - on sauve de preference en JPEG (meilleure compression)
+ // - pour le GIF : les GD recentes peuvent le lire mais pas l'ecrire
+ # bug : gd_formats contient la liste des fichiers qu'on sait *lire*,
+ # pas *ecrire*
+ $format_sortie = "";
+ foreach ($formats_sortie as $fmt) {
+ if (in_array($fmt, $gd_formats)) {
+ if ($fmt <> "gif" OR function_exists('ImageGif'))
+ $format_sortie = $fmt;
+ break;
+ }
+ }
+ $image = false;
+ }
+ }
+
+ if (!$image)
+ $image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}",$format_sortie,$fonction);
+
+ if (!$image OR !$image['largeur'] OR !$image['hauteur']){
+ spip_log("image_reduire_src:pas de version locale de $img");
+ // on peut resizer en mode html si on dispose des elements
+ if ($srcw = extraire_attribut($img, 'width')
+ AND $srch = extraire_attribut($img, 'height')) {
+ list($w,$h) = _image_ratio($srcw, $srch, $taille, $taille_y);
+ return _image_tag_changer_taille($img,$w,$h);
+ }
+ // la on n'a pas d'infos sur l'image source... on refile le truc a css
+ // sous la forme style='max-width: NNpx;'
+ return inserer_attribut($img, 'style',
+ "max-width: ${taille}px; max-height: ${taille_y}px");
+ }
+
+ // si l'image est plus petite que la cible retourner une copie cachee de l'image
+ if (($image['largeur']<=$taille)&&($image['hauteur']<=$taille_y)){
+ if ($image['creer']){
+ @copy($image['fichier'], $image['fichier_dest']);
+ }
+ return _image_ecrire_tag($image,array('src'=>$image['fichier_dest']));
+ }
+
+ if ($image['creer']==false && !$force)
+ return _image_ecrire_tag($image,array('src'=>$image['fichier_dest'],'width'=>$image['largeur_dest'],'height'=>$image['hauteur_dest']));
+
+ if ($cherche_image){
+ $cherche = cherche_image_nommee(substr($image['fichier'],0,-4), array($image["format_source"]));
+ if (!$cherche) return $img;
+ //list($chemin,$nom,$format) = $cherche;
+ }
+ if (in_array($image["format_source"],array('jpg','gif','png'))){
+ $destWidth = $image['largeur_dest'];
+ $destHeight = $image['hauteur_dest'];
+ $logo = $image['fichier'];
+ $date = $image["date_src"];
+ $preview = _image_creer_vignette($image, $taille, $taille_y,$process,$force);
+
+ if ($preview && $preview['fichier']) {
+ $logo = $preview['fichier'];
+ $destWidth = $preview['width'];
+ $destHeight = $preview['height'];
+ $date = $preview['date'];
+ }
+ // dans l'espace prive mettre un timestamp sur l'adresse
+ // de l'image, de facon a tromper le cache du navigateur
+ // quand on fait supprimer/reuploader un logo
+ // (pas de filemtime si SAFE MODE)
+ $date = test_espace_prive() ? ('?date='.$date) : '';
+ return _image_ecrire_tag($image,array('src'=>"$logo$date",'width'=>$destWidth,'height'=>$destHeight));
+ }
+ else
+ # SVG par exemple ? BMP, tiff ... les redacteurs osent tout!
+ return $img;
+}
+
+//
+// Produire des fichiers au format .ico
+// avec du code recupere de :
+//
+//////////////////////////////////////////////////////////////
+/// phpThumb() by James Heinrich <info@silisoftware.com> //
+// available at http://phpthumb.sourceforge.net ///
+//////////////////////////////////////////////////////////////
+class phpthumb_functions {
+// http://doc.spip.org/@GetPixelColor
+ function GetPixelColor(&$img, $x, $y) {
+ if (!is_resource($img)) {
+ return false;
+ }
+ return @ImageColorsForIndex($img, @ImageColorAt($img, $x, $y));
+ }
+// http://doc.spip.org/@LittleEndian2String
+ function LittleEndian2String($number, $minbytes=1) {
+ $intstring = '';
+ while ($number > 0) {
+ $intstring = $intstring.chr($number & 255);
+ $number >>= 8;
+ }
+ return str_pad($intstring, $minbytes, "\x00", STR_PAD_RIGHT);
+ }
+// http://doc.spip.org/@GD2ICOstring
+ function GD2ICOstring(&$gd_image_array) {
+ foreach ($gd_image_array as $key => $gd_image) {
+
+ $ImageWidths[$key] = ImageSX($gd_image);
+ $ImageHeights[$key] = ImageSY($gd_image);
+ $bpp[$key] = ImageIsTrueColor($gd_image) ? 32 : 24;
+ $totalcolors[$key] = ImageColorsTotal($gd_image);
+
+ $icXOR[$key] = '';
+ for ($y = $ImageHeights[$key] - 1; $y >= 0; $y--) {
+ for ($x = 0; $x < $ImageWidths[$key]; $x++) {
+ $argb = phpthumb_functions::GetPixelColor($gd_image, $x, $y);
+ $a = round(255 * ((127 - $argb['alpha']) / 127));
+ $r = $argb['red'];
+ $g = $argb['green'];
+ $b = $argb['blue'];
+
+ if ($bpp[$key] == 32) {
+ $icXOR[$key] .= chr($b).chr($g).chr($r).chr($a);
+ } elseif ($bpp[$key] == 24) {
+ $icXOR[$key] .= chr($b).chr($g).chr($r);
+ }
+
+ if ($a < 128) {
+ @$icANDmask[$key][$y] .= '1';
+ } else {
+ @$icANDmask[$key][$y] .= '0';
+ }
+ }
+ // mask bits are 32-bit aligned per scanline
+ while (strlen($icANDmask[$key][$y]) % 32) {
+ $icANDmask[$key][$y] .= '0';
+ }
+ }
+ $icAND[$key] = '';
+ foreach ($icANDmask[$key] as $y => $scanlinemaskbits) {
+ for ($i = 0; $i < strlen($scanlinemaskbits); $i += 8) {
+ $icAND[$key] .= chr(bindec(str_pad(substr($scanlinemaskbits, $i, 8), 8, '0', STR_PAD_LEFT)));
+ }
+ }
+
+ }
+
+ foreach ($gd_image_array as $key => $gd_image) {
+ $biSizeImage = $ImageWidths[$key] * $ImageHeights[$key] * ($bpp[$key] / 8);
+
+ // BITMAPINFOHEADER - 40 bytes
+ $BitmapInfoHeader[$key] = '';
+ $BitmapInfoHeader[$key] .= "\x28\x00\x00\x00"; // DWORD biSize;
+ $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageWidths[$key], 4); // LONG biWidth;
+ // The biHeight member specifies the combined
+ // height of the XOR and AND masks.
+ $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($ImageHeights[$key] * 2, 4); // LONG biHeight;
+ $BitmapInfoHeader[$key] .= "\x01\x00"; // WORD biPlanes;
+ $BitmapInfoHeader[$key] .= chr($bpp[$key])."\x00"; // wBitCount;
+ $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD biCompression;
+ $BitmapInfoHeader[$key] .= phpthumb_functions::LittleEndian2String($biSizeImage, 4); // DWORD biSizeImage;
+ $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // LONG biXPelsPerMeter;
+ $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // LONG biYPelsPerMeter;
+ $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD biClrUsed;
+ $BitmapInfoHeader[$key] .= "\x00\x00\x00\x00"; // DWORD biClrImportant;
+ }
+
+
+ $icondata = "\x00\x00"; // idReserved; // Reserved (must be 0)
+ $icondata .= "\x01\x00"; // idType; // Resource Type (1 for icons)
+ $icondata .= phpthumb_functions::LittleEndian2String(count($gd_image_array), 2); // idCount; // How many images?
+
+ $dwImageOffset = 6 + (count($gd_image_array) * 16);
+ foreach ($gd_image_array as $key => $gd_image) {
+ // ICONDIRENTRY idEntries[1]; // An entry for each image (idCount of 'em)
+
+ $icondata .= chr($ImageWidths[$key]); // bWidth; // Width, in pixels, of the image
+ $icondata .= chr($ImageHeights[$key]); // bHeight; // Height, in pixels, of the image
+ $icondata .= chr($totalcolors[$key]); // bColorCount; // Number of colors in image (0 if >=8bpp)
+ $icondata .= "\x00"; // bReserved; // Reserved ( must be 0)
+
+ $icondata .= "\x01\x00"; // wPlanes; // Color Planes
+ $icondata .= chr($bpp[$key])."\x00"; // wBitCount; // Bits per pixel
+
+ $dwBytesInRes = 40 + strlen($icXOR[$key]) + strlen($icAND[$key]);
+ $icondata .= phpthumb_functions::LittleEndian2String($dwBytesInRes, 4); // dwBytesInRes; // How many bytes in this resource?
+
+ $icondata .= phpthumb_functions::LittleEndian2String($dwImageOffset, 4); // dwImageOffset; // Where in the file is this image?
+ $dwImageOffset += strlen($BitmapInfoHeader[$key]);
+ $dwImageOffset += strlen($icXOR[$key]);
+ $dwImageOffset += strlen($icAND[$key]);
+ }
+
+ foreach ($gd_image_array as $key => $gd_image) {
+ $icondata .= $BitmapInfoHeader[$key];
+ $icondata .= $icXOR[$key];
+ $icondata .= $icAND[$key];
+ }
+
+ return $icondata;
+ }
+
+}
+
+?>
\ No newline at end of file
diff --git a/ecrire/inc/filtres_images_mini.php b/ecrire/inc/filtres_images_mini.php
index b98efcd0c0..35c28268e0 100644
--- a/ecrire/inc/filtres_images_mini.php
+++ b/ecrire/inc/filtres_images_mini.php
@@ -10,409 +10,44 @@
* Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
\***************************************************************************/
-
if (!defined("_ECRIRE_INC_VERSION")) return;
-include_spip('inc/filtres'); // par precaution
+include_spip('inc/filtres_images_lib_mini'); // par precaution
-function statut_effacer_images_temporaires($stat){
- static $statut = false; // par defaut on grave toute les images
- if ($stat==='get') return $statut;
- $statut = $stat?true:false;
+// http://doc.spip.org/@couleur_html_to_hex
+function couleur_html_to_hex($couleur){
+ $couleurs_html=array(
+ 'aqua'=>'00FFFF','black'=>'000000','blue'=>'0000FF','fuchsia'=>'FF00FF','gray'=>'808080','green'=>'008000','lime'=>'00FF00','maroon'=>'800000',
+ 'navy'=>'000080','olive'=>'808000','purple'=>'800080','red'=>'FF0000','silver'=>'C0C0C0','teal'=>'008080','white'=>'FFFFFF','yellow'=>'FFFF00');
+ if (isset($couleurs_html[$lc=strtolower($couleur)]))
+ return $couleurs_html[$lc];
+ return $couleur;
}
-// http://doc.spip.org/@cherche_image_nommee
-function cherche_image_nommee($nom, $formats = array ('gif', 'jpg', 'png')) {
+// http://doc.spip.org/@couleur_foncer
+function couleur_foncer ($couleur) {
+ $couleurs = _couleur_hex_to_dec($couleur);
- if (strncmp(_DIR_IMG, $nom,$n=strlen(_DIR_IMG))==0) {
- $nom = substr($nom,$n);
- } else if (strncmp(_DIR_IMG_PACK, $nom,$n=strlen(_DIR_IMG_PACK))==0) {
- $nom = substr($nom,$n);
- } else if (strncmp(_DIR_IMG_ICONE_DIST, $nom,$n=strlen(_DIR_IMG_ICONES_DIST))==0) {
- $nom = substr($nom,$n);
- }
- $pos = strrpos($nom, "/");
- if ($pos > 0) {
- $chemin = substr($nom, 0, $pos+1);
- $nom = substr($nom, $pos+1);
- } else {
- $chemin = "";
- }
+ $red = $couleurs["red"] - round(($couleurs["red"])/2);
+ $green = $couleurs["green"] - round(($couleurs["green"])/2);
+ $blue = $couleurs["blue"] - round(($couleurs["blue"])/2);
- reset($formats);
- while (list(, $format) = each($formats)) {
- if (@file_exists(_DIR_IMG . "$chemin$nom.$format")){
- return array((_DIR_IMG . $chemin), $nom, $format);
- } else if (@file_exists(_DIR_IMG_PACK . "$chemin$nom.$format")){
- return array((_DIR_IMG_PACK . $chemin), $nom, $format);
- } else if (@file_exists(_DIR_IMG_ICONES_DIST . "$chemin$nom.$format")){
- return array((_DIR_IMG_ICONES_DIST . $chemin), $nom, $format);
- }
- }
-}
-
-// Fonctions de traitement d'image
-// uniquement pour GD2
-// http://doc.spip.org/@image_valeurs_trans
-function image_valeurs_trans($img, $effet, $forcer_format = false, $fonction_creation = NULL) {
- static $images_recalcul = array();
- if (strlen($img)==0) return false;
+ $couleur = _couleur_dec_to_hex($red, $green, $blue);
- $source = trim(extraire_attribut($img, 'src'));
- if (strlen($source) < 1){
- $source = $img;
- $img = "<img src='$source' />";
- }
-
- // les protocoles web prennent au moins 3 lettres
- if (preg_match(';^(\w{3,7}://);', $source)){
- include_spip('inc/distant');
- $fichier = _DIR_RACINE . copie_locale($source);
- if (!$fichier) return "";
- } else {
- // enlever le timestamp eventuel
- $source=preg_replace(',[?][0-9]+$,','',$source);
- $fichier = $source;
- }
-
- $terminaison_dest = "";
- if (preg_match(",^(?>.*)(?<=\.(gif|jpg|png)),", $fichier, $regs)) {
- $terminaison = $regs[1];
- $terminaison_dest = $terminaison;
-
- if ($terminaison == "gif") $terminaison_dest = "png";
- }
- if ($forcer_format!==false) $terminaison_dest = $forcer_format;
-
- if (!$terminaison_dest) return false;
-
- $term_fonction = $terminaison;
- if ($term_fonction == "jpg") $term_fonction = "jpeg";
-
- $nom_fichier = substr($fichier, 0, strlen($fichier) - 4);
- $fichier_dest = $nom_fichier;
-
- if (@file_exists($f = $fichier)){
- list ($ret["hauteur"],$ret["largeur"]) = taille_image($img);
- $date_src = @filemtime($f);
- }
- elseif (@file_exists($f = "$fichier.src")
- AND lire_fichier($f,$valeurs)
- AND $valeurs=unserialize($valeurs)) {
- $ret["hauteur"] = $valeurs["hauteur_dest"];
- $ret["largeur"] = $valeurs["largeur_dest"];
- $date_src = $valeurs["date"];
- }
-
- // pas de fichier source par la
- if (!($ret["hauteur"] OR $ret["largeur"]))
- return false;
-
- // cas general :
- // on a un dossier cache commun et un nom de fichier qui varie avec l'effet
- // cas particulier de reduire :
- // un cache par dimension, et le nom de fichier est conserve, suffixe par la dimension aussi
- $cache = "cache-gd2";
- if (substr($effet,0,7)=='reduire') {
- list(,$maxWidth,$maxHeight) = explode('-',$effet);
- list ($destWidth,$destHeight) = image_ratio($ret['largeur'], $ret['hauteur'], $maxWidth, $maxHeight);
- $ret['largeur_dest'] = $destWidth;
- $ret['hauteur_dest'] = $destHeight;
- $effet = "L{$destWidth}xH$destHeight";
- $cache = "cache-vignettes";
- $fichier_dest = basename($fichier_dest);
- if (($ret['largeur']<=$maxWidth)&&($ret['hauteur']<=$maxHeight)){
- // on garde la terminaison initiale car image simplement copiee
- // et on postfixe son nom avec un md5 du path
- $terminaison_dest = $terminaison;
- $fichier_dest .= '-'.substr(md5("$fichier"),0,5);
- }
- else
- $fichier_dest .= '-'.substr(md5("$fichier-$effet"),0,5);
- $cache = sous_repertoire(_DIR_VAR, $cache);
- $cache = sous_repertoire($cache, $effet);
- # cherche un cache existant
- /*foreach (array('gif','jpg','png') as $fmt)
- if (@file_exists($cache . $fichier_dest . '.' . $fmt)) {
- $terminaison_dest = $fmt;
- }*/
- }
- else {
- $fichier_dest = md5("$fichier-$effet");
- $cache = sous_repertoire(_DIR_VAR, $cache);
- }
-
- $fichier_dest = $cache . $fichier_dest . "." .$terminaison_dest;
-
- $GLOBALS["images_calculees"][] = $fichier_dest;
-
- $creer = true;
- // si recalcul des images demande, recalculer chaque image une fois
- if (isset($GLOBALS['var_images']) && $GLOBALS['var_images'] && !isset($images_recalcul[$fichier_dest])){
- $images_recalcul[$fichier_dest] = true;
- }
- else {
- if (@file_exists($f = $fichier_dest)){
- if (filemtime($f)>=$date_src)
- $creer = false;
- }
- else if (@file_exists($f = "$fichier_dest.src")
- AND lire_fichier($f,$valeurs)
- AND $valeurs=unserialize($valeurs)
- AND $valeurs["date"]>=$date_src)
- $creer = false;
- }
- if ($creer) {
- if (!file_exists($fichier)) {
- if (!file_exists("$fichier.src")) {
- spip_log("Image absente : $fichier");
- return false;
- }
- # on reconstruit l'image source absente a partir de la chaine des .src
- reconstruire_image_intermediaire($fichier);
- }
- }
- // todo: si une image png est nommee .jpg, le reconnaitre avec le bon $f
- $f = "imagecreatefrom".$term_fonction;
- if (!function_exists($f)) return false;
- $ret["fonction_imagecreatefrom"] = $f;
- $ret["fichier"] = $fichier;
- $ret["fonction_image"] = "image_image".$terminaison_dest;
- $ret["fichier_dest"] = $fichier_dest;
- $ret["format_source"] = $terminaison;
- $ret["format_dest"] = $terminaison_dest;
- $ret["date_src"] = $date_src;
- $ret["creer"] = $creer;
- $ret["class"] = extraire_attribut($img, 'class');
- $ret["alt"] = extraire_attribut($img, 'alt');
- $ret["style"] = extraire_attribut($img, 'style');
- $ret["tag"] = $img;
- if ($fonction_creation){
- $ret["reconstruction"] = $fonction_creation;
- # ecrire ici comment creer le fichier, car il est pas sur qu'on l'ecrira reelement
- # cas de image_reduire qui finalement ne reduit pas l'image source
- # ca evite d'essayer de le creer au prochain hit si il n'est pas la
- #ecrire_fichier($ret['fichier_dest'].'.src',serialize($ret),true);
- }
- return $ret;
-}
-
-// http://doc.spip.org/@image_imagepng
-function image_imagepng($img,$fichier) {
- if (!function_exists('imagepng')) return false;
- $tmp = $fichier.".tmp";
- $ret = imagepng($img,$tmp);
-
- $taille_test = getimagesize($tmp);
- if ($taille_test[0] < 1) return false;
-
- spip_unlink($fichier); // le fichier peut deja exister
- @rename($tmp, $fichier);
- return $ret;
-}
-
-// http://doc.spip.org/@image_imagegif
-function image_imagegif($img,$fichier) {
- if (!function_exists('imagegif')) return false;
- $tmp = $fichier.".tmp";
- $ret = imagegif($img,$tmp);
-
- $taille_test = getimagesize($tmp);
- if ($taille_test[0] < 1) return false;
-
-
- spip_unlink($fichier); // le fichier peut deja exister
- @rename($tmp, $fichier);
- return $ret;
-}
-// http://doc.spip.org/@image_imagejpg
-function image_imagejpg($img,$fichier,$qualite=_IMG_GD_QUALITE) {
- if (!function_exists('imagejpeg')) return false;
- $tmp = $fichier.".tmp";
- $ret = imagejpeg($img,$tmp, $qualite);
-
- $taille_test = getimagesize($tmp);
- if ($taille_test[0] < 1) return false;
-
- spip_unlink($fichier); // le fichier peut deja exister
- @rename($tmp, $fichier);
- return $ret;
+ return $couleur;
}
-// http://doc.spip.org/@image_imageico
-function image_imageico($img, $fichier) {
- $gd_image_array = array($img);
-
- return ecrire_fichier($fichier, phpthumb_functions::GD2ICOstring($gd_image_array));
-}
-
-// $qualite est utilise pour la qualite de compression des jpeg
-// http://doc.spip.org/@image_gd_output
-function image_gd_output($img,$valeurs, $qualite=_IMG_GD_QUALITE){
- $fonction = "image_image".$valeurs['format_dest'];
- $ret = false;
- #un flag pour reperer les images gravees
- $lock =
- !statut_effacer_images_temporaires('get') // si la fonction n'a pas ete activee, on grave tout
- OR (file_exists($valeurs['fichier_dest']) AND !file_exists($valeurs['fichier_dest'].'.src'));
- if (
- function_exists($fonction)
- && ($ret = $fonction($img,$valeurs['fichier_dest'],$qualite)) # on a reussi a creer l'image
- && isset($valeurs['reconstruction']) # et on sait comment la resonctruire le cas echeant
- && !$lock
- )
- if (file_exists($valeurs['fichier_dest'])){
- $valeurs['date'] = @filemtime($valeurs['fichier_dest']); // pour la retrouver apres disparition
- ecrire_fichier($valeurs['fichier_dest'].'.src',serialize($valeurs),true);
- }
- return $ret;
-}
-
-// http://doc.spip.org/@reconstruire_image_intermediaire
-function reconstruire_image_intermediaire($fichier_manquant){
- $reconstruire = array();
- $fichier = $fichier_manquant;
- while (
- !file_exists($fichier)
- AND lire_fichier($src = "$fichier.src",$source)
- AND $valeurs=unserialize($source)
- AND ($fichier = $valeurs['fichier']) # l'origine est connue (on ne verifie pas son existence, qu'importe ...)
- ) {
- spip_unlink($src); // si jamais on a un timeout pendant la reconstruction, elle se fera naturellement au hit suivant
- $reconstruire[] = $valeurs['reconstruction'];
- }
- while (count($reconstruire)){
- $r = array_pop($reconstruire);
- $fonction = $r[0];
- $args = $r[1];
- call_user_func_array($fonction, $args);
- }
- // cette image intermediaire est commune a plusieurs series de filtre, il faut la conserver
- // mais l'on peut nettoyer les miettes de sa creation
- ramasse_miettes($fichier_manquant);
-}
-
-// http://doc.spip.org/@ramasse_miettes
-function ramasse_miettes($fichier){
- if (!lire_fichier($src = "$fichier.src",$source)
- OR !$valeurs=unserialize($source)) return;
- spip_unlink($src); # on supprime la reference a sa source pour marquer cette image comme non intermediaire
- while (
- ($fichier = $valeurs['fichier']) # l'origine est connue (on ne verifie pas son existence, qu'importe ...)
- AND (substr($fichier,0,strlen(_DIR_VAR))==_DIR_VAR) # et est dans local
- AND (lire_fichier($src = "$fichier.src",$source)) # le fichier a une source connue (c'est donc une image calculee intermediaire)
- AND ($valeurs=unserialize($source)) # et valide
- ) {
- # on efface le fichier
- spip_unlink($fichier);
- # mais laisse le .src qui permet de savoir comment reconstruire l'image si besoin
- #spip_unlink($src);
- }
-}
-
-// http://doc.spip.org/@image_graver
-function image_graver($img){
- $fichier = extraire_attribut($img, 'src');
- if (($p=strpos($fichier,'?'))!==FALSE)
- $fichier=substr($fichier,0,$p);
- if (strlen($fichier) < 1)
- $fichier = $img;
- # si jamais le fichier final n'a pas ete calcule car suppose temporaire
- if (!file_exists($fichier))
- reconstruire_image_intermediaire($fichier);
- ramasse_miettes($fichier);
- return $img; // on ne change rien
-}
-
-// Transforme une image a palette indexee (256 couleurs max) en "vraies" couleurs RGB
-// http://doc.spip.org/@imagepalettetotruecolor
- function imagepalettetotruecolor(&$img) {
- if (!imageistruecolor($img) AND function_exists(imagecreatetruecolor)) {
- $w = imagesx($img);
- $h = imagesy($img);
- $img1 = imagecreatetruecolor($w,$h);
- //Conserver la transparence si possible
- if(function_exists('ImageCopyResampled')) {
- if (function_exists("imageAntiAlias")) imageAntiAlias($img1,true);
- @imagealphablending($img1, false);
- @imagesavealpha($img1,true);
- @ImageCopyResampled($img1, $img, 0, 0, 0, 0, $w, $h, $w, $h);
- } else {
- imagecopy($img1,$img,0,0,0,0,$w,$h);
- }
- $img = $img1;
- }
-}
+// http://doc.spip.org/@couleur_eclaircir
+function couleur_eclaircir ($couleur) {
+ $couleurs = _couleur_hex_to_dec($couleur);
-// http://doc.spip.org/@image_tag_changer_taille
-function image_tag_changer_taille($tag,$width,$height,$style=false){
- if ($style===false) $style = extraire_attribut($tag,'style');
- // enlever le width et height du style
- $style = preg_replace(",(^|;)\s*(width|height)\s*:\s*[^;]+,ims","",$style);
- if ($style AND $style{0}==';') $style=substr($style,1);
- // mettre des attributs de width et height sur les images,
- // ca accelere le rendu du navigateur
- // ca permet aux navigateurs de reserver la bonne taille
- // quand on a desactive l'affichage des images.
- $tag = inserer_attribut($tag,'width',$width);
- $tag = inserer_attribut($tag,'height',$height);
- $style = "height:".$height."px;width:".$width."px;".$style;
- // attributs deprecies. Transformer en CSS
- if ($espace = extraire_attribut($tag, 'hspace')){
- $style = "margin:${espace}px;".$style;
- $tag = inserer_attribut($tag,'hspace','');
- }
- $tag = inserer_attribut($tag,'style',$style);
- return $tag;
-}
+ $red = $couleurs["red"] + round((255 - $couleurs["red"])/2);
+ $green = $couleurs["green"] + round((255 - $couleurs["green"])/2);
+ $blue = $couleurs["blue"] + round((255 - $couleurs["blue"])/2);
-// function d'ecriture du tag img en sortie des filtre image
-// reprend le tag initial et surcharge les tags modifies
-// http://doc.spip.org/@image_ecrire_tag
-function image_ecrire_tag($valeurs,$surcharge){
- $tag = str_replace(">","/>",str_replace("/>",">",$valeurs['tag'])); // fermer les tags img pas bien fermes;
+ $couleur = _couleur_dec_to_hex($red, $green, $blue);
- // le style
- $style = $valeurs['style'];
- if (isset($surcharge['style'])){
- $style = $surcharge['style'];
- unset($surcharge['style']);
- }
-
- // traiter specifiquement la largeur et la hauteur
- $width = $valeurs['largeur'];
- if (isset($surcharge['width'])){
- $width = $surcharge['width'];
- unset($surcharge['width']);
- }
- $height = $valeurs['hauteur'];
- if (isset($surcharge['height'])){
- $height = $surcharge['height'];
- unset($surcharge['height']);
- }
-
- $tag = image_tag_changer_taille($tag,$width,$height,$style);
- // traiter specifiquement le src qui peut etre repris dans un onmouseout
- // on remplace toute les ref a src dans le tag
- $src = extraire_attribut($tag,'src');
- if (isset($surcharge['src'])){
- $tag = str_replace($src,$surcharge['src'],$tag);
- $src = $surcharge['src'];
- unset($surcharge['src']);
- }
+ return $couleur;
- $class = $valeurs['class'];
- if (isset($surcharge['class'])){
- $class = $surcharge['class'];
- unset($surcharge['class']);
- }
- if(strlen($class))
- $tag = inserer_attribut($tag,'class',$class);
-
- if (count($surcharge))
- foreach($surcharge as $attribut=>$valeur)
- $tag = inserer_attribut($tag,$attribut,$valeur);
-
- return $tag;
}
// selectionner les images qui vont subir une transformation sur un critere de taille
@@ -439,240 +74,6 @@ function image_select($img,$width_min=0, $height_min=0, $width_max=10000, $heigh
return $img;
}
-// http://doc.spip.org/@image_creer_vignette
-function image_creer_vignette($valeurs, $maxWidth, $maxHeight, $process='AUTO', $force=false, $test_cache_only = false) {
- // ordre de preference des formats graphiques pour creer les vignettes
- // le premier format disponible, selon la methode demandee, est utilise
- $image = $valeurs['fichier'];
- $format = $valeurs['format_source'];
- $destdir = dirname($valeurs['fichier_dest']);
- $destfile = basename($valeurs['fichier_dest'],".".$valeurs["format_dest"]);
-
- $format_sortie = $valeurs['format_dest'];
-
- // liste des formats qu'on sait lire
- $img = isset($GLOBALS['meta']['formats_graphiques'])
- ? (strpos($GLOBALS['meta']['formats_graphiques'], $format)!==false)
- : false;
-
- // si le doc n'est pas une image, refuser
- if (!$force AND !$img) return;
- $destination = "$destdir/$destfile";
-
- // chercher un cache
- $vignette = '';
- if ($test_cache_only AND !$vignette) return;
-
- // utiliser le cache ?
- if (!$test_cache_only)
- if ($force OR !$vignette OR (@filemtime($vignette) < @filemtime($image))) {
-
- $creation = true;
- // calculer la taille
- if (($srcWidth=$valeurs['largeur']) && ($srcHeight=$valeurs['hauteur'])){
- if (!($destWidth=$valeurs['largeur_dest']) || !($destHeight=$valeurs['hauteur_dest']))
- list ($destWidth,$destHeight) = image_ratio($valeurs['largeur'], $valeurs['hauteur'], $maxWidth, $maxHeight);
- }
- elseif ($process == 'convert' OR $process == 'imagick') {
- $destWidth = $maxWidth;
- $destHeight = $maxHeight;
- } else {
- spip_log("echec $process sur $image");
- return;
- }
-
- // Si l'image est de la taille demandee (ou plus petite), simplement
- // la retourner
- if ($srcWidth
- AND $srcWidth <= $maxWidth AND $srcHeight <= $maxHeight) {
- $vignette = $destination.'.'.$format;
- @copy($image, $vignette);
- }
- // imagemagick en ligne de commande
- else if ($process == 'convert') {
- define('_CONVERT_COMMAND', 'convert');
- define ('_RESIZE_COMMAND', _CONVERT_COMMAND.' -quality 85 -resize %xx%y! %src %dest');
- $vignette = $destination.".".$format_sortie;
- $commande = str_replace(
- array('%x', '%y', '%src', '%dest'),
- array(
- $destWidth,
- $destHeight,
- escapeshellcmd($image),
- escapeshellcmd($vignette)
- ),
- _RESIZE_COMMAND);
- spip_log($commande);
- exec($commande);
- if (!@file_exists($vignette)) {
- spip_log("echec convert sur $vignette");
- return; // echec commande
- }
- }
- else
- // imagick (php4-imagemagick)
- if ($process == 'imagick') {
- $vignette = "$destination.".$format_sortie;
- $handle = imagick_readimage($image);
- imagick_resize($handle, $destWidth, $destHeight, IMAGICK_FILTER_LANCZOS, 0.75);
- imagick_write($handle, $vignette);
- if (!@file_exists($vignette)) {
- spip_log("echec imagick sur $vignette");
- return;
- }
- }
- else
- // netpbm
- if ($process == "netpbm") {
- define('_PNMSCALE_COMMAND', 'pnmscale'); // chemin a changer dans mes_options
- if (_PNMSCALE_COMMAND == '') return;
- $vignette = $destination.".".$format_sortie;
- $pnmtojpeg_command = str_replace("pnmscale", "pnmtojpeg", _PNMSCALE_COMMAND);
- if ($format == "jpg") {
-
- $jpegtopnm_command = str_replace("pnmscale", "jpegtopnm", _PNMSCALE_COMMAND);
- exec("$jpegtopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
- if (!($s = @filesize($vignette)))
- spip_unlink($vignette);
- if (!@file_exists($vignette)) {
- spip_log("echec netpbm-jpg sur $vignette");
- return;
- }
- } else if ($format == "gif") {
- $giftopnm_command = str_replace("pnmscale", "giftopnm", _PNMSCALE_COMMAND);
- exec("$giftopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
- if (!($s = @filesize($vignette)))
- spip_unlink($vignette);
- if (!@file_exists($vignette)) {
- spip_log("echec netpbm-gif sur $vignette");
- return;
- }
- } else if ($format == "png") {
- $pngtopnm_command = str_replace("pnmscale", "pngtopnm", _PNMSCALE_COMMAND);
- exec("$pngtopnm_command $image | "._PNMSCALE_COMMAND." -width $destWidth | $pnmtojpeg_command > $vignette");
- if (!($s = @filesize($vignette)))
- spip_unlink($vignette);
- if (!@file_exists($vignette)) {
- spip_log("echec netpbm-png sur $vignette");
- return;
- }
- }
- }
- // gd ou gd2
- else if ($process == 'gd1' OR $process == 'gd2') {
- if (_IMG_GD_MAX_PIXELS && $srcWidth*$srcHeight>_IMG_GD_MAX_PIXELS){
- spip_log("vignette gd1/gd2 impossible : ".$srcWidth*$srcHeight."pixels");
- return;
- }
- $destFormat = $format_sortie;
- if (!$destFormat) {
- spip_log("pas de format pour $image");
- return;
- }
-
- $fonction_imagecreatefrom = $valeurs['fonction_imagecreatefrom'];
- if (!function_exists($fonction_imagecreatefrom))
- return '';
- $srcImage = @$fonction_imagecreatefrom($image);
- if (!$srcImage) {
- spip_log("echec gd1/gd2");
- return;
- }
-
- // Initialisation de l'image destination
- if ($process == 'gd2' AND $destFormat != "gif")
- $destImage = ImageCreateTrueColor($destWidth, $destHeight);
- if (!$destImage)
- $destImage = ImageCreate($destWidth, $destHeight);
-
- // Recopie de l'image d'origine avec adaptation de la taille
- $ok = false;
- if (($process == 'gd2') AND function_exists('ImageCopyResampled')) {
- if ($format == "gif") {
- // Si un GIF est transparent,
- // fabriquer un PNG transparent
- $transp = imagecolortransparent($srcImage);
- if ($transp > 0) $destFormat = "png";
- }
- if ($destFormat == "png") {
- // Conserver la transparence
- if (function_exists("imageAntiAlias")) imageAntiAlias($destImage,true);
- @imagealphablending($destImage, false);
- @imagesavealpha($destImage,true);
- }
- $ok = @ImageCopyResampled($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
- }
- if (!$ok)
- $ok = ImageCopyResized($destImage, $srcImage, 0, 0, 0, 0, $destWidth, $destHeight, $srcWidth, $srcHeight);
-
- // Sauvegarde de l'image destination
- $valeurs['fichier_dest'] = $vignette = "$destination.$destFormat";
- $valeurs['format_dest'] = $format = $destFormat;
- image_gd_output($destImage,$valeurs);
-
- if ($srcImage)
- ImageDestroy($srcImage);
- ImageDestroy($destImage);
- }
- }
- $size = @getimagesize($vignette);
- // Gaffe: en safe mode, pas d'acces a la vignette,
- // donc risque de balancer "width='0'", ce qui masque l'image sous MSIE
- if ($size[0] < 1) $size[0] = $destWidth;
- if ($size[1] < 1) $size[1] = $destHeight;
-
- $retour['width'] = $largeur = $size[0];
- $retour['height'] = $hauteur = $size[1];
-
- $retour['fichier'] = $vignette;
- $retour['format'] = $format;
- $retour['date'] = @filemtime($vignette);
-
- // renvoyer l'image
- return $retour;
-}
-
-// Calculer le ratio
-// http://doc.spip.org/@image_ratio
-function image_ratio ($srcWidth, $srcHeight, $maxWidth, $maxHeight) {
- $ratioWidth = $srcWidth/$maxWidth;
- $ratioHeight = $srcHeight/$maxHeight;
-
- if ($ratioWidth <=1 AND $ratioHeight <=1) {
- $destWidth = $srcWidth;
- $destHeight = $srcHeight;
- } else if ($ratioWidth < $ratioHeight) {
- $destWidth = $srcWidth/$ratioHeight;
- $destHeight = $maxHeight;
- }
- else {
- $destWidth = $maxWidth;
- $destHeight = $srcHeight/$ratioWidth;
- }
- return array (ceil($destWidth), ceil($destHeight),
- max($ratioWidth,$ratioHeight));
-}
-
-// Calculer le ratio ajuste sur la plus petite dimension
-// http://doc.spip.org/@ratio_passe_partout
-function ratio_passe_partout ($srcWidth, $srcHeight, $maxWidth, $maxHeight) {
- $ratioWidth = $srcWidth/$maxWidth;
- $ratioHeight = $srcHeight/$maxHeight;
-
- if ($ratioWidth <=1 AND $ratioHeight <=1) {
- $destWidth = $srcWidth;
- $destHeight = $srcHeight;
- } else if ($ratioWidth > $ratioHeight) {
- $destWidth = $srcWidth/$ratioHeight;
- $destHeight = $maxHeight;
- }
- else {
- $destWidth = $maxWidth;
- $destHeight = $srcHeight/$ratioWidth;
- }
- return array (floor($destWidth), floor($destHeight),
- min($ratioWidth,$ratioHeight));
-}
// http://doc.spip.org/@image_passe_partout
function image_passe_partout($img,$taille_x = -1, $taille_y = -1,$force = false,$cherche_image=false,$process='AUTO'){
@@ -715,100 +116,6 @@ function image_reduire($img, $taille = -1, $taille_y = -1, $force=false, $cherch
return process_image_reduire($fonction,$img,$taille,$taille_y,$force,$cherche_image,$process);
}
-// http://doc.spip.org/@process_image_reduire
-function process_image_reduire($fonction,$img,$taille,$taille_y,$force,$cherche_image,$process){
- $image = false;
- if (($process == 'AUTO') AND isset($GLOBALS['meta']['image_process']))
- $process = $GLOBALS['meta']['image_process'];
- # determiner le format de sortie
- $format_sortie = false; // le choix par defaut sera bon
- if ($process == "netpbm") $format_sortie = "jpg";
- else if ($process == 'gd1' OR $process == 'gd2') {
- $image = image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}",$format_sortie,$fonction);
- // on verifie que l'extension choisie est bonne (en principe oui)
- $gd_formats = explode(',',$GLOBALS['meta']["gd_formats"]);
- if (!in_array($image['format_dest'],$gd_formats)
- OR ($image['format_dest']=='gif' AND !function_exists('ImageGif'))
- ) {
- if ($image['format_source'] == 'jpg')
- $formats_sortie = array('jpg','png','gif');
- else // les gif sont passes en png preferentiellement pour etre homogene aux autres filtres images
- $formats_sortie = array('png','jpg','gif');
- // Choisir le format destination
- // - on sauve de preference en JPEG (meilleure compression)
- // - pour le GIF : les GD recentes peuvent le lire mais pas l'ecrire
- # bug : gd_formats contient la liste des fichiers qu'on sait *lire*,
- # pas *ecrire*
- $format_sortie = "";
- foreach ($formats_sortie as $fmt) {
- if (in_array($fmt, $gd_formats)) {
- if ($fmt <> "gif" OR function_exists('ImageGif'))
- $format_sortie = $fmt;
- break;
- }
- }
- $image = false;
- }
- }
-
- if (!$image)
- $image = image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}",$format_sortie,$fonction);
-
- if (!$image OR !$image['largeur'] OR !$image['hauteur']){
- spip_log("image_reduire_src:pas de version locale de $img");
- // on peut resizer en mode html si on dispose des elements
- if ($srcw = extraire_attribut($img, 'width')
- AND $srch = extraire_attribut($img, 'height')) {
- list($w,$h) = image_ratio($srcw, $srch, $taille, $taille_y);
- return image_tag_changer_taille($img,$w,$h);
- }
- // la on n'a pas d'infos sur l'image source... on refile le truc a css
- // sous la forme style='max-width: NNpx;'
- return inserer_attribut($img, 'style',
- "max-width: ${taille}px; max-height: ${taille_y}px");
- }
-
- // si l'image est plus petite que la cible retourner une copie cachee de l'image
- if (($image['largeur']<=$taille)&&($image['hauteur']<=$taille_y)){
- if ($image['creer']){
- @copy($image['fichier'], $image['fichier_dest']);
- }
- return image_ecrire_tag($image,array('src'=>$image['fichier_dest']));
- }
-
- if ($image['creer']==false && !$force)
- return image_ecrire_tag($image,array('src'=>$image['fichier_dest'],'width'=>$image['largeur_dest'],'height'=>$image['hauteur_dest']));
-
- if ($cherche_image){
- $cherche = cherche_image_nommee(substr($image['fichier'],0,-4), array($image["format_source"]));
- if (!$cherche) return $img;
- //list($chemin,$nom,$format) = $cherche;
- }
- if (in_array($image["format_source"],array('jpg','gif','png'))){
- $destWidth = $image['largeur_dest'];
- $destHeight = $image['hauteur_dest'];
- $logo = $image['fichier'];
- $date = $image["date_src"];
- $preview = image_creer_vignette($image, $taille, $taille_y,$process,$force);
-
- if ($preview && $preview['fichier']) {
- $logo = $preview['fichier'];
- $destWidth = $preview['width'];
- $destHeight = $preview['height'];
- $date = $preview['date'];
- }
- // dans l'espace prive mettre un timestamp sur l'adresse
- // de l'image, de facon a tromper le cache du navigateur
- // quand on fait supprimer/reuploader un logo
- // (pas de filemtime si SAFE MODE)
- $date = test_espace_prive() ? ('?date='.$date) : '';
- return image_ecrire_tag($image,array('src'=>"$logo$date",'width'=>$destWidth,'height'=>$destHeight));
- }
- else
- # SVG par exemple ? BMP, tiff ... les redacteurs osent tout!
- return $img;
-}
-
// Reduire une image d'un certain facteur
// http://doc.spip.org/@image_reduire_par
function image_reduire_par ($img, $val=1, $force=false) {
@@ -825,4 +132,4 @@ function image_reduire_par ($img, $val=1, $force=false) {
return $img;
}
-?>
+?>
\ No newline at end of file
diff --git a/ecrire/inc/math.php b/ecrire/inc/math.php
index e80d89e2d8..2c49b6ceda 100644
--- a/ecrire/inc/math.php
+++ b/ecrire/inc/math.php
@@ -19,7 +19,7 @@ if (!defined("_ECRIRE_INC_VERSION")) return;
//
// http://doc.spip.org/@image_math
-function image_math($tex) {
+function produire_image_math($tex) {
global $traiter_math;
switch ($traiter_math) {
// Attention: mathml desactiv'e pour l'instant
@@ -96,7 +96,7 @@ function traiter_math($letexte, $source='') {
// Les doubles $$x^2$$ en mode 'div'
while((preg_match(",[$][$]([^$]+)[$][$],",$texte_milieu, $regs))) {
- $echap = "\n<p class=\"spip\" style=\"text-align: center;\">".image_math($regs[1])."</p>\n";
+ $echap = "\n<p class=\"spip\" style=\"text-align: center;\">".produire_image_math($regs[1])."</p>\n";
$pos = strpos($texte_milieu, $regs[0]);
$texte_milieu = substr($texte_milieu,0,$pos)
. code_echappement($echap, $source)
@@ -105,7 +105,7 @@ function traiter_math($letexte, $source='') {
// Les simples $x^2$ en mode 'span'
while((preg_match(",[$]([^$]+)[$],",$texte_milieu, $regs))) {
- $echap = image_math($regs[1]);
+ $echap = produire_image_math($regs[1]);
$pos = strpos($texte_milieu, $regs[0]);
$texte_milieu = substr($texte_milieu,0,$pos)
. code_echappement($echap, $source)
diff --git a/ecrire/inc/vieilles_defs.php b/ecrire/inc/vieilles_defs.php
index d343e39b97..a691d21444 100644
--- a/ecrire/inc/vieilles_defs.php
+++ b/ecrire/inc/vieilles_defs.php
@@ -243,7 +243,7 @@ return $GLOBALS[\'browser_layer\'];}
// $logo est le nom complet du logo ($logo = "chemin/$nom.$format)
// $nom et $format ne servent plus du fait du passage par le filtre image_reduire
- include_spip(\'inc/filtres_images\');
+ include_spip(\'inc/filtres_images_mini\');
$res = image_reduire("<img src=\'$logo\' $attributs />", $taille, $taille_y);
return $res;
}
diff --git a/prive/style_prive.html b/prive/style_prive.html
index 67d1f875ef..55b7b8f697 100644
--- a/prive/style_prive.html
+++ b/prive/style_prive.html
@@ -81,7 +81,7 @@ div.table_page { margin-top: 1em; }
display: inline;
}
#chemin li .bloc {
- [(#EVAL{_DIR_IMG_PACK}|concat{chemin-fond-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee}|couleur_foncer)], center [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{chemin-fond-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee}|couleur_foncer)], center [(#GET{left})] no-repeat })]
padding: 2px;
padding-bottom: 4px;
padding-#GET{left}: 10px;
@@ -91,12 +91,12 @@ div.table_page { margin-top: 1em; }
display: inline-block;
}
#chemin li .bloc:hover {
- [(#EVAL{_DIR_IMG_PACK}|concat{chemin-fond-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee}|couleur_foncer|couleur_foncer)], center [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{chemin-fond-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee}|couleur_foncer|couleur_foncer)], center [(#GET{left})] no-repeat })]
}
#chemin li li .bloc {
margin-top: 2px;
- [(#EVAL{_DIR_IMG_PACK}|concat{chemin-fond-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee})], center [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{chemin-fond-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee})], center [(#GET{left})] no-repeat })]
}
#chemin .aide {margin-top: 3px; margin-bottom: 15px;}
diff --git a/prive/style_prive_formulaires.html b/prive/style_prive_formulaires.html
index 372d603cfe..38c6f4f8e8 100644
--- a/prive/style_prive_formulaires.html
+++ b/prive/style_prive_formulaires.html
@@ -184,7 +184,7 @@ c'est le par defaut des formulaires de Spip */
position:relative;
display:inline;
- [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-gauche-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_claire,3874b0})], center [(#GET{right})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-gauche-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_claire,3874b0})], center [(#GET{right})] no-repeat })]
color: #[(#GET{foncee}|couleur_foncer)];
line-height: 11px;
@@ -203,7 +203,7 @@ c'est le par defaut des formulaires de Spip */
.formulaire_spip li.obligatoire label,
.formulaire_spip li.obligatoire.gauche label {
- [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-gauche-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee}|couleur_foncer)], center [(#GET{right})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-gauche-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee}|couleur_foncer)], center [(#GET{right})] no-repeat })]
color: white;
font-weight: bold;
}
@@ -242,7 +242,7 @@ padding-top:10px;
font-weight: bold;
font-size: 95%;
line-height: 11px;
- [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_claire})], bottom [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_claire})], bottom [(#GET{left})] no-repeat })]
}
.formulaire_spip li.editer_parent textarea,
@@ -277,7 +277,7 @@ padding-top:10px;
.formulaire_spip li.editer_texte.obligatoire label,
.formulaire_spip li.editer_ps.obligatoire label,
.formulaire_spip li.obligatoire.haut label {
- [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee})], bottom [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee})], bottom [(#GET{left})] no-repeat })]
color: white;
}*/
@@ -308,7 +308,7 @@ padding-top:10px;
font-weight: bold;
font-size: 95%;
line-height: 11px;
- [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee})], bottom [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee})], bottom [(#GET{left})] no-repeat })]
}
.formulaire_spip li.fieldset.editer_liens_sites {
@@ -408,7 +408,7 @@ padding-top:10px;
.formulaire_spip li.editer_parent label,
.formulaire_spip li.editer_groupe_mot label {
- [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|image_bg{[(#ENV{couleur_foncee})], bottom [(#GET{left})] no-repeat })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{label-fond-haut-,#ENV{ltr},.gif}|background_image{[(#ENV{couleur_foncee})], bottom [(#GET{left})] no-repeat })]
color: white;
}
@@ -477,7 +477,7 @@ padding-top:10px;
/* Bouton de validation */
input[type="submit"] {
- [(#EVAL{_DIR_IMG_PACK}|concat{fond-fondo.gif}|image_bg{[(#ENV{couleur_foncee}|couleur_foncer)], center center })]
+ [(#EVAL{_DIR_IMG_PACK}|concat{fond-fondo.gif}|background_image{[(#ENV{couleur_foncee}|couleur_foncer)], center center })]
border: 1px outset [(#GET{foncee})];
padding: 3px;
font-weight: bold;
--
GitLab