PHP缩略图等比例无损压缩，可填充空白区域补充色-PHP源码

 0 ) {
        $dst_w = $src_width * ( $dst_height / $src_height );
        $dst_x = ( $dst_width - $dst_w ) / 2;
    } elseif ( ($dst_width / $dst_height - $src_width / $src_height) <0 ) {
        $dst_h = $src_height * ( $dst_width / $src_width );
        $dst_y = ( $dst_height - $dst_h ) / 2;
    }

    imagecopyresampled($dstimg, $srcimg, $dst_x
        , $dst_y, 0, 0, $dst_w, $dst_h, $src_width, $src_height);
    
    // 保存格式
    $arr = array(
        &＃39;jpg&＃39; => &＃39;imagejpeg&＃39;
        , &＃39;jpeg&＃39; => &＃39;imagejpeg&＃39;
        , &＃39;png&＃39; => &＃39;imagepng&＃39;
        , &＃39;gif&＃39; => &＃39;imagegif&＃39;
        , &＃39;bmp&＃39; => &＃39;imagebmp&＃39;
    );
    $suffix = strtolower( array_pop(explode(&＃39;.&＃39;, $dstimage ) ) );
    if (!in_array($suffix, array_keys($arr)) ) {
        echo "保存的文件名错误";
        exit;
    } else {
        eval( $arr[$suffix] . &＃39;($dstimg, "&＃39;.$dstimage.&＃39;");&＃39; );
    }
    
    imagejpeg($dstimg, $dstimage);
    
    imagedestroy($dstimg);
    imagedestroy($srcimg);
    
}


function getcreatemethod( $file ) {
        $arr = array(
                &＃39;474946&＃39; => "imagecreatefromgif(&＃39;$file&＃39;)"
                , &＃39;FFD8FF&＃39; => "imagecreatefromjpeg(&＃39;$file&＃39;)"
                , &＃39;424D&＃39; => "imagecreatefrombmp(&＃39;$file&＃39;)"
                , &＃39;89504E&＃39; => "imagecreatefrompng(&＃39;$file&＃39;)"
        );
        $fd = fopen( $file, "rb" );
        $data = fread( $fd, 3 );
        
        $data = str2hex( $data );
        
        if ( array_key_exists( $data, $arr ) ) {
                return $arr[$data];
        } elseif ( array_key_exists( substr($data, 0, 4), $arr ) ) {
                return $arr[substr($data, 0, 4)];
        } else {
                return false;
        }
}

function str2hex( $str ) {
        $ret = "";
        
        for( $i = 0; $i = 16 ? strval( dechex( ord($str[$i]) ) )
                        : &＃39;0&＃39;. strval( dechex( ord($str[$i]) ) );
        }
        
        return strtoupper( $ret );
}

// BMP 创建函数  php本身无
function imagecreatefrombmp($filename)
{
   if (! $f1 = fopen($filename,"rb")) return FALSE;

   $FILE = unpack("vfile_type/Vfile_size/Vreserved/Vbitmap_offset", fread($f1,14));
   if ($FILE[&＃39;file_type&＃39;] != 19778) return FALSE;

   $BMP = unpack(&＃39;Vheader_size/Vwidth/Vheight/vplanes/vbits_per_pixel&＃39;.
                 &＃39;/Vcompression/Vsize_bitmap/Vhoriz_resolution&＃39;.
                 &＃39;/Vvert_resolution/Vcolors_used/Vcolors_important&＃39;, fread($f1,40));
   $BMP[&＃39;colors&＃39;] = pow(2,$BMP[&＃39;bits_per_pixel&＃39;]);
   if ($BMP[&＃39;size_bitmap&＃39;] == 0) $BMP[&＃39;size_bitmap&＃39;] = $FILE[&＃39;file_size&＃39;] - $FILE[&＃39;bitmap_offset&＃39;];
   $BMP[&＃39;bytes_per_pixel&＃39;] = $BMP[&＃39;bits_per_pixel&＃39;]/8;
   $BMP[&＃39;bytes_per_pixel2&＃39;] = ceil($BMP[&＃39;bytes_per_pixel&＃39;]);
   $BMP[&＃39;decal&＃39;] = ($BMP[&＃39;width&＃39;]*$BMP[&＃39;bytes_per_pixel&＃39;]/4);
   $BMP[&＃39;decal&＃39;] -= floor($BMP[&＃39;width&＃39;]*$BMP[&＃39;bytes_per_pixel&＃39;]/4);
   $BMP[&＃39;decal&＃39;] = 4-(4*$BMP[&＃39;decal&＃39;]);
   if ($BMP[&＃39;decal&＃39;] == 4) $BMP[&＃39;decal&＃39;] = 0;
   
   $PALETTE = array();
   if ($BMP[&＃39;colors&＃39;] <16777216)
   {
    $PALETTE = unpack(&＃39;V&＃39;.$BMP[&＃39;colors&＃39;], fread($f1,$BMP[&＃39;colors&＃39;]*4));
   }
   
   $IMG = fread($f1,$BMP[&＃39;size_bitmap&＃39;]);
   $VIDE = chr(0);

   $res = imagecreatetruecolor($BMP[&＃39;width&＃39;],$BMP[&＃39;height&＃39;]);
   $P = 0;
   $Y = $BMP[&＃39;height&＃39;]-1;
   while ($Y >= 0)
   {
        $X=0;
        while ($X <$BMP[&＃39;width&＃39;])
        {
         if ($BMP[&＃39;bits_per_pixel&＃39;] == 24)
            $COLOR = unpack("V",substr($IMG,$P,3).$VIDE);
         elseif ($BMP[&＃39;bits_per_pixel&＃39;] == 16)
         {  
            $COLOR = unpack("n",substr($IMG,$P,2));
            $COLOR[1] = $PALETTE[$COLOR[1]+1];
         }
         elseif ($BMP[&＃39;bits_per_pixel&＃39;] == 8)
         {  
            $COLOR = unpack("n",$VIDE.substr($IMG,$P,1));
            $COLOR[1] = $PALETTE[$COLOR[1]+1];
         }
         elseif ($BMP[&＃39;bits_per_pixel&＃39;] == 4)
         {
            $COLOR = unpack("n",$VIDE.substr($IMG,floor($P),1));
            if (($P*2)%2 == 0) $COLOR[1] = ($COLOR[1] >> 4) ; else $COLOR[1] = ($COLOR[1] & 0x0F);
            $COLOR[1] = $PALETTE[$COLOR[1]+1];
         }
         elseif ($BMP[&＃39;bits_per_pixel&＃39;] == 1)
         {
            $COLOR = unpack("n",$VIDE.substr($IMG,floor($P),1));
            if     (($P*8)%8 == 0) $COLOR[1] =  $COLOR[1]        >>7;
            elseif (($P*8)%8 == 1) $COLOR[1] = ($COLOR[1] & 0x40)>>6;
            elseif (($P*8)%8 == 2) $COLOR[1] = ($COLOR[1] & 0x20)>>5;
            elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4;
            elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3;
            elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2;
            elseif (($P*8)%8 == 6) $COLOR[1] = ($COLOR[1] & 0x2)>>1;
            elseif (($P*8)%8 == 7) $COLOR[1] = ($COLOR[1] & 0x1);
            $COLOR[1] = $PALETTE[$COLOR[1]+1];
         }
         else
            return FALSE;
         imagesetpixel($res,$X,$Y,$COLOR[1]);
         $X++;
         $P += $BMP[&＃39;bytes_per_pixel&＃39;];
        }
        $Y--;
        $P+=$BMP[&＃39;decal&＃39;];
   }
   fclose($f1);

return $res;
}
// BMP 保存函数，php本身无
function imagebmp ($im, $fn = false)
{
    if (!$im) return false;
            
    if ($fn === false) $fn = &＃39;php://output&＃39;;
    $f = fopen ($fn, "w");
    if (!$f) return false;
            
    $biWidth = imagesx ($im);
    $biHeight = imagesy ($im);
    $biBPLine = $biWidth * 3;
    $biStride = ($biBPLine + 3) & ~3;
    $biSizeImage = $biStride * $biHeight;
    $bfOffBits = 54;
    $bfSize = $bfOffBits + $biSizeImage;
            
    fwrite ($f, &＃39;BM&＃39;, 2);
    fwrite ($f, pack (&＃39;VvvV&＃39;, $bfSize, 0, 0, $bfOffBits));
            
    fwrite ($f, pack (&＃39;VVVvvVVVVVV&＃39;, 40, $biWidth, $biHeight, 1, 24, 0, $biSizeImage, 0, 0, 0, 0));
            
    $numpad = $biStride - $biBPLine;
    for ($y = $biHeight - 1; $y >= 0; --$y)
    {
        for ($x = 0; $x <$biWidth; ++$x)
        {
            $col = imagecolorat ($im, $x, $y);
            fwrite ($f, pack (&＃39;V&＃39;, $col), 3);
        }
        for ($i = 0; $i <$numpad; ++$i)
            fwrite ($f, pack (&＃39;C&＃39;, 0));
    }
    fclose ($f);
    return true;
}

?>