123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473 |
- <?php
- if (!function_exists('imagecreatefrombmp')) {
- function imagecreatefrombmp($filename_or_stream_or_binary)
- {
- return elFinderLibGdBmp::load($filename_or_stream_or_binary);
- }
- }
- class elFinderLibGdBmp
- {
- public static function load($filename_or_stream_or_binary)
- {
- if (is_resource($filename_or_stream_or_binary)) {
- return self::loadFromStream($filename_or_stream_or_binary);
- } else if (is_string($filename_or_stream_or_binary) && strlen($filename_or_stream_or_binary) >= 26) {
- $bfh = unpack("vtype/Vsize", $filename_or_stream_or_binary);
- if ($bfh["type"] == 0x4d42 && ($bfh["size"] == 0 || $bfh["size"] == strlen($filename_or_stream_or_binary))) {
- return self::loadFromString($filename_or_stream_or_binary);
- }
- }
- return self::loadFromFile($filename_or_stream_or_binary);
- }
- public static function loadFromFile($filename)
- {
- $fp = fopen($filename, "rb");
- if ($fp === false) {
- return false;
- }
- $bmp = self::loadFromStream($fp);
- fclose($fp);
- return $bmp;
- }
- public static function loadFromString($str)
- {
-
- $fp = fopen("php://memory", "r+b");
- if ($fp === false) {
- return false;
- }
- if (fwrite($fp, $str) != strlen($str)) {
- fclose($fp);
- return false;
- }
- if (fseek($fp, 0) === -1) {
- fclose($fp);
- return false;
- }
- $bmp = self::loadFromStream($fp);
- fclose($fp);
- return $bmp;
- }
- public static function loadFromStream($stream)
- {
- $buf = fread($stream, 14);
- if ($buf === false) {
- return false;
- }
-
- if ($buf[0] != 'B' || $buf[1] != 'M') {
- return false;
- }
- $bitmap_file_header = unpack(
-
- "vtype/" .
- "Vsize/" .
- "vreserved1/" .
- "vreserved2/" .
- "Voffbits", $buf
- );
- return self::loadFromStreamAndFileHeader($stream, $bitmap_file_header);
- }
- public static function loadFromStreamAndFileHeader($stream, array $bitmap_file_header)
- {
- if ($bitmap_file_header["type"] != 0x4d42) {
- return false;
- }
-
- $buf = fread($stream, 4);
- if ($buf === false) {
- return false;
- }
- list(, $header_size) = unpack("V", $buf);
- if ($header_size == 12) {
- $buf = fread($stream, $header_size - 4);
- if ($buf === false) {
- return false;
- }
- extract(unpack(
-
- "vwidth/" .
- "vheight/" .
- "vplanes/" .
- "vbit_count", $buf
- ));
-
- $clr_used = $clr_important = $alpha_mask = $compression = 0;
-
- $red_mask = 0x00ff0000;
- $green_mask = 0x0000ff00;
- $blue_mask = 0x000000ff;
- } else if (124 < $header_size || $header_size < 40) {
-
- return false;
- } else {
-
- $buf = fread($stream, 36);
- if ($buf === false) {
- return false;
- }
-
- extract(unpack(
- "Vwidth/" .
- "Vheight/" .
- "vplanes/" .
- "vbit_count/" .
- "Vcompression/" .
- "Vsize_image/" .
- "Vx_pels_per_meter/" .
- "Vy_pels_per_meter/" .
- "Vclr_used/" .
- "Vclr_important", $buf
- ));
-
-
- if ($width & 0x80000000) {
- $width = -(~$width & 0xffffffff) - 1;
- }
- if ($height & 0x80000000) {
- $height = -(~$height & 0xffffffff) - 1;
- }
- if ($x_pels_per_meter & 0x80000000) {
- $x_pels_per_meter = -(~$x_pels_per_meter & 0xffffffff) - 1;
- }
- if ($y_pels_per_meter & 0x80000000) {
- $y_pels_per_meter = -(~$y_pels_per_meter & 0xffffffff) - 1;
- }
-
-
-
- if ($bitmap_file_header["size"] != 0) {
- $colorsize = $bit_count == 1 || $bit_count == 4 || $bit_count == 8 ? ($clr_used ? $clr_used : pow(2, $bit_count)) << 2 : 0;
- $bodysize = $size_image ? $size_image : ((($width * $bit_count + 31) >> 3) & ~3) * abs($height);
- $calcsize = $bitmap_file_header["size"] - $bodysize - $colorsize - 14;
-
- if ($header_size < $calcsize && 40 <= $header_size && $header_size <= 124) {
- $header_size = $calcsize;
- }
- }
-
- if ($header_size - 40 > 0) {
- $buf = fread($stream, $header_size - 40);
- if ($buf === false) {
- return false;
- }
- extract(unpack(
-
-
- "Vred_mask/" .
- "Vgreen_mask/" .
- "Vblue_mask/" .
- "Valpha_mask", $buf . str_repeat("\x00", 120)
- ));
- } else {
- $alpha_mask = $red_mask = $green_mask = $blue_mask = 0;
- }
-
- if (
- ($bit_count == 16 || $bit_count == 24 || $bit_count == 32) &&
- $compression == 0 &&
- $red_mask == 0 && $green_mask == 0 && $blue_mask == 0
- ) {
-
-
- switch ($bit_count) {
- case 16:
- $red_mask = 0x7c00;
- $green_mask = 0x03e0;
- $blue_mask = 0x001f;
- break;
- case 24:
- case 32:
- $red_mask = 0x00ff0000;
- $green_mask = 0x0000ff00;
- $blue_mask = 0x000000ff;
- break;
- }
- }
- }
- if (
- ($width == 0) ||
- ($height == 0) ||
- ($planes != 1) ||
- (($alpha_mask & $red_mask) != 0) ||
- (($alpha_mask & $green_mask) != 0) ||
- (($alpha_mask & $blue_mask) != 0) ||
- (($red_mask & $green_mask) != 0) ||
- (($red_mask & $blue_mask) != 0) ||
- (($green_mask & $blue_mask) != 0)
- ) {
-
- return false;
- }
-
- if ($compression == 4 || $compression == 5) {
- $buf = stream_get_contents($stream, $size_image);
- if ($buf === false) {
- return false;
- }
- return imagecreatefromstring($buf);
- }
-
-
- $line_bytes = (($width * $bit_count + 31) >> 3) & ~3;
-
- $lines = abs($height);
-
- $y = $height > 0 ? $lines - 1 : 0;
- $line_step = $height > 0 ? -1 : 1;
-
- if ($bit_count == 1 || $bit_count == 4 || $bit_count == 8) {
- $img = imagecreate($width, $lines);
-
- $palette_size = $header_size == 12 ? 3 : 4;
- $colors = $clr_used ? $clr_used : pow(2, $bit_count);
- $palette = array();
- for ($i = 0; $i < $colors; ++$i) {
- $buf = fread($stream, $palette_size);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- extract(unpack("Cb/Cg/Cr/Cx", $buf . "\x00"));
-
- $palette[] = imagecolorallocate($img, $r, $g, $b);
- }
- $shift_base = 8 - $bit_count;
- $mask = ((1 << $bit_count) - 1) << $shift_base;
-
- if ($compression == 1 || $compression == 2) {
- $x = 0;
- $qrt_mod2 = $bit_count >> 2 & 1;
- for (; ;) {
-
-
- if ($x < -1 || $x > $width || $y < -1 || $y > $height) {
- imagedestroy($img);
- return false;
- }
- $buf = fread($stream, 1);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- switch ($buf) {
- case "\x00":
- $buf = fread($stream, 1);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- switch ($buf) {
- case "\x00":
- $y += $line_step;
- $x = 0;
- break;
- case "\x01":
- $y = 0;
- $x = 0;
- break 3;
- case "\x02":
- $buf = fread($stream, 2);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- list(, $xx, $yy) = unpack("C2", $buf);
- $x += $xx;
- $y += $yy * $line_step;
- break;
- default:
- list(, $pixels) = unpack("C", $buf);
- $bytes = ($pixels >> $qrt_mod2) + ($pixels & $qrt_mod2);
- $buf = fread($stream, ($bytes + 1) & ~1);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- for ($i = 0, $pos = 0; $i < $pixels; ++$i, ++$x, $pos += $bit_count) {
- list(, $c) = unpack("C", $buf[$pos >> 3]);
- $b = $pos & 0x07;
- imagesetpixel($img, $x, $y, $palette[($c & ($mask >> $b)) >> ($shift_base - $b)]);
- }
- break;
- }
- break;
- default:
- $buf2 = fread($stream, 1);
- if ($buf2 === false) {
- imagedestroy($img);
- return false;
- }
- list(, $size, $c) = unpack("C2", $buf . $buf2);
- for ($i = 0, $pos = 0; $i < $size; ++$i, ++$x, $pos += $bit_count) {
- $b = $pos & 0x07;
- imagesetpixel($img, $x, $y, $palette[($c & ($mask >> $b)) >> ($shift_base - $b)]);
- }
- break;
- }
- }
- } else {
- for ($line = 0; $line < $lines; ++$line, $y += $line_step) {
- $buf = fread($stream, $line_bytes);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- $pos = 0;
- for ($x = 0; $x < $width; ++$x, $pos += $bit_count) {
- list(, $c) = unpack("C", $buf[$pos >> 3]);
- $b = $pos & 0x7;
- imagesetpixel($img, $x, $y, $palette[($c & ($mask >> $b)) >> ($shift_base - $b)]);
- }
- }
- }
- } else {
- $img = imagecreatetruecolor($width, $lines);
- imagealphablending($img, false);
- if ($alpha_mask) {
-
- imagesavealpha($img, true);
- }
-
- $pixel_step = $bit_count >> 3;
- $alpha_max = $alpha_mask ? 0x7f : 0x00;
- $alpha_mask_r = $alpha_mask ? 1 / $alpha_mask : 1;
- $red_mask_r = $red_mask ? 1 / $red_mask : 1;
- $green_mask_r = $green_mask ? 1 / $green_mask : 1;
- $blue_mask_r = $blue_mask ? 1 / $blue_mask : 1;
- for ($line = 0; $line < $lines; ++$line, $y += $line_step) {
- $buf = fread($stream, $line_bytes);
- if ($buf === false) {
- imagedestroy($img);
- return false;
- }
- $pos = 0;
- for ($x = 0; $x < $width; ++$x, $pos += $pixel_step) {
- list(, $c) = unpack("V", substr($buf, $pos, $pixel_step) . "\x00\x00");
- $a_masked = $c & $alpha_mask;
- $r_masked = $c & $red_mask;
- $g_masked = $c & $green_mask;
- $b_masked = $c & $blue_mask;
- $a = $alpha_max - ((($a_masked << 7) - $a_masked) * $alpha_mask_r);
- $r = (($r_masked << 8) - $r_masked) * $red_mask_r;
- $g = (($g_masked << 8) - $g_masked) * $green_mask_r;
- $b = (($b_masked << 8) - $b_masked) * $blue_mask_r;
- imagesetpixel($img, $x, $y, ($a << 24) | ($r << 16) | ($g << 8) | $b);
- }
- }
- imagealphablending($img, true);
- }
- return $img;
- }
- }
|