Source Code:

  1. <?php
  2. /**
  3.  * 创建bmp格式图片
  4.  *
  5.  * @author: legend(legendsky@hotmail.com)
  6.  * @link: http://www.ugia.cn/?p=96
  7.  * @description: create Bitmap-File with GD library
  8.  * @version: 0.1
  9.  *
  10.  * @param resource $im          图像资源
  11.  * @param string   $filename    如果要另存为文件，请指定文件名，为空则直接在浏览器输出
  12.  * @param integer  $bit         图像质量(1、4、8、16、24、32位)
  13.  * @param integer  $compression 压缩方式，0为不压缩，1使用RLE8压缩算法进行压缩
  14.  *
  15.  * @return integer
  16.  */
  17. function imagebmp(&$im, $filename = '', $bit = 8, $compression = 0)
  18. {
  19.     if (!in_array($bit, array(1, 4, 8, 16, 24, 32)))
  20.     {
  21.         $bit = 8;
  22.     }
  23.     else if ($bit == 32) // todo:32 bit
  24.     {
  25.         $bit = 24;
  26.     }
  28.     $bits = pow(2, $bit);
  29.     
  30.     // 调整调色板
  31.     imagetruecolortopalette($im, true, $bits);
  32.     $width  = imagesx($im);
  33.     $height = imagesy($im);
  34.     $colors_num = imagecolorstotal($im);
  35.     
  36.     if ($bit <= 8)
  37.     {
  38.         // 颜色索引
  39.         $rgb_quad = '';
  40.         for ($i = 0; $i < $colors_num; $i ++)
  41.         {
  42.             $colors = imagecolorsforindex($im, $i);
  43.             $rgb_quad .= chr($colors['blue']) . chr($colors['green']) . chr($colors['red']) . "\0";
  44.         }
  45.         
  46.         // 位图数据
  47.         $bmp_data = '';
  49.         // 非压缩
  50.         if ($compression == 0 || $bit < 8)
  51.         {
  52.             if (!in_array($bit, array(1, 4, 8)))
  53.             {
  54.                 $bit = 8;
  55.             }
  57.             $compression = 0;
  58.             
  59.             // 每行字节数必须为4的倍数，补齐。
  60.             $extra = '';
  61.             $padding = 4 - ceil($width / (8 / $bit)) % 4;
  62.             if ($padding % 4 != 0)
  63.             {
  64.                 $extra = str_repeat("\0", $padding);
  65.             }
  66.             
  67.             for ($j = $height - 1; $j >= 0; $j --)
  68.             {
  69.                 $i = 0;
  70.                 while ($i < $width)
  71.                 {
  72.                     $bin = 0;
  73.                     $limit = $width - $i < 8 / $bit ? (8 / $bit - $width + $i) * $bit : 0;
  75.                     for ($k = 8 - $bit; $k >= $limit; $k -= $bit)
  76.                     {
  77.                         $index = imagecolorat($im, $i, $j);
  78.                         $bin |= $index << $k;
  79.                         $i ++;
  80.                     }
  82.                     $bmp_data .= chr($bin);
  83.                 }
  84.                 
  85.                 $bmp_data .= $extra; 
  86.             }
  87.         }
  88.         // RLE8 压缩
  89.         else if ($compression == 1 && $bit == 8)
  90.         {
  91.             for ($j = $height - 1; $j >= 0; $j --)
  92.             {
  93.                 $last_index = "\0";
  94.                 $same_num   = 0;
  95.                 for ($i = 0; $i <= $width; $i ++)
  96.                 {
  97.                     $index = imagecolorat($im, $i, $j);
  98.                     if ($index !== $last_index || $same_num > 255)
  99.                     {
  100.                         if ($same_num != 0)
  101.                         {
  102.                             $bmp_data .= chr($same_num) . chr($last_index);
  103.                         }
  105.                         $last_index = $index;
  106.                         $same_num = 1;
  107.                     }
  108.                     else
  109.                     {
  110.                         $same_num ++;
  111.                     }
  112.                 }
  114.                 $bmp_data .= "\0\0";
  115.             }
  116.             
  117.             $bmp_data .= "\0\1";
  118.         }
  120.         $size_quad = strlen($rgb_quad);
  121.         $size_data = strlen($bmp_data);
  122.     }
  123.     else
  124.     {
  125.         // 每行字节数必须为4的倍数，补齐。
  126.         $extra = '';
  127.         $padding = 4 - ($width * ($bit / 8)) % 4;
  128.         if ($padding % 4 != 0)
  129.         {
  130.             $extra = str_repeat("\0", $padding);
  131.         }
  133.         // 位图数据
  134.         $bmp_data = '';
  136.         for ($j = $height - 1; $j >= 0; $j --)
  137.         {
  138.             for ($i = 0; $i < $width; $i ++)
  139.             {
  140.                 $index  = imagecolorat($im, $i, $j);
  141.                 $colors = imagecolorsforindex($im, $index);
  142.                 
  143.                 if ($bit == 16)
  144.                 {
  145.                     $bin = 0 << $bit;
  147.                     $bin |= ($colors['red'] >> 3) << 10;
  148.                     $bin |= ($colors['green'] >> 3) << 5;
  149.                     $bin |= $colors['blue'] >> 3;
  151.                     $bmp_data .= pack("v", $bin);
  152.                 }
  153.                 else
  154.                 {
  155.                     $bmp_data .= pack("c*", $colors['blue'], $colors['green'], $colors['red']);
  156.                 }
  157.                 
  158.                 // todo: 32bit; 
  159.             }
  161.             $bmp_data .= $extra;
  162.         }
  164.         $size_quad = 0;
  165.         $size_data = strlen($bmp_data);
  166.         $colors_num = 0;
  167.     }
  169.     // 位图文件头
  170.     $file_header = "BM" . pack("V3", 54 + $size_quad + $size_data, 0, 54 + $size_quad);
  172.     // 位图信息头
  173.     $info_header = pack("V3v2V*", 0x28, $width, $height, 1, $bit, $compression, $size_data, 0, 0, $colors_num, 0);
  174.     
  175.     // 写入文件
  176.     if ($filename != '')
  177.     {
  178.         $fp = fopen($filename, "wb");
  180.         fwrite($fp, $file_header);
  181.         fwrite($fp, $info_header);
  182.         fwrite($fp, $rgb_quad);
  183.         fwrite($fp, $bmp_data);
  184.         fclose($fp);
  186.         return 1;
  187.     }
  188.     
  189.     // 浏览器输出
  190.     header("Content-Type: image/bmp");
  191.     echo $file_header . $info_header;
  192.     echo $rgb_quad;
  193.     echo $bmp_data;
  194.     
  195.     return 1;
  196. }