[GD] Генерация изображений в формате bmp (imagebmp)

В библиотеке GD нет функции для генерации bmp-изображений, поэтому я написал ее сам. В этой функции также есть алгоритм сжатия, который я еще не написал, но этого достаточно. Студенты, которым это нужно, могут посмотреть.

int imagebmp (изображение ресурса [, строковое имя файла [, int $bit [, сжатие int]]] )

$im: ресурс изображения
$filename: Если вы хотите сохранить файл, укажите имя файла. Если оно пустое, оно будет выведено непосредственно в браузере.
$bit: качество изображения (1, 4, 8, 16, 24, 32 бита)
$compression: метод сжатия, 0 означает отсутствие сжатия, 1 использует для сжатия алгоритм сжатия RLE8.

Примечание. Для этой функции по-прежнему требуется поддержка библиотеки GD.

Демо:

$im = imagecreatefrompng("test.png");
изображениеbmp ($ IM);
imagedestroy ($ im);
Источник:

/**
* Создание изображений в формате BMP.
*
* @author: легенда( [email protected] )
* @ссылка: http://www.ugia.cn/?p=96
* @description: создать растровый файл с библиотекой GD
* @версия: 0.1
*
* @param ресурс $im ресурс изображения
* @param string $filename Если вы хотите сохранить в виде файла, укажите имя файла. Если оно пустое, оно будет выведено непосредственно в браузере.
* @param целое число $bit качество изображения (1, 4, 8, 16, 24, 32 бита)
* @param целое число $compression метод сжатия, 0 означает отсутствие сжатия, 1 использует алгоритм сжатия RLE8 для сжатия
*
* @return целое число
*/
функция imagebmp(&$im, $filename = '', $bit = 8, $compression = 0)
{
if (!in_array($bit, array(1, 4, 8, 16, 24, 32)))
{
$бит = 8;
}
иначе if ($bit == 32) // todo:32 бит
{
$бит = 24;
}

$bits = pow(2, $bit);

//Настраиваем цветовую палитру
imagetruecolortopalette($im, true, $bits);
$width = imagesx($im);
$height = imagesy($im);
$colors_num = imagecolorstotal($im);

если ($бит <= 8)
{
// индекс цвета
$rgb_quad = '';
for ($i = 0; $i <$colors_num; $i++)
{
$colors = imagecolorsforindex($im, $i);
$rgb_quad .= chr($colors['blue']) . chr($colors['green']) . chr($colors['red']) "";
}

// растровые данные
$bmp_data = '';

// несжатый
if ($сжатие == 0 || $бит < 8)
{
if (!in_array($bit, array(1, 4, 8)))
{
$бит = 8;
}

$сжатие = 0;

//Количество байтов в каждой строке должно быть кратно 4 и должно быть завершено.
$экстра = '';
$padding = 4 - ceil($width / (8 / $bit)) % 4;
если ($padding % 4 != 0)
{
$extra = str_repeat("", $padding);
}

for ($j = $height - 1; $j >= 0; $j --)
{
$я = 0;
в то время как ($i <$ширина)
{
$бин = 0;
$limit = $width - $i < 8 / $bit ? (8 / $bit - $width + $i) * $bit: 0;

for ($k = 8 - $бит; $k >= $limit; $k -= $бит)
{
$index = imagecolorat($im, $i, $j);
$bin |= $index << $k;
$я++;
}

$bmp_data .= chr($bin);
}

$bmp_data .= $extra;
}
}
// сжатие RLE8
иначе если ($сжатие == 1 && $бит == 8)
{
for ($j = $height - 1; $j >= 0; $j --)
{
$last_index = "";
$same_num = 0;
for ($i = 0; $i <= $width; $i ++)
{
$index = imagecolorat($im, $i, $j);
if ($index !== $last_index || $same_num > 255)
{
если ($same_num!= 0)
{
$bmp_data .= chr($same_num) chr($last_index);
}

$last_index = $index;
$same_num = 1;
}
еще
{
$ тот же_номер++;
}
}

$bmp_data .= "";
}

$bmp_data .= "1";
}

$size_quad = strlen($rgb_quad);
$size_data = strlen($bmp_data);
}
еще
{
//Количество байтов в каждой строке должно быть кратно 4 и должно быть завершено.
$экстра = '';
$padding = 4 - ($width * ($bit / 8)) % 4;
если ($padding % 4 != 0)
{
$extra = str_repeat("", $padding);
}

// растровые данные
$bmp_data = '';

for ($j = $height - 1; $j >= 0; $j --)
{
для ($i = 0; $i <$ширина; $i++)
{
$index = imagecolorat($im, $i, $j);
$colors = imagecolorsforindex($im, $index);

если ($бит == 16)
{
$bin = 0 << $бит;

$bin |= ($colors['red'] >> 3) << 10;
$bin |= ($colors['green'] >> 3) << 5;
$bin |= $colors['blue'] >> 3;

$bmp_data .= пакет("v", $bin);
}
еще
{
$bmp_data .= Pack("c*", $colors['blue'], $colors['green'], $colors['red']);
}

// задача: 32бит;
}

$bmp_data .= $extra;
}

$size_quad = 0;
$size_data = strlen($bmp_data);
$colors_num = 0;
}

// Заголовок растрового файла
$file_header = "BM" .pack("V3", 54 + $size_quad + $size_data, 0, 54 + $size_quad);

// Заголовок информации о растровом изображении
$info_header = Pack("V3v2V*", 0x28, $width, $height, 1, $bit, $compression, $size_data, 0, 0, $colors_num, 0);

// запись в файл
если ($имя_файла != '')
{
$fp = fopen("test.bmp", "wb");

fwrite($fp, $file_header);
fwrite($fp, $info_header);
fwrite($fp, $rgb_quad);
fwrite($fp, $bmp_data);
fclose($fp);

возврат 1;
}

//Вывод браузера
header("Тип контента: изображение/bmp");
эхо $file_header .$info_header;
эхо $rgb_quad;
эхо $bmp_data;

возврат 1;
}
Справочный материал: Анализ формата файла BMP (источник не найден...)

Оригинальная статья, при перепечатке указывайте источник.

Источник: http://www.ugia.cn/?p=96.