gst/deinterlace/tvtime/vfir.c

   1 /*
   2  *
   3  * GStreamer
   4  * Copyright (C) 2004 Billy Biggs <vektor@dumbterm.net>
   5  * Copyright (c) 2001, 2002, 2003 Fabrice Bellard.
   6  * Copyright (C) 2008,2010 Sebastian Dröge <slomo@collabora.co.uk>
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Library General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Library General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Library General Public
  19  * License along with this library; if not, write to the
  20  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  21  * Boston, MA 02111-1307, USA.
  22  */
  23
  24 /*
  25  * This file contains code from ffmpeg, see http://ffmpeg.org/ (LGPL)
  26  * and modifications by Billy Biggs.
  27  *
  28  * Relicensed for GStreamer from GPL to LGPL with permit from Billy Biggs.
  29  * See: http://bugzilla.gnome.org/show_bug.cgi?id=163578
  30  */
  31
  32 #ifdef HAVE_CONFIG_H
  33 # include "config.h"
  34 #endif
  35
  36 #include "gstdeinterlacemethod.h"
  37 #include <string.h>
  38 #ifdef HAVE_ORC
  39 #include <orc/orc.h>
  40 #endif
  41 #include "tvtime.h"
  42
  43 #define GST_TYPE_DEINTERLACE_METHOD_VFIR        (gst_deinterlace_method_vfir_get_type ())
  44 #define GST_IS_DEINTERLACE_METHOD_VFIR(obj)             (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GST_TYPE_DEINTERLACE_METHOD_VFIR))
  45 #define GST_IS_DEINTERLACE_METHOD_VFIR_CLASS(klass)     (G_TYPE_CHECK_CLASS_TYPE ((klass), GST_TYPE_DEINTERLACE_METHOD_VFIR))
  46 #define GST_DEINTERLACE_METHOD_VFIR_GET_CLASS(obj)      (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_DEINTERLACE_METHOD_VFIR, GstDeinterlaceMethodVFIRClass))
  47 #define GST_DEINTERLACE_METHOD_VFIR(obj)                (G_TYPE_CHECK_INSTANCE_CAST ((obj), GST_TYPE_DEINTERLACE_METHOD_VFIR, GstDeinterlaceMethodVFIR))
  48 #define GST_DEINTERLACE_METHOD_VFIR_CLASS(klass)        (G_TYPE_CHECK_CLASS_CAST ((klass), GST_TYPE_DEINTERLACE_METHOD_VFIR, GstDeinterlaceMethodVFIRClass))
  49 #define GST_DEINTERLACE_METHOD_VFIR_CAST(obj)   ((GstDeinterlaceMethodVFIR*)(obj))
  50
  51 GType gst_deinterlace_method_vfir_get_type (void);
  52
  53 typedef GstDeinterlaceSimpleMethod GstDeinterlaceMethodVFIR;
  54
  55 typedef GstDeinterlaceSimpleMethodClass GstDeinterlaceMethodVFIRClass;
  56
  57 /*
  58  * The MPEG2 spec uses a slightly harsher filter, they specify
  59  * [-1 8 2 8 -1].  ffmpeg uses a similar filter but with more of
  60  * a tendancy to blur than to use the local information.  The
  61  * filter taps here are: [-1 4 2 4 -1].
  62  */
  63
  64  /*
  65   * C implementation.
  66   */
  67 static inline void
  68 deinterlace_c (guint8 * dst, const guint8 * lum_m4, const guint8 * lum_m3,
  69     const guint8 * lum_m2, const guint8 * lum_m1, const guint8 * lum, gint size)
  70 {
  71   if (lum_m2 == NULL) {
  72     deinterlace_line_linear (dst, lum_m1, lum_m3, size);
  73   } else {
  74     deinterlace_line_vfir (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
  75   }
  76 }
  77
  78 static void
  79 deinterlace_line_packed_c (GstDeinterlaceSimpleMethod * self, guint8 * dst,
  80     const GstDeinterlaceScanlineData * scanlines)
  81 {
  82   const guint8 *lum_m4 = scanlines->tt1;
  83   const guint8 *lum_m3 = scanlines->t0;
  84   const guint8 *lum_m2 = scanlines->m1;
  85   const guint8 *lum_m1 = scanlines->b0;
  86   const guint8 *lum = scanlines->bb1;
  87   gint size = self->parent.row_stride[0];
  88
  89   deinterlace_c (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
  90 }
  91
  92 static void
  93 deinterlace_line_planar_y_c (GstDeinterlaceSimpleMethod * self, guint8 * dst,
  94     const GstDeinterlaceScanlineData * scanlines)
  95 {
  96   const guint8 *lum_m4 = scanlines->tt1;
  97   const guint8 *lum_m3 = scanlines->t0;
  98   const guint8 *lum_m2 = scanlines->m1;
  99   const guint8 *lum_m1 = scanlines->b0;
 100   const guint8 *lum = scanlines->bb1;
 101   gint size = self->parent.row_stride[0];
 102
 103   deinterlace_c (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 104 }
 105
 106 static void
 107 deinterlace_line_planar_u_c (GstDeinterlaceSimpleMethod * self, guint8 * dst,
 108     const GstDeinterlaceScanlineData * scanlines)
 109 {
 110   const guint8 *lum_m4 = scanlines->tt1;
 111   const guint8 *lum_m3 = scanlines->t0;
 112   const guint8 *lum_m2 = scanlines->m1;
 113   const guint8 *lum_m1 = scanlines->b0;
 114   const guint8 *lum = scanlines->bb1;
 115   gint size = self->parent.row_stride[1];
 116
 117   deinterlace_c (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 118 }
 119
 120 static void
 121 deinterlace_line_planar_v_c (GstDeinterlaceSimpleMethod * self, guint8 * dst,
 122     const GstDeinterlaceScanlineData * scanlines)
 123 {
 124   const guint8 *lum_m4 = scanlines->tt1;
 125   const guint8 *lum_m3 = scanlines->t0;
 126   const guint8 *lum_m2 = scanlines->m1;
 127   const guint8 *lum_m1 = scanlines->b0;
 128   const guint8 *lum = scanlines->bb1;
 129   gint size = self->parent.row_stride[2];
 130
 131   deinterlace_c (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 132 }
 133
 134 #undef BUILD_X86_ASM
 135
 136 #ifdef BUILD_X86_ASM
 137 #include "mmx.h"
 138 static void
 139 deinterlace_mmx (guint8 * dst, const guint8 * lum_m4, const guint8 * lum_m3,
 140     const guint8 * lum_m2, const guint8 * lum_m1, const guint8 * lum, gint size)
 141 {
 142   mmx_t rounder;
 143
 144   rounder.uw[0] = 4;
 145   rounder.uw[1] = 4;
 146   rounder.uw[2] = 4;
 147   rounder.uw[3] = 4;
 148   pxor_r2r (mm7, mm7);
 149   movq_m2r (rounder, mm6);
 150
 151   for (; size > 3; size -= 4) {
 152     movd_m2r (*lum_m4, mm0);
 153     movd_m2r (*lum_m3, mm1);
 154     movd_m2r (*lum_m2, mm2);
 155     movd_m2r (*lum_m1, mm3);
 156     movd_m2r (*lum, mm4);
 157     punpcklbw_r2r (mm7, mm0);
 158     punpcklbw_r2r (mm7, mm1);
 159     punpcklbw_r2r (mm7, mm2);
 160     punpcklbw_r2r (mm7, mm3);
 161     punpcklbw_r2r (mm7, mm4);
 162     paddw_r2r (mm3, mm1);
 163     psllw_i2r (1, mm2);
 164     paddw_r2r (mm4, mm0);
 165     psllw_i2r (2, mm1);         // 2
 166     paddw_r2r (mm6, mm2);
 167     paddw_r2r (mm2, mm1);
 168     psubusw_r2r (mm0, mm1);
 169     psrlw_i2r (3, mm1);         // 3
 170     packuswb_r2r (mm7, mm1);
 171     movd_r2m (mm1, *dst);
 172     lum_m4 += 4;
 173     lum_m3 += 4;
 174     lum_m2 += 4;
 175     lum_m1 += 4;
 176     lum += 4;
 177     dst += 4;
 178   }
 179   emms ();
 180
 181   /* Handle odd widths */
 182   if (size > 0)
 183     deinterlace_c (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 184 }
 185
 186 static void
 187 deinterlace_line_packed_mmx (GstDeinterlaceSimpleMethod * self, guint8 * dst,
 188     const GstDeinterlaceScanlineData * scanlines)
 189 {
 190   const guint8 *lum_m4 = scanlines->tt1;
 191   const guint8 *lum_m3 = scanlines->t0;
 192   const guint8 *lum_m2 = scanlines->m1;
 193   const guint8 *lum_m1 = scanlines->b0;
 194   const guint8 *lum = scanlines->bb1;
 195   gint size = self->parent.row_stride[0];
 196
 197   deinterlace_mmx (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 198 }
 199
 200 static void
 201 deinterlace_line_planar_y_mmx (GstDeinterlaceSimpleMethod * self, guint8 * dst,
 202     const GstDeinterlaceScanlineData * scanlines)
 203 {
 204   const guint8 *lum_m4 = scanlines->tt1;
 205   const guint8 *lum_m3 = scanlines->t0;
 206   const guint8 *lum_m2 = scanlines->m1;
 207   const guint8 *lum_m1 = scanlines->b0;
 208   const guint8 *lum = scanlines->bb1;
 209   gint size = self->parent.row_stride[0];
 210
 211   deinterlace_mmx (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 212 }
 213
 214 static void
 215 deinterlace_line_planar_u_mmx (GstDeinterlaceSimpleMethod * self, guint8 * dst,
 216     const GstDeinterlaceScanlineData * scanlines)
 217 {
 218   const guint8 *lum_m4 = scanlines->tt1;
 219   const guint8 *lum_m3 = scanlines->t0;
 220   const guint8 *lum_m2 = scanlines->m1;
 221   const guint8 *lum_m1 = scanlines->b0;
 222   const guint8 *lum = scanlines->bb1;
 223   gint size = self->parent.row_stride[1];
 224
 225   deinterlace_mmx (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 226 }
 227
 228 static void
 229 deinterlace_line_planar_v_mmx (GstDeinterlaceSimpleMethod * self, guint8 * dst,
 230     const GstDeinterlaceScanlineData * scanlines)
 231 {
 232   const guint8 *lum_m4 = scanlines->tt1;
 233   const guint8 *lum_m3 = scanlines->t0;
 234   const guint8 *lum_m2 = scanlines->m1;
 235   const guint8 *lum_m1 = scanlines->b0;
 236   const guint8 *lum = scanlines->bb1;
 237   gint size = self->parent.row_stride[2];
 238
 239   deinterlace_mmx (dst, lum_m4, lum_m3, lum_m2, lum_m1, lum, size);
 240 }
 241 #endif
 242
 243 G_DEFINE_TYPE (GstDeinterlaceMethodVFIR, gst_deinterlace_method_vfir,
 244     GST_TYPE_DEINTERLACE_SIMPLE_METHOD);
 245
 246 static void
 247 gst_deinterlace_method_vfir_class_init (GstDeinterlaceMethodVFIRClass * klass)
 248 {
 249   GstDeinterlaceMethodClass *dim_class = (GstDeinterlaceMethodClass *) klass;
 250   GstDeinterlaceSimpleMethodClass *dism_class =
 251       (GstDeinterlaceSimpleMethodClass *) klass;
 252 #ifdef BUILD_X86_ASM
 253   guint cpu_flags =
 254       orc_target_get_default_flags (orc_target_get_by_name ("mmx"));
 255 #endif
 256
 257   dim_class->fields_required = 2;
 258   dim_class->name = "Blur Vertical";
 259   dim_class->nick = "vfir";
 260   dim_class->latency = 1;
 261
 262 #ifdef BUILD_X86_ASM
 263   if (cpu_flags & ORC_TARGET_MMX_MMX) {
 264     dism_class->interpolate_scanline_ayuv = deinterlace_line_packed_mmx;
 265     dism_class->interpolate_scanline_yuy2 = deinterlace_line_packed_mmx;
 266     dism_class->interpolate_scanline_yvyu = deinterlace_line_packed_mmx;
 267     dism_class->interpolate_scanline_uyvy = deinterlace_line_packed_mmx;
 268     dism_class->interpolate_scanline_nv12 = deinterlace_line_packed_mmx;
 269     dism_class->interpolate_scanline_nv21 = deinterlace_line_packed_mmx;
 270     dism_class->interpolate_scanline_argb = deinterlace_line_packed_mmx;
 271     dism_class->interpolate_scanline_abgr = deinterlace_line_packed_mmx;
 272     dism_class->interpolate_scanline_rgba = deinterlace_line_packed_mmx;
 273     dism_class->interpolate_scanline_bgra = deinterlace_line_packed_mmx;
 274     dism_class->interpolate_scanline_rgb = deinterlace_line_packed_mmx;
 275     dism_class->interpolate_scanline_bgr = deinterlace_line_packed_mmx;
 276     dism_class->interpolate_scanline_planar_y = deinterlace_line_planar_y_mmx;
 277     dism_class->interpolate_scanline_planar_u = deinterlace_line_planar_u_mmx;
 278     dism_class->interpolate_scanline_planar_v = deinterlace_line_planar_v_mmx;
 279   } else {
 280     dism_class->interpolate_scanline_yuy2 = deinterlace_line_packed_c;
 281     dism_class->interpolate_scanline_yvyu = deinterlace_line_packed_c;
 282     dism_class->interpolate_scanline_uyvy = deinterlace_line_packed_c;
 283     dism_class->interpolate_scanline_ayuv = deinterlace_line_packed_c;
 284     dism_class->interpolate_scanline_nv12 = deinterlace_line_packed_c;
 285     dism_class->interpolate_scanline_nv21 = deinterlace_line_packed_c;
 286     dism_class->interpolate_scanline_argb = deinterlace_line_packed_c;
 287     dism_class->interpolate_scanline_abgr = deinterlace_line_packed_c;
 288     dism_class->interpolate_scanline_rgba = deinterlace_line_packed_c;
 289     dism_class->interpolate_scanline_bgra = deinterlace_line_packed_c;
 290     dism_class->interpolate_scanline_rgb = deinterlace_line_packed_c;
 291     dism_class->interpolate_scanline_bgr = deinterlace_line_packed_c;
 292     dism_class->interpolate_scanline_planar_y = deinterlace_line_planar_y_c;
 293     dism_class->interpolate_scanline_planar_u = deinterlace_line_planar_u_c;
 294     dism_class->interpolate_scanline_planar_v = deinterlace_line_planar_v_c;
 295   }
 296 #else
 297   dism_class->interpolate_scanline_ayuv = deinterlace_line_packed_c;
 298   dism_class->interpolate_scanline_yuy2 = deinterlace_line_packed_c;
 299   dism_class->interpolate_scanline_yvyu = deinterlace_line_packed_c;
 300   dism_class->interpolate_scanline_uyvy = deinterlace_line_packed_c;
 301   dism_class->interpolate_scanline_nv12 = deinterlace_line_packed_c;
 302   dism_class->interpolate_scanline_nv21 = deinterlace_line_packed_c;
 303   dism_class->interpolate_scanline_argb = deinterlace_line_packed_c;
 304   dism_class->interpolate_scanline_abgr = deinterlace_line_packed_c;
 305   dism_class->interpolate_scanline_rgba = deinterlace_line_packed_c;
 306   dism_class->interpolate_scanline_bgra = deinterlace_line_packed_c;
 307   dism_class->interpolate_scanline_rgb = deinterlace_line_packed_c;
 308   dism_class->interpolate_scanline_bgr = deinterlace_line_packed_c;
 309   dism_class->interpolate_scanline_planar_y = deinterlace_line_planar_y_c;
 310   dism_class->interpolate_scanline_planar_u = deinterlace_line_planar_u_c;
 311   dism_class->interpolate_scanline_planar_v = deinterlace_line_planar_v_c;
 312 #endif
 313 }
 314
 315 static void
 316 gst_deinterlace_method_vfir_init (GstDeinterlaceMethodVFIR * self)
 317 {
 318 }