You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

928 lines
31KB

  1. /*
  2. * LCL (LossLess Codec Library) Codec
  3. * Copyright (c) 2002-2004 Roberto Togni
  4. *
  5. * This file is part of FFmpeg.
  6. *
  7. * FFmpeg is free software; you can redistribute it and/or
  8. * modify it under the terms of the GNU Lesser General Public
  9. * License as published by the Free Software Foundation; either
  10. * version 2.1 of the License, or (at your option) any later version.
  11. *
  12. * FFmpeg is distributed in the hope that it will be useful,
  13. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  15. * Lesser General Public License for more details.
  16. *
  17. * You should have received a copy of the GNU Lesser General Public
  18. * License along with FFmpeg; if not, write to the Free Software
  19. * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20. *
  21. */
  22. /**
  23. * @file lcl.c
  24. * LCL (LossLess Codec Library) Video Codec
  25. * Decoder for MSZH and ZLIB codecs
  26. * Experimental encoder for ZLIB RGB24
  27. *
  28. * Fourcc: MSZH, ZLIB
  29. *
  30. * Original Win32 dll:
  31. * Ver2.23 By Kenji Oshima 2000.09.20
  32. * avimszh.dll, avizlib.dll
  33. *
  34. * A description of the decoding algorithm can be found here:
  35. * http://www.pcisys.net/~melanson/codecs
  36. *
  37. * Supports: BGR24 (RGB 24bpp)
  38. *
  39. */
  40. #include <stdio.h>
  41. #include <stdlib.h>
  42. #include "common.h"
  43. #include "bitstream.h"
  44. #include "avcodec.h"
  45. #ifdef CONFIG_ZLIB
  46. #include <zlib.h>
  47. #endif
  48. #define BMPTYPE_YUV 1
  49. #define BMPTYPE_RGB 2
  50. #define IMGTYPE_YUV111 0
  51. #define IMGTYPE_YUV422 1
  52. #define IMGTYPE_RGB24 2
  53. #define IMGTYPE_YUV411 3
  54. #define IMGTYPE_YUV211 4
  55. #define IMGTYPE_YUV420 5
  56. #define COMP_MSZH 0
  57. #define COMP_MSZH_NOCOMP 1
  58. #define COMP_ZLIB_HISPEED 1
  59. #define COMP_ZLIB_HICOMP 9
  60. #define COMP_ZLIB_NORMAL -1
  61. #define FLAG_MULTITHREAD 1
  62. #define FLAG_NULLFRAME 2
  63. #define FLAG_PNGFILTER 4
  64. #define FLAGMASK_UNUSED 0xf8
  65. #define CODEC_MSZH 1
  66. #define CODEC_ZLIB 3
  67. #define FOURCC_MSZH mmioFOURCC('M','S','Z','H')
  68. #define FOURCC_ZLIB mmioFOURCC('Z','L','I','B')
  69. /*
  70. * Decoder context
  71. */
  72. typedef struct LclContext {
  73. AVCodecContext *avctx;
  74. AVFrame pic;
  75. PutBitContext pb;
  76. // Image type
  77. int imgtype;
  78. // Compression type
  79. int compression;
  80. // Flags
  81. int flags;
  82. // Decompressed data size
  83. unsigned int decomp_size;
  84. // Decompression buffer
  85. unsigned char* decomp_buf;
  86. // Maximum compressed data size
  87. unsigned int max_comp_size;
  88. // Compression buffer
  89. unsigned char* comp_buf;
  90. #ifdef CONFIG_ZLIB
  91. z_stream zstream;
  92. #endif
  93. } LclContext;
  94. /*
  95. *
  96. * Helper functions
  97. *
  98. */
  99. static inline unsigned char fix (int pix14)
  100. {
  101. int tmp;
  102. tmp = (pix14 + 0x80000) >> 20;
  103. if (tmp < 0)
  104. return 0;
  105. if (tmp > 255)
  106. return 255;
  107. return tmp;
  108. }
  109. static inline unsigned char get_b (unsigned char yq, signed char bq)
  110. {
  111. return fix((yq << 20) + bq * 1858076);
  112. }
  113. static inline unsigned char get_g (unsigned char yq, signed char bq, signed char rq)
  114. {
  115. return fix((yq << 20) - bq * 360857 - rq * 748830);
  116. }
  117. static inline unsigned char get_r (unsigned char yq, signed char rq)
  118. {
  119. return fix((yq << 20) + rq * 1470103);
  120. }
  121. static unsigned int mszh_decomp(unsigned char * srcptr, int srclen, unsigned char * destptr, unsigned int destsize)
  122. {
  123. unsigned char *destptr_bak = destptr;
  124. unsigned char *destptr_end = destptr + destsize;
  125. unsigned char mask = 0;
  126. unsigned char maskbit = 0;
  127. unsigned int ofs, cnt;
  128. while ((srclen > 0) && (destptr < destptr_end)) {
  129. if (maskbit == 0) {
  130. mask = *(srcptr++);
  131. maskbit = 8;
  132. srclen--;
  133. continue;
  134. }
  135. if ((mask & (1 << (--maskbit))) == 0) {
  136. if (destptr + 4 > destptr_end)
  137. break;
  138. *(int*)destptr = *(int*)srcptr;
  139. srclen -= 4;
  140. destptr += 4;
  141. srcptr += 4;
  142. } else {
  143. ofs = *(srcptr++);
  144. cnt = *(srcptr++);
  145. ofs += cnt * 256;;
  146. cnt = ((cnt >> 3) & 0x1f) + 1;
  147. ofs &= 0x7ff;
  148. srclen -= 2;
  149. cnt *= 4;
  150. if (destptr + cnt > destptr_end) {
  151. cnt = destptr_end - destptr;
  152. }
  153. for (; cnt > 0; cnt--) {
  154. *(destptr) = *(destptr - ofs);
  155. destptr++;
  156. }
  157. }
  158. }
  159. return (destptr - destptr_bak);
  160. }
  161. #ifdef CONFIG_DECODERS
  162. /*
  163. *
  164. * Decode a frame
  165. *
  166. */
  167. static int decode_frame(AVCodecContext *avctx, void *data, int *data_size, uint8_t *buf, int buf_size)
  168. {
  169. LclContext * const c = avctx->priv_data;
  170. unsigned char *encoded = (unsigned char *)buf;
  171. unsigned int pixel_ptr;
  172. int row, col;
  173. unsigned char *outptr;
  174. unsigned int width = avctx->width; // Real image width
  175. unsigned int height = avctx->height; // Real image height
  176. unsigned int mszh_dlen;
  177. unsigned char yq, y1q, uq, vq;
  178. int uqvq;
  179. unsigned int mthread_inlen, mthread_outlen;
  180. #ifdef CONFIG_ZLIB
  181. int zret; // Zlib return code
  182. #endif
  183. unsigned int len = buf_size;
  184. if(c->pic.data[0])
  185. avctx->release_buffer(avctx, &c->pic);
  186. c->pic.reference = 0;
  187. c->pic.buffer_hints = FF_BUFFER_HINTS_VALID;
  188. if(avctx->get_buffer(avctx, &c->pic) < 0){
  189. av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
  190. return -1;
  191. }
  192. outptr = c->pic.data[0]; // Output image pointer
  193. /* Decompress frame */
  194. switch (avctx->codec_id) {
  195. case CODEC_ID_MSZH:
  196. switch (c->compression) {
  197. case COMP_MSZH:
  198. if (c->flags & FLAG_MULTITHREAD) {
  199. mthread_inlen = *((unsigned int*)encoded);
  200. mthread_outlen = *((unsigned int*)(encoded+4));
  201. if (mthread_outlen > c->decomp_size) // this should not happen
  202. mthread_outlen = c->decomp_size;
  203. mszh_dlen = mszh_decomp(encoded + 8, mthread_inlen, c->decomp_buf, c->decomp_size);
  204. if (mthread_outlen != mszh_dlen) {
  205. av_log(avctx, AV_LOG_ERROR, "Mthread1 decoded size differs (%d != %d)\n",
  206. mthread_outlen, mszh_dlen);
  207. return -1;
  208. }
  209. mszh_dlen = mszh_decomp(encoded + 8 + mthread_inlen, len - mthread_inlen,
  210. c->decomp_buf + mthread_outlen, c->decomp_size - mthread_outlen);
  211. if (mthread_outlen != mszh_dlen) {
  212. av_log(avctx, AV_LOG_ERROR, "Mthread2 decoded size differs (%d != %d)\n",
  213. mthread_outlen, mszh_dlen);
  214. return -1;
  215. }
  216. encoded = c->decomp_buf;
  217. len = c->decomp_size;
  218. } else {
  219. mszh_dlen = mszh_decomp(encoded, len, c->decomp_buf, c->decomp_size);
  220. if (c->decomp_size != mszh_dlen) {
  221. av_log(avctx, AV_LOG_ERROR, "Decoded size differs (%d != %d)\n",
  222. c->decomp_size, mszh_dlen);
  223. return -1;
  224. }
  225. encoded = c->decomp_buf;
  226. len = mszh_dlen;
  227. }
  228. break;
  229. case COMP_MSZH_NOCOMP:
  230. break;
  231. default:
  232. av_log(avctx, AV_LOG_ERROR, "BUG! Unknown MSZH compression in frame decoder.\n");
  233. return -1;
  234. }
  235. break;
  236. case CODEC_ID_ZLIB:
  237. #ifdef CONFIG_ZLIB
  238. /* Using the original dll with normal compression (-1) and RGB format
  239. * gives a file with ZLIB fourcc, but frame is really uncompressed.
  240. * To be sure that's true check also frame size */
  241. if ((c->compression == COMP_ZLIB_NORMAL) && (c->imgtype == IMGTYPE_RGB24) &&
  242. (len == width * height * 3))
  243. break;
  244. zret = inflateReset(&(c->zstream));
  245. if (zret != Z_OK) {
  246. av_log(avctx, AV_LOG_ERROR, "Inflate reset error: %d\n", zret);
  247. return -1;
  248. }
  249. if (c->flags & FLAG_MULTITHREAD) {
  250. mthread_inlen = *((unsigned int*)encoded);
  251. mthread_outlen = *((unsigned int*)(encoded+4));
  252. if (mthread_outlen > c->decomp_size)
  253. mthread_outlen = c->decomp_size;
  254. c->zstream.next_in = encoded + 8;
  255. c->zstream.avail_in = mthread_inlen;
  256. c->zstream.next_out = c->decomp_buf;
  257. c->zstream.avail_out = c->decomp_size;
  258. zret = inflate(&(c->zstream), Z_FINISH);
  259. if ((zret != Z_OK) && (zret != Z_STREAM_END)) {
  260. av_log(avctx, AV_LOG_ERROR, "Mthread1 inflate error: %d\n", zret);
  261. return -1;
  262. }
  263. if (mthread_outlen != (unsigned int)(c->zstream.total_out)) {
  264. av_log(avctx, AV_LOG_ERROR, "Mthread1 decoded size differs (%u != %lu)\n",
  265. mthread_outlen, c->zstream.total_out);
  266. return -1;
  267. }
  268. zret = inflateReset(&(c->zstream));
  269. if (zret != Z_OK) {
  270. av_log(avctx, AV_LOG_ERROR, "Mthread2 inflate reset error: %d\n", zret);
  271. return -1;
  272. }
  273. c->zstream.next_in = encoded + 8 + mthread_inlen;
  274. c->zstream.avail_in = len - mthread_inlen;
  275. c->zstream.next_out = c->decomp_buf + mthread_outlen;
  276. c->zstream.avail_out = c->decomp_size - mthread_outlen;
  277. zret = inflate(&(c->zstream), Z_FINISH);
  278. if ((zret != Z_OK) && (zret != Z_STREAM_END)) {
  279. av_log(avctx, AV_LOG_ERROR, "Mthread2 inflate error: %d\n", zret);
  280. return -1;
  281. }
  282. if (mthread_outlen != (unsigned int)(c->zstream.total_out)) {
  283. av_log(avctx, AV_LOG_ERROR, "Mthread2 decoded size differs (%d != %lu)\n",
  284. mthread_outlen, c->zstream.total_out);
  285. return -1;
  286. }
  287. } else {
  288. c->zstream.next_in = encoded;
  289. c->zstream.avail_in = len;
  290. c->zstream.next_out = c->decomp_buf;
  291. c->zstream.avail_out = c->decomp_size;
  292. zret = inflate(&(c->zstream), Z_FINISH);
  293. if ((zret != Z_OK) && (zret != Z_STREAM_END)) {
  294. av_log(avctx, AV_LOG_ERROR, "Inflate error: %d\n", zret);
  295. return -1;
  296. }
  297. if (c->decomp_size != (unsigned int)(c->zstream.total_out)) {
  298. av_log(avctx, AV_LOG_ERROR, "Decoded size differs (%d != %lu)\n",
  299. c->decomp_size, c->zstream.total_out);
  300. return -1;
  301. }
  302. }
  303. encoded = c->decomp_buf;
  304. len = c->decomp_size;;
  305. #else
  306. av_log(avctx, AV_LOG_ERROR, "BUG! Zlib support not compiled in frame decoder.\n");
  307. return -1;
  308. #endif
  309. break;
  310. default:
  311. av_log(avctx, AV_LOG_ERROR, "BUG! Unknown codec in frame decoder compression switch.\n");
  312. return -1;
  313. }
  314. /* Apply PNG filter */
  315. if ((avctx->codec_id == CODEC_ID_ZLIB) && (c->flags & FLAG_PNGFILTER)) {
  316. switch (c->imgtype) {
  317. case IMGTYPE_YUV111:
  318. case IMGTYPE_RGB24:
  319. for (row = 0; row < height; row++) {
  320. pixel_ptr = row * width * 3;
  321. yq = encoded[pixel_ptr++];
  322. uqvq = encoded[pixel_ptr++];
  323. uqvq+=(encoded[pixel_ptr++] << 8);
  324. for (col = 1; col < width; col++) {
  325. encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
  326. uqvq -= (encoded[pixel_ptr+1] | (encoded[pixel_ptr+2]<<8));
  327. encoded[pixel_ptr+1] = (uqvq) & 0xff;
  328. encoded[pixel_ptr+2] = ((uqvq)>>8) & 0xff;
  329. pixel_ptr += 3;
  330. }
  331. }
  332. break;
  333. case IMGTYPE_YUV422:
  334. for (row = 0; row < height; row++) {
  335. pixel_ptr = row * width * 2;
  336. yq = uq = vq =0;
  337. for (col = 0; col < width/4; col++) {
  338. encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
  339. encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
  340. encoded[pixel_ptr+2] = yq -= encoded[pixel_ptr+2];
  341. encoded[pixel_ptr+3] = yq -= encoded[pixel_ptr+3];
  342. encoded[pixel_ptr+4] = uq -= encoded[pixel_ptr+4];
  343. encoded[pixel_ptr+5] = uq -= encoded[pixel_ptr+5];
  344. encoded[pixel_ptr+6] = vq -= encoded[pixel_ptr+6];
  345. encoded[pixel_ptr+7] = vq -= encoded[pixel_ptr+7];
  346. pixel_ptr += 8;
  347. }
  348. }
  349. break;
  350. case IMGTYPE_YUV411:
  351. for (row = 0; row < height; row++) {
  352. pixel_ptr = row * width / 2 * 3;
  353. yq = uq = vq =0;
  354. for (col = 0; col < width/4; col++) {
  355. encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
  356. encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
  357. encoded[pixel_ptr+2] = yq -= encoded[pixel_ptr+2];
  358. encoded[pixel_ptr+3] = yq -= encoded[pixel_ptr+3];
  359. encoded[pixel_ptr+4] = uq -= encoded[pixel_ptr+4];
  360. encoded[pixel_ptr+5] = vq -= encoded[pixel_ptr+5];
  361. pixel_ptr += 6;
  362. }
  363. }
  364. break;
  365. case IMGTYPE_YUV211:
  366. for (row = 0; row < height; row++) {
  367. pixel_ptr = row * width * 2;
  368. yq = uq = vq =0;
  369. for (col = 0; col < width/2; col++) {
  370. encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
  371. encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
  372. encoded[pixel_ptr+2] = uq -= encoded[pixel_ptr+2];
  373. encoded[pixel_ptr+3] = vq -= encoded[pixel_ptr+3];
  374. pixel_ptr += 4;
  375. }
  376. }
  377. break;
  378. case IMGTYPE_YUV420:
  379. for (row = 0; row < height/2; row++) {
  380. pixel_ptr = row * width * 3;
  381. yq = y1q = uq = vq =0;
  382. for (col = 0; col < width/2; col++) {
  383. encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
  384. encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
  385. encoded[pixel_ptr+2] = y1q -= encoded[pixel_ptr+2];
  386. encoded[pixel_ptr+3] = y1q -= encoded[pixel_ptr+3];
  387. encoded[pixel_ptr+4] = uq -= encoded[pixel_ptr+4];
  388. encoded[pixel_ptr+5] = vq -= encoded[pixel_ptr+5];
  389. pixel_ptr += 6;
  390. }
  391. }
  392. break;
  393. default:
  394. av_log(avctx, AV_LOG_ERROR, "BUG! Unknown imagetype in pngfilter switch.\n");
  395. return -1;
  396. }
  397. }
  398. /* Convert colorspace */
  399. switch (c->imgtype) {
  400. case IMGTYPE_YUV111:
  401. for (row = height - 1; row >= 0; row--) {
  402. pixel_ptr = row * c->pic.linesize[0];
  403. for (col = 0; col < width; col++) {
  404. outptr[pixel_ptr++] = get_b(encoded[0], encoded[1]);
  405. outptr[pixel_ptr++] = get_g(encoded[0], encoded[1], encoded[2]);
  406. outptr[pixel_ptr++] = get_r(encoded[0], encoded[2]);
  407. encoded += 3;
  408. }
  409. }
  410. break;
  411. case IMGTYPE_YUV422:
  412. for (row = height - 1; row >= 0; row--) {
  413. pixel_ptr = row * c->pic.linesize[0];
  414. for (col = 0; col < width/4; col++) {
  415. outptr[pixel_ptr++] = get_b(encoded[0], encoded[4]);
  416. outptr[pixel_ptr++] = get_g(encoded[0], encoded[4], encoded[6]);
  417. outptr[pixel_ptr++] = get_r(encoded[0], encoded[6]);
  418. outptr[pixel_ptr++] = get_b(encoded[1], encoded[4]);
  419. outptr[pixel_ptr++] = get_g(encoded[1], encoded[4], encoded[6]);
  420. outptr[pixel_ptr++] = get_r(encoded[1], encoded[6]);
  421. outptr[pixel_ptr++] = get_b(encoded[2], encoded[5]);
  422. outptr[pixel_ptr++] = get_g(encoded[2], encoded[5], encoded[7]);
  423. outptr[pixel_ptr++] = get_r(encoded[2], encoded[7]);
  424. outptr[pixel_ptr++] = get_b(encoded[3], encoded[5]);
  425. outptr[pixel_ptr++] = get_g(encoded[3], encoded[5], encoded[7]);
  426. outptr[pixel_ptr++] = get_r(encoded[3], encoded[7]);
  427. encoded += 8;
  428. }
  429. }
  430. break;
  431. case IMGTYPE_RGB24:
  432. for (row = height - 1; row >= 0; row--) {
  433. pixel_ptr = row * c->pic.linesize[0];
  434. for (col = 0; col < width; col++) {
  435. outptr[pixel_ptr++] = encoded[0];
  436. outptr[pixel_ptr++] = encoded[1];
  437. outptr[pixel_ptr++] = encoded[2];
  438. encoded += 3;
  439. }
  440. }
  441. break;
  442. case IMGTYPE_YUV411:
  443. for (row = height - 1; row >= 0; row--) {
  444. pixel_ptr = row * c->pic.linesize[0];
  445. for (col = 0; col < width/4; col++) {
  446. outptr[pixel_ptr++] = get_b(encoded[0], encoded[4]);
  447. outptr[pixel_ptr++] = get_g(encoded[0], encoded[4], encoded[5]);
  448. outptr[pixel_ptr++] = get_r(encoded[0], encoded[5]);
  449. outptr[pixel_ptr++] = get_b(encoded[1], encoded[4]);
  450. outptr[pixel_ptr++] = get_g(encoded[1], encoded[4], encoded[5]);
  451. outptr[pixel_ptr++] = get_r(encoded[1], encoded[5]);
  452. outptr[pixel_ptr++] = get_b(encoded[2], encoded[4]);
  453. outptr[pixel_ptr++] = get_g(encoded[2], encoded[4], encoded[5]);
  454. outptr[pixel_ptr++] = get_r(encoded[2], encoded[5]);
  455. outptr[pixel_ptr++] = get_b(encoded[3], encoded[4]);
  456. outptr[pixel_ptr++] = get_g(encoded[3], encoded[4], encoded[5]);
  457. outptr[pixel_ptr++] = get_r(encoded[3], encoded[5]);
  458. encoded += 6;
  459. }
  460. }
  461. break;
  462. case IMGTYPE_YUV211:
  463. for (row = height - 1; row >= 0; row--) {
  464. pixel_ptr = row * c->pic.linesize[0];
  465. for (col = 0; col < width/2; col++) {
  466. outptr[pixel_ptr++] = get_b(encoded[0], encoded[2]);
  467. outptr[pixel_ptr++] = get_g(encoded[0], encoded[2], encoded[3]);
  468. outptr[pixel_ptr++] = get_r(encoded[0], encoded[3]);
  469. outptr[pixel_ptr++] = get_b(encoded[1], encoded[2]);
  470. outptr[pixel_ptr++] = get_g(encoded[1], encoded[2], encoded[3]);
  471. outptr[pixel_ptr++] = get_r(encoded[1], encoded[3]);
  472. encoded += 4;
  473. }
  474. }
  475. break;
  476. case IMGTYPE_YUV420:
  477. for (row = height / 2 - 1; row >= 0; row--) {
  478. pixel_ptr = 2 * row * c->pic.linesize[0];
  479. for (col = 0; col < width/2; col++) {
  480. outptr[pixel_ptr] = get_b(encoded[0], encoded[4]);
  481. outptr[pixel_ptr+1] = get_g(encoded[0], encoded[4], encoded[5]);
  482. outptr[pixel_ptr+2] = get_r(encoded[0], encoded[5]);
  483. outptr[pixel_ptr+3] = get_b(encoded[1], encoded[4]);
  484. outptr[pixel_ptr+4] = get_g(encoded[1], encoded[4], encoded[5]);
  485. outptr[pixel_ptr+5] = get_r(encoded[1], encoded[5]);
  486. outptr[pixel_ptr-c->pic.linesize[0]] = get_b(encoded[2], encoded[4]);
  487. outptr[pixel_ptr-c->pic.linesize[0]+1] = get_g(encoded[2], encoded[4], encoded[5]);
  488. outptr[pixel_ptr-c->pic.linesize[0]+2] = get_r(encoded[2], encoded[5]);
  489. outptr[pixel_ptr-c->pic.linesize[0]+3] = get_b(encoded[3], encoded[4]);
  490. outptr[pixel_ptr-c->pic.linesize[0]+4] = get_g(encoded[3], encoded[4], encoded[5]);
  491. outptr[pixel_ptr-c->pic.linesize[0]+5] = get_r(encoded[3], encoded[5]);
  492. pixel_ptr += 6;
  493. encoded += 6;
  494. }
  495. }
  496. break;
  497. default:
  498. av_log(avctx, AV_LOG_ERROR, "BUG! Unknown imagetype in image decoder.\n");
  499. return -1;
  500. }
  501. *data_size = sizeof(AVFrame);
  502. *(AVFrame*)data = c->pic;
  503. /* always report that the buffer was completely consumed */
  504. return buf_size;
  505. }
  506. #endif
  507. #ifdef CONFIG_ENCODERS
  508. /*
  509. *
  510. * Encode a frame
  511. *
  512. */
  513. static int encode_frame(AVCodecContext *avctx, unsigned char *buf, int buf_size, void *data){
  514. LclContext *c = avctx->priv_data;
  515. AVFrame *pict = data;
  516. AVFrame * const p = &c->pic;
  517. int i;
  518. int zret; // Zlib return code
  519. #ifndef CONFIG_ZLIB
  520. av_log(avctx, AV_LOG_ERROR, "Zlib support not compiled in.\n");
  521. return -1;
  522. #else
  523. init_put_bits(&c->pb, buf, buf_size);
  524. *p = *pict;
  525. p->pict_type= FF_I_TYPE;
  526. p->key_frame= 1;
  527. if(avctx->pix_fmt != PIX_FMT_BGR24){
  528. av_log(avctx, AV_LOG_ERROR, "Format not supported!\n");
  529. return -1;
  530. }
  531. zret = deflateReset(&(c->zstream));
  532. if (zret != Z_OK) {
  533. av_log(avctx, AV_LOG_ERROR, "Deflate reset error: %d\n", zret);
  534. return -1;
  535. }
  536. c->zstream.next_out = c->comp_buf;
  537. c->zstream.avail_out = c->max_comp_size;
  538. for(i = avctx->height - 1; i >= 0; i--) {
  539. c->zstream.next_in = p->data[0]+p->linesize[0]*i;
  540. c->zstream.avail_in = avctx->width*3;
  541. zret = deflate(&(c->zstream), Z_NO_FLUSH);
  542. if (zret != Z_OK) {
  543. av_log(avctx, AV_LOG_ERROR, "Deflate error: %d\n", zret);
  544. return -1;
  545. }
  546. }
  547. zret = deflate(&(c->zstream), Z_FINISH);
  548. if (zret != Z_STREAM_END) {
  549. av_log(avctx, AV_LOG_ERROR, "Deflate error: %d\n", zret);
  550. return -1;
  551. }
  552. for (i = 0; i < c->zstream.total_out; i++)
  553. put_bits(&c->pb, 8, c->comp_buf[i]);
  554. flush_put_bits(&c->pb);
  555. return c->zstream.total_out;
  556. #endif
  557. }
  558. #endif /* CONFIG_ENCODERS */
  559. #ifdef CONFIG_DECODERS
  560. /*
  561. *
  562. * Init lcl decoder
  563. *
  564. */
  565. static int decode_init(AVCodecContext *avctx)
  566. {
  567. LclContext * const c = avctx->priv_data;
  568. unsigned int basesize = avctx->width * avctx->height;
  569. unsigned int max_basesize = ((avctx->width + 3) & ~3) * ((avctx->height + 3) & ~3);
  570. unsigned int max_decomp_size;
  571. int zret; // Zlib return code
  572. c->avctx = avctx;
  573. c->pic.data[0] = NULL;
  574. #ifdef CONFIG_ZLIB
  575. // Needed if zlib unused or init aborted before inflateInit
  576. memset(&(c->zstream), 0, sizeof(z_stream));
  577. #endif
  578. if (avctx->extradata_size < 8) {
  579. av_log(avctx, AV_LOG_ERROR, "Extradata size too small.\n");
  580. return 1;
  581. }
  582. if (avcodec_check_dimensions(avctx, avctx->width, avctx->height) < 0) {
  583. return 1;
  584. }
  585. /* Check codec type */
  586. if (((avctx->codec_id == CODEC_ID_MSZH) && (*((char *)avctx->extradata + 7) != CODEC_MSZH)) ||
  587. ((avctx->codec_id == CODEC_ID_ZLIB) && (*((char *)avctx->extradata + 7) != CODEC_ZLIB))) {
  588. av_log(avctx, AV_LOG_ERROR, "Codec id and codec type mismatch. This should not happen.\n");
  589. }
  590. /* Detect image type */
  591. switch (c->imgtype = *((char *)avctx->extradata + 4)) {
  592. case IMGTYPE_YUV111:
  593. c->decomp_size = basesize * 3;
  594. max_decomp_size = max_basesize * 3;
  595. av_log(avctx, AV_LOG_INFO, "Image type is YUV 1:1:1.\n");
  596. break;
  597. case IMGTYPE_YUV422:
  598. c->decomp_size = basesize * 2;
  599. max_decomp_size = max_basesize * 2;
  600. av_log(avctx, AV_LOG_INFO, "Image type is YUV 4:2:2.\n");
  601. break;
  602. case IMGTYPE_RGB24:
  603. c->decomp_size = basesize * 3;
  604. max_decomp_size = max_basesize * 3;
  605. av_log(avctx, AV_LOG_INFO, "Image type is RGB 24.\n");
  606. break;
  607. case IMGTYPE_YUV411:
  608. c->decomp_size = basesize / 2 * 3;
  609. max_decomp_size = max_basesize / 2 * 3;
  610. av_log(avctx, AV_LOG_INFO, "Image type is YUV 4:1:1.\n");
  611. break;
  612. case IMGTYPE_YUV211:
  613. c->decomp_size = basesize * 2;
  614. max_decomp_size = max_basesize * 2;
  615. av_log(avctx, AV_LOG_INFO, "Image type is YUV 2:1:1.\n");
  616. break;
  617. case IMGTYPE_YUV420:
  618. c->decomp_size = basesize / 2 * 3;
  619. max_decomp_size = max_basesize / 2 * 3;
  620. av_log(avctx, AV_LOG_INFO, "Image type is YUV 4:2:0.\n");
  621. break;
  622. default:
  623. av_log(avctx, AV_LOG_ERROR, "Unsupported image format %d.\n", c->imgtype);
  624. return 1;
  625. }
  626. /* Detect compression method */
  627. c->compression = *((char *)avctx->extradata + 5);
  628. switch (avctx->codec_id) {
  629. case CODEC_ID_MSZH:
  630. switch (c->compression) {
  631. case COMP_MSZH:
  632. av_log(avctx, AV_LOG_INFO, "Compression enabled.\n");
  633. break;
  634. case COMP_MSZH_NOCOMP:
  635. c->decomp_size = 0;
  636. av_log(avctx, AV_LOG_INFO, "No compression.\n");
  637. break;
  638. default:
  639. av_log(avctx, AV_LOG_ERROR, "Unsupported compression format for MSZH (%d).\n", c->compression);
  640. return 1;
  641. }
  642. break;
  643. case CODEC_ID_ZLIB:
  644. #ifdef CONFIG_ZLIB
  645. switch (c->compression) {
  646. case COMP_ZLIB_HISPEED:
  647. av_log(avctx, AV_LOG_INFO, "High speed compression.\n");
  648. break;
  649. case COMP_ZLIB_HICOMP:
  650. av_log(avctx, AV_LOG_INFO, "High compression.\n");
  651. break;
  652. case COMP_ZLIB_NORMAL:
  653. av_log(avctx, AV_LOG_INFO, "Normal compression.\n");
  654. break;
  655. default:
  656. if ((c->compression < Z_NO_COMPRESSION) || (c->compression > Z_BEST_COMPRESSION)) {
  657. av_log(avctx, AV_LOG_ERROR, "Unsupported compression level for ZLIB: (%d).\n", c->compression);
  658. return 1;
  659. }
  660. av_log(avctx, AV_LOG_INFO, "Compression level for ZLIB: (%d).\n", c->compression);
  661. }
  662. #else
  663. av_log(avctx, AV_LOG_ERROR, "Zlib support not compiled.\n");
  664. return 1;
  665. #endif
  666. break;
  667. default:
  668. av_log(avctx, AV_LOG_ERROR, "BUG! Unknown codec in compression switch.\n");
  669. return 1;
  670. }
  671. /* Allocate decompression buffer */
  672. if (c->decomp_size) {
  673. if ((c->decomp_buf = av_malloc(max_decomp_size)) == NULL) {
  674. av_log(avctx, AV_LOG_ERROR, "Can't allocate decompression buffer.\n");
  675. return 1;
  676. }
  677. }
  678. /* Detect flags */
  679. c->flags = *((char *)avctx->extradata + 6);
  680. if (c->flags & FLAG_MULTITHREAD)
  681. av_log(avctx, AV_LOG_INFO, "Multithread encoder flag set.\n");
  682. if (c->flags & FLAG_NULLFRAME)
  683. av_log(avctx, AV_LOG_INFO, "Nullframe insertion flag set.\n");
  684. if ((avctx->codec_id == CODEC_ID_ZLIB) && (c->flags & FLAG_PNGFILTER))
  685. av_log(avctx, AV_LOG_INFO, "PNG filter flag set.\n");
  686. if (c->flags & FLAGMASK_UNUSED)
  687. av_log(avctx, AV_LOG_ERROR, "Unknown flag set (%d).\n", c->flags);
  688. /* If needed init zlib */
  689. if (avctx->codec_id == CODEC_ID_ZLIB) {
  690. #ifdef CONFIG_ZLIB
  691. c->zstream.zalloc = Z_NULL;
  692. c->zstream.zfree = Z_NULL;
  693. c->zstream.opaque = Z_NULL;
  694. zret = inflateInit(&(c->zstream));
  695. if (zret != Z_OK) {
  696. av_log(avctx, AV_LOG_ERROR, "Inflate init error: %d\n", zret);
  697. return 1;
  698. }
  699. #else
  700. av_log(avctx, AV_LOG_ERROR, "Zlib support not compiled.\n");
  701. return 1;
  702. #endif
  703. }
  704. avctx->pix_fmt = PIX_FMT_BGR24;
  705. return 0;
  706. }
  707. #endif /* CONFIG_DECODERS */
  708. #ifdef CONFIG_ENCODERS
  709. /*
  710. *
  711. * Init lcl encoder
  712. *
  713. */
  714. static int encode_init(AVCodecContext *avctx)
  715. {
  716. LclContext *c = avctx->priv_data;
  717. int zret; // Zlib return code
  718. #ifndef CONFIG_ZLIB
  719. av_log(avctx, AV_LOG_ERROR, "Zlib support not compiled.\n");
  720. return 1;
  721. #else
  722. c->avctx= avctx;
  723. assert(avctx->width && avctx->height);
  724. avctx->extradata= av_mallocz(8);
  725. avctx->coded_frame= &c->pic;
  726. // Will be user settable someday
  727. c->compression = 6;
  728. c->flags = 0;
  729. switch(avctx->pix_fmt){
  730. case PIX_FMT_BGR24:
  731. c->imgtype = IMGTYPE_RGB24;
  732. c->decomp_size = avctx->width * avctx->height * 3;
  733. avctx->bits_per_sample= 24;
  734. break;
  735. default:
  736. av_log(avctx, AV_LOG_ERROR, "Format %d not supported\n", avctx->pix_fmt);
  737. return -1;
  738. }
  739. ((uint8_t*)avctx->extradata)[0]= 4;
  740. ((uint8_t*)avctx->extradata)[1]= 0;
  741. ((uint8_t*)avctx->extradata)[2]= 0;
  742. ((uint8_t*)avctx->extradata)[3]= 0;
  743. ((uint8_t*)avctx->extradata)[4]= c->imgtype;
  744. ((uint8_t*)avctx->extradata)[5]= c->compression;
  745. ((uint8_t*)avctx->extradata)[6]= c->flags;
  746. ((uint8_t*)avctx->extradata)[7]= CODEC_ZLIB;
  747. c->avctx->extradata_size= 8;
  748. c->zstream.zalloc = Z_NULL;
  749. c->zstream.zfree = Z_NULL;
  750. c->zstream.opaque = Z_NULL;
  751. zret = deflateInit(&(c->zstream), c->compression);
  752. if (zret != Z_OK) {
  753. av_log(avctx, AV_LOG_ERROR, "Deflate init error: %d\n", zret);
  754. return 1;
  755. }
  756. /* Conservative upper bound taken from zlib v1.2.1 source */
  757. c->max_comp_size = c->decomp_size + ((c->decomp_size + 7) >> 3) +
  758. ((c->decomp_size + 63) >> 6) + 11;
  759. if ((c->comp_buf = av_malloc(c->max_comp_size)) == NULL) {
  760. av_log(avctx, AV_LOG_ERROR, "Can't allocate compression buffer.\n");
  761. return 1;
  762. }
  763. return 0;
  764. #endif
  765. }
  766. #endif /* CONFIG_ENCODERS */
  767. #ifdef CONFIG_DECODERS
  768. /*
  769. *
  770. * Uninit lcl decoder
  771. *
  772. */
  773. static int decode_end(AVCodecContext *avctx)
  774. {
  775. LclContext * const c = avctx->priv_data;
  776. if (c->pic.data[0])
  777. avctx->release_buffer(avctx, &c->pic);
  778. #ifdef CONFIG_ZLIB
  779. inflateEnd(&(c->zstream));
  780. #endif
  781. return 0;
  782. }
  783. #endif
  784. #ifdef CONFIG_ENCODERS
  785. /*
  786. *
  787. * Uninit lcl encoder
  788. *
  789. */
  790. static int encode_end(AVCodecContext *avctx)
  791. {
  792. LclContext *c = avctx->priv_data;
  793. av_freep(&avctx->extradata);
  794. av_freep(&c->comp_buf);
  795. #ifdef CONFIG_ZLIB
  796. deflateEnd(&(c->zstream));
  797. #endif
  798. return 0;
  799. }
  800. #endif
  801. #ifdef CONFIG_MSZH_DECODER
  802. AVCodec mszh_decoder = {
  803. "mszh",
  804. CODEC_TYPE_VIDEO,
  805. CODEC_ID_MSZH,
  806. sizeof(LclContext),
  807. decode_init,
  808. NULL,
  809. decode_end,
  810. decode_frame,
  811. CODEC_CAP_DR1,
  812. };
  813. #endif
  814. #ifdef CONFIG_ZLIB_DECODER
  815. AVCodec zlib_decoder = {
  816. "zlib",
  817. CODEC_TYPE_VIDEO,
  818. CODEC_ID_ZLIB,
  819. sizeof(LclContext),
  820. decode_init,
  821. NULL,
  822. decode_end,
  823. decode_frame,
  824. CODEC_CAP_DR1,
  825. };
  826. #endif
  827. #ifdef CONFIG_ENCODERS
  828. AVCodec zlib_encoder = {
  829. "zlib",
  830. CODEC_TYPE_VIDEO,
  831. CODEC_ID_ZLIB,
  832. sizeof(LclContext),
  833. encode_init,
  834. encode_frame,
  835. encode_end,
  836. };
  837. #endif //CONFIG_ENCODERS