GdBmp.php 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473
  1. <?php
  2. /**
  3. * Copyright (c) 2011, oov. All rights reserved.
  4. * Redistribution and use in source and binary forms, with or without modification,
  5. * are permitted provided that the following conditions are met:
  6. * - Redistributions of source code must retain the above copyright notice,
  7. * this list of conditions and the following disclaimer.
  8. * - Redistributions in binary form must reproduce the above copyright notice,
  9. * this list of conditions and the following disclaimer in the documentation
  10. * and/or other materials provided with the distribution.
  11. * - Neither the name of the oov nor the names of its contributors may be used to
  12. * endorse or promote products derived from this software without specific prior
  13. * written permission.
  14. * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
  15. * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  16. * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  17. * IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
  18. * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
  19. * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
  20. * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  21. * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  22. * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  23. * POSSIBILITY OF SUCH DAMAGE.
  24. * bmp ファイルを GD で使えるように
  25. * 使用例:
  26. * //ファイルから読み込む場合はGDでPNGなどを読み込むのと同じような方法で可
  27. * $image = imagecreatefrombmp("test.bmp");
  28. * imagedestroy($image);
  29. * //文字列から読み込む場合は以下の方法で可
  30. * $image = GdBmp::loadFromString(file_get_contents("test.bmp"));
  31. * //自動判定されるので破損ファイルでなければこれでも上手くいく
  32. * //$image = imagecreatefrombmp(file_get_contents("test.bmp"));
  33. * imagedestroy($image);
  34. * //その他任意のストリームからの読み込みも可能
  35. * $stream = fopen("http://127.0.0.1/test.bmp");
  36. * $image = GdBmp::loadFromStream($stream);
  37. * //自動判定されるのでこれでもいい
  38. * //$image = imagecreatefrombmp($stream);
  39. * fclose($stream);
  40. * imagedestroy($image);
  41. * 対応フォーマット
  42. * 1bit
  43. * 4bit
  44. * 4bitRLE
  45. * 8bit
  46. * 8bitRLE
  47. * 16bit(任意のビットフィールド)
  48. * 24bit
  49. * 32bit(任意のビットフィールド)
  50. * BITMAPINFOHEADER の biCompression が BI_PNG / BI_JPEG の画像
  51. * すべての形式でトップダウン/ボトムアップの両方をサポート
  52. * 特殊なビットフィールドでもビットフィールドデータが正常なら読み込み可能
  53. * 以下のものは非対応
  54. * BITMAPV4HEADER と BITMAPV5HEADER に含まれる色空間に関する様々な機能
  55. *
  56. * @param $filename_or_stream_or_binary
  57. *
  58. * @return bool|resource
  59. */
  60. if (!function_exists('imagecreatefrombmp')) {
  61. function imagecreatefrombmp($filename_or_stream_or_binary)
  62. {
  63. return elFinderLibGdBmp::load($filename_or_stream_or_binary);
  64. }
  65. }
  66. class elFinderLibGdBmp
  67. {
  68. public static function load($filename_or_stream_or_binary)
  69. {
  70. if (is_resource($filename_or_stream_or_binary)) {
  71. return self::loadFromStream($filename_or_stream_or_binary);
  72. } else if (is_string($filename_or_stream_or_binary) && strlen($filename_or_stream_or_binary) >= 26) {
  73. $bfh = unpack("vtype/Vsize", $filename_or_stream_or_binary);
  74. if ($bfh["type"] == 0x4d42 && ($bfh["size"] == 0 || $bfh["size"] == strlen($filename_or_stream_or_binary))) {
  75. return self::loadFromString($filename_or_stream_or_binary);
  76. }
  77. }
  78. return self::loadFromFile($filename_or_stream_or_binary);
  79. }
  80. public static function loadFromFile($filename)
  81. {
  82. $fp = fopen($filename, "rb");
  83. if ($fp === false) {
  84. return false;
  85. }
  86. $bmp = self::loadFromStream($fp);
  87. fclose($fp);
  88. return $bmp;
  89. }
  90. public static function loadFromString($str)
  91. {
  92. //data scheme より古いバージョンから対応しているようなので php://memory を使う
  93. $fp = fopen("php://memory", "r+b");
  94. if ($fp === false) {
  95. return false;
  96. }
  97. if (fwrite($fp, $str) != strlen($str)) {
  98. fclose($fp);
  99. return false;
  100. }
  101. if (fseek($fp, 0) === -1) {
  102. fclose($fp);
  103. return false;
  104. }
  105. $bmp = self::loadFromStream($fp);
  106. fclose($fp);
  107. return $bmp;
  108. }
  109. public static function loadFromStream($stream)
  110. {
  111. $buf = fread($stream, 14); //2+4+2+2+4
  112. if ($buf === false) {
  113. return false;
  114. }
  115. //シグネチャチェック
  116. if ($buf[0] != 'B' || $buf[1] != 'M') {
  117. return false;
  118. }
  119. $bitmap_file_header = unpack(
  120. //BITMAPFILEHEADER構造体
  121. "vtype/" .
  122. "Vsize/" .
  123. "vreserved1/" .
  124. "vreserved2/" .
  125. "Voffbits", $buf
  126. );
  127. return self::loadFromStreamAndFileHeader($stream, $bitmap_file_header);
  128. }
  129. public static function loadFromStreamAndFileHeader($stream, array $bitmap_file_header)
  130. {
  131. if ($bitmap_file_header["type"] != 0x4d42) {
  132. return false;
  133. }
  134. //情報ヘッダサイズを元に形式を区別して読み込み
  135. $buf = fread($stream, 4);
  136. if ($buf === false) {
  137. return false;
  138. }
  139. list(, $header_size) = unpack("V", $buf);
  140. if ($header_size == 12) {
  141. $buf = fread($stream, $header_size - 4);
  142. if ($buf === false) {
  143. return false;
  144. }
  145. extract(unpack(
  146. //BITMAPCOREHEADER構造体 - OS/2 Bitmap
  147. "vwidth/" .
  148. "vheight/" .
  149. "vplanes/" .
  150. "vbit_count", $buf
  151. ));
  152. //飛んでこない分は 0 で初期化しておく
  153. $clr_used = $clr_important = $alpha_mask = $compression = 0;
  154. //マスク類は初期化されないのでここで割り当てておく
  155. $red_mask = 0x00ff0000;
  156. $green_mask = 0x0000ff00;
  157. $blue_mask = 0x000000ff;
  158. } else if (124 < $header_size || $header_size < 40) {
  159. //未知の形式
  160. return false;
  161. } else {
  162. //この時点で36バイト読めることまではわかっている
  163. $buf = fread($stream, 36); //既に読んだ部分は除外しつつBITMAPINFOHEADERのサイズだけ読む
  164. if ($buf === false) {
  165. return false;
  166. }
  167. //BITMAPINFOHEADER構造体 - Windows Bitmap
  168. extract(unpack(
  169. "Vwidth/" .
  170. "Vheight/" .
  171. "vplanes/" .
  172. "vbit_count/" .
  173. "Vcompression/" .
  174. "Vsize_image/" .
  175. "Vx_pels_per_meter/" .
  176. "Vy_pels_per_meter/" .
  177. "Vclr_used/" .
  178. "Vclr_important", $buf
  179. ));
  180. /**
  181. * @var integer $width
  182. * @var integer $height
  183. * @var integer $planes
  184. * @var integer $bit_count
  185. * @var integer $compression
  186. * @var integer $size_image
  187. * @var integer $x_pels_per_meter
  188. * @var integer $y_pels_per_meter
  189. * @var integer $clr_used
  190. * @var integer $clr_important
  191. */
  192. //負の整数を受け取る可能性があるものは自前で変換する
  193. if ($width & 0x80000000) {
  194. $width = -(~$width & 0xffffffff) - 1;
  195. }
  196. if ($height & 0x80000000) {
  197. $height = -(~$height & 0xffffffff) - 1;
  198. }
  199. if ($x_pels_per_meter & 0x80000000) {
  200. $x_pels_per_meter = -(~$x_pels_per_meter & 0xffffffff) - 1;
  201. }
  202. if ($y_pels_per_meter & 0x80000000) {
  203. $y_pels_per_meter = -(~$y_pels_per_meter & 0xffffffff) - 1;
  204. }
  205. //ファイルによっては BITMAPINFOHEADER のサイズがおかしい(書き込み間違い?)ケースがある
  206. //自分でファイルサイズを元に逆算することで回避できることもあるので再計算できそうなら正当性を調べる
  207. //シークできないストリームの場合全体のファイルサイズは取得できないので、$bitmap_file_headerにサイズ申告がなければやらない
  208. if ($bitmap_file_header["size"] != 0) {
  209. $colorsize = $bit_count == 1 || $bit_count == 4 || $bit_count == 8 ? ($clr_used ? $clr_used : pow(2, $bit_count)) << 2 : 0;
  210. $bodysize = $size_image ? $size_image : ((($width * $bit_count + 31) >> 3) & ~3) * abs($height);
  211. $calcsize = $bitmap_file_header["size"] - $bodysize - $colorsize - 14;
  212. //本来であれば一致するはずなのに合わない時は、値がおかしくなさそうなら(BITMAPV5HEADERの範囲内なら)計算して求めた値を採用する
  213. if ($header_size < $calcsize && 40 <= $header_size && $header_size <= 124) {
  214. $header_size = $calcsize;
  215. }
  216. }
  217. //BITMAPV4HEADER や BITMAPV5HEADER の場合まだ読むべきデータが残っている可能性がある
  218. if ($header_size - 40 > 0) {
  219. $buf = fread($stream, $header_size - 40);
  220. if ($buf === false) {
  221. return false;
  222. }
  223. extract(unpack(
  224. //BITMAPV4HEADER構造体(Windows95以降)
  225. //BITMAPV5HEADER構造体(Windows98/2000以降)
  226. "Vred_mask/" .
  227. "Vgreen_mask/" .
  228. "Vblue_mask/" .
  229. "Valpha_mask", $buf . str_repeat("\x00", 120)
  230. ));
  231. } else {
  232. $alpha_mask = $red_mask = $green_mask = $blue_mask = 0;
  233. }
  234. //パレットがないがカラーマスクもない時
  235. if (
  236. ($bit_count == 16 || $bit_count == 24 || $bit_count == 32) &&
  237. $compression == 0 &&
  238. $red_mask == 0 && $green_mask == 0 && $blue_mask == 0
  239. ) {
  240. //もしカラーマスクを所持していない場合は
  241. //規定のカラーマスクを適用する
  242. switch ($bit_count) {
  243. case 16:
  244. $red_mask = 0x7c00;
  245. $green_mask = 0x03e0;
  246. $blue_mask = 0x001f;
  247. break;
  248. case 24:
  249. case 32:
  250. $red_mask = 0x00ff0000;
  251. $green_mask = 0x0000ff00;
  252. $blue_mask = 0x000000ff;
  253. break;
  254. }
  255. }
  256. }
  257. if (
  258. ($width == 0) ||
  259. ($height == 0) ||
  260. ($planes != 1) ||
  261. (($alpha_mask & $red_mask) != 0) ||
  262. (($alpha_mask & $green_mask) != 0) ||
  263. (($alpha_mask & $blue_mask) != 0) ||
  264. (($red_mask & $green_mask) != 0) ||
  265. (($red_mask & $blue_mask) != 0) ||
  266. (($green_mask & $blue_mask) != 0)
  267. ) {
  268. //不正な画像
  269. return false;
  270. }
  271. //BI_JPEG と BI_PNG の場合は jpeg/png がそのまま入ってるだけなのでそのまま取り出してデコードする
  272. if ($compression == 4 || $compression == 5) {
  273. $buf = stream_get_contents($stream, $size_image);
  274. if ($buf === false) {
  275. return false;
  276. }
  277. return imagecreatefromstring($buf);
  278. }
  279. //画像本体の読み出し
  280. //1行のバイト数
  281. $line_bytes = (($width * $bit_count + 31) >> 3) & ~3;
  282. //全体の行数
  283. $lines = abs($height);
  284. //y軸進行量(ボトムアップかトップダウンか)
  285. $y = $height > 0 ? $lines - 1 : 0;
  286. $line_step = $height > 0 ? -1 : 1;
  287. //256色以下の画像か?
  288. if ($bit_count == 1 || $bit_count == 4 || $bit_count == 8) {
  289. $img = imagecreate($width, $lines);
  290. //画像データの前にパレットデータがあるのでパレットを作成する
  291. $palette_size = $header_size == 12 ? 3 : 4; //OS/2形式の場合は x に相当する箇所のデータは最初から確保されていない
  292. $colors = $clr_used ? $clr_used : pow(2, $bit_count); //色数
  293. $palette = array();
  294. for ($i = 0; $i < $colors; ++$i) {
  295. $buf = fread($stream, $palette_size);
  296. if ($buf === false) {
  297. imagedestroy($img);
  298. return false;
  299. }
  300. extract(unpack("Cb/Cg/Cr/Cx", $buf . "\x00"));
  301. /**
  302. * @var integer $b
  303. * @var integer $g
  304. * @var integer $r
  305. * @var integer $x
  306. */
  307. $palette[] = imagecolorallocate($img, $r, $g, $b);
  308. }
  309. $shift_base = 8 - $bit_count;
  310. $mask = ((1 << $bit_count) - 1) << $shift_base;
  311. //圧縮されている場合とされていない場合でデコード処理が大きく変わる
  312. if ($compression == 1 || $compression == 2) {
  313. $x = 0;
  314. $qrt_mod2 = $bit_count >> 2 & 1;
  315. for (; ;) {
  316. //もし描写先が範囲外になっている場合デコード処理がおかしくなっているので抜ける
  317. //変なデータが渡されたとしても最悪なケースで255回程度の無駄なので目を瞑る
  318. if ($x < -1 || $x > $width || $y < -1 || $y > $height) {
  319. imagedestroy($img);
  320. return false;
  321. }
  322. $buf = fread($stream, 1);
  323. if ($buf === false) {
  324. imagedestroy($img);
  325. return false;
  326. }
  327. switch ($buf) {
  328. case "\x00":
  329. $buf = fread($stream, 1);
  330. if ($buf === false) {
  331. imagedestroy($img);
  332. return false;
  333. }
  334. switch ($buf) {
  335. case "\x00": //EOL
  336. $y += $line_step;
  337. $x = 0;
  338. break;
  339. case "\x01": //EOB
  340. $y = 0;
  341. $x = 0;
  342. break 3;
  343. case "\x02": //MOV
  344. $buf = fread($stream, 2);
  345. if ($buf === false) {
  346. imagedestroy($img);
  347. return false;
  348. }
  349. list(, $xx, $yy) = unpack("C2", $buf);
  350. $x += $xx;
  351. $y += $yy * $line_step;
  352. break;
  353. default: //ABS
  354. list(, $pixels) = unpack("C", $buf);
  355. $bytes = ($pixels >> $qrt_mod2) + ($pixels & $qrt_mod2);
  356. $buf = fread($stream, ($bytes + 1) & ~1);
  357. if ($buf === false) {
  358. imagedestroy($img);
  359. return false;
  360. }
  361. for ($i = 0, $pos = 0; $i < $pixels; ++$i, ++$x, $pos += $bit_count) {
  362. list(, $c) = unpack("C", $buf[$pos >> 3]);
  363. $b = $pos & 0x07;
  364. imagesetpixel($img, $x, $y, $palette[($c & ($mask >> $b)) >> ($shift_base - $b)]);
  365. }
  366. break;
  367. }
  368. break;
  369. default:
  370. $buf2 = fread($stream, 1);
  371. if ($buf2 === false) {
  372. imagedestroy($img);
  373. return false;
  374. }
  375. list(, $size, $c) = unpack("C2", $buf . $buf2);
  376. for ($i = 0, $pos = 0; $i < $size; ++$i, ++$x, $pos += $bit_count) {
  377. $b = $pos & 0x07;
  378. imagesetpixel($img, $x, $y, $palette[($c & ($mask >> $b)) >> ($shift_base - $b)]);
  379. }
  380. break;
  381. }
  382. }
  383. } else {
  384. for ($line = 0; $line < $lines; ++$line, $y += $line_step) {
  385. $buf = fread($stream, $line_bytes);
  386. if ($buf === false) {
  387. imagedestroy($img);
  388. return false;
  389. }
  390. $pos = 0;
  391. for ($x = 0; $x < $width; ++$x, $pos += $bit_count) {
  392. list(, $c) = unpack("C", $buf[$pos >> 3]);
  393. $b = $pos & 0x7;
  394. imagesetpixel($img, $x, $y, $palette[($c & ($mask >> $b)) >> ($shift_base - $b)]);
  395. }
  396. }
  397. }
  398. } else {
  399. $img = imagecreatetruecolor($width, $lines);
  400. imagealphablending($img, false);
  401. if ($alpha_mask) {
  402. //αデータがあるので透過情報も保存できるように
  403. imagesavealpha($img, true);
  404. }
  405. //x軸進行量
  406. $pixel_step = $bit_count >> 3;
  407. $alpha_max = $alpha_mask ? 0x7f : 0x00;
  408. $alpha_mask_r = $alpha_mask ? 1 / $alpha_mask : 1;
  409. $red_mask_r = $red_mask ? 1 / $red_mask : 1;
  410. $green_mask_r = $green_mask ? 1 / $green_mask : 1;
  411. $blue_mask_r = $blue_mask ? 1 / $blue_mask : 1;
  412. for ($line = 0; $line < $lines; ++$line, $y += $line_step) {
  413. $buf = fread($stream, $line_bytes);
  414. if ($buf === false) {
  415. imagedestroy($img);
  416. return false;
  417. }
  418. $pos = 0;
  419. for ($x = 0; $x < $width; ++$x, $pos += $pixel_step) {
  420. list(, $c) = unpack("V", substr($buf, $pos, $pixel_step) . "\x00\x00");
  421. $a_masked = $c & $alpha_mask;
  422. $r_masked = $c & $red_mask;
  423. $g_masked = $c & $green_mask;
  424. $b_masked = $c & $blue_mask;
  425. $a = $alpha_max - ((($a_masked << 7) - $a_masked) * $alpha_mask_r);
  426. $r = (($r_masked << 8) - $r_masked) * $red_mask_r;
  427. $g = (($g_masked << 8) - $g_masked) * $green_mask_r;
  428. $b = (($b_masked << 8) - $b_masked) * $blue_mask_r;
  429. imagesetpixel($img, $x, $y, ($a << 24) | ($r << 16) | ($g << 8) | $b);
  430. }
  431. }
  432. imagealphablending($img, true); //デフォルト値に戻しておく
  433. }
  434. return $img;
  435. }
  436. }