Subversion Repositories Sites.tela-botanica.org

Compare Revisions

Ignore whitespace Rev 6 → Rev 7

/trunk/actu/ecrire/inc_logos.php3
New file
0,0 → 1,497
<?php
 
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2005 *
* 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. *
\***************************************************************************/
 
 
//
// Ce fichier ne sera execute qu'une fois
if (defined("_ECRIRE_INC_LOGOS")) return;
define("_ECRIRE_INC_LOGOS", "1");
 
 
function cherche_image_nommee($nom, $formats = array ('gif', 'jpg', 'png')) {
// _DIR_IMG contient deja le ../ dans ecrire (PREFIX1
// if (ereg("^../",$nom)) $nom = substr($nom,3);
if (ereg("^" . _DIR_IMG, $nom)) {
$nom = substr($nom,strlen(_DIR_IMG));
}
$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)) {
$d = _DIR_IMG . "$chemin$nom.$format";
if (@file_exists($d)){
return array(_DIR_IMG."$chemin", $nom, $format);
}
}
}
 
 
 
function decrire_logo($racine) {
global $connect_id_auteur;
if ($img = cherche_image_nommee($racine)) {
list($dir, $racine, $fmt) = $img;
$fid = $dir . "$racine.".$fmt;
if ($taille = @getimagesize($fid))
$xy = _T('info_largeur_vignette', array('largeur_vignette' => $taille[0], 'hauteur_vignette' => $taille[1]));
 
return array("$racine.$fmt", $xy);
}
return '';
}
 
 
function afficher_boite_logo($type, $id_objet, $id, $texteon, $texteoff) {
global $options, $spip_display;
 
$logon = $type.'on'.$id;
$logoff = $type.'off'.$id;
 
if ($spip_display != 4) {
echo "<p>";
debut_cadre_relief("image-24.gif");
echo "<div class='verdana1' style='text-align: center;'>";
$desc = decrire_logo($logon);
afficher_logo($logon, $texteon, $desc, $id_objet, $id);
 
if ($desc AND $texteoff) {
echo "<br /><br />";
$desc = decrire_logo($logoff);
afficher_logo($logoff, $texteoff, $desc, $id_objet, $id);
}
echo "</div>";
fin_cadre_relief();
echo "</p>";
}
}
 
 
function afficher_logo($racine, $titre, $logo, $id_objet, $id) {
global $connect_id_auteur;
global $couleur_foncee, $couleur_claire;
global $clean_link;
 
include_ecrire('inc_admin.php3');
$redirect = $clean_link->getUrl();
 
echo "<b>";
echo bouton_block_invisible(md5($titre));
echo $titre;
echo "</b>";
echo "<font size=1>";
 
if ($logo) {
list ($fichier, $taille) = $logo;
$hash = calculer_action_auteur("supp_logo $fichier");
 
echo "<p><center><div><a href='"._DIR_IMG.$fichier."'>";
echo reduire_image_logo(_DIR_IMG.$fichier, 170);
echo "</a></div>";
echo debut_block_invisible(md5($titre));
echo $taille;
echo "\n<br />[<a href='../spip_image.php3?";
echo "$id_objet=$id&";
echo "image_supp=$fichier&hash_id_auteur=$connect_id_auteur&hash=$hash&redirect=".urlencode($redirect)."'>"._T('lien_supprimer')."</A>]";
echo fin_block();
echo "</center></p>";
}
else {
$hash = calculer_action_auteur("ajout_logo $racine");
echo debut_block_invisible(md5($titre));
 
echo "\n\n<FORM ACTION='../spip_image.php3' METHOD='POST'
ENCTYPE='multipart/form-data'>";
echo "\n<INPUT NAME='redirect' TYPE=Hidden VALUE='$redirect'>";
echo "\n<INPUT NAME='$id_objet' TYPE=Hidden VALUE='$id'>";
echo "\n<INPUT NAME='hash_id_auteur' TYPE=Hidden VALUE='$connect_id_auteur'>";
echo "\n<INPUT NAME='hash' TYPE=Hidden VALUE='$hash'>";
echo "\n<INPUT NAME='ajout_logo' TYPE=Hidden VALUE='oui'>";
echo "\n<INPUT NAME='logo' TYPE=Hidden VALUE='$racine'>";
if (tester_upload()){
echo "\n"._T('info_telecharger_nouveau_logo')."<BR>";
echo "\n<INPUT NAME='image' TYPE=File CLASS='forml' style='font-size:9px;' SIZE=15>";
echo "\n <div align='right'><INPUT NAME='ok' TYPE=Submit VALUE='"._T('bouton_telecharger')."' CLASS='fondo' style='font-size:9px;'></div>";
} else {
 
$myDir = opendir(_DIR_TRANSFERT);
while($entryName = readdir($myDir)){
if (!ereg("^\.",$entryName) AND eregi("(gif|jpg|png)$",$entryName)){
$entryName = addslashes($entryName);
$afficher .= "\n<OPTION VALUE='" .
_DIR_TRANSFERT .
"$entryName'>$entryName";
}
}
closedir($myDir);
 
if (strlen($afficher) > 10){
echo "\n"._T('info_selectionner_fichier_2');
echo "\n<SELECT NAME='image' CLASS='forml' SIZE=1>";
echo $afficher;
echo "\n</SELECT>";
echo "\n <INPUT NAME='ok' TYPE=Submit VALUE='"._T('bouton_choisir')."' CLASS='fondo'>";
} else {
echo _T('info_installer_images_dossier');
}
 
}
echo fin_block();
echo "</FORM>\n";
}
 
echo "</font>";
}
 
 
//
// Creation automatique d'une vignette
//
 
// Calculer le 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));
}
 
function creer_vignette($image, $maxWidth, $maxHeight, $format, $destdir, $destfile, $process='AUTO', $force=false, $test_cache_only = false) {
global $convert_command, $pnmscale_command;
// ordre de preference des formats graphiques pour creer les vignettes
// le premier format disponible, selon la methode demandee, est utilise
if ($format == 'png')
$formats_sortie = array('png','jpg','gif');
else
$formats_sortie = array('jpg','png','gif');
if ($process == 'AUTO')
$process = lire_meta('image_process');
 
// liste des formats qu'on sait lire
$formats_graphiques = lire_meta('formats_graphiques');
 
// si le doc n'est pas une image, refuser
if (!$force AND !eregi(",$format,", ",$formats_graphiques,"))
return;
// normalement il a ete cree
if ($destdir) {
$destdir = creer_repertoire(_DIR_IMG, $destdir);
}
$destination = _DIR_IMG . $destdir . $destfile;
# spip_log("$dir $destination");
// chercher un cache
foreach (array('gif','jpg','png') as $fmt)
if (@file_exists($destination.'.'.$fmt)) {
$vignette = $destination.'.'.$fmt;
if ($force) @unlink($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 ($srcsize = @getimagesize($image)) {
$srcWidth=$srcsize[0];
$srcHeight=$srcsize[1];
list ($destWidth,$destHeight) = image_ratio($srcWidth, $srcHeight, $maxWidth, $maxHeight);
} else if ($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.'.'.preg_replace(',^.*\.,', '', $image);
@copy($image, $vignette);
}
 
// imagemagick en ligne de commande
else if ($process == 'convert') {
$format = $formats_sortie[0];
$vignette = $destination.".".$format;
$commande = "$convert_command -size ${destWidth}x${destHeight} ./$image -geometry ${destWidth}x${destHeight} +profile \"*\" ./".escapeshellcmd($vignette);
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') {
$format = $formats_sortie[0];
$vignette = "$destination.".$format;
$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 if ($process == "netpbm") {
$format_sortie = "jpg";
$vignette = $destination.".".$format_sortie;
$pnmtojpeg_command = ereg_replace("pnmscale", "pnmtojpeg", $pnmscale_command);
if ($format == "jpg") {
$jpegtopnm_command = ereg_replace("pnmscale", "jpegtopnm", $pnmscale_command);
 
exec("$jpegtopnm_command $image | $pnmscale_command -width $destWidth | $pnmtojpeg_command > $vignette");
if (!@file_exists($vignette)) {
spip_log("echec netpbm-jpg sur $vignette");
return;
}
} else if ($format == "gif") {
$giftopnm_command = ereg_replace("pnmscale", "giftopnm", $pnmscale_command);
exec("$giftopnm_command $image | $pnmscale_command -width $destWidth | $pnmtojpeg_command > $vignette");
if (!@file_exists($vignette)) {
spip_log("echec netpbm-gif sur $vignette");
return;
}
} else if ($format == "png") {
$pngtopnm_command = ereg_replace("pnmscale", "pngtopnm", $pnmscale_command);
exec("$pngtopnm_command $image | $pnmscale_command -width $destWidth | $pnmtojpeg_command > $vignette");
if (!@file_exists($vignette)) {
spip_log("echec netpbm-png sur $vignette");
return;
}
}
}
// gd ou gd2
else if ($process == 'gd1' OR $process == 'gd2') {
 
// Recuperer l'image d'origine
if ($format == "jpg") {
$srcImage = @ImageCreateFromJPEG($image);
}
else if ($format == "gif"){
$srcImage = @ImageCreateFromGIF($image);
}
else if ($format == "png"){
$srcImage = @ImageCreateFromPNG($image);
}
if (!$srcImage) {
spip_log("echec gd1/gd2");
return;
}
// 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*
$gd_formats = lire_meta("gd_formats");
foreach ($formats_sortie as $fmt) {
if (ereg($fmt, $gd_formats)) {
if ($format <> "gif" OR $GLOBALS['flag_ImageGif'])
$destFormat = $fmt;
break;
}
}
 
if (!$destFormat) {
spip_log("pas de format pour $image");
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'))
$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
$vignette = "$destination.$destFormat";
$format = $destFormat;
if ($destFormat == "jpg")
ImageJPEG($destImage, $vignette, 70);
else if ($destFormat == "gif")
ImageGIF($destImage, $vignette);
else if ($destFormat == "png")
ImagePNG($destImage, $vignette);
 
ImageDestroy($srcImage);
ImageDestroy($destImage);
}
}
 
$size = @getimagesize($vignette);
$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;
}
 
 
 
//
// Retourner taille d'une image
// pour les filtres |largeur et |hauteur
//
function taille_image($img) {
 
if (eregi("width *= *['\"]?( *[0-9]+ *)", $img, $regs))
$srcWidth = intval(trim($regs[1]));
if (eregi("height *= *['\"]?( *[0-9]+ *)", $img, $regs))
$srcHeight = intval(trim($regs[1]));
 
// recuperer le nom du fichier
if (eregi("src='([^']+)'", $img, $regs)) $logo = $regs[1];
if (!$logo) $logo = $img;
 
if (!$srcWidth
AND $srcsize = @getimagesize($logo))
$srcWidth = $srcsize[0];
 
if (!$srcHeight
AND $srcsize = @getimagesize($logo))
$srcHeight = $srcsize[1];
 
return array($srcHeight, $srcWidth);
}
 
 
 
 
//
// Reduire la taille d'un logo
// [(#LOGO_ARTICLE||reduire_image{100,60})]
//
 
// Cette fonction accepte en entree un nom de fichier ou un tag <img ...>
 
function reduire_image_logo($img, $taille = -1, $taille_y = -1) {
 
// Determiner la taille x,y maxi
if ($taille == -1) {
$taille = lire_meta('taille_preview');
if (!$taille)
$taille = 150;
}
if ($taille_y == -1)
$taille_y = $taille;
 
if ($taille == 0 AND $taille_y > 0)
$taille = 100000; # {0,300} -> c'est 300 qui compte
else
if ($taille > 0 AND $taille_y == 0)
$taille_y = 100000; # {300,0} -> c'est 300 qui compte
else if ($taille == 0 AND $taille_y == 0)
return '';
 
// recuperer le nom du fichier
if ($src = extraire_attribut($img, 'src'))
$logo = $src;
else
$logo = $img;
if (!$logo) return '';
 
// Si c'est une image distante, la recuperer (si possible)
if (!$local = copie_locale($logo)) {
spip_log("pas de version locale de $logo");
return $img;
}
$logo = $local;
 
 
$attributs = '';
 
// preserver le name='...' et le mettre en alt le cas echant
if ($name = extraire_attribut($img, 'name')) {
$attributs .= ' name="'.entites_html($name).'"';
$attributs_alt = ' alt="'.entites_html($name).'"';
}
if ($alt = extraire_attribut($img, 'alt'))
$attributs_alt = ' alt="'.entites_html($alt).'"';
 
$attributs .= $attributs_alt;
 
// attributs deprecies. Transformer en CSS
if ($espace = extraire_attribut($img, 'hspace'))
$attributs .= " style='margin: $espace" . "px; border-width: 0px;'";
else
$attributs .= " style='border-width: 0px;' class='spip_logos'";
// attribut deprecie mais equivalent CSS pas clair
if ($align = extraire_attribut($img, 'align'))
$attributs .= " align='$align'";
 
if (eregi("(.*)\.(jpg|gif|png)$", $logo, $regs)) {
if ($i = cherche_image_nommee($regs[1], array($regs[2]))) {
list(,$nom,$format) = $i;
if ($taille_origine = @getimagesize($logo)) {
list ($destWidth,$destHeight, $ratio) = image_ratio(
$taille_origine[0], $taille_origine[1], $taille, $taille_y);
 
// Creer effectivement la vignette reduite
$suffixe = '-'.$destWidth.'x'.$destHeight;
$preview = creer_vignette($logo, $taille, $taille_y,
$format, ('cache'.$suffixe), $nom.$suffixe);
if ($preview) {
$logo = $preview['fichier'];
$destWidth = $preview['width'];
$destHeight = $preview['height'];
}
 
if (!_DIR_RESTREINT)
$date = '?date='.filemtime($logo);
return "<img src='$logo$date' width='$destWidth' height='$destHeight'$attributs />";
}
}
}
}
 
?>