indeo4.c
Go to the documentation of this file.
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 
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 
41 enum {
49 };
50 
51 #define IVI4_PIC_SIZE_ESC 7
52 
53 
54 static const struct {
58 } transforms[18] = {
60  { NULL, NULL, 0 }, /* inverse Haar 8x1 */
61  { NULL, NULL, 0 }, /* inverse Haar 1x8 */
66  { NULL, NULL, 0 }, /* inverse DCT 8x8 */
67  { NULL, NULL, 0 }, /* inverse DCT 8x1 */
68  { NULL, NULL, 0 }, /* inverse DCT 1x8 */
69  { NULL, NULL, 0 }, /* inverse Haar 4x4 */
71  { NULL, NULL, 0 }, /* no transform 4x4 */
72  { NULL, NULL, 0 }, /* inverse Haar 1x4 */
73  { NULL, NULL, 0 }, /* inverse Haar 4x1 */
74  { NULL, NULL, 0 }, /* inverse slant 1x4 */
75  { NULL, NULL, 0 }, /* inverse slant 4x1 */
76  { NULL, NULL, 0 }, /* inverse DCT 4x4 */
77 };
78 
90 {
91  int i;
92 
93  switch (get_bits(gb, 2)) {
94  case 3:
95  return 1;
96  case 2:
97  for (i = 0; i < 4; i++)
98  if (get_bits(gb, 2) != 3)
99  return 0;
100  return 4;
101  default:
102  return 0;
103  }
104 }
105 
106 static inline int scale_tile_size(int def_size, int size_factor)
107 {
108  return size_factor == 15 ? def_size : (size_factor + 1) << 5;
109 }
110 
119 {
120  int pic_size_indx, i, p;
121  IVIPicConfig pic_conf;
122 
123  if (get_bits(&ctx->gb, 18) != 0x3FFF8) {
124  av_log(avctx, AV_LOG_ERROR, "Invalid picture start code!\n");
125  return AVERROR_INVALIDDATA;
126  }
127 
128  ctx->prev_frame_type = ctx->frame_type;
129  ctx->frame_type = get_bits(&ctx->gb, 3);
130  if (ctx->frame_type == 7) {
131  av_log(avctx, AV_LOG_ERROR, "Invalid frame type: %d\n", ctx->frame_type);
132  return AVERROR_INVALIDDATA;
133  }
134 
135 #if IVI4_STREAM_ANALYSER
136  if ( ctx->frame_type == FRAMETYPE_BIDIR1
137  || ctx->frame_type == FRAMETYPE_BIDIR)
138  ctx->has_b_frames = 1;
139 #endif
140 
141  ctx->transp_status = get_bits1(&ctx->gb);
142 #if IVI4_STREAM_ANALYSER
143  if (ctx->transp_status) {
144  ctx->has_transp = 1;
145  }
146 #endif
147 
148  /* unknown bit: Mac decoder ignores this bit, XANIM returns error */
149  if (get_bits1(&ctx->gb)) {
150  av_log(avctx, AV_LOG_ERROR, "Sync bit is set!\n");
151  return AVERROR_INVALIDDATA;
152  }
153 
154  ctx->data_size = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 24) : 0;
155 
156  /* null frames don't contain anything else so we just return */
157  if (ctx->frame_type >= FRAMETYPE_NULL_FIRST) {
158  av_dlog(avctx, "Null frame encountered!\n");
159  return 0;
160  }
161 
162  /* Check key lock status. If enabled - ignore lock word. */
163  /* Usually we have to prompt the user for the password, but */
164  /* we don't do that because Indeo 4 videos can be decoded anyway */
165  if (get_bits1(&ctx->gb)) {
166  skip_bits_long(&ctx->gb, 32);
167  av_dlog(avctx, "Password-protected clip!\n");
168  }
169 
170  pic_size_indx = get_bits(&ctx->gb, 3);
171  if (pic_size_indx == IVI4_PIC_SIZE_ESC) {
172  pic_conf.pic_height = get_bits(&ctx->gb, 16);
173  pic_conf.pic_width = get_bits(&ctx->gb, 16);
174  } else {
175  pic_conf.pic_height = ivi4_common_pic_sizes[pic_size_indx * 2 + 1];
176  pic_conf.pic_width = ivi4_common_pic_sizes[pic_size_indx * 2 ];
177  }
178 
179  /* Decode tile dimensions. */
180  if (get_bits1(&ctx->gb)) {
181  pic_conf.tile_height = scale_tile_size(pic_conf.pic_height, get_bits(&ctx->gb, 4));
182  pic_conf.tile_width = scale_tile_size(pic_conf.pic_width, get_bits(&ctx->gb, 4));
183 #if IVI4_STREAM_ANALYSER
184  ctx->uses_tiling = 1;
185 #endif
186  } else {
187  pic_conf.tile_height = pic_conf.pic_height;
188  pic_conf.tile_width = pic_conf.pic_width;
189  }
190 
191  /* Decode chroma subsampling. We support only 4:4 aka YVU9. */
192  if (get_bits(&ctx->gb, 2)) {
193  av_log(avctx, AV_LOG_ERROR, "Only YVU9 picture format is supported!\n");
194  return AVERROR_INVALIDDATA;
195  }
196  pic_conf.chroma_height = (pic_conf.pic_height + 3) >> 2;
197  pic_conf.chroma_width = (pic_conf.pic_width + 3) >> 2;
198 
199  /* decode subdivision of the planes */
200  pic_conf.luma_bands = decode_plane_subdivision(&ctx->gb);
201  if (pic_conf.luma_bands)
202  pic_conf.chroma_bands = decode_plane_subdivision(&ctx->gb);
203  ctx->is_scalable = pic_conf.luma_bands != 1 || pic_conf.chroma_bands != 1;
204  if (ctx->is_scalable && (pic_conf.luma_bands != 4 || pic_conf.chroma_bands != 1)) {
205  av_log(avctx, AV_LOG_ERROR, "Scalability: unsupported subdivision! Luma bands: %d, chroma bands: %d\n",
206  pic_conf.luma_bands, pic_conf.chroma_bands);
207  return AVERROR_INVALIDDATA;
208  }
209 
210  /* check if picture layout was changed and reallocate buffers */
211  if (ivi_pic_config_cmp(&pic_conf, &ctx->pic_conf)) {
212  if (ff_ivi_init_planes(ctx->planes, &pic_conf)) {
213  av_log(avctx, AV_LOG_ERROR, "Couldn't reallocate color planes!\n");
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 
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 
283  AVCodecContext *avctx)
284 {
285  int plane, band_num, indx, transform_id, scan_indx;
286  int i;
287 
288  plane = get_bits(&ctx->gb, 2);
289  band_num = get_bits(&ctx->gb, 4);
290  if (band->plane != plane || band->band_num != band_num) {
291  av_log(avctx, AV_LOG_ERROR, "Invalid band header sequence!\n");
292  return AVERROR_INVALIDDATA;
293  }
294 
295  band->is_empty = get_bits1(&ctx->gb);
296  if (!band->is_empty) {
297  /* skip header size
298  * If header size is not given, header size is 4 bytes. */
299  if (get_bits1(&ctx->gb))
300  skip_bits(&ctx->gb, 16);
301 
302  band->is_halfpel = get_bits(&ctx->gb, 2);
303  if (band->is_halfpel >= 2) {
304  av_log(avctx, AV_LOG_ERROR, "Invalid/unsupported mv resolution: %d!\n",
305  band->is_halfpel);
306  return AVERROR_INVALIDDATA;
307  }
308 #if IVI4_STREAM_ANALYSER
309  if (!band->is_halfpel)
310  ctx->uses_fullpel = 1;
311 #endif
312 
313  band->checksum_present = get_bits1(&ctx->gb);
314  if (band->checksum_present)
315  band->checksum = get_bits(&ctx->gb, 16);
316 
317  indx = get_bits(&ctx->gb, 2);
318  if (indx == 3) {
319  av_log(avctx, AV_LOG_ERROR, "Invalid block size!\n");
320  return AVERROR_INVALIDDATA;
321  }
322  band->mb_size = 16 >> indx;
323  band->blk_size = 8 >> (indx >> 1);
324 
325  band->inherit_mv = get_bits1(&ctx->gb);
326  band->inherit_qdelta = get_bits1(&ctx->gb);
327 
328  band->glob_quant = get_bits(&ctx->gb, 5);
329 
330  if (!get_bits1(&ctx->gb) || ctx->frame_type == FRAMETYPE_INTRA) {
331  transform_id = get_bits(&ctx->gb, 5);
332  if (transform_id >= FF_ARRAY_ELEMS(transforms) ||
333  !transforms[transform_id].inv_trans) {
334  av_log_ask_for_sample(avctx, "Unimplemented transform: %d!\n", transform_id);
335  return AVERROR_PATCHWELCOME;
336  }
337  if ((transform_id >= 7 && transform_id <= 9) ||
338  transform_id == 17) {
339  av_log_ask_for_sample(avctx, "DCT transform not supported yet!\n");
340  return AVERROR_PATCHWELCOME;
341  }
342 
343 #if IVI4_STREAM_ANALYSER
344  if ((transform_id >= 0 && transform_id <= 2) || transform_id == 10)
345  ctx->uses_haar = 1;
346 #endif
347 
348  band->inv_transform = transforms[transform_id].inv_trans;
349  band->dc_transform = transforms[transform_id].dc_trans;
350  band->is_2d_trans = transforms[transform_id].is_2d_trans;
351 
352  scan_indx = get_bits(&ctx->gb, 4);
353  if (scan_indx == 15) {
354  av_log(avctx, AV_LOG_ERROR, "Custom scan pattern encountered!\n");
355  return AVERROR_INVALIDDATA;
356  }
357  band->scan = scan_index_to_tab[scan_indx];
358 
359  band->quant_mat = get_bits(&ctx->gb, 5);
360  if (band->quant_mat == 31) {
361  av_log(avctx, AV_LOG_ERROR, "Custom quant matrix encountered!\n");
362  return AVERROR_INVALIDDATA;
363  }
364  }
365 
366  /* decode block huffman codebook */
367  if (ff_ivi_dec_huff_desc(&ctx->gb, get_bits1(&ctx->gb), IVI_BLK_HUFF,
368  &band->blk_vlc, avctx))
369  return AVERROR_INVALIDDATA;
370 
371  /* select appropriate rvmap table for this band */
372  band->rvmap_sel = get_bits1(&ctx->gb) ? get_bits(&ctx->gb, 3) : 8;
373 
374  /* decode rvmap probability corrections if any */
375  band->num_corr = 0; /* there is no corrections */
376  if (get_bits1(&ctx->gb)) {
377  band->num_corr = get_bits(&ctx->gb, 8); /* get number of correction pairs */
378  if (band->num_corr > 61) {
379  av_log(avctx, AV_LOG_ERROR, "Too many corrections: %d\n",
380  band->num_corr);
381  return AVERROR_INVALIDDATA;
382  }
383 
384  /* read correction pairs */
385  for (i = 0; i < band->num_corr * 2; i++)
386  band->corr[i] = get_bits(&ctx->gb, 8);
387  }
388  }
389 
390  if (band->blk_size == 8) {
392  band->inter_base = &ivi4_quant_8x8_inter[quant_index_to_tab[band->quant_mat]][0];
393  } else {
395  band->inter_base = &ivi4_quant_4x4_inter[quant_index_to_tab[band->quant_mat]][0];
396  }
397 
398  /* Indeo 4 doesn't use scale tables */
399  band->intra_scale = NULL;
400  band->inter_scale = NULL;
401 
402  align_get_bits(&ctx->gb);
403 
404  return 0;
405 }
406 
407 
419  IVITile *tile, AVCodecContext *avctx)
420 {
421  int x, y, mv_x, mv_y, mv_delta, offs, mb_offset, blks_per_mb,
422  mv_scale, mb_type_bits;
423  IVIMbInfo *mb, *ref_mb;
424  int row_offset = band->mb_size * band->pitch;
425 
426  mb = tile->mbs;
427  ref_mb = tile->ref_mbs;
428  offs = tile->ypos * band->pitch + tile->xpos;
429 
430  blks_per_mb = band->mb_size != band->blk_size ? 4 : 1;
431  mb_type_bits = ctx->frame_type == FRAMETYPE_BIDIR ? 2 : 1;
432 
433  /* scale factor for motion vectors */
434  mv_scale = (ctx->planes[0].bands[0].mb_size >> 3) - (band->mb_size >> 3);
435  mv_x = mv_y = 0;
436 
437  for (y = tile->ypos; y < tile->ypos + tile->height; y += band->mb_size) {
438  mb_offset = offs;
439 
440  for (x = tile->xpos; x < tile->xpos + tile->width; x += band->mb_size) {
441  mb->xpos = x;
442  mb->ypos = y;
443  mb->buf_offs = mb_offset;
444 
445  if (get_bits1(&ctx->gb)) {
446  if (ctx->frame_type == FRAMETYPE_INTRA) {
447  av_log(avctx, AV_LOG_ERROR, "Empty macroblock in an INTRA picture!\n");
448  return AVERROR_INVALIDDATA;
449  }
450  mb->type = 1; /* empty macroblocks are always INTER */
451  mb->cbp = 0; /* all blocks are empty */
452 
453  mb->q_delta = 0;
454  if (!band->plane && !band->band_num && ctx->in_q) {
455  mb->q_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
456  IVI_VLC_BITS, 1);
457  mb->q_delta = IVI_TOSIGNED(mb->q_delta);
458  }
459 
460  mb->mv_x = mb->mv_y = 0; /* no motion vector coded */
461  if (band->inherit_mv) {
462  /* motion vector inheritance */
463  if (mv_scale) {
464  mb->mv_x = ivi_scale_mv(ref_mb->mv_x, mv_scale);
465  mb->mv_y = ivi_scale_mv(ref_mb->mv_y, mv_scale);
466  } else {
467  mb->mv_x = ref_mb->mv_x;
468  mb->mv_y = ref_mb->mv_y;
469  }
470  }
471  } else {
472  if (band->inherit_mv) {
473  mb->type = ref_mb->type; /* copy mb_type from corresponding reference mb */
474  } else if (ctx->frame_type == FRAMETYPE_INTRA) {
475  mb->type = 0; /* mb_type is always INTRA for intra-frames */
476  } else {
477  mb->type = get_bits(&ctx->gb, mb_type_bits);
478  }
479 
480  mb->cbp = get_bits(&ctx->gb, blks_per_mb);
481 
482  mb->q_delta = 0;
483  if (band->inherit_qdelta) {
484  if (ref_mb) mb->q_delta = ref_mb->q_delta;
485  } else if (mb->cbp || (!band->plane && !band->band_num &&
486  ctx->in_q)) {
487  mb->q_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
488  IVI_VLC_BITS, 1);
489  mb->q_delta = IVI_TOSIGNED(mb->q_delta);
490  }
491 
492  if (!mb->type) {
493  mb->mv_x = mb->mv_y = 0; /* there is no motion vector in intra-macroblocks */
494  } else {
495  if (band->inherit_mv) {
496  /* motion vector inheritance */
497  if (mv_scale) {
498  mb->mv_x = ivi_scale_mv(ref_mb->mv_x, mv_scale);
499  mb->mv_y = ivi_scale_mv(ref_mb->mv_y, mv_scale);
500  } else {
501  mb->mv_x = ref_mb->mv_x;
502  mb->mv_y = ref_mb->mv_y;
503  }
504  } else {
505  /* decode motion vector deltas */
506  mv_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
507  IVI_VLC_BITS, 1);
508  mv_y += IVI_TOSIGNED(mv_delta);
509  mv_delta = get_vlc2(&ctx->gb, ctx->mb_vlc.tab->table,
510  IVI_VLC_BITS, 1);
511  mv_x += IVI_TOSIGNED(mv_delta);
512  mb->mv_x = mv_x;
513  mb->mv_y = mv_y;
514  }
515  }
516  }
517 
518  mb++;
519  if (ref_mb)
520  ref_mb++;
521  mb_offset += band->mb_size;
522  }
523 
524  offs += row_offset;
525  }
526 
527  align_get_bits(&ctx->gb);
528 
529  return 0;
530 }
531 
532 
539 {
540  switch (ctx->prev_frame_type) {
541  case FRAMETYPE_INTRA:
542  case FRAMETYPE_INTER:
543  ctx->buf_switch ^= 1;
544  ctx->dst_buf = ctx->buf_switch;
545  ctx->ref_buf = ctx->buf_switch ^ 1;
546  break;
548  break;
549  }
550 
551  switch (ctx->frame_type) {
552  case FRAMETYPE_INTRA:
553  ctx->buf_switch = 0;
554  /* FALLTHROUGH */
555  case FRAMETYPE_INTER:
556  ctx->dst_buf = ctx->buf_switch;
557  ctx->ref_buf = ctx->buf_switch ^ 1;
558  break;
561  case FRAMETYPE_NULL_LAST:
562  break;
563  }
564 }
565 
566 
568 {
569  return ctx->frame_type < FRAMETYPE_NULL_FIRST;
570 }
571 
572 
574 {
575  IVI45DecContext *ctx = avctx->priv_data;
576 
578 
579  /* copy rvmap tables in our context so we can apply changes to them */
580  memcpy(ctx->rvmap_tabs, ff_ivi_rvmap_tabs, sizeof(ff_ivi_rvmap_tabs));
581 
582  /* Force allocation of the internal buffers */
583  /* during picture header decoding. */
584  ctx->pic_conf.pic_width = 0;
585  ctx->pic_conf.pic_height = 0;
586 
587  avctx->pix_fmt = PIX_FMT_YUV410P;
588 
594 
595  return 0;
596 }
597 
598 
600  .name = "indeo4",
601  .type = AVMEDIA_TYPE_VIDEO,
602  .id = CODEC_ID_INDEO4,
603  .priv_data_size = sizeof(IVI45DecContext),
604  .init = decode_init,
607  .long_name = NULL_IF_CONFIG_SMALL("Intel Indeo Video Interactive 4"),
608 };