1 /*
2  * GStreamer
3  * Copyright (C) 2010 Thiago Santos <thiago.sousa.santos@collabora.co.uk>
4  *
5  * Permission is hereby granted, free of charge, to any person obtaining a
6  * copy of this software and associated documentation files (the "Software"),
7  * to deal in the Software without restriction, including without limitation
8  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9  * and/or sell copies of the Software, and to permit persons to whom the
10  * Software is furnished to do so, subject to the following conditions:
11  *
12  * The above copyright notice and this permission notice shall be included in
13  * all copies or substantial portions of the Software.
14  *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20  * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21  * DEALINGS IN THE SOFTWARE.
22  *
23  * Alternatively, the contents of this file may be used under the
24  * GNU Lesser General Public License Version 2.1 (the "LGPL"), in
25  * which case the following provisions apply instead of the ones
26  * mentioned above:
27  *
28  * This library is free software; you can redistribute it and/or
29  * modify it under the terms of the GNU Library General Public
30  * License as published by the Free Software Foundation; either
31  * version 2 of the License, or (at your option) any later version.
32  *
33  * This library is distributed in the hope that it will be useful,
34  * but WITHOUT ANY WARRANTY; without even the implied warranty of
35  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
36  * Library General Public License for more details.
37  *
38  * You should have received a copy of the GNU Library General Public
39  * License along with this library; if not, write to the
40  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
41  * Boston, MA 02110-1301, USA.
42  */
43 
44 /*
45  * Thanks to Jerry Huxtable <http://www.jhlabs.com> work on its java
46  * image editor and filters. The algorithms here were extracted from
47  * his code.
48  */
49 
50 /**
51  * SECTION:element-pinch
52  * @title: pinch
53  * @see_also: geometrictransform
54  *
55  * Pinch applies a 'pinch' geometric transform to the image.
56  *
57  * ## Example launch line
58  * |[
59  * gst-launch-1.0 -v videotestsrc ! pinch ! videoconvert ! autovideosink
60  * ]|
61  *
62  */
63 
64 #ifdef HAVE_CONFIG_H
65 #  include <config.h>
66 #endif
67 
68 #include <gst/gst.h>
69 #include <math.h>
70 
71 #include "gstpinch.h"
72 
73 GST_DEBUG_CATEGORY_STATIC (gst_pinch_debug);
74 #define GST_CAT_DEFAULT gst_pinch_debug
75 
76 enum
77 {
78   PROP_0,
79   PROP_INTENSITY
80 };
81 
82 #define DEFAULT_INTENSITY 0.5
83 
84 #define gst_pinch_parent_class parent_class
85 G_DEFINE_TYPE (GstPinch, gst_pinch, GST_TYPE_CIRCLE_GEOMETRIC_TRANSFORM);
86 
87 static void
gst_pinch_set_property(GObject * object,guint prop_id,const GValue * value,GParamSpec * pspec)88 gst_pinch_set_property (GObject * object, guint prop_id, const GValue * value,
89     GParamSpec * pspec)
90 {
91   GstPinch *pinch;
92   GstGeometricTransform *gt;
93   gdouble v;
94 
95   gt = GST_GEOMETRIC_TRANSFORM_CAST (object);
96   pinch = GST_PINCH_CAST (object);
97 
98   GST_OBJECT_LOCK (gt);
99   switch (prop_id) {
100     case PROP_INTENSITY:
101       v = g_value_get_double (value);
102       if (v != pinch->intensity) {
103         pinch->intensity = v;
104         gst_geometric_transform_set_need_remap (gt);
105       }
106       break;
107     default:
108       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
109       break;
110   }
111   GST_OBJECT_UNLOCK (gt);
112 }
113 
114 static void
gst_pinch_get_property(GObject * object,guint prop_id,GValue * value,GParamSpec * pspec)115 gst_pinch_get_property (GObject * object, guint prop_id,
116     GValue * value, GParamSpec * pspec)
117 {
118   GstPinch *pinch;
119 
120   pinch = GST_PINCH_CAST (object);
121 
122   switch (prop_id) {
123     case PROP_INTENSITY:
124       g_value_set_double (value, pinch->intensity);
125       break;
126     default:
127       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
128       break;
129   }
130 }
131 
132 static gboolean
pinch_map(GstGeometricTransform * gt,gint x,gint y,gdouble * in_x,gdouble * in_y)133 pinch_map (GstGeometricTransform * gt, gint x, gint y, gdouble * in_x,
134     gdouble * in_y)
135 {
136   GstCircleGeometricTransform *cgt = GST_CIRCLE_GEOMETRIC_TRANSFORM_CAST (gt);
137   GstPinch *pinch = GST_PINCH_CAST (gt);
138   gdouble distance;
139   gdouble dx, dy;
140 
141   dx = x - cgt->precalc_x_center;
142   dy = y - cgt->precalc_y_center;
143   distance = dx * dx + dy * dy;
144 
145   GST_LOG_OBJECT (pinch, "Center %0.5lf (%0.2lf) %0.5lf (%0.2lf)",
146       cgt->precalc_x_center, cgt->x_center, cgt->precalc_y_center,
147       cgt->y_center);
148   GST_LOG_OBJECT (pinch, "Input %d %d, distance=%lf, radius2=%lf, dx=%lf"
149       ", dy=%lf", x, y, distance, cgt->precalc_radius2, dx, dy);
150 
151   if (distance > cgt->precalc_radius2 || distance == 0) {
152     *in_x = x;
153     *in_y = y;
154   } else {
155     gdouble d = sqrt (distance / cgt->precalc_radius2);
156     gdouble t = pow (sin (G_PI * 0.5 * d), -pinch->intensity);
157 
158     dx *= t;
159     dy *= t;
160 
161     GST_LOG_OBJECT (pinch, "D=%lf, t=%lf, dx=%lf" ", dy=%lf", d, t, dx, dy);
162 
163     *in_x = cgt->precalc_x_center + dx;
164     *in_y = cgt->precalc_y_center + dy;
165   }
166 
167   GST_DEBUG_OBJECT (pinch, "Inversely mapped %d %d into %lf %lf",
168       x, y, *in_x, *in_y);
169 
170   return TRUE;
171 }
172 
173 static void
gst_pinch_class_init(GstPinchClass * klass)174 gst_pinch_class_init (GstPinchClass * klass)
175 {
176   GObjectClass *gobject_class;
177   GstElementClass *gstelement_class;
178   GstGeometricTransformClass *gstgt_class;
179 
180   gobject_class = (GObjectClass *) klass;
181   gstelement_class = (GstElementClass *) klass;
182   gstgt_class = (GstGeometricTransformClass *) klass;
183 
184   gst_element_class_set_static_metadata (gstelement_class,
185       "pinch",
186       "Transform/Effect/Video",
187       "Applies 'pinch' geometric transform to the image",
188       "Thiago Santos<thiago.sousa.santos@collabora.co.uk>");
189 
190   gobject_class->set_property = gst_pinch_set_property;
191   gobject_class->get_property = gst_pinch_get_property;
192 
193   g_object_class_install_property (gobject_class, PROP_INTENSITY,
194       g_param_spec_double ("intensity", "intensity",
195           "intensity of the pinch effect",
196           -1.0, 1.0, DEFAULT_INTENSITY,
197           GST_PARAM_CONTROLLABLE | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
198 
199   gstgt_class->map_func = pinch_map;
200 }
201 
202 static void
gst_pinch_init(GstPinch * filter)203 gst_pinch_init (GstPinch * filter)
204 {
205   GstGeometricTransform *gt = GST_GEOMETRIC_TRANSFORM (filter);
206 
207   gt->off_edge_pixels = GST_GT_OFF_EDGES_PIXELS_CLAMP;
208   filter->intensity = DEFAULT_INTENSITY;
209 }
210 
211 gboolean
gst_pinch_plugin_init(GstPlugin * plugin)212 gst_pinch_plugin_init (GstPlugin * plugin)
213 {
214   GST_DEBUG_CATEGORY_INIT (gst_pinch_debug, "pinch", 0, "pinch");
215 
216   return gst_element_register (plugin, "pinch", GST_RANK_NONE, GST_TYPE_PINCH);
217 }
218