Merge commit '0cb83c563848bf8f8365e7bd30e7e6b57ef360f0'
[ffmpeg.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 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  * 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 "ivi_dsp.h"
34 #include "ivi_common.h"
35 #include "indeo4data.h"
36
37 /**
38  *  Indeo 4 frame types.
39  */
40 enum {
41     FRAMETYPE_INTRA       = 0,
42     FRAMETYPE_INTRA1      = 1,  ///< intra frame with slightly different bitstream coding
43     FRAMETYPE_INTER       = 2,  ///< non-droppable P-frame
44     FRAMETYPE_BIDIR       = 3,  ///< bidirectional frame
45     FRAMETYPE_INTER_NOREF = 4,  ///< droppable P-frame
46     FRAMETYPE_NULL_FIRST  = 5,  ///< empty frame with no data
47     FRAMETYPE_NULL_LAST   = 6   ///< empty frame with no data
48 };
49
50 #define IVI4_PIC_SIZE_ESC   7
51
52
53 static const struct {
54     InvTransformPtr *inv_trans;
55     DCTransformPtr  *dc_trans;
56     int             is_2d_trans;
57 } transforms[18] = {
58     { ff_ivi_inverse_haar_8x8,  ff_ivi_dc_haar_2d,       1 },
59     { ff_ivi_row_haar8,         ff_ivi_dc_haar_2d,       0 },
60     { ff_ivi_col_haar8,         ff_ivi_dc_haar_2d,       0 },
61     { ff_ivi_put_pixels_8x8,    ff_ivi_put_dc_pixel_8x8, 1 },
62     { ff_ivi_inverse_slant_8x8, ff_ivi_dc_slant_2d,      1 },
63     { ff_ivi_row_slant8,        ff_ivi_dc_row_slant,     1 },
64     { ff_ivi_col_slant8,        ff_ivi_dc_col_slant,     1 },
65     { NULL, NULL, 0 }, /* inverse DCT 8x8 */
66     { NULL, NULL, 0 }, /* inverse DCT 8x1 */
67     { NULL, NULL, 0 }, /* inverse DCT 1x8 */
68     { ff_ivi_inverse_haar_4x4,  ff_ivi_dc_haar_2d,       1 },
69     { ff_ivi_inverse_slant_4x4, ff_ivi_dc_slant_2d,      1 },
70     { NULL, NULL, 0 }, /* no transform 4x4 */
71     { ff_ivi_row_haar4,         ff_ivi_dc_haar_2d,       0 },
72     { ff_ivi_col_haar4,         ff_ivi_dc_haar_2d,       0 },
73     { ff_ivi_row_slant4,        ff_ivi_dc_row_slant,     0 },
74     { ff_ivi_col_slant4,        ff_ivi_dc_col_slant,     0 },
75     { NULL, NULL, 0 }, /* inverse DCT 4x4 */
76 };
77
78 /**
79  *  Decode subdivision of a plane.
80  *  This is a simplified version that checks for two supported subdivisions:
81  *  - 1 wavelet band  per plane, size factor 1:1, code pattern: 3
82  *  - 4 wavelet bands per plane, size factor 1:4, code pattern: 2,3,3,3,3
83  *  Anything else is either unsupported or corrupt.
84  *
85  *  @param[in,out] gb    the GetBit context
86  *  @return        number of wavelet bands or 0 on error
87  */
88 static int decode_plane_subdivision(GetBitContext *gb)
89 {
90     int i;
91
92     switch (get_bits(gb, 2)) {
93     case 3:
94         return 1;
95     case 2:
96         for (i = 0; i < 4; i++)
97             if (get_bits(gb, 2) != 3)
98                 return 0;
99         return 4;
100     default:
101         return 0;
102     }
103 }
104
105 static inline int scale_tile_size(int def_size, int size_factor)
106 {
107     return size_factor == 15 ? def_size : (size_factor + 1) << 5;
108 }
109
110 /**
111  *  Decode Indeo 4 picture header.
112  *
113  *  @param[in,out] ctx       pointer to the decoder context
114  *  @param[in]     avctx     pointer to the AVCodecContext
115  *  @return        result code: 0 = OK, negative number = error
116  */
117 static int decode_pic_hdr(IVI45DecContext *ctx, AVCodecContext *avctx)
118 {
119     int             pic_size_indx, i, p;
120     IVIPicConfig    pic_conf;
121
122     if (get_bits(&ctx->gb, 18) != 0x3FFF8) {
123         av_log(avctx, AV_LOG_ERROR, "Invalid picture start code!\n");
124         return AVERROR_INVALIDDATA;
125     }
126
127     ctx->prev_frame_type = ctx->frame_type;
128     ctx->frame_type      = get_bits(&ctx->gb, 3);
129     if (ctx->frame_type == 7) {
130         av_log(avctx, AV_LOG_ERROR, "Invalid frame type: %d\n", ctx->frame_type);
131         return AVERROR_INVALIDDATA;
132     }
133
134 #if IVI4_STREAM_ANALYSER
135     if (ctx->frame_type == FRAMETYPE_BIDIR)
136         ctx->has_b_frames = 1;
137 #endif
138
139     ctx->transp_status = get_bits1(&ctx->gb);
140 #if IVI4_STREAM_ANALYSER
141     if (ctx->transp_status) {
142         ctx->has_transp = 1;
143     }
144 #endif
145
146     /* unknown bit: Mac decoder ignores this bit, XANIM returns error */
147     if (get_bits1(&ctx->gb)) {
148         av_log(avctx, AV_LOG_ERROR, "Sync bit is set!\n");
149         return AVERROR_INVALIDDATA;
150     }
151
152     ctx->data_size = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 24) : 0;
153
154     /* null frames don't contain anything else so we just return */
155     if (ctx->frame_type >= FRAMETYPE_NULL_FIRST) {
156         av_dlog(avctx, "Null frame encountered!\n");
157         return 0;
158     }
159
160     /* Check key lock status. If enabled - ignore lock word.         */
161     /* Usually we have to prompt the user for the password, but      */
162     /* we don't do that because Indeo 4 videos can be decoded anyway */
163     if (get_bits1(&ctx->gb)) {
164         skip_bits_long(&ctx->gb, 32);
165         av_dlog(avctx, "Password-protected clip!\n");
166     }
167
168     pic_size_indx = get_bits(&ctx->gb, 3);
169     if (pic_size_indx == IVI4_PIC_SIZE_ESC) {
170         pic_conf.pic_height = get_bits(&ctx->gb, 16);
171         pic_conf.pic_width  = get_bits(&ctx->gb, 16);
172     } else {
173         pic_conf.pic_height = ivi4_common_pic_sizes[pic_size_indx * 2 + 1];
174         pic_conf.pic_width  = ivi4_common_pic_sizes[pic_size_indx * 2    ];
175     }
176
177     /* Decode tile dimensions. */
178     if (get_bits1(&ctx->gb)) {
179         pic_conf.tile_height = scale_tile_size(pic_conf.pic_height, get_bits(&ctx->gb, 4));
180         pic_conf.tile_width  = scale_tile_size(pic_conf.pic_width,  get_bits(&ctx->gb, 4));
181 #if IVI4_STREAM_ANALYSER
182         ctx->uses_tiling = 1;
183 #endif
184     } else {
185         pic_conf.tile_height = pic_conf.pic_height;
186         pic_conf.tile_width  = pic_conf.pic_width;
187     }
188
189     /* Decode chroma subsampling. We support only 4:4 aka YVU9. */
190     if (get_bits(&ctx->gb, 2)) {
191         av_log(avctx, AV_LOG_ERROR, "Only YVU9 picture format is supported!\n");
192         return AVERROR_INVALIDDATA;
193     }
194     pic_conf.chroma_height = (pic_conf.pic_height + 3) >> 2;
195     pic_conf.chroma_width  = (pic_conf.pic_width  + 3) >> 2;
196
197     /* decode subdivision of the planes */
198     pic_conf.luma_bands = decode_plane_subdivision(&ctx->gb);
199     pic_conf.chroma_bands = 0;
200     if (pic_conf.luma_bands)
201         pic_conf.chroma_bands = decode_plane_subdivision(&ctx->gb);
202     ctx->is_scalable = pic_conf.luma_bands != 1 || pic_conf.chroma_bands != 1;
203     if (ctx->is_scalable && (pic_conf.luma_bands != 4 || pic_conf.chroma_bands != 1)) {
204         av_log(avctx, AV_LOG_ERROR, "Scalability: unsupported subdivision! Luma bands: %d, chroma bands: %d\n",
205                pic_conf.luma_bands, pic_conf.chroma_bands);
206         return AVERROR_INVALIDDATA;
207     }
208
209     /* check if picture layout was changed and reallocate buffers */
210     if (ivi_pic_config_cmp(&pic_conf, &ctx->pic_conf)) {
211         if (ff_ivi_init_planes(ctx->planes, &pic_conf)) {
212             av_log(avctx, AV_LOG_ERROR, "Couldn't reallocate color planes!\n");
213             ctx->pic_conf.luma_bands = 0;
214             return AVERROR(ENOMEM);
215         }
216
217         ctx->pic_conf = pic_conf;
218
219         /* set default macroblock/block dimensions */
220         for (p = 0; p <= 2; p++) {
221             for (i = 0; i < (!p ? pic_conf.luma_bands : pic_conf.chroma_bands); i++) {
222                 ctx->planes[p].bands[i].mb_size  = !p ? (!ctx->is_scalable ? 16 : 8) : 4;
223                 ctx->planes[p].bands[i].blk_size = !p ? 8 : 4;
224             }
225         }
226
227         if (ff_ivi_init_tiles(ctx->planes, ctx->pic_conf.tile_width,
228                               ctx->pic_conf.tile_height)) {
229             av_log(avctx, AV_LOG_ERROR,
230                    "Couldn't reallocate internal structures!\n");
231             return AVERROR(ENOMEM);
232         }
233     }
234
235     ctx->frame_num = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 20) : 0;
236
237     /* skip decTimeEst field if present */
238     if (get_bits1(&ctx->gb))
239         skip_bits(&ctx->gb, 8);
240
241     /* decode macroblock and block huffman codebooks */
242     if (ff_ivi_dec_huff_desc(&ctx->gb, get_bits1(&ctx->gb), IVI_MB_HUFF,  &ctx->mb_vlc,  avctx) ||
243         ff_ivi_dec_huff_desc(&ctx->gb, get_bits1(&ctx->gb), IVI_BLK_HUFF, &ctx->blk_vlc, avctx))
244         return AVERROR_INVALIDDATA;
245
246     ctx->rvmap_sel = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 8;
247
248     ctx->in_imf = get_bits1(&ctx->gb);
249     ctx->in_q   = get_bits1(&ctx->gb);
250
251     ctx->pic_glob_quant = get_bits(&ctx->gb, 5);
252
253     /* TODO: ignore this parameter if unused */
254     ctx->unknown1 = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 0;
255
256     ctx->checksum = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 16) : 0;
257
258     /* skip picture header extension if any */
259     while (get_bits1(&ctx->gb)) {
260         av_dlog(avctx, "Pic hdr extension encountered!\n");
261         skip_bits(&ctx->gb, 8);
262     }
263
264     if (get_bits1(&ctx->gb)) {
265         av_log(avctx, AV_LOG_ERROR, "Bad blocks bits encountered!\n");
266     }
267
268     align_get_bits(&ctx->gb);
269
270     return 0;
271 }
272
273
274 /**
275  *  Decode Indeo 4 band header.
276  *
277  *  @param[in,out] ctx       pointer to the decoder context
278  *  @param[in,out] band      pointer to the band descriptor
279  *  @param[in]     avctx     pointer to the AVCodecContext
280  *  @return        result code: 0 = OK, negative number = error
281  */
282 static int decode_band_hdr(IVI45DecContext *ctx, IVIBandDesc *band,
283                            AVCodecContext *avctx)
284 {
285     int plane, band_num, indx, transform_id, scan_indx;
286     int i;
287     int quant_mat;
288
289     plane    = get_bits(&ctx->gb, 2);
290     band_num = get_bits(&ctx->gb, 4);
291     if (band->plane != plane || band->band_num != band_num) {
292         av_log(avctx, AV_LOG_ERROR, "Invalid band header sequence!\n");
293         return AVERROR_INVALIDDATA;
294     }
295
296     band->is_empty = get_bits1(&ctx->gb);
297     if (!band->is_empty) {
298         int old_blk_size = band->blk_size;
299         /* skip header size
300          * If header size is not given, header size is 4 bytes. */
301         if (get_bits1(&ctx->gb))
302             skip_bits(&ctx->gb, 16);
303
304         band->is_halfpel = get_bits(&ctx->gb, 2);
305         if (band->is_halfpel >= 2) {
306             av_log(avctx, AV_LOG_ERROR, "Invalid/unsupported mv resolution: %d!\n",
307                    band->is_halfpel);
308             return AVERROR_INVALIDDATA;
309         }
310 #if IVI4_STREAM_ANALYSER
311         if (!band->is_halfpel)
312             ctx->uses_fullpel = 1;
313 #endif
314
315         band->checksum_present = get_bits1(&ctx->gb);
316         if (band->checksum_present)
317             band->checksum = get_bits(&ctx->gb, 16);
318
319         indx = get_bits(&ctx->gb, 2);
320         if (indx == 3) {
321             av_log(avctx, AV_LOG_ERROR, "Invalid block size!\n");
322             return AVERROR_INVALIDDATA;
323         }
324         band->mb_size  = 16 >> indx;
325         band->blk_size = 8 >> (indx >> 1);
326
327         band->inherit_mv     = get_bits1(&ctx->gb);
328         band->inherit_qdelta = get_bits1(&ctx->gb);
329
330         band->glob_quant = get_bits(&ctx->gb, 5);
331
332         if (!get_bits1(&ctx->gb) || ctx->frame_type == FRAMETYPE_INTRA) {
333             transform_id = get_bits(&ctx->gb, 5);
334             if (transform_id >= FF_ARRAY_ELEMS(transforms) ||
335                 !transforms[transform_id].inv_trans) {
336                 avpriv_request_sample(avctx, "Transform %d", transform_id);
337                 return AVERROR_PATCHWELCOME;
338             }
339             if ((transform_id >= 7 && transform_id <= 9) ||
340                  transform_id == 17) {
341                 avpriv_request_sample(avctx, "DCT transform");
342                 return AVERROR_PATCHWELCOME;
343             }
344
345             if (transform_id < 10 && band->blk_size < 8) {
346                 av_log(avctx, AV_LOG_ERROR, "wrong transform size!\n");
347                 return AVERROR_INVALIDDATA;
348             }
349 #if IVI4_STREAM_ANALYSER
350             if ((transform_id >= 0 && transform_id <= 2) || transform_id == 10)
351                 ctx->uses_haar = 1;
352 #endif
353
354             band->inv_transform = transforms[transform_id].inv_trans;
355             band->dc_transform  = transforms[transform_id].dc_trans;
356             band->is_2d_trans   = transforms[transform_id].is_2d_trans;
357
358             if (transform_id < 10)
359                 band->transform_size = 8;
360             else
361                 band->transform_size = 4;
362
363             if (band->blk_size != band->transform_size) {
364                 av_log(avctx, AV_LOG_ERROR, "transform and block size mismatch (%d != %d)\n", band->transform_size, band->blk_size);
365                 return AVERROR_INVALIDDATA;
366             }
367
368             scan_indx = get_bits(&ctx->gb, 4);
369             if (scan_indx == 15) {
370                 av_log(avctx, AV_LOG_ERROR, "Custom scan pattern encountered!\n");
371                 return AVERROR_INVALIDDATA;
372             }
373             if (scan_indx > 4 && scan_indx < 10) {
374                 if (band->blk_size != 4) {
375                     av_log(avctx, AV_LOG_ERROR, "mismatching scan table!\n");
376                     return AVERROR_INVALIDDATA;
377                 }
378             } else if (band->blk_size != 8) {
379                 av_log(avctx, AV_LOG_ERROR, "mismatching scan table!\n");
380                 return AVERROR_INVALIDDATA;
381             }
382
383             band->scan = scan_index_to_tab[scan_indx];
384             band->scan_size = band->blk_size;
385
386             quant_mat = get_bits(&ctx->gb, 5);
387             if (quant_mat == 31) {
388                 av_log(avctx, AV_LOG_ERROR, "Custom quant matrix encountered!\n");
389                 return AVERROR_INVALIDDATA;
390             }
391             if (quant_mat >= FF_ARRAY_ELEMS(quant_index_to_tab)) {
392                 avpriv_request_sample(avctx, "Quantization matrix %d",
393                                       quant_mat);
394                 return AVERROR_INVALIDDATA;
395             }
396             band->quant_mat = quant_mat;
397         } else {
398             if (old_blk_size != band->blk_size) {
399                 av_log(avctx, AV_LOG_ERROR,
400                        "The band block size does not match the configuration "
401                        "inherited\n");
402                 return AVERROR_INVALIDDATA;
403             }
404         }
405         if (quant_index_to_tab[band->quant_mat] > 4 && band->blk_size == 4) {
406             av_log(avctx, AV_LOG_ERROR, "Invalid quant matrix for 4x4 block encountered!\n");
407             band->quant_mat = 0;
408             return AVERROR_INVALIDDATA;
409         }
410         if (band->scan_size != band->blk_size) {
411             av_log(avctx, AV_LOG_ERROR, "mismatching scan table!\n");
412             return AVERROR_INVALIDDATA;
413         }
414         if (band->transform_size == 8 && band->blk_size < 8) {
415             av_log(avctx, AV_LOG_ERROR, "mismatching transform_size!\n");
416             return AVERROR_INVALIDDATA;
417         }
418
419         /* decode block huffman codebook */
420         if (!get_bits1(&ctx->gb))
421             band->blk_vlc.tab = ctx->blk_vlc.tab;
422         else
423             if (ff_ivi_dec_huff_desc(&ctx->gb, 1, IVI_BLK_HUFF,
424                                      &band->blk_vlc, avctx))
425                 return AVERROR_INVALIDDATA;
426
427         /* select appropriate rvmap table for this band */
428         band->rvmap_sel = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 8;
429
430         /* decode rvmap probability corrections if any */
431         band->num_corr = 0; /* there is no corrections */
432         if (get_bits1(&ctx->gb)) {
433             band->num_corr = get_bits(&ctx->gb, 8); /* get number of correction pairs */
434             if (band->num_corr > 61) {
435                 av_log(avctx, AV_LOG_ERROR, "Too many corrections: %d\n",
436                        band->num_corr);
437                 return AVERROR_INVALIDDATA;
438             }
439
440             /* read correction pairs */
441             for (i = 0; i < band->num_corr * 2; i++)
442                 band->corr[i] = get_bits(&ctx->gb, 8);
443         }
444     }
445
446     if (band->blk_size == 8) {
447         band->intra_base = &ivi4_quant_8x8_intra[quant_index_to_tab[band->quant_mat]][0];
448         band->inter_base = &ivi4_quant_8x8_inter[quant_index_to_tab[band->quant_mat]][0];
449     } else {
450         band->intra_base = &ivi4_quant_4x4_intra[quant_index_to_tab[band->quant_mat]][0];
451         band->inter_base = &ivi4_quant_4x4_inter[quant_index_to_tab[band->quant_mat]][0];
452     }
453
454     /* Indeo 4 doesn't use scale tables */
455     band->intra_scale = NULL;
456     band->inter_scale = NULL;
457
458     align_get_bits(&ctx->gb);
459
460     if (!band->scan) {
461         av_log(avctx, AV_LOG_ERROR, "band->scan not set\n");
462         return AVERROR_INVALIDDATA;
463     }
464
465     return 0;
466 }
467
468
469 /**
470  *  Decode information (block type, cbp, quant delta, motion vector)
471  *  for all macroblocks in the current tile.
472  *
473  *  @param[in,out] ctx       pointer to the decoder context
474  *  @param[in,out] band      pointer to the band descriptor
475  *  @param[in,out] tile      pointer to the tile descriptor
476  *  @param[in]     avctx     pointer to the AVCodecContext
477  *  @return        result code: 0 = OK, negative number = error
478  */
479 static int decode_mb_info(IVI45DecContext *ctx, IVIBandDesc *band,
480                           IVITile *tile, AVCodecContext *avctx)
481 {
482     int         x, y, mv_x, mv_y, mv_delta, offs, mb_offset, blks_per_mb,
483                 mv_scale, mb_type_bits, s;
484     IVIMbInfo   *mb, *ref_mb;
485     int         row_offset = band->mb_size * band->pitch;
486
487     mb     = tile->mbs;
488     ref_mb = tile->ref_mbs;
489     offs   = tile->ypos * band->pitch + tile->xpos;
490
491     blks_per_mb  = band->mb_size   != band->blk_size  ? 4 : 1;
492     mb_type_bits = ctx->frame_type == FRAMETYPE_BIDIR ? 2 : 1;
493
494     /* scale factor for motion vectors */
495     mv_scale = (ctx->planes[0].bands[0].mb_size >> 3) - (band->mb_size >> 3);
496     mv_x = mv_y = 0;
497
498     if (((tile->width + band->mb_size-1)/band->mb_size) * ((tile->height + band->mb_size-1)/band->mb_size) != tile->num_MBs) {
499         av_log(avctx, AV_LOG_ERROR, "num_MBs mismatch %d %d %d %d\n", tile->width, tile->height, band->mb_size, tile->num_MBs);
500         return -1;
501     }
502
503     for (y = tile->ypos; y < tile->ypos + tile->height; y += band->mb_size) {
504         mb_offset = offs;
505
506         for (x = tile->xpos; x < tile->xpos + tile->width; x += band->mb_size) {
507             mb->xpos     = x;
508             mb->ypos     = y;
509             mb->buf_offs = mb_offset;
510
511             if (get_bits1(&ctx->gb)) {
512                 if (ctx->frame_type == FRAMETYPE_INTRA) {
513                     av_log(avctx, AV_LOG_ERROR, "Empty macroblock in an INTRA picture!\n");
514                     return AVERROR_INVALIDDATA;
515                 }
516                 mb->type = 1; /* empty macroblocks are always INTER */
517                 mb->cbp  = 0; /* all blocks are empty */
518
519                 mb->q_delta = 0;
520                 if (!band->plane && !band->band_num && ctx->in_q) {
521                     mb->q_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
522                                            IVI_VLC_BITS, 1);
523                     mb->q_delta = IVI_TOSIGNED(mb->q_delta);
524                 }
525
526                 mb->mv_x = mb->mv_y = 0; /* no motion vector coded */
527                 if (band->inherit_mv && ref_mb) {
528                     /* motion vector inheritance */
529                     if (mv_scale) {
530                         mb->mv_x = ivi_scale_mv(ref_mb->mv_x, mv_scale);
531                         mb->mv_y = ivi_scale_mv(ref_mb->mv_y, mv_scale);
532                     } else {
533                         mb->mv_x = ref_mb->mv_x;
534                         mb->mv_y = ref_mb->mv_y;
535                     }
536                 }
537             } else {
538                 if (band->inherit_mv) {
539                     /* copy mb_type from corresponding reference mb */
540                     if (!ref_mb) {
541                         av_log(avctx, AV_LOG_ERROR, "ref_mb unavailable\n");
542                         return AVERROR_INVALIDDATA;
543                     }
544                     mb->type = ref_mb->type;
545                 } else if (ctx->frame_type == FRAMETYPE_INTRA ||
546                            ctx->frame_type == FRAMETYPE_INTRA1) {
547                     mb->type = 0; /* mb_type is always INTRA for intra-frames */
548                 } else {
549                     mb->type = get_bits(&ctx->gb, mb_type_bits);
550                 }
551
552                 mb->cbp = get_bits(&ctx->gb, blks_per_mb);
553
554                 mb->q_delta = 0;
555                 if (band->inherit_qdelta) {
556                     if (ref_mb) mb->q_delta = ref_mb->q_delta;
557                 } else if (mb->cbp || (!band->plane && !band->band_num &&
558                            ctx->in_q)) {
559                     mb->q_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
560                                            IVI_VLC_BITS, 1);
561                     mb->q_delta = IVI_TOSIGNED(mb->q_delta);
562                 }
563
564                 if (!mb->type) {
565                     mb->mv_x = mb->mv_y = 0; /* there is no motion vector in intra-macroblocks */
566                 } else {
567                     if (band->inherit_mv) {
568                         if (ref_mb)
569                             /* motion vector inheritance */
570                             if (mv_scale) {
571                                 mb->mv_x = ivi_scale_mv(ref_mb->mv_x, mv_scale);
572                                 mb->mv_y = ivi_scale_mv(ref_mb->mv_y, mv_scale);
573                             } else {
574                                 mb->mv_x = ref_mb->mv_x;
575                                 mb->mv_y = ref_mb->mv_y;
576                             }
577                     } else {
578                         /* decode motion vector deltas */
579                         mv_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
580                                             IVI_VLC_BITS, 1);
581                         mv_y += IVI_TOSIGNED(mv_delta);
582                         mv_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
583                                             IVI_VLC_BITS, 1);
584                         mv_x += IVI_TOSIGNED(mv_delta);
585                         mb->mv_x = mv_x;
586                         mb->mv_y = mv_y;
587                     }
588                 }
589             }
590
591             s= band->is_halfpel;
592             if (mb->type)
593             if ( x +  (mb->mv_x   >>s) +                 (y+               (mb->mv_y   >>s))*band->pitch < 0 ||
594                  x + ((mb->mv_x+s)>>s) + band->mb_size - 1
595                    + (y+band->mb_size - 1 +((mb->mv_y+s)>>s))*band->pitch > band->bufsize -1) {
596                 av_log(avctx, AV_LOG_ERROR, "motion vector %d %d outside reference\n", x*s + mb->mv_x, y*s + mb->mv_y);
597                 return AVERROR_INVALIDDATA;
598             }
599
600             mb++;
601             if (ref_mb)
602                 ref_mb++;
603             mb_offset += band->mb_size;
604         }
605
606         offs += row_offset;
607     }
608
609     align_get_bits(&ctx->gb);
610
611     return 0;
612 }
613
614
615 /**
616  *  Rearrange decoding and reference buffers.
617  *
618  *  @param[in,out] ctx       pointer to the decoder context
619  */
620 static void switch_buffers(IVI45DecContext *ctx)
621 {
622     switch (ctx->prev_frame_type) {
623     case FRAMETYPE_INTRA:
624     case FRAMETYPE_INTRA1:
625     case FRAMETYPE_INTER:
626         ctx->buf_switch ^= 1;
627         ctx->dst_buf     = ctx->buf_switch;
628         ctx->ref_buf     = ctx->buf_switch ^ 1;
629         break;
630     case FRAMETYPE_INTER_NOREF:
631         break;
632     }
633
634     switch (ctx->frame_type) {
635     case FRAMETYPE_INTRA:
636     case FRAMETYPE_INTRA1:
637         ctx->buf_switch = 0;
638         /* FALLTHROUGH */
639     case FRAMETYPE_INTER:
640         ctx->dst_buf = ctx->buf_switch;
641         ctx->ref_buf = ctx->buf_switch ^ 1;
642         break;
643     case FRAMETYPE_INTER_NOREF:
644     case FRAMETYPE_NULL_FIRST:
645     case FRAMETYPE_NULL_LAST:
646         break;
647     }
648 }
649
650
651 static int is_nonnull_frame(IVI45DecContext *ctx)
652 {
653     return ctx->frame_type < FRAMETYPE_NULL_FIRST;
654 }
655
656
657 static av_cold int decode_init(AVCodecContext *avctx)
658 {
659     IVI45DecContext *ctx = avctx->priv_data;
660
661     ff_ivi_init_static_vlc();
662
663     /* copy rvmap tables in our context so we can apply changes to them */
664     memcpy(ctx->rvmap_tabs, ff_ivi_rvmap_tabs, sizeof(ff_ivi_rvmap_tabs));
665
666     /* Force allocation of the internal buffers */
667     /* during picture header decoding.          */
668     ctx->pic_conf.pic_width  = 0;
669     ctx->pic_conf.pic_height = 0;
670
671     avctx->pix_fmt = AV_PIX_FMT_YUV410P;
672
673     ctx->decode_pic_hdr   = decode_pic_hdr;
674     ctx->decode_band_hdr  = decode_band_hdr;
675     ctx->decode_mb_info   = decode_mb_info;
676     ctx->switch_buffers   = switch_buffers;
677     ctx->is_nonnull_frame = is_nonnull_frame;
678
679     return 0;
680 }
681
682
683 AVCodec ff_indeo4_decoder = {
684     .name           = "indeo4",
685     .long_name      = NULL_IF_CONFIG_SMALL("Intel Indeo Video Interactive 4"),
686     .type           = AVMEDIA_TYPE_VIDEO,
687     .id             = AV_CODEC_ID_INDEO4,
688     .priv_data_size = sizeof(IVI45DecContext),
689     .init           = decode_init,
690     .close          = ff_ivi_decode_close,
691     .decode         = ff_ivi_decode_frame,
692     .capabilities   = CODEC_CAP_DR1,
693 };