FFmpeg
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
mpegvideo.c
Go to the documentation of this file.
1 /*
2  * The simplest mpeg encoder (well, it was the simplest!)
3  * Copyright (c) 2000,2001 Fabrice Bellard
4  * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
5  *
6  * 4MV & hq & B-frame encoding stuff by Michael Niedermayer <michaelni@gmx.at>
7  *
8  * This file is part of FFmpeg.
9  *
10  * FFmpeg is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU Lesser General Public
12  * License as published by the Free Software Foundation; either
13  * version 2.1 of the License, or (at your option) any later version.
14  *
15  * FFmpeg is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18  * Lesser General Public License for more details.
19  *
20  * You should have received a copy of the GNU Lesser General Public
21  * License along with FFmpeg; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23  */
24 
25 /**
26  * @file
27  * The simplest mpeg encoder (well, it was the simplest!).
28  */
29 
30 #include "libavutil/attributes.h"
31 #include "libavutil/avassert.h"
32 #include "libavutil/imgutils.h"
33 #include "libavutil/internal.h"
34 #include "libavutil/timer.h"
35 #include "avcodec.h"
36 #include "dsputil.h"
37 #include "h264chroma.h"
38 #include "internal.h"
39 #include "mathops.h"
40 #include "mpegutils.h"
41 #include "mpegvideo.h"
42 #include "mjpegenc.h"
43 #include "msmpeg4.h"
44 #include "thread.h"
45 #include <limits.h>
46 
48 // 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
49  0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
50  16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31
51 };
52 
54 // 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
55  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
56  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
57  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
58  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
59  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
60  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
61  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
62  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
63 };
64 
65 static const uint8_t mpeg2_dc_scale_table1[128] = {
66 // 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
67  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
68  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
69  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
70  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
71  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
72  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
73  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
74  4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
75 };
76 
77 static const uint8_t mpeg2_dc_scale_table2[128] = {
78 // 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
79  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
80  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
81  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
82  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
83  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
84  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
85  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
86  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
87 };
88 
89 static const uint8_t mpeg2_dc_scale_table3[128] = {
90 // 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
91  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
92  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
93  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
94  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
95  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
96  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
97  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
98  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
99 };
100 
101 const uint8_t *const ff_mpeg2_dc_scale_table[4] = {
106 };
107 
109  int16_t *block, int n, int qscale)
110 {
111  int i, level, nCoeffs;
112  const uint16_t *quant_matrix;
113 
114  nCoeffs= s->block_last_index[n];
115 
116  block[0] *= n < 4 ? s->y_dc_scale : s->c_dc_scale;
117  /* XXX: only mpeg1 */
118  quant_matrix = s->intra_matrix;
119  for(i=1;i<=nCoeffs;i++) {
120  int j= s->intra_scantable.permutated[i];
121  level = block[j];
122  if (level) {
123  if (level < 0) {
124  level = -level;
125  level = (int)(level * qscale * quant_matrix[j]) >> 3;
126  level = (level - 1) | 1;
127  level = -level;
128  } else {
129  level = (int)(level * qscale * quant_matrix[j]) >> 3;
130  level = (level - 1) | 1;
131  }
132  block[j] = level;
133  }
134  }
135 }
136 
138  int16_t *block, int n, int qscale)
139 {
140  int i, level, nCoeffs;
141  const uint16_t *quant_matrix;
142 
143  nCoeffs= s->block_last_index[n];
144 
145  quant_matrix = s->inter_matrix;
146  for(i=0; i<=nCoeffs; i++) {
147  int j= s->intra_scantable.permutated[i];
148  level = block[j];
149  if (level) {
150  if (level < 0) {
151  level = -level;
152  level = (((level << 1) + 1) * qscale *
153  ((int) (quant_matrix[j]))) >> 4;
154  level = (level - 1) | 1;
155  level = -level;
156  } else {
157  level = (((level << 1) + 1) * qscale *
158  ((int) (quant_matrix[j]))) >> 4;
159  level = (level - 1) | 1;
160  }
161  block[j] = level;
162  }
163  }
164 }
165 
167  int16_t *block, int n, int qscale)
168 {
169  int i, level, nCoeffs;
170  const uint16_t *quant_matrix;
171 
172  if(s->alternate_scan) nCoeffs= 63;
173  else nCoeffs= s->block_last_index[n];
174 
175  block[0] *= n < 4 ? s->y_dc_scale : s->c_dc_scale;
176  quant_matrix = s->intra_matrix;
177  for(i=1;i<=nCoeffs;i++) {
178  int j= s->intra_scantable.permutated[i];
179  level = block[j];
180  if (level) {
181  if (level < 0) {
182  level = -level;
183  level = (int)(level * qscale * quant_matrix[j]) >> 3;
184  level = -level;
185  } else {
186  level = (int)(level * qscale * quant_matrix[j]) >> 3;
187  }
188  block[j] = level;
189  }
190  }
191 }
192 
194  int16_t *block, int n, int qscale)
195 {
196  int i, level, nCoeffs;
197  const uint16_t *quant_matrix;
198  int sum=-1;
199 
200  if(s->alternate_scan) nCoeffs= 63;
201  else nCoeffs= s->block_last_index[n];
202 
203  block[0] *= n < 4 ? s->y_dc_scale : s->c_dc_scale;
204  sum += block[0];
205  quant_matrix = s->intra_matrix;
206  for(i=1;i<=nCoeffs;i++) {
207  int j= s->intra_scantable.permutated[i];
208  level = block[j];
209  if (level) {
210  if (level < 0) {
211  level = -level;
212  level = (int)(level * qscale * quant_matrix[j]) >> 3;
213  level = -level;
214  } else {
215  level = (int)(level * qscale * quant_matrix[j]) >> 3;
216  }
217  block[j] = level;
218  sum+=level;
219  }
220  }
221  block[63]^=sum&1;
222 }
223 
225  int16_t *block, int n, int qscale)
226 {
227  int i, level, nCoeffs;
228  const uint16_t *quant_matrix;
229  int sum=-1;
230 
231  if(s->alternate_scan) nCoeffs= 63;
232  else nCoeffs= s->block_last_index[n];
233 
234  quant_matrix = s->inter_matrix;
235  for(i=0; i<=nCoeffs; i++) {
236  int j= s->intra_scantable.permutated[i];
237  level = block[j];
238  if (level) {
239  if (level < 0) {
240  level = -level;
241  level = (((level << 1) + 1) * qscale *
242  ((int) (quant_matrix[j]))) >> 4;
243  level = -level;
244  } else {
245  level = (((level << 1) + 1) * qscale *
246  ((int) (quant_matrix[j]))) >> 4;
247  }
248  block[j] = level;
249  sum+=level;
250  }
251  }
252  block[63]^=sum&1;
253 }
254 
256  int16_t *block, int n, int qscale)
257 {
258  int i, level, qmul, qadd;
259  int nCoeffs;
260 
261  av_assert2(s->block_last_index[n]>=0 || s->h263_aic);
262 
263  qmul = qscale << 1;
264 
265  if (!s->h263_aic) {
266  block[0] *= n < 4 ? s->y_dc_scale : s->c_dc_scale;
267  qadd = (qscale - 1) | 1;
268  }else{
269  qadd = 0;
270  }
271  if(s->ac_pred)
272  nCoeffs=63;
273  else
274  nCoeffs= s->inter_scantable.raster_end[ s->block_last_index[n] ];
275 
276  for(i=1; i<=nCoeffs; i++) {
277  level = block[i];
278  if (level) {
279  if (level < 0) {
280  level = level * qmul - qadd;
281  } else {
282  level = level * qmul + qadd;
283  }
284  block[i] = level;
285  }
286  }
287 }
288 
290  int16_t *block, int n, int qscale)
291 {
292  int i, level, qmul, qadd;
293  int nCoeffs;
294 
295  av_assert2(s->block_last_index[n]>=0);
296 
297  qadd = (qscale - 1) | 1;
298  qmul = qscale << 1;
299 
300  nCoeffs= s->inter_scantable.raster_end[ s->block_last_index[n] ];
301 
302  for(i=0; i<=nCoeffs; i++) {
303  level = block[i];
304  if (level) {
305  if (level < 0) {
306  level = level * qmul - qadd;
307  } else {
308  level = level * qmul + qadd;
309  }
310  block[i] = level;
311  }
312  }
313 }
314 
315 static void mpeg_er_decode_mb(void *opaque, int ref, int mv_dir, int mv_type,
316  int (*mv)[2][4][2],
317  int mb_x, int mb_y, int mb_intra, int mb_skipped)
318 {
319  MpegEncContext *s = opaque;
320 
321  s->mv_dir = mv_dir;
322  s->mv_type = mv_type;
323  s->mb_intra = mb_intra;
324  s->mb_skipped = mb_skipped;
325  s->mb_x = mb_x;
326  s->mb_y = mb_y;
327  memcpy(s->mv, mv, sizeof(*mv));
328 
331 
332  s->dsp.clear_blocks(s->block[0]);
333 
334  s->dest[0] = s->current_picture.f->data[0] + (s->mb_y * 16 * s->linesize) + s->mb_x * 16;
335  s->dest[1] = s->current_picture.f->data[1] + (s->mb_y * (16 >> s->chroma_y_shift) * s->uvlinesize) + s->mb_x * (16 >> s->chroma_x_shift);
336  s->dest[2] = s->current_picture.f->data[2] + (s->mb_y * (16 >> s->chroma_y_shift) * s->uvlinesize) + s->mb_x * (16 >> s->chroma_x_shift);
337 
338  if (ref)
339  av_log(s->avctx, AV_LOG_DEBUG, "Interlaced error concealment is not fully implemented\n");
340  ff_MPV_decode_mb(s, s->block);
341 }
342 
343 /* init common dct for both encoder and decoder */
345 {
346  ff_dsputil_init(&s->dsp, s->avctx);
347  ff_h264chroma_init(&s->h264chroma, 8); //for lowres
348  ff_hpeldsp_init(&s->hdsp, s->avctx->flags);
350 
356  if (s->flags & CODEC_FLAG_BITEXACT)
359 
360  if (ARCH_ALPHA)
362  if (ARCH_ARM)
364  if (ARCH_PPC)
366  if (ARCH_X86)
368 
369  /* load & permutate scantables
370  * note: only wmv uses different ones
371  */
372  if (s->alternate_scan) {
375  } else {
378  }
381 
382  return 0;
383 }
384 
385 static int frame_size_alloc(MpegEncContext *s, int linesize)
386 {
387  int alloc_size = FFALIGN(FFABS(linesize) + 64, 32);
388 
389  // edge emu needs blocksize + filter length - 1
390  // (= 17x17 for halfpel / 21x21 for h264)
391  // VC1 computes luma and chroma simultaneously and needs 19X19 + 9x9
392  // at uvlinesize. It supports only YUV420 so 24x24 is enough
393  // linesize * interlaced * MBsize
394  FF_ALLOCZ_OR_GOTO(s->avctx, s->edge_emu_buffer, alloc_size * 4 * 24,
395  fail);
396 
397  FF_ALLOCZ_OR_GOTO(s->avctx, s->me.scratchpad, alloc_size * 4 * 16 * 2,
398  fail)
399  s->me.temp = s->me.scratchpad;
400  s->rd_scratchpad = s->me.scratchpad;
401  s->b_scratchpad = s->me.scratchpad;
402  s->obmc_scratchpad = s->me.scratchpad + 16;
403 
404  return 0;
405 fail:
407  return AVERROR(ENOMEM);
408 }
409 
410 /**
411  * Allocate a frame buffer
412  */
414 {
415  int edges_needed = av_codec_is_encoder(s->avctx->codec);
416  int r, ret;
417 
418  pic->tf.f = pic->f;
419  if (s->codec_id != AV_CODEC_ID_WMV3IMAGE &&
421  s->codec_id != AV_CODEC_ID_MSS2) {
422  if (edges_needed) {
423  pic->f->width = s->avctx->width + 2 * EDGE_WIDTH;
424  pic->f->height = s->avctx->height + 2 * EDGE_WIDTH;
425  }
426 
427  r = ff_thread_get_buffer(s->avctx, &pic->tf,
428  pic->reference ? AV_GET_BUFFER_FLAG_REF : 0);
429  } else {
430  pic->f->width = s->avctx->width;
431  pic->f->height = s->avctx->height;
432  pic->f->format = s->avctx->pix_fmt;
433  r = avcodec_default_get_buffer2(s->avctx, pic->f, 0);
434  }
435 
436  if (r < 0 || !pic->f->buf[0]) {
437  av_log(s->avctx, AV_LOG_ERROR, "get_buffer() failed (%d %p)\n",
438  r, pic->f->data[0]);
439  return -1;
440  }
441 
442  if (edges_needed) {
443  int i;
444  for (i = 0; pic->f->data[i]; i++) {
445  int offset = (EDGE_WIDTH >> (i ? s->chroma_y_shift : 0)) *
446  pic->f->linesize[i] +
447  (EDGE_WIDTH >> (i ? s->chroma_x_shift : 0));
448  pic->f->data[i] += offset;
449  }
450  pic->f->width = s->avctx->width;
451  pic->f->height = s->avctx->height;
452  }
453 
454  if (s->avctx->hwaccel) {
455  assert(!pic->hwaccel_picture_private);
456  if (s->avctx->hwaccel->priv_data_size) {
458  if (!pic->hwaccel_priv_buf) {
459  av_log(s->avctx, AV_LOG_ERROR, "alloc_frame_buffer() failed (hwaccel private data allocation)\n");
460  return -1;
461  }
463  }
464  }
465 
466  if (s->linesize && (s->linesize != pic->f->linesize[0] ||
467  s->uvlinesize != pic->f->linesize[1])) {
469  "get_buffer() failed (stride changed)\n");
470  ff_mpeg_unref_picture(s, pic);
471  return -1;
472  }
473 
474  if (pic->f->linesize[1] != pic->f->linesize[2]) {
476  "get_buffer() failed (uv stride mismatch)\n");
477  ff_mpeg_unref_picture(s, pic);
478  return -1;
479  }
480 
481  if (!s->edge_emu_buffer &&
482  (ret = frame_size_alloc(s, pic->f->linesize[0])) < 0) {
484  "get_buffer() failed to allocate context scratch buffers.\n");
485  ff_mpeg_unref_picture(s, pic);
486  return ret;
487  }
488 
489  return 0;
490 }
491 
493 {
494  int i;
495 
496  pic->alloc_mb_width =
497  pic->alloc_mb_height = 0;
498 
505 
506  for (i = 0; i < 2; i++) {
508  av_buffer_unref(&pic->ref_index_buf[i]);
509  }
510 }
511 
513 {
514  const int big_mb_num = s->mb_stride * (s->mb_height + 1) + 1;
515  const int mb_array_size = s->mb_stride * s->mb_height;
516  const int b8_array_size = s->b8_stride * s->mb_height * 2;
517  int i;
518 
519 
520  pic->mbskip_table_buf = av_buffer_allocz(mb_array_size + 2);
521  pic->qscale_table_buf = av_buffer_allocz(big_mb_num + s->mb_stride);
522  pic->mb_type_buf = av_buffer_allocz((big_mb_num + s->mb_stride) *
523  sizeof(uint32_t));
524  if (!pic->mbskip_table_buf || !pic->qscale_table_buf || !pic->mb_type_buf)
525  return AVERROR(ENOMEM);
526 
527  if (s->encoding) {
528  pic->mb_var_buf = av_buffer_allocz(mb_array_size * sizeof(int16_t));
529  pic->mc_mb_var_buf = av_buffer_allocz(mb_array_size * sizeof(int16_t));
530  pic->mb_mean_buf = av_buffer_allocz(mb_array_size);
531  if (!pic->mb_var_buf || !pic->mc_mb_var_buf || !pic->mb_mean_buf)
532  return AVERROR(ENOMEM);
533  }
534 
535  if (s->out_format == FMT_H263 || s->encoding || s->avctx->debug_mv) {
536  int mv_size = 2 * (b8_array_size + 4) * sizeof(int16_t);
537  int ref_index_size = 4 * mb_array_size;
538 
539  for (i = 0; mv_size && i < 2; i++) {
540  pic->motion_val_buf[i] = av_buffer_allocz(mv_size);
541  pic->ref_index_buf[i] = av_buffer_allocz(ref_index_size);
542  if (!pic->motion_val_buf[i] || !pic->ref_index_buf[i])
543  return AVERROR(ENOMEM);
544  }
545  }
546 
547  pic->alloc_mb_width = s->mb_width;
548  pic->alloc_mb_height = s->mb_height;
549 
550  return 0;
551 }
552 
554 {
555  int ret, i;
556 #define MAKE_WRITABLE(table) \
557 do {\
558  if (pic->table &&\
559  (ret = av_buffer_make_writable(&pic->table)) < 0)\
560  return ret;\
561 } while (0)
562 
563  MAKE_WRITABLE(mb_var_buf);
564  MAKE_WRITABLE(mc_mb_var_buf);
565  MAKE_WRITABLE(mb_mean_buf);
566  MAKE_WRITABLE(mbskip_table_buf);
567  MAKE_WRITABLE(qscale_table_buf);
568  MAKE_WRITABLE(mb_type_buf);
569 
570  for (i = 0; i < 2; i++) {
571  MAKE_WRITABLE(motion_val_buf[i]);
572  MAKE_WRITABLE(ref_index_buf[i]);
573  }
574 
575  return 0;
576 }
577 
578 /**
579  * Allocate a Picture.
580  * The pixels are allocated/set by calling get_buffer() if shared = 0
581  */
582 int ff_alloc_picture(MpegEncContext *s, Picture *pic, int shared)
583 {
584  int i, ret;
585 
586  if (pic->qscale_table_buf)
587  if ( pic->alloc_mb_width != s->mb_width
588  || pic->alloc_mb_height != s->mb_height)
590 
591  if (shared) {
592  av_assert0(pic->f->data[0]);
593  pic->shared = 1;
594  } else {
595  av_assert0(!pic->f->buf[0]);
596 
597  if (alloc_frame_buffer(s, pic) < 0)
598  return -1;
599 
600  s->linesize = pic->f->linesize[0];
601  s->uvlinesize = pic->f->linesize[1];
602  }
603 
604  if (!pic->qscale_table_buf)
605  ret = alloc_picture_tables(s, pic);
606  else
607  ret = make_tables_writable(pic);
608  if (ret < 0)
609  goto fail;
610 
611  if (s->encoding) {
612  pic->mb_var = (uint16_t*)pic->mb_var_buf->data;
613  pic->mc_mb_var = (uint16_t*)pic->mc_mb_var_buf->data;
614  pic->mb_mean = pic->mb_mean_buf->data;
615  }
616 
617  pic->mbskip_table = pic->mbskip_table_buf->data;
618  pic->qscale_table = pic->qscale_table_buf->data + 2 * s->mb_stride + 1;
619  pic->mb_type = (uint32_t*)pic->mb_type_buf->data + 2 * s->mb_stride + 1;
620 
621  if (pic->motion_val_buf[0]) {
622  for (i = 0; i < 2; i++) {
623  pic->motion_val[i] = (int16_t (*)[2])pic->motion_val_buf[i]->data + 4;
624  pic->ref_index[i] = pic->ref_index_buf[i]->data;
625  }
626  }
627 
628  return 0;
629 fail:
630  av_log(s->avctx, AV_LOG_ERROR, "Error allocating a picture.\n");
631  ff_mpeg_unref_picture(s, pic);
633  return AVERROR(ENOMEM);
634 }
635 
636 /**
637  * Deallocate a picture.
638  */
640 {
641  int off = offsetof(Picture, mb_mean) + sizeof(pic->mb_mean);
642 
643  pic->tf.f = pic->f;
644  /* WM Image / Screen codecs allocate internal buffers with different
645  * dimensions / colorspaces; ignore user-defined callbacks for these. */
646  if (s->codec_id != AV_CODEC_ID_WMV3IMAGE &&
649  ff_thread_release_buffer(s->avctx, &pic->tf);
650  else if (pic->f)
651  av_frame_unref(pic->f);
652 
654 
655  if (pic->needs_realloc)
657 
658  memset((uint8_t*)pic + off, 0, sizeof(*pic) - off);
659 }
660 
662 {
663  int i;
664 
665 #define UPDATE_TABLE(table)\
666 do {\
667  if (src->table &&\
668  (!dst->table || dst->table->buffer != src->table->buffer)) {\
669  av_buffer_unref(&dst->table);\
670  dst->table = av_buffer_ref(src->table);\
671  if (!dst->table) {\
672  ff_free_picture_tables(dst);\
673  return AVERROR(ENOMEM);\
674  }\
675  }\
676 } while (0)
677 
678  UPDATE_TABLE(mb_var_buf);
679  UPDATE_TABLE(mc_mb_var_buf);
680  UPDATE_TABLE(mb_mean_buf);
681  UPDATE_TABLE(mbskip_table_buf);
682  UPDATE_TABLE(qscale_table_buf);
683  UPDATE_TABLE(mb_type_buf);
684  for (i = 0; i < 2; i++) {
685  UPDATE_TABLE(motion_val_buf[i]);
686  UPDATE_TABLE(ref_index_buf[i]);
687  }
688 
689  dst->mb_var = src->mb_var;
690  dst->mc_mb_var = src->mc_mb_var;
691  dst->mb_mean = src->mb_mean;
692  dst->mbskip_table = src->mbskip_table;
693  dst->qscale_table = src->qscale_table;
694  dst->mb_type = src->mb_type;
695  for (i = 0; i < 2; i++) {
696  dst->motion_val[i] = src->motion_val[i];
697  dst->ref_index[i] = src->ref_index[i];
698  }
699 
700  dst->alloc_mb_width = src->alloc_mb_width;
701  dst->alloc_mb_height = src->alloc_mb_height;
702 
703  return 0;
704 }
705 
707 {
708  int ret;
709 
710  av_assert0(!dst->f->buf[0]);
711  av_assert0(src->f->buf[0]);
712 
713  src->tf.f = src->f;
714  dst->tf.f = dst->f;
715  ret = ff_thread_ref_frame(&dst->tf, &src->tf);
716  if (ret < 0)
717  goto fail;
718 
719  ret = update_picture_tables(dst, src);
720  if (ret < 0)
721  goto fail;
722 
723  if (src->hwaccel_picture_private) {
725  if (!dst->hwaccel_priv_buf)
726  goto fail;
728  }
729 
730  dst->field_picture = src->field_picture;
731  dst->mb_var_sum = src->mb_var_sum;
732  dst->mc_mb_var_sum = src->mc_mb_var_sum;
733  dst->b_frame_score = src->b_frame_score;
734  dst->needs_realloc = src->needs_realloc;
735  dst->reference = src->reference;
736  dst->shared = src->shared;
737 
738  return 0;
739 fail:
740  ff_mpeg_unref_picture(s, dst);
741  return ret;
742 }
743 
745 {
746  int16_t (*tmp)[64];
747 
748  tmp = s->pblocks[4];
749  s->pblocks[4] = s->pblocks[5];
750  s->pblocks[5] = tmp;
751 }
752 
754 {
755  int y_size = s->b8_stride * (2 * s->mb_height + 1);
756  int c_size = s->mb_stride * (s->mb_height + 1);
757  int yc_size = y_size + 2 * c_size;
758  int i;
759 
760  if (s->mb_height & 1)
761  yc_size += 2*s->b8_stride + 2*s->mb_stride;
762 
763  s->edge_emu_buffer =
764  s->me.scratchpad =
765  s->me.temp =
766  s->rd_scratchpad =
767  s->b_scratchpad =
768  s->obmc_scratchpad = NULL;
769 
770  if (s->encoding) {
771  FF_ALLOCZ_OR_GOTO(s->avctx, s->me.map,
772  ME_MAP_SIZE * sizeof(uint32_t), fail)
774  ME_MAP_SIZE * sizeof(uint32_t), fail)
775  if (s->avctx->noise_reduction) {
777  2 * 64 * sizeof(int), fail)
778  }
779  }
780  FF_ALLOCZ_OR_GOTO(s->avctx, s->blocks, 64 * 12 * 2 * sizeof(int16_t), fail)
781  s->block = s->blocks[0];
782 
783  for (i = 0; i < 12; i++) {
784  s->pblocks[i] = &s->block[i];
785  }
786  if (s->avctx->codec_tag == AV_RL32("VCR2"))
787  exchange_uv(s);
788 
789  if (s->out_format == FMT_H263) {
790  /* ac values */
792  yc_size * sizeof(int16_t) * 16, fail);
793  s->ac_val[0] = s->ac_val_base + s->b8_stride + 1;
794  s->ac_val[1] = s->ac_val_base + y_size + s->mb_stride + 1;
795  s->ac_val[2] = s->ac_val[1] + c_size;
796  }
797 
798  return 0;
799 fail:
800  return -1; // free() through ff_MPV_common_end()
801 }
802 
804 {
805  if (s == NULL)
806  return;
807 
809  av_freep(&s->me.scratchpad);
810  s->me.temp =
811  s->rd_scratchpad =
812  s->b_scratchpad =
813  s->obmc_scratchpad = NULL;
814 
815  av_freep(&s->dct_error_sum);
816  av_freep(&s->me.map);
817  av_freep(&s->me.score_map);
818  av_freep(&s->blocks);
819  av_freep(&s->ac_val_base);
820  s->block = NULL;
821 }
822 
824 {
825 #define COPY(a) bak->a = src->a
826  COPY(edge_emu_buffer);
827  COPY(me.scratchpad);
828  COPY(me.temp);
829  COPY(rd_scratchpad);
830  COPY(b_scratchpad);
831  COPY(obmc_scratchpad);
832  COPY(me.map);
833  COPY(me.score_map);
834  COPY(blocks);
835  COPY(block);
836  COPY(start_mb_y);
837  COPY(end_mb_y);
838  COPY(me.map_generation);
839  COPY(pb);
840  COPY(dct_error_sum);
841  COPY(dct_count[0]);
842  COPY(dct_count[1]);
843  COPY(ac_val_base);
844  COPY(ac_val[0]);
845  COPY(ac_val[1]);
846  COPY(ac_val[2]);
847 #undef COPY
848 }
849 
851 {
852  MpegEncContext bak;
853  int i, ret;
854  // FIXME copy only needed parts
855  // START_TIMER
856  backup_duplicate_context(&bak, dst);
857  memcpy(dst, src, sizeof(MpegEncContext));
858  backup_duplicate_context(dst, &bak);
859  for (i = 0; i < 12; i++) {
860  dst->pblocks[i] = &dst->block[i];
861  }
862  if (dst->avctx->codec_tag == AV_RL32("VCR2"))
863  exchange_uv(dst);
864  if (!dst->edge_emu_buffer &&
865  (ret = frame_size_alloc(dst, dst->linesize)) < 0) {
866  av_log(dst->avctx, AV_LOG_ERROR, "failed to allocate context "
867  "scratch buffers.\n");
868  return ret;
869  }
870  // STOP_TIMER("update_duplicate_context")
871  // about 10k cycles / 0.01 sec for 1000frames on 1ghz with 2 threads
872  return 0;
873 }
874 
876  const AVCodecContext *src)
877 {
878  int i, ret;
879  MpegEncContext *s = dst->priv_data, *s1 = src->priv_data;
880 
881  if (dst == src)
882  return 0;
883 
884  av_assert0(s != s1);
885 
886  // FIXME can parameters change on I-frames?
887  // in that case dst may need a reinit
888  if (!s->context_initialized) {
889  memcpy(s, s1, sizeof(MpegEncContext));
890 
891  s->avctx = dst;
892  s->bitstream_buffer = NULL;
894 
895  if (s1->context_initialized){
896 // s->picture_range_start += MAX_PICTURE_COUNT;
897 // s->picture_range_end += MAX_PICTURE_COUNT;
898  if((ret = ff_MPV_common_init(s)) < 0){
899  memset(s, 0, sizeof(MpegEncContext));
900  s->avctx = dst;
901  return ret;
902  }
903  }
904  }
905 
906  if (s->height != s1->height || s->width != s1->width || s->context_reinit) {
907  s->context_reinit = 0;
908  s->height = s1->height;
909  s->width = s1->width;
910  if ((ret = ff_MPV_common_frame_size_change(s)) < 0)
911  return ret;
912  }
913 
914  s->avctx->coded_height = s1->avctx->coded_height;
915  s->avctx->coded_width = s1->avctx->coded_width;
916  s->avctx->width = s1->avctx->width;
917  s->avctx->height = s1->avctx->height;
918 
919  s->coded_picture_number = s1->coded_picture_number;
920  s->picture_number = s1->picture_number;
921 
922  av_assert0(!s->picture || s->picture != s1->picture);
923  if(s->picture)
924  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
925  ff_mpeg_unref_picture(s, &s->picture[i]);
926  if (s1->picture[i].f->buf[0] &&
927  (ret = ff_mpeg_ref_picture(s, &s->picture[i], &s1->picture[i])) < 0)
928  return ret;
929  }
930 
931 #define UPDATE_PICTURE(pic)\
932 do {\
933  ff_mpeg_unref_picture(s, &s->pic);\
934  if (s1->pic.f->buf[0])\
935  ret = ff_mpeg_ref_picture(s, &s->pic, &s1->pic);\
936  else\
937  ret = update_picture_tables(&s->pic, &s1->pic);\
938  if (ret < 0)\
939  return ret;\
940 } while (0)
941 
942  UPDATE_PICTURE(current_picture);
943  UPDATE_PICTURE(last_picture);
944  UPDATE_PICTURE(next_picture);
945 
946  s->last_picture_ptr = REBASE_PICTURE(s1->last_picture_ptr, s, s1);
947  s->current_picture_ptr = REBASE_PICTURE(s1->current_picture_ptr, s, s1);
948  s->next_picture_ptr = REBASE_PICTURE(s1->next_picture_ptr, s, s1);
949 
950  // Error/bug resilience
951  s->next_p_frame_damaged = s1->next_p_frame_damaged;
952  s->workaround_bugs = s1->workaround_bugs;
953  s->padding_bug_score = s1->padding_bug_score;
954 
955  // MPEG4 timing info
956  memcpy(&s->last_time_base, &s1->last_time_base,
957  (char *) &s1->pb_field_time + sizeof(s1->pb_field_time) -
958  (char *) &s1->last_time_base);
959 
960  // B-frame info
961  s->max_b_frames = s1->max_b_frames;
962  s->low_delay = s1->low_delay;
963  s->droppable = s1->droppable;
964 
965  // DivX handling (doesn't work)
966  s->divx_packed = s1->divx_packed;
967 
968  if (s1->bitstream_buffer) {
969  if (s1->bitstream_buffer_size +
973  s1->allocated_bitstream_buffer_size);
974  s->bitstream_buffer_size = s1->bitstream_buffer_size;
975  memcpy(s->bitstream_buffer, s1->bitstream_buffer,
976  s1->bitstream_buffer_size);
977  memset(s->bitstream_buffer + s->bitstream_buffer_size, 0,
979  }
980 
981  // linesize dependend scratch buffer allocation
982  if (!s->edge_emu_buffer)
983  if (s1->linesize) {
984  if (frame_size_alloc(s, s1->linesize) < 0) {
985  av_log(s->avctx, AV_LOG_ERROR, "Failed to allocate context "
986  "scratch buffers.\n");
987  return AVERROR(ENOMEM);
988  }
989  } else {
990  av_log(s->avctx, AV_LOG_ERROR, "Context scratch buffers could not "
991  "be allocated due to unknown size.\n");
992  }
993 
994  // MPEG2/interlacing info
995  memcpy(&s->progressive_sequence, &s1->progressive_sequence,
996  (char *) &s1->rtp_mode - (char *) &s1->progressive_sequence);
997 
998  if (!s1->first_field) {
999  s->last_pict_type = s1->pict_type;
1000  if (s1->current_picture_ptr)
1001  s->last_lambda_for[s1->pict_type] = s1->current_picture_ptr->f->quality;
1002  }
1003 
1004  return 0;
1005 }
1006 
1007 /**
1008  * Set the given MpegEncContext to common defaults
1009  * (same for encoding and decoding).
1010  * The changed fields will not depend upon the
1011  * prior state of the MpegEncContext.
1012  */
1014 {
1015  s->y_dc_scale_table =
1018  s->progressive_frame = 1;
1019  s->progressive_sequence = 1;
1021 
1022  s->coded_picture_number = 0;
1023  s->picture_number = 0;
1024 
1025  s->f_code = 1;
1026  s->b_code = 1;
1027 
1028  s->slice_context_count = 1;
1029 }
1030 
1031 /**
1032  * Set the given MpegEncContext to defaults for decoding.
1033  * the changed fields will not depend upon
1034  * the prior state of the MpegEncContext.
1035  */
1037 {
1039 }
1040 
1042 {
1043  ERContext *er = &s->er;
1044  int mb_array_size = s->mb_height * s->mb_stride;
1045  int i;
1046 
1047  er->avctx = s->avctx;
1048  er->dsp = &s->dsp;
1049 
1050  er->mb_index2xy = s->mb_index2xy;
1051  er->mb_num = s->mb_num;
1052  er->mb_width = s->mb_width;
1053  er->mb_height = s->mb_height;
1054  er->mb_stride = s->mb_stride;
1055  er->b8_stride = s->b8_stride;
1056 
1058  er->error_status_table = av_mallocz(mb_array_size);
1059  if (!er->er_temp_buffer || !er->error_status_table)
1060  goto fail;
1061 
1062  er->mbskip_table = s->mbskip_table;
1063  er->mbintra_table = s->mbintra_table;
1064 
1065  for (i = 0; i < FF_ARRAY_ELEMS(s->dc_val); i++)
1066  er->dc_val[i] = s->dc_val[i];
1067 
1069  er->opaque = s;
1070 
1071  return 0;
1072 fail:
1073  av_freep(&er->er_temp_buffer);
1075  return AVERROR(ENOMEM);
1076 }
1077 
1078 /**
1079  * Initialize and allocates MpegEncContext fields dependent on the resolution.
1080  */
1082 {
1083  int y_size, c_size, yc_size, i, mb_array_size, mv_table_size, x, y;
1084 
1085  s->mb_width = (s->width + 15) / 16;
1086  s->mb_stride = s->mb_width + 1;
1087  s->b8_stride = s->mb_width * 2 + 1;
1088  s->b4_stride = s->mb_width * 4 + 1;
1089  mb_array_size = s->mb_height * s->mb_stride;
1090  mv_table_size = (s->mb_height + 2) * s->mb_stride + 1;
1091 
1092  /* set default edge pos, will be overriden
1093  * in decode_header if needed */
1094  s->h_edge_pos = s->mb_width * 16;
1095  s->v_edge_pos = s->mb_height * 16;
1096 
1097  s->mb_num = s->mb_width * s->mb_height;
1098 
1099  s->block_wrap[0] =
1100  s->block_wrap[1] =
1101  s->block_wrap[2] =
1102  s->block_wrap[3] = s->b8_stride;
1103  s->block_wrap[4] =
1104  s->block_wrap[5] = s->mb_stride;
1105 
1106  y_size = s->b8_stride * (2 * s->mb_height + 1);
1107  c_size = s->mb_stride * (s->mb_height + 1);
1108  yc_size = y_size + 2 * c_size;
1109 
1110  if (s->mb_height & 1)
1111  yc_size += 2*s->b8_stride + 2*s->mb_stride;
1112 
1113  FF_ALLOCZ_OR_GOTO(s->avctx, s->mb_index2xy, (s->mb_num + 1) * sizeof(int), fail); // error ressilience code looks cleaner with this
1114  for (y = 0; y < s->mb_height; y++)
1115  for (x = 0; x < s->mb_width; x++)
1116  s->mb_index2xy[x + y * s->mb_width] = x + y * s->mb_stride;
1117 
1118  s->mb_index2xy[s->mb_height * s->mb_width] = (s->mb_height - 1) * s->mb_stride + s->mb_width; // FIXME really needed?
1119 
1120  if (s->encoding) {
1121  /* Allocate MV tables */
1122  FF_ALLOCZ_OR_GOTO(s->avctx, s->p_mv_table_base, mv_table_size * 2 * sizeof(int16_t), fail)
1123  FF_ALLOCZ_OR_GOTO(s->avctx, s->b_forw_mv_table_base, mv_table_size * 2 * sizeof(int16_t), fail)
1124  FF_ALLOCZ_OR_GOTO(s->avctx, s->b_back_mv_table_base, mv_table_size * 2 * sizeof(int16_t), fail)
1125  FF_ALLOCZ_OR_GOTO(s->avctx, s->b_bidir_forw_mv_table_base, mv_table_size * 2 * sizeof(int16_t), fail)
1126  FF_ALLOCZ_OR_GOTO(s->avctx, s->b_bidir_back_mv_table_base, mv_table_size * 2 * sizeof(int16_t), fail)
1127  FF_ALLOCZ_OR_GOTO(s->avctx, s->b_direct_mv_table_base, mv_table_size * 2 * sizeof(int16_t), fail)
1128  s->p_mv_table = s->p_mv_table_base + s->mb_stride + 1;
1134 
1135  /* Allocate MB type table */
1136  FF_ALLOCZ_OR_GOTO(s->avctx, s->mb_type, mb_array_size * sizeof(uint16_t), fail) // needed for encoding
1137 
1138  FF_ALLOCZ_OR_GOTO(s->avctx, s->lambda_table, mb_array_size * sizeof(int), fail)
1139 
1141  mb_array_size * sizeof(float), fail);
1143  mb_array_size * sizeof(float), fail);
1144 
1145  }
1146 
1147  if (s->codec_id == AV_CODEC_ID_MPEG4 ||
1149  /* interlaced direct mode decoding tables */
1150  for (i = 0; i < 2; i++) {
1151  int j, k;
1152  for (j = 0; j < 2; j++) {
1153  for (k = 0; k < 2; k++) {
1155  s->b_field_mv_table_base[i][j][k],
1156  mv_table_size * 2 * sizeof(int16_t),
1157  fail);
1158  s->b_field_mv_table[i][j][k] = s->b_field_mv_table_base[i][j][k] +
1159  s->mb_stride + 1;
1160  }
1161  FF_ALLOCZ_OR_GOTO(s->avctx, s->b_field_select_table [i][j], mb_array_size * 2 * sizeof(uint8_t), fail)
1162  FF_ALLOCZ_OR_GOTO(s->avctx, s->p_field_mv_table_base[i][j], mv_table_size * 2 * sizeof(int16_t), fail)
1163  s->p_field_mv_table[i][j] = s->p_field_mv_table_base[i][j] + s->mb_stride + 1;
1164  }
1165  FF_ALLOCZ_OR_GOTO(s->avctx, s->p_field_select_table[i], mb_array_size * 2 * sizeof(uint8_t), fail)
1166  }
1167  }
1168  if (s->out_format == FMT_H263) {
1169  /* cbp values */
1170  FF_ALLOCZ_OR_GOTO(s->avctx, s->coded_block_base, y_size + (s->mb_height&1)*2*s->b8_stride, fail);
1171  s->coded_block = s->coded_block_base + s->b8_stride + 1;
1172 
1173  /* cbp, ac_pred, pred_dir */
1174  FF_ALLOCZ_OR_GOTO(s->avctx, s->cbp_table , mb_array_size * sizeof(uint8_t), fail);
1175  FF_ALLOCZ_OR_GOTO(s->avctx, s->pred_dir_table, mb_array_size * sizeof(uint8_t), fail);
1176  }
1177 
1178  if (s->h263_pred || s->h263_plus || !s->encoding) {
1179  /* dc values */
1180  // MN: we need these for error resilience of intra-frames
1181  FF_ALLOCZ_OR_GOTO(s->avctx, s->dc_val_base, yc_size * sizeof(int16_t), fail);
1182  s->dc_val[0] = s->dc_val_base + s->b8_stride + 1;
1183  s->dc_val[1] = s->dc_val_base + y_size + s->mb_stride + 1;
1184  s->dc_val[2] = s->dc_val[1] + c_size;
1185  for (i = 0; i < yc_size; i++)
1186  s->dc_val_base[i] = 1024;
1187  }
1188 
1189  /* which mb is a intra block */
1190  FF_ALLOCZ_OR_GOTO(s->avctx, s->mbintra_table, mb_array_size, fail);
1191  memset(s->mbintra_table, 1, mb_array_size);
1192 
1193  /* init macroblock skip table */
1194  FF_ALLOCZ_OR_GOTO(s->avctx, s->mbskip_table, mb_array_size + 2, fail);
1195  // Note the + 1 is for a quicker mpeg4 slice_end detection
1196 
1197  return init_er(s);
1198 fail:
1199  return AVERROR(ENOMEM);
1200 }
1201 
1202 /**
1203  * init common structure for both encoder and decoder.
1204  * this assumes that some variables like width/height are already set
1205  */
1207 {
1208  int i;
1209  int nb_slices = (HAVE_THREADS &&
1211  s->avctx->thread_count : 1;
1212 
1213  if (s->encoding && s->avctx->slices)
1214  nb_slices = s->avctx->slices;
1215 
1217  s->mb_height = (s->height + 31) / 32 * 2;
1218  else
1219  s->mb_height = (s->height + 15) / 16;
1220 
1221  if (s->avctx->pix_fmt == AV_PIX_FMT_NONE) {
1223  "decoding to AV_PIX_FMT_NONE is not supported.\n");
1224  return -1;
1225  }
1226 
1227  if (nb_slices > MAX_THREADS || (nb_slices > s->mb_height && s->mb_height)) {
1228  int max_slices;
1229  if (s->mb_height)
1230  max_slices = FFMIN(MAX_THREADS, s->mb_height);
1231  else
1232  max_slices = MAX_THREADS;
1233  av_log(s->avctx, AV_LOG_WARNING, "too many threads/slices (%d),"
1234  " reducing to %d\n", nb_slices, max_slices);
1235  nb_slices = max_slices;
1236  }
1237 
1238  if ((s->width || s->height) &&
1239  av_image_check_size(s->width, s->height, 0, s->avctx))
1240  return -1;
1241 
1242  ff_dct_common_init(s);
1243 
1244  s->flags = s->avctx->flags;
1245  s->flags2 = s->avctx->flags2;
1246 
1247  /* set chroma shifts */
1249  &s->chroma_x_shift,
1250  &s->chroma_y_shift);
1251 
1252  /* convert fourcc to upper case */
1254 
1256 
1258  MAX_PICTURE_COUNT * sizeof(Picture), fail);
1259  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1260  s->picture[i].f = av_frame_alloc();
1261  if (!s->picture[i].f)
1262  goto fail;
1263  }
1264  memset(&s->next_picture, 0, sizeof(s->next_picture));
1265  memset(&s->last_picture, 0, sizeof(s->last_picture));
1266  memset(&s->current_picture, 0, sizeof(s->current_picture));
1267  memset(&s->new_picture, 0, sizeof(s->new_picture));
1268  s->next_picture.f = av_frame_alloc();
1269  if (!s->next_picture.f)
1270  goto fail;
1271  s->last_picture.f = av_frame_alloc();
1272  if (!s->last_picture.f)
1273  goto fail;
1275  if (!s->current_picture.f)
1276  goto fail;
1277  s->new_picture.f = av_frame_alloc();
1278  if (!s->new_picture.f)
1279  goto fail;
1280 
1281  if (init_context_frame(s))
1282  goto fail;
1283 
1284  s->parse_context.state = -1;
1285 
1286  s->context_initialized = 1;
1287  s->thread_context[0] = s;
1288 
1289 // if (s->width && s->height) {
1290  if (nb_slices > 1) {
1291  for (i = 1; i < nb_slices; i++) {
1292  s->thread_context[i] = av_malloc(sizeof(MpegEncContext));
1293  memcpy(s->thread_context[i], s, sizeof(MpegEncContext));
1294  }
1295 
1296  for (i = 0; i < nb_slices; i++) {
1297  if (init_duplicate_context(s->thread_context[i]) < 0)
1298  goto fail;
1299  s->thread_context[i]->start_mb_y =
1300  (s->mb_height * (i) + nb_slices / 2) / nb_slices;
1301  s->thread_context[i]->end_mb_y =
1302  (s->mb_height * (i + 1) + nb_slices / 2) / nb_slices;
1303  }
1304  } else {
1305  if (init_duplicate_context(s) < 0)
1306  goto fail;
1307  s->start_mb_y = 0;
1308  s->end_mb_y = s->mb_height;
1309  }
1310  s->slice_context_count = nb_slices;
1311 // }
1312 
1313  return 0;
1314  fail:
1315  ff_MPV_common_end(s);
1316  return -1;
1317 }
1318 
1319 /**
1320  * Frees and resets MpegEncContext fields depending on the resolution.
1321  * Is used during resolution changes to avoid a full reinitialization of the
1322  * codec.
1323  */
1325 {
1326  int i, j, k;
1327 
1328  av_freep(&s->mb_type);
1335  s->p_mv_table = NULL;
1336  s->b_forw_mv_table = NULL;
1337  s->b_back_mv_table = NULL;
1338  s->b_bidir_forw_mv_table = NULL;
1339  s->b_bidir_back_mv_table = NULL;
1340  s->b_direct_mv_table = NULL;
1341  for (i = 0; i < 2; i++) {
1342  for (j = 0; j < 2; j++) {
1343  for (k = 0; k < 2; k++) {
1344  av_freep(&s->b_field_mv_table_base[i][j][k]);
1345  s->b_field_mv_table[i][j][k] = NULL;
1346  }
1347  av_freep(&s->b_field_select_table[i][j]);
1348  av_freep(&s->p_field_mv_table_base[i][j]);
1349  s->p_field_mv_table[i][j] = NULL;
1350  }
1352  }
1353 
1354  av_freep(&s->dc_val_base);
1356  av_freep(&s->mbintra_table);
1357  av_freep(&s->cbp_table);
1358  av_freep(&s->pred_dir_table);
1359 
1360  av_freep(&s->mbskip_table);
1361 
1363  av_freep(&s->er.er_temp_buffer);
1364  av_freep(&s->mb_index2xy);
1365  av_freep(&s->lambda_table);
1366 
1367  av_freep(&s->cplx_tab);
1368  av_freep(&s->bits_tab);
1369 
1370  s->linesize = s->uvlinesize = 0;
1371 
1372  return 0;
1373 }
1374 
1376 {
1377  int i, err = 0;
1378 
1379  if (s->slice_context_count > 1) {
1380  for (i = 0; i < s->slice_context_count; i++) {
1382  }
1383  for (i = 1; i < s->slice_context_count; i++) {
1384  av_freep(&s->thread_context[i]);
1385  }
1386  } else
1388 
1389  if ((err = free_context_frame(s)) < 0)
1390  return err;
1391 
1392  if (s->picture)
1393  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1394  s->picture[i].needs_realloc = 1;
1395  }
1396 
1397  s->last_picture_ptr =
1398  s->next_picture_ptr =
1399  s->current_picture_ptr = NULL;
1400 
1401  // init
1403  s->mb_height = (s->height + 31) / 32 * 2;
1404  else
1405  s->mb_height = (s->height + 15) / 16;
1406 
1407  if ((s->width || s->height) &&
1408  av_image_check_size(s->width, s->height, 0, s->avctx))
1409  return AVERROR_INVALIDDATA;
1410 
1411  if ((err = init_context_frame(s)))
1412  goto fail;
1413 
1414  s->thread_context[0] = s;
1415 
1416  if (s->width && s->height) {
1417  int nb_slices = s->slice_context_count;
1418  if (nb_slices > 1) {
1419  for (i = 1; i < nb_slices; i++) {
1420  s->thread_context[i] = av_malloc(sizeof(MpegEncContext));
1421  memcpy(s->thread_context[i], s, sizeof(MpegEncContext));
1422  }
1423 
1424  for (i = 0; i < nb_slices; i++) {
1425  if (init_duplicate_context(s->thread_context[i]) < 0)
1426  goto fail;
1427  s->thread_context[i]->start_mb_y =
1428  (s->mb_height * (i) + nb_slices / 2) / nb_slices;
1429  s->thread_context[i]->end_mb_y =
1430  (s->mb_height * (i + 1) + nb_slices / 2) / nb_slices;
1431  }
1432  } else {
1433  err = init_duplicate_context(s);
1434  if (err < 0)
1435  goto fail;
1436  s->start_mb_y = 0;
1437  s->end_mb_y = s->mb_height;
1438  }
1439  s->slice_context_count = nb_slices;
1440  }
1441 
1442  return 0;
1443  fail:
1444  ff_MPV_common_end(s);
1445  return err;
1446 }
1447 
1448 /* init common structure for both encoder and decoder */
1450 {
1451  int i;
1452 
1453  if (s->slice_context_count > 1) {
1454  for (i = 0; i < s->slice_context_count; i++) {
1456  }
1457  for (i = 1; i < s->slice_context_count; i++) {
1458  av_freep(&s->thread_context[i]);
1459  }
1460  s->slice_context_count = 1;
1461  } else free_duplicate_context(s);
1462 
1464  s->parse_context.buffer_size = 0;
1465 
1468 
1469  if (s->picture) {
1470  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1472  ff_mpeg_unref_picture(s, &s->picture[i]);
1473  av_frame_free(&s->picture[i].f);
1474  }
1475  }
1476  av_freep(&s->picture);
1489 
1490  free_context_frame(s);
1491 
1492  s->context_initialized = 0;
1493  s->last_picture_ptr =
1494  s->next_picture_ptr =
1495  s->current_picture_ptr = NULL;
1496  s->linesize = s->uvlinesize = 0;
1497 }
1498 
1500  uint8_t static_store[2][2 * MAX_RUN + MAX_LEVEL + 3])
1501 {
1502  int8_t max_level[MAX_RUN + 1], max_run[MAX_LEVEL + 1];
1503  uint8_t index_run[MAX_RUN + 1];
1504  int last, run, level, start, end, i;
1505 
1506  /* If table is static, we can quit if rl->max_level[0] is not NULL */
1507  if (static_store && rl->max_level[0])
1508  return;
1509 
1510  /* compute max_level[], max_run[] and index_run[] */
1511  for (last = 0; last < 2; last++) {
1512  if (last == 0) {
1513  start = 0;
1514  end = rl->last;
1515  } else {
1516  start = rl->last;
1517  end = rl->n;
1518  }
1519 
1520  memset(max_level, 0, MAX_RUN + 1);
1521  memset(max_run, 0, MAX_LEVEL + 1);
1522  memset(index_run, rl->n, MAX_RUN + 1);
1523  for (i = start; i < end; i++) {
1524  run = rl->table_run[i];
1525  level = rl->table_level[i];
1526  if (index_run[run] == rl->n)
1527  index_run[run] = i;
1528  if (level > max_level[run])
1529  max_level[run] = level;
1530  if (run > max_run[level])
1531  max_run[level] = run;
1532  }
1533  if (static_store)
1534  rl->max_level[last] = static_store[last];
1535  else
1536  rl->max_level[last] = av_malloc(MAX_RUN + 1);
1537  memcpy(rl->max_level[last], max_level, MAX_RUN + 1);
1538  if (static_store)
1539  rl->max_run[last] = static_store[last] + MAX_RUN + 1;
1540  else
1541  rl->max_run[last] = av_malloc(MAX_LEVEL + 1);
1542  memcpy(rl->max_run[last], max_run, MAX_LEVEL + 1);
1543  if (static_store)
1544  rl->index_run[last] = static_store[last] + MAX_RUN + MAX_LEVEL + 2;
1545  else
1546  rl->index_run[last] = av_malloc(MAX_RUN + 1);
1547  memcpy(rl->index_run[last], index_run, MAX_RUN + 1);
1548  }
1549 }
1550 
1552 {
1553  int i, q;
1554 
1555  for (q = 0; q < 32; q++) {
1556  int qmul = q * 2;
1557  int qadd = (q - 1) | 1;
1558 
1559  if (q == 0) {
1560  qmul = 1;
1561  qadd = 0;
1562  }
1563  for (i = 0; i < rl->vlc.table_size; i++) {
1564  int code = rl->vlc.table[i][0];
1565  int len = rl->vlc.table[i][1];
1566  int level, run;
1567 
1568  if (len == 0) { // illegal code
1569  run = 66;
1570  level = MAX_LEVEL;
1571  } else if (len < 0) { // more bits needed
1572  run = 0;
1573  level = code;
1574  } else {
1575  if (code == rl->n) { // esc
1576  run = 66;
1577  level = 0;
1578  } else {
1579  run = rl->table_run[code] + 1;
1580  level = rl->table_level[code] * qmul + qadd;
1581  if (code >= rl->last) run += 192;
1582  }
1583  }
1584  rl->rl_vlc[q][i].len = len;
1585  rl->rl_vlc[q][i].level = level;
1586  rl->rl_vlc[q][i].run = run;
1587  }
1588  }
1589 }
1590 
1592 {
1593  int i;
1594 
1595  /* release non reference frames */
1596  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1597  if (!s->picture[i].reference)
1598  ff_mpeg_unref_picture(s, &s->picture[i]);
1599  }
1600 }
1601 
1602 static inline int pic_is_unused(MpegEncContext *s, Picture *pic)
1603 {
1604  if (pic == s->last_picture_ptr)
1605  return 0;
1606  if (pic->f->buf[0] == NULL)
1607  return 1;
1608  if (pic->needs_realloc && !(pic->reference & DELAYED_PIC_REF))
1609  return 1;
1610  return 0;
1611 }
1612 
1613 static int find_unused_picture(MpegEncContext *s, int shared)
1614 {
1615  int i;
1616 
1617  if (shared) {
1618  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1619  if (s->picture[i].f->buf[0] == NULL && &s->picture[i] != s->last_picture_ptr)
1620  return i;
1621  }
1622  } else {
1623  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1624  if (pic_is_unused(s, &s->picture[i]))
1625  return i;
1626  }
1627  }
1628 
1630  "Internal error, picture buffer overflow\n");
1631  /* We could return -1, but the codec would crash trying to draw into a
1632  * non-existing frame anyway. This is safer than waiting for a random crash.
1633  * Also the return of this is never useful, an encoder must only allocate
1634  * as much as allowed in the specification. This has no relationship to how
1635  * much libavcodec could allocate (and MAX_PICTURE_COUNT is always large
1636  * enough for such valid streams).
1637  * Plus, a decoder has to check stream validity and remove frames if too
1638  * many reference frames are around. Waiting for "OOM" is not correct at
1639  * all. Similarly, missing reference frames have to be replaced by
1640  * interpolated/MC frames, anything else is a bug in the codec ...
1641  */
1642  abort();
1643  return -1;
1644 }
1645 
1647 {
1648  int ret = find_unused_picture(s, shared);
1649 
1650  if (ret >= 0 && ret < MAX_PICTURE_COUNT) {
1651  if (s->picture[ret].needs_realloc) {
1652  s->picture[ret].needs_realloc = 0;
1653  ff_free_picture_tables(&s->picture[ret]);
1654  ff_mpeg_unref_picture(s, &s->picture[ret]);
1655  }
1656  }
1657  return ret;
1658 }
1659 
1660 /**
1661  * generic function called after decoding
1662  * the header and before a frame is decoded.
1663  */
1665 {
1666  int i, ret;
1667  Picture *pic;
1668  s->mb_skipped = 0;
1669 
1670  if (!ff_thread_can_start_frame(avctx)) {
1671  av_log(avctx, AV_LOG_ERROR, "Attempt to start a frame outside SETUP state\n");
1672  return -1;
1673  }
1674 
1675  /* mark & release old frames */
1676  if (s->pict_type != AV_PICTURE_TYPE_B && s->last_picture_ptr &&
1678  s->last_picture_ptr->f->buf[0]) {
1680  }
1681 
1682  /* release forgotten pictures */
1683  /* if (mpeg124/h263) */
1684  for (i = 0; i < MAX_PICTURE_COUNT; i++) {
1685  if (&s->picture[i] != s->last_picture_ptr &&
1686  &s->picture[i] != s->next_picture_ptr &&
1687  s->picture[i].reference && !s->picture[i].needs_realloc) {
1688  if (!(avctx->active_thread_type & FF_THREAD_FRAME))
1689  av_log(avctx, AV_LOG_ERROR,
1690  "releasing zombie picture\n");
1691  ff_mpeg_unref_picture(s, &s->picture[i]);
1692  }
1693  }
1694 
1696 
1698 
1699  if (s->current_picture_ptr &&
1700  s->current_picture_ptr->f->buf[0] == NULL) {
1701  // we already have a unused image
1702  // (maybe it was set before reading the header)
1703  pic = s->current_picture_ptr;
1704  } else {
1705  i = ff_find_unused_picture(s, 0);
1706  if (i < 0) {
1707  av_log(s->avctx, AV_LOG_ERROR, "no frame buffer available\n");
1708  return i;
1709  }
1710  pic = &s->picture[i];
1711  }
1712 
1713  pic->reference = 0;
1714  if (!s->droppable) {
1715  if (s->pict_type != AV_PICTURE_TYPE_B)
1716  pic->reference = 3;
1717  }
1718 
1720 
1721  if (ff_alloc_picture(s, pic, 0) < 0)
1722  return -1;
1723 
1724  s->current_picture_ptr = pic;
1725  // FIXME use only the vars from current_pic
1727  if (s->codec_id == AV_CODEC_ID_MPEG1VIDEO ||
1729  if (s->picture_structure != PICT_FRAME)
1732  }
1736 
1738  // if (s->flags && CODEC_FLAG_QSCALE)
1739  // s->current_picture_ptr->quality = s->new_picture_ptr->quality;
1741 
1742  if ((ret = ff_mpeg_ref_picture(s, &s->current_picture,
1743  s->current_picture_ptr)) < 0)
1744  return ret;
1745 
1746  if (s->pict_type != AV_PICTURE_TYPE_B) {
1748  if (!s->droppable)
1750  }
1751  av_dlog(s->avctx, "L%p N%p C%p L%p N%p C%p type:%d drop:%d\n",
1753  s->last_picture_ptr ? s->last_picture_ptr->f->data[0] : NULL,
1754  s->next_picture_ptr ? s->next_picture_ptr->f->data[0] : NULL,
1755  s->current_picture_ptr ? s->current_picture_ptr->f->data[0] : NULL,
1756  s->pict_type, s->droppable);
1757 
1758  if ((s->last_picture_ptr == NULL ||
1759  s->last_picture_ptr->f->buf[0] == NULL) &&
1760  (s->pict_type != AV_PICTURE_TYPE_I ||
1761  s->picture_structure != PICT_FRAME)) {
1762  int h_chroma_shift, v_chroma_shift;
1764  &h_chroma_shift, &v_chroma_shift);
1766  av_log(avctx, AV_LOG_DEBUG,
1767  "allocating dummy last picture for B frame\n");
1768  else if (s->pict_type != AV_PICTURE_TYPE_I)
1769  av_log(avctx, AV_LOG_ERROR,
1770  "warning: first frame is no keyframe\n");
1771  else if (s->picture_structure != PICT_FRAME)
1772  av_log(avctx, AV_LOG_DEBUG,
1773  "allocate dummy last picture for field based first keyframe\n");
1774 
1775  /* Allocate a dummy frame */
1776  i = ff_find_unused_picture(s, 0);
1777  if (i < 0) {
1778  av_log(s->avctx, AV_LOG_ERROR, "no frame buffer available\n");
1779  return i;
1780  }
1781  s->last_picture_ptr = &s->picture[i];
1782 
1783  s->last_picture_ptr->reference = 3;
1784  s->last_picture_ptr->f->key_frame = 0;
1786 
1787  if (ff_alloc_picture(s, s->last_picture_ptr, 0) < 0) {
1788  s->last_picture_ptr = NULL;
1789  return -1;
1790  }
1791 
1792  if (!avctx->hwaccel && !(avctx->codec->capabilities&CODEC_CAP_HWACCEL_VDPAU)) {
1793  for(i=0; i<avctx->height; i++)
1794  memset(s->last_picture_ptr->f->data[0] + s->last_picture_ptr->f->linesize[0]*i,
1795  0x80, avctx->width);
1796  for(i=0; i<FF_CEIL_RSHIFT(avctx->height, v_chroma_shift); i++) {
1797  memset(s->last_picture_ptr->f->data[1] + s->last_picture_ptr->f->linesize[1]*i,
1798  0x80, FF_CEIL_RSHIFT(avctx->width, h_chroma_shift));
1799  memset(s->last_picture_ptr->f->data[2] + s->last_picture_ptr->f->linesize[2]*i,
1800  0x80, FF_CEIL_RSHIFT(avctx->width, h_chroma_shift));
1801  }
1802 
1804  for(i=0; i<avctx->height; i++)
1805  memset(s->last_picture_ptr->f->data[0] + s->last_picture_ptr->f->linesize[0]*i, 16, avctx->width);
1806  }
1807  }
1808 
1809  ff_thread_report_progress(&s->last_picture_ptr->tf, INT_MAX, 0);
1810  ff_thread_report_progress(&s->last_picture_ptr->tf, INT_MAX, 1);
1811  }
1812  if ((s->next_picture_ptr == NULL ||
1813  s->next_picture_ptr->f->buf[0] == NULL) &&
1814  s->pict_type == AV_PICTURE_TYPE_B) {
1815  /* Allocate a dummy frame */
1816  i = ff_find_unused_picture(s, 0);
1817  if (i < 0) {
1818  av_log(s->avctx, AV_LOG_ERROR, "no frame buffer available\n");
1819  return i;
1820  }
1821  s->next_picture_ptr = &s->picture[i];
1822 
1823  s->next_picture_ptr->reference = 3;
1824  s->next_picture_ptr->f->key_frame = 0;
1826 
1827  if (ff_alloc_picture(s, s->next_picture_ptr, 0) < 0) {
1828  s->next_picture_ptr = NULL;
1829  return -1;
1830  }
1831  ff_thread_report_progress(&s->next_picture_ptr->tf, INT_MAX, 0);
1832  ff_thread_report_progress(&s->next_picture_ptr->tf, INT_MAX, 1);
1833  }
1834 
1835 #if 0 // BUFREF-FIXME
1836  memset(s->last_picture.f->data, 0, sizeof(s->last_picture.f->data));
1837  memset(s->next_picture.f->data, 0, sizeof(s->next_picture.f->data));
1838 #endif
1839  if (s->last_picture_ptr) {
1841  if (s->last_picture_ptr->f->buf[0] &&
1842  (ret = ff_mpeg_ref_picture(s, &s->last_picture,
1843  s->last_picture_ptr)) < 0)
1844  return ret;
1845  }
1846  if (s->next_picture_ptr) {
1848  if (s->next_picture_ptr->f->buf[0] &&
1849  (ret = ff_mpeg_ref_picture(s, &s->next_picture,
1850  s->next_picture_ptr)) < 0)
1851  return ret;
1852  }
1853 
1855  s->last_picture_ptr->f->buf[0]));
1856 
1857  if (s->picture_structure!= PICT_FRAME) {
1858  int i;
1859  for (i = 0; i < 4; i++) {
1861  s->current_picture.f->data[i] +=
1862  s->current_picture.f->linesize[i];
1863  }
1864  s->current_picture.f->linesize[i] *= 2;
1865  s->last_picture.f->linesize[i] *= 2;
1866  s->next_picture.f->linesize[i] *= 2;
1867  }
1868  }
1869 
1870  s->err_recognition = avctx->err_recognition;
1871 
1872  /* set dequantizer, we can't do it during init as
1873  * it might change for mpeg4 and we can't do it in the header
1874  * decode as init is not called for mpeg4 there yet */
1875  if (s->mpeg_quant || s->codec_id == AV_CODEC_ID_MPEG2VIDEO) {
1878  } else if (s->out_format == FMT_H263 || s->out_format == FMT_H261) {
1881  } else {
1884  }
1885 
1886  return 0;
1887 }
1888 
1889 /* called after a frame has been decoded. */
1891 {
1892  emms_c();
1893 
1894  if (s->current_picture.reference)
1896 }
1897 
1898 /**
1899  * Draw a line from (ex, ey) -> (sx, sy).
1900  * @param w width of the image
1901  * @param h height of the image
1902  * @param stride stride/linesize of the image
1903  * @param color color of the arrow
1904  */
1905 static void draw_line(uint8_t *buf, int sx, int sy, int ex, int ey,
1906  int w, int h, int stride, int color)
1907 {
1908  int x, y, fr, f;
1909 
1910  sx = av_clip(sx, 0, w - 1);
1911  sy = av_clip(sy, 0, h - 1);
1912  ex = av_clip(ex, 0, w - 1);
1913  ey = av_clip(ey, 0, h - 1);
1914 
1915  buf[sy * stride + sx] += color;
1916 
1917  if (FFABS(ex - sx) > FFABS(ey - sy)) {
1918  if (sx > ex) {
1919  FFSWAP(int, sx, ex);
1920  FFSWAP(int, sy, ey);
1921  }
1922  buf += sx + sy * stride;
1923  ex -= sx;
1924  f = ((ey - sy) << 16) / ex;
1925  for (x = 0; x <= ex; x++) {
1926  y = (x * f) >> 16;
1927  fr = (x * f) & 0xFFFF;
1928  buf[y * stride + x] += (color * (0x10000 - fr)) >> 16;
1929  if(fr) buf[(y + 1) * stride + x] += (color * fr ) >> 16;
1930  }
1931  } else {
1932  if (sy > ey) {
1933  FFSWAP(int, sx, ex);
1934  FFSWAP(int, sy, ey);
1935  }
1936  buf += sx + sy * stride;
1937  ey -= sy;
1938  if (ey)
1939  f = ((ex - sx) << 16) / ey;
1940  else
1941  f = 0;
1942  for(y= 0; y <= ey; y++){
1943  x = (y*f) >> 16;
1944  fr = (y*f) & 0xFFFF;
1945  buf[y * stride + x] += (color * (0x10000 - fr)) >> 16;
1946  if(fr) buf[y * stride + x + 1] += (color * fr ) >> 16;
1947  }
1948  }
1949 }
1950 
1951 /**
1952  * Draw an arrow from (ex, ey) -> (sx, sy).
1953  * @param w width of the image
1954  * @param h height of the image
1955  * @param stride stride/linesize of the image
1956  * @param color color of the arrow
1957  */
1958 static void draw_arrow(uint8_t *buf, int sx, int sy, int ex,
1959  int ey, int w, int h, int stride, int color)
1960 {
1961  int dx,dy;
1962 
1963  sx = av_clip(sx, -100, w + 100);
1964  sy = av_clip(sy, -100, h + 100);
1965  ex = av_clip(ex, -100, w + 100);
1966  ey = av_clip(ey, -100, h + 100);
1967 
1968  dx = ex - sx;
1969  dy = ey - sy;
1970 
1971  if (dx * dx + dy * dy > 3 * 3) {
1972  int rx = dx + dy;
1973  int ry = -dx + dy;
1974  int length = ff_sqrt((rx * rx + ry * ry) << 8);
1975 
1976  // FIXME subpixel accuracy
1977  rx = ROUNDED_DIV(rx * 3 << 4, length);
1978  ry = ROUNDED_DIV(ry * 3 << 4, length);
1979 
1980  draw_line(buf, sx, sy, sx + rx, sy + ry, w, h, stride, color);
1981  draw_line(buf, sx, sy, sx - ry, sy + rx, w, h, stride, color);
1982  }
1983  draw_line(buf, sx, sy, ex, ey, w, h, stride, color);
1984 }
1985 
1986 /**
1987  * Print debugging info for the given picture.
1988  */
1989 void ff_print_debug_info2(AVCodecContext *avctx, AVFrame *pict, uint8_t *mbskip_table,
1990  uint32_t *mbtype_table, int8_t *qscale_table, int16_t (*motion_val[2])[2],
1991  int *low_delay,
1992  int mb_width, int mb_height, int mb_stride, int quarter_sample)
1993 {
1994  if (avctx->hwaccel || !mbtype_table
1996  return;
1997 
1998 
1999  if (avctx->debug & (FF_DEBUG_SKIP | FF_DEBUG_QP | FF_DEBUG_MB_TYPE)) {
2000  int x,y;
2001 
2002  av_log(avctx, AV_LOG_DEBUG, "New frame, type: %c\n",
2004  for (y = 0; y < mb_height; y++) {
2005  for (x = 0; x < mb_width; x++) {
2006  if (avctx->debug & FF_DEBUG_SKIP) {
2007  int count = mbskip_table[x + y * mb_stride];
2008  if (count > 9)
2009  count = 9;
2010  av_log(avctx, AV_LOG_DEBUG, "%1d", count);
2011  }
2012  if (avctx->debug & FF_DEBUG_QP) {
2013  av_log(avctx, AV_LOG_DEBUG, "%2d",
2014  qscale_table[x + y * mb_stride]);
2015  }
2016  if (avctx->debug & FF_DEBUG_MB_TYPE) {
2017  int mb_type = mbtype_table[x + y * mb_stride];
2018  // Type & MV direction
2019  if (IS_PCM(mb_type))
2020  av_log(avctx, AV_LOG_DEBUG, "P");
2021  else if (IS_INTRA(mb_type) && IS_ACPRED(mb_type))
2022  av_log(avctx, AV_LOG_DEBUG, "A");
2023  else if (IS_INTRA4x4(mb_type))
2024  av_log(avctx, AV_LOG_DEBUG, "i");
2025  else if (IS_INTRA16x16(mb_type))
2026  av_log(avctx, AV_LOG_DEBUG, "I");
2027  else if (IS_DIRECT(mb_type) && IS_SKIP(mb_type))
2028  av_log(avctx, AV_LOG_DEBUG, "d");
2029  else if (IS_DIRECT(mb_type))
2030  av_log(avctx, AV_LOG_DEBUG, "D");
2031  else if (IS_GMC(mb_type) && IS_SKIP(mb_type))
2032  av_log(avctx, AV_LOG_DEBUG, "g");
2033  else if (IS_GMC(mb_type))
2034  av_log(avctx, AV_LOG_DEBUG, "G");
2035  else if (IS_SKIP(mb_type))
2036  av_log(avctx, AV_LOG_DEBUG, "S");
2037  else if (!USES_LIST(mb_type, 1))
2038  av_log(avctx, AV_LOG_DEBUG, ">");
2039  else if (!USES_LIST(mb_type, 0))
2040  av_log(avctx, AV_LOG_DEBUG, "<");
2041  else {
2042  av_assert2(USES_LIST(mb_type, 0) && USES_LIST(mb_type, 1));
2043  av_log(avctx, AV_LOG_DEBUG, "X");
2044  }
2045 
2046  // segmentation
2047  if (IS_8X8(mb_type))
2048  av_log(avctx, AV_LOG_DEBUG, "+");
2049  else if (IS_16X8(mb_type))
2050  av_log(avctx, AV_LOG_DEBUG, "-");
2051  else if (IS_8X16(mb_type))
2052  av_log(avctx, AV_LOG_DEBUG, "|");
2053  else if (IS_INTRA(mb_type) || IS_16X16(mb_type))
2054  av_log(avctx, AV_LOG_DEBUG, " ");
2055  else
2056  av_log(avctx, AV_LOG_DEBUG, "?");
2057 
2058 
2059  if (IS_INTERLACED(mb_type))
2060  av_log(avctx, AV_LOG_DEBUG, "=");
2061  else
2062  av_log(avctx, AV_LOG_DEBUG, " ");
2063  }
2064  }
2065  av_log(avctx, AV_LOG_DEBUG, "\n");
2066  }
2067  }
2068 
2069  if ((avctx->debug & (FF_DEBUG_VIS_QP | FF_DEBUG_VIS_MB_TYPE)) ||
2070  (avctx->debug_mv)) {
2071  const int shift = 1 + quarter_sample;
2072  int mb_y;
2073  uint8_t *ptr;
2074  int i;
2075  int h_chroma_shift, v_chroma_shift, block_height;
2076  const int width = avctx->width;
2077  const int height = avctx->height;
2078  const int mv_sample_log2 = avctx->codec_id == AV_CODEC_ID_H264 || avctx->codec_id == AV_CODEC_ID_SVQ3 ? 2 : 1;
2079  const int mv_stride = (mb_width << mv_sample_log2) +
2080  (avctx->codec->id == AV_CODEC_ID_H264 ? 0 : 1);
2081 
2082  *low_delay = 0; // needed to see the vectors without trashing the buffers
2083 
2084  avcodec_get_chroma_sub_sample(avctx->pix_fmt, &h_chroma_shift, &v_chroma_shift);
2085 
2086  av_frame_make_writable(pict);
2087 
2088  pict->opaque = NULL;
2089  ptr = pict->data[0];
2090  block_height = 16 >> v_chroma_shift;
2091 
2092  for (mb_y = 0; mb_y < mb_height; mb_y++) {
2093  int mb_x;
2094  for (mb_x = 0; mb_x < mb_width; mb_x++) {
2095  const int mb_index = mb_x + mb_y * mb_stride;
2096  if ((avctx->debug_mv) && motion_val[0]) {
2097  int type;
2098  for (type = 0; type < 3; type++) {
2099  int direction = 0;
2100  switch (type) {
2101  case 0:
2102  if ((!(avctx->debug_mv & FF_DEBUG_VIS_MV_P_FOR)) ||
2103  (pict->pict_type!= AV_PICTURE_TYPE_P))
2104  continue;
2105  direction = 0;
2106  break;
2107  case 1:
2108  if ((!(avctx->debug_mv & FF_DEBUG_VIS_MV_B_FOR)) ||
2109  (pict->pict_type!= AV_PICTURE_TYPE_B))
2110  continue;
2111  direction = 0;
2112  break;
2113  case 2:
2114  if ((!(avctx->debug_mv & FF_DEBUG_VIS_MV_B_BACK)) ||
2115  (pict->pict_type!= AV_PICTURE_TYPE_B))
2116  continue;
2117  direction = 1;
2118  break;
2119  }
2120  if (!USES_LIST(mbtype_table[mb_index], direction))
2121  continue;
2122 
2123  if (IS_8X8(mbtype_table[mb_index])) {
2124  int i;
2125  for (i = 0; i < 4; i++) {
2126  int sx = mb_x * 16 + 4 + 8 * (i & 1);
2127  int sy = mb_y * 16 + 4 + 8 * (i >> 1);
2128  int xy = (mb_x * 2 + (i & 1) +
2129  (mb_y * 2 + (i >> 1)) * mv_stride) << (mv_sample_log2 - 1);
2130  int mx = (motion_val[direction][xy][0] >> shift) + sx;
2131  int my = (motion_val[direction][xy][1] >> shift) + sy;
2132  draw_arrow(ptr, sx, sy, mx, my, width,
2133  height, pict->linesize[0], 100);
2134  }
2135  } else if (IS_16X8(mbtype_table[mb_index])) {
2136  int i;
2137  for (i = 0; i < 2; i++) {
2138  int sx = mb_x * 16 + 8;
2139  int sy = mb_y * 16 + 4 + 8 * i;
2140  int xy = (mb_x * 2 + (mb_y * 2 + i) * mv_stride) << (mv_sample_log2 - 1);
2141  int mx = (motion_val[direction][xy][0] >> shift);
2142  int my = (motion_val[direction][xy][1] >> shift);
2143 
2144  if (IS_INTERLACED(mbtype_table[mb_index]))
2145  my *= 2;
2146 
2147  draw_arrow(ptr, sx, sy, mx + sx, my + sy, width,
2148  height, pict->linesize[0], 100);
2149  }
2150  } else if (IS_8X16(mbtype_table[mb_index])) {
2151  int i;
2152  for (i = 0; i < 2; i++) {
2153  int sx = mb_x * 16 + 4 + 8 * i;
2154  int sy = mb_y * 16 + 8;
2155  int xy = (mb_x * 2 + i + mb_y * 2 * mv_stride) << (mv_sample_log2 - 1);
2156  int mx = motion_val[direction][xy][0] >> shift;
2157  int my = motion_val[direction][xy][1] >> shift;
2158 
2159  if (IS_INTERLACED(mbtype_table[mb_index]))
2160  my *= 2;
2161 
2162  draw_arrow(ptr, sx, sy, mx + sx, my + sy, width,
2163  height, pict->linesize[0], 100);
2164  }
2165  } else {
2166  int sx= mb_x * 16 + 8;
2167  int sy= mb_y * 16 + 8;
2168  int xy= (mb_x + mb_y * mv_stride) << mv_sample_log2;
2169  int mx= (motion_val[direction][xy][0]>>shift) + sx;
2170  int my= (motion_val[direction][xy][1]>>shift) + sy;
2171  draw_arrow(ptr, sx, sy, mx, my, width, height, pict->linesize[0], 100);
2172  }
2173  }
2174  }
2175  if ((avctx->debug & FF_DEBUG_VIS_QP)) {
2176  uint64_t c = (qscale_table[mb_index] * 128 / 31) *
2177  0x0101010101010101ULL;
2178  int y;
2179  for (y = 0; y < block_height; y++) {
2180  *(uint64_t *)(pict->data[1] + 8 * mb_x +
2181  (block_height * mb_y + y) *
2182  pict->linesize[1]) = c;
2183  *(uint64_t *)(pict->data[2] + 8 * mb_x +
2184  (block_height * mb_y + y) *
2185  pict->linesize[2]) = c;
2186  }
2187  }
2188  if ((avctx->debug & FF_DEBUG_VIS_MB_TYPE) &&
2189  motion_val[0]) {
2190  int mb_type = mbtype_table[mb_index];
2191  uint64_t u,v;
2192  int y;
2193 #define COLOR(theta, r) \
2194  u = (int)(128 + r * cos(theta * 3.141592 / 180)); \
2195  v = (int)(128 + r * sin(theta * 3.141592 / 180));
2196 
2197 
2198  u = v = 128;
2199  if (IS_PCM(mb_type)) {
2200  COLOR(120, 48)
2201  } else if ((IS_INTRA(mb_type) && IS_ACPRED(mb_type)) ||
2202  IS_INTRA16x16(mb_type)) {
2203  COLOR(30, 48)
2204  } else if (IS_INTRA4x4(mb_type)) {
2205  COLOR(90, 48)
2206  } else if (IS_DIRECT(mb_type) && IS_SKIP(mb_type)) {
2207  // COLOR(120, 48)
2208  } else if (IS_DIRECT(mb_type)) {
2209  COLOR(150, 48)
2210  } else if (IS_GMC(mb_type) && IS_SKIP(mb_type)) {
2211  COLOR(170, 48)
2212  } else if (IS_GMC(mb_type)) {
2213  COLOR(190, 48)
2214  } else if (IS_SKIP(mb_type)) {
2215  // COLOR(180, 48)
2216  } else if (!USES_LIST(mb_type, 1)) {
2217  COLOR(240, 48)
2218  } else if (!USES_LIST(mb_type, 0)) {
2219  COLOR(0, 48)
2220  } else {
2221  av_assert2(USES_LIST(mb_type, 0) && USES_LIST(mb_type, 1));
2222  COLOR(300,48)
2223  }
2224 
2225  u *= 0x0101010101010101ULL;
2226  v *= 0x0101010101010101ULL;
2227  for (y = 0; y < block_height; y++) {
2228  *(uint64_t *)(pict->data[1] + 8 * mb_x +
2229  (block_height * mb_y + y) * pict->linesize[1]) = u;
2230  *(uint64_t *)(pict->data[2] + 8 * mb_x +
2231  (block_height * mb_y + y) * pict->linesize[2]) = v;
2232  }
2233 
2234  // segmentation
2235  if (IS_8X8(mb_type) || IS_16X8(mb_type)) {
2236  *(uint64_t *)(pict->data[0] + 16 * mb_x + 0 +
2237  (16 * mb_y + 8) * pict->linesize[0]) ^= 0x8080808080808080ULL;
2238  *(uint64_t *)(pict->data[0] + 16 * mb_x + 8 +
2239  (16 * mb_y + 8) * pict->linesize[0]) ^= 0x8080808080808080ULL;
2240  }
2241  if (IS_8X8(mb_type) || IS_8X16(mb_type)) {
2242  for (y = 0; y < 16; y++)
2243  pict->data[0][16 * mb_x + 8 + (16 * mb_y + y) *
2244  pict->linesize[0]] ^= 0x80;
2245  }
2246  if (IS_8X8(mb_type) && mv_sample_log2 >= 2) {
2247  int dm = 1 << (mv_sample_log2 - 2);
2248  for (i = 0; i < 4; i++) {
2249  int sx = mb_x * 16 + 8 * (i & 1);
2250  int sy = mb_y * 16 + 8 * (i >> 1);
2251  int xy = (mb_x * 2 + (i & 1) +
2252  (mb_y * 2 + (i >> 1)) * mv_stride) << (mv_sample_log2 - 1);
2253  // FIXME bidir
2254  int32_t *mv = (int32_t *) &motion_val[0][xy];
2255  if (mv[0] != mv[dm] ||
2256  mv[dm * mv_stride] != mv[dm * (mv_stride + 1)])
2257  for (y = 0; y < 8; y++)
2258  pict->data[0][sx + 4 + (sy + y) * pict->linesize[0]] ^= 0x80;
2259  if (mv[0] != mv[dm * mv_stride] || mv[dm] != mv[dm * (mv_stride + 1)])
2260  *(uint64_t *)(pict->data[0] + sx + (sy + 4) *
2261  pict->linesize[0]) ^= 0x8080808080808080ULL;
2262  }
2263  }
2264 
2265  if (IS_INTERLACED(mb_type) &&
2266  avctx->codec->id == AV_CODEC_ID_H264) {
2267  // hmm
2268  }
2269  }
2270  mbskip_table[mb_index] = 0;
2271  }
2272  }
2273  }
2274 }
2275 
2277 {
2279  p->qscale_table, p->motion_val, &s->low_delay,
2280  s->mb_width, s->mb_height, s->mb_stride, s->quarter_sample);
2281 }
2282 
2284 {
2286  int offset = 2*s->mb_stride + 1;
2287  if(!ref)
2288  return AVERROR(ENOMEM);
2289  av_assert0(ref->size >= offset + s->mb_stride * ((f->height+15)/16));
2290  ref->size -= offset;
2291  ref->data += offset;
2292  return av_frame_set_qp_table(f, ref, s->mb_stride, qp_type);
2293 }
2294 
2296  uint8_t *dest, uint8_t *src,
2297  int field_based, int field_select,
2298  int src_x, int src_y,
2299  int width, int height, ptrdiff_t stride,
2300  int h_edge_pos, int v_edge_pos,
2301  int w, int h, h264_chroma_mc_func *pix_op,
2302  int motion_x, int motion_y)
2303 {
2304  const int lowres = s->avctx->lowres;
2305  const int op_index = FFMIN(lowres, 3);
2306  const int s_mask = (2 << lowres) - 1;
2307  int emu = 0;
2308  int sx, sy;
2309 
2310  if (s->quarter_sample) {
2311  motion_x /= 2;
2312  motion_y /= 2;
2313  }
2314 
2315  sx = motion_x & s_mask;
2316  sy = motion_y & s_mask;
2317  src_x += motion_x >> lowres + 1;
2318  src_y += motion_y >> lowres + 1;
2319 
2320  src += src_y * stride + src_x;
2321 
2322  if ((unsigned)src_x > FFMAX( h_edge_pos - (!!sx) - w, 0) ||
2323  (unsigned)src_y > FFMAX((v_edge_pos >> field_based) - (!!sy) - h, 0)) {
2325  s->linesize, s->linesize,
2326  w + 1, (h + 1) << field_based,
2327  src_x, src_y << field_based,
2328  h_edge_pos, v_edge_pos);
2329  src = s->edge_emu_buffer;
2330  emu = 1;
2331  }
2332 
2333  sx = (sx << 2) >> lowres;
2334  sy = (sy << 2) >> lowres;
2335  if (field_select)
2336  src += s->linesize;
2337  pix_op[op_index](dest, src, stride, h, sx, sy);
2338  return emu;
2339 }
2340 
2341 /* apply one mpeg motion vector to the three components */
2343  uint8_t *dest_y,
2344  uint8_t *dest_cb,
2345  uint8_t *dest_cr,
2346  int field_based,
2347  int bottom_field,
2348  int field_select,
2349  uint8_t **ref_picture,
2350  h264_chroma_mc_func *pix_op,
2351  int motion_x, int motion_y,
2352  int h, int mb_y)
2353 {
2354  uint8_t *ptr_y, *ptr_cb, *ptr_cr;
2355  int mx, my, src_x, src_y, uvsrc_x, uvsrc_y, sx, sy, uvsx, uvsy;
2356  ptrdiff_t uvlinesize, linesize;
2357  const int lowres = s->avctx->lowres;
2358  const int op_index = FFMIN(lowres-1+s->chroma_x_shift, 3);
2359  const int block_s = 8>>lowres;
2360  const int s_mask = (2 << lowres) - 1;
2361  const int h_edge_pos = s->h_edge_pos >> lowres;
2362  const int v_edge_pos = s->v_edge_pos >> lowres;
2363  linesize = s->current_picture.f->linesize[0] << field_based;
2364  uvlinesize = s->current_picture.f->linesize[1] << field_based;
2365 
2366  // FIXME obviously not perfect but qpel will not work in lowres anyway
2367  if (s->quarter_sample) {
2368  motion_x /= 2;
2369  motion_y /= 2;
2370  }
2371 
2372  if(field_based){
2373  motion_y += (bottom_field - field_select)*((1 << lowres)-1);
2374  }
2375 
2376  sx = motion_x & s_mask;
2377  sy = motion_y & s_mask;
2378  src_x = s->mb_x * 2 * block_s + (motion_x >> lowres + 1);
2379  src_y = (mb_y * 2 * block_s >> field_based) + (motion_y >> lowres + 1);
2380 
2381  if (s->out_format == FMT_H263) {
2382  uvsx = ((motion_x >> 1) & s_mask) | (sx & 1);
2383  uvsy = ((motion_y >> 1) & s_mask) | (sy & 1);
2384  uvsrc_x = src_x >> 1;
2385  uvsrc_y = src_y >> 1;
2386  } else if (s->out_format == FMT_H261) {
2387  // even chroma mv's are full pel in H261
2388  mx = motion_x / 4;
2389  my = motion_y / 4;
2390  uvsx = (2 * mx) & s_mask;
2391  uvsy = (2 * my) & s_mask;
2392  uvsrc_x = s->mb_x * block_s + (mx >> lowres);
2393  uvsrc_y = mb_y * block_s + (my >> lowres);
2394  } else {
2395  if(s->chroma_y_shift){
2396  mx = motion_x / 2;
2397  my = motion_y / 2;
2398  uvsx = mx & s_mask;
2399  uvsy = my & s_mask;
2400  uvsrc_x = s->mb_x * block_s + (mx >> lowres + 1);
2401  uvsrc_y = (mb_y * block_s >> field_based) + (my >> lowres + 1);
2402  } else {
2403  if(s->chroma_x_shift){
2404  //Chroma422
2405  mx = motion_x / 2;
2406  uvsx = mx & s_mask;
2407  uvsy = motion_y & s_mask;
2408  uvsrc_y = src_y;
2409  uvsrc_x = s->mb_x*block_s + (mx >> (lowres+1));
2410  } else {
2411  //Chroma444
2412  uvsx = motion_x & s_mask;
2413  uvsy = motion_y & s_mask;
2414  uvsrc_x = src_x;
2415  uvsrc_y = src_y;
2416  }
2417  }
2418  }
2419 
2420  ptr_y = ref_picture[0] + src_y * linesize + src_x;
2421  ptr_cb = ref_picture[1] + uvsrc_y * uvlinesize + uvsrc_x;
2422  ptr_cr = ref_picture[2] + uvsrc_y * uvlinesize + uvsrc_x;
2423 
2424  if ((unsigned) src_x > FFMAX( h_edge_pos - (!!sx) - 2 * block_s, 0) || uvsrc_y<0 ||
2425  (unsigned) src_y > FFMAX((v_edge_pos >> field_based) - (!!sy) - h, 0)) {
2426  s->vdsp.emulated_edge_mc(s->edge_emu_buffer, ptr_y,
2427  linesize >> field_based, linesize >> field_based,
2428  17, 17 + field_based,
2429  src_x, src_y << field_based, h_edge_pos,
2430  v_edge_pos);
2431  ptr_y = s->edge_emu_buffer;
2432  if (!CONFIG_GRAY || !(s->flags & CODEC_FLAG_GRAY)) {
2433  uint8_t *uvbuf = s->edge_emu_buffer + 18 * s->linesize;
2434  s->vdsp.emulated_edge_mc(uvbuf, ptr_cb,
2435  uvlinesize >> field_based, uvlinesize >> field_based,
2436  9, 9 + field_based,
2437  uvsrc_x, uvsrc_y << field_based,
2438  h_edge_pos >> 1, v_edge_pos >> 1);
2439  s->vdsp.emulated_edge_mc(uvbuf + 16, ptr_cr,
2440  uvlinesize >> field_based,uvlinesize >> field_based,
2441  9, 9 + field_based,
2442  uvsrc_x, uvsrc_y << field_based,
2443  h_edge_pos >> 1, v_edge_pos >> 1);
2444  ptr_cb = uvbuf;
2445  ptr_cr = uvbuf + 16;
2446  }
2447  }
2448 
2449  // FIXME use this for field pix too instead of the obnoxious hack which changes picture.f->data
2450  if (bottom_field) {
2451  dest_y += s->linesize;
2452  dest_cb += s->uvlinesize;
2453  dest_cr += s->uvlinesize;
2454  }
2455 
2456  if (field_select) {
2457  ptr_y += s->linesize;
2458  ptr_cb += s->uvlinesize;
2459  ptr_cr += s->uvlinesize;
2460  }
2461 
2462  sx = (sx << 2) >> lowres;
2463  sy = (sy << 2) >> lowres;
2464  pix_op[lowres - 1](dest_y, ptr_y, linesize, h, sx, sy);
2465 
2466  if (!CONFIG_GRAY || !(s->flags & CODEC_FLAG_GRAY)) {
2467  int hc = s->chroma_y_shift ? (h+1-bottom_field)>>1 : h;
2468  uvsx = (uvsx << 2) >> lowres;
2469  uvsy = (uvsy << 2) >> lowres;
2470  if (hc) {
2471  pix_op[op_index](dest_cb, ptr_cb, uvlinesize, hc, uvsx, uvsy);
2472  pix_op[op_index](dest_cr, ptr_cr, uvlinesize, hc, uvsx, uvsy);
2473  }
2474  }
2475  // FIXME h261 lowres loop filter
2476 }
2477 
2479  uint8_t *dest_cb, uint8_t *dest_cr,
2480  uint8_t **ref_picture,
2481  h264_chroma_mc_func * pix_op,
2482  int mx, int my)
2483 {
2484  const int lowres = s->avctx->lowres;
2485  const int op_index = FFMIN(lowres, 3);
2486  const int block_s = 8 >> lowres;
2487  const int s_mask = (2 << lowres) - 1;
2488  const int h_edge_pos = s->h_edge_pos >> lowres + 1;
2489  const int v_edge_pos = s->v_edge_pos >> lowres + 1;
2490  int emu = 0, src_x, src_y, sx, sy;
2491  ptrdiff_t offset;
2492  uint8_t *ptr;
2493 
2494  if (s->quarter_sample) {
2495  mx /= 2;
2496  my /= 2;
2497  }
2498 
2499  /* In case of 8X8, we construct a single chroma motion vector
2500  with a special rounding */
2501  mx = ff_h263_round_chroma(mx);
2502  my = ff_h263_round_chroma(my);
2503 
2504  sx = mx & s_mask;
2505  sy = my & s_mask;
2506  src_x = s->mb_x * block_s + (mx >> lowres + 1);
2507  src_y = s->mb_y * block_s + (my >> lowres + 1);
2508 
2509  offset = src_y * s->uvlinesize + src_x;
2510  ptr = ref_picture[1] + offset;
2511  if ((unsigned) src_x > FFMAX(h_edge_pos - (!!sx) - block_s, 0) ||
2512  (unsigned) src_y > FFMAX(v_edge_pos - (!!sy) - block_s, 0)) {
2514  s->uvlinesize, s->uvlinesize,
2515  9, 9,
2516  src_x, src_y, h_edge_pos, v_edge_pos);
2517  ptr = s->edge_emu_buffer;
2518  emu = 1;
2519  }
2520  sx = (sx << 2) >> lowres;
2521  sy = (sy << 2) >> lowres;
2522  pix_op[op_index](dest_cb, ptr, s->uvlinesize, block_s, sx, sy);
2523 
2524  ptr = ref_picture[2] + offset;
2525  if (emu) {
2527  s->uvlinesize, s->uvlinesize,
2528  9, 9,
2529  src_x, src_y, h_edge_pos, v_edge_pos);
2530  ptr = s->edge_emu_buffer;
2531  }
2532  pix_op[op_index](dest_cr, ptr, s->uvlinesize, block_s, sx, sy);
2533 }
2534 
2535 /**
2536  * motion compensation of a single macroblock
2537  * @param s context
2538  * @param dest_y luma destination pointer
2539  * @param dest_cb chroma cb/u destination pointer
2540  * @param dest_cr chroma cr/v destination pointer
2541  * @param dir direction (0->forward, 1->backward)
2542  * @param ref_picture array[3] of pointers to the 3 planes of the reference picture
2543  * @param pix_op halfpel motion compensation function (average or put normally)
2544  * the motion vectors are taken from s->mv and the MV type from s->mv_type
2545  */
2546 static inline void MPV_motion_lowres(MpegEncContext *s,
2547  uint8_t *dest_y, uint8_t *dest_cb,
2548  uint8_t *dest_cr,
2549  int dir, uint8_t **ref_picture,
2550  h264_chroma_mc_func *pix_op)
2551 {
2552  int mx, my;
2553  int mb_x, mb_y, i;
2554  const int lowres = s->avctx->lowres;
2555  const int block_s = 8 >>lowres;
2556 
2557  mb_x = s->mb_x;
2558  mb_y = s->mb_y;
2559 
2560  switch (s->mv_type) {
2561  case MV_TYPE_16X16:
2562  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2563  0, 0, 0,
2564  ref_picture, pix_op,
2565  s->mv[dir][0][0], s->mv[dir][0][1],
2566  2 * block_s, mb_y);
2567  break;
2568  case MV_TYPE_8X8:
2569  mx = 0;
2570  my = 0;
2571  for (i = 0; i < 4; i++) {
2572  hpel_motion_lowres(s, dest_y + ((i & 1) + (i >> 1) *
2573  s->linesize) * block_s,
2574  ref_picture[0], 0, 0,
2575  (2 * mb_x + (i & 1)) * block_s,
2576  (2 * mb_y + (i >> 1)) * block_s,
2577  s->width, s->height, s->linesize,
2578  s->h_edge_pos >> lowres, s->v_edge_pos >> lowres,
2579  block_s, block_s, pix_op,
2580  s->mv[dir][i][0], s->mv[dir][i][1]);
2581 
2582  mx += s->mv[dir][i][0];
2583  my += s->mv[dir][i][1];
2584  }
2585 
2586  if (!CONFIG_GRAY || !(s->flags & CODEC_FLAG_GRAY))
2587  chroma_4mv_motion_lowres(s, dest_cb, dest_cr, ref_picture,
2588  pix_op, mx, my);
2589  break;
2590  case MV_TYPE_FIELD:
2591  if (s->picture_structure == PICT_FRAME) {
2592  /* top field */
2593  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2594  1, 0, s->field_select[dir][0],
2595  ref_picture, pix_op,
2596  s->mv[dir][0][0], s->mv[dir][0][1],
2597  block_s, mb_y);
2598  /* bottom field */
2599  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2600  1, 1, s->field_select[dir][1],
2601  ref_picture, pix_op,
2602  s->mv[dir][1][0], s->mv[dir][1][1],
2603  block_s, mb_y);
2604  } else {
2605  if (s->picture_structure != s->field_select[dir][0] + 1 &&
2606  s->pict_type != AV_PICTURE_TYPE_B && !s->first_field) {
2607  ref_picture = s->current_picture_ptr->f->data;
2608 
2609  }
2610  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2611  0, 0, s->field_select[dir][0],
2612  ref_picture, pix_op,
2613  s->mv[dir][0][0],
2614  s->mv[dir][0][1], 2 * block_s, mb_y >> 1);
2615  }
2616  break;
2617  case MV_TYPE_16X8:
2618  for (i = 0; i < 2; i++) {
2619  uint8_t **ref2picture;
2620 
2621  if (s->picture_structure == s->field_select[dir][i] + 1 ||
2622  s->pict_type == AV_PICTURE_TYPE_B || s->first_field) {
2623  ref2picture = ref_picture;
2624  } else {
2625  ref2picture = s->current_picture_ptr->f->data;
2626  }
2627 
2628  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2629  0, 0, s->field_select[dir][i],
2630  ref2picture, pix_op,
2631  s->mv[dir][i][0], s->mv[dir][i][1] +
2632  2 * block_s * i, block_s, mb_y >> 1);
2633 
2634  dest_y += 2 * block_s * s->linesize;
2635  dest_cb += (2 * block_s >> s->chroma_y_shift) * s->uvlinesize;
2636  dest_cr += (2 * block_s >> s->chroma_y_shift) * s->uvlinesize;
2637  }
2638  break;
2639  case MV_TYPE_DMV:
2640  if (s->picture_structure == PICT_FRAME) {
2641  for (i = 0; i < 2; i++) {
2642  int j;
2643  for (j = 0; j < 2; j++) {
2644  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2645  1, j, j ^ i,
2646  ref_picture, pix_op,
2647  s->mv[dir][2 * i + j][0],
2648  s->mv[dir][2 * i + j][1],
2649  block_s, mb_y);
2650  }
2652  }
2653  } else {
2654  for (i = 0; i < 2; i++) {
2655  mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
2656  0, 0, s->picture_structure != i + 1,
2657  ref_picture, pix_op,
2658  s->mv[dir][2 * i][0],s->mv[dir][2 * i][1],
2659  2 * block_s, mb_y >> 1);
2660 
2661  // after put we make avg of the same block
2663 
2664  // opposite parity is always in the same
2665  // frame if this is second field
2666  if (!s->first_field) {
2667  ref_picture = s->current_picture_ptr->f->data;
2668  }
2669  }
2670  }
2671  break;
2672  default:
2673  av_assert2(0);
2674  }
2675 }
2676 
2677 /**
2678  * find the lowest MB row referenced in the MVs
2679  */
2681 {
2682  int my_max = INT_MIN, my_min = INT_MAX, qpel_shift = !s->quarter_sample;
2683  int my, off, i, mvs;
2684 
2685  if (s->picture_structure != PICT_FRAME || s->mcsel)
2686  goto unhandled;
2687 
2688  switch (s->mv_type) {
2689  case MV_TYPE_16X16:
2690  mvs = 1;
2691  break;
2692  case MV_TYPE_16X8:
2693  mvs = 2;
2694  break;
2695  case MV_TYPE_8X8:
2696  mvs = 4;
2697  break;
2698  default:
2699  goto unhandled;
2700  }
2701 
2702  for (i = 0; i < mvs; i++) {
2703  my = s->mv[dir][i][1]<<qpel_shift;
2704  my_max = FFMAX(my_max, my);
2705  my_min = FFMIN(my_min, my);
2706  }
2707 
2708  off = (FFMAX(-my_min, my_max) + 63) >> 6;
2709 
2710  return FFMIN(FFMAX(s->mb_y + off, 0), s->mb_height-1);
2711 unhandled:
2712  return s->mb_height-1;
2713 }
2714 
2715 /* put block[] to dest[] */
2716 static inline void put_dct(MpegEncContext *s,
2717  int16_t *block, int i, uint8_t *dest, int line_size, int qscale)
2718 {
2719  s->dct_unquantize_intra(s, block, i, qscale);
2720  s->dsp.idct_put (dest, line_size, block);
2721 }
2722 
2723 /* add block[] to dest[] */
2724 static inline void add_dct(MpegEncContext *s,
2725  int16_t *block, int i, uint8_t *dest, int line_size)
2726 {
2727  if (s->block_last_index[i] >= 0) {
2728  s->dsp.idct_add (dest, line_size, block);
2729  }
2730 }
2731 
2732 static inline void add_dequant_dct(MpegEncContext *s,
2733  int16_t *block, int i, uint8_t *dest, int line_size, int qscale)
2734 {
2735  if (s->block_last_index[i] >= 0) {
2736  s->dct_unquantize_inter(s, block, i, qscale);
2737 
2738  s->dsp.idct_add (dest, line_size, block);
2739  }
2740 }
2741 
2742 /**
2743  * Clean dc, ac, coded_block for the current non-intra MB.
2744  */
2746 {
2747  int wrap = s->b8_stride;
2748  int xy = s->block_index[0];
2749 
2750  s->dc_val[0][xy ] =
2751  s->dc_val[0][xy + 1 ] =
2752  s->dc_val[0][xy + wrap] =
2753  s->dc_val[0][xy + 1 + wrap] = 1024;
2754  /* ac pred */
2755  memset(s->ac_val[0][xy ], 0, 32 * sizeof(int16_t));
2756  memset(s->ac_val[0][xy + wrap], 0, 32 * sizeof(int16_t));
2757  if (s->msmpeg4_version>=3) {
2758  s->coded_block[xy ] =
2759  s->coded_block[xy + 1 ] =
2760  s->coded_block[xy + wrap] =
2761  s->coded_block[xy + 1 + wrap] = 0;
2762  }
2763  /* chroma */
2764  wrap = s->mb_stride;
2765  xy = s->mb_x + s->mb_y * wrap;
2766  s->dc_val[1][xy] =
2767  s->dc_val[2][xy] = 1024;
2768  /* ac pred */
2769  memset(s->ac_val[1][xy], 0, 16 * sizeof(int16_t));
2770  memset(s->ac_val[2][xy], 0, 16 * sizeof(int16_t));
2771 
2772  s->mbintra_table[xy]= 0;
2773 }
2774 
2775 /* generic function called after a macroblock has been parsed by the
2776  decoder or after it has been encoded by the encoder.
2777 
2778  Important variables used:
2779  s->mb_intra : true if intra macroblock
2780  s->mv_dir : motion vector direction
2781  s->mv_type : motion vector type
2782  s->mv : motion vector
2783  s->interlaced_dct : true if interlaced dct used (mpeg2)
2784  */
2785 static av_always_inline
2787  int lowres_flag, int is_mpeg12)
2788 {
2789  const int mb_xy = s->mb_y * s->mb_stride + s->mb_x;
2790 
2791  if (CONFIG_XVMC &&
2792  s->avctx->hwaccel && s->avctx->hwaccel->decode_mb) {
2793  s->avctx->hwaccel->decode_mb(s);//xvmc uses pblocks
2794  return;
2795  }
2796 
2797  if(s->avctx->debug&FF_DEBUG_DCT_COEFF) {
2798  /* print DCT coefficients */
2799  int i,j;
2800  av_log(s->avctx, AV_LOG_DEBUG, "DCT coeffs of MB at %dx%d:\n", s->mb_x, s->mb_y);
2801  for(i=0; i<6; i++){
2802  for(j=0; j<64; j++){
2803  av_log(s->avctx, AV_LOG_DEBUG, "%5d", block[i][s->dsp.idct_permutation[j]]);
2804  }
2805  av_log(s->avctx, AV_LOG_DEBUG, "\n");
2806  }
2807  }
2808 
2809  s->current_picture.qscale_table[mb_xy] = s->qscale;
2810 
2811  /* update DC predictors for P macroblocks */
2812  if (!s->mb_intra) {
2813  if (!is_mpeg12 && (s->h263_pred || s->h263_aic)) {
2814  if(s->mbintra_table[mb_xy])
2816  } else {
2817  s->last_dc[0] =
2818  s->last_dc[1] =
2819  s->last_dc[2] = 128 << s->intra_dc_precision;
2820  }
2821  }
2822  else if (!is_mpeg12 && (s->h263_pred || s->h263_aic))
2823  s->mbintra_table[mb_xy]=1;
2824 
2825  if ( (s->flags&CODEC_FLAG_PSNR)
2827  || !(s->encoding && (s->intra_only || s->pict_type==AV_PICTURE_TYPE_B) && s->avctx->mb_decision != FF_MB_DECISION_RD)) { //FIXME precalc
2828  uint8_t *dest_y, *dest_cb, *dest_cr;
2829  int dct_linesize, dct_offset;
2830  op_pixels_func (*op_pix)[4];
2831  qpel_mc_func (*op_qpix)[16];
2832  const int linesize = s->current_picture.f->linesize[0]; //not s->linesize as this would be wrong for field pics
2833  const int uvlinesize = s->current_picture.f->linesize[1];
2834  const int readable= s->pict_type != AV_PICTURE_TYPE_B || s->encoding || s->avctx->draw_horiz_band || lowres_flag;
2835  const int block_size= lowres_flag ? 8>>s->avctx->lowres : 8;
2836 
2837  /* avoid copy if macroblock skipped in last frame too */
2838  /* skip only during decoding as we might trash the buffers during encoding a bit */
2839  if(!s->encoding){
2840  uint8_t *mbskip_ptr = &s->mbskip_table[mb_xy];
2841 
2842  if (s->mb_skipped) {
2843  s->mb_skipped= 0;
2845  *mbskip_ptr = 1;
2846  } else if(!s->current_picture.reference) {
2847  *mbskip_ptr = 1;
2848  } else{
2849  *mbskip_ptr = 0; /* not skipped */
2850  }
2851  }
2852 
2853  dct_linesize = linesize << s->interlaced_dct;
2854  dct_offset = s->interlaced_dct ? linesize : linesize * block_size;
2855 
2856  if(readable){
2857  dest_y= s->dest[0];
2858  dest_cb= s->dest[1];
2859  dest_cr= s->dest[2];
2860  }else{
2861  dest_y = s->b_scratchpad;
2862  dest_cb= s->b_scratchpad+16*linesize;
2863  dest_cr= s->b_scratchpad+32*linesize;
2864  }
2865 
2866  if (!s->mb_intra) {
2867  /* motion handling */
2868  /* decoding or more than one mb_type (MC was already done otherwise) */
2869  if(!s->encoding){
2870 
2871  if(HAVE_THREADS && s->avctx->active_thread_type&FF_THREAD_FRAME) {
2872  if (s->mv_dir & MV_DIR_FORWARD) {
2875  0);
2876  }
2877  if (s->mv_dir & MV_DIR_BACKWARD) {
2880  0);
2881  }
2882  }
2883 
2884  if(lowres_flag){
2886 
2887  if (s->mv_dir & MV_DIR_FORWARD) {
2888  MPV_motion_lowres(s, dest_y, dest_cb, dest_cr, 0, s->last_picture.f->data, op_pix);
2890  }
2891  if (s->mv_dir & MV_DIR_BACKWARD) {
2892  MPV_motion_lowres(s, dest_y, dest_cb, dest_cr, 1, s->next_picture.f->data, op_pix);
2893  }
2894  }else{
2895  op_qpix = s->me.qpel_put;
2896  if ((!s->no_rounding) || s->pict_type==AV_PICTURE_TYPE_B){
2897  op_pix = s->hdsp.put_pixels_tab;
2898  }else{
2899  op_pix = s->hdsp.put_no_rnd_pixels_tab;
2900  }
2901  if (s->mv_dir & MV_DIR_FORWARD) {
2902  ff_MPV_motion(s, dest_y, dest_cb, dest_cr, 0, s->last_picture.f->data, op_pix, op_qpix);
2903  op_pix = s->hdsp.avg_pixels_tab;
2904  op_qpix= s->me.qpel_avg;
2905  }
2906  if (s->mv_dir & MV_DIR_BACKWARD) {
2907  ff_MPV_motion(s, dest_y, dest_cb, dest_cr, 1, s->next_picture.f->data, op_pix, op_qpix);
2908  }
2909  }
2910  }
2911 
2912  /* skip dequant / idct if we are really late ;) */
2913  if(s->avctx->skip_idct){
2916  || s->avctx->skip_idct >= AVDISCARD_ALL)
2917  goto skip_idct;
2918  }
2919 
2920  /* add dct residue */
2922  || (s->codec_id==AV_CODEC_ID_MPEG4 && !s->mpeg_quant))){
2923  add_dequant_dct(s, block[0], 0, dest_y , dct_linesize, s->qscale);
2924  add_dequant_dct(s, block[1], 1, dest_y + block_size, dct_linesize, s->qscale);
2925  add_dequant_dct(s, block[2], 2, dest_y + dct_offset , dct_linesize, s->qscale);
2926  add_dequant_dct(s, block[3], 3, dest_y + dct_offset + block_size, dct_linesize, s->qscale);
2927 
2928  if(!CONFIG_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
2929  if (s->chroma_y_shift){
2930  add_dequant_dct(s, block[4], 4, dest_cb, uvlinesize, s->chroma_qscale);
2931  add_dequant_dct(s, block[5], 5, dest_cr, uvlinesize, s->chroma_qscale);
2932  }else{
2933  dct_linesize >>= 1;
2934  dct_offset >>=1;
2935  add_dequant_dct(s, block[4], 4, dest_cb, dct_linesize, s->chroma_qscale);
2936  add_dequant_dct(s, block[5], 5, dest_cr, dct_linesize, s->chroma_qscale);
2937  add_dequant_dct(s, block[6], 6, dest_cb + dct_offset, dct_linesize, s->chroma_qscale);
2938  add_dequant_dct(s, block[7], 7, dest_cr + dct_offset, dct_linesize, s->chroma_qscale);
2939  }
2940  }
2941  } else if(is_mpeg12 || (s->codec_id != AV_CODEC_ID_WMV2)){
2942  add_dct(s, block[0], 0, dest_y , dct_linesize);
2943  add_dct(s, block[1], 1, dest_y + block_size, dct_linesize);
2944  add_dct(s, block[2], 2, dest_y + dct_offset , dct_linesize);
2945  add_dct(s, block[3], 3, dest_y + dct_offset + block_size, dct_linesize);
2946 
2947  if(!CONFIG_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
2948  if(s->chroma_y_shift){//Chroma420
2949  add_dct(s, block[4], 4, dest_cb, uvlinesize);
2950  add_dct(s, block[5], 5, dest_cr, uvlinesize);
2951  }else{
2952  //chroma422
2953  dct_linesize = uvlinesize << s->interlaced_dct;
2954  dct_offset = s->interlaced_dct ? uvlinesize : uvlinesize*block_size;
2955 
2956  add_dct(s, block[4], 4, dest_cb, dct_linesize);
2957  add_dct(s, block[5], 5, dest_cr, dct_linesize);
2958  add_dct(s, block[6], 6, dest_cb+dct_offset, dct_linesize);
2959  add_dct(s, block[7], 7, dest_cr+dct_offset, dct_linesize);
2960  if(!s->chroma_x_shift){//Chroma444
2961  add_dct(s, block[8], 8, dest_cb+block_size, dct_linesize);
2962  add_dct(s, block[9], 9, dest_cr+block_size, dct_linesize);
2963  add_dct(s, block[10], 10, dest_cb+block_size+dct_offset, dct_linesize);
2964  add_dct(s, block[11], 11, dest_cr+block_size+dct_offset, dct_linesize);
2965  }
2966  }
2967  }//fi gray
2968  }
2969  else if (CONFIG_WMV2_DECODER || CONFIG_WMV2_ENCODER) {
2970  ff_wmv2_add_mb(s, block, dest_y, dest_cb, dest_cr);
2971  }
2972  } else {
2973  /* dct only in intra block */
2975  put_dct(s, block[0], 0, dest_y , dct_linesize, s->qscale);
2976  put_dct(s, block[1], 1, dest_y + block_size, dct_linesize, s->qscale);
2977  put_dct(s, block[2], 2, dest_y + dct_offset , dct_linesize, s->qscale);
2978  put_dct(s, block[3], 3, dest_y + dct_offset + block_size, dct_linesize, s->qscale);
2979 
2980  if(!CONFIG_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
2981  if(s->chroma_y_shift){
2982  put_dct(s, block[4], 4, dest_cb, uvlinesize, s->chroma_qscale);
2983  put_dct(s, block[5], 5, dest_cr, uvlinesize, s->chroma_qscale);
2984  }else{
2985  dct_offset >>=1;
2986  dct_linesize >>=1;
2987  put_dct(s, block[4], 4, dest_cb, dct_linesize, s->chroma_qscale);
2988  put_dct(s, block[5], 5, dest_cr, dct_linesize, s->chroma_qscale);
2989  put_dct(s, block[6], 6, dest_cb + dct_offset, dct_linesize, s->chroma_qscale);
2990  put_dct(s, block[7], 7, dest_cr + dct_offset, dct_linesize, s->chroma_qscale);
2991  }
2992  }
2993  }else{
2994  s->dsp.idct_put(dest_y , dct_linesize, block[0]);
2995  s->dsp.idct_put(dest_y + block_size, dct_linesize, block[1]);
2996  s->dsp.idct_put(dest_y + dct_offset , dct_linesize, block[2]);
2997  s->dsp.idct_put(dest_y + dct_offset + block_size, dct_linesize, block[3]);
2998 
2999  if(!CONFIG_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
3000  if(s->chroma_y_shift){
3001  s->dsp.idct_put(dest_cb, uvlinesize, block[4]);
3002  s->dsp.idct_put(dest_cr, uvlinesize, block[5]);
3003  }else{
3004 
3005  dct_linesize = uvlinesize << s->interlaced_dct;
3006  dct_offset = s->interlaced_dct ? uvlinesize : uvlinesize*block_size;
3007 
3008  s->dsp.idct_put(dest_cb, dct_linesize, block[4]);
3009  s->dsp.idct_put(dest_cr, dct_linesize, block[5]);
3010  s->dsp.idct_put(dest_cb + dct_offset, dct_linesize, block[6]);
3011  s->dsp.idct_put(dest_cr + dct_offset, dct_linesize, block[7]);
3012  if(!s->chroma_x_shift){//Chroma444
3013  s->dsp.idct_put(dest_cb + block_size, dct_linesize, block[8]);
3014  s->dsp.idct_put(dest_cr + block_size, dct_linesize, block[9]);
3015  s->dsp.idct_put(dest_cb + block_size + dct_offset, dct_linesize, block[10]);
3016  s->dsp.idct_put(dest_cr + block_size + dct_offset, dct_linesize, block[11]);
3017  }
3018  }
3019  }//gray
3020  }
3021  }
3022 skip_idct:
3023  if(!readable){
3024  s->hdsp.put_pixels_tab[0][0](s->dest[0], dest_y , linesize,16);
3025  s->hdsp.put_pixels_tab[s->chroma_x_shift][0](s->dest[1], dest_cb, uvlinesize,16 >> s->chroma_y_shift);
3026  s->hdsp.put_pixels_tab[s->chroma_x_shift][0](s->dest[2], dest_cr, uvlinesize,16 >> s->chroma_y_shift);
3027  }
3028  }
3029 }
3030 
3031 void ff_MPV_decode_mb(MpegEncContext *s, int16_t block[12][64]){
3032 #if !CONFIG_SMALL
3033  if(s->out_format == FMT_MPEG1) {
3034  if(s->avctx->lowres) MPV_decode_mb_internal(s, block, 1, 1);
3035  else MPV_decode_mb_internal(s, block, 0, 1);
3036  } else
3037 #endif
3038  if(s->avctx->lowres) MPV_decode_mb_internal(s, block, 1, 0);
3039  else MPV_decode_mb_internal(s, block, 0, 0);
3040 }
3041 
3043 {
3045  s->last_picture_ptr ? s->last_picture_ptr->f : NULL, y, h, s->picture_structure,
3046  s->first_field, s->low_delay);
3047 }
3048 
3049 void ff_init_block_index(MpegEncContext *s){ //FIXME maybe rename
3050  const int linesize = s->current_picture.f->linesize[0]; //not s->linesize as this would be wrong for field pics
3051  const int uvlinesize = s->current_picture.f->linesize[1];
3052  const int mb_size= 4 - s->avctx->lowres;
3053 
3054  s->block_index[0]= s->b8_stride*(s->mb_y*2 ) - 2 + s->mb_x*2;
3055  s->block_index[1]= s->b8_stride*(s->mb_y*2 ) - 1 + s->mb_x*2;
3056  s->block_index[2]= s->b8_stride*(s->mb_y*2 + 1) - 2 + s->mb_x*2;
3057  s->block_index[3]= s->b8_stride*(s->mb_y*2 + 1) - 1 + s->mb_x*2;
3058  s->block_index[4]= s->mb_stride*(s->mb_y + 1) + s->b8_stride*s->mb_height*2 + s->mb_x - 1;
3059  s->block_index[5]= s->mb_stride*(s->mb_y + s->mb_height + 2) + s->b8_stride*s->mb_height*2 + s->mb_x - 1;
3060  //block_index is not used by mpeg2, so it is not affected by chroma_format
3061 
3062  s->dest[0] = s->current_picture.f->data[0] + ((s->mb_x - 1) << mb_size);
3063  s->dest[1] = s->current_picture.f->data[1] + ((s->mb_x - 1) << (mb_size - s->chroma_x_shift));
3064  s->dest[2] = s->current_picture.f->data[2] + ((s->mb_x - 1) << (mb_size - s->chroma_x_shift));
3065 
3067  {
3068  if(s->picture_structure==PICT_FRAME){
3069  s->dest[0] += s->mb_y * linesize << mb_size;
3070  s->dest[1] += s->mb_y * uvlinesize << (mb_size - s->chroma_y_shift);
3071  s->dest[2] += s->mb_y * uvlinesize << (mb_size - s->chroma_y_shift);
3072  }else{
3073  s->dest[0] += (s->mb_y>>1) * linesize << mb_size;
3074  s->dest[1] += (s->mb_y>>1) * uvlinesize << (mb_size - s->chroma_y_shift);
3075  s->dest[2] += (s->mb_y>>1) * uvlinesize << (mb_size - s->chroma_y_shift);
3077  }
3078  }
3079 }
3080 
3081 /**
3082  * Permute an 8x8 block.
3083  * @param block the block which will be permuted according to the given permutation vector
3084  * @param permutation the permutation vector
3085  * @param last the last non zero coefficient in scantable order, used to speed the permutation up
3086  * @param scantable the used scantable, this is only used to speed the permutation up, the block is not
3087  * (inverse) permutated to scantable order!
3088  */
3089 void ff_block_permute(int16_t *block, uint8_t *permutation, const uint8_t *scantable, int last)
3090 {
3091  int i;
3092  int16_t temp[64];
3093 
3094  if(last<=0) return;
3095  //if(permutation[1]==1) return; //FIXME it is ok but not clean and might fail for some permutations
3096 
3097  for(i=0; i<=last; i++){
3098  const int j= scantable[i];
3099  temp[j]= block[j];
3100  block[j]=0;
3101  }
3102 
3103  for(i=0; i<=last; i++){
3104  const int j= scantable[i];
3105  const int perm_j= permutation[j];
3106  block[perm_j]= temp[j];
3107  }
3108 }
3109 
3111  int i;
3112  MpegEncContext *s = avctx->priv_data;
3113 
3114  if(s==NULL || s->picture==NULL)
3115  return;
3116 
3117  for (i = 0; i < MAX_PICTURE_COUNT; i++)
3118  ff_mpeg_unref_picture(s, &s->picture[i]);
3120 
3124 
3125  s->mb_x= s->mb_y= 0;
3126  s->closed_gop= 0;
3127 
3128  s->parse_context.state= -1;
3130  s->parse_context.overread= 0;
3132  s->parse_context.index= 0;
3133  s->parse_context.last_index= 0;
3134  s->bitstream_buffer_size=0;
3135  s->pp_time=0;
3136 }
3137 
3138 /**
3139  * set qscale and update qscale dependent variables.
3140  */
3141 void ff_set_qscale(MpegEncContext * s, int qscale)
3142 {
3143  if (qscale < 1)
3144  qscale = 1;
3145  else if (qscale > 31)
3146  qscale = 31;
3147 
3148  s->qscale = qscale;
3149  s->chroma_qscale= s->chroma_qscale_table[qscale];
3150 
3151  s->y_dc_scale= s->y_dc_scale_table[ qscale ];
3153 }
3154 
3156 {
3159 }
3160 
3161 #if CONFIG_ERROR_RESILIENCE
3163 {
3164  int i;
3165 
3166  memset(dst, 0, sizeof(*dst));
3167  if (!src)
3168  return;
3169 
3170  dst->f = src->f;
3171  dst->tf = &src->tf;
3172 
3173  for (i = 0; i < 2; i++) {
3174  dst->motion_val[i] = src->motion_val[i];
3175  dst->ref_index[i] = src->ref_index[i];
3176  }
3177 
3178  dst->mb_type = src->mb_type;
3179  dst->field_picture = src->field_picture;
3180 }
3181 
3183 {
3184  ERContext *er = &s->er;
3185 
3189 
3190  er->pp_time = s->pp_time;
3191  er->pb_time = s->pb_time;
3192  er->quarter_sample = s->quarter_sample;
3194 
3195  ff_er_frame_start(er);
3196 }
3197 #endif /* CONFIG_ERROR_RESILIENCE */