1b4a22780a69bea7ce49b0d4adc7ae7aa9fecf6b
[platform/upstream/gst-plugins-good.git] / gst / effectv / gstquark.c
1 /* GStreamer
2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
3  *
4  * EffecTV:
5  * Copyright (C) 2001 FUKUCHI Kentarou
6  *
7  *  EffecTV is free software. This library is free software;
8  * 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 #ifdef HAVE_CONFIG_H
25 #include "config.h"
26 #endif
27 #include <math.h>
28 #include <string.h>
29 #include <gst/gst.h>
30 #include "gsteffectv.h"
31
32 #define GST_TYPE_QUARKTV \
33   (gst_quarktv_get_type())
34 #define GST_QUARKTV(obj) \
35   (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_QUARKTV,GstQuarkTV))
36 #define GST_QUARKTV_CLASS(klass) \
37   (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_QUARKTV,GstQuarkTVClass))
38 #define GST_IS_QUARKTV(obj) \
39   (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_QUARKTV))
40 #define GST_IS_QUARKTV_CLASS(obj) \
41   (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_QUARKTV))
42
43 /* number of frames of time-buffer. It should be as a configurable paramter */
44 /* This number also must be 2^n just for the speed. */
45 #define PLANES 16
46
47 typedef struct _GstQuarkTV GstQuarkTV;
48 typedef struct _GstQuarkTVClass GstQuarkTVClass;
49
50 struct _GstQuarkTV
51 {
52   GstElement element;
53
54   GstPad *sinkpad, *srcpad;
55
56   gint width, height;
57   gint area;
58   gint planes;
59   gint current_plane;
60   GstBuffer **planetable;
61 };
62
63 struct _GstQuarkTVClass
64 {
65   GstElementClass parent_class;
66 };
67
68 /* elementfactory information */
69 static GstElementDetails gst_quarktv_details = GST_ELEMENT_DETAILS (
70   "QuarkTV",
71   "Filter/Effect/Video",
72   "Motion dissolver",
73   "FUKUCHI, Kentarou <fukuchi@users.sourceforge.net>"
74 );
75
76 /* Filter signals and args */
77 enum
78 {
79   /* FILL ME */
80   LAST_SIGNAL
81 };
82
83 enum
84 {
85   ARG_0,
86   ARG_PLANES,
87 };
88
89 static void     gst_quarktv_base_init           (gpointer g_class);
90 static void     gst_quarktv_class_init          (GstQuarkTVClass * klass);
91 static void     gst_quarktv_init                (GstQuarkTV * filter);
92
93 static GstElementStateReturn
94                 gst_quarktv_change_state        (GstElement *element);
95                 
96 static void     gst_quarktv_set_property        (GObject * object, guint prop_id,
97                                                  const GValue * value, GParamSpec * pspec);
98 static void     gst_quarktv_get_property        (GObject * object, guint prop_id,
99                                                  GValue * value, GParamSpec * pspec);
100
101 static void     gst_quarktv_chain               (GstPad * pad, GstData *_data);
102
103 static GstElementClass *parent_class = NULL;
104 /* static guint gst_quarktv_signals[LAST_SIGNAL] = { 0 }; */
105
106 static inline guint32
107 fastrand (void)
108 {
109   static unsigned int fastrand_val;
110
111   return (fastrand_val = fastrand_val * 1103515245 + 12345);
112 }
113
114 GType gst_quarktv_get_type (void)
115 {
116   static GType quarktv_type = 0;
117
118   if (!quarktv_type) {
119     static const GTypeInfo quarktv_info = {
120       sizeof (GstQuarkTVClass), 
121       gst_quarktv_base_init,
122       NULL,
123       (GClassInitFunc) gst_quarktv_class_init,
124       NULL,
125       NULL,
126       sizeof (GstQuarkTV),
127       0,
128       (GInstanceInitFunc) gst_quarktv_init,
129     };
130
131     quarktv_type = g_type_register_static (GST_TYPE_ELEMENT, "GstQuarkTV", &quarktv_info, 0);
132   }
133   return quarktv_type;
134 }
135
136 static void
137 gst_quarktv_base_init (gpointer g_class)
138 {
139   GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
140
141   gst_element_class_add_pad_template (element_class,
142       gst_static_pad_template_get (&gst_effectv_src_template));
143   gst_element_class_add_pad_template (element_class,
144       gst_static_pad_template_get (&gst_effectv_sink_template));
145  
146   gst_element_class_set_details (element_class, &gst_quarktv_details);
147 }
148
149 static void
150 gst_quarktv_class_init (GstQuarkTVClass * klass)
151 {
152   GObjectClass *gobject_class;
153   GstElementClass *gstelement_class;
154
155   gobject_class = (GObjectClass *) klass;
156   gstelement_class = (GstElementClass *) klass;
157
158   parent_class = g_type_class_ref (GST_TYPE_ELEMENT);
159
160   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_PLANES,
161     g_param_spec_int ("planes","Planes","Number of frames in the buffer",
162                       1, 32, PLANES, G_PARAM_READWRITE));
163        
164   gobject_class->set_property = gst_quarktv_set_property;
165   gobject_class->get_property = gst_quarktv_get_property;
166
167   gstelement_class->change_state = gst_quarktv_change_state;
168 }
169
170 static GstPadLinkReturn
171 gst_quarktv_link (GstPad * pad, const GstCaps * caps)
172 {
173   GstQuarkTV *filter;
174   GstPad *otherpad;
175   gint i;
176   GstStructure *structure;
177   GstPadLinkReturn res;
178
179   filter = GST_QUARKTV (gst_pad_get_parent (pad));
180   g_return_val_if_fail (GST_IS_QUARKTV (filter), GST_PAD_LINK_REFUSED);
181
182   otherpad = (pad == filter->srcpad ? filter->sinkpad : filter->srcpad);
183
184   res = gst_pad_try_set_caps (otherpad, caps);
185   if (GST_PAD_LINK_FAILED (res))
186     return res;
187
188   structure = gst_caps_get_structure (caps, 0);
189   if (!gst_structure_get_int (structure, "width", &filter->width) ||
190       !gst_structure_get_int (structure, "height", &filter->height))
191     return GST_PAD_LINK_REFUSED;
192
193   filter->area = filter->width * filter->height;
194
195   for(i = 0; i < filter->planes; i++) {
196     if (filter->planetable[i]) 
197       gst_buffer_unref (filter->planetable[i]);
198     filter->planetable[i] = NULL;
199   }
200
201   return GST_PAD_LINK_OK;
202 }
203
204 static void
205 gst_quarktv_init (GstQuarkTV * filter)
206 {
207   filter->sinkpad = gst_pad_new_from_template (
208       gst_static_pad_template_get(&gst_effectv_sink_template), "sink");
209   gst_pad_set_getcaps_function (filter->sinkpad, gst_pad_proxy_getcaps);
210   gst_pad_set_chain_function (filter->sinkpad, gst_quarktv_chain);
211   gst_pad_set_link_function (filter->sinkpad, gst_quarktv_link);
212   gst_element_add_pad (GST_ELEMENT (filter), filter->sinkpad);
213
214   filter->srcpad = gst_pad_new_from_template (
215       gst_static_pad_template_get(&gst_effectv_src_template), "src");
216   gst_pad_set_getcaps_function (filter->srcpad, gst_pad_proxy_getcaps);
217   gst_pad_set_link_function (filter->srcpad, gst_quarktv_link);
218   gst_element_add_pad (GST_ELEMENT (filter), filter->srcpad);
219
220   filter->planes = PLANES;
221   filter->current_plane = filter->planes - 1;
222   filter->planetable = (GstBuffer **) g_malloc(filter->planes * sizeof(GstBuffer *));
223   memset (filter->planetable, 0, filter->planes * sizeof(GstBuffer *));
224 }
225
226 static void
227 gst_quarktv_chain (GstPad * pad, GstData *_data)
228 {
229   GstBuffer *buf = GST_BUFFER (_data);
230   GstQuarkTV *filter;
231   guint32 *src, *dest;
232   GstBuffer *outbuf;
233   gint area;
234
235   filter = GST_QUARKTV (gst_pad_get_parent (pad));
236
237   src = (guint32 *) GST_BUFFER_DATA (buf);
238
239   area = filter->area;
240
241   outbuf = gst_buffer_new ();
242   GST_BUFFER_SIZE (outbuf) = area * sizeof(guint32);
243   dest = (guint32 *) GST_BUFFER_DATA (outbuf) = g_malloc (GST_BUFFER_SIZE (outbuf));
244   GST_BUFFER_TIMESTAMP (outbuf) = GST_BUFFER_TIMESTAMP (buf);
245   
246   if (filter->planetable[filter->current_plane]) 
247     gst_buffer_unref (filter->planetable[filter->current_plane]);
248
249   filter->planetable[filter->current_plane] = buf;
250
251   while (--area) {
252     GstBuffer *rand;
253     
254     /* pick a random buffer */
255     rand = filter->planetable[(filter->current_plane + (fastrand () >> 24)) & (filter->planes - 1)];
256     
257     dest[area] = (rand ? ((guint32 *)GST_BUFFER_DATA (rand))[area] : 0);
258   }
259
260   gst_pad_push (filter->srcpad, GST_DATA (outbuf));
261
262   filter->current_plane--;
263   
264   if (filter->current_plane < 0) 
265     filter->current_plane = filter->planes - 1;
266 }
267
268 static GstElementStateReturn
269 gst_quarktv_change_state (GstElement *element)
270
271   GstQuarkTV *filter = GST_QUARKTV (element);
272
273   switch (GST_STATE_TRANSITION (element)) {
274     case GST_STATE_PAUSED_TO_READY:
275     {
276       gint i;
277
278       for (i = 0; i < filter->planes; i++) {
279         if (filter->planetable[i])
280           gst_buffer_unref (filter->planetable[i]);
281         filter->planetable[i] = NULL;
282       }
283       g_free (filter->planetable);
284       filter->planetable = NULL;
285       break;
286     }
287     default:
288       break;
289   }
290
291   return GST_ELEMENT_CLASS (parent_class)->change_state (element);
292 }
293
294
295 static void
296 gst_quarktv_set_property (GObject * object, guint prop_id, const GValue * value, GParamSpec * pspec)
297 {
298   GstQuarkTV *filter;
299
300   /* it's not null if we got it, but it might not be ours */
301   g_return_if_fail (GST_IS_QUARKTV (object));
302
303   filter = GST_QUARKTV (object);
304
305   switch (prop_id) {
306     case ARG_PLANES:
307       {
308         gint new_n_planes = g_value_get_int (value);
309         GstBuffer **new_planetable;
310         gint i;
311
312         /* If the number of planes changed, copy across any existing planes */
313         if (new_n_planes != filter->planes)
314         {
315           new_planetable = (GstBuffer **) g_malloc(new_n_planes * sizeof(GstBuffer *));
316
317           for(i = 0; (i < new_n_planes) && (i < filter->planes); i++) {
318             new_planetable[i] = filter->planetable[i];
319           }
320           for(; i < filter->planes; i++) {
321             if (filter->planetable[i]) 
322               gst_buffer_unref (filter->planetable[i]);
323           }
324           g_free (filter->planetable);
325           filter->planetable = new_planetable;
326           filter->current_plane = filter->planes - 1;
327           filter->planes = new_n_planes;
328         }
329       }
330       break;
331     default:
332       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
333       break;
334   }
335 }
336
337 static void
338 gst_quarktv_get_property (GObject * object, guint prop_id, GValue * value, GParamSpec * pspec)
339 {
340   GstQuarkTV *filter;
341
342   /* it's not null if we got it, but it might not be ours */
343   g_return_if_fail (GST_IS_QUARKTV (object));
344
345   filter = GST_QUARKTV (object);
346
347   switch (prop_id) {
348     case ARG_PLANES:
349       g_value_set_int (value, filter->planes);
350       break;
351     default:
352       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
353       break;
354   }
355 }