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) ff_thread_await_progress((AVFrame*)s->next_picture_ptr, mb_y++, 0);
385  mb_num++;
386  if (++mb_x == s->mb_width) mb_x = 0;
387  }
388  if(mb_num >= s->mb_num) return -1; // slice contains just skipped MBs which where already decoded
389  }
390 
391  s->mb_x= mb_num % s->mb_width;
392  s->mb_y= mb_num / s->mb_width;
393 
394  if(s->shape != BIN_ONLY_SHAPE){
395  int qscale= get_bits(&s->gb, s->quant_precision);
396  if(qscale)
397  s->chroma_qscale=s->qscale= qscale;
398  }
399 
400  if(s->shape == RECT_SHAPE){
401  header_extension= get_bits1(&s->gb);
402  }
403  if(header_extension){
404  int time_incr=0;
405 
406  while (get_bits1(&s->gb) != 0)
407  time_incr++;
408 
409  check_marker(&s->gb, "before time_increment in video packed header");
410  skip_bits(&s->gb, s->time_increment_bits); /* time_increment */
411  check_marker(&s->gb, "before vop_coding_type in video packed header");
412 
413  skip_bits(&s->gb, 2); /* vop coding type */
414  //FIXME not rect stuff here
415 
416  if(s->shape != BIN_ONLY_SHAPE){
417  skip_bits(&s->gb, 3); /* intra dc vlc threshold */
418 //FIXME don't just ignore everything
420  if (mpeg4_decode_sprite_trajectory(s, &s->gb) < 0)
421  return AVERROR_INVALIDDATA;
422  av_log(s->avctx, AV_LOG_ERROR, "untested\n");
423  }
424 
425  //FIXME reduced res stuff here
426 
427  if (s->pict_type != AV_PICTURE_TYPE_I) {
428  int f_code = get_bits(&s->gb, 3); /* fcode_for */
429  if(f_code==0){
430  av_log(s->avctx, AV_LOG_ERROR, "Error, video packet header damaged (f_code=0)\n");
431  }
432  }
433  if (s->pict_type == AV_PICTURE_TYPE_B) {
434  int b_code = get_bits(&s->gb, 3);
435  if(b_code==0){
436  av_log(s->avctx, AV_LOG_ERROR, "Error, video packet header damaged (b_code=0)\n");
437  }
438  }
439  }
440  }
441  //FIXME new-pred stuff
442 
443  return 0;
444 }
445 
451 static inline int get_amv(MpegEncContext *s, int n){
452  int x, y, mb_v, sum, dx, dy, shift;
453  int len = 1 << (s->f_code + 4);
454  const int a= s->sprite_warping_accuracy;
455 
456  if(s->workaround_bugs & FF_BUG_AMV)
457  len >>= s->quarter_sample;
458 
459  if(s->real_sprite_warping_points==1){
460  if(s->divx_version==500 && s->divx_build==413)
461  sum= s->sprite_offset[0][n] / (1<<(a - s->quarter_sample));
462  else
463  sum= RSHIFT(s->sprite_offset[0][n]<<s->quarter_sample, a);
464  }else{
465  dx= s->sprite_delta[n][0];
466  dy= s->sprite_delta[n][1];
467  shift= s->sprite_shift[0];
468  if(n) dy -= 1<<(shift + a + 1);
469  else dx -= 1<<(shift + a + 1);
470  mb_v= s->sprite_offset[0][n] + dx*s->mb_x*16 + dy*s->mb_y*16;
471 
472  sum=0;
473  for(y=0; y<16; y++){
474  int v;
475 
476  v= mb_v + dy*y;
477  //XXX FIXME optimize
478  for(x=0; x<16; x++){
479  sum+= v>>shift;
480  v+= dx;
481  }
482  }
483  sum= RSHIFT(sum, a+8-s->quarter_sample);
484  }
485 
486  if (sum < -len) sum= -len;
487  else if (sum >= len) sum= len-1;
488 
489  return sum;
490 }
491 
498 static inline int mpeg4_decode_dc(MpegEncContext * s, int n, int *dir_ptr)
499 {
500  int level, code;
501 
502  if (n < 4)
503  code = get_vlc2(&s->gb, dc_lum.table, DC_VLC_BITS, 1);
504  else
505  code = get_vlc2(&s->gb, dc_chrom.table, DC_VLC_BITS, 1);
506  if (code < 0 || code > 9 /* && s->nbit<9 */){
507  av_log(s->avctx, AV_LOG_ERROR, "illegal dc vlc\n");
508  return -1;
509  }
510  if (code == 0) {
511  level = 0;
512  } else {
513  if(IS_3IV1){
514  if(code==1)
515  level= 2*get_bits1(&s->gb)-1;
516  else{
517  if(get_bits1(&s->gb))
518  level = get_bits(&s->gb, code-1) + (1<<(code-1));
519  else
520  level = -get_bits(&s->gb, code-1) - (1<<(code-1));
521  }
522  }else{
523  level = get_xbits(&s->gb, code);
524  }
525 
526  if (code > 8){
527  if(get_bits1(&s->gb)==0){ /* marker */
529  av_log(s->avctx, AV_LOG_ERROR, "dc marker bit missing\n");
530  return -1;
531  }
532  }
533  }
534  }
535 
536  return ff_mpeg4_pred_dc(s, n, level, dir_ptr, 0);
537 }
538 
544  int mb_num;
545  static const int8_t quant_tab[4] = { -1, -2, 1, 2 };
546 
547  /* decode first partition */
548  mb_num=0;
549  s->first_slice_line=1;
550  for(; s->mb_y<s->mb_height; s->mb_y++){
552  for(; s->mb_x<s->mb_width; s->mb_x++){
553  const int xy= s->mb_x + s->mb_y*s->mb_stride;
554  int cbpc;
555  int dir=0;
556 
557  mb_num++;
559  if(s->mb_x == s->resync_mb_x && s->mb_y == s->resync_mb_y+1)
560  s->first_slice_line=0;
561 
563  int i;
564 
565  do{
566  if(show_bits_long(&s->gb, 19)==DC_MARKER){
567  return mb_num-1;
568  }
569 
571  if (cbpc < 0){
572  av_log(s->avctx, AV_LOG_ERROR, "cbpc corrupted at %d %d\n", s->mb_x, s->mb_y);
573  return -1;
574  }
575  }while(cbpc == 8);
576 
577  s->cbp_table[xy]= cbpc & 3;
579  s->mb_intra = 1;
580 
581  if(cbpc & 4) {
582  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
583  }
585 
586  s->mbintra_table[xy]= 1;
587  for(i=0; i<6; i++){
588  int dc_pred_dir;
589  int dc= mpeg4_decode_dc(s, i, &dc_pred_dir);
590  if(dc < 0){
591  av_log(s->avctx, AV_LOG_ERROR, "DC corrupted at %d %d\n", s->mb_x, s->mb_y);
592  return -1;
593  }
594  dir<<=1;
595  if(dc_pred_dir) dir|=1;
596  }
597  s->pred_dir_table[xy]= dir;
598  }else{ /* P/S_TYPE */
599  int mx, my, pred_x, pred_y, bits;
600  int16_t * const mot_val = s->current_picture.f.motion_val[0][s->block_index[0]];
601  const int stride= s->b8_stride*2;
602 
603 try_again:
604  bits= show_bits(&s->gb, 17);
605  if(bits==MOTION_MARKER){
606  return mb_num-1;
607  }
608  skip_bits1(&s->gb);
609  if(bits&0x10000){
610  /* skip mb */
613  mx= get_amv(s, 0);
614  my= get_amv(s, 1);
615  }else{
617  mx=my=0;
618  }
619  mot_val[0 ]= mot_val[2 ]=
620  mot_val[0+stride]= mot_val[2+stride]= mx;
621  mot_val[1 ]= mot_val[3 ]=
622  mot_val[1+stride]= mot_val[3+stride]= my;
623 
624  if(s->mbintra_table[xy])
626  continue;
627  }
628 
630  if (cbpc < 0){
631  av_log(s->avctx, AV_LOG_ERROR, "cbpc corrupted at %d %d\n", s->mb_x, s->mb_y);
632  return -1;
633  }
634  if(cbpc == 20)
635  goto try_again;
636 
637  s->cbp_table[xy]= cbpc&(8+3); //8 is dquant
638 
639  s->mb_intra = ((cbpc & 4) != 0);
640 
641  if(s->mb_intra){
643  s->mbintra_table[xy]= 1;
644  mot_val[0 ]= mot_val[2 ]=
645  mot_val[0+stride]= mot_val[2+stride]= 0;
646  mot_val[1 ]= mot_val[3 ]=
647  mot_val[1+stride]= mot_val[3+stride]= 0;
648  }else{
649  if(s->mbintra_table[xy])
651 
652  if(s->pict_type==AV_PICTURE_TYPE_S && s->vol_sprite_usage==GMC_SPRITE && (cbpc & 16) == 0)
653  s->mcsel= get_bits1(&s->gb);
654  else s->mcsel= 0;
655 
656  if ((cbpc & 16) == 0) {
657  /* 16x16 motion prediction */
658 
659  ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
660  if(!s->mcsel){
661  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
662  if (mx >= 0xffff)
663  return -1;
664 
665  my = ff_h263_decode_motion(s, pred_y, s->f_code);
666  if (my >= 0xffff)
667  return -1;
669  } else {
670  mx = get_amv(s, 0);
671  my = get_amv(s, 1);
673  }
674 
675  mot_val[0 ]= mot_val[2 ] =
676  mot_val[0+stride]= mot_val[2+stride]= mx;
677  mot_val[1 ]= mot_val[3 ]=
678  mot_val[1+stride]= mot_val[3+stride]= my;
679  } else {
680  int i;
682  for(i=0;i<4;i++) {
683  int16_t *mot_val= ff_h263_pred_motion(s, i, 0, &pred_x, &pred_y);
684  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
685  if (mx >= 0xffff)
686  return -1;
687 
688  my = ff_h263_decode_motion(s, pred_y, s->f_code);
689  if (my >= 0xffff)
690  return -1;
691  mot_val[0] = mx;
692  mot_val[1] = my;
693  }
694  }
695  }
696  }
697  }
698  s->mb_x= 0;
699  }
700 
701  return mb_num;
702 }
703 
708 static int mpeg4_decode_partition_b(MpegEncContext *s, int mb_count){
709  int mb_num=0;
710  static const int8_t quant_tab[4] = { -1, -2, 1, 2 };
711 
712  s->mb_x= s->resync_mb_x;
713  s->first_slice_line=1;
714  for(s->mb_y= s->resync_mb_y; mb_num < mb_count; s->mb_y++){
716  for(; mb_num < mb_count && s->mb_x<s->mb_width; s->mb_x++){
717  const int xy= s->mb_x + s->mb_y*s->mb_stride;
718 
719  mb_num++;
721  if(s->mb_x == s->resync_mb_x && s->mb_y == s->resync_mb_y+1)
722  s->first_slice_line=0;
723 
725  int ac_pred= get_bits1(&s->gb);
726  int cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
727  if(cbpy<0){
728  av_log(s->avctx, AV_LOG_ERROR, "cbpy corrupted at %d %d\n", s->mb_x, s->mb_y);
729  return -1;
730  }
731 
732  s->cbp_table[xy]|= cbpy<<2;
733  s->current_picture.f.mb_type[xy] |= ac_pred*MB_TYPE_ACPRED;
734  }else{ /* P || S_TYPE */
735  if (IS_INTRA(s->current_picture.f.mb_type[xy])) {
736  int dir=0,i;
737  int ac_pred = get_bits1(&s->gb);
738  int cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
739 
740  if(cbpy<0){
741  av_log(s->avctx, AV_LOG_ERROR, "I cbpy corrupted at %d %d\n", s->mb_x, s->mb_y);
742  return -1;
743  }
744 
745  if(s->cbp_table[xy] & 8) {
746  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
747  }
748  s->current_picture.f.qscale_table[xy] = s->qscale;
749 
750  for(i=0; i<6; i++){
751  int dc_pred_dir;
752  int dc= mpeg4_decode_dc(s, i, &dc_pred_dir);
753  if(dc < 0){
754  av_log(s->avctx, AV_LOG_ERROR, "DC corrupted at %d %d\n", s->mb_x, s->mb_y);
755  return -1;
756  }
757  dir<<=1;
758  if(dc_pred_dir) dir|=1;
759  }
760  s->cbp_table[xy]&= 3; //remove dquant
761  s->cbp_table[xy]|= cbpy<<2;
762  s->current_picture.f.mb_type[xy] |= ac_pred*MB_TYPE_ACPRED;
763  s->pred_dir_table[xy]= dir;
764  } else if (IS_SKIP(s->current_picture.f.mb_type[xy])) {
765  s->current_picture.f.qscale_table[xy] = s->qscale;
766  s->cbp_table[xy]= 0;
767  }else{
768  int cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
769 
770  if(cbpy<0){
771  av_log(s->avctx, AV_LOG_ERROR, "P cbpy corrupted at %d %d\n", s->mb_x, s->mb_y);
772  return -1;
773  }
774 
775  if(s->cbp_table[xy] & 8) {
776  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
777  }
778  s->current_picture.f.qscale_table[xy] = s->qscale;
779 
780  s->cbp_table[xy]&= 3; //remove dquant
781  s->cbp_table[xy]|= (cbpy^0xf)<<2;
782  }
783  }
784  }
785  if(mb_num >= mb_count) return 0;
786  s->mb_x= 0;
787  }
788  return 0;
789 }
790 
796 {
797  int mb_num;
798  const int part_a_error= s->pict_type==AV_PICTURE_TYPE_I ? (ER_DC_ERROR|ER_MV_ERROR) : ER_MV_ERROR;
799  const int part_a_end = s->pict_type==AV_PICTURE_TYPE_I ? (ER_DC_END |ER_MV_END) : ER_MV_END;
800 
801  mb_num= mpeg4_decode_partition_a(s);
802  if(mb_num<0){
803  ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, part_a_error);
804  return -1;
805  }
806 
807  if(s->resync_mb_x + s->resync_mb_y*s->mb_width + mb_num > s->mb_num){
808  av_log(s->avctx, AV_LOG_ERROR, "slice below monitor ...\n");
809  ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, part_a_error);
810  return -1;
811  }
812 
813  s->mb_num_left= mb_num;
814 
816  while(show_bits(&s->gb, 9) == 1)
817  skip_bits(&s->gb, 9);
818  if(get_bits_long(&s->gb, 19)!=DC_MARKER){
819  av_log(s->avctx, AV_LOG_ERROR, "marker missing after first I partition at %d %d\n", s->mb_x, s->mb_y);
820  return -1;
821  }
822  }else{
823  while(show_bits(&s->gb, 10) == 1)
824  skip_bits(&s->gb, 10);
825  if(get_bits(&s->gb, 17)!=MOTION_MARKER){
826  av_log(s->avctx, AV_LOG_ERROR, "marker missing after first P partition at %d %d\n", s->mb_x, s->mb_y);
827  return -1;
828  }
829  }
830  ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, part_a_end);
831 
832  if( mpeg4_decode_partition_b(s, mb_num) < 0){
835  return -1;
836  }else{
839  }
840 
841  return 0;
842 }
843 
849  int n, int coded, int intra, int rvlc)
850 {
851  int level, i, last, run;
852  int dc_pred_dir;
853  RLTable * rl;
854  RL_VLC_ELEM * rl_vlc;
855  const uint8_t * scan_table;
856  int qmul, qadd;
857 
858  //Note intra & rvlc should be optimized away if this is inlined
859 
860  if(intra) {
861  if(s->use_intra_dc_vlc){
862  /* DC coef */
863  if(s->partitioned_frame){
864  level = s->dc_val[0][ s->block_index[n] ];
865  if(n<4) level= FASTDIV((level + (s->y_dc_scale>>1)), s->y_dc_scale);
866  else level= FASTDIV((level + (s->c_dc_scale>>1)), s->c_dc_scale);
867  dc_pred_dir= (s->pred_dir_table[s->mb_x + s->mb_y*s->mb_stride]<<n)&32;
868  }else{
869  level = mpeg4_decode_dc(s, n, &dc_pred_dir);
870  if (level < 0)
871  return -1;
872  }
873  block[0] = level;
874  i = 0;
875  }else{
876  i = -1;
877  ff_mpeg4_pred_dc(s, n, 0, &dc_pred_dir, 0);
878  }
879  if (!coded)
880  goto not_coded;
881 
882  if(rvlc){
883  rl = &rvlc_rl_intra;
884  rl_vlc = rvlc_rl_intra.rl_vlc[0];
885  }else{
886  rl = &ff_mpeg4_rl_intra;
887  rl_vlc = ff_mpeg4_rl_intra.rl_vlc[0];
888  }
889  if (s->ac_pred) {
890  if (dc_pred_dir == 0)
891  scan_table = s->intra_v_scantable.permutated; /* left */
892  else
893  scan_table = s->intra_h_scantable.permutated; /* top */
894  } else {
895  scan_table = s->intra_scantable.permutated;
896  }
897  qmul=1;
898  qadd=0;
899  } else {
900  i = -1;
901  if (!coded) {
902  s->block_last_index[n] = i;
903  return 0;
904  }
905  if(rvlc) rl = &rvlc_rl_inter;
906  else rl = &ff_h263_rl_inter;
907 
908  scan_table = s->intra_scantable.permutated;
909 
910  if(s->mpeg_quant){
911  qmul=1;
912  qadd=0;
913  if(rvlc){
914  rl_vlc = rvlc_rl_inter.rl_vlc[0];
915  }else{
916  rl_vlc = ff_h263_rl_inter.rl_vlc[0];
917  }
918  }else{
919  qmul = s->qscale << 1;
920  qadd = (s->qscale - 1) | 1;
921  if(rvlc){
922  rl_vlc = rvlc_rl_inter.rl_vlc[s->qscale];
923  }else{
924  rl_vlc = ff_h263_rl_inter.rl_vlc[s->qscale];
925  }
926  }
927  }
928  {
929  OPEN_READER(re, &s->gb);
930  for(;;) {
931  UPDATE_CACHE(re, &s->gb);
932  GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 0);
933  if (level==0) {
934  /* escape */
935  if(rvlc){
936  if(SHOW_UBITS(re, &s->gb, 1)==0){
937  av_log(s->avctx, AV_LOG_ERROR, "1. marker bit missing in rvlc esc\n");
938  return -1;
939  }; SKIP_CACHE(re, &s->gb, 1);
940 
941  last= SHOW_UBITS(re, &s->gb, 1); SKIP_CACHE(re, &s->gb, 1);
942  run= SHOW_UBITS(re, &s->gb, 6);
943  SKIP_COUNTER(re, &s->gb, 1+1+6);
944  UPDATE_CACHE(re, &s->gb);
945 
946  if(SHOW_UBITS(re, &s->gb, 1)==0){
947  av_log(s->avctx, AV_LOG_ERROR, "2. marker bit missing in rvlc esc\n");
948  return -1;
949  }; SKIP_CACHE(re, &s->gb, 1);
950 
951  level= SHOW_UBITS(re, &s->gb, 11); SKIP_CACHE(re, &s->gb, 11);
952 
953  if(SHOW_UBITS(re, &s->gb, 5)!=0x10){
954  av_log(s->avctx, AV_LOG_ERROR, "reverse esc missing\n");
955  return -1;
956  }; SKIP_CACHE(re, &s->gb, 5);
957 
958  level= level * qmul + qadd;
959  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
960  SKIP_COUNTER(re, &s->gb, 1+11+5+1);
961 
962  i+= run + 1;
963  if(last) i+=192;
964  }else{
965  int cache;
966  cache= GET_CACHE(re, &s->gb);
967 
968  if(IS_3IV1)
969  cache ^= 0xC0000000;
970 
971  if (cache&0x80000000) {
972  if (cache&0x40000000) {
973  /* third escape */
974  SKIP_CACHE(re, &s->gb, 2);
975  last= SHOW_UBITS(re, &s->gb, 1); SKIP_CACHE(re, &s->gb, 1);
976  run= SHOW_UBITS(re, &s->gb, 6);
977  SKIP_COUNTER(re, &s->gb, 2+1+6);
978  UPDATE_CACHE(re, &s->gb);
979 
980  if(IS_3IV1){
981  level= SHOW_SBITS(re, &s->gb, 12); LAST_SKIP_BITS(re, &s->gb, 12);
982  }else{
983  if(SHOW_UBITS(re, &s->gb, 1)==0){
984  av_log(s->avctx, AV_LOG_ERROR, "1. marker bit missing in 3. esc\n");
985  return -1;
986  }; SKIP_CACHE(re, &s->gb, 1);
987 
988  level= SHOW_SBITS(re, &s->gb, 12); SKIP_CACHE(re, &s->gb, 12);
989 
990  if(SHOW_UBITS(re, &s->gb, 1)==0){
991  av_log(s->avctx, AV_LOG_ERROR, "2. marker bit missing in 3. esc\n");
992  return -1;
993  }
994 
995  SKIP_COUNTER(re, &s->gb, 1+12+1);
996  }
997 
998  if (level>0) level= level * qmul + qadd;
999  else level= level * qmul - qadd;
1000 
1001  if((unsigned)(level + 2048) > 4095){
1003  if(level > 2560 || level<-2560){
1004  av_log(s->avctx, AV_LOG_ERROR, "|level| overflow in 3. esc, qp=%d\n", s->qscale);
1005  return -1;
1006  }
1007  }
1008  level= level<0 ? -2048 : 2047;
1009  }
1010 
1011  i+= run + 1;
1012  if(last) i+=192;
1013  } else {
1014  /* second escape */
1015  SKIP_BITS(re, &s->gb, 2);
1016  GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 1);
1017  i+= run + rl->max_run[run>>7][level/qmul] +1; //FIXME opt indexing
1018  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1019  LAST_SKIP_BITS(re, &s->gb, 1);
1020  }
1021  } else {
1022  /* first escape */
1023  SKIP_BITS(re, &s->gb, 1);
1024  GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 1);
1025  i+= run;
1026  level = level + rl->max_level[run>>7][(run-1)&63] * qmul;//FIXME opt indexing
1027  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1028  LAST_SKIP_BITS(re, &s->gb, 1);
1029  }
1030  }
1031  } else {
1032  i+= run;
1033  level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1034  LAST_SKIP_BITS(re, &s->gb, 1);
1035  }
1036  if (i > 62){
1037  i-= 192;
1038  if(i&(~63)){
1039  av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
1040  return -1;
1041  }
1042 
1043  block[scan_table[i]] = level;
1044  break;
1045  }
1046 
1047  block[scan_table[i]] = level;
1048  }
1049  CLOSE_READER(re, &s->gb);
1050  }
1051  not_coded:
1052  if (intra) {
1053  if(!s->use_intra_dc_vlc){
1054  block[0] = ff_mpeg4_pred_dc(s, n, block[0], &dc_pred_dir, 0);
1055 
1056  i -= i>>31; //if(i == -1) i=0;
1057  }
1058 
1059  mpeg4_pred_ac(s, block, n, dc_pred_dir);
1060  if (s->ac_pred) {
1061  i = 63; /* XXX: not optimal */
1062  }
1063  }
1064  s->block_last_index[n] = i;
1065  return 0;
1066 }
1067 
1073 {
1074  int cbp, mb_type;
1075  const int xy= s->mb_x + s->mb_y*s->mb_stride;
1076 
1077  mb_type = s->current_picture.f.mb_type[xy];
1078  cbp = s->cbp_table[xy];
1079 
1081 
1082  if (s->current_picture.f.qscale_table[xy] != s->qscale) {
1084  }
1085 
1087  int i;
1088  for(i=0; i<4; i++){
1089  s->mv[0][i][0] = s->current_picture.f.motion_val[0][s->block_index[i]][0];
1090  s->mv[0][i][1] = s->current_picture.f.motion_val[0][s->block_index[i]][1];
1091  }
1092  s->mb_intra = IS_INTRA(mb_type);
1093 
1094  if (IS_SKIP(mb_type)) {
1095  /* skip mb */
1096  for(i=0;i<6;i++)
1097  s->block_last_index[i] = -1;
1098  s->mv_dir = MV_DIR_FORWARD;
1099  s->mv_type = MV_TYPE_16X16;
1101  s->mcsel=1;
1102  s->mb_skipped = 0;
1103  }else{
1104  s->mcsel=0;
1105  s->mb_skipped = 1;
1106  }
1107  }else if(s->mb_intra){
1108  s->ac_pred = IS_ACPRED(s->current_picture.f.mb_type[xy]);
1109  }else if(!s->mb_intra){
1110 // s->mcsel= 0; //FIXME do we need to init that
1111 
1112  s->mv_dir = MV_DIR_FORWARD;
1113  if (IS_8X8(mb_type)) {
1114  s->mv_type = MV_TYPE_8X8;
1115  } else {
1116  s->mv_type = MV_TYPE_16X16;
1117  }
1118  }
1119  } else { /* I-Frame */
1120  s->mb_intra = 1;
1121  s->ac_pred = IS_ACPRED(s->current_picture.f.mb_type[xy]);
1122  }
1123 
1124  if (!IS_SKIP(mb_type)) {
1125  int i;
1126  s->dsp.clear_blocks(s->block[0]);
1127  /* decode each block */
1128  for (i = 0; i < 6; i++) {
1129  if(mpeg4_decode_block(s, block[i], i, cbp&32, s->mb_intra, s->rvlc) < 0){
1130  av_log(s->avctx, AV_LOG_ERROR, "texture corrupted at %d %d %d\n", s->mb_x, s->mb_y, s->mb_intra);
1131  return -1;
1132  }
1133  cbp+=cbp;
1134  }
1135  }
1136 
1137  /* per-MB end of slice check */
1138 
1139  if(--s->mb_num_left <= 0){
1140  if(mpeg4_is_resync(s))
1141  return SLICE_END;
1142  else
1143  return SLICE_NOEND;
1144  }else{
1145  if(mpeg4_is_resync(s)){
1146  const int delta= s->mb_x + 1 == s->mb_width ? 2 : 1;
1147  if(s->cbp_table[xy+delta])
1148  return SLICE_END;
1149  }
1150  return SLICE_OK;
1151  }
1152 }
1153 
1155  DCTELEM block[6][64])
1156 {
1157  int cbpc, cbpy, i, cbp, pred_x, pred_y, mx, my, dquant;
1158  int16_t *mot_val;
1159  static int8_t quant_tab[4] = { -1, -2, 1, 2 };
1160  const int xy= s->mb_x + s->mb_y * s->mb_stride;
1161 
1162  assert(s->h263_pred);
1163 
1165  do{
1166  if (get_bits1(&s->gb)) {
1167  /* skip mb */
1168  s->mb_intra = 0;
1169  for(i=0;i<6;i++)
1170  s->block_last_index[i] = -1;
1171  s->mv_dir = MV_DIR_FORWARD;
1172  s->mv_type = MV_TYPE_16X16;
1175  s->mcsel=1;
1176  s->mv[0][0][0]= get_amv(s, 0);
1177  s->mv[0][0][1]= get_amv(s, 1);
1178 
1179  s->mb_skipped = 0;
1180  }else{
1182  s->mcsel=0;
1183  s->mv[0][0][0] = 0;
1184  s->mv[0][0][1] = 0;
1185  s->mb_skipped = 1;
1186  }
1187  goto end;
1188  }
1190  if (cbpc < 0){
1191  av_log(s->avctx, AV_LOG_ERROR, "cbpc damaged at %d %d\n", s->mb_x, s->mb_y);
1192  return -1;
1193  }
1194  }while(cbpc == 20);
1195 
1196  s->dsp.clear_blocks(s->block[0]);
1197  dquant = cbpc & 8;
1198  s->mb_intra = ((cbpc & 4) != 0);
1199  if (s->mb_intra) goto intra;
1200 
1201  if(s->pict_type==AV_PICTURE_TYPE_S && s->vol_sprite_usage==GMC_SPRITE && (cbpc & 16) == 0)
1202  s->mcsel= get_bits1(&s->gb);
1203  else s->mcsel= 0;
1204  cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1) ^ 0x0F;
1205 
1206  cbp = (cbpc & 3) | (cbpy << 2);
1207  if (dquant) {
1208  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
1209  }
1210  if((!s->progressive_sequence) && (cbp || (s->workaround_bugs&FF_BUG_XVID_ILACE)))
1211  s->interlaced_dct= get_bits1(&s->gb);
1212 
1213  s->mv_dir = MV_DIR_FORWARD;
1214  if ((cbpc & 16) == 0) {
1215  if(s->mcsel){
1217  /* 16x16 global motion prediction */
1218  s->mv_type = MV_TYPE_16X16;
1219  mx= get_amv(s, 0);
1220  my= get_amv(s, 1);
1221  s->mv[0][0][0] = mx;
1222  s->mv[0][0][1] = my;
1223  }else if((!s->progressive_sequence) && get_bits1(&s->gb)){
1225  /* 16x8 field motion prediction */
1226  s->mv_type= MV_TYPE_FIELD;
1227 
1228  s->field_select[0][0]= get_bits1(&s->gb);
1229  s->field_select[0][1]= get_bits1(&s->gb);
1230 
1231  ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
1232 
1233  for(i=0; i<2; i++){
1234  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
1235  if (mx >= 0xffff)
1236  return -1;
1237 
1238  my = ff_h263_decode_motion(s, pred_y/2, s->f_code);
1239  if (my >= 0xffff)
1240  return -1;
1241 
1242  s->mv[0][i][0] = mx;
1243  s->mv[0][i][1] = my;
1244  }
1245  }else{
1247  /* 16x16 motion prediction */
1248  s->mv_type = MV_TYPE_16X16;
1249  ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
1250  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
1251 
1252  if (mx >= 0xffff)
1253  return -1;
1254 
1255  my = ff_h263_decode_motion(s, pred_y, s->f_code);
1256 
1257  if (my >= 0xffff)
1258  return -1;
1259  s->mv[0][0][0] = mx;
1260  s->mv[0][0][1] = my;
1261  }
1262  } else {
1264  s->mv_type = MV_TYPE_8X8;
1265  for(i=0;i<4;i++) {
1266  mot_val = ff_h263_pred_motion(s, i, 0, &pred_x, &pred_y);
1267  mx = ff_h263_decode_motion(s, pred_x, s->f_code);
1268  if (mx >= 0xffff)
1269  return -1;
1270 
1271  my = ff_h263_decode_motion(s, pred_y, s->f_code);
1272  if (my >= 0xffff)
1273  return -1;
1274  s->mv[0][i][0] = mx;
1275  s->mv[0][i][1] = my;
1276  mot_val[0] = mx;
1277  mot_val[1] = my;
1278  }
1279  }
1280  } else if(s->pict_type==AV_PICTURE_TYPE_B) {
1281  int modb1; // first bit of modb
1282  int modb2; // second bit of modb
1283  int mb_type;
1284 
1285  s->mb_intra = 0; //B-frames never contain intra blocks
1286  s->mcsel=0; // ... true gmc blocks
1287 
1288  if(s->mb_x==0){
1289  for(i=0; i<2; i++){
1290  s->last_mv[i][0][0]=
1291  s->last_mv[i][0][1]=
1292  s->last_mv[i][1][0]=
1293  s->last_mv[i][1][1]= 0;
1294  }
1295 
1297  }
1298 
1299  /* if we skipped it in the future P Frame than skip it now too */
1300  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
1301 
1302  if(s->mb_skipped){
1303  /* skip mb */
1304  for(i=0;i<6;i++)
1305  s->block_last_index[i] = -1;
1306 
1307  s->mv_dir = MV_DIR_FORWARD;
1308  s->mv_type = MV_TYPE_16X16;
1309  s->mv[0][0][0] = 0;
1310  s->mv[0][0][1] = 0;
1311  s->mv[1][0][0] = 0;
1312  s->mv[1][0][1] = 0;
1314  goto end;
1315  }
1316 
1317  modb1= get_bits1(&s->gb);
1318  if(modb1){
1319  mb_type= MB_TYPE_DIRECT2 | MB_TYPE_SKIP | MB_TYPE_L0L1; //like MB_TYPE_B_DIRECT but no vectors coded
1320  cbp=0;
1321  }else{
1322  modb2= get_bits1(&s->gb);
1323  mb_type= get_vlc2(&s->gb, mb_type_b_vlc.table, MB_TYPE_B_VLC_BITS, 1);
1324  if(mb_type<0){
1325  av_log(s->avctx, AV_LOG_ERROR, "illegal MB_type\n");
1326  return -1;
1327  }
1328  mb_type= mb_type_b_map[ mb_type ];
1329  if(modb2) cbp= 0;
1330  else{
1331  s->dsp.clear_blocks(s->block[0]);
1332  cbp= get_bits(&s->gb, 6);
1333  }
1334 
1335  if ((!IS_DIRECT(mb_type)) && cbp) {
1336  if(get_bits1(&s->gb)){
1337  ff_set_qscale(s, s->qscale + get_bits1(&s->gb)*4 - 2);
1338  }
1339  }
1340 
1341  if(!s->progressive_sequence){
1342  if(cbp)
1343  s->interlaced_dct= get_bits1(&s->gb);
1344 
1345  if(!IS_DIRECT(mb_type) && get_bits1(&s->gb)){
1346  mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED;
1347  mb_type &= ~MB_TYPE_16x16;
1348 
1349  if(USES_LIST(mb_type, 0)){
1350  s->field_select[0][0]= get_bits1(&s->gb);
1351  s->field_select[0][1]= get_bits1(&s->gb);
1352  }
1353  if(USES_LIST(mb_type, 1)){
1354  s->field_select[1][0]= get_bits1(&s->gb);
1355  s->field_select[1][1]= get_bits1(&s->gb);
1356  }
1357  }
1358  }
1359 
1360  s->mv_dir = 0;
1361  if((mb_type & (MB_TYPE_DIRECT2|MB_TYPE_INTERLACED)) == 0){
1362  s->mv_type= MV_TYPE_16X16;
1363 
1364  if(USES_LIST(mb_type, 0)){
1365  s->mv_dir = MV_DIR_FORWARD;
1366 
1367  mx = ff_h263_decode_motion(s, s->last_mv[0][0][0], s->f_code);
1368  my = ff_h263_decode_motion(s, s->last_mv[0][0][1], s->f_code);
1369  s->last_mv[0][1][0]= s->last_mv[0][0][0]= s->mv[0][0][0] = mx;
1370  s->last_mv[0][1][1]= s->last_mv[0][0][1]= s->mv[0][0][1] = my;
1371  }
1372 
1373  if(USES_LIST(mb_type, 1)){
1374  s->mv_dir |= MV_DIR_BACKWARD;
1375 
1376  mx = ff_h263_decode_motion(s, s->last_mv[1][0][0], s->b_code);
1377  my = ff_h263_decode_motion(s, s->last_mv[1][0][1], s->b_code);
1378  s->last_mv[1][1][0]= s->last_mv[1][0][0]= s->mv[1][0][0] = mx;
1379  s->last_mv[1][1][1]= s->last_mv[1][0][1]= s->mv[1][0][1] = my;
1380  }
1381  }else if(!IS_DIRECT(mb_type)){
1382  s->mv_type= MV_TYPE_FIELD;
1383 
1384  if(USES_LIST(mb_type, 0)){
1385  s->mv_dir = MV_DIR_FORWARD;
1386 
1387  for(i=0; i<2; i++){
1388  mx = ff_h263_decode_motion(s, s->last_mv[0][i][0] , s->f_code);
1389  my = ff_h263_decode_motion(s, s->last_mv[0][i][1]/2, s->f_code);
1390  s->last_mv[0][i][0]= s->mv[0][i][0] = mx;
1391  s->last_mv[0][i][1]= (s->mv[0][i][1] = my)*2;
1392  }
1393  }
1394 
1395  if(USES_LIST(mb_type, 1)){
1396  s->mv_dir |= MV_DIR_BACKWARD;
1397 
1398  for(i=0; i<2; i++){
1399  mx = ff_h263_decode_motion(s, s->last_mv[1][i][0] , s->b_code);
1400  my = ff_h263_decode_motion(s, s->last_mv[1][i][1]/2, s->b_code);
1401  s->last_mv[1][i][0]= s->mv[1][i][0] = mx;
1402  s->last_mv[1][i][1]= (s->mv[1][i][1] = my)*2;
1403  }
1404  }
1405  }
1406  }
1407 
1408  if(IS_DIRECT(mb_type)){
1409  if(IS_SKIP(mb_type))
1410  mx=my=0;
1411  else{
1412  mx = ff_h263_decode_motion(s, 0, 1);
1413  my = ff_h263_decode_motion(s, 0, 1);
1414  }
1415 
1417  mb_type |= ff_mpeg4_set_direct_mv(s, mx, my);
1418  }
1419  s->current_picture.f.mb_type[xy] = mb_type;
1420  } else { /* I-Frame */
1421  do{
1423  if (cbpc < 0){
1424  av_log(s->avctx, AV_LOG_ERROR, "I cbpc damaged at %d %d\n", s->mb_x, s->mb_y);
1425  return -1;
1426  }
1427  }while(cbpc == 8);
1428 
1429  dquant = cbpc & 4;
1430  s->mb_intra = 1;
1431 intra:
1432  s->ac_pred = get_bits1(&s->gb);
1433  if(s->ac_pred)
1435  else
1437 
1438  cbpy = get_vlc2(&s->gb, ff_h263_cbpy_vlc.table, CBPY_VLC_BITS, 1);
1439  if(cbpy<0){
1440  av_log(s->avctx, AV_LOG_ERROR, "I cbpy damaged at %d %d\n", s->mb_x, s->mb_y);
1441  return -1;
1442  }
1443  cbp = (cbpc & 3) | (cbpy << 2);
1444 
1446 
1447  if (dquant) {
1448  ff_set_qscale(s, s->qscale + quant_tab[get_bits(&s->gb, 2)]);
1449  }
1450 
1451  if(!s->progressive_sequence)
1452  s->interlaced_dct= get_bits1(&s->gb);
1453 
1454  s->dsp.clear_blocks(s->block[0]);
1455  /* decode each block */
1456  for (i = 0; i < 6; i++) {
1457  if (mpeg4_decode_block(s, block[i], i, cbp&32, 1, 0) < 0)
1458  return -1;
1459  cbp+=cbp;
1460  }
1461  goto end;
1462  }
1463 
1464  /* decode each block */
1465  for (i = 0; i < 6; i++) {
1466  if (mpeg4_decode_block(s, block[i], i, cbp&32, 0, 0) < 0)
1467  return -1;
1468  cbp+=cbp;
1469  }
1470 end:
1471 
1472  /* per-MB end of slice check */
1473  if(s->codec_id==CODEC_ID_MPEG4){
1474  if(mpeg4_is_resync(s)){
1475  const int delta= s->mb_x + 1 == s->mb_width ? 2 : 1;
1476 
1477  if (s->pict_type == AV_PICTURE_TYPE_B && s->next_picture.f.mbskip_table[xy + delta]) {
1479  (s->mb_x + delta >= s->mb_width) ? FFMIN(s->mb_y+1, s->mb_height-1) : s->mb_y, 0);
1480  }
1481 
1482  if (s->pict_type == AV_PICTURE_TYPE_B && s->next_picture.f.mbskip_table[xy + delta])
1483  return SLICE_OK;
1484  return SLICE_END;
1485  }
1486  }
1487 
1488  return SLICE_OK;
1489 }
1490 
1491 
1493  int hours, minutes, seconds;
1494  unsigned time_code = show_bits(gb, 18);
1495 
1496  if (time_code & 0x40) { /* marker_bit */
1497  hours = time_code >> 13;
1498  minutes = time_code >> 7 & 0x3f;
1499  seconds = time_code & 0x3f;
1500  s->time_base = seconds + 60*(minutes + 60*hours);
1501  skip_bits(gb, 20); /* time_code, closed_gov, broken_link */
1502  } else {
1503  av_log(s->avctx, AV_LOG_WARNING, "GOP header missing marker_bit\n");
1504  }
1505 
1506  return 0;
1507 }
1508 
1510  int profile_and_level_indication;
1511 
1512  profile_and_level_indication = get_bits(gb, 8);
1513 
1514  s->avctx->profile = (profile_and_level_indication & 0xf0) >> 4;
1515  s->avctx->level = (profile_and_level_indication & 0x0f);
1516 
1517  // for Simple profile, level 0
1518  if (s->avctx->profile == 0 && s->avctx->level == 8) {
1519  s->avctx->level = 0;
1520  }
1521 
1522  return 0;
1523 }
1524 
1526  int width, height, vo_ver_id;
1527 
1528  /* vol header */
1529  skip_bits(gb, 1); /* random access */
1530  s->vo_type= get_bits(gb, 8);
1531  if (get_bits1(gb) != 0) { /* is_ol_id */
1532  vo_ver_id = get_bits(gb, 4); /* vo_ver_id */
1533  skip_bits(gb, 3); /* vo_priority */
1534  } else {
1535  vo_ver_id = 1;
1536  }
1537  s->aspect_ratio_info= get_bits(gb, 4);
1539  s->avctx->sample_aspect_ratio.num= get_bits(gb, 8); // par_width
1540  s->avctx->sample_aspect_ratio.den= get_bits(gb, 8); // par_height
1541  }else{
1543  }
1544 
1545  if ((s->vol_control_parameters=get_bits1(gb))) { /* vol control parameter */
1546  int chroma_format= get_bits(gb, 2);
1547  if(chroma_format!=CHROMA_420){
1548  av_log(s->avctx, AV_LOG_ERROR, "illegal chroma format\n");
1549  }
1550  s->low_delay= get_bits1(gb);
1551  if(get_bits1(gb)){ /* vbv parameters */
1552  get_bits(gb, 15); /* first_half_bitrate */
1553  skip_bits1(gb); /* marker */
1554  get_bits(gb, 15); /* latter_half_bitrate */
1555  skip_bits1(gb); /* marker */
1556  get_bits(gb, 15); /* first_half_vbv_buffer_size */
1557  skip_bits1(gb); /* marker */
1558  get_bits(gb, 3); /* latter_half_vbv_buffer_size */
1559  get_bits(gb, 11); /* first_half_vbv_occupancy */
1560  skip_bits1(gb); /* marker */
1561  get_bits(gb, 15); /* latter_half_vbv_occupancy */
1562  skip_bits1(gb); /* marker */
1563  }
1564  }else{
1565  // set low delay flag only once the smartest? low delay detection won't be overriden
1566  if(s->picture_number==0)
1567  s->low_delay=0;
1568  }
1569 
1570  s->shape = get_bits(gb, 2); /* vol shape */
1571  if(s->shape != RECT_SHAPE) av_log(s->avctx, AV_LOG_ERROR, "only rectangular vol supported\n");
1572  if(s->shape == GRAY_SHAPE && vo_ver_id != 1){
1573  av_log(s->avctx, AV_LOG_ERROR, "Gray shape not supported\n");
1574  skip_bits(gb, 4); //video_object_layer_shape_extension
1575  }
1576 
1577  check_marker(gb, "before time_increment_resolution");
1578 
1579  s->avctx->time_base.den = get_bits(gb, 16);
1580  if(!s->avctx->time_base.den){
1581  av_log(s->avctx, AV_LOG_ERROR, "time_base.den==0\n");
1582  s->avctx->time_base.num = 0;
1583  return -1;
1584  }
1585 
1586  s->time_increment_bits = av_log2(s->avctx->time_base.den - 1) + 1;
1587  if (s->time_increment_bits < 1)
1588  s->time_increment_bits = 1;
1589 
1590  check_marker(gb, "before fixed_vop_rate");
1591 
1592  if (get_bits1(gb) != 0) { /* fixed_vop_rate */
1594  }else
1595  s->avctx->time_base.num = 1;
1596 
1597  s->t_frame=0;
1598 
1599  if (s->shape != BIN_ONLY_SHAPE) {
1600  if (s->shape == RECT_SHAPE) {
1601  skip_bits1(gb); /* marker */
1602  width = get_bits(gb, 13);
1603  skip_bits1(gb); /* marker */
1604  height = get_bits(gb, 13);
1605  skip_bits1(gb); /* marker */
1606  if(width && height && !(s->width && s->codec_tag == AV_RL32("MP4S"))){ /* they should be non zero but who knows ... */
1607  s->width = width;
1608  s->height = height;
1609  }
1610  }
1611 
1613  s->progressive_frame= get_bits1(gb)^1;
1614  s->interlaced_dct=0;
1615  if(!get_bits1(gb) && (s->avctx->debug & FF_DEBUG_PICT_INFO))
1616  av_log(s->avctx, AV_LOG_INFO, "MPEG4 OBMC not supported (very likely buggy encoder)\n"); /* OBMC Disable */
1617  if (vo_ver_id == 1) {
1618  s->vol_sprite_usage = get_bits1(gb); /* vol_sprite_usage */
1619  } else {
1620  s->vol_sprite_usage = get_bits(gb, 2); /* vol_sprite_usage */
1621  }
1622  if(s->vol_sprite_usage==STATIC_SPRITE) av_log(s->avctx, AV_LOG_ERROR, "Static Sprites not supported\n");
1625  s->sprite_width = get_bits(gb, 13);
1626  skip_bits1(gb); /* marker */
1627  s->sprite_height= get_bits(gb, 13);
1628  skip_bits1(gb); /* marker */
1629  s->sprite_left = get_bits(gb, 13);
1630  skip_bits1(gb); /* marker */
1631  s->sprite_top = get_bits(gb, 13);
1632  skip_bits1(gb); /* marker */
1633  }
1635  if(s->num_sprite_warping_points > 3){
1636  av_log(s->avctx, AV_LOG_ERROR, "%d sprite_warping_points\n", s->num_sprite_warping_points);
1638  return -1;
1639  }
1640  s->sprite_warping_accuracy = get_bits(gb, 2);
1643  s->low_latency_sprite= get_bits1(gb);
1644  }
1645  // FIXME sadct disable bit if verid!=1 && shape not rect
1646 
1647  if (get_bits1(gb) == 1) { /* not_8_bit */
1648  s->quant_precision = get_bits(gb, 4); /* quant_precision */
1649  if(get_bits(gb, 4)!=8) av_log(s->avctx, AV_LOG_ERROR, "N-bit not supported\n"); /* bits_per_pixel */
1650  if(s->quant_precision!=5) av_log(s->avctx, AV_LOG_ERROR, "quant precision %d\n", s->quant_precision);
1651  } else {
1652  s->quant_precision = 5;
1653  }
1654 
1655  // FIXME a bunch of grayscale shape things
1656 
1657  if((s->mpeg_quant=get_bits1(gb))){ /* vol_quant_type */
1658  int i, v;
1659 
1660  /* load default matrixes */
1661  for(i=0; i<64; i++){
1662  int j= s->dsp.idct_permutation[i];
1664  s->intra_matrix[j]= v;
1665  s->chroma_intra_matrix[j]= v;
1666 
1668  s->inter_matrix[j]= v;
1669  s->chroma_inter_matrix[j]= v;
1670  }
1671 
1672  /* load custom intra matrix */
1673  if(get_bits1(gb)){
1674  int last=0;
1675  for(i=0; i<64; i++){
1676  int j;
1677  v= get_bits(gb, 8);
1678  if(v==0) break;
1679 
1680  last= v;
1682  s->intra_matrix[j]= v;
1683  s->chroma_intra_matrix[j]= v;
1684  }
1685 
1686  /* replicate last value */
1687  for(; i<64; i++){
1688  int j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
1689  s->intra_matrix[j]= last;
1690  s->chroma_intra_matrix[j]= last;
1691  }
1692  }
1693 
1694  /* load custom non intra matrix */
1695  if(get_bits1(gb)){
1696  int last=0;
1697  for(i=0; i<64; i++){
1698  int j;
1699  v= get_bits(gb, 8);
1700  if(v==0) break;
1701 
1702  last= v;
1704  s->inter_matrix[j]= v;
1705  s->chroma_inter_matrix[j]= v;
1706  }
1707 
1708  /* replicate last value */
1709  for(; i<64; i++){
1710  int j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
1711  s->inter_matrix[j]= last;
1712  s->chroma_inter_matrix[j]= last;
1713  }
1714  }
1715 
1716  // FIXME a bunch of grayscale shape things
1717  }
1718 
1719  if(vo_ver_id != 1)
1720  s->quarter_sample= get_bits1(gb);
1721  else s->quarter_sample=0;
1722 
1723  if(!get_bits1(gb)){
1724  int pos= get_bits_count(gb);
1725  int estimation_method= get_bits(gb, 2);
1726  if(estimation_method<2){
1727  if(!get_bits1(gb)){
1728  s->cplx_estimation_trash_i += 8*get_bits1(gb); //opaque
1729  s->cplx_estimation_trash_i += 8*get_bits1(gb); //transparent
1730  s->cplx_estimation_trash_i += 8*get_bits1(gb); //intra_cae
1731  s->cplx_estimation_trash_i += 8*get_bits1(gb); //inter_cae
1732  s->cplx_estimation_trash_i += 8*get_bits1(gb); //no_update
1733  s->cplx_estimation_trash_i += 8*get_bits1(gb); //upampling
1734  }
1735  if(!get_bits1(gb)){
1736  s->cplx_estimation_trash_i += 8*get_bits1(gb); //intra_blocks
1737  s->cplx_estimation_trash_p += 8*get_bits1(gb); //inter_blocks
1738  s->cplx_estimation_trash_p += 8*get_bits1(gb); //inter4v_blocks
1739  s->cplx_estimation_trash_i += 8*get_bits1(gb); //not coded blocks
1740  }
1741  if(!check_marker(gb, "in complexity estimation part 1")){
1742  skip_bits_long(gb, pos - get_bits_count(gb));
1743  goto no_cplx_est;
1744  }
1745  if(!get_bits1(gb)){
1746  s->cplx_estimation_trash_i += 8*get_bits1(gb); //dct_coeffs
1747  s->cplx_estimation_trash_i += 8*get_bits1(gb); //dct_lines
1748  s->cplx_estimation_trash_i += 8*get_bits1(gb); //vlc_syms
1749  s->cplx_estimation_trash_i += 4*get_bits1(gb); //vlc_bits
1750  }
1751  if(!get_bits1(gb)){
1752  s->cplx_estimation_trash_p += 8*get_bits1(gb); //apm
1753  s->cplx_estimation_trash_p += 8*get_bits1(gb); //npm
1754  s->cplx_estimation_trash_b += 8*get_bits1(gb); //interpolate_mc_q
1755  s->cplx_estimation_trash_p += 8*get_bits1(gb); //forwback_mc_q
1756  s->cplx_estimation_trash_p += 8*get_bits1(gb); //halfpel2
1757  s->cplx_estimation_trash_p += 8*get_bits1(gb); //halfpel4
1758  }
1759  if(!check_marker(gb, "in complexity estimation part 2")){
1760  skip_bits_long(gb, pos - get_bits_count(gb));
1761  goto no_cplx_est;
1762  }
1763  if(estimation_method==1){
1764  s->cplx_estimation_trash_i += 8*get_bits1(gb); //sadct
1765  s->cplx_estimation_trash_p += 8*get_bits1(gb); //qpel
1766  }
1767  }else
1768  av_log(s->avctx, AV_LOG_ERROR, "Invalid Complexity estimation method %d\n", estimation_method);
1769  }else{
1770 no_cplx_est:
1774  }
1775 
1776  s->resync_marker= !get_bits1(gb); /* resync_marker_disabled */
1777 
1778  s->data_partitioning= get_bits1(gb);
1779  if(s->data_partitioning){
1780  s->rvlc= get_bits1(gb);
1781  }
1782 
1783  if(vo_ver_id != 1) {
1784  s->new_pred= get_bits1(gb);
1785  if(s->new_pred){
1786  av_log(s->avctx, AV_LOG_ERROR, "new pred not supported\n");
1787  skip_bits(gb, 2); /* requested upstream message type */
1788  skip_bits1(gb); /* newpred segment type */
1789  }
1790  s->reduced_res_vop= get_bits1(gb);
1791  if(s->reduced_res_vop) av_log(s->avctx, AV_LOG_ERROR, "reduced resolution VOP not supported\n");
1792  }
1793  else{
1794  s->new_pred=0;
1795  s->reduced_res_vop= 0;
1796  }
1797 
1798  s->scalability= get_bits1(gb);
1799 
1800  if (s->scalability) {
1801  GetBitContext bak= *gb;
1802  int h_sampling_factor_n;
1803  int h_sampling_factor_m;
1804  int v_sampling_factor_n;
1805  int v_sampling_factor_m;
1806 
1807  s->hierachy_type= get_bits1(gb);
1808  skip_bits(gb, 4); /* ref_layer_id */
1809  skip_bits1(gb); /* ref_layer_sampling_dir */
1810  h_sampling_factor_n= get_bits(gb, 5);
1811  h_sampling_factor_m= get_bits(gb, 5);
1812  v_sampling_factor_n= get_bits(gb, 5);
1813  v_sampling_factor_m= get_bits(gb, 5);
1814  s->enhancement_type= get_bits1(gb);
1815 
1816  if( h_sampling_factor_n==0 || h_sampling_factor_m==0
1817  || v_sampling_factor_n==0 || v_sampling_factor_m==0){
1818  /* illegal scalability header (VERY broken encoder),
1819  * trying to workaround */
1820  s->scalability=0;
1821  *gb= bak;
1822  }else
1823  av_log(s->avctx, AV_LOG_ERROR, "scalability not supported\n");
1824 
1825  // bin shape stuff FIXME
1826  }
1827  }
1828  return 0;
1829 }
1830 
1836  char buf[256];
1837  int i;
1838  int e;
1839  int ver = 0, build = 0, ver2 = 0, ver3 = 0;
1840  char last;
1841 
1842  for(i=0; i<255 && get_bits_count(gb) < gb->size_in_bits; i++){
1843  if(show_bits(gb, 23) == 0) break;
1844  buf[i]= get_bits(gb, 8);
1845  }
1846  buf[i]=0;
1847 
1848  /* divx detection */
1849  e=sscanf(buf, "DivX%dBuild%d%c", &ver, &build, &last);
1850  if(e<2)
1851  e=sscanf(buf, "DivX%db%d%c", &ver, &build, &last);
1852  if(e>=2){
1853  s->divx_version= ver;
1854  s->divx_build= build;
1855  s->divx_packed= e==3 && last=='p';
1856  if(s->divx_packed && !s->showed_packed_warning) {
1857  av_log(s->avctx, AV_LOG_WARNING, "Invalid and inefficient vfw-avi packed B frames detected\n");
1858  s->showed_packed_warning=1;
1859  }
1860  }
1861 
1862  /* libavcodec detection */
1863  e=sscanf(buf, "FFmpe%*[^b]b%d", &build)+3;
1864  if(e!=4)
1865  e=sscanf(buf, "FFmpeg v%d.%d.%d / libavcodec build: %d", &ver, &ver2, &ver3, &build);
1866  if(e!=4){
1867  e=sscanf(buf, "Lavc%d.%d.%d", &ver, &ver2, &ver3)+1;
1868  if (e>1)
1869  build= (ver<<16) + (ver2<<8) + ver3;
1870  }
1871  if(e!=4){
1872  if(strcmp(buf, "ffmpeg")==0){
1873  s->lavc_build= 4600;
1874  }
1875  }
1876  if(e==4){
1877  s->lavc_build= build;
1878  }
1879 
1880  /* Xvid detection */
1881  e=sscanf(buf, "XviD%d", &build);
1882  if(e==1){
1883  s->xvid_build= build;
1884  }
1885 
1886  return 0;
1887 }
1888 
1890  int time_incr, time_increment;
1891 
1892  s->pict_type = get_bits(gb, 2) + AV_PICTURE_TYPE_I; /* pict type: I = 0 , P = 1 */
1894  av_log(s->avctx, AV_LOG_ERROR, "low_delay flag incorrectly, clearing it\n");
1895  s->low_delay=0;
1896  }
1897 
1899  if(s->partitioned_frame)
1901  else
1903 
1904  time_incr=0;
1905  while (get_bits1(gb) != 0)
1906  time_incr++;
1907 
1908  check_marker(gb, "before time_increment");
1909 
1910  if(s->time_increment_bits==0 || !(show_bits(gb, s->time_increment_bits+1)&1)){
1911  av_log(s->avctx, AV_LOG_ERROR, "hmm, seems the headers are not complete, trying to guess time_increment_bits\n");
1912 
1914  if ( s->pict_type == AV_PICTURE_TYPE_P
1916  if((show_bits(gb, s->time_increment_bits+6)&0x37) == 0x30) break;
1917  }else
1918  if((show_bits(gb, s->time_increment_bits+5)&0x1F) == 0x18) break;
1919  }
1920 
1921  av_log(s->avctx, AV_LOG_ERROR, "my guess is %d bits ;)\n",s->time_increment_bits);
1922  }
1923 
1924  if(IS_3IV1) time_increment= get_bits1(gb); //FIXME investigate further
1925  else time_increment= get_bits(gb, s->time_increment_bits);
1926 
1927  if(s->pict_type!=AV_PICTURE_TYPE_B){
1928  s->last_time_base= s->time_base;
1929  s->time_base+= time_incr;
1930  s->time= s->time_base*s->avctx->time_base.den + time_increment;
1932  if(s->time < s->last_non_b_time){
1933  /* header is not mpeg-4-compatible, broken encoder,
1934  * trying to workaround */
1935  s->time_base++;
1936  s->time+= s->avctx->time_base.den;
1937  }
1938  }
1939  s->pp_time= s->time - s->last_non_b_time;
1940  s->last_non_b_time= s->time;
1941  }else{
1942  s->time= (s->last_time_base + time_incr)*s->avctx->time_base.den + time_increment;
1943  s->pb_time= s->pp_time - (s->last_non_b_time - s->time);
1944  if(s->pp_time <=s->pb_time || s->pp_time <= s->pp_time - s->pb_time || s->pp_time<=0){
1945  /* messed up order, maybe after seeking? skipping current b-frame */
1946  return FRAME_SKIPPED;
1947  }
1949 
1950  if(s->t_frame==0) s->t_frame= s->pb_time;
1951  if(s->t_frame==0) s->t_frame=1; // 1/0 protection
1953  - ROUNDED_DIV(s->last_non_b_time - s->pp_time, s->t_frame))*2;
1954  s->pb_field_time= ( ROUNDED_DIV(s->time, s->t_frame)
1955  - ROUNDED_DIV(s->last_non_b_time - s->pp_time, s->t_frame))*2;
1956  if(!s->progressive_sequence){
1957  if(s->pp_field_time <= s->pb_field_time || s->pb_field_time <= 1)
1958  return FRAME_SKIPPED;
1959  }
1960  }
1961 
1962  if(s->avctx->time_base.num)
1963  s->current_picture_ptr->f.pts = (s->time + s->avctx->time_base.num / 2) / s->avctx->time_base.num;
1964  else
1966  if(s->avctx->debug&FF_DEBUG_PTS)
1967  av_log(s->avctx, AV_LOG_DEBUG, "MPEG4 PTS: %"PRId64"\n",
1968  s->current_picture_ptr->f.pts);
1969 
1970  check_marker(gb, "before vop_coded");
1971 
1972  /* vop coded */
1973  if (get_bits1(gb) != 1){
1975  av_log(s->avctx, AV_LOG_ERROR, "vop not coded\n");
1976  return FRAME_SKIPPED;
1977  }
1978  if (s->shape != BIN_ONLY_SHAPE && ( s->pict_type == AV_PICTURE_TYPE_P
1980  /* rounding type for motion estimation */
1981  s->no_rounding = get_bits1(gb);
1982  } else {
1983  s->no_rounding = 0;
1984  }
1985 //FIXME reduced res stuff
1986 
1987  if (s->shape != RECT_SHAPE) {
1988  if (s->vol_sprite_usage != 1 || s->pict_type != AV_PICTURE_TYPE_I) {
1989  skip_bits(gb, 13); /* width */
1990  skip_bits1(gb); /* marker */
1991  skip_bits(gb, 13); /* height */
1992  skip_bits1(gb); /* marker */
1993  skip_bits(gb, 13); /* hor_spat_ref */
1994  skip_bits1(gb); /* marker */
1995  skip_bits(gb, 13); /* ver_spat_ref */
1996  }
1997  skip_bits1(gb); /* change_CR_disable */
1998 
1999  if (get_bits1(gb) != 0) {
2000  skip_bits(gb, 8); /* constant_alpha_value */
2001  }
2002  }
2003 //FIXME complexity estimation stuff
2004 
2005  if (s->shape != BIN_ONLY_SHAPE) {
2007  if(s->pict_type != AV_PICTURE_TYPE_I)
2009  if(s->pict_type == AV_PICTURE_TYPE_B)
2011 
2013  if(!s->progressive_sequence){
2014  s->top_field_first= get_bits1(gb);
2015  s->alternate_scan= get_bits1(gb);
2016  }else
2017  s->alternate_scan= 0;
2018  }
2019 
2020  if(s->alternate_scan){
2025  } else{
2030  }
2031 
2033  if (mpeg4_decode_sprite_trajectory(s, gb) < 0)
2034  return AVERROR_INVALIDDATA;
2035  if(s->sprite_brightness_change) av_log(s->avctx, AV_LOG_ERROR, "sprite_brightness_change not supported\n");
2036  if(s->vol_sprite_usage==STATIC_SPRITE) av_log(s->avctx, AV_LOG_ERROR, "static sprite not supported\n");
2037  }
2038 
2039  if (s->shape != BIN_ONLY_SHAPE) {
2040  s->chroma_qscale= s->qscale = get_bits(gb, s->quant_precision);
2041  if(s->qscale==0){
2042  av_log(s->avctx, AV_LOG_ERROR, "Error, header damaged or not MPEG4 header (qscale=0)\n");
2043  return -1; // makes no sense to continue, as there is nothing left from the image then
2044  }
2045 
2046  if (s->pict_type != AV_PICTURE_TYPE_I) {
2047  s->f_code = get_bits(gb, 3); /* fcode_for */
2048  if(s->f_code==0){
2049  av_log(s->avctx, AV_LOG_ERROR, "Error, header damaged or not MPEG4 header (f_code=0)\n");
2050  return -1; // makes no sense to continue, as the MV decoding will break very quickly
2051  }
2052  }else
2053  s->f_code=1;
2054 
2055  if (s->pict_type == AV_PICTURE_TYPE_B) {
2056  s->b_code = get_bits(gb, 3);
2057  }else
2058  s->b_code=1;
2059 
2060  if(s->avctx->debug&FF_DEBUG_PICT_INFO){
2061  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",
2062  s->qscale, s->f_code, s->b_code,
2063  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")),
2067  }
2068 
2069  if(!s->scalability){
2070  if (s->shape!=RECT_SHAPE && s->pict_type!=AV_PICTURE_TYPE_I) {
2071  skip_bits1(gb); // vop shape coding type
2072  }
2073  }else{
2074  if(s->enhancement_type){
2075  int load_backward_shape= get_bits1(gb);
2076  if(load_backward_shape){
2077  av_log(s->avctx, AV_LOG_ERROR, "load backward shape isn't supported\n");
2078  }
2079  }
2080  skip_bits(gb, 2); //ref_select_code
2081  }
2082  }
2083  /* detect buggy encoders which don't set the low_delay flag (divx4/xvid/opendivx)*/
2084  // note we cannot detect divx5 without b-frames easily (although it's buggy too)
2085  if(s->vo_type==0 && s->vol_control_parameters==0 && s->divx_version==-1 && s->picture_number==0){
2086  av_log(s->avctx, AV_LOG_WARNING, "looks like this file was encoded with (divx4/(old)xvid/opendivx) -> forcing low_delay flag\n");
2087  s->low_delay=1;
2088  }
2089 
2090  s->picture_number++; // better than pic number==0 always ;)
2091 
2092  s->y_dc_scale_table= ff_mpeg4_y_dc_scale_table; //FIXME add short header support
2094 
2096  s->h_edge_pos= s->width;
2097  s->v_edge_pos= s->height;
2098  }
2099  return 0;
2100 }
2101 
2109 {
2110  unsigned startcode, v;
2111 
2112  /* search next start code */
2113  align_get_bits(gb);
2114 
2115  if(s->codec_tag == AV_RL32("WV1F") && show_bits(gb, 24) == 0x575630){
2116  skip_bits(gb, 24);
2117  if(get_bits(gb, 8) == 0xF0)
2118  goto end;
2119  }
2120 
2121  startcode = 0xff;
2122  for(;;) {
2123  if(get_bits_count(gb) >= gb->size_in_bits){
2124  if(gb->size_in_bits==8 && (s->divx_version>=0 || s->xvid_build>=0)){
2125  av_log(s->avctx, AV_LOG_WARNING, "frame skip %d\n", gb->size_in_bits);
2126  return FRAME_SKIPPED; //divx bug
2127  }else
2128  return -1; //end of stream
2129  }
2130 
2131  /* use the bits after the test */
2132  v = get_bits(gb, 8);
2133  startcode = ((startcode << 8) | v) & 0xffffffff;
2134 
2135  if((startcode&0xFFFFFF00) != 0x100)
2136  continue; //no startcode
2137 
2138  if(s->avctx->debug&FF_DEBUG_STARTCODE){
2139  av_log(s->avctx, AV_LOG_DEBUG, "startcode: %3X ", startcode);
2140  if (startcode<=0x11F) av_log(s->avctx, AV_LOG_DEBUG, "Video Object Start");
2141  else if(startcode<=0x12F) av_log(s->avctx, AV_LOG_DEBUG, "Video Object Layer Start");
2142  else if(startcode<=0x13F) av_log(s->avctx, AV_LOG_DEBUG, "Reserved");
2143  else if(startcode<=0x15F) av_log(s->avctx, AV_LOG_DEBUG, "FGS bp start");
2144  else if(startcode<=0x1AF) av_log(s->avctx, AV_LOG_DEBUG, "Reserved");
2145  else if(startcode==0x1B0) av_log(s->avctx, AV_LOG_DEBUG, "Visual Object Seq Start");
2146  else if(startcode==0x1B1) av_log(s->avctx, AV_LOG_DEBUG, "Visual Object Seq End");
2147  else if(startcode==0x1B2) av_log(s->avctx, AV_LOG_DEBUG, "User Data");
2148  else if(startcode==0x1B3) av_log(s->avctx, AV_LOG_DEBUG, "Group of VOP start");
2149  else if(startcode==0x1B4) av_log(s->avctx, AV_LOG_DEBUG, "Video Session Error");
2150  else if(startcode==0x1B5) av_log(s->avctx, AV_LOG_DEBUG, "Visual Object Start");
2151  else if(startcode==0x1B6) av_log(s->avctx, AV_LOG_DEBUG, "Video Object Plane start");
2152  else if(startcode==0x1B7) av_log(s->avctx, AV_LOG_DEBUG, "slice start");
2153  else if(startcode==0x1B8) av_log(s->avctx, AV_LOG_DEBUG, "extension start");
2154  else if(startcode==0x1B9) av_log(s->avctx, AV_LOG_DEBUG, "fgs start");
2155  else if(startcode==0x1BA) av_log(s->avctx, AV_LOG_DEBUG, "FBA Object start");
2156  else if(startcode==0x1BB) av_log(s->avctx, AV_LOG_DEBUG, "FBA Object Plane start");
2157  else if(startcode==0x1BC) av_log(s->avctx, AV_LOG_DEBUG, "Mesh Object start");
2158  else if(startcode==0x1BD) av_log(s->avctx, AV_LOG_DEBUG, "Mesh Object Plane start");
2159  else if(startcode==0x1BE) av_log(s->avctx, AV_LOG_DEBUG, "Still Texture Object start");
2160  else if(startcode==0x1BF) av_log(s->avctx, AV_LOG_DEBUG, "Texture Spatial Layer start");
2161  else if(startcode==0x1C0) av_log(s->avctx, AV_LOG_DEBUG, "Texture SNR Layer start");
2162  else if(startcode==0x1C1) av_log(s->avctx, AV_LOG_DEBUG, "Texture Tile start");
2163  else if(startcode==0x1C2) av_log(s->avctx, AV_LOG_DEBUG, "Texture Shape Layer start");
2164  else if(startcode==0x1C3) av_log(s->avctx, AV_LOG_DEBUG, "stuffing start");
2165  else if(startcode<=0x1C5) av_log(s->avctx, AV_LOG_DEBUG, "reserved");
2166  else if(startcode<=0x1FF) av_log(s->avctx, AV_LOG_DEBUG, "System start");
2167  av_log(s->avctx, AV_LOG_DEBUG, " at %d\n", get_bits_count(gb));
2168  }
2169 
2170  if(startcode >= 0x120 && startcode <= 0x12F){
2171  if(decode_vol_header(s, gb) < 0)
2172  return -1;
2173  }
2174  else if(startcode == USER_DATA_STARTCODE){
2175  decode_user_data(s, gb);
2176  }
2177  else if(startcode == GOP_STARTCODE){
2178  mpeg4_decode_gop_header(s, gb);
2179  }
2180  else if(startcode == VOS_STARTCODE){
2182  }
2183  else if(startcode == VOP_STARTCODE){
2184  break;
2185  }
2186 
2187  align_get_bits(gb);
2188  startcode = 0xff;
2189  }
2190 end:
2191  if(s->flags& CODEC_FLAG_LOW_DELAY)
2192  s->low_delay=1;
2193  s->avctx->has_b_frames= !s->low_delay;
2194  return decode_vop_header(s, gb);
2195 }
2196 
2198 {
2199  MpegEncContext *s = avctx->priv_data;
2200  int ret;
2201  static int done = 0;
2202 
2203  s->divx_version=
2204  s->divx_build=
2205  s->xvid_build=
2206  s->lavc_build= -1;
2207 
2208  if((ret=ff_h263_decode_init(avctx)) < 0)
2209  return ret;
2210 
2211  if (!done) {
2212  done = 1;
2213 
2218  INIT_VLC_RL(rvlc_rl_inter, 1072);
2219  INIT_VLC_RL(rvlc_rl_intra, 1072);
2220  INIT_VLC_STATIC(&dc_lum, DC_VLC_BITS, 10 /* 13 */,
2221  &ff_mpeg4_DCtab_lum[0][1], 2, 1,
2222  &ff_mpeg4_DCtab_lum[0][0], 2, 1, 512);
2223  INIT_VLC_STATIC(&dc_chrom, DC_VLC_BITS, 10 /* 13 */,
2224  &ff_mpeg4_DCtab_chrom[0][1], 2, 1,
2225  &ff_mpeg4_DCtab_chrom[0][0], 2, 1, 512);
2226  INIT_VLC_STATIC(&sprite_trajectory, SPRITE_TRAJ_VLC_BITS, 15,
2227  &sprite_trajectory_tab[0][1], 4, 2,
2228  &sprite_trajectory_tab[0][0], 4, 2, 128);
2229  INIT_VLC_STATIC(&mb_type_b_vlc, MB_TYPE_B_VLC_BITS, 4,
2230  &mb_type_b_tab[0][1], 2, 1,
2231  &mb_type_b_tab[0][0], 2, 1, 16);
2232  }
2233 
2234  s->h263_pred = 1;
2235  s->low_delay = 0; //default, might be overriden in the vol header during header parsing
2237  s->time_increment_bits = 4; /* default value for broken headers */
2239 
2240  return 0;
2241 }
2242 
2244  { FF_PROFILE_MPEG4_SIMPLE, "Simple Profile" },
2245  { FF_PROFILE_MPEG4_SIMPLE_SCALABLE, "Simple Scalable Profile" },
2246  { FF_PROFILE_MPEG4_CORE, "Core Profile" },
2247  { FF_PROFILE_MPEG4_MAIN, "Main Profile" },
2248  { FF_PROFILE_MPEG4_N_BIT, "N-bit Profile" },
2249  { FF_PROFILE_MPEG4_SCALABLE_TEXTURE, "Scalable Texture Profile" },
2250  { FF_PROFILE_MPEG4_SIMPLE_FACE_ANIMATION, "Simple Face Animation Profile" },
2251  { FF_PROFILE_MPEG4_BASIC_ANIMATED_TEXTURE, "Basic Animated Texture Profile" },
2252  { FF_PROFILE_MPEG4_HYBRID, "Hybrid Profile" },
2253  { FF_PROFILE_MPEG4_ADVANCED_REAL_TIME, "Advanced Real Time Simple Profile" },
2254  { FF_PROFILE_MPEG4_CORE_SCALABLE, "Code Scalable Profile" },
2255  { FF_PROFILE_MPEG4_ADVANCED_CODING, "Advanced Coding Profile" },
2256  { FF_PROFILE_MPEG4_ADVANCED_CORE, "Advanced Core Profile" },
2257  { FF_PROFILE_MPEG4_ADVANCED_SCALABLE_TEXTURE, "Advanced Scalable Texture Profile" },
2258  { FF_PROFILE_MPEG4_SIMPLE_STUDIO, "Simple Studio Profile" },
2259  { FF_PROFILE_MPEG4_ADVANCED_SIMPLE, "Advanced Simple Profile" },
2260 };
2261 
2263  .name = "mpeg4",
2264  .type = AVMEDIA_TYPE_VIDEO,
2265  .id = CODEC_ID_MPEG4,
2266  .priv_data_size = sizeof(MpegEncContext),
2267  .init = decode_init,
2271  .flush= ff_mpeg_flush,
2272  .max_lowres= 3,
2273  .long_name= NULL_IF_CONFIG_SMALL("MPEG-4 part 2"),
2274  .pix_fmts= ff_hwaccel_pixfmt_list_420,
2275  .profiles = NULL_IF_CONFIG_SMALL(mpeg4_video_profiles),
2277 };
2278 
2279 
2280 #if CONFIG_MPEG4_VDPAU_DECODER
2281 AVCodec ff_mpeg4_vdpau_decoder = {
2282  .name = "mpeg4_vdpau",
2283  .type = AVMEDIA_TYPE_VIDEO,
2284  .id = CODEC_ID_MPEG4,
2285  .priv_data_size = sizeof(MpegEncContext),
2286  .init = decode_init,
2290  .long_name= NULL_IF_CONFIG_SMALL("MPEG-4 part 2 (VDPAU)"),
2291  .pix_fmts= (const enum PixelFormat[]){PIX_FMT_VDPAU_MPEG4, PIX_FMT_NONE},
2292 };
2293 #endif