[GD] Menghasilkan gambar dalam format bmp (imagebmp)

Tidak ada fungsi untuk menghasilkan gambar bmp di perpustakaan GD, jadi saya menulisnya sendiri. Fungsi ini juga memiliki algoritma kompresi yang belum saya tulis, tetapi sudah cukup. Siswa yang membutuhkannya dapat melihatnya.

int imagebmp (gambar sumber daya [, nama file string [, int $bit [, kompresi int]]] )

$im: sumber daya gambar
$filename: Jika ingin menyimpan sebagai file, silakan tentukan nama file. Jika kosong, maka akan langsung ditampilkan di browser.
$bit: kualitas gambar (1, 4, 8, 16, 24, 32 bit)
$kompresi: metode kompresi, 0 berarti tidak ada kompresi, 1 menggunakan algoritma kompresi RLE8 untuk kompresi.

Catatan: Fungsi ini masih memerlukan dukungan perpustakaan GD.

Demo:

$im = imagecreatefrompng("test.png");
gambarbmp($im);
penghancuran gambar($im);
Sumber:

/**
* Buat gambar format bmp
*
* @penulis: legenda( [email protected] )
* @tautan: http://www.ugia.cn/?p=96
* @deskripsi: buat File Bitmap dengan perpustakaan GD
* @versi: 0.1
*
* @param sumber daya $im sumber daya gambar
* @param string $filename Jika ingin menyimpan sebagai file, silakan tentukan nama file. Jika kosong, maka akan langsung ditampilkan di browser.
* @param integer $bit kualitas gambar (1, 4, 8, 16, 24, 32 bit)
* @param integer $ metode kompresi kompresi, 0 berarti tidak ada kompresi, 1 menggunakan algoritma kompresi RLE8 untuk kompresi
*
* @mengembalikan bilangan bulat
*/
fungsi imagebmp(&$im, $namafile = '', $bit = 8, $kompresi = 0)
{
jika (!in_array($bit, array(1, 4, 8, 16, 24, 32)))
{
$bit = 8;
}
else if ($bit == 32) // tugas:32 bit
{
$bit = 24;
}

$bit = kekuatan(2, $bit);

//Sesuaikan palet warna
imagetruecolortopalette($im, true, $bit);
$lebar = gambarx($im);
$tinggi = gambar($im);
$warna_angka = gambarwarnatotal($im);

jika ($bit <= 8)
{
// indeks warna
$rgb_quad = '';
untuk ($i = 0; $i < $warna_num; $i ++)
{
$warna = gambarwarnaforindex($im, $i);
$rgb_quad .= chr($warna['biru']) .chr($warna['hijau']) .
}

// data bitmap
$bmp_data = '';

// tidak terkompresi
if ($kompresi == 0 || $bit < 8)
{
jika (!in_array($bit, array(1, 4, 8)))
{
$bit = 8;
}

$kompresi = 0;

//Jumlah byte pada setiap baris harus kelipatan 4 dan harus diisi.
$ekstra = '';
$padding = 4 - ceil($lebar / (8 / $bit)) % 4;
jika ($padding % 4 != 0)
{
$ekstra = str_repeat("", $padding);
}

untuk ($j = $tinggi - 1; $j >= 0; $j --)
{
$i = 0;
sementara ($i < $lebar)
{
$bin = 0;
$batas = $lebar - $i < 8 / $bit ? (8 / $bit - $lebar + $i) * $bit : 0;

untuk ($k = 8 - $bit; $k >= $batas; $k -= $bit)
{
$index = gambarwarna($im, $i, $j);
$bin |= $indeks << $k;
$i++;
}

$bmp_data .= chr($bin);
}

$bmp_data .= $ekstra;
}
}
// kompresi RLE8
else if ($kompresi == 1 && $bit == 8)
{
untuk ($j = $tinggi - 1; $j >= 0; $j --)
{
$last_index = "";
$angka_sama = 0;
untuk ($i = 0; $i <= $lebar; $i ++)
{
$index = gambarwarna($im, $i, $j);
if ($index !== $last_index || $same_num > 255)
{
jika ($bilangan_sama != 0)
{
$bmp_data .= chr($jumlah_sama) .chr($indeks_terakhir);
}

$indeks_terakhir = $indeks;
$angka_sama = 1;
}
kalau tidak
{
$jumlah_sama++;
}
}

$bmp_data .= "";
}

$bmp_data .= "1";
}

$size_quad = strlen($rgb_quad);
$ukuran_data = strlen($bmp_data);
}
kalau tidak
{
//Jumlah byte pada setiap baris harus kelipatan 4 dan harus diisi.
$ekstra = '';
$padding = 4 - ($lebar * ($bit / 8)) % 4;
jika ($padding % 4 != 0)
{
$ekstra = str_repeat("", $padding);
}

// data bitmap
$bmp_data = '';

untuk ($j = $tinggi - 1; $j >= 0; $j --)
{
untuk ($i = 0; $i < $lebar; $i ++)
{
$index = gambarwarna($im, $i, $j);
$warna = gambarwarnaforindex($im, $index);

jika ($sedikit == 16)
{
$bin = 0 << $bit;

$bin |= ($warna['merah'] >> 3) << 10;
$bin |= ($warna['hijau'] >> 3) << 5;
$bin |= $warna['biru'] >> 3;

$bmp_data .= paket("v", $bin);
}
kalau tidak
{
$bmp_data .= paket("c*", $warna['biru'], $warna['hijau'], $warna['merah']);
}

// tugas: 32bit;
}

$bmp_data .= $ekstra;
}

$ukuran_kuad = 0;
$ukuran_data = strlen($bmp_data);
$warna_angka = 0;
}

// Tajuk berkas bitmap
$file_header = "BM" .paket("V3", 54 + $ukuran_kuad + $ukuran_data, 0, 54 + $ukuran_kuad);

// Tajuk informasi bitmap
$info_header = paket("V3v2V*", 0x28, $lebar, $tinggi, 1, $bit, $kompresi, $ukuran_data, 0, 0, $warna_num, 0);

// menulis ke file
if ($nama file != '')
{
$fp = fopen("test.bmp", "wb");

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

kembali 1;
}

//Keluaran peramban
header("Tipe Konten: gambar/bmp");
gema $file_header .$info_header;
gema $rgb_quad;
gema $bmp_data;

kembali 1;
}
Bahan referensi: Analisis format file BMP (sumber tidak ditemukan...)

Artikel asli, harap sebutkan sumbernya saat mencetak ulang.

Sumber: http://www.ugia.cn/?p=96