Indeo 4 decoder
[libav.git] / libavcodec / indeo4.c
1 /*
2 * Indeo Video Interactive v4 compatible decoder
3 * Copyright (c) 2009-2011 Maxim Poliakovski
4 *
5 * This file is part of Libav.
6 *
7 * Libav 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 * Libav 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 Libav; 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 * Indeo Video Interactive version 4 decoder
25 *
26 * Indeo 4 data is usually transported within .avi or .mov files.
27 * Known FOURCCs: 'IV41'
28 */
29
30 #define BITSTREAM_READER_LE
31 #include "avcodec.h"
32 #include "get_bits.h"
33 #include "dsputil.h"
34 #include "ivi_dsp.h"
35 #include "ivi_common.h"
36 #include "indeo4data.h"
37
38 #define IVI4_STREAM_ANALYSER 0
39 #define IVI4_DEBUG_CHECKSUM 0
40
41 /**
42 * Indeo 4 frame types.
43 */
44 enum {
45 FRAMETYPE_INTRA = 0,
46 FRAMETYPE_BIDIR1 = 1, ///< bidirectional frame
47 FRAMETYPE_INTER = 2, ///< non-droppable P-frame
48 FRAMETYPE_BIDIR = 3, ///< bidirectional frame
49 FRAMETYPE_INTER_NOREF = 4, ///< droppable P-frame
50 FRAMETYPE_NULL_FIRST = 5, ///< empty frame with no data
51 FRAMETYPE_NULL_LAST = 6 ///< empty frame with no data
52 };
53
54 #define IVI4_PIC_SIZE_ESC 7
55
56
57 typedef struct {
58 GetBitContext gb;
59 AVFrame frame;
60 RVMapDesc rvmap_tabs[9]; ///< local corrected copy of the static rvmap tables
61
62 uint32_t frame_num;
63 int frame_type;
64 int prev_frame_type; ///< frame type of the previous frame
65 uint32_t data_size; ///< size of the frame data in bytes from picture header
66 int is_scalable;
67 int transp_status; ///< transparency mode status: 1 - enabled
68
69 IVIPicConfig pic_conf;
70 IVIPlaneDesc planes[3]; ///< color planes
71
72 int buf_switch; ///< used to switch between three buffers
73 int dst_buf; ///< buffer index for the currently decoded frame
74 int ref_buf; ///< inter frame reference buffer index
75
76 IVIHuffTab mb_vlc; ///< current macroblock table descriptor
77 IVIHuffTab blk_vlc; ///< current block table descriptor
78
79 uint16_t checksum; ///< frame checksum
80
81 uint8_t rvmap_sel;
82 uint8_t in_imf;
83 uint8_t in_q; ///< flag for explicitly stored quantiser delta
84 uint8_t pic_glob_quant;
85 uint8_t unknown1;
86
87 #if IVI4_STREAM_ANALYSER
88 uint8_t has_b_frames;
89 uint8_t has_transp;
90 uint8_t uses_tiling;
91 uint8_t uses_haar;
92 uint8_t uses_fullpel;
93 #endif
94 } IVI4DecContext;
95
96
97 struct {
98 InvTransformPtr *inv_trans;
99 DCTransformPtr *dc_trans;
100 int is_2d_trans;
101 } transforms[18] = {
102 { ff_ivi_inverse_haar_8x8, ff_ivi_dc_haar_2d, 1 },
103 { NULL, NULL, 0 }, /* inverse Haar 8x1 */
104 { NULL, NULL, 0 }, /* inverse Haar 1x8 */
105 { ff_ivi_put_pixels_8x8, ff_ivi_put_dc_pixel_8x8, 1 },
106 { ff_ivi_inverse_slant_8x8, ff_ivi_dc_slant_2d, 1 },
107 { ff_ivi_row_slant8, ff_ivi_dc_row_slant, 1 },
108 { ff_ivi_col_slant8, ff_ivi_dc_col_slant, 1 },
109 { NULL, NULL, 0 }, /* inverse DCT 8x8 */
110 { NULL, NULL, 0 }, /* inverse DCT 8x1 */
111 { NULL, NULL, 0 }, /* inverse DCT 1x8 */
112 { NULL, NULL, 0 }, /* inverse Haar 4x4 */
113 { ff_ivi_inverse_slant_4x4, ff_ivi_dc_slant_2d, 1 },
114 { NULL, NULL, 0 }, /* no transform 4x4 */
115 { NULL, NULL, 0 }, /* inverse Haar 1x4 */
116 { NULL, NULL, 0 }, /* inverse Haar 4x1 */
117 { NULL, NULL, 0 }, /* inverse slant 1x4 */
118 { NULL, NULL, 0 }, /* inverse slant 4x1 */
119 { NULL, NULL, 0 }, /* inverse DCT 4x4 */
120 };
121
122 /**
123 * Decode subdivision of a plane.
124 * This is a simplified version that checks for two supported subdivisions:
125 * - 1 wavelet band per plane, size factor 1:1, code pattern: 3
126 * - 4 wavelet bands per plane, size factor 1:4, code pattern: 2,3,3,3,3
127 * Anything else is either unsupported or corrupt.
128 *
129 * @param[in,out] gb the GetBit context
130 * @return number of wavelet bands or 0 on error
131 */
132 static int decode_plane_subdivision(GetBitContext *gb)
133 {
134 int i;
135
136 switch (get_bits(gb, 2)) {
137 case 3:
138 return 1;
139 case 2:
140 for (i = 0; i < 4; i++)
141 if (get_bits(gb, 2) != 3)
142 return 0;
143 return 4;
144 default:
145 return 0;
146 }
147 }
148
149 static inline int scale_tile_size(int def_size, int size_factor)
150 {
151 return (size_factor == 15 ? def_size : (size_factor + 1) << 5);
152 }
153
154 /**
155 * Decode Indeo 4 picture header.
156 *
157 * @param[in,out] ctx pointer to the decoder context
158 * @param[in] avctx pointer to the AVCodecContext
159 * @return result code: 0 = OK, negative number = error
160 */
161 static int decode_pic_hdr(IVI4DecContext *ctx, AVCodecContext *avctx)
162 {
163 int pic_size_indx, val, i, p;
164 IVIPicConfig pic_conf;
165
166 if (get_bits(&ctx->gb, 18) != 0x3FFF8) {
167 av_log(avctx, AV_LOG_ERROR, "Invalid picture start code!\n");
168 return AVERROR_INVALIDDATA;
169 }
170
171 ctx->prev_frame_type = ctx->frame_type;
172 ctx->frame_type = get_bits(&ctx->gb, 3);
173 if (ctx->frame_type == 7) {
174 av_log(avctx, AV_LOG_ERROR, "Invalid frame type: %d\n", ctx->frame_type);
175 return AVERROR_INVALIDDATA;
176 }
177
178 #if IVI4_STREAM_ANALYSER
179 if ( ctx->frame_type == FRAMETYPE_BIDIR1
180 || ctx->frame_type == FRAMETYPE_BIDIR)
181 ctx->has_b_frames = 1;
182 #endif
183
184 ctx->transp_status = get_bits1(&ctx->gb);
185 #if IVI4_STREAM_ANALYSER
186 if (ctx->transp_status) {
187 ctx->has_transp = 1;
188 }
189 #endif
190
191 /* unknown bit: Mac decoder ignores this bit, XANIM returns error */
192 if (get_bits1(&ctx->gb)) {
193 av_log(avctx, AV_LOG_ERROR, "Sync bit is set!\n");
194 return AVERROR_INVALIDDATA;
195 }
196
197 ctx->data_size = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 24) : 0;
198
199 /* null frames don't contain anything else so we just return */
200 if (ctx->frame_type >= FRAMETYPE_NULL_FIRST) {
201 av_dlog(avctx, "Null frame encountered!\n");
202 return 0;
203 }
204
205 /* Check key lock status. If enabled - ignore lock word. */
206 /* Usually we have to prompt the user for the password, but */
207 /* we don't do that because Indeo 4 videos can be decoded anyway */
208 if (get_bits1(&ctx->gb)) {
209 skip_bits_long(&ctx->gb, 32);
210 av_dlog(avctx, "Password-protected clip!\n");
211 }
212
213 pic_size_indx = get_bits(&ctx->gb, 3);
214 if (pic_size_indx == IVI4_PIC_SIZE_ESC) {
215 pic_conf.pic_height = get_bits(&ctx->gb, 16);
216 pic_conf.pic_width = get_bits(&ctx->gb, 16);
217 } else {
218 pic_conf.pic_height = ivi4_common_pic_sizes[pic_size_indx * 2 + 1];
219 pic_conf.pic_width = ivi4_common_pic_sizes[pic_size_indx * 2 ];
220 }
221
222 /* Decode tile dimensions. */
223 if (get_bits1(&ctx->gb)) {
224 pic_conf.tile_height = scale_tile_size(pic_conf.pic_height, get_bits(&ctx->gb, 4));
225 pic_conf.tile_width = scale_tile_size(pic_conf.pic_width, get_bits(&ctx->gb, 4));
226 #if IVI4_STREAM_ANALYSER
227 ctx->uses_tiling = 1;
228 #endif
229 } else {
230 pic_conf.tile_height = pic_conf.pic_height;
231 pic_conf.tile_width = pic_conf.pic_width;
232 }
233
234 /* Decode chroma subsampling. We support only 4:4 aka YVU9. */
235 if (get_bits(&ctx->gb, 2)) {
236 av_log(avctx, AV_LOG_ERROR, "Only YVU9 picture format is supported!\n");
237 return AVERROR_INVALIDDATA;
238 }
239 pic_conf.chroma_height = (pic_conf.pic_height + 3) >> 2;
240 pic_conf.chroma_width = (pic_conf.pic_width + 3) >> 2;
241
242 /* decode subdivision of the planes */
243 pic_conf.luma_bands = decode_plane_subdivision(&ctx->gb);
244 if (pic_conf.luma_bands)
245 pic_conf.chroma_bands = decode_plane_subdivision(&ctx->gb);
246 ctx->is_scalable = pic_conf.luma_bands != 1 || pic_conf.chroma_bands != 1;
247 if (ctx->is_scalable && (pic_conf.luma_bands != 4 || pic_conf.chroma_bands != 1)) {
248 av_log(avctx, AV_LOG_ERROR, "Scalability: unsupported subdivision! Luma bands: %d, chroma bands: %d\n",
249 pic_conf.luma_bands, pic_conf.chroma_bands);
250 return AVERROR_INVALIDDATA;
251 }
252
253 /* check if picture layout was changed and reallocate buffers */
254 if (ivi_pic_config_cmp(&pic_conf, &ctx->pic_conf)) {
255 if (ff_ivi_init_planes(ctx->planes, &pic_conf)) {
256 av_log(avctx, AV_LOG_ERROR, "Couldn't reallocate color planes!\n");
257 return AVERROR(ENOMEM);
258 }
259
260 ctx->pic_conf = pic_conf;
261
262 /* set default macroblock/block dimensions */
263 for (p = 0; p <= 2; p++) {
264 for (i = 0; i < (!p ? pic_conf.luma_bands : pic_conf.chroma_bands); i++) {
265 ctx->planes[p].bands[i].mb_size = !p ? (!ctx->is_scalable ? 16 : 8) : 4;
266 ctx->planes[p].bands[i].blk_size = !p ? 8 : 4;
267 }
268 }
269
270 if (ff_ivi_init_tiles(ctx->planes, ctx->pic_conf.tile_width,
271 ctx->pic_conf.tile_height)) {
272 av_log(avctx, AV_LOG_ERROR,
273 "Couldn't reallocate internal structures!\n");
274 return AVERROR(ENOMEM);
275 }
276 }
277
278 ctx->frame_num = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 20) : 0;
279
280 /* skip decTimeEst field if present */
281 if (get_bits1(&ctx->gb))
282 skip_bits(&ctx->gb, 8);
283
284 /* decode macroblock and block huffman codebooks */
285 if (ff_ivi_dec_huff_desc(&ctx->gb, get_bits1(&ctx->gb), IVI_MB_HUFF, &ctx->mb_vlc, avctx) ||
286 ff_ivi_dec_huff_desc(&ctx->gb, get_bits1(&ctx->gb), IVI_BLK_HUFF, &ctx->blk_vlc, avctx))
287 return AVERROR_INVALIDDATA;
288
289 ctx->rvmap_sel = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 8;
290
291 ctx->in_imf = get_bits1(&ctx->gb);
292 ctx->in_q = get_bits1(&ctx->gb);
293
294 ctx->pic_glob_quant = get_bits(&ctx->gb, 5);
295
296 /* TODO: ignore this parameter if unused */
297 ctx->unknown1 = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 0;
298
299 ctx->checksum = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 16) : 0;
300
301 /* skip picture header extension if any */
302 while (get_bits1(&ctx->gb)) {
303 av_dlog(avctx, "Pic hdr extension encountered!\n");
304 val = get_bits(&ctx->gb, 8);
305 }
306
307 if (get_bits1(&ctx->gb)) {
308 av_log(avctx, AV_LOG_ERROR, "Bad blocks bits encountered!\n");
309 }
310
311 align_get_bits(&ctx->gb);
312
313 return 0;
314 }
315
316
317 /**
318 * Decode Indeo 4 band header.
319 *
320 * @param[in,out] ctx pointer to the decoder context
321 * @param[in,out] band pointer to the band descriptor
322 * @param[in] avctx pointer to the AVCodecContext
323 * @return result code: 0 = OK, negative number = error
324 */
325 static int decode_band_hdr(IVI4DecContext *ctx, IVIBandDesc *band,
326 AVCodecContext *avctx)
327 {
328 int plane, band_num, hdr_size, indx, transform_id, scan_indx;
329 int i;
330
331 plane = get_bits(&ctx->gb, 2);
332 band_num = get_bits(&ctx->gb, 4);
333 if (band->plane != plane || band->band_num != band_num) {
334 av_log(avctx, AV_LOG_ERROR, "Invalid band header sequence!\n");
335 return AVERROR_INVALIDDATA;
336 }
337
338 band->is_empty = get_bits1(&ctx->gb);
339 if (!band->is_empty) {
340 hdr_size = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 16) : 4;
341
342 band->is_halfpel = get_bits(&ctx->gb, 2);
343 if (band->is_halfpel >= 2) {
344 av_log(avctx, AV_LOG_ERROR, "Invalid/unsupported mv resolution: %d!\n",
345 band->is_halfpel);
346 return AVERROR_INVALIDDATA;
347 }
348 #if IVI4_STREAM_ANALYSER
349 if (!band->is_halfpel)
350 ctx->uses_fullpel = 1;
351 #endif
352
353 band->checksum_present = get_bits1(&ctx->gb);
354 if (band->checksum_present)
355 band->checksum = get_bits(&ctx->gb, 16);
356
357 indx = get_bits(&ctx->gb, 2);
358 if (indx == 3) {
359 av_log(avctx, AV_LOG_ERROR, "Invalid block size!\n");
360 return AVERROR_INVALIDDATA;
361 }
362 band->mb_size = 16 >> indx;
363 band->blk_size = 8 >> (indx >> 1);
364
365 band->inherit_mv = get_bits1(&ctx->gb);
366 band->inherit_qdelta = get_bits1(&ctx->gb);
367
368 band->glob_quant = get_bits(&ctx->gb, 5);
369
370 if (!get_bits1(&ctx->gb) || ctx->frame_type == FRAMETYPE_INTRA) {
371 transform_id = get_bits(&ctx->gb, 5);
372 if (!transforms[transform_id].inv_trans) {
373 av_log_ask_for_sample(avctx, "Unimplemented transform: %d!\n", transform_id);
374 return AVERROR_PATCHWELCOME;
375 }
376 if ((transform_id >= 7 && transform_id <= 9) ||
377 transform_id == 17) {
378 av_log_ask_for_sample(avctx, "DCT transform not supported yet!\n");
379 return AVERROR_PATCHWELCOME;
380 }
381
382 #if IVI4_STREAM_ANALYSER
383 if ((transform_id >= 0 && transform_id <= 2) || transform_id == 10)
384 ctx->uses_haar = 1;
385 #endif
386
387 band->inv_transform = transforms[transform_id].inv_trans;
388 band->dc_transform = transforms[transform_id].dc_trans;
389 band->is_2d_trans = transforms[transform_id].is_2d_trans;
390
391 scan_indx = get_bits(&ctx->gb, 4);
392 if (scan_indx == 15) {
393 av_log(avctx, AV_LOG_ERROR, "Custom scan pattern encountered!\n");
394 return AVERROR_INVALIDDATA;
395 }
396 band->scan = scan_index_to_tab[scan_indx];
397
398 band->quant_mat = get_bits(&ctx->gb, 5);
399 if (band->quant_mat == 31) {
400 av_log(avctx, AV_LOG_ERROR, "Custom quant matrix encountered!\n");
401 return AVERROR_INVALIDDATA;
402 }
403 }
404
405 /* decode block huffman codebook */
406 if (ff_ivi_dec_huff_desc(&ctx->gb, get_bits1(&ctx->gb), IVI_BLK_HUFF,
407 &band->blk_vlc, avctx))
408 return AVERROR_INVALIDDATA;
409
410 /* select appropriate rvmap table for this band */
411 band->rvmap_sel = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 8;
412
413 /* decode rvmap probability corrections if any */
414 band->num_corr = 0; /* there is no corrections */
415 if (get_bits1(&ctx->gb)) {
416 band->num_corr = get_bits(&ctx->gb, 8); /* get number of correction pairs */
417 if (band->num_corr > 61) {
418 av_log(avctx, AV_LOG_ERROR, "Too many corrections: %d\n",
419 band->num_corr);
420 return AVERROR_INVALIDDATA;
421 }
422
423 /* read correction pairs */
424 for (i = 0; i < band->num_corr * 2; i++)
425 band->corr[i] = get_bits(&ctx->gb, 8);
426 }
427 }
428
429 if (band->blk_size == 8) {
430 band->intra_base = &ivi4_quant_8x8_intra[quant_index_to_tab[band->quant_mat]][0];
431 band->inter_base = &ivi4_quant_8x8_inter[quant_index_to_tab[band->quant_mat]][0];
432 } else {
433 band->intra_base = &ivi4_quant_4x4_intra[quant_index_to_tab[band->quant_mat]][0];
434 band->inter_base = &ivi4_quant_4x4_inter[quant_index_to_tab[band->quant_mat]][0];
435 }
436
437 /* Indeo 4 doesn't use scale tables */
438 band->intra_scale = NULL;
439 band->inter_scale = NULL;
440
441 align_get_bits(&ctx->gb);
442
443 return 0;
444 }
445
446
447 /**
448 * Decode information (block type, cbp, quant delta, motion vector)
449 * for all macroblocks in the current tile.
450 *
451 * @param[in,out] ctx pointer to the decoder context
452 * @param[in,out] band pointer to the band descriptor
453 * @param[in,out] tile pointer to the tile descriptor
454 * @param[in] avctx pointer to the AVCodecContext
455 * @return result code: 0 = OK, negative number = error
456 */
457 static int decode_mb_info(IVI4DecContext *ctx, IVIBandDesc *band,
458 IVITile *tile, AVCodecContext *avctx)
459 {
460 int x, y, mv_x, mv_y, mv_delta, offs, mb_offset, blks_per_mb,
461 mv_scale, mb_type_bits;
462 IVIMbInfo *mb, *ref_mb;
463 int row_offset = band->mb_size * band->pitch;
464
465 mb = tile->mbs;
466 ref_mb = tile->ref_mbs;
467 offs = tile->ypos * band->pitch + tile->xpos;
468
469 blks_per_mb = band->mb_size != band->blk_size ? 4 : 1;
470 mb_type_bits = ctx->frame_type == FRAMETYPE_BIDIR ? 2 : 1;
471
472 /* scale factor for motion vectors */
473 mv_scale = (ctx->planes[0].bands[0].mb_size >> 3) - (band->mb_size >> 3);
474 mv_x = mv_y = 0;
475
476 for (y = tile->ypos; y < tile->ypos + tile->height; y += band->mb_size) {
477 mb_offset = offs;
478
479 for (x = tile->xpos; x < tile->xpos + tile->width; x += band->mb_size) {
480 mb->xpos = x;
481 mb->ypos = y;
482 mb->buf_offs = mb_offset;
483
484 if (get_bits1(&ctx->gb)) {
485 if (ctx->frame_type == FRAMETYPE_INTRA) {
486 av_log(avctx, AV_LOG_ERROR, "Empty macroblock in an INTRA picture!\n");
487 return AVERROR_INVALIDDATA;
488 }
489 mb->type = 1; /* empty macroblocks are always INTER */
490 mb->cbp = 0; /* all blocks are empty */
491
492 mb->q_delta = 0;
493 if (!band->plane && !band->band_num && ctx->in_q) {
494 mb->q_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
495 IVI_VLC_BITS, 1);
496 mb->q_delta = IVI_TOSIGNED(mb->q_delta);
497 }
498
499 mb->mv_x = mb->mv_y = 0; /* no motion vector coded */
500 if (band->inherit_mv) {
501 /* motion vector inheritance */
502 if (mv_scale) {
503 mb->mv_x = ivi_scale_mv(ref_mb->mv_x, mv_scale);
504 mb->mv_y = ivi_scale_mv(ref_mb->mv_y, mv_scale);
505 } else {
506 mb->mv_x = ref_mb->mv_x;
507 mb->mv_y = ref_mb->mv_y;
508 }
509 }
510 } else {
511 if (band->inherit_mv) {
512 mb->type = ref_mb->type; /* copy mb_type from corresponding reference mb */
513 } else if (ctx->frame_type == FRAMETYPE_INTRA) {
514 mb->type = 0; /* mb_type is always INTRA for intra-frames */
515 } else {
516 mb->type = get_bits(&ctx->gb, mb_type_bits);
517 }
518
519 mb->cbp = get_bits(&ctx->gb, blks_per_mb);
520
521 mb->q_delta = 0;
522 if (band->inherit_qdelta) {
523 if (ref_mb) mb->q_delta = ref_mb->q_delta;
524 } else if (mb->cbp || (!band->plane && !band->band_num &&
525 ctx->in_q)) {
526 mb->q_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
527 IVI_VLC_BITS, 1);
528 mb->q_delta = IVI_TOSIGNED(mb->q_delta);
529 }
530
531 if (!mb->type) {
532 mb->mv_x = mb->mv_y = 0; /* there is no motion vector in intra-macroblocks */
533 } else {
534 if (band->inherit_mv) {
535 /* motion vector inheritance */
536 if (mv_scale) {
537 mb->mv_x = ivi_scale_mv(ref_mb->mv_x, mv_scale);
538 mb->mv_y = ivi_scale_mv(ref_mb->mv_y, mv_scale);
539 } else {
540 mb->mv_x = ref_mb->mv_x;
541 mb->mv_y = ref_mb->mv_y;
542 }
543 } else {
544 /* decode motion vector deltas */
545 mv_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
546 IVI_VLC_BITS, 1);
547 mv_y += IVI_TOSIGNED(mv_delta);
548 mv_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
549 IVI_VLC_BITS, 1);
550 mv_x += IVI_TOSIGNED(mv_delta);
551 mb->mv_x = mv_x;
552 mb->mv_y = mv_y;
553 }
554 }
555 }
556
557 mb++;
558 if (ref_mb)
559 ref_mb++;
560 mb_offset += band->mb_size;
561 }
562
563 offs += row_offset;
564 }
565
566 align_get_bits(&ctx->gb);
567
568 return 0;
569 }
570
571
572 /**
573 * Decode an Indeo 4 band.
574 *
575 * @param[in,out] ctx pointer to the decoder context
576 * @param[in,out] band pointer to the band descriptor
577 * @param[in] avctx pointer to the AVCodecContext
578 * @return result code: 0 = OK, negative number = error
579 */
580 static int decode_band(IVI4DecContext *ctx, int plane_num,
581 IVIBandDesc *band, AVCodecContext *avctx)
582 {
583 int result, i, t, pos, idx1, idx2;
584 IVITile *tile;
585
586 band->buf = band->bufs[ctx->dst_buf];
587 band->ref_buf = band->bufs[ctx->ref_buf];
588
589 result = decode_band_hdr(ctx, band, avctx);
590 if (result) {
591 av_log(avctx, AV_LOG_ERROR, "Error decoding band header\n");
592 return result;
593 }
594
595 if (band->is_empty) {
596 av_log(avctx, AV_LOG_ERROR, "Empty band encountered!\n");
597 return AVERROR_INVALIDDATA;
598 }
599
600 band->rv_map = &ctx->rvmap_tabs[band->rvmap_sel];
601
602 /* apply corrections to the selected rvmap table if present */
603 for (i = 0; i < band->num_corr; i++) {
604 idx1 = band->corr[i * 2];
605 idx2 = band->corr[i * 2 + 1];
606 FFSWAP(uint8_t, band->rv_map->runtab[idx1], band->rv_map->runtab[idx2]);
607 FFSWAP(int16_t, band->rv_map->valtab[idx1], band->rv_map->valtab[idx2]);
608 }
609
610 pos = get_bits_count(&ctx->gb);
611
612 for (t = 0; t < band->num_tiles; t++) {
613 tile = &band->tiles[t];
614
615 tile->is_empty = get_bits1(&ctx->gb);
616 if (tile->is_empty) {
617 ff_ivi_process_empty_tile(avctx, band, tile,
618 (ctx->planes[0].bands[0].mb_size >> 3) - (band->mb_size >> 3));
619 av_dlog(avctx, "Empty tile encountered!\n");
620 } else {
621 tile->data_size = ff_ivi_dec_tile_data_size(&ctx->gb);
622 if (!tile->data_size) {
623 av_log(avctx, AV_LOG_ERROR, "Tile data size is zero!\n");
624 return AVERROR_INVALIDDATA;
625 }
626
627 result = decode_mb_info(ctx, band, tile, avctx);
628 if (result < 0)
629 break;
630
631 result = ff_ivi_decode_blocks(&ctx->gb, band, tile);
632 if (result < 0 || ((get_bits_count(&ctx->gb) - pos) >> 3) != tile->data_size) {
633 av_log(avctx, AV_LOG_ERROR, "Corrupted tile data encountered!\n");
634 break;
635 }
636
637 pos += tile->data_size << 3; // skip to next tile
638 }
639 }
640
641 /* restore the selected rvmap table by applying its corrections in reverse order */
642 for (i = band->num_corr - 1; i >= 0; i--) {
643 idx1 = band->corr[i * 2];
644 idx2 = band->corr[i * 2 + 1];
645 FFSWAP(uint8_t, band->rv_map->runtab[idx1], band->rv_map->runtab[idx2]);
646 FFSWAP(int16_t, band->rv_map->valtab[idx1], band->rv_map->valtab[idx2]);
647 }
648
649 #if defined(DEBUG) && IVI4_DEBUG_CHECKSUM
650 if (band->checksum_present) {
651 uint16_t chksum = ivi_calc_band_checksum(band);
652 if (chksum != band->checksum) {
653 av_log(avctx, AV_LOG_ERROR,
654 "Band checksum mismatch! Plane %d, band %d, received: %x, calculated: %x\n",
655 band->plane, band->band_num, band->checksum, chksum);
656 }
657 }
658 #endif
659
660 align_get_bits(&ctx->gb);
661
662 return 0;
663 }
664
665
666 static av_cold int decode_init(AVCodecContext *avctx)
667 {
668 IVI4DecContext *ctx = avctx->priv_data;
669
670 ff_ivi_init_static_vlc();
671
672 /* copy rvmap tables in our context so we can apply changes to them */
673 memcpy(ctx->rvmap_tabs, ff_ivi_rvmap_tabs, sizeof(ff_ivi_rvmap_tabs));
674
675 /* Force allocation of the internal buffers */
676 /* during picture header decoding. */
677 ctx->pic_conf.pic_width = 0;
678 ctx->pic_conf.pic_height = 0;
679
680 avctx->pix_fmt = PIX_FMT_YUV410P;
681
682 return 0;
683 }
684
685
686 /**
687 * Rearrange decoding and reference buffers.
688 *
689 * @param[in,out] ctx pointer to the decoder context
690 */
691 static void switch_buffers(IVI4DecContext *ctx)
692 {
693 switch (ctx->prev_frame_type) {
694 case FRAMETYPE_INTRA:
695 case FRAMETYPE_INTER:
696 ctx->buf_switch ^= 1;
697 ctx->dst_buf = ctx->buf_switch;
698 ctx->ref_buf = ctx->buf_switch ^ 1;
699 break;
700 case FRAMETYPE_INTER_NOREF:
701 break;
702 }
703
704 switch (ctx->frame_type) {
705 case FRAMETYPE_INTRA:
706 ctx->buf_switch = 0;
707 /* FALLTHROUGH */
708 case FRAMETYPE_INTER:
709 ctx->dst_buf = ctx->buf_switch;
710 ctx->ref_buf = ctx->buf_switch ^ 1;
711 break;
712 case FRAMETYPE_INTER_NOREF:
713 case FRAMETYPE_NULL_FIRST:
714 case FRAMETYPE_NULL_LAST:
715 break;
716 }
717 }
718
719
720 static int decode_frame(AVCodecContext *avctx, void *data, int *data_size,
721 AVPacket *avpkt)
722 {
723 IVI4DecContext *ctx = avctx->priv_data;
724 const uint8_t *buf = avpkt->data;
725 int buf_size = avpkt->size;
726 int result, p, b;
727
728 init_get_bits(&ctx->gb, buf, buf_size * 8);
729
730 result = decode_pic_hdr(ctx, avctx);
731 if (result) {
732 av_log(avctx, AV_LOG_ERROR, "Error decoding picture header\n");
733 return result;
734 }
735
736 switch_buffers(ctx);
737
738 if (ctx->frame_type < FRAMETYPE_NULL_FIRST) {
739 for (p = 0; p < 3; p++) {
740 for (b = 0; b < ctx->planes[p].num_bands; b++) {
741 result = decode_band(ctx, p, &ctx->planes[p].bands[b], avctx);
742 if (result) {
743 av_log(avctx, AV_LOG_ERROR,
744 "Error decoding band: %d, plane: %d\n", b, p);
745 return result;
746 }
747 }
748 }
749 }
750
751 /* If the bidirectional mode is enabled, next I and the following P frame will */
752 /* be sent together. Unfortunately the approach below seems to be the only way */
753 /* to handle the B-frames mode. That's exactly the same Intel decoders do. */
754 if (ctx->frame_type == FRAMETYPE_INTRA) {
755 while (get_bits(&ctx->gb, 8)); // skip version string
756 skip_bits_long(&ctx->gb, 64); // skip padding, TODO: implement correct 8-bytes alignment
757 if (get_bits_left(&ctx->gb) > 18 && show_bits(&ctx->gb, 18) == 0x3FFF8)
758 av_log(avctx, AV_LOG_ERROR, "Buffer contains IP frames!\n");
759 }
760
761 if (ctx->frame.data[0])
762 avctx->release_buffer(avctx, &ctx->frame);
763
764 ctx->frame.reference = 0;
765 if ((result = avctx->get_buffer(avctx, &ctx->frame)) < 0) {
766 av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
767 return result;
768 }
769
770 if (ctx->is_scalable) {
771 ff_ivi_recompose_haar(&ctx->planes[0], ctx->frame.data[0], ctx->frame.linesize[0], 4);
772 } else {
773 ff_ivi_output_plane(&ctx->planes[0], ctx->frame.data[0], ctx->frame.linesize[0]);
774 }
775
776 ff_ivi_output_plane(&ctx->planes[2], ctx->frame.data[1], ctx->frame.linesize[1]);
777 ff_ivi_output_plane(&ctx->planes[1], ctx->frame.data[2], ctx->frame.linesize[2]);
778
779 *data_size = sizeof(AVFrame);
780 *(AVFrame*)data = ctx->frame;
781
782 return buf_size;
783 }
784
785
786 static av_cold int decode_close(AVCodecContext *avctx)
787 {
788 IVI4DecContext *ctx = avctx->priv_data;
789
790 ff_ivi_free_buffers(&ctx->planes[0]);
791
792 if (ctx->frame.data[0])
793 avctx->release_buffer(avctx, &ctx->frame);
794
795 #if IVI4_STREAM_ANALYSER
796 if (ctx->is_scalable)
797 av_log(avctx, AV_LOG_ERROR, "This video uses scalability mode!\n");
798 if (ctx->uses_tiling)
799 av_log(avctx, AV_LOG_ERROR, "This video uses local decoding!\n");
800 if (ctx->has_b_frames)
801 av_log(avctx, AV_LOG_ERROR, "This video contains B-frames!\n");
802 if (ctx->has_transp)
803 av_log(avctx, AV_LOG_ERROR, "Transparency mode is enabled!\n");
804 if (ctx->uses_haar)
805 av_log(avctx, AV_LOG_ERROR, "This video uses Haar transform!\n");
806 if (ctx->uses_fullpel)
807 av_log(avctx, AV_LOG_ERROR, "This video uses fullpel motion vectors!\n");
808 #endif
809
810 return 0;
811 }
812
813
814 AVCodec ff_indeo4_decoder = {
815 .name = "indeo4",
816 .type = AVMEDIA_TYPE_VIDEO,
817 .id = CODEC_ID_INDEO4,
818 .priv_data_size = sizeof(IVI4DecContext),
819 .init = decode_init,
820 .close = decode_close,
821 .decode = decode_frame,
822 .long_name = NULL_IF_CONFIG_SMALL("Intel Indeo Video Interactive 4"),
823 };