function image_ecrire_tag($valeurs, $surcharge)
{
include_spip('inc/filtres_images_lib');
return _image_ecrire_tag($valeurs, $surcharge);
}
/**
* Transforme la couleur de fond de l'image en transparence
* Le filtre ne gere pas la notion de contiguite aux bords, et affectera tous les pixels de l'image dans la couleur visee
* $background_color : couleur cible
* $tolerance : distance L1 dans l'espace RGB des couleur autour de la couleur $background_color pour lequel la transparence sera appliquee
* $alpha : transparence a appliquer pour les pixels de la couleur cibles avec la tolerance ci-dessus
* $coeff_lissage : coeff applique a la tolerance pour determiner la decroissance de la transparence fonction de la distance L1 entre la couleur du pixel et la couleur cible
*
* @param string $im
* @param string $background_color
* @param int $tolerance
* @param int $alpha
* alpha = 0: aucune transparence
* alpha = 127: completement transparent
* @param int $coeff_lissage
* @return mixed|null|string
*/
function image_fond_transparent($im, $background_color, $tolerance = 12, $alpha = 127, $coeff_lissage = 7)
{
$fonction = array('image_fond_transparent', func_get_args());
$image = _image_valeurs_trans($im, "fond_transparent-{$background_color}-{$tolerance}-{$coeff_lissage}-{$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) {
$bg = _couleur_hex_to_dec($background_color);
$bg_r = $bg['red'];
$bg_g = $bg['green'];
$bg_b = $bg['blue'];
// 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);
$color_f = ImageColorAllocateAlpha($im_, 255, 255, 255, $alpha);
for ($x = 0; $x < $x_i; $x++) {
for ($y = 0; $y < $y_i; $y++) {
$rgb = ImageColorAt($im2, $x, $y);
$r = $rgb >> 16 & 0xff;
$g = $rgb >> 8 & 0xff;
$b = $rgb & 0xff;
if (($d = abs($r - $bg_r) + abs($g - $bg_g) + abs($b - $bg_b)) <= $tolerance) {
imagesetpixel($im_, $x, $y, $color_f);
} elseif ($tolerance and $d <= ($coeff_lissage + 1) * $tolerance) {
$transp = round($alpha * (1 - ($d - $tolerance) / ($coeff_lissage * $tolerance)));
$color_p = ImageColorAllocateAlpha($im_, $r, $g, $b, $transp);
imagesetpixel($im_, $x, $y, $color_p);
} else {
imagesetpixel($im_, $x, $y, $rgb);
}
}
}
_image_gd_output($im_, $image);
imagedestroy($im_);
imagedestroy($im);
imagedestroy($im2);
}
return _image_ecrire_tag($image, array('src' => $dest));
}
/**
* Réduit une image
*
* @uses extraire_attribut()
* @uses inserer_attribut()
* @uses _image_valeurs_trans()
* @uses _image_ratio()
* @uses _image_tag_changer_taille()
* @uses _image_ecrire_tag()
* @uses _image_creer_vignette()
*
* @param array $fonction
* Un tableau à 2 éléments :
* 1) string : indique le nom du filtre de traitement demandé (par exemple : `image_reduire`) ;
* 2) array : tableau reprenant la valeur de `$img` et chacun des arguments passés au filtre utilisé.
* @param string $img
* Chemin de l'image ou texte contenant une balise img
* @param int $taille
* Largeur désirée
* @param int $taille_y
* Hauteur désirée
* @param bool $force
* @param bool $cherche_image
* Inutilisé
* @param string $process
* Librairie graphique à utiliser (gd1, gd2, netpbm, convert, imagick).
* AUTO utilise la librairie sélectionnée dans la configuration.
* @return string
* Code HTML de la balise img produite
**/
function process_image_reduire($fonction, $img, $taille, $taille_y, $force, $cherche_image, $process = 'AUTO')
{
$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";
} elseif ($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 (is_array($image) and (!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 {
$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 (!is_array($image)) {
$image = _image_valeurs_trans($img, "reduire-{$taille}-{$taille_y}", $format_sortie, $fonction);
}
if (!is_array($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 (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 : '';
return _image_ecrire_tag($image, array('src' => "{$logo}{$date}", 'width' => $destWidth, 'height' => $destHeight));
} else {
return $img;
}
}
/**
* Generer un histrogramme des couleurs RVB de l'image
*
* @param object $im
* @return string
*/
function image_histogramme($im)
{
include_spip("inc/filtres_images");
$fonction = array('image_histo', func_get_args());
$image = image_valeurs_trans($im, "histo", "png", $fonction);
if (!$image) {
return "";
}
$x_i = $image["largeur"];
$y_i = $image["hauteur"];
$surface = $x_i * $y_i;
if (!test_traiter_image($image["fichier"], $x_i, $y_i)) {
return;
}
$im = $image["fichier"];
$dest = $image["fichier_dest"];
$creer = $image["creer"];
if ($creer) {
$im = $image["fonction_imagecreatefrom"]($im);
$im_ = imagecreatetruecolor(258, 130);
@imagealphablending($im_, false);
@imagesavealpha($im_, true);
$color_t = ImageColorAllocateAlpha($im_, 255, 255, 255, 50);
imagefill($im_, 0, 0, $color_t);
$col_poly = imagecolorallocate($im_, 60, 60, 60);
imagepolygon($im_, array(0, 0, 257, 0, 257, 129, 0, 129), 4, $col_poly);
$val_gris = $val_r = $val_g = $val_b = array();
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;
$a = 1;
$gris = round($a * ($r + $g + $b) / 3);
$r = round($a * $r);
$g = round($a * $g);
$b = round($a * $b);
$val_gris[$gris]++;
$val_r[$r]++;
$val_g[$g]++;
$val_b[$b]++;
}
}
$max = max(max($val_gris), max($val_r), max($val_g), max($val_b));
// Limiter Max si trop concentr'e
$max = min($max, round($surface * 0.03));
$rapport = 127 / $max;
$gris_50 = imagecolorallocate($im_, 170, 170, 170);
$gris_70 = imagecolorallocate($im_, 60, 60, 60);
for ($i = 0; $i < 256; $i++) {
$val = 127 - round(max(0, $val_gris[$i]) * $rapport);
imageline($im_, $i + 1, 128, $i + 1, $val + 1, $gris_50);
imagesetpixel($im_, $i + 1, $val + 1, $gris_70);
}
$bleu = imagecolorallocate($im_, 0, 0, 255);
for ($i = 0; $i < 256; $i++) {
$val = 127 - round(max(0, $val_b[$i]) * $rapport);
if ($i == 0) {
imagesetpixel($im_, $i + 1, $val + 1, $bleu);
} else {
imageline($im_, $i, $val_old + 1, $i + 1, $val + 1, $bleu);
}
$val_old = $val;
}
$green = imagecolorallocate($im_, 0, 255, 0);
for ($i = 0; $i < 256; $i++) {
$val = 127 - round(max(0, $val_g[$i]) * $rapport);
if ($i == 0) {
imagesetpixel($im_, $i + 1, $val + 1, $green);
} else {
imageline($im_, $i, $val_old + 1, $i + 1, $val + 1, $green);
}
$val_old = $val;
}
$rouge = imagecolorallocate($im_, 255, 0, 0);
for ($i = 0; $i < 256; $i++) {
$val = 127 - round(max(0, $val_r[$i]) * $rapport);
if ($i == 0) {
imagesetpixel($im_, $i + 1, $val + 1, $rouge);
} else {
imageline($im_, $i, $val_old + 1, $i + 1, $val + 1, $rouge);
}
$val_old = $val;
}
$image["fonction_image"]($im_, "{$dest}");
imagedestroy($im_);
imagedestroy($im);
}
return _image_ecrire_tag($image, array('src' => $dest, 'width' => 258, 'height' => 130));
}
