GdBmp.php 15 KB

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