mpeg4videodec.c
Go to the documentation of this file.
1 /*
2  * MPEG4 decoder.
3  * Copyright (c) 2000,2001 Fabrice Bellard
4  * Copyright (c) 2002-2010 Michael Niedermayer <michaelni@gmx.at>
5  *
6  * This file is part of Libav.
7  *
8  * Libav is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * Libav is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with Libav; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22 
23 #include "mpegvideo.h"
24 #include "mpeg4video.h"
25 #include "h263.h"
26 #include "thread.h"
27 
28 // The defines below define the number of bits that are read at once for
29 // reading vlc values. Changing these may improve speed and data cache needs
30 // be aware though that decreasing them may need the number of stages that is
31 // passed to get_vlc* to be increased.
32 #define SPRITE_TRAJ_VLC_BITS 6
33 #define DC_VLC_BITS 9
34 #define MB_TYPE_B_VLC_BITS 4
35 
36 
40 
41 static const int mb_type_b_map[4]= {
46 };
47 
54  int dir)
55 {
56  int i;
57  int16_t *ac_val, *ac_val1;
58  int8_t * const qscale_table = s->current_picture.f.qscale_table;
59 
60  /* find prediction */
61  ac_val = s->ac_val[0][0] + s->block_index[n] * 16;
62  ac_val1 = ac_val;
63  if (s->ac_pred) {
64  if (dir == 0) {
65  const int xy= s->mb_x-1 + s->mb_y*s->mb_stride;
66  /* left prediction */
67  ac_val -= 16;
68 
69  if(s->mb_x==0 || s->qscale == qscale_table[xy] || n==1 || n==3){
70  /* same qscale */
71  for(i=1;i<8;i++) {
72  block[s->dsp.idct_permutation[i<<3]] += ac_val[i];
73  }
74  }else{
75  /* different qscale, we must rescale */
76  for(i=1;i<8;i++) {
77  block[s->dsp.idct_permutation[i<<3]] += ROUNDED_DIV(ac_val[i]*qscale_table[xy], s->qscale);
78  }
79  }
80  } else {
81  const int xy= s->mb_x + s->mb_y*s->mb_stride - s->mb_stride;
82  /* top prediction */
83  ac_val -= 16 * s->block_wrap[n];
84 
85  if(s->mb_y==0 || s->qscale == qscale_table[xy] || n==2 || n==3){
86  /* same qscale */
87  for(i=1;i<8;i++) {
88  block[s->dsp.idct_permutation[i]] += ac_val[i + 8];
89  }
90  }else{
91  /* different qscale, we must rescale */
92  for(i=1;i<8;i++) {
93  block[s->dsp.idct_permutation[i]] += ROUNDED_DIV(ac_val[i + 8]*qscale_table[xy], s->qscale);
94  }
95  }
96  }
97  }
98  /* left copy */
99  for(i=1;i<8;i++)
100  ac_val1[i ] = block[s->dsp.idct_permutation[i<<3]];
101 
102  /* top copy */
103  for(i=1;i<8;i++)
104  ac_val1[8 + i] = block[s->dsp.idct_permutation[i ]];
105 
106 }
107 
112 static inline int mpeg4_is_resync(MpegEncContext *s){
113  int bits_count= get_bits_count(&s->gb);
114  int v= show_bits(&s->gb, 16);
115 
117  return 0;
118  }
119 
120  while(v<=0xFF){
121  if(s->pict_type==AV_PICTURE_TYPE_B || (v>>(8-s->pict_type)!=1) || s->partitioned_frame)
122  break;
123  skip_bits(&s->gb, 8+s->pict_type);
124  bits_count+= 8+s->pict_type;
125  v= show_bits(&s->gb, 16);
126  }
127 
128  if(bits_count + 8 >= s->gb.size_in_bits){
129  v>>=8;
130  v|= 0x7F >> (7-(bits_count&7));
131 
132  if(v==0x7F)
133  return 1;
134  }else{
135  if(v == ff_mpeg4_resync_prefix[bits_count&7]){
136  int len;
137  GetBitContext gb= s->gb;
138 
139  skip_bits(&s->gb, 1);
140  align_get_bits(&s->gb);
141 
142  for(len=0; len<32; len++){
143  if(get_bits1(&s->gb)) break;
144  }
145 
146  s->gb= gb;
147 
149  return 1;
150  }
151  }
152  return 0;
153 }
154 
156 {
157  int i;
158  int a= 2<<s->sprite_warping_accuracy;
159  int rho= 3-s->sprite_warping_accuracy;
160  int r=16/a;
161  const int vop_ref[4][2]= {{0,0}, {s->width,0}, {0, s->height}, {s->width, s->height}}; // only true for rectangle shapes
162  int d[4][2]={{0,0}, {0,0}, {0,0}, {0,0}};
163  int sprite_ref[4][2];
164  int virtual_ref[2][2];
165  int w2, h2, w3, h3;
166  int alpha=0, beta=0;
167  int w= s->width;
168  int h= s->height;
169  int min_ab;
170 
171  if (w <= 0 || h <= 0)
172  return AVERROR_INVALIDDATA;
173 
174  for(i=0; i<s->num_sprite_warping_points; i++){
175  int length;
176  int x=0, y=0;
177 
178  length= get_vlc2(gb, sprite_trajectory.table, SPRITE_TRAJ_VLC_BITS, 3);
179  if(length){
180  x= get_xbits(gb, length);
181  }
182  if(!(s->divx_version==500 && s->divx_build==413)) skip_bits1(gb); /* marker bit */
183 
184  length= get_vlc2(gb, sprite_trajectory.table, SPRITE_TRAJ_VLC_BITS, 3);
185  if(length){
186  y=get_xbits(gb, length);
187  }
188  skip_bits1(gb); /* marker bit */
189  s->sprite_traj[i][0]= d[i][0]= x;
190  s->sprite_traj[i][1]= d[i][1]= y;
191  }
192  for(; i<4; i++)
193  s->sprite_traj[i][0]= s->sprite_traj[i][1]= 0;
194 
195  while((1<<alpha)<w) alpha++;
196  while((1<<beta )<h) beta++; // there seems to be a typo in the mpeg4 std for the definition of w' and h'
197  w2= 1<<alpha;
198  h2= 1<<beta;
199 
200 // Note, the 4th point isn't used for GMC
201  if(s->divx_version==500 && s->divx_build==413){
202  sprite_ref[0][0]= a*vop_ref[0][0] + d[0][0];
203  sprite_ref[0][1]= a*vop_ref[0][1] + d[0][1];
204  sprite_ref[1][0]= a*vop_ref[1][0] + d[0][0] + d[1][0];
205  sprite_ref[1][1]= a*vop_ref[1][1] + d[0][1] + d[1][1];
206  sprite_ref[2][0]= a*vop_ref[2][0] + d[0][0] + d[2][0];
207  sprite_ref[2][1]= a*vop_ref[2][1] + d[0][1] + d[2][1];
208  } else {
209  sprite_ref[0][0]= (a>>1)*(2*vop_ref[0][0] + d[0][0]);
210  sprite_ref[0][1]= (a>>1)*(2*vop_ref[0][1] + d[0][1]);
211  sprite_ref[1][0]= (a>>1)*(2*vop_ref[1][0] + d[0][0] + d[1][0]);
212  sprite_ref[1][1]= (a>>1)*(2*vop_ref[1][1] + d[0][1] + d[1][1]);
213  sprite_ref[2][0]= (a>>1)*(2*vop_ref[2][0] + d[0][0] + d[2][0]);
214  sprite_ref[2][1]= (a>>1)*(2*vop_ref[2][1] + d[0][1] + d[2][1]);
215  }
216 /* sprite_ref[3][0]= (a>>1)*(2*vop_ref[3][0] + d[0][0] + d[1][0] + d[2][0] + d[3][0]);
217  sprite_ref[3][1]= (a>>1)*(2*vop_ref[3][1] + d[0][1] + d[1][1] + d[2][1] + d[3][1]); */
218 
219 // this is mostly identical to the mpeg4 std (and is totally unreadable because of that ...)
220 // perhaps it should be reordered to be more readable ...
221 // the idea behind this virtual_ref mess is to be able to use shifts later per pixel instead of divides
222 // so the distance between points is converted from w&h based to w2&h2 based which are of the 2^x form
223  virtual_ref[0][0]= 16*(vop_ref[0][0] + w2)
224  + ROUNDED_DIV(((w - w2)*(r*sprite_ref[0][0] - 16*vop_ref[0][0]) + w2*(r*sprite_ref[1][0] - 16*vop_ref[1][0])),w);
225  virtual_ref[0][1]= 16*vop_ref[0][1]
226  + ROUNDED_DIV(((w - w2)*(r*sprite_ref[0][1] - 16*vop_ref[0][1]) + w2*(r*sprite_ref[1][1] - 16*vop_ref[1][1])),w);
227  virtual_ref[1][0]= 16*vop_ref[0][0]
228  + ROUNDED_DIV(((h - h2)*(r*sprite_ref[0][0] - 16*vop_ref[0][0]) + h2*(r*sprite_ref[2][0] - 16*vop_ref[2][0])),h);
229  virtual_ref[1][1]= 16*(vop_ref[0][1] + h2)
230  + ROUNDED_DIV(((h - h2)*(r*sprite_ref[0][1] - 16*vop_ref[0][1]) + h2*(r*sprite_ref[2][1] - 16*vop_ref[2][1])),h);
231 
232  switch(s->num_sprite_warping_points)
233  {
234  case 0:
235  s->sprite_offset[0][0]= 0;
236  s->sprite_offset[0][1]= 0;
237  s->sprite_offset[1][0]= 0;
238  s->sprite_offset[1][1]= 0;
239  s->sprite_delta[0][0]= a;
240  s->sprite_delta[0][1]= 0;
241  s->sprite_delta[1][0]= 0;
242  s->sprite_delta[1][1]= a;
243  s->sprite_shift[0]= 0;
244  s->sprite_shift[1]= 0;
245  break;
246  case 1: //GMC only
247  s->sprite_offset[0][0]= sprite_ref[0][0] - a*vop_ref[0][0];
248  s->sprite_offset[0][1]= sprite_ref[0][1] - a*vop_ref[0][1];
249  s->sprite_offset[1][0]= ((sprite_ref[0][0]>>1)|(sprite_ref[0][0]&1)) - a*(vop_ref[0][0]/2);
250  s->sprite_offset[1][1]= ((sprite_ref[0][1]>>1)|(sprite_ref[0][1]&1)) - a*(vop_ref[0][1]/2);
251  s->sprite_delta[0][0]= a;
252  s->sprite_delta[0][1]= 0;
253  s->sprite_delta[1][0]= 0;
254  s->sprite_delta[1][1]= a;
255  s->sprite_shift[0]= 0;
256  s->sprite_shift[1]= 0;
257  break;
258  case 2:
259  s->sprite_offset[0][0]= (sprite_ref[0][0]<<(alpha+rho))
260  + (-r*sprite_ref[0][0] + virtual_ref[0][0])*(-vop_ref[0][0])
261  + ( r*sprite_ref[0][1] - virtual_ref[0][1])*(-vop_ref[0][1])
262  + (1<<(alpha+rho-1));
263  s->sprite_offset[0][1]= (sprite_ref[0][1]<<(alpha+rho))
264  + (-r*sprite_ref[0][1] + virtual_ref[0][1])*(-vop_ref[0][0])
265  + (-r*sprite_ref[0][0] + virtual_ref[0][0])*(-vop_ref[0][1])
266  + (1<<(alpha+rho-1));
267  s->sprite_offset[1][0]= ( (-r*sprite_ref[0][0] + virtual_ref[0][0])*(-2*vop_ref[0][0] + 1)
268  +( r*sprite_ref[0][1] - virtual_ref[0][1])*(-2*vop_ref[0][1] + 1)
269  +2*w2*r*sprite_ref[0][0]
270  - 16*w2
271  + (1<<(alpha+rho+1)));
272  s->sprite_offset[1][1]= ( (-r*sprite_ref[0][1] + virtual_ref[0][1])*(-2*vop_ref[0][0] + 1)
273  +(-r*sprite_ref[0][0] + virtual_ref[0][0])*(-2*vop_ref[0][1] + 1)
274  +2*w2*r*sprite_ref[0][1]
275  - 16*w2
276  + (1<<(alpha+rho+1)));
277  s->sprite_delta[0][0]= (-r*sprite_ref[0][0] + virtual_ref[0][0]);
278  s->sprite_delta[0][1]= (+r*sprite_ref[0][1] - virtual_ref[0][1]);
279  s->sprite_delta[1][0]= (-r*sprite_ref[0][1] + virtual_ref[0][1]);
280  s->sprite_delta[1][1]= (-r*sprite_ref[0][0] + virtual_ref[0][0]);
281 
282  s->sprite_shift[0]= alpha+rho;
283  s->sprite_shift[1]= alpha+rho+2;
284  break;
285  case 3:
286  min_ab= FFMIN(alpha, beta);
287  w3= w2>>min_ab;
288  h3= h2>>min_ab;
289  s->sprite_offset[0][0]= (sprite_ref[0][0]<<(alpha+beta+rho-min_ab))
290  + (-r*sprite_ref[0][0] + virtual_ref[0][0])*h3*(-vop_ref[0][0])
291  + (-r*sprite_ref[0][0] + virtual_ref[1][0])*w3*(-vop_ref[0][1])
292  + (1<<(alpha+beta+rho-min_ab-1));
293  s->sprite_offset[0][1]= (sprite_ref[0][1]<<(alpha+beta+rho-min_ab))
294  + (-r*sprite_ref[0][1] + virtual_ref[0][1])*h3*(-vop_ref[0][0])
295  + (-r*sprite_ref[0][1] + virtual_ref[1][1])*w3*(-vop_ref[0][1])
296  + (1<<(alpha+beta+rho-min_ab-1));
297  s->sprite_offset[1][0]= (-r*sprite_ref[0][0] + virtual_ref[0][0])*h3*(-2*vop_ref[0][0] + 1)
298  + (-r*sprite_ref[0][0] + virtual_ref[1][0])*w3*(-2*vop_ref[0][1] + 1)
299  + 2*w2*h3*r*sprite_ref[0][0]
300  - 16*w2*h3
301  + (1<<(alpha+beta+rho-min_ab+1));
302  s->sprite_offset[1][1]= (-r*sprite_ref[0][1] + virtual_ref[0][1])*h3*(-2*vop_ref[0][0] + 1)
303  + (-r*sprite_ref[0][1] + virtual_ref[1][1])*w3*(-2*vop_ref[0][1] + 1)
304  + 2*w2*h3*r*sprite_ref[0][1]
305  - 16*w2*h3
306  + (1<<(alpha+beta+rho-min_ab+1));
307  s->sprite_delta[0][0]= (-r*sprite_ref[0][0] + virtual_ref[0][0])*h3;
308  s->sprite_delta[0][1]= (-r*sprite_ref[0][0] + virtual_ref[1][0])*w3;
309  s->sprite_delta[1][0]= (-r*sprite_ref[0][1] + virtual_ref[0][1])*h3;
310  s->sprite_delta[1][1]= (-r*sprite_ref[0][1] + virtual_ref[1][1])*w3;
311 
312  s->sprite_shift[0]= alpha + beta + rho - min_ab;
313  s->sprite_shift[1]= alpha + beta + rho - min_ab + 2;
314  break;
315  }
316  /* try to simplify the situation */
317  if( s->sprite_delta[0][0] == a<<s->sprite_shift[0]
318  && s->sprite_delta[0][1] == 0
319  && s->sprite_delta[1][0] == 0
320  && s->sprite_delta[1][1] == a<<s->sprite_shift[0])
321  {
322  s->sprite_offset[0][0]>>=s->sprite_shift[0];
323  s->sprite_offset[0][1]>>=s->sprite_shift[0];
324  s->sprite_offset[1][0]>>=s->sprite_shift[1];
325  s->sprite_offset[1][1]>>=s->sprite_shift[1];
326  s->sprite_delta[0][0]= a;
327  s->sprite_delta[0][1]= 0;
328  s->sprite_delta[1][0]= 0;
329  s->sprite_delta[1][1]= a;
330  s->sprite_shift[0]= 0;
331  s->sprite_shift[1]= 0;
333  }
334  else{
335  int shift_y= 16 - s->sprite_shift[0];
336  int shift_c= 16 - s->sprite_shift[1];
337  for(i=0; i<2; i++){
338  s->sprite_offset[0][i]<<= shift_y;
339  s->sprite_offset[1][i]<<= shift_c;
340  s->sprite_delta[0][i]<<= shift_y;
341  s->sprite_delta[1][i]<<= shift_y;
342  s->sprite_shift[i]= 16;
343  }
345  }
346  return 0;
347 }
348 
354 {
355  int mb_num_bits= av_log2(s->mb_num - 1) + 1;
356  int header_extension=0, mb_num, len;
357 
358  /* is there enough space left for a video packet + header */
359  if( get_bits_count(&s->gb) > s->gb.size_in_bits-20) return -1;
360 
361  for(len=0; len<32; len++){
362  if(get_bits1(&s->gb)) break;
363  }
364 
366  av_log(s->avctx, AV_LOG_ERROR, "marker does not match f_code\n");
367  return -1;
368  }
369 
370  if(s->shape != RECT_SHAPE){
371  header_extension= get_bits1(&s->gb);
372  //FIXME more stuff here
373  }
374 
375  mb_num= get_bits(&s->gb, mb_num_bits);
376  if(mb_num>=s->mb_num){
377  av_log(s->avctx, AV_LOG_ERROR, "illegal mb_num in video packet (%d %d) \n", mb_num, s->mb_num);
378  return -1;
379  }
380  if(s->pict_type == AV_PICTURE_TYPE_B){
381  int mb_x = 0, mb_y = 0;
382 
383  while (s->next_picture.f.mbskip_table[s->mb_index2xy[mb_num]]) {
384  if (!mb_x)
386  mb_num++;
387  if (++mb_x == s->mb_width) mb_x = 0;
388  }
389  if(mb_num >= s->mb_num) return -1; // slice contains just skipped MBs which where already decoded
390  }
391 
392  s->mb_x= mb_num % s->mb_width;
393  s->mb_y= mb_num / s->mb_width;
394 
395  if(s->shape != BIN_ONLY_SHAPE){
396  int qscale= get_bits(&s->gb, s->quant_precision);
397  if(qscale)
398  s->chroma_qscale=s->qscale= qscale;
399  }
400 
401  if(s->shape == RECT_SHAPE){
402  header_extension= get_bits1(&s->gb);
403  }
404  if(header_extension){
405  int time_incr=0;
406 
407  while (get_bits1(&s->gb) != 0)
408  time_incr++;
409 
410  check_marker(&s->gb, "before time_increment in video packed header");
411  skip_bits(&s->gb, s->time_increment_bits); /* time_increment */
412  check_marker(&s->gb, "before vop_coding_type in video packed header");
413 
414  skip_bits(&s->gb, 2); /* vop coding type */
415  //FIXME not rect stuff here
416 
417  if(s->shape != BIN_ONLY_SHAPE){
418  skip_bits(&s->gb, 3); /* intra dc vlc threshold */
419 //FIXME don't just ignore everything
421  if (mpeg4_decode_sprite_trajectory(s, &s->gb) < 0)
422  return AVERROR_INVALIDDATA;
423  av_log(s->avctx, AV_LOG_ERROR, "untested\n");
424  }
425 
426  //FIXME reduced res stuff here
427 
428  if (s->pict_type != AV_PICTURE_TYPE_I) {
429  int f_code = get_bits(&s->gb, 3); /* fcode_for */
430  if(f_code==0){
431  av_log(s->avctx, AV_LOG_ERROR, "Error, video packet header damaged (f_code=0)\n");
432  }
433  }
434  if (s->pict_type == AV_PICTURE_TYPE_B) {
435  int b_code = get_bits(&s->gb, 3);
436  if(b_code==0){
437  av_log(s->avctx, AV_LOG_ERROR, "Error, video packet header damaged (b_code=0)\n");
438  }
439  }
440  }
441  }
442  //FIXME new-pred stuff
443 
444  return 0;
445 }
446 
452 static inline int get_amv(MpegEncContext *s, int n){
453  int x, y, mb_v, sum, dx, dy, shift;
454  int len = 1 << (s->f_code + 4);
455  const int a= s->sprite_warping_accuracy;
456 
457  if(s->workaround_bugs & FF_BUG_AMV)
458  len >>= s->quarter_sample;
459 
460  if(s->real_sprite_warping_points==1){
461  if(s->divx_version==500 && s->divx_build==413)
462  sum= s->sprite_offset[0][n] / (1<<(a - s->quarter_sample));
463  else
464  sum= RSHIFT(s->sprite_offset[0][n]<<s->quarter_sample, a);
465  }else{
466  dx= s->sprite_delta[n][0];
467  dy= s->sprite_delta[n][1];
468  shift= s->sprite_shift[0];
469  if(n) dy -= 1<<(shift + a + 1);
470  else dx -= 1<<(shift + a + 1);
471  mb_v= s->sprite_offset[0][n] + dx*s->mb_x*16 + dy*s->mb_y*16;
472 
473  sum=0;
474  for(y=0; y<16; y++){
475  int v;
476 
477  v= mb_v + dy*y;
478  //XXX FIXME optimize
479  for(x=0; x<16; x++){
480  sum+= v>>shift;
481  v+= dx;
482  }
483  }
484  sum= RSHIFT(sum, a+8-s->quarter_sample);
485  }
486 
487  if (sum < -len) sum= -len;
488  else if (sum >= len) sum= len-1;
489 
490  return sum;
491 }
492 
499 static inline int mpeg4_decode_dc(MpegEncContext * s, int n, int *dir_ptr)
500 {
501  int level, code;
502 
503  if (n < 4)
504  code = get_vlc2(&s->gb, dc_lum.table, DC_VLC_BITS, 1);
505  else
506  code = get_vlc2(&s->gb, dc_chrom.table, DC_VLC_BITS, 1);
507  if (code < 0 || code > 9 /* && s->nbit<9 */){
508  av_log(s->avctx, AV_LOG_ERROR, "illegal dc vlc\n");
509  return -1;
510  }
511  if (code == 0) {
512  level = 0;
513  } else {
514  if(IS_3IV1){
515  if(code==1)
516  level= 2*get_bits1(&s->gb)-1;
517  else{
518  if(get_bits1(&s->gb))
519  level = get_bits(&s->gb, code-1) + (1<<(code-1));
520  else
521  level = -get_bits(&s->gb, code-1) - (1<<(code-1));
522  }
523  }else{
524  level = get_xbits(&s->gb, code);
525  }
526 
527  if (code > 8){
528  if(get_bits1(&s->gb)==0){ /* marker */
530  av_log(s->avctx, AV_LOG_ERROR, "dc marker bit missing\n");
531  return -1;
532  }
533  }
534  }
535  }
536 
537  return ff_mpeg4_pred_dc(s, n, level, dir_ptr, 0);
538 }
539 
545  int mb_num;
546  static const int8_t quant_tab[4] = { -1, -2, 1, 2 };
547 
548  /* decode first partition */
549  mb_num=0;
550  s->first_slice_line=1;
551  for(; s->mb_y<s->mb_height; s->mb_y++){
553  for(; s->mb_x<s->mb_width; s->mb_x++){
554  const int xy= s->mb_x + s->mb_y*s->mb_stride;
555  int cbpc;
556  int dir=0;
557 
558  mb_num++;
560  if(s->mb_x == s->resync_mb_x && s->mb_y == s->resync_mb_y+1)
561  s->first_slice_line=0;
562 
564  int i;
565 
566  do{
567  if(show_bits_long(&s->gb, 19)==DC_MARKER){
568  return mb_num-1;
569  }
570 
572  if (cbpc < 0){
573  av_log(s->avctx, AV_LOG_ERROR, "cbpc corrupted at %d %d\n", s->mb_x, s->mb_y);
574  return -1;
575  }
576  }while(cbpc == 8);
577 
578  s->cbp_table[xy]= cbpc & 3;
580  s->mb_intra = 1;
581 
582  if(cbpc & 4) {
583  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
584  }
586 
587  s->mbintra_table[xy]= 1;
588  for(i=0; i<6; i++){
589  int dc_pred_dir;
590  int dc= mpeg4_decode_dc(s, i, &dc_pred_dir);
591  if(dc < 0){
592  av_log(s->avctx, AV_LOG_ERROR, "DC corrupted at %d %d\n", s->mb_x, s->mb_y);
593  return -1;
594  }
595  dir<<=1;
596  if(dc_pred_dir) dir|=1;
597  }
598  s->pred_dir_table[xy]= dir;
599  }else{ /* P/S_TYPE */
600  int mx, my, pred_x, pred_y, bits;
601  int16_t * const mot_val = s->current_picture.f.motion_val[0][s->block_index[0]];
602  const int stride= s->b8_stride*2;
603 
604 try_again:
605  bits= show_bits(&s->gb, 17);
606  if(bits==MOTION_MARKER){
607  return mb_num-1;
608  }
609  skip_bits1(&s->gb);
610  if(bits&0x10000){
611  /* skip mb */
614  mx= get_amv(s, 0);
615  my= get_amv(s, 1);
616  }else{
618  mx=my=0;
619  }
620  mot_val[0 ]= mot_val[2 ]=
621  mot_val[0+stride]= mot_val[2+stride]= mx;
622  mot_val[1 ]= mot_val[3 ]=
623  mot_val[1+stride]= mot_val[3+stride]= my;
624 
625  if(s->mbintra_table[xy])
627  continue;
628  }
629 
631  if (cbpc < 0){
632  av_log(s->avctx, AV_LOG_ERROR, "cbpc corrupted at %d %d\n", s->mb_x, s->mb_y);
633  return -1;
634  }
635  if(cbpc == 20)
636  goto try_again;
637 
638  s->cbp_table[xy]= cbpc&(8+3); //8 is dquant
639 
640  s->mb_intra = ((cbpc & 4) != 0);
641 
642  if(s->mb_intra){
644  s->mbintra_table[xy]= 1;
645  mot_val[0 ]= mot_val[2 ]=
646  mot_val[0+stride]= mot_val[2+stride]= 0;
647  mot_val[1 ]= mot_val[3 ]=
648  mot_val[1+stride]= mot_val[3+stride]= 0;
649  }else{
650  if(s->mbintra_table[xy])
652 
653  if(s->pict_type==AV_PICTURE_TYPE_S && s->vol_sprite_usage==GMC_SPRITE && (cbpc & 16) == 0)
654  s->mcsel= get_bits1(&s->gb);
655  else s->mcsel= 0;
656 
657  if ((cbpc & 16) == 0) {
658  /* 16x16 motion prediction */
659 
660  ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
661  if(!s->mcsel){
662  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
663  if (mx >= 0xffff)
664  return -1;
665 
666  my = ff_h263_decode_motion(s, pred_y, s->f_code);
667  if (my >= 0xffff)
668  return -1;
670  } else {
671  mx = get_amv(s, 0);
672  my = get_amv(s, 1);
674  }
675 
676  mot_val[0 ]= mot_val[2 ] =
677  mot_val[0+stride]= mot_val[2+stride]= mx;
678  mot_val[1 ]= mot_val[3 ]=
679  mot_val[1+stride]= mot_val[3+stride]= my;
680  } else {
681  int i;
683  for(i=0;i<4;i++) {
684  int16_t *mot_val= ff_h263_pred_motion(s, i, 0, &pred_x, &pred_y);
685  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
686  if (mx >= 0xffff)
687  return -1;
688 
689  my = ff_h263_decode_motion(s, pred_y, s->f_code);
690  if (my >= 0xffff)
691  return -1;
692  mot_val[0] = mx;
693  mot_val[1] = my;
694  }
695  }
696  }
697  }
698  }
699  s->mb_x= 0;
700  }
701 
702  return mb_num;
703 }
704 
709 static int mpeg4_decode_partition_b(MpegEncContext *s, int mb_count){
710  int mb_num=0;
711  static const int8_t quant_tab[4] = { -1, -2, 1, 2 };
712 
713  s->mb_x= s->resync_mb_x;
714  s->first_slice_line=1;
715  for(s->mb_y= s->resync_mb_y; mb_num < mb_count; s->mb_y++){
717  for(; mb_num < mb_count && s->mb_x<s->mb_width; s->mb_x++){
718  const int xy= s->mb_x + s->mb_y*s->mb_stride;
719 
720  mb_num++;
722  if(s->mb_x == s->resync_mb_x && s->mb_y == s->resync_mb_y+1)
723  s->first_slice_line=0;
724 
726  int ac_pred= get_bits1(&s->gb);
727  int cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
728  if(cbpy<0){
729  av_log(s->avctx, AV_LOG_ERROR, "cbpy corrupted at %d %d\n", s->mb_x, s->mb_y);
730  return -1;
731  }
732 
733  s->cbp_table[xy]|= cbpy<<2;
734  s->current_picture.f.mb_type[xy] |= ac_pred*MB_TYPE_ACPRED;
735  }else{ /* P || S_TYPE */
736  if (IS_INTRA(s->current_picture.f.mb_type[xy])) {
737  int dir=0,i;
738  int ac_pred = get_bits1(&s->gb);
739  int cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
740 
741  if(cbpy<0){
742  av_log(s->avctx, AV_LOG_ERROR, "I cbpy corrupted at %d %d\n", s->mb_x, s->mb_y);
743  return -1;
744  }
745 
746  if(s->cbp_table[xy] & 8) {
747  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
748  }
749  s->current_picture.f.qscale_table[xy] = s->qscale;
750 
751  for(i=0; i<6; i++){
752  int dc_pred_dir;
753  int dc= mpeg4_decode_dc(s, i, &dc_pred_dir);
754  if(dc < 0){
755  av_log(s->avctx, AV_LOG_ERROR, "DC corrupted at %d %d\n", s->mb_x, s->mb_y);
756  return -1;
757  }
758  dir<<=1;
759  if(dc_pred_dir) dir|=1;
760  }
761  s->cbp_table[xy]&= 3; //remove dquant
762  s->cbp_table[xy]|= cbpy<<2;
763  s->current_picture.f.mb_type[xy] |= ac_pred*MB_TYPE_ACPRED;
764  s->pred_dir_table[xy]= dir;
765  } else if (IS_SKIP(s->current_picture.f.mb_type[xy])) {
766  s->current_picture.f.qscale_table[xy] = s->qscale;
767  s->cbp_table[xy]= 0;
768  }else{
769  int cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
770 
771  if(cbpy<0){
772  av_log(s->avctx, AV_LOG_ERROR, "P cbpy corrupted at %d %d\n", s->mb_x, s->mb_y);
773  return -1;
774  }
775 
776  if(s->cbp_table[xy] & 8) {
777  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
778  }
779  s->current_picture.f.qscale_table[xy] = s->qscale;
780 
781  s->cbp_table[xy]&= 3; //remove dquant
782  s->cbp_table[xy]|= (cbpy^0xf)<<2;
783  }
784  }
785  }
786  if(mb_num >= mb_count) return 0;
787  s->mb_x= 0;
788  }
789  return 0;
790 }
791 
797 {
798  int mb_num;
799  const int part_a_error= s->pict_type==AV_PICTURE_TYPE_I ? (ER_DC_ERROR|ER_MV_ERROR) : ER_MV_ERROR;
800  const int part_a_end = s->pict_type==AV_PICTURE_TYPE_I ? (ER_DC_END |ER_MV_END) : ER_MV_END;
801 
802  mb_num= mpeg4_decode_partition_a(s);
803  if(mb_num<0){
804  ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, part_a_error);
805  return -1;
806  }
807 
808  if(s->resync_mb_x + s->resync_mb_y*s->mb_width + mb_num > s->mb_num){
809  av_log(s->avctx, AV_LOG_ERROR, "slice below monitor ...\n");
810  ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, part_a_error);
811  return -1;
812  }
813 
814  s->mb_num_left= mb_num;
815 
817  while(show_bits(&s->gb, 9) == 1)
818  skip_bits(&s->gb, 9);
819  if(get_bits_long(&s->gb, 19)!=DC_MARKER){
820  av_log(s->avctx, AV_LOG_ERROR, "marker missing after first I partition at %d %d\n", s->mb_x, s->mb_y);
821  return -1;
822  }
823  }else{
824  while(show_bits(&s->gb, 10) == 1)
825  skip_bits(&s->gb, 10);
826  if(get_bits(&s->gb, 17)!=MOTION_MARKER){
827  av_log(s->avctx, AV_LOG_ERROR, "marker missing after first P partition at %d %d\n", s->mb_x, s->mb_y);
828  return -1;
829  }
830  }
831  ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, part_a_end);
832 
833  if( mpeg4_decode_partition_b(s, mb_num) < 0){
836  return -1;
837  }else{
840  }
841 
842  return 0;
843 }
844 
850  int n, int coded, int intra, int rvlc)
851 {
852  int level, i, last, run;
853  int dc_pred_dir;
854  RLTable * rl;
855  RL_VLC_ELEM * rl_vlc;
856  const uint8_t * scan_table;
857  int qmul, qadd;
858 
859  //Note intra & rvlc should be optimized away if this is inlined
860 
861  if(intra) {
862  if(s->use_intra_dc_vlc){
863  /* DC coef */
864  if(s->partitioned_frame){
865  level = s->dc_val[0][ s->block_index[n] ];
866  if(n<4) level= FASTDIV((level + (s->y_dc_scale>>1)), s->y_dc_scale);
867  else level= FASTDIV((level + (s->c_dc_scale>>1)), s->c_dc_scale);
868  dc_pred_dir= (s->pred_dir_table[s->mb_x + s->mb_y*s->mb_stride]<<n)&32;
869  }else{
870  level = mpeg4_decode_dc(s, n, &dc_pred_dir);
871  if (level < 0)
872  return -1;
873  }
874  block[0] = level;
875  i = 0;
876  }else{
877  i = -1;
878  ff_mpeg4_pred_dc(s, n, 0, &dc_pred_dir, 0);
879  }
880  if (!coded)
881  goto not_coded;
882 
883  if(rvlc){
884  rl = &ff_rvlc_rl_intra;
885  rl_vlc = ff_rvlc_rl_intra.rl_vlc[0];
886  }else{
887  rl = &ff_mpeg4_rl_intra;
888  rl_vlc = ff_mpeg4_rl_intra.rl_vlc[0];
889  }
890  if (s->ac_pred) {
891  if (dc_pred_dir == 0)
892  scan_table = s->intra_v_scantable.permutated; /* left */
893  else
894  scan_table = s->intra_h_scantable.permutated; /* top */
895  } else {
896  scan_table = s->intra_scantable.permutated;
897  }
898  qmul=1;
899  qadd=0;
900  } else {
901  i = -1;
902  if (!coded) {
903  s->block_last_index[n] = i;
904  return 0;
905  }
906  if(rvlc) rl = &ff_rvlc_rl_inter;
907  else rl = &ff_h263_rl_inter;
908 
909  scan_table = s->intra_scantable.permutated;
910 
911  if(s->mpeg_quant){
912  qmul=1;
913  qadd=0;
914  if(rvlc){
915  rl_vlc = ff_rvlc_rl_inter.rl_vlc[0];
916  }else{
917  rl_vlc = ff_h263_rl_inter.rl_vlc[0];
918  }
919  }else{
920  qmul = s->qscale << 1;
921  qadd = (s->qscale - 1) | 1;
922  if(rvlc){
923  rl_vlc = ff_rvlc_rl_inter.rl_vlc[s->qscale];
924  }else{
925  rl_vlc = ff_h263_rl_inter.rl_vlc[s->qscale];
926  }
927  }
928  }
929  {
930  OPEN_READER(re, &s->gb);
931  for(;;) {
932  UPDATE_CACHE(re, &s->gb);
933  GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 0);
934  if (level==0) {
935  /* escape */
936  if(rvlc){
937  if(SHOW_UBITS(re, &s->gb, 1)==0){
938  av_log(s->avctx, AV_LOG_ERROR, "1. marker bit missing in rvlc esc\n");
939  return -1;
940  }; SKIP_CACHE(re, &s->gb, 1);
941 
942  last= SHOW_UBITS(re, &s->gb, 1); SKIP_CACHE(re, &s->gb, 1);
943  run= SHOW_UBITS(re, &s->gb, 6);
944  SKIP_COUNTER(re, &s->gb, 1+1+6);
945  UPDATE_CACHE(re, &s->gb);
946 
947  if(SHOW_UBITS(re, &s->gb, 1)==0){
948  av_log(s->avctx, AV_LOG_ERROR, "2. marker bit missing in rvlc esc\n");
949  return -1;
950  }; SKIP_CACHE(re, &s->gb, 1);
951 
952  level= SHOW_UBITS(re, &s->gb, 11); SKIP_CACHE(re, &s->gb, 11);
953 
954  if(SHOW_UBITS(re, &s->gb, 5)!=0x10){
955  av_log(s->avctx, AV_LOG_ERROR, "reverse esc missing\n");
956  return -1;
957  }; SKIP_CACHE(re, &s->gb, 5);
958 
959  level= level * qmul + qadd;
960  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
961  SKIP_COUNTER(re, &s->gb, 1+11+5+1);
962 
963  i+= run + 1;
964  if(last) i+=192;
965  }else{
966  int cache;
967  cache= GET_CACHE(re, &s->gb);
968 
969  if(IS_3IV1)
970  cache ^= 0xC0000000;
971 
972  if (cache&0x80000000) {
973  if (cache&0x40000000) {
974  /* third escape */
975  SKIP_CACHE(re, &s->gb, 2);
976  last= SHOW_UBITS(re, &s->gb, 1); SKIP_CACHE(re, &s->gb, 1);
977  run= SHOW_UBITS(re, &s->gb, 6);
978  SKIP_COUNTER(re, &s->gb, 2+1+6);
979  UPDATE_CACHE(re, &s->gb);
980 
981  if(IS_3IV1){
982  level= SHOW_SBITS(re, &s->gb, 12); LAST_SKIP_BITS(re, &s->gb, 12);
983  }else{
984  if(SHOW_UBITS(re, &s->gb, 1)==0){
985  av_log(s->avctx, AV_LOG_ERROR, "1. marker bit missing in 3. esc\n");
986  return -1;
987  }; SKIP_CACHE(re, &s->gb, 1);
988 
989  level= SHOW_SBITS(re, &s->gb, 12); SKIP_CACHE(re, &s->gb, 12);
990 
991  if(SHOW_UBITS(re, &s->gb, 1)==0){
992  av_log(s->avctx, AV_LOG_ERROR, "2. marker bit missing in 3. esc\n");
993  return -1;
994  }
995 
996  SKIP_COUNTER(re, &s->gb, 1+12+1);
997  }
998 
999  if (level>0) level= level * qmul + qadd;
1000  else level= level * qmul - qadd;
1001 
1002  if((unsigned)(level + 2048) > 4095){
1004  if(level > 2560 || level<-2560){
1005  av_log(s->avctx, AV_LOG_ERROR, "|level| overflow in 3. esc, qp=%d\n", s->qscale);
1006  return -1;
1007  }
1008  }
1009  level= level<0 ? -2048 : 2047;
1010  }
1011 
1012  i+= run + 1;
1013  if(last) i+=192;
1014  } else {
1015  /* second escape */
1016  SKIP_BITS(re, &s->gb, 2);
1017  GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 1);
1018  i+= run + rl->max_run[run>>7][level/qmul] +1; //FIXME opt indexing
1019  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1020  LAST_SKIP_BITS(re, &s->gb, 1);
1021  }
1022  } else {
1023  /* first escape */
1024  SKIP_BITS(re, &s->gb, 1);
1025  GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 1);
1026  i+= run;
1027  level = level + rl->max_level[run>>7][(run-1)&63] * qmul;//FIXME opt indexing
1028  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1029  LAST_SKIP_BITS(re, &s->gb, 1);
1030  }
1031  }
1032  } else {
1033  i+= run;
1034  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1035  LAST_SKIP_BITS(re, &s->gb, 1);
1036  }
1037  if (i > 62){
1038  i-= 192;
1039  if(i&(~63)){
1040  av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
1041  return -1;
1042  }
1043 
1044  block[scan_table[i]] = level;
1045  break;
1046  }
1047 
1048  block[scan_table[i]] = level;
1049  }
1050  CLOSE_READER(re, &s->gb);
1051  }
1052  not_coded:
1053  if (intra) {
1054  if(!s->use_intra_dc_vlc){
1055  block[0] = ff_mpeg4_pred_dc(s, n, block[0], &dc_pred_dir, 0);
1056 
1057  i -= i>>31; //if(i == -1) i=0;
1058  }
1059 
1060  ff_mpeg4_pred_ac(s, block, n, dc_pred_dir);
1061  if (s->ac_pred) {
1062  i = 63; /* XXX: not optimal */
1063  }
1064  }
1065  s->block_last_index[n] = i;
1066  return 0;
1067 }
1068 
1074 {
1075  int cbp, mb_type;
1076  const int xy= s->mb_x + s->mb_y*s->mb_stride;
1077 
1078  mb_type = s->current_picture.f.mb_type[xy];
1079  cbp = s->cbp_table[xy];
1080 
1082 
1083  if (s->current_picture.f.qscale_table[xy] != s->qscale) {
1085  }
1086 
1088  int i;
1089  for(i=0; i<4; i++){
1090  s->mv[0][i][0] = s->current_picture.f.motion_val[0][s->block_index[i]][0];
1091  s->mv[0][i][1] = s->current_picture.f.motion_val[0][s->block_index[i]][1];
1092  }
1093  s->mb_intra = IS_INTRA(mb_type);
1094 
1095  if (IS_SKIP(mb_type)) {
1096  /* skip mb */
1097  for(i=0;i<6;i++)
1098  s->block_last_index[i] = -1;
1099  s->mv_dir = MV_DIR_FORWARD;
1100  s->mv_type = MV_TYPE_16X16;
1102  s->mcsel=1;
1103  s->mb_skipped = 0;
1104  }else{
1105  s->mcsel=0;
1106  s->mb_skipped = 1;
1107  }
1108  }else if(s->mb_intra){
1109  s->ac_pred = IS_ACPRED(s->current_picture.f.mb_type[xy]);
1110  }else if(!s->mb_intra){
1111 // s->mcsel= 0; //FIXME do we need to init that
1112 
1113  s->mv_dir = MV_DIR_FORWARD;
1114  if (IS_8X8(mb_type)) {
1115  s->mv_type = MV_TYPE_8X8;
1116  } else {
1117  s->mv_type = MV_TYPE_16X16;
1118  }
1119  }
1120  } else { /* I-Frame */
1121  s->mb_intra = 1;
1122  s->ac_pred = IS_ACPRED(s->current_picture.f.mb_type[xy]);
1123  }
1124 
1125  if (!IS_SKIP(mb_type)) {
1126  int i;
1127  s->dsp.clear_blocks(s->block[0]);
1128  /* decode each block */
1129  for (i = 0; i < 6; i++) {
1130  if(mpeg4_decode_block(s, block[i], i, cbp&32, s->mb_intra, s->rvlc) < 0){
1131  av_log(s->avctx, AV_LOG_ERROR, "texture corrupted at %d %d %d\n", s->mb_x, s->mb_y, s->mb_intra);
1132  return -1;
1133  }
1134  cbp+=cbp;
1135  }
1136  }
1137 
1138  /* per-MB end of slice check */
1139 
1140  if(--s->mb_num_left <= 0){
1141  if(mpeg4_is_resync(s))
1142  return SLICE_END;
1143  else
1144  return SLICE_NOEND;
1145  }else{
1146  if(mpeg4_is_resync(s)){
1147  const int delta= s->mb_x + 1 == s->mb_width ? 2 : 1;
1148  if(s->cbp_table[xy+delta])
1149  return SLICE_END;
1150  }
1151  return SLICE_OK;
1152  }
1153 }
1154 
1156  DCTELEM block[6][64])
1157 {
1158  int cbpc, cbpy, i, cbp, pred_x, pred_y, mx, my, dquant;
1159  int16_t *mot_val;
1160  static int8_t quant_tab[4] = { -1, -2, 1, 2 };
1161  const int xy= s->mb_x + s->mb_y * s->mb_stride;
1162 
1163  assert(s->h263_pred);
1164 
1166  do{
1167  if (get_bits1(&s->gb)) {
1168  /* skip mb */
1169  s->mb_intra = 0;
1170  for(i=0;i<6;i++)
1171  s->block_last_index[i] = -1;
1172  s->mv_dir = MV_DIR_FORWARD;
1173  s->mv_type = MV_TYPE_16X16;
1176  s->mcsel=1;
1177  s->mv[0][0][0]= get_amv(s, 0);
1178  s->mv[0][0][1]= get_amv(s, 1);
1179 
1180  s->mb_skipped = 0;
1181  }else{
1183  s->mcsel=0;
1184  s->mv[0][0][0] = 0;
1185  s->mv[0][0][1] = 0;
1186  s->mb_skipped = 1;
1187  }
1188  goto end;
1189  }
1191  if (cbpc < 0){
1192  av_log(s->avctx, AV_LOG_ERROR, "cbpc damaged at %d %d\n", s->mb_x, s->mb_y);
1193  return -1;
1194  }
1195  }while(cbpc == 20);
1196 
1197  s->dsp.clear_blocks(s->block[0]);
1198  dquant = cbpc & 8;
1199  s->mb_intra = ((cbpc & 4) != 0);
1200  if (s->mb_intra) goto intra;
1201 
1202  if(s->pict_type==AV_PICTURE_TYPE_S && s->vol_sprite_usage==GMC_SPRITE && (cbpc & 16) == 0)
1203  s->mcsel= get_bits1(&s->gb);
1204  else s->mcsel= 0;
1205  cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1) ^ 0x0F;
1206 
1207  cbp = (cbpc & 3) | (cbpy << 2);
1208  if (dquant) {
1209  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
1210  }
1211  if((!s->progressive_sequence) && (cbp || (s->workaround_bugs&FF_BUG_XVID_ILACE)))
1212  s->interlaced_dct= get_bits1(&s->gb);
1213 
1214  s->mv_dir = MV_DIR_FORWARD;
1215  if ((cbpc & 16) == 0) {
1216  if(s->mcsel){
1218  /* 16x16 global motion prediction */
1219  s->mv_type = MV_TYPE_16X16;
1220  mx= get_amv(s, 0);
1221  my= get_amv(s, 1);
1222  s->mv[0][0][0] = mx;
1223  s->mv[0][0][1] = my;
1224  }else if((!s->progressive_sequence) && get_bits1(&s->gb)){
1226  /* 16x8 field motion prediction */
1227  s->mv_type= MV_TYPE_FIELD;
1228 
1229  s->field_select[0][0]= get_bits1(&s->gb);
1230  s->field_select[0][1]= get_bits1(&s->gb);
1231 
1232  ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
1233 
1234  for(i=0; i<2; i++){
1235  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
1236  if (mx >= 0xffff)
1237  return -1;
1238 
1239  my = ff_h263_decode_motion(s, pred_y/2, s->f_code);
1240  if (my >= 0xffff)
1241  return -1;
1242 
1243  s->mv[0][i][0] = mx;
1244  s->mv[0][i][1] = my;
1245  }
1246  }else{
1248  /* 16x16 motion prediction */
1249  s->mv_type = MV_TYPE_16X16;
1250  ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
1251  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
1252 
1253  if (mx >= 0xffff)
1254  return -1;
1255 
1256  my = ff_h263_decode_motion(s, pred_y, s->f_code);
1257 
1258  if (my >= 0xffff)
1259  return -1;
1260  s->mv[0][0][0] = mx;
1261  s->mv[0][0][1] = my;
1262  }
1263  } else {
1265  s->mv_type = MV_TYPE_8X8;
1266  for(i=0;i<4;i++) {
1267  mot_val = ff_h263_pred_motion(s, i, 0, &pred_x, &pred_y);
1268  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
1269  if (mx >= 0xffff)
1270  return -1;
1271 
1272  my = ff_h263_decode_motion(s, pred_y, s->f_code);
1273  if (my >= 0xffff)
1274  return -1;
1275  s->mv[0][i][0] = mx;
1276  s->mv[0][i][1] = my;
1277  mot_val[0] = mx;
1278  mot_val[1] = my;
1279  }
1280  }
1281  } else if(s->pict_type==AV_PICTURE_TYPE_B) {
1282  int modb1; // first bit of modb
1283  int modb2; // second bit of modb
1284  int mb_type;
1285 
1286  s->mb_intra = 0; //B-frames never contain intra blocks
1287  s->mcsel=0; // ... true gmc blocks
1288 
1289  if(s->mb_x==0){
1290  for(i=0; i<2; i++){
1291  s->last_mv[i][0][0]=
1292  s->last_mv[i][0][1]=
1293  s->last_mv[i][1][0]=
1294  s->last_mv[i][1][1]= 0;
1295  }
1296 
1298  }
1299 
1300  /* if we skipped it in the future P Frame than skip it now too */
1301  s->mb_skipped = s->next_picture.f.mbskip_table[s->mb_y * s->mb_stride + s->mb_x]; // Note, skiptab=0 if last was GMC
1302 
1303  if(s->mb_skipped){
1304  /* skip mb */
1305  for(i=0;i<6;i++)
1306  s->block_last_index[i] = -1;
1307 
1308  s->mv_dir = MV_DIR_FORWARD;
1309  s->mv_type = MV_TYPE_16X16;
1310  s->mv[0][0][0] = 0;
1311  s->mv[0][0][1] = 0;
1312  s->mv[1][0][0] = 0;
1313  s->mv[1][0][1] = 0;
1315  goto end;
1316  }
1317 
1318  modb1= get_bits1(&s->gb);
1319  if(modb1){
1320  mb_type= MB_TYPE_DIRECT2 | MB_TYPE_SKIP | MB_TYPE_L0L1; //like MB_TYPE_B_DIRECT but no vectors coded
1321  cbp=0;
1322  }else{
1323  modb2= get_bits1(&s->gb);
1324  mb_type= get_vlc2(&s->gb, mb_type_b_vlc.table, MB_TYPE_B_VLC_BITS, 1);
1325  if(mb_type<0){
1326  av_log(s->avctx, AV_LOG_ERROR, "illegal MB_type\n");
1327  return -1;
1328  }
1329  mb_type= mb_type_b_map[ mb_type ];
1330  if(modb2) cbp= 0;
1331  else{
1332  s->dsp.clear_blocks(s->block[0]);
1333  cbp= get_bits(&s->gb, 6);
1334  }
1335 
1336  if ((!IS_DIRECT(mb_type)) && cbp) {
1337  if(get_bits1(&s->gb)){
1338  ff_set_qscale(s, s->qscale + get_bits1(&s->gb)*4 - 2);
1339  }
1340  }
1341 
1342  if(!s->progressive_sequence){
1343  if(cbp)
1344  s->interlaced_dct= get_bits1(&s->gb);
1345 
1346  if(!IS_DIRECT(mb_type) && get_bits1(&s->gb)){
1347  mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED;
1348  mb_type &= ~MB_TYPE_16x16;
1349 
1350  if(USES_LIST(mb_type, 0)){
1351  s->field_select[0][0]= get_bits1(&s->gb);
1352  s->field_select[0][1]= get_bits1(&s->gb);
1353  }
1354  if(USES_LIST(mb_type, 1)){
1355  s->field_select[1][0]= get_bits1(&s->gb);
1356  s->field_select[1][1]= get_bits1(&s->gb);
1357  }
1358  }
1359  }
1360 
1361  s->mv_dir = 0;
1362  if((mb_type & (MB_TYPE_DIRECT2|MB_TYPE_INTERLACED)) == 0){
1363  s->mv_type= MV_TYPE_16X16;
1364 
1365  if(USES_LIST(mb_type, 0)){
1366  s->mv_dir = MV_DIR_FORWARD;
1367 
1368  mx = ff_h263_decode_motion(s, s->last_mv[0][0][0], s->f_code);
1369  my = ff_h263_decode_motion(s, s->last_mv[0][0][1], s->f_code);
1370  s->last_mv[0][1][0]= s->last_mv[0][0][0]= s->mv[0][0][0] = mx;
1371  s->last_mv[0][1][1]= s->last_mv[0][0][1]= s->mv[0][0][1] = my;
1372  }
1373 
1374  if(USES_LIST(mb_type, 1)){
1375  s->mv_dir |= MV_DIR_BACKWARD;
1376 
1377  mx = ff_h263_decode_motion(s, s->last_mv[1][0][0], s->b_code);
1378  my = ff_h263_decode_motion(s, s->last_mv[1][0][1], s->b_code);
1379  s->last_mv[1][1][0]= s->last_mv[1][0][0]= s->mv[1][0][0] = mx;
1380  s->last_mv[1][1][1]= s->last_mv[1][0][1]= s->mv[1][0][1] = my;
1381  }
1382  }else if(!IS_DIRECT(mb_type)){
1383  s->mv_type= MV_TYPE_FIELD;
1384 
1385  if(USES_LIST(mb_type, 0)){
1386  s->mv_dir = MV_DIR_FORWARD;
1387 
1388  for(i=0; i<2; i++){
1389  mx = ff_h263_decode_motion(s, s->last_mv[0][i][0] , s->f_code);
1390  my = ff_h263_decode_motion(s, s->last_mv[0][i][1]/2, s->f_code);
1391  s->last_mv[0][i][0]= s->mv[0][i][0] = mx;
1392  s->last_mv[0][i][1]= (s->mv[0][i][1] = my)*2;
1393  }
1394  }
1395 
1396  if(USES_LIST(mb_type, 1)){
1397  s->mv_dir |= MV_DIR_BACKWARD;
1398 
1399  for(i=0; i<2; i++){
1400  mx = ff_h263_decode_motion(s, s->last_mv[1][i][0] , s->b_code);
1401  my = ff_h263_decode_motion(s, s->last_mv[1][i][1]/2, s->b_code);
1402  s->last_mv[1][i][0]= s->mv[1][i][0] = mx;
1403  s->last_mv[1][i][1]= (s->mv[1][i][1] = my)*2;
1404  }
1405  }
1406  }
1407  }
1408 
1409  if(IS_DIRECT(mb_type)){
1410  if(IS_SKIP(mb_type))
1411  mx=my=0;
1412  else{
1413  mx = ff_h263_decode_motion(s, 0, 1);
1414  my = ff_h263_decode_motion(s, 0, 1);
1415  }
1416 
1418  mb_type |= ff_mpeg4_set_direct_mv(s, mx, my);
1419  }
1420  s->current_picture.f.mb_type[xy] = mb_type;
1421  } else { /* I-Frame */
1422  do{
1424  if (cbpc < 0){
1425  av_log(s->avctx, AV_LOG_ERROR, "I cbpc damaged at %d %d\n", s->mb_x, s->mb_y);
1426  return -1;
1427  }
1428  }while(cbpc == 8);
1429 
1430  dquant = cbpc & 4;
1431  s->mb_intra = 1;
1432 intra:
1433  s->ac_pred = get_bits1(&s->gb);
1434  if(s->ac_pred)
1436  else
1438 
1439  cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
1440  if(cbpy<0){
1441  av_log(s->avctx, AV_LOG_ERROR, "I cbpy damaged at %d %d\n", s->mb_x, s->mb_y);
1442  return -1;
1443  }
1444  cbp = (cbpc & 3) | (cbpy << 2);
1445 
1447 
1448  if (dquant) {
1449  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
1450  }
1451 
1452  if(!s->progressive_sequence)
1453  s->interlaced_dct= get_bits1(&s->gb);
1454 
1455  s->dsp.clear_blocks(s->block[0]);
1456  /* decode each block */
1457  for (i = 0; i < 6; i++) {
1458  if (mpeg4_decode_block(s, block[i], i, cbp&32, 1, 0) < 0)
1459  return -1;
1460  cbp+=cbp;
1461  }
1462  goto end;
1463  }
1464 
1465  /* decode each block */
1466  for (i = 0; i < 6; i++) {
1467  if (mpeg4_decode_block(s, block[i], i, cbp&32, 0, 0) < 0)
1468  return -1;
1469  cbp+=cbp;
1470  }
1471 end:
1472 
1473  /* per-MB end of slice check */
1474  if(s->codec_id==AV_CODEC_ID_MPEG4){
1475  if(mpeg4_is_resync(s)){
1476  const int delta= s->mb_x + 1 == s->mb_width ? 2 : 1;
1477 
1478  if (s->pict_type == AV_PICTURE_TYPE_B && s->next_picture.f.mbskip_table[xy + delta]) {
1480  (s->mb_x + delta >= s->mb_width) ? FFMIN(s->mb_y+1, s->mb_height-1) : s->mb_y, 0);
1481  }
1482 
1483  if (s->pict_type == AV_PICTURE_TYPE_B && s->next_picture.f.mbskip_table[xy + delta])
1484  return SLICE_OK;
1485  return SLICE_END;
1486  }
1487  }
1488 
1489  return SLICE_OK;
1490 }
1491 
1492 
1494  int hours, minutes, seconds;
1495  unsigned time_code = show_bits(gb, 18);
1496 
1497  if (time_code & 0x40) { /* marker_bit */
1498  hours = time_code >> 13;
1499  minutes = time_code >> 7 & 0x3f;
1500  seconds = time_code & 0x3f;
1501  s->time_base = seconds + 60*(minutes + 60*hours);
1502  skip_bits(gb, 20); /* time_code, closed_gov, broken_link */
1503  } else {
1504  av_log(s->avctx, AV_LOG_WARNING, "GOP header missing marker_bit\n");
1505  }
1506 
1507  return 0;
1508 }
1509 
1511  int profile_and_level_indication;
1512 
1513  profile_and_level_indication = get_bits(gb, 8);
1514 
1515  s->avctx->profile = (profile_and_level_indication & 0xf0) >> 4;
1516  s->avctx->level = (profile_and_level_indication & 0x0f);
1517 
1518  // for Simple profile, level 0
1519  if (s->avctx->profile == 0 && s->avctx->level == 8) {
1520  s->avctx->level = 0;
1521  }
1522 
1523  return 0;
1524 }
1525 
1527  int width, height, vo_ver_id;
1528 
1529  /* vol header */
1530  skip_bits(gb, 1); /* random access */
1531  s->vo_type= get_bits(gb, 8);
1532  if (get_bits1(gb) != 0) { /* is_ol_id */
1533  vo_ver_id = get_bits(gb, 4); /* vo_ver_id */
1534  skip_bits(gb, 3); /* vo_priority */
1535  } else {
1536  vo_ver_id = 1;
1537  }
1538  s->aspect_ratio_info= get_bits(gb, 4);
1540  s->avctx->sample_aspect_ratio.num= get_bits(gb, 8); // par_width
1541  s->avctx->sample_aspect_ratio.den= get_bits(gb, 8); // par_height
1542  }else{
1544  }
1545 
1546  if ((s->vol_control_parameters=get_bits1(gb))) { /* vol control parameter */
1547  int chroma_format= get_bits(gb, 2);
1548  if(chroma_format!=CHROMA_420){
1549  av_log(s->avctx, AV_LOG_ERROR, "illegal chroma format\n");
1550  }
1551  s->low_delay= get_bits1(gb);
1552  if(get_bits1(gb)){ /* vbv parameters */
1553  get_bits(gb, 15); /* first_half_bitrate */
1554  skip_bits1(gb); /* marker */
1555  get_bits(gb, 15); /* latter_half_bitrate */
1556  skip_bits1(gb); /* marker */
1557  get_bits(gb, 15); /* first_half_vbv_buffer_size */
1558  skip_bits1(gb); /* marker */
1559  get_bits(gb, 3); /* latter_half_vbv_buffer_size */
1560  get_bits(gb, 11); /* first_half_vbv_occupancy */
1561  skip_bits1(gb); /* marker */
1562  get_bits(gb, 15); /* latter_half_vbv_occupancy */
1563  skip_bits1(gb); /* marker */
1564  }
1565  }else{
1566  // set low delay flag only once the smartest? low delay detection won't be overriden
1567  if(s->picture_number==0)
1568  s->low_delay=0;
1569  }
1570 
1571  s->shape = get_bits(gb, 2); /* vol shape */
1572  if(s->shape != RECT_SHAPE) av_log(s->avctx, AV_LOG_ERROR, "only rectangular vol supported\n");
1573  if(s->shape == GRAY_SHAPE && vo_ver_id != 1){
1574  av_log(s->avctx, AV_LOG_ERROR, "Gray shape not supported\n");
1575  skip_bits(gb, 4); //video_object_layer_shape_extension
1576  }
1577 
1578  check_marker(gb, "before time_increment_resolution");
1579 
1580  s->avctx->time_base.den = get_bits(gb, 16);
1581  if(!s->avctx->time_base.den){
1582  av_log(s->avctx, AV_LOG_ERROR, "time_base.den==0\n");
1583  s->avctx->time_base.num = 0;
1584  return -1;
1585  }
1586 
1587  s->time_increment_bits = av_log2(s->avctx->time_base.den - 1) + 1;
1588  if (s->time_increment_bits < 1)
1589  s->time_increment_bits = 1;
1590 
1591  check_marker(gb, "before fixed_vop_rate");
1592 
1593  if (get_bits1(gb) != 0) { /* fixed_vop_rate */
1595  }else
1596  s->avctx->time_base.num = 1;
1597 
1598  s->t_frame=0;
1599 
1600  if (s->shape != BIN_ONLY_SHAPE) {
1601  if (s->shape == RECT_SHAPE) {
1602  skip_bits1(gb); /* marker */
1603  width = get_bits(gb, 13);
1604  skip_bits1(gb); /* marker */
1605  height = get_bits(gb, 13);
1606  skip_bits1(gb); /* marker */
1607  if(width && height && !(s->width && s->codec_tag == AV_RL32("MP4S"))){ /* they should be non zero but who knows ... */
1608  if (s->width && s->height &&
1609  (s->width != width || s->height != height))
1610  s->context_reinit = 1;
1611  s->width = width;
1612  s->height = height;
1613  }
1614  }
1615 
1617  s->progressive_frame= get_bits1(gb)^1;
1618  s->interlaced_dct=0;
1619  if(!get_bits1(gb) && (s->avctx->debug & FF_DEBUG_PICT_INFO))
1620  av_log(s->avctx, AV_LOG_INFO, "MPEG4 OBMC not supported (very likely buggy encoder)\n"); /* OBMC Disable */
1621  if (vo_ver_id == 1) {
1622  s->vol_sprite_usage = get_bits1(gb); /* vol_sprite_usage */
1623  } else {
1624  s->vol_sprite_usage = get_bits(gb, 2); /* vol_sprite_usage */
1625  }
1626  if(s->vol_sprite_usage==STATIC_SPRITE) av_log(s->avctx, AV_LOG_ERROR, "Static Sprites not supported\n");
1629  s->sprite_width = get_bits(gb, 13);
1630  skip_bits1(gb); /* marker */
1631  s->sprite_height= get_bits(gb, 13);
1632  skip_bits1(gb); /* marker */
1633  s->sprite_left = get_bits(gb, 13);
1634  skip_bits1(gb); /* marker */
1635  s->sprite_top = get_bits(gb, 13);
1636  skip_bits1(gb); /* marker */
1637  }
1639  if(s->num_sprite_warping_points > 3){
1640  av_log(s->avctx, AV_LOG_ERROR, "%d sprite_warping_points\n", s->num_sprite_warping_points);
1642  return -1;
1643  }
1644  s->sprite_warping_accuracy = get_bits(gb, 2);
1647  s->low_latency_sprite= get_bits1(gb);
1648  }
1649  // FIXME sadct disable bit if verid!=1 && shape not rect
1650 
1651  if (get_bits1(gb) == 1) { /* not_8_bit */
1652  s->quant_precision = get_bits(gb, 4); /* quant_precision */
1653  if(get_bits(gb, 4)!=8) av_log(s->avctx, AV_LOG_ERROR, "N-bit not supported\n"); /* bits_per_pixel */
1654  if(s->quant_precision!=5) av_log(s->avctx, AV_LOG_ERROR, "quant precision %d\n", s->quant_precision);
1655  } else {
1656  s->quant_precision = 5;
1657  }
1658 
1659  // FIXME a bunch of grayscale shape things
1660 
1661  if((s->mpeg_quant=get_bits1(gb))){ /* vol_quant_type */
1662  int i, v;
1663 
1664  /* load default matrixes */
1665  for(i=0; i<64; i++){
1666  int j= s->dsp.idct_permutation[i];
1668  s->intra_matrix[j]= v;
1669  s->chroma_intra_matrix[j]= v;
1670 
1672  s->inter_matrix[j]= v;
1673  s->chroma_inter_matrix[j]= v;
1674  }
1675 
1676  /* load custom intra matrix */
1677  if(get_bits1(gb)){
1678  int last=0;
1679  for(i=0; i<64; i++){
1680  int j;
1681  v= get_bits(gb, 8);
1682  if(v==0) break;
1683 
1684  last= v;
1686  s->intra_matrix[j]= v;
1687  s->chroma_intra_matrix[j]= v;
1688  }
1689 
1690  /* replicate last value */
1691  for(; i<64; i++){
1692  int j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
1693  s->intra_matrix[j]= last;
1694  s->chroma_intra_matrix[j]= last;
1695  }
1696  }
1697 
1698  /* load custom non intra matrix */
1699  if(get_bits1(gb)){
1700  int last=0;
1701  for(i=0; i<64; i++){
1702  int j;
1703  v= get_bits(gb, 8);
1704  if(v==0) break;
1705 
1706  last= v;
1708  s->inter_matrix[j]= v;
1709  s->chroma_inter_matrix[j]= v;
1710  }
1711 
1712  /* replicate last value */
1713  for(; i<64; i++){
1714  int j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
1715  s->inter_matrix[j]= last;
1716  s->chroma_inter_matrix[j]= last;
1717  }
1718  }
1719 
1720  // FIXME a bunch of grayscale shape things
1721  }
1722 
1723  if(vo_ver_id != 1)
1724  s->quarter_sample= get_bits1(gb);
1725  else s->quarter_sample=0;
1726 
1727  if(!get_bits1(gb)){
1728  int pos= get_bits_count(gb);
1729  int estimation_method= get_bits(gb, 2);
1730  if(estimation_method<2){
1731  if(!get_bits1(gb)){
1732  s->cplx_estimation_trash_i += 8*get_bits1(gb); //opaque
1733  s->cplx_estimation_trash_i += 8*get_bits1(gb); //transparent
1734  s->cplx_estimation_trash_i += 8*get_bits1(gb); //intra_cae
1735  s->cplx_estimation_trash_i += 8*get_bits1(gb); //inter_cae
1736  s->cplx_estimation_trash_i += 8*get_bits1(gb); //no_update
1737  s->cplx_estimation_trash_i += 8*get_bits1(gb); //upampling
1738  }
1739  if(!get_bits1(gb)){
1740  s->cplx_estimation_trash_i += 8*get_bits1(gb); //intra_blocks
1741  s->cplx_estimation_trash_p += 8*get_bits1(gb); //inter_blocks
1742  s->cplx_estimation_trash_p += 8*get_bits1(gb); //inter4v_blocks
1743  s->cplx_estimation_trash_i += 8*get_bits1(gb); //not coded blocks
1744  }
1745  if(!check_marker(gb, "in complexity estimation part 1")){
1746  skip_bits_long(gb, pos - get_bits_count(gb));
1747  goto no_cplx_est;
1748  }
1749  if(!get_bits1(gb)){
1750  s->cplx_estimation_trash_i += 8*get_bits1(gb); //dct_coeffs
1751  s->cplx_estimation_trash_i += 8*get_bits1(gb); //dct_lines
1752  s->cplx_estimation_trash_i += 8*get_bits1(gb); //vlc_syms
1753  s->cplx_estimation_trash_i += 4*get_bits1(gb); //vlc_bits
1754  }
1755  if(!get_bits1(gb)){
1756  s->cplx_estimation_trash_p += 8*get_bits1(gb); //apm
1757  s->cplx_estimation_trash_p += 8*get_bits1(gb); //npm
1758  s->cplx_estimation_trash_b += 8*get_bits1(gb); //interpolate_mc_q
1759  s->cplx_estimation_trash_p += 8*get_bits1(gb); //forwback_mc_q
1760  s->cplx_estimation_trash_p += 8*get_bits1(gb); //halfpel2
1761  s->cplx_estimation_trash_p += 8*get_bits1(gb); //halfpel4
1762  }
1763  if(!check_marker(gb, "in complexity estimation part 2")){
1764  skip_bits_long(gb, pos - get_bits_count(gb));
1765  goto no_cplx_est;
1766  }
1767  if(estimation_method==1){
1768  s->cplx_estimation_trash_i += 8*get_bits1(gb); //sadct
1769  s->cplx_estimation_trash_p += 8*get_bits1(gb); //qpel
1770  }
1771  }else
1772  av_log(s->avctx, AV_LOG_ERROR, "Invalid Complexity estimation method %d\n", estimation_method);
1773  }else{
1774 no_cplx_est:
1778  }
1779 
1780  s->resync_marker= !get_bits1(gb); /* resync_marker_disabled */
1781 
1782  s->data_partitioning= get_bits1(gb);
1783  if(s->data_partitioning){
1784  s->rvlc= get_bits1(gb);
1785  }
1786 
1787  if(vo_ver_id != 1) {
1788  s->new_pred= get_bits1(gb);
1789  if(s->new_pred){
1790  av_log(s->avctx, AV_LOG_ERROR, "new pred not supported\n");
1791  skip_bits(gb, 2); /* requested upstream message type */
1792  skip_bits1(gb); /* newpred segment type */
1793  }
1794  s->reduced_res_vop= get_bits1(gb);
1795  if(s->reduced_res_vop) av_log(s->avctx, AV_LOG_ERROR, "reduced resolution VOP not supported\n");
1796  }
1797  else{
1798  s->new_pred=0;
1799  s->reduced_res_vop= 0;
1800  }
1801 
1802  s->scalability= get_bits1(gb);
1803 
1804  if (s->scalability) {
1805  GetBitContext bak= *gb;
1806  int h_sampling_factor_n;
1807  int h_sampling_factor_m;
1808  int v_sampling_factor_n;
1809  int v_sampling_factor_m;
1810 
1811  s->hierachy_type= get_bits1(gb);
1812  skip_bits(gb, 4); /* ref_layer_id */
1813  skip_bits1(gb); /* ref_layer_sampling_dir */
1814  h_sampling_factor_n= get_bits(gb, 5);
1815  h_sampling_factor_m= get_bits(gb, 5);
1816  v_sampling_factor_n= get_bits(gb, 5);
1817  v_sampling_factor_m= get_bits(gb, 5);
1818  s->enhancement_type= get_bits1(gb);
1819 
1820  if( h_sampling_factor_n==0 || h_sampling_factor_m==0
1821  || v_sampling_factor_n==0 || v_sampling_factor_m==0){
1822  /* illegal scalability header (VERY broken encoder),
1823  * trying to workaround */
1824  s->scalability=0;
1825  *gb= bak;
1826  }else
1827  av_log(s->avctx, AV_LOG_ERROR, "scalability not supported\n");
1828 
1829  // bin shape stuff FIXME
1830  }
1831  }
1832  return 0;
1833 }
1834 
1840  char buf[256];
1841  int i;
1842  int e;
1843  int ver = 0, build = 0, ver2 = 0, ver3 = 0;
1844  char last;
1845 
1846  for(i=0; i<255 && get_bits_count(gb) < gb->size_in_bits; i++){
1847  if(show_bits(gb, 23) == 0) break;
1848  buf[i]= get_bits(gb, 8);
1849  }
1850  buf[i]=0;
1851 
1852  /* divx detection */
1853  e=sscanf(buf, "DivX%dBuild%d%c", &ver, &build, &last);
1854  if(e<2)
1855  e=sscanf(buf, "DivX%db%d%c", &ver, &build, &last);
1856  if(e>=2){
1857  s->divx_version= ver;
1858  s->divx_build= build;
1859  s->divx_packed= e==3 && last=='p';
1860  if(s->divx_packed && !s->showed_packed_warning) {
1861  av_log(s->avctx, AV_LOG_WARNING, "Invalid and inefficient vfw-avi packed B frames detected\n");
1862  s->showed_packed_warning=1;
1863  }
1864  }
1865 
1866  /* libavcodec detection */
1867  e=sscanf(buf, "FFmpe%*[^b]b%d", &build)+3;
1868  if(e!=4)
1869  e=sscanf(buf, "FFmpeg v%d.%d.%d / libavcodec build: %d", &ver, &ver2, &ver3, &build);
1870  if(e!=4){
1871  e=sscanf(buf, "Lavc%d.%d.%d", &ver, &ver2, &ver3)+1;
1872  if (e>1)
1873  build= (ver<<16) + (ver2<<8) + ver3;
1874  }
1875  if(e!=4){
1876  if(strcmp(buf, "ffmpeg")==0){
1877  s->lavc_build= 4600;
1878  }
1879  }
1880  if(e==4){
1881  s->lavc_build= build;
1882  }
1883 
1884  /* Xvid detection */
1885  e=sscanf(buf, "XviD%d", &build);
1886  if(e==1){
1887  s->xvid_build= build;
1888  }
1889 
1890  return 0;
1891 }
1892 
1894  int time_incr, time_increment;
1895 
1896  s->pict_type = get_bits(gb, 2) + AV_PICTURE_TYPE_I; /* pict type: I = 0 , P = 1 */
1898  av_log(s->avctx, AV_LOG_ERROR, "low_delay flag incorrectly, clearing it\n");
1899  s->low_delay=0;
1900  }
1901 
1903  if(s->partitioned_frame)
1905  else
1907 
1908  time_incr=0;
1909  while (get_bits1(gb) != 0)
1910  time_incr++;
1911 
1912  check_marker(gb, "before time_increment");
1913 
1914  if(s->time_increment_bits==0 || !(show_bits(gb, s->time_increment_bits+1)&1)){
1915  av_log(s->avctx, AV_LOG_ERROR, "hmm, seems the headers are not complete, trying to guess time_increment_bits\n");
1916 
1918  if ( s->pict_type == AV_PICTURE_TYPE_P
1920  if((show_bits(gb, s->time_increment_bits+6)&0x37) == 0x30) break;
1921  }else
1922  if((show_bits(gb, s->time_increment_bits+5)&0x1F) == 0x18) break;
1923  }
1924 
1925  av_log(s->avctx, AV_LOG_ERROR, "my guess is %d bits ;)\n",s->time_increment_bits);
1926  }
1927 
1928  if(IS_3IV1) time_increment= get_bits1(gb); //FIXME investigate further
1929  else time_increment= get_bits(gb, s->time_increment_bits);
1930 
1931  if(s->pict_type!=AV_PICTURE_TYPE_B){
1932  s->last_time_base= s->time_base;
1933  s->time_base+= time_incr;
1934  s->time= s->time_base*s->avctx->time_base.den + time_increment;
1936  if(s->time < s->last_non_b_time){
1937  /* header is not mpeg-4-compatible, broken encoder,
1938  * trying to workaround */
1939  s->time_base++;
1940  s->time+= s->avctx->time_base.den;
1941  }
1942  }
1943  s->pp_time= s->time - s->last_non_b_time;
1944  s->last_non_b_time= s->time;
1945  }else{
1946  s->time= (s->last_time_base + time_incr)*s->avctx->time_base.den + time_increment;
1947  s->pb_time= s->pp_time - (s->last_non_b_time - s->time);
1948  if(s->pp_time <=s->pb_time || s->pp_time <= s->pp_time - s->pb_time || s->pp_time<=0){
1949  /* messed up order, maybe after seeking? skipping current b-frame */
1950  return FRAME_SKIPPED;
1951  }
1953 
1954  if(s->t_frame==0) s->t_frame= s->pb_time;
1955  if(s->t_frame==0) s->t_frame=1; // 1/0 protection
1957  - ROUNDED_DIV(s->last_non_b_time - s->pp_time, s->t_frame))*2;
1958  s->pb_field_time= ( ROUNDED_DIV(s->time, s->t_frame)
1959  - ROUNDED_DIV(s->last_non_b_time - s->pp_time, s->t_frame))*2;
1960  if(!s->progressive_sequence){
1961  if(s->pp_field_time <= s->pb_field_time || s->pb_field_time <= 1)
1962  return FRAME_SKIPPED;
1963  }
1964  }
1965 
1966  if(s->avctx->time_base.num)
1967  s->current_picture_ptr->f.pts = (s->time + s->avctx->time_base.num / 2) / s->avctx->time_base.num;
1968  else
1970  if(s->avctx->debug&FF_DEBUG_PTS)
1971  av_log(s->avctx, AV_LOG_DEBUG, "MPEG4 PTS: %"PRId64"\n",
1972  s->current_picture_ptr->f.pts);
1973 
1974  check_marker(gb, "before vop_coded");
1975 
1976  /* vop coded */
1977  if (get_bits1(gb) != 1){
1979  av_log(s->avctx, AV_LOG_ERROR, "vop not coded\n");
1980  return FRAME_SKIPPED;
1981  }
1982  if (s->shape != BIN_ONLY_SHAPE && ( s->pict_type == AV_PICTURE_TYPE_P
1984  /* rounding type for motion estimation */
1985  s->no_rounding = get_bits1(gb);
1986  } else {
1987  s->no_rounding = 0;
1988  }
1989 //FIXME reduced res stuff
1990 
1991  if (s->shape != RECT_SHAPE) {
1992  if (s->vol_sprite_usage != 1 || s->pict_type != AV_PICTURE_TYPE_I) {
1993  skip_bits(gb, 13); /* width */
1994  skip_bits1(gb); /* marker */
1995  skip_bits(gb, 13); /* height */
1996  skip_bits1(gb); /* marker */
1997  skip_bits(gb, 13); /* hor_spat_ref */
1998  skip_bits1(gb); /* marker */
1999  skip_bits(gb, 13); /* ver_spat_ref */
2000  }
2001  skip_bits1(gb); /* change_CR_disable */
2002 
2003  if (get_bits1(gb) != 0) {
2004  skip_bits(gb, 8); /* constant_alpha_value */
2005  }
2006  }
2007 //FIXME complexity estimation stuff
2008 
2009  if (s->shape != BIN_ONLY_SHAPE) {
2011  if(s->pict_type != AV_PICTURE_TYPE_I)
2013  if(s->pict_type == AV_PICTURE_TYPE_B)
2015 
2017  if(!s->progressive_sequence){
2018  s->top_field_first= get_bits1(gb);
2019  s->alternate_scan= get_bits1(gb);
2020  }else
2021  s->alternate_scan= 0;
2022  }
2023 
2024  if(s->alternate_scan){
2029  } else{
2034  }
2035 
2037  if (mpeg4_decode_sprite_trajectory(s, gb) < 0)
2038  return AVERROR_INVALIDDATA;
2039  if(s->sprite_brightness_change) av_log(s->avctx, AV_LOG_ERROR, "sprite_brightness_change not supported\n");
2040  if(s->vol_sprite_usage==STATIC_SPRITE) av_log(s->avctx, AV_LOG_ERROR, "static sprite not supported\n");
2041  }
2042 
2043  if (s->shape != BIN_ONLY_SHAPE) {
2044  s->chroma_qscale= s->qscale = get_bits(gb, s->quant_precision);
2045  if(s->qscale==0){
2046  av_log(s->avctx, AV_LOG_ERROR, "Error, header damaged or not MPEG4 header (qscale=0)\n");
2047  return -1; // makes no sense to continue, as there is nothing left from the image then
2048  }
2049 
2050  if (s->pict_type != AV_PICTURE_TYPE_I) {
2051  s->f_code = get_bits(gb, 3); /* fcode_for */
2052  if(s->f_code==0){
2053  av_log(s->avctx, AV_LOG_ERROR, "Error, header damaged or not MPEG4 header (f_code=0)\n");
2054  return -1; // makes no sense to continue, as the MV decoding will break very quickly
2055  }
2056  }else
2057  s->f_code=1;
2058 
2059  if (s->pict_type == AV_PICTURE_TYPE_B) {
2060  s->b_code = get_bits(gb, 3);
2061  }else
2062  s->b_code=1;
2063 
2064  if(s->avctx->debug&FF_DEBUG_PICT_INFO){
2065  av_log(s->avctx, AV_LOG_DEBUG, "qp:%d fc:%d,%d %s size:%d pro:%d alt:%d top:%d %spel part:%d resync:%d w:%d a:%d rnd:%d vot:%d%s dc:%d ce:%d/%d/%d\n",
2066  s->qscale, s->f_code, s->b_code,
2067  s->pict_type == AV_PICTURE_TYPE_I ? "I" : (s->pict_type == AV_PICTURE_TYPE_P ? "P" : (s->pict_type == AV_PICTURE_TYPE_B ? "B" : "S")),
2071  }
2072 
2073  if(!s->scalability){
2074  if (s->shape!=RECT_SHAPE && s->pict_type!=AV_PICTURE_TYPE_I) {
2075  skip_bits1(gb); // vop shape coding type
2076  }
2077  }else{
2078  if(s->enhancement_type){
2079  int load_backward_shape= get_bits1(gb);
2080  if(load_backward_shape){
2081  av_log(s->avctx, AV_LOG_ERROR, "load backward shape isn't supported\n");
2082  }
2083  }
2084  skip_bits(gb, 2); //ref_select_code
2085  }
2086  }
2087  /* detect buggy encoders which don't set the low_delay flag (divx4/xvid/opendivx)*/
2088  // note we cannot detect divx5 without b-frames easily (although it's buggy too)
2089  if(s->vo_type==0 && s->vol_control_parameters==0 && s->divx_version==-1 && s->picture_number==0){
2090  av_log(s->avctx, AV_LOG_WARNING, "looks like this file was encoded with (divx4/(old)xvid/opendivx) -> forcing low_delay flag\n");
2091  s->low_delay=1;
2092  }
2093 
2094  s->picture_number++; // better than pic number==0 always ;)
2095 
2096  s->y_dc_scale_table= ff_mpeg4_y_dc_scale_table; //FIXME add short header support
2098 
2100  s->h_edge_pos= s->width;
2101  s->v_edge_pos= s->height;
2102  }
2103  return 0;
2104 }
2105 
2113 {
2114  unsigned startcode, v;
2115 
2116  /* search next start code */
2117  align_get_bits(gb);
2118 
2119  if(s->codec_tag == AV_RL32("WV1F") && show_bits(gb, 24) == 0x575630){
2120  skip_bits(gb, 24);
2121  if(get_bits(gb, 8) == 0xF0)
2122  goto end;
2123  }
2124 
2125  startcode = 0xff;
2126  for(;;) {
2127  if(get_bits_count(gb) >= gb->size_in_bits){
2128  if(gb->size_in_bits==8 && (s->divx_version>=0 || s->xvid_build>=0)){
2129  av_log(s->avctx, AV_LOG_WARNING, "frame skip %d\n", gb->size_in_bits);
2130  return FRAME_SKIPPED; //divx bug
2131  }else
2132  return -1; //end of stream
2133  }
2134 
2135  /* use the bits after the test */
2136  v = get_bits(gb, 8);
2137  startcode = ((startcode << 8) | v) & 0xffffffff;
2138 
2139  if((startcode&0xFFFFFF00) != 0x100)
2140  continue; //no startcode
2141 
2142  if(s->avctx->debug&FF_DEBUG_STARTCODE){
2143  av_log(s->avctx, AV_LOG_DEBUG, "startcode: %3X ", startcode);
2144  if (startcode<=0x11F) av_log(s->avctx, AV_LOG_DEBUG, "Video Object Start");
2145  else if(startcode<=0x12F) av_log(s->avctx, AV_LOG_DEBUG, "Video Object Layer Start");
2146  else if(startcode<=0x13F) av_log(s->avctx, AV_LOG_DEBUG, "Reserved");
2147  else if(startcode<=0x15F) av_log(s->avctx, AV_LOG_DEBUG, "FGS bp start");
2148  else if(startcode<=0x1AF) av_log(s->avctx, AV_LOG_DEBUG, "Reserved");
2149  else if(startcode==0x1B0) av_log(s->avctx, AV_LOG_DEBUG, "Visual Object Seq Start");
2150  else if(startcode==0x1B1) av_log(s->avctx, AV_LOG_DEBUG, "Visual Object Seq End");
2151  else if(startcode==0x1B2) av_log(s->avctx, AV_LOG_DEBUG, "User Data");
2152  else if(startcode==0x1B3) av_log(s->avctx, AV_LOG_DEBUG, "Group of VOP start");
2153  else if(startcode==0x1B4) av_log(s->avctx, AV_LOG_DEBUG, "Video Session Error");
2154  else if(startcode==0x1B5) av_log(s->avctx, AV_LOG_DEBUG, "Visual Object Start");
2155  else if(startcode==0x1B6) av_log(s->avctx, AV_LOG_DEBUG, "Video Object Plane start");
2156  else if(startcode==0x1B7) av_log(s->avctx, AV_LOG_DEBUG, "slice start");
2157  else if(startcode==0x1B8) av_log(s->avctx, AV_LOG_DEBUG, "extension start");
2158  else if(startcode==0x1B9) av_log(s->avctx, AV_LOG_DEBUG, "fgs start");
2159  else if(startcode==0x1BA) av_log(s->avctx, AV_LOG_DEBUG, "FBA Object start");
2160  else if(startcode==0x1BB) av_log(s->avctx, AV_LOG_DEBUG, "FBA Object Plane start");
2161  else if(startcode==0x1BC) av_log(s->avctx, AV_LOG_DEBUG, "Mesh Object start");
2162  else if(startcode==0x1BD) av_log(s->avctx, AV_LOG_DEBUG, "Mesh Object Plane start");
2163  else if(startcode==0x1BE) av_log(s->avctx, AV_LOG_DEBUG, "Still Texture Object start");
2164  else if(startcode==0x1BF) av_log(s->avctx, AV_LOG_DEBUG, "Texture Spatial Layer start");
2165  else if(startcode==0x1C0) av_log(s->avctx, AV_LOG_DEBUG, "Texture SNR Layer start");
2166  else if(startcode==0x1C1) av_log(s->avctx, AV_LOG_DEBUG, "Texture Tile start");
2167  else if(startcode==0x1C2) av_log(s->avctx, AV_LOG_DEBUG, "Texture Shape Layer start");
2168  else if(startcode==0x1C3) av_log(s->avctx, AV_LOG_DEBUG, "stuffing start");
2169  else if(startcode<=0x1C5) av_log(s->avctx, AV_LOG_DEBUG, "reserved");
2170  else if(startcode<=0x1FF) av_log(s->avctx, AV_LOG_DEBUG, "System start");
2171  av_log(s->avctx, AV_LOG_DEBUG, " at %d\n", get_bits_count(gb));
2172  }
2173 
2174  if(startcode >= 0x120 && startcode <= 0x12F){
2175  if(decode_vol_header(s, gb) < 0)
2176  return -1;
2177  }
2178  else if(startcode == USER_DATA_STARTCODE){
2179  decode_user_data(s, gb);
2180  }
2181  else if(startcode == GOP_STARTCODE){
2182  mpeg4_decode_gop_header(s, gb);
2183  }
2184  else if(startcode == VOS_STARTCODE){
2186  }
2187  else if(startcode == VOP_STARTCODE){
2188  break;
2189  }
2190 
2191  align_get_bits(gb);
2192  startcode = 0xff;
2193  }
2194 end:
2195  if(s->flags& CODEC_FLAG_LOW_DELAY)
2196  s->low_delay=1;
2197  s->avctx->has_b_frames= !s->low_delay;
2198  return decode_vop_header(s, gb);
2199 }
2200 
2202 {
2203  MpegEncContext *s = avctx->priv_data;
2204  int ret;
2205  static int done = 0;
2206 
2207  s->divx_version=
2208  s->divx_build=
2209  s->xvid_build=
2210  s->lavc_build= -1;
2211 
2212  if((ret=ff_h263_decode_init(avctx)) < 0)
2213  return ret;
2214 
2215  if (!done) {
2216  done = 1;
2217 
2224  INIT_VLC_STATIC(&dc_lum, DC_VLC_BITS, 10 /* 13 */,
2225  &ff_mpeg4_DCtab_lum[0][1], 2, 1,
2226  &ff_mpeg4_DCtab_lum[0][0], 2, 1, 512);
2227  INIT_VLC_STATIC(&dc_chrom, DC_VLC_BITS, 10 /* 13 */,
2228  &ff_mpeg4_DCtab_chrom[0][1], 2, 1,
2229  &ff_mpeg4_DCtab_chrom[0][0], 2, 1, 512);
2230  INIT_VLC_STATIC(&sprite_trajectory, SPRITE_TRAJ_VLC_BITS, 15,
2231  &ff_sprite_trajectory_tab[0][1], 4, 2,
2232  &ff_sprite_trajectory_tab[0][0], 4, 2, 128);
2233  INIT_VLC_STATIC(&mb_type_b_vlc, MB_TYPE_B_VLC_BITS, 4,
2234  &ff_mb_type_b_tab[0][1], 2, 1,
2235  &ff_mb_type_b_tab[0][0], 2, 1, 16);
2236  }
2237 
2238  s->h263_pred = 1;
2239  s->low_delay = 0; //default, might be overriden in the vol header during header parsing
2241  s->time_increment_bits = 4; /* default value for broken headers */
2243 
2244  return 0;
2245 }
2246 
2248  { FF_PROFILE_MPEG4_SIMPLE, "Simple Profile" },
2249  { FF_PROFILE_MPEG4_SIMPLE_SCALABLE, "Simple Scalable Profile" },
2250  { FF_PROFILE_MPEG4_CORE, "Core Profile" },
2251  { FF_PROFILE_MPEG4_MAIN, "Main Profile" },
2252  { FF_PROFILE_MPEG4_N_BIT, "N-bit Profile" },
2253  { FF_PROFILE_MPEG4_SCALABLE_TEXTURE, "Scalable Texture Profile" },
2254  { FF_PROFILE_MPEG4_SIMPLE_FACE_ANIMATION, "Simple Face Animation Profile" },
2255  { FF_PROFILE_MPEG4_BASIC_ANIMATED_TEXTURE, "Basic Animated Texture Profile" },
2256  { FF_PROFILE_MPEG4_HYBRID, "Hybrid Profile" },
2257  { FF_PROFILE_MPEG4_ADVANCED_REAL_TIME, "Advanced Real Time Simple Profile" },
2258  { FF_PROFILE_MPEG4_CORE_SCALABLE, "Code Scalable Profile" },
2259  { FF_PROFILE_MPEG4_ADVANCED_CODING, "Advanced Coding Profile" },
2260  { FF_PROFILE_MPEG4_ADVANCED_CORE, "Advanced Core Profile" },
2261  { FF_PROFILE_MPEG4_ADVANCED_SCALABLE_TEXTURE, "Advanced Scalable Texture Profile" },
2262  { FF_PROFILE_MPEG4_SIMPLE_STUDIO, "Simple Studio Profile" },
2263  { FF_PROFILE_MPEG4_ADVANCED_SIMPLE, "Advanced Simple Profile" },
2264 };
2265 
2267  .name = "mpeg4",
2268  .type = AVMEDIA_TYPE_VIDEO,
2269  .id = AV_CODEC_ID_MPEG4,
2270  .priv_data_size = sizeof(MpegEncContext),
2271  .init = decode_init,
2274  .capabilities = CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 |
2277  .flush = ff_mpeg_flush,
2278  .long_name = NULL_IF_CONFIG_SMALL("MPEG-4 part 2"),
2279  .pix_fmts = ff_hwaccel_pixfmt_list_420,
2280  .profiles = NULL_IF_CONFIG_SMALL(mpeg4_video_profiles),
2281  .update_thread_context = ONLY_IF_THREADS_ENABLED(ff_mpeg_update_thread_context),
2282 };
2283 
2284 
2285 #if CONFIG_MPEG4_VDPAU_DECODER
2286 AVCodec ff_mpeg4_vdpau_decoder = {
2287  .name = "mpeg4_vdpau",
2288  .type = AVMEDIA_TYPE_VIDEO,
2289  .id = AV_CODEC_ID_MPEG4,
2290  .priv_data_size = sizeof(MpegEncContext),
2291  .init = decode_init,
2294  .capabilities = CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED | CODEC_CAP_DELAY |
2295  CODEC_CAP_HWACCEL_VDPAU,
2296  .long_name = NULL_IF_CONFIG_SMALL("MPEG-4 part 2 (VDPAU)"),
2297  .pix_fmts = (const enum AVPixelFormat[]){ AV_PIX_FMT_VDPAU_MPEG4,
2298  AV_PIX_FMT_NONE },
2299 };
2300 #endif