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
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
41 #include <stdio.h>
42 #include <stdlib.h>
43
50
51 #if CONFIG_ZLIB_DECODER
52 #include <zlib.h>
53 #endif
54
55 /*
56 * Decoder context
57 */
59 // Image type
61 // Compression type
63 // Flags
65 // Decompressed data size
67 // Decompression buffer
69 #if CONFIG_ZLIB_DECODER
70 z_stream zstream;
71 #endif
73
74
75 /**
76 * @param srcptr compressed source buffer, must be padded with at least 5 extra bytes
77 * @param destptr must be padded sufficiently for av_memcpy_backptr
78 */
79 static unsigned int mszh_decomp(
const unsigned char * srcptr,
int srclen,
unsigned char * destptr,
unsigned int destsize)
80 {
81 unsigned char *destptr_bak = destptr;
82 unsigned char *destptr_end = destptr + destsize;
83 const unsigned char *srcptr_end = srcptr + srclen;
84 unsigned mask = *srcptr++;
85 unsigned maskbit = 0x80;
86
87 while (srcptr < srcptr_end && destptr < destptr_end) {
88 if (!(mask & maskbit)) {
89 memcpy(destptr, srcptr, 4);
90 destptr += 4;
91 srcptr += 4;
92 } else {
93 unsigned ofs = bytestream_get_le16(&srcptr);
94 unsigned cnt = (ofs >> 11) + 1;
95 ofs &= 0x7ff;
96 ofs =
FFMIN(ofs, destptr - destptr_bak);
97 cnt *= 4;
98 cnt =
FFMIN(cnt, destptr_end - destptr);
99 if (ofs) {
101 } else {
102 // Not known what the correct behaviour is, but
103 // this at least avoids uninitialized data.
104 memset(destptr, 0, cnt);
105 }
106 destptr += cnt;
107 }
108 maskbit >>= 1;
109 if (!maskbit) {
110 mask = *srcptr++;
111 while (!mask) {
112 if (destptr_end - destptr < 32 || srcptr_end - srcptr < 32) break;
113 memcpy(destptr, srcptr, 32);
114 destptr += 32;
115 srcptr += 32;
116 mask = *srcptr++;
117 }
118 maskbit = 0x80;
119 }
120 }
121
122 return destptr - destptr_bak;
123 }
124
125
126 #if CONFIG_ZLIB_DECODER
127 /**
128 * @brief decompress a zlib-compressed data block into decomp_buf
129 * @param src compressed input buffer
130 * @param src_len data length in input buffer
131 * @param offset offset in decomp_buf
132 * @param expected expected decompressed length
133 */
135 {
137 int zret = inflateReset(&c->zstream);
138 if (zret != Z_OK) {
141 }
142 c->zstream.next_in = (
uint8_t *)src;
143 c->zstream.avail_in = src_len;
146 zret = inflate(&c->zstream, Z_FINISH);
147 if (zret != Z_OK && zret != Z_STREAM_END) {
150 }
151 if (expected != (unsigned int)c->zstream.total_out) {
153 expected, c->zstream.total_out);
155 }
156 return c->zstream.total_out;
157 }
158 #endif
159
160
161 /*
162 *
163 * Decode a frame
164 *
165 */
167 {
170 int buf_size = avpkt->
size;
172 unsigned int pixel_ptr;
173 int row, col;
174 unsigned char *encoded = avpkt->
data, *outptr;
175 uint8_t *y_out, *u_out, *v_out;
176 unsigned int width = avctx->
width;
// Real image width
177 unsigned int height = avctx->
height;
// Real image height
178 unsigned int mszh_dlen;
179 unsigned char yq, y1q, uq, vq;
181 unsigned int mthread_inlen, mthread_outlen;
182 unsigned int len = buf_size;
183 int linesize;
184
187
188 outptr = frame->
data[0];
// Output image pointer
189
190 /* Decompress frame */
197 ;
200 if (len < 8) {
203 }
204 mthread_inlen =
FFMIN(mthread_inlen, len - 8);
205 mthread_outlen =
AV_RL32(buf + 4);
208 if (mthread_outlen != mszh_dlen) {
210 mthread_outlen, mszh_dlen);
212 }
213 mszh_dlen =
mszh_decomp(buf + 8 + mthread_inlen, len - 8 - mthread_inlen,
215 if (mthread_outlen != mszh_dlen) {
217 mthread_outlen, mszh_dlen);
219 }
222 } else {
228 }
230 len = mszh_dlen;
231 }
232 break;
234 int bppx2;
238 bppx2 = 6;
239 break;
242 bppx2 = 4;
243 break;
246 bppx2 = 3;
247 break;
248 default:
249 bppx2 = 0; // will error out below
250 break;
251 }
252 if (len < ((width * height * bppx2) >> 1))
254 break;
255 }
256 default:
259 }
260 break;
261 #if CONFIG_ZLIB_DECODER
263 /* Using the original dll with normal compression (-1) and RGB format
264 * gives a file with ZLIB fourcc, but frame is really uncompressed.
265 * To be sure that's true check also frame size */
267 len == width * height * 3) {
271 } else {
272 break;
273 }
276 mthread_inlen =
FFMIN(mthread_inlen, len - 8);
277 mthread_outlen =
AV_RL32(buf + 4);
279 ret = zlib_decomp(avctx, buf + 8, mthread_inlen, 0, mthread_outlen);
280 if (ret < 0)
return ret;
281 ret = zlib_decomp(avctx, buf + 8 + mthread_inlen, len - 8 - mthread_inlen,
282 mthread_outlen, mthread_outlen);
283 if (ret < 0)
return ret;
284 } else {
285 int ret = zlib_decomp(avctx, buf, len, 0, c->
decomp_size);
286 if (ret < 0)
return ret;
287 }
290 break;
291 #endif
292 default:
293 av_log(avctx,
AV_LOG_ERROR,
"BUG! Unknown codec in frame decoder compression switch.\n");
295 }
296
297
298 /* Apply PNG filter */
303 for (row = 0; row <
height; row++) {
304 pixel_ptr = row * width * 3;
305 yq = encoded[pixel_ptr++];
306 uqvq =
AV_RL16(encoded+pixel_ptr);
307 pixel_ptr += 2;
308 for (col = 1; col <
width; col++) {
309 encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
310 uqvq -=
AV_RL16(encoded+pixel_ptr+1);
311 AV_WL16(encoded+pixel_ptr+1, uqvq);
312 pixel_ptr += 3;
313 }
314 }
315 break;
317 for (row = 0; row <
height; row++) {
318 pixel_ptr = row * width * 2;
319 yq = uq = vq =0;
320 for (col = 0; col < width/4; col++) {
321 encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
322 encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
323 encoded[pixel_ptr+2] = yq -= encoded[pixel_ptr+2];
324 encoded[pixel_ptr+3] = yq -= encoded[pixel_ptr+3];
325 encoded[pixel_ptr+4] = uq -= encoded[pixel_ptr+4];
326 encoded[pixel_ptr+5] = uq -= encoded[pixel_ptr+5];
327 encoded[pixel_ptr+6] = vq -= encoded[pixel_ptr+6];
328 encoded[pixel_ptr+7] = vq -= encoded[pixel_ptr+7];
329 pixel_ptr += 8;
330 }
331 }
332 break;
334 for (row = 0; row <
height; row++) {
335 pixel_ptr = row * width / 2 * 3;
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] = vq -= encoded[pixel_ptr+5];
344 pixel_ptr += 6;
345 }
346 }
347 break;
349 for (row = 0; row <
height; row++) {
350 pixel_ptr = row * width * 2;
351 yq = uq = vq =0;
352 for (col = 0; col < width/2; col++) {
353 encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
354 encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
355 encoded[pixel_ptr+2] = uq -= encoded[pixel_ptr+2];
356 encoded[pixel_ptr+3] = vq -= encoded[pixel_ptr+3];
357 pixel_ptr += 4;
358 }
359 }
360 break;
362 for (row = 0; row < height/2; row++) {
363 pixel_ptr = row * width * 3;
364 yq = y1q = uq = vq =0;
365 for (col = 0; col < width/2; col++) {
366 encoded[pixel_ptr] = yq -= encoded[pixel_ptr];
367 encoded[pixel_ptr+1] = yq -= encoded[pixel_ptr+1];
368 encoded[pixel_ptr+2] = y1q -= encoded[pixel_ptr+2];
369 encoded[pixel_ptr+3] = y1q -= encoded[pixel_ptr+3];
370 encoded[pixel_ptr+4] = uq -= encoded[pixel_ptr+4];
371 encoded[pixel_ptr+5] = vq -= encoded[pixel_ptr+5];
372 pixel_ptr += 6;
373 }
374 }
375 break;
376 default:
379 }
380 }
381
382 /* Convert colorspace */
383 y_out = frame->
data[0] + (height - 1) * frame->
linesize[0];
384 u_out = frame->
data[1] + (height - 1) * frame->
linesize[1];
385 v_out = frame->
data[2] + (height - 1) * frame->
linesize[2];
388 for (row = 0; row <
height; row++) {
389 for (col = 0; col <
width; col++) {
390 y_out[col] = *encoded++;
391 u_out[col] = *encoded++ + 128;
392 v_out[col] = *encoded++ + 128;
393 }
397 }
398 break;
400 for (row = 0; row <
height; row++) {
401 for (col = 0; col < width - 3; col += 4) {
402 memcpy(y_out + col, encoded, 4);
403 encoded += 4;
404 u_out[ col >> 1 ] = *encoded++ + 128;
405 u_out[(col >> 1) + 1] = *encoded++ + 128;
406 v_out[ col >> 1 ] = *encoded++ + 128;
407 v_out[(col >> 1) + 1] = *encoded++ + 128;
408 }
412 }
413 break;
415 linesize = len <
FFALIGN(3 * width, 4) * height ? 3 * width :
FFALIGN(3 * width, 4);
416 for (row = height - 1; row >= 0; row--) {
417 pixel_ptr = row * frame->
linesize[0];
418 memcpy(outptr + pixel_ptr, encoded, 3 * width);
419 encoded += linesize;
420 }
421 break;
423 for (row = 0; row <
height; row++) {
424 for (col = 0; col < width - 3; col += 4) {
425 memcpy(y_out + col, encoded, 4);
426 encoded += 4;
427 u_out[col >> 2] = *encoded++ + 128;
428 v_out[col >> 2] = *encoded++ + 128;
429 }
433 }
434 break;
436 for (row = 0; row <
height; row++) {
437 for (col = 0; col < width - 1; col += 2) {
438 memcpy(y_out + col, encoded, 2);
439 encoded += 2;
440 u_out[col >> 1] = *encoded++ + 128;
441 v_out[col >> 1] = *encoded++ + 128;
442 }
446 }
447 break;
449 u_out = frame->
data[1] + ((height >> 1) - 1) * frame->
linesize[1];
450 v_out = frame->
data[2] + ((height >> 1) - 1) * frame->
linesize[2];
451 for (row = 0; row < height - 1; row += 2) {
452 for (col = 0; col < width - 1; col += 2) {
453 memcpy(y_out + col, encoded, 2);
454 encoded += 2;
455 memcpy(y_out + col - frame->
linesize[0], encoded, 2);
456 encoded += 2;
457 u_out[col >> 1] = *encoded++ + 128;
458 v_out[col >> 1] = *encoded++ + 128;
459 }
463 }
464 break;
465 default:
468 }
469
470 *got_frame = 1;
471
472 /* always report that the buffer was completely consumed */
473 return buf_size;
474 }
475
476 /*
477 *
478 * Init lcl decoder
479 *
480 */
482 {
484 unsigned int basesize = avctx->
width * avctx->
height;
487 unsigned int max_decomp_size;
488 int subsample_h, subsample_v;
489
493 }
494
495 /* Check codec type */
498 av_log(avctx,
AV_LOG_ERROR,
"Codec id and codec type mismatch. This should not happen.\n");
499 }
500
501 /* Detect image type */
505 max_decomp_size = max_basesize * 3;
508 break;
511 max_decomp_size = max_basesize * 2;
514 if (avctx->
width % 4) {
517 }
518 break;
521 max_decomp_size = max_basesize * 3;
524 break;
527 max_decomp_size = max_basesize / 2 * 3;
530 break;
533 max_decomp_size = max_basesize * 2;
536 break;
539 max_decomp_size = max_basesize / 2 * 3;
542 break;
543 default:
546 }
547
549 if (avctx->
width % (1<<subsample_h) || avctx->
height % (1<<subsample_v)) {
552 }
553
554 /* Detect compression method */
561 break;
565 break;
566 default:
569 }
570 break;
571 #if CONFIG_ZLIB_DECODER
576 break;
579 break;
582 break;
583 default:
587 }
589 }
590 break;
591 #endif
592 default:
595 }
596
597 /* Allocate decompression buffer */
602 }
603 }
604
605 /* Detect flags */
615
616 /* If needed init zlib */
617 #if CONFIG_ZLIB_DECODER
619 int zret;
620 c->zstream.zalloc = Z_NULL;
621 c->zstream.zfree = Z_NULL;
622 c->zstream.opaque = Z_NULL;
623 zret = inflateInit(&c->zstream);
624 if (zret != Z_OK) {
628 }
629 }
630 #endif
631
632 return 0;
633 }
634
635 /*
636 *
637 * Uninit lcl decoder
638 *
639 */
641 {
643
645 #if CONFIG_ZLIB_DECODER
647 inflateEnd(&c->zstream);
648 #endif
649
650 return 0;
651 }
652
653 #if CONFIG_MSZH_DECODER
664 };
665 #endif
666
667 #if CONFIG_ZLIB_DECODER
678 };
679 #endif