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