geometrictransform: new filter "tunnel"

Ports gleffects "tunnel" filter to geometrictransform.
Do nothing in a circle around the center and zoom outside.

https://bugzilla.gnome.org/show_bug.cgi?id=625722

gst/geometrictransform/Makefile.am

@@ -13,7 +13,8 @@ libgstgeometrictransform_la_SOURCES = plugin.c \
                                       gsttwirl.c \
                                       gstwaterripple.c \
                                       gststretch.c \
-                                      gstbulge.c
+                                      gstbulge.c \
+                                      gsttunnel.c
 
 libgstgeometrictransform_la_CFLAGS = $(GST_CFLAGS) $(GST_BASE_CFLAGS) \
 			    $(GST_PLUGINS_BASE_CFLAGS) \
@@ -39,4 +40,5 @@ noinst_HEADERS = gstgeometrictransform.h \
                  gsttwirl.h \
                  gstwaterripple.h \
                  gststretch.h \
-                 gstbulge.h
+                 gstbulge.h \
+                 gsttunnel.h

gst/geometrictransform/gsttunnel.c

@@ -0,0 +1,149 @@
+/*
+ * GStreamer
+ * Copyright (C) 2010 Filippo Argiolas <filippo.argiolas@gmail.com>
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+ * DEALINGS IN THE SOFTWARE.
+ *
+ * Alternatively, the contents of this file may be used under the
+ * GNU Lesser General Public License Version 2.1 (the "LGPL"), in
+ * which case the following provisions apply instead of the ones
+ * mentioned above:
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#include <gst/gst.h>
+#include <math.h>
+
+#include "gsttunnel.h"
+#include "geometricmath.h"
+
+GST_DEBUG_CATEGORY_STATIC (gst_tunnel_debug);
+#define GST_CAT_DEFAULT gst_tunnel_debug
+
+GST_BOILERPLATE (GstTunnel, gst_tunnel, GstCircleGeometricTransform,
+    GST_TYPE_CIRCLE_GEOMETRIC_TRANSFORM);
+
+/* Clean up */
+static void
+gst_tunnel_finalize (GObject * obj)
+{
+  G_OBJECT_CLASS (parent_class)->finalize (obj);
+}
+
+/* GObject vmethod implementations */
+
+static void
+gst_tunnel_base_init (gpointer gclass)
+{
+  GstElementClass *element_class = GST_ELEMENT_CLASS (gclass);
+
+  gst_element_class_set_details_simple (element_class,
+      "tunnel",
+      "Transform/Effect/Video",
+      "Light tunnel effect", "Filippo Argiolas <filippo.argiolas@gmail.com>");
+}
+
+static gboolean
+tunnel_map (GstGeometricTransform * gt, gint x, gint y, gdouble * in_x,
+    gdouble * in_y)
+{
+  GstCircleGeometricTransform *cgt = GST_CIRCLE_GEOMETRIC_TRANSFORM_CAST (gt);
+  GstTunnel *tunnel = GST_TUNNEL_CAST (gt);
+
+  gdouble norm_x, norm_y;
+  gdouble width = gt->width;
+  gdouble height = gt->height;
+  gdouble r;
+
+
+  /* normalize in ((-1.0, -1.0), (1.0, 1.0) and traslate the center */
+  /* plus a little trick to obtain a perfect circle, normalize in a
+   * square with sides equal to MAX(width, height) */
+  norm_x = 2.0 * (x - cgt->x_center * width) / MAX (width, height);
+  norm_y = 2.0 * (y - cgt->y_center * height) / MAX (width, height);
+
+  r = sqrt (norm_x * norm_x + norm_y * norm_y);
+
+  /* do nothing if r < 0.5 */
+  /* zoom otherwise */
+  /* the second edge is the tunnel radius, see gststretch.c for
+   * comments about its customizability */
+  norm_x *= CLAMP (r, 0.0, 0.5) / r;
+  norm_y *= CLAMP (r, 0.0, 0.5) / r;
+
+  /* unnormalize */
+  *in_x = 0.5 * (norm_x) * MAX (width, height) + cgt->x_center * width;
+  *in_y = 0.5 * (norm_y) * MAX (width, height) + cgt->y_center * height;
+
+  GST_DEBUG_OBJECT (tunnel, "Inversely mapped %d %d into %lf %lf",
+      x, y, *in_x, *in_y);
+
+  return TRUE;
+}
+
+static void
+gst_tunnel_class_init (GstTunnelClass * klass)
+{
+  GObjectClass *gobject_class;
+  GstGeometricTransformClass *gstgt_class;
+
+  gobject_class = (GObjectClass *) klass;
+  gstgt_class = (GstGeometricTransformClass *) klass;
+
+  parent_class = g_type_class_peek_parent (klass);
+
+  gobject_class->finalize = GST_DEBUG_FUNCPTR (gst_tunnel_finalize);
+
+  gstgt_class->map_func = tunnel_map;
+}
+
+static void
+gst_tunnel_init (GstTunnel * filter, GstTunnelClass * gclass)
+{
+  GstGeometricTransform *gt = GST_GEOMETRIC_TRANSFORM (filter);
+
+  gt->off_edge_pixels = GST_GT_OFF_EDGES_PIXELS_CLAMP;
+}
+
+gboolean
+gst_tunnel_plugin_init (GstPlugin * plugin)
+{
+  GST_DEBUG_CATEGORY_INIT (gst_tunnel_debug, "tunnel", 0, "tunnel");
+
+  return gst_element_register (plugin, "tunnel", GST_RANK_NONE,
+      GST_TYPE_TUNNEL);
+}

gst/geometrictransform/gsttunnel.h

@@ -0,0 +1,82 @@
+/*
+ * GStreamer
+ * Copyright (C) 2010 Filippo Argiolas <filippo.argiolas@gmail.com>
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+ * DEALINGS IN THE SOFTWARE.
+ *
+ * Alternatively, the contents of this file may be used under the
+ * GNU Lesser General Public License Version 2.1 (the "LGPL"), in
+ * which case the following provisions apply instead of the ones
+ * mentioned above:
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#ifndef __GST_TUNNEL_H__
+#define __GST_TUNNEL_H__
+
+#include <gst/gst.h>
+#include "gstcirclegeometrictransform.h"
+
+G_BEGIN_DECLS
+/* #defines don't like whitespacey bits */
+#define GST_TYPE_TUNNEL \
+  (gst_tunnel_get_type())
+#define GST_TUNNEL(obj) \
+  (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_TUNNEL,GstTunnel))
+#define GST_TUNNEL_CAST(obj) \
+  ((GstTunnel *)(obj))
+#define GST_TUNNEL_CLASS(klass) \
+  (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_TUNNEL,GstTunnelClass))
+#define GST_IS_TUNNEL(obj) \
+  (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_TUNNEL))
+#define GST_IS_TUNNEL_CLASS(klass) \
+  (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_TUNNEL))
+typedef struct _GstTunnel GstTunnel;
+typedef struct _GstTunnelClass GstTunnelClass;
+
+struct _GstTunnel
+{
+  GstCircleGeometricTransform element;
+};
+
+struct _GstTunnelClass
+{
+  GstCircleGeometricTransformClass parent_class;
+};
+
+GType gst_tunnel_get_type (void);
+
+gboolean gst_tunnel_plugin_init (GstPlugin * plugin);
+
+G_END_DECLS
+#endif /* __GST_TUNNEL_H__ */

gst/geometrictransform/plugin.c

@@ -31,6 +31,7 @@
 #include "gstwaterripple.h"
 #include "gststretch.h"
 #include "gstbulge.h"
+#include "gsttunnel.h"
 
 static gboolean
 plugin_init (GstPlugin * plugin)
@@ -65,6 +66,9 @@ plugin_init (GstPlugin * plugin)
   if (!gst_bulge_plugin_init (plugin))
     return FALSE;
 
+  if (!gst_tunnel_plugin_init (plugin))
+    return FALSE;
+
   return TRUE;
 }