1 /*
2 * Copyright (c) 2000,2001 Fabrice Bellard
3 * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
4 *
5 * 4MV & hq & B-frame encoding stuff by Michael Niedermayer <michaelni@gmx.at>
6 *
7 * This file is part of FFmpeg.
8 *
9 * FFmpeg is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
13 *
14 * FFmpeg is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
18 *
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with FFmpeg; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22 */
23
24 #include <string.h>
25
36
40 {
42 int src_x, src_y, motion_x, motion_y;
44 int emu = 0;
45
52 src_x = av_clip(src_x, -16, s->
width);
53 if (src_x == s->
width)
54 motion_x = 0;
55 src_y = av_clip(src_y, -16, s->
height);
57 motion_y = 0;
58
61
62 ptr = ref_picture[0] + src_y * linesize + src_x;
63
67 linesize, linesize,
68 17, 17,
69 src_x, src_y,
72 }
73
74 if ((motion_x | motion_y) & 7) {
75 s->
mdsp.
gmc1(dest_y, ptr, linesize, 16,
76 motion_x & 15, motion_y & 15, 128 - s->
no_rounding);
77 s->
mdsp.
gmc1(dest_y + 8, ptr + 8, linesize, 16,
78 motion_x & 15, motion_y & 15, 128 - s->
no_rounding);
79 } else {
80 int dxy;
81
82 dxy = ((motion_x >> 3) & 1) | ((motion_y >> 2) & 2);
85 } else {
87 }
88 }
89
91 return;
92
99 src_x = av_clip(src_x, -8, s->
width >> 1);
100 if (src_x == s->
width >> 1)
101 motion_x = 0;
102 src_y = av_clip(src_y, -8, s->
height >> 1);
103 if (src_y == s->
height >> 1)
104 motion_y = 0;
105
107 ptr = ref_picture[1] +
offset;
111 uvlinesize, uvlinesize,
112 9, 9,
113 src_x, src_y,
116 emu = 1;
117 }
118 s->
mdsp.
gmc1(dest_cb, ptr, uvlinesize, 8,
119 motion_x & 15, motion_y & 15, 128 - s->
no_rounding);
120
121 ptr = ref_picture[2] +
offset;
122 if (emu) {
124 uvlinesize, uvlinesize,
125 9, 9,
126 src_x, src_y,
129 }
130 s->
mdsp.
gmc1(dest_cr, ptr, uvlinesize, 8,
131 motion_x & 15, motion_y & 15, 128 - s->
no_rounding);
132 }
133
137 {
141 int ox, oy;
142
145
146 ptr = ref_picture[0];
147
152
153 s->
mdsp.
gmc(dest_y, ptr, linesize, 16,
154 ox, oy,
159 s->
mdsp.
gmc(dest_y + 8, ptr, linesize, 16,
166
168 return;
169
174
175 ptr = ref_picture[1];
176 s->
mdsp.
gmc(dest_cb, ptr, uvlinesize, 8,
177 ox, oy,
182
183 ptr = ref_picture[2];
184 s->
mdsp.
gmc(dest_cr, ptr, uvlinesize, 8,
185 ox, oy,
190 }
191
194 int src_x, int src_y,
196 int motion_x, int motion_y)
197 {
198 int dxy = 0;
199 int emu = 0;
200
201 src_x += motion_x >> 1;
202 src_y += motion_y >> 1;
203
204 /* WARNING: do no forget half pels */
205 src_x = av_clip(src_x, -16, s->
width);
// FIXME unneeded for emu?
206 if (src_x != s->
width)
207 dxy |= motion_x & 1;
208 src_y = av_clip(src_y, -16, s->
height);
210 dxy |= (motion_y & 1) << 1;
212
217 9, 9,
218 src_x, src_y,
221 emu = 1;
222 }
224 return emu;
225 }
226
232 int field_based,
233 int bottom_field,
237 int motion_x,
238 int motion_y,
239 int h,
240 int is_mpeg12,
242 {
243 uint8_t *ptr_y, *ptr_cb, *ptr_cr;
244 int dxy, uvdxy, mx, my, src_x, src_y,
247
248 #if 0
250 motion_x >>= 1;
251 motion_y >>= 1;
252 }
253 #endif
254
258
259 dxy = ((motion_y & 1) << 1) | (motion_x & 1);
260 src_x = s->
mb_x * 16 + (motion_x >> 1);
261 src_y = (mb_y << (4 - field_based)) + (motion_y >> 1);
262
265 mx = (motion_x >> 1) | (motion_x & 1);
266 my = motion_y >> 1;
267 uvdxy = ((my & 1) << 1) | (mx & 1);
268 uvsrc_x = s->
mb_x * 8 + (mx >> 1);
269 uvsrc_y = (mb_y << (3 - field_based)) + (my >> 1);
270 } else {
271 uvdxy = dxy | (motion_y & 2) | ((motion_x & 2) >> 1);
272 uvsrc_x = src_x >> 1;
273 uvsrc_y = src_y >> 1;
274 }
275 // Even chroma mv's are full pel in H261
277 mx = motion_x / 4;
278 my = motion_y / 4;
279 uvdxy = 0;
280 uvsrc_x = s->
mb_x * 8 + mx;
281 uvsrc_y = mb_y * 8 + my;
282 } else {
284 mx = motion_x / 2;
285 my = motion_y / 2;
286 uvdxy = ((my & 1) << 1) | (mx & 1);
287 uvsrc_x = s->
mb_x * 8 + (mx >> 1);
288 uvsrc_y = (mb_y << (3 - field_based)) + (my >> 1);
289 } else {
291 // Chroma422
292 mx = motion_x / 2;
293 uvdxy = ((motion_y & 1) << 1) | (mx & 1);
294 uvsrc_x = s->
mb_x * 8 + (mx >> 1);
295 uvsrc_y = src_y;
296 } else {
297 // Chroma444
298 uvdxy = dxy;
299 uvsrc_x = src_x;
300 uvsrc_y = src_y;
301 }
302 }
303 }
304
305 ptr_y = ref_picture[0] + src_y * linesize + src_x;
306 ptr_cb = ref_picture[1] + uvsrc_y * uvlinesize + uvsrc_x;
307 ptr_cr = ref_picture[2] + uvsrc_y * uvlinesize + uvsrc_x;
308
310 (unsigned)src_y >
FFMAX( v_edge_pos - (motion_y & 1) - h , 0)) {
311 if (is_mpeg12 ||
315 "MPEG motion vector out of boundary (%d %d)\n", src_x,
316 src_y);
317 return;
318 }
321 17, 17 + field_based,
322 src_x, src_y << field_based,
330 9, 9 + field_based,
331 uvsrc_x, uvsrc_y << field_based,
335 9, 9 + field_based,
336 uvsrc_x, uvsrc_y << field_based,
338 ptr_cb = ubuf;
339 ptr_cr = vbuf;
340 }
341 }
342
343 /* FIXME use this for field pix too instead of the obnoxious hack which
344 * changes picture.data */
345 if (bottom_field) {
349 }
350
351 if (field_select) {
355 }
356
357 pix_op[0][dxy](dest_y, ptr_y,
linesize, h);
358
364 }
365 if (!is_mpeg12 && (CONFIG_H261_ENCODER || CONFIG_H261_DECODER) &&
368 }
369 }
370 /* apply one mpeg motion vector to the three components */
373 int field_select,
uint8_t **ref_picture,
375 int motion_x,
int motion_y,
int h,
int mb_y)
376 {
377 #if !CONFIG_SMALL
380 field_select, ref_picture, pix_op,
381 motion_x, motion_y, h, 1, mb_y);
382 else
383 #endif
385 field_select, ref_picture, pix_op,
386 motion_x, motion_y, h, 0, mb_y);
387 }
388
391 int bottom_field, int field_select,
394 int motion_x,
int motion_y,
int h,
int mb_y)
395 {
396 #if !CONFIG_SMALL
399 bottom_field, field_select, ref_picture, pix_op,
400 motion_x, motion_y, h, 1, mb_y);
401 else
402 #endif
404 bottom_field, field_select, ref_picture, pix_op,
405 motion_x, motion_y, h, 0, mb_y);
406 }
407
408 // FIXME: SIMDify, avg variant, 16x16 version
410 {
411 int x;
416 uint8_t *
const bottom = src[4];
417 #define OBMC_FILTER(x, t, l, m, r, b)\
418 dst[x]= (t*top[x] + l*left[x] + m*mid[x] + r*right[x] + b*bottom[x] + 4)>>3
419 #define OBMC_FILTER4(x, t, l, m, r, b)\
420 OBMC_FILTER(x , t, l, m, r, b);\
421 OBMC_FILTER(x+1 , t, l, m, r, b);\
422 OBMC_FILTER(x +stride, t, l, m, r, b);\
423 OBMC_FILTER(x+1+stride, t, l, m, r, b);
424
425 x = 0;
432 x += stride;
437 x += stride;
442 x += 2 * stride;
447 x += 2*stride;
454 x += stride;
459 }
460
461 /* obmc for 1 8x8 luma block */
464 int src_x, int src_y,
466 int16_t
mv[5][2]
/* mid top left right bottom */)
467 #define MID 0
468 {
469 int i;
471
473
474 for (i = 0; i < 5; i++) {
475 if (i && mv[i][0] == mv[
MID][0] && mv[i][1] == mv[
MID][1]) {
476 ptr[i] = ptr[MID];
477 } else {
481 mv[i][0], mv[i][1]);
482 }
483 }
484
486 }
487
492 int field_based, int bottom_field,
493 int field_select,
uint8_t **ref_picture,
496 int motion_x, int motion_y, int h)
497 {
498 uint8_t *ptr_y, *ptr_cb, *ptr_cr;
499 int dxy, uvdxy, mx, my, src_x, src_y, uvsrc_x, uvsrc_y,
v_edge_pos;
501
502 dxy = ((motion_y & 3) << 2) | (motion_x & 3);
503
504 src_x = s->
mb_x * 16 + (motion_x >> 2);
505 src_y = s->
mb_y * (16 >> field_based) + (motion_y >> 2);
506
508 linesize = s->
linesize << field_based;
510
511 if (field_based) {
512 mx = motion_x / 2;
513 my = motion_y >> 1;
515 static const int rtab[8] = { 0, 0, 1, 1, 0, 0, 0, 1 };
516 mx = (motion_x >> 1) + rtab[motion_x & 7];
517 my = (motion_y >> 1) + rtab[motion_y & 7];
519 mx = (motion_x >> 1) | (motion_x & 1);
520 my = (motion_y >> 1) | (motion_y & 1);
521 } else {
522 mx = motion_x / 2;
523 my = motion_y / 2;
524 }
525 mx = (mx >> 1) | (mx & 1);
526 my = (my >> 1) | (my & 1);
527
528 uvdxy = (mx & 1) | ((my & 1) << 1);
529 mx >>= 1;
530 my >>= 1;
531
532 uvsrc_x = s->
mb_x * 8 + mx;
533 uvsrc_y = s->
mb_y * (8 >> field_based) + my;
534
535 ptr_y = ref_picture[0] + src_y * linesize + src_x;
536 ptr_cb = ref_picture[1] + uvsrc_y * uvlinesize + uvsrc_x;
537 ptr_cr = ref_picture[2] + uvsrc_y * uvlinesize + uvsrc_x;
538
540 (unsigned)src_y >
FFMAX( v_edge_pos - (motion_y & 3) - h, 0)) {
543 17, 17 + field_based,
544 src_x, src_y << field_based,
552 9, 9 + field_based,
553 uvsrc_x, uvsrc_y << field_based,
557 9, 9 + field_based,
558 uvsrc_x, uvsrc_y << field_based,
560 ptr_cb = ubuf;
561 ptr_cr = vbuf;
562 }
563 }
564
565 if (!field_based)
566 qpix_op[0][dxy](dest_y, ptr_y,
linesize);
567 else {
568 if (bottom_field) {
572 }
573
574 if (field_select) {
578 }
579 // damn interlaced mode
580 // FIXME boundary mirroring is not exactly correct here
581 qpix_op[1][dxy](dest_y, ptr_y,
linesize);
582 qpix_op[1][dxy](dest_y + 8, ptr_y + 8,
linesize);
583 }
585 pix_op[1][uvdxy](dest_cr, ptr_cr,
uvlinesize, h >> 1);
586 pix_op[1][uvdxy](dest_cb, ptr_cb,
uvlinesize, h >> 1);
587 }
588 }
589
590 /**
591 * h263 chroma 4mv motion compensation.
592 */
597 int mx, int my)
598 {
600 int src_x, src_y, dxy, emu = 0;
602
603 /* In case of 8X8, we construct a single chroma motion vector
604 * with a special rounding */
607
608 dxy = ((my & 1) << 1) | (mx & 1);
609 mx >>= 1;
610 my >>= 1;
611
612 src_x = s->
mb_x * 8 + mx;
613 src_y = s->
mb_y * 8 + my;
614 src_x = av_clip(src_x, -8, (s->
width >> 1));
615 if (src_x == (s->
width >> 1))
616 dxy &= ~1;
617 src_y = av_clip(src_y, -8, (s->
height >> 1));
618 if (src_y == (s->
height >> 1))
619 dxy &= ~2;
620
622 ptr = ref_picture[1] +
offset;
623 if ((
unsigned)src_x >
FFMAX((s->
h_edge_pos >> 1) - (dxy & 1) - 8, 0) ||
627 9, 9, src_x, src_y,
630 emu = 1;
631 }
633
634 ptr = ref_picture[2] +
offset;
635 if (emu) {
638 9, 9, src_x, src_y,
641 }
643 }
644
646 {
647 /* fetch pixels for estimated mv 4 macroblocks ahead
648 * optimized for 64byte cache lines */
650 const int mx = (s->
mv[dir][0][0] >>
shift) + 16 * s->
mb_x + 8;
651 const int my = (s->
mv[dir][0][1] >> shift) + 16 * s->
mb_y;
652 int off = mx + (my + (s->
mb_x & 3) * 4) * s->
linesize + 64;
653
655 off = (mx >> 1) + ((my >> 1) + (s->
mb_x & 7)) * s->
uvlinesize + 64;
657 }
658
665 {
670 const int xy = mb_x + mb_y * s->
mb_stride;
672 const int mot_xy = mb_x * 2 + mb_y * 2 * mot_stride;
673 int mx, my, i;
674
676
679
681 cur_frame->
motion_val[0][mot_xy + mot_stride]);
683 cur_frame->
motion_val[0][mot_xy + mot_stride + 1]);
684
686 cur_frame->
motion_val[0][mot_xy + mot_stride]);
688 cur_frame->
motion_val[0][mot_xy + mot_stride + 1]);
689
691 AV_COPY32(mv_cache[0][1], mv_cache[1][1]);
692 AV_COPY32(mv_cache[0][2], mv_cache[1][2]);
693 } else {
695 cur_frame->
motion_val[0][mot_xy - mot_stride]);
697 cur_frame->
motion_val[0][mot_xy - mot_stride + 1]);
698 }
699
701 AV_COPY32(mv_cache[1][0], mv_cache[1][1]);
702 AV_COPY32(mv_cache[2][0], mv_cache[2][1]);
703 } else {
706 cur_frame->
motion_val[0][mot_xy - 1 + mot_stride]);
707 }
708
710 AV_COPY32(mv_cache[1][3], mv_cache[1][2]);
711 AV_COPY32(mv_cache[2][3], mv_cache[2][2]);
712 } else {
715 cur_frame->
motion_val[0][mot_xy + 2 + mot_stride]);
716 }
717
718 mx = 0;
719 my = 0;
720 for (i = 0; i < 4; i++) {
721 const int x = (i & 1) + 1;
722 const int y = (i >> 1) + 1;
723 int16_t mv[5][2] = {
724 { mv_cache[
y][x][0], mv_cache[
y][x][1] },
725 { mv_cache[y - 1][x][0], mv_cache[y - 1][x][1] },
726 { mv_cache[
y][x - 1][0], mv_cache[
y][x - 1][1] },
727 { mv_cache[
y][x + 1][0], mv_cache[
y][x + 1][1] },
728 { mv_cache[y + 1][x][0], mv_cache[y + 1][x][1] }
729 };
730 // FIXME cleanup
732 ref_picture[0],
733 mb_x * 16 + (i & 1) * 8, mb_y * 16 + (i >> 1) * 8,
734 pix_op[1],
735 mv);
736
737 mx += mv[0][0];
738 my += mv[0][1];
739 }
742 ref_picture, pix_op[1],
743 mx, my);
744 }
745
750 int dir,
754 {
755 int dxy, mx, my, src_x, src_y;
756 int i;
760
761 mx = 0;
762 my = 0;
764 for (i = 0; i < 4; i++) {
765 int motion_x = s->
mv[dir][i][0];
766 int motion_y = s->
mv[dir][i][1];
767
768 dxy = ((motion_y & 3) << 2) | (motion_x & 3);
769 src_x = mb_x * 16 + (motion_x >> 2) + (i & 1) * 8;
770 src_y = mb_y * 16 + (motion_y >> 2) + (i >> 1) * 8;
771
772 /* WARNING: do no forget half pels */
773 src_x = av_clip(src_x, -16, s->
width);
774 if (src_x == s->
width)
775 dxy &= ~3;
776 src_y = av_clip(src_y, -16, s->
height);
778 dxy &= ~12;
779
780 ptr = ref_picture[0] + (src_y * s->
linesize) + (src_x);
785 9, 9,
786 src_x, src_y,
790 }
791 dest = dest_y + ((i & 1) * 8) + (i >> 1) * 8 * s->
linesize;
792 qpix_op[1][dxy](dest, ptr, s->
linesize);
793
794 mx += s->
mv[dir][i][0] / 2;
795 my += s->
mv[dir][i][1] / 2;
796 }
797 } else {
798 for (i = 0; i < 4; i++) {
800 dest_y + ((i & 1) * 8) + (i >> 1) * 8 * s->
linesize,
801 ref_picture[0],
802 mb_x * 16 + (i & 1) * 8,
803 mb_y * 16 + (i >> 1) * 8,
804 pix_op[1],
807
808 mx += s->
mv[dir][i][0];
809 my += s->
mv[dir][i][1];
810 }
811 }
812
815 ref_picture, pix_op[1], mx, my);
816 }
817
818 /**
819 * motion compensation of a single macroblock
820 * @param s context
821 * @param dest_y luma destination pointer
822 * @param dest_cb chroma cb/u destination pointer
823 * @param dest_cr chroma cr/v destination pointer
824 * @param dir direction (0->forward, 1->backward)
825 * @param ref_picture array[3] of pointers to the 3 planes of the reference picture
826 * @param pix_op halfpel motion compensation function (average or put normally)
827 * @param qpix_op qpel motion compensation function (average or put normally)
828 * the motion vectors are taken from s->mv and the MV type from s->mv_type
829 */
834 int dir,
838 int is_mpeg12)
839 {
840 int i;
842
844
846 apply_obmc(s, dest_y, dest_cb, dest_cr, ref_picture, pix_op);
847 return;
848 }
849
855 ref_picture);
856 } else {
858 ref_picture);
859 }
862 0, 0, 0,
863 ref_picture, pix_op, qpix_op,
864 s->
mv[dir][0][0], s->
mv[dir][0][1], 16);
865 } else if (!is_mpeg12 && (CONFIG_WMV2_DECODER || CONFIG_WMV2_ENCODER) &&
868 ref_picture, pix_op,
869 s->
mv[dir][0][0], s->
mv[dir][0][1], 16);
870 } else {
872 ref_picture, pix_op,
873 s->
mv[dir][0][0], s->
mv[dir][0][1], 16, mb_y);
874 }
875 break;
877 if (!is_mpeg12)
879 dir, ref_picture, qpix_op, pix_op);
880 break;
884 for (i = 0; i < 2; i++)
887 ref_picture, pix_op, qpix_op,
888 s->
mv[dir][i][0], s->
mv[dir][i][1], 8);
889 } else {
890 /* top field */
893 ref_picture, pix_op,
894 s->
mv[dir][0][0], s->
mv[dir][0][1], 8, mb_y);
895 /* bottom field */
898 ref_picture, pix_op,
899 s->
mv[dir][1][0], s->
mv[dir][1][1], 8, mb_y);
900 }
901 } else {
903 || !ref_picture[0]) {
905 }
906
909 ref_picture, pix_op,
910 s->
mv[dir][0][0], s->
mv[dir][0][1], 16, mb_y >> 1);
911 }
912 break;
914 for (i = 0; i < 2; i++) {
916
919 ref2picture = ref_picture;
920 } else {
922 }
923
926 ref2picture, pix_op,
927 s->
mv[dir][i][0], s->
mv[dir][i][1] + 16 * i,
928 8, mb_y >> 1);
929
933 }
934 break;
937 for (i = 0; i < 2; i++) {
938 int j;
939 for (j = 0; j < 2; j++)
941 j, j ^ i, ref_picture, pix_op,
942 s->
mv[dir][2 * i + j][0],
943 s->
mv[dir][2 * i + j][1], 8, mb_y);
945 }
946 } else {
947 if (!ref_picture[0]) {
949 }
950 for (i = 0; i < 2; i++) {
953 ref_picture, pix_op,
954 s->
mv[dir][2 * i][0], s->
mv[dir][2 * i][1],
955 16, mb_y >> 1);
956
957 // after put we make avg of the same block
959
960 /* opposite parity is always in the same frame if this is
961 * second field */
964 }
965 }
966 }
967 break;
969 }
970 }
971
978 {
979 #if !CONFIG_SMALL
982 ref_picture, pix_op, qpix_op, 1);
983 else
984 #endif
986 ref_picture, pix_op, qpix_op, 0);
987 }