Composantes d'une image

                               

                            
/*---------------------------------------------------------------*/
/*
    Titre : Composantes d'une image                                                                                       
                                                                                                                          
    URL   : https://phpsources.net/code_s.php?id=983
    Date édition     : 15 Fev 2019                                                                                       
    Date mise a jour : 20 Fev 2026
                                                                                       
    Rapport de la maj:                                                                                                    
    - amélioration du code                                                                                             
    - fonctionnement du code vérifié                                                                                
    - fonctionnement du code vérifié en PHP 8                                                                       
*/
/*---------------------------------------------------------------*/

function composantes($src, $dest, $format, $comp) {

    $comp  = strtolower($comp);
    $comps = preg_split('//', $comp, -1, PREG_SPLIT_NO_EMPTY);

    // Vérification du fichier source
    if (!file_exists($src)) {
        trigger_error(
"composantes() : le fichier source '$src' est introuvable.", E_USER_WARNING);
        return FALSE;
    }

    $size = getimagesize($src);
    if (!$size) {
        trigger_error(
"composantes() : impossible de lire les informations de l'image '$src'. Le" .
" fichier est peut-être corrompu ou ce n'est pas une image.", E_USER_WARNING);
        return FALSE;
    }

    echo 
"Info : image source détectée — largeur={$size[0]}px," .
" hauteur={$size[1]}px, type={$size[2]} ({$size['mime']})<br>";

    // Chargement de l'image
    $pic = FALSE;
    switch ($size[2]) {
        case IMAGETYPE_GIF:
            if (imagetypes() & IMG_GIF)
                $pic = imagecreatefromgif($src);
            else
                trigger_error(
"composantes() : le support GIF n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        case IMAGETYPE_JPEG:
            if (imagetypes() & IMG_JPG)
                $pic = imagecreatefromjpeg($src);
            else
                trigger_error(
"composantes() : le support JPEG n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        case IMAGETYPE_PNG:
            if (imagetypes() & IMG_PNG)
                $pic = imagecreatefrompng($src);
            else
                trigger_error(
"composantes() : le support PNG n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        default:
            if (preg_match("/\.wbmp$/i", $src) && (imagetypes() & IMG_WBMP))
                $pic = imagecreatefromwbmp($src);
            else
                trigger_error(
"composantes() : format de l'image source non supporté (type détecté :" .
" {$size[2]}).", E_USER_WARNING);
    }

    if (!$pic) {
        trigger_error(
"composantes() : échec du chargement de l'image '$src'. Vérifiez que le" .
" fichier n'est pas corrompu et que les droits de lecture sont corrects.", 
E_USER_WARNING);
        return FALSE;
    }

    echo "Info : image chargée avec succès.<br>";

    $width  = imagesx($pic);
    $height = imagesy($pic);
    $isTruecolor = imageistruecolor($pic);

    echo "Info : dimensions={$width}x{$height}px, mode=" . ($isTruecolor ? 
"truecolor" : "indexé (palette)") . "<br>";
    echo "Info : composantes conservées : " . implode(', ', $comps) . "<br>";

    // Traitement des couleurs
    if ($isTruecolor) {
        echo "Info : traitement pixel par pixel (truecolor)...<br>";
        imagealphablending($pic, FALSE);
        imagesavealpha($pic, TRUE);

        for ($y = 0; $y < $height; $y++) {
            for ($x = 0; $x < $width; $x++) {
                $rgba  = imagecolorat($pic, $x, $y);
                $alpha = ($rgba >> 24) & 0x7F;
                $r     = ($rgba >> 16) & 0xFF;
                $g     = ($rgba >>  8) & 0xFF;
                $b     =  $rgba        & 0xFF;

                if (!in_array('r', $comps)) $r = 0;
                if (!in_array('g', $comps)) $g = 0;
                if (!in_array('b', $comps)) $b = 0;

                $newColor = imagecolorallocatealpha($pic, $r, $g, $b, $alpha);
                if ($newColor === FALSE) {
                    trigger_error(
"composantes() : échec de imagecolorallocatealpha() au pixel ($x, $y).", 
E_USER_WARNING);
                    imagedestroy($pic);
                    return FALSE;
                }
                imagesetpixel($pic, $x, $y, $newColor);
            }
        }
    } else {
        echo "Info : traitement de la palette (" . imagecolorstotal($pic) . 
" couleurs)...<br>";
        $colors_num = imagecolorstotal($pic);
        for ($i = 0; $i < $colors_num; $i++) {
            $color = imagecolorsforindex($pic, $i);
            $r = $color["red"];
            $g = $color["green"];
            $b = $color["blue"];

            if (!in_array('r', $comps)) $r = 0;
            if (!in_array('g', $comps)) $g = 0;
            if (!in_array('b', $comps)) $b = 0;

            imagecolorset($pic, $i, $r, $g, $b);
        }
    }

    echo "Info : traitement des couleurs terminé.<br>";

    // Vérification des droits d'écriture sur le dossier de destination
    if (is_dir($dest)) {
    $ext = strtolower($format) == 'jpg' ? 'jpg' : strtolower($format);
    $dest = rtrim($dest, '/') . '/' . pathinfo($src, PATHINFO_FILENAME) . '_' . 
$comp . '.' . $ext;
    echo 
"Info : nom de fichier destination généré automatiquement : '$dest'<br>";
}
$destDir = dirname($dest);

    if (!is_writable($destDir)) {
        trigger_error(
"composantes() : le dossier de destination '$destDir' n'est pas accessible en" .
" écriture.", E_USER_WARNING);
        imagedestroy($pic);
        return FALSE;
    }

    // Sauvegarde
    $format = strtoupper($format);
    echo "Info : sauvegarde au format $format vers '$dest'...<br>";

    $ok = FALSE;
    switch ($format) {
        case "GIF":
            if (imagetypes() & IMG_GIF)  { $ok = imagegif($pic,  $dest); }
            else trigger_error(
"composantes() : le support GIF n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        case "JPG":
            if (imagetypes() & IMG_JPG)  { $ok = imagejpeg($pic, $dest); }
            else trigger_error(
"composantes() : le support JPEG n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        case "PNG":
            if (imagetypes() & IMG_PNG)  { $ok = imagepng($pic,  $dest); }
            else trigger_error(
"composantes() : le support PNG n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        case "WBMP":
            if (imagetypes() & IMG_WBMP) { $ok = imagewbmp($pic, $dest); }
            else trigger_error(
"composantes() : le support WBMP n'est pas disponible sur ce serveur.", 
E_USER_WARNING);
            break;
        default:
            trigger_error(
"composantes() : format de sortie '$format' non reconnu. Utilisez GIF, JPG," .
" PNG ou WBMP.", E_USER_WARNING);
    }

    imagedestroy($pic);

    if (!$ok) {
        trigger_error(
"composantes() : échec de la sauvegarde vers '$dest'. Vérifiez les droits" .
" d'écriture et l'espace disque disponible.", E_USER_WARNING);
        return FALSE;
    }

    echo "Info : image sauvegardée avec succès vers '$dest'.<br>";
    return TRUE;
}

?>