1 /*
2 * Copyright (c) 2010-2011 Maxim Poliakovski
3 * Copyright (c) 2010-2011 Elvis Presley
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 * Known FOURCCs: 'apch' (HQ), 'apcn' (SD), 'apcs' (LT), 'acpo' (Proxy), 'ap4h' (4444)
25 */
26
27 //#define DEBUG
28
29 #define LONG_BITSTREAM_READER
30
38
40 {
41 int i;
42 for (i = 0; i < 64; i++)
43 dst[i] = permutation[src[i]];
44 }
45
47 {
50
52
56
59
62
63 return 0;
64 }
65
68 {
72
74 av_dlog(avctx,
"header size %d\n", hdr_size);
75 if (hdr_size > data_size) {
78 }
79
81 av_dlog(avctx,
"%.4s version %d\n", buf+4, version);
82 if (version > 1) {
85 }
86
89 if (width != avctx->
width || height != avctx->
height) {
93 }
94
97
101 }
103
105
108 } else {
112 }
113
116 } else {
118 }
119
120 ptr = buf + 20;
121 flags = buf[19];
122 av_dlog(avctx,
"flags %x\n", flags);
123
124 if (flags & 2) {
125 if(buf + data_size - ptr < 64) {
128 }
130 ptr += 64;
131 } else {
133 }
134
135 if (flags & 1) {
136 if(buf + data_size - ptr < 64) {
139 }
141 } else {
143 }
144
145 return hdr_size;
146 }
147
149 {
151 int i, hdr_size, slice_count;
152 unsigned pic_data_size;
153 int log2_slice_mb_width, log2_slice_mb_height;
154 int slice_mb_count, mb_x, mb_y;
155 const uint8_t *data_ptr, *index_ptr;
156
157 hdr_size = buf[0] >> 3;
158 if (hdr_size < 8 || hdr_size > buf_size) {
161 }
162
163 pic_data_size =
AV_RB32(buf + 1);
164 if (pic_data_size > buf_size) {
167 }
168
169 log2_slice_mb_width = buf[7] >> 4;
170 log2_slice_mb_height = buf[7] & 0xF;
171 if (log2_slice_mb_width > 3 || log2_slice_mb_height) {
173 1 << log2_slice_mb_width, 1 << log2_slice_mb_height);
175 }
176
180 else
182
183 slice_count =
AV_RB16(buf + 5);
184
191 }
192
193 if (!slice_count)
195
196 if (hdr_size + slice_count*2 > buf_size) {
199 }
200
201 // parse slice information
202 index_ptr = buf + hdr_size;
203 data_ptr = index_ptr + slice_count*2;
204
205 slice_mb_count = 1 << log2_slice_mb_width;
206 mb_x = 0;
207 mb_y = 0;
208
209 for (i = 0; i < slice_count; i++) {
211
212 slice->
data = data_ptr;
213 data_ptr +=
AV_RB16(index_ptr + i*2);
214
215 while (ctx->
mb_width - mb_x < slice_mb_count)
216 slice_mb_count >>= 1;
217
222
226 }
227
228 mb_x += slice_mb_count;
230 slice_mb_count = 1 << log2_slice_mb_width;
231 mb_x = 0;
232 mb_y++;
233 }
234 if (data_ptr > buf + buf_size) {
237 }
238 }
239
244 }
245
246 return pic_data_size;
247 }
248
249 #define DECODE_CODEWORD(val, codebook) \
250 do { \
251 unsigned int rice_order, exp_order, switch_bits; \
252 unsigned int q, buf, bits; \
253 \
254 UPDATE_CACHE(re, gb); \
255 buf = GET_CACHE(re, gb); \
256 \
257 /* number of bits to switch between rice and exp golomb */ \
258 switch_bits = codebook & 3; \
259 rice_order = codebook >> 5; \
260 exp_order = (codebook >> 2) & 7; \
261 \
262 q = 31 - av_log2(buf); \
263 \
264 if (q > switch_bits) { /* exp golomb */ \
265 bits = exp_order - switch_bits + (q<<1); \
266 val = SHOW_UBITS(re, gb, bits) - (1 << exp_order) + \
267 ((switch_bits + 1) << rice_order); \
268 SKIP_BITS(re, gb, bits); \
269 } else if (rice_order) { \
270 SKIP_BITS(re, gb, q+1); \
271 val = (q << rice_order) + SHOW_UBITS(re, gb, rice_order); \
272 SKIP_BITS(re, gb, rice_order); \
273 } else { \
274 val = q; \
275 SKIP_BITS(re, gb, q+1); \
276 } \
277 } while (0)
278
279 #define TOSIGNED(x) (((x) >> 1) ^ (-((x) & 1)))
280
281 #define FIRST_DC_CB 0xB8
282
284
286 int blocks_per_slice)
287 {
288 int16_t prev_dc;
289 int code, i, sign;
290
292
295 out[0] = prev_dc;
296
297 out += 64; // dc coeff for the next block
298
299 code = 5;
300 sign = 0;
301 for (i = 1; i < blocks_per_slice; i++, out += 64) {
303 if(code) sign ^= -(code & 1);
304 else sign = 0;
305 prev_dc += (((code + 1) >> 1) ^ sign) - sign;
306 out[0] = prev_dc;
307 }
309 }
310
311 // adaptive codebook switching lut according to previous run/level values
312 static const uint8_t run_to_cb[16] = { 0x06, 0x06, 0x05, 0x05, 0x04, 0x29, 0x29, 0x29, 0x29, 0x28, 0x28, 0x28, 0x28, 0x28, 0x28, 0x4C };
313 static const uint8_t lev_to_cb[10] = { 0x04, 0x0A, 0x05, 0x06, 0x04, 0x28, 0x28, 0x28, 0x28, 0x4C };
314
316 int16_t *
out,
int blocks_per_slice)
317 {
319 int block_mask, sign;
321 int max_coeffs, i, bits_left;
322 int log2_block_count =
av_log2(blocks_per_slice);
323
326 run = 4;
327 level = 2;
328
329 max_coeffs = 64 << log2_block_count;
330 block_mask = blocks_per_slice - 1;
331
332 for (pos = block_mask;;) {
334 if (!bits_left || (bits_left < 32 && !
SHOW_UBITS(
re, gb, bits_left)))
335 break;
336
338 pos += run + 1;
339 if (pos >= max_coeffs) {
342 }
343
345 level += 1;
346
347 i = pos >> log2_block_count;
348
351 out[((pos & block_mask) << 6) + ctx->
scan[i]] = ((level ^ sign) - sign);
352 }
353
355 return 0;
356 }
357
359 uint16_t *dst, int dst_stride,
361 const int16_t *qmat)
362 {
367 int i, blocks_per_slice = slice->
mb_count<<2;
369
370 for (i = 0; i < blocks_per_slice; i++)
372
374
378
379 block = blocks;
380 for (i = 0; i < slice->
mb_count; i++) {
383 ctx->
prodsp.
idct_put(dst+4*dst_stride , dst_stride, block+(2<<6), qmat);
384 ctx->
prodsp.
idct_put(dst+4*dst_stride+8, dst_stride, block+(3<<6), qmat);
385 block += 4*64;
386 dst += 16;
387 }
388 return 0;
389 }
390
392 uint16_t *dst, int dst_stride,
394 const int16_t *qmat, int log2_blocks_per_mb)
395 {
400 int i, j, blocks_per_slice = slice->
mb_count << log2_blocks_per_mb;
402
403 for (i = 0; i < blocks_per_slice; i++)
405
407
411
412 block = blocks;
413 for (i = 0; i < slice->
mb_count; i++) {
414 for (j = 0; j < log2_blocks_per_mb; j++) {
416 ctx->
prodsp.
idct_put(dst+4*dst_stride, dst_stride, block+(1<<6), qmat);
417 block += 2*64;
418 dst += 8;
419 }
420 }
421 return 0;
422 }
423
425 const int num_bits)
426 {
427 const int mask = (1 << num_bits) - 1;
428 int i, idx,
val, alpha_val;
429
430 idx = 0;
432 do {
433 do {
436 } else {
437 int sign;
438 val =
get_bits(gb, num_bits == 16 ? 7 : 4);
439 sign = val & 1;
440 val = (val + 2) >> 1;
441 if (sign)
443 }
444 alpha_val = (alpha_val +
val) & mask;
445 if (num_bits == 16) {
446 dst[idx++] = alpha_val >> 6;
447 } else {
448 dst[idx++] = (alpha_val << 2) | (alpha_val >> 6);
449 }
450 if (idx >= num_coeffs)
451 break;
454 if (!val)
456 if (idx + val > num_coeffs)
457 val = num_coeffs - idx;
458 if (num_bits == 16) {
459 for (i = 0; i <
val; i++)
460 dst[idx++] = alpha_val >> 6;
461 } else {
462 for (i = 0; i <
val; i++)
463 dst[idx++] = (alpha_val << 2) | (alpha_val >> 6);
464
465 }
466 } while (idx < num_coeffs);
467 }
468
469 /**
470 * Decode alpha slice plane.
471 */
473 uint16_t *dst, int dst_stride,
475 int blocks_per_slice)
476 {
478 int i;
481
482 for (i = 0; i < blocks_per_slice<<2; i++)
484
486
488 unpack_alpha(&gb, blocks, blocks_per_slice * 4 * 64, 16);
489 } else {
490 unpack_alpha(&gb, blocks, blocks_per_slice * 4 * 64, 8);
491 }
492
493 block = blocks;
494 for (i = 0; i < 16; i++) {
495 memcpy(dst, block, 16 * blocks_per_slice * sizeof(*dst));
496 dst += dst_stride >> 1;
497 block += 16 * blocks_per_slice;
498 }
499 }
500
502 {
507 int i, hdr_size, qscale, log2_chroma_blocks_per_mb;
508 int luma_stride, chroma_stride;
509 int y_data_size, u_data_size, v_data_size, a_data_size;
510 uint8_t *dest_y, *dest_u, *dest_v, *dest_a;
511 int16_t qmat_luma_scaled[64];
512 int16_t qmat_chroma_scaled[64];
513 int mb_x_shift;
515
517 //av_log(avctx, AV_LOG_INFO, "slice %d mb width %d mb x %d y %d\n",
518 // jobnr, slice->mb_count, slice->mb_x, slice->mb_y);
519
520 // slice header
521 hdr_size = buf[0] >> 3;
522 qscale = av_clip(buf[1], 1, 224);
523 qscale = qscale > 128 ? qscale - 96 << 2: qscale;
524 y_data_size =
AV_RB16(buf + 2);
525 u_data_size =
AV_RB16(buf + 4);
526 v_data_size = slice->
data_size - y_data_size - u_data_size - hdr_size;
527 if (hdr_size > 7) v_data_size =
AV_RB16(buf + 6);
528 a_data_size = slice->
data_size - y_data_size - u_data_size -
529 v_data_size - hdr_size;
530
531 if (y_data_size < 0 || u_data_size < 0 || v_data_size < 0
532 || hdr_size+y_data_size+u_data_size+v_data_size > slice->
data_size){
535 }
536
537 buf += hdr_size;
538
539 for (i = 0; i < 64; i++) {
540 qmat_luma_scaled [i] = ctx->
qmat_luma [i] * qscale;
541 qmat_chroma_scaled[i] = ctx->
qmat_chroma[i] * qscale;
542 }
543
547 } else {
548 luma_stride = pic->
linesize[0] << 1;
549 chroma_stride = pic->
linesize[1] << 1;
550 }
551
553 mb_x_shift = 5;
554 log2_chroma_blocks_per_mb = 2;
555 } else {
556 mb_x_shift = 4;
557 log2_chroma_blocks_per_mb = 1;
558 }
559
560 dest_y = pic->
data[0] + (slice->
mb_y << 4) * luma_stride + (slice->
mb_x << 5);
561 dest_u = pic->
data[1] + (slice->
mb_y << 4) * chroma_stride + (slice->
mb_x << mb_x_shift);
562 dest_v = pic->
data[2] + (slice->
mb_y << 4) * chroma_stride + (slice->
mb_x << mb_x_shift);
563 dest_a = pic->
data[3] + (slice->
mb_y << 4) * luma_stride + (slice->
mb_x << 5);
564
570 }
571
573 buf, y_data_size, qmat_luma_scaled);
574 if (ret < 0)
576
579 buf + y_data_size, u_data_size,
580 qmat_chroma_scaled, log2_chroma_blocks_per_mb);
581 if (ret < 0)
583
585 buf + y_data_size + u_data_size, v_data_size,
586 qmat_chroma_scaled, log2_chroma_blocks_per_mb);
587 if (ret < 0)
589 }
590 /* decode alpha plane if available */
593 buf + y_data_size + u_data_size + v_data_size,
595
597 return 0;
598 }
599
601 {
603 int i;
604
606
610
611 return 0;
612 }
613
616 {
620 int buf_size = avpkt->
size;
621 int frame_hdr_size, pic_size,
ret;
622
626 }
627
632
633 buf += 8;
634 buf_size -= 8;
635
637 if (frame_hdr_size < 0)
638 return frame_hdr_size;
639
640 buf += frame_hdr_size;
641 buf_size -= frame_hdr_size;
642
645
648 if (pic_size < 0) {
650 return pic_size;
651 }
652
656 }
657
658 buf += pic_size;
659 buf_size -= pic_size;
660
664 }
665
666 *got_frame = 1;
667
669 }
670
672 {
674
676
677 return 0;
678 }
679
690 };