2 * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
3 * Copyright (C) <2003> David Schleef <ds@schleef.org>
4 * Copyright (C) <2009> Sebastian Dröge <sebastian.droege@collabora.co.uk>
6 * EffecTV - Realtime Digital Video Effector
7 * Copyright (C) 2001-2002 FUKUCHI Kentarou
9 * AgingTV - film-aging effect.
11 * This library is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU Library General Public
13 * License as published by the Free Software Foundation; either
14 * version 2 of the License, or (at your option) any later version.
16 * This library is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * Library General Public License for more details.
21 * You should have received a copy of the GNU Library General Public
22 * License along with this library; if not, write to the
23 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
24 * Boston, MA 02111-1307, USA.
28 * SECTION:element-agingtv
30 * AgingTV ages a video stream in realtime, changes the colors and adds
34 * <title>Example launch line</title>
36 * gst-launch -v videotestsrc ! agingtv ! videoconvert ! autovideosink
37 * ]| This pipeline shows the effect of agingtv on a test stream.
49 #include "gsteffectv.h"
51 #include <gst/controller/gstcontroller.h>
53 static const gint dx[8] = { 1, 1, 0, -1, -1, -1, 0, 1 };
54 static const gint dy[8] = { 0, -1, -1, -1, 0, 1, 1, 1 };
65 #define DEFAULT_SCRATCH_LINES 7
66 #define DEFAULT_COLOR_AGING TRUE
67 #define DEFAULT_PITS TRUE
68 #define DEFAULT_DUSTS TRUE
70 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
71 #define CAPS_STR GST_VIDEO_CAPS_MAKE ("{ BGRx, RGBx }")
73 #define CAPS_STR GST_VIDEO_CAPS_MAKE ("{ xRGB, xBGR }")
76 static GstStaticPadTemplate gst_agingtv_src_template =
77 GST_STATIC_PAD_TEMPLATE ("src",
80 GST_STATIC_CAPS (CAPS_STR)
83 static GstStaticPadTemplate gst_agingtv_sink_template =
84 GST_STATIC_PAD_TEMPLATE ("sink",
87 GST_STATIC_CAPS (CAPS_STR)
90 G_DEFINE_TYPE (GstAgingTV, gst_agingtv, GST_TYPE_VIDEO_FILTER);
93 gst_agingtv_set_caps (GstBaseTransform * btrans, GstCaps * incaps,
96 GstAgingTV *filter = GST_AGINGTV (btrans);
99 if (!gst_video_info_from_caps (&info, incaps))
109 GST_ERROR_OBJECT (filter, "could not parse caps");
110 return GST_FLOW_ERROR;
115 coloraging (guint32 * src, guint32 * dest, gint video_area, gint * c)
121 c_tmp -= (gint) (fastrand ()) >> 28;
127 for (i = 0; i < video_area; i++) {
129 b = (a & 0xfcfcfc) >> 2;
131 a - b + (c_tmp | (c_tmp << 8) | (c_tmp << 16)) +
132 ((fastrand () >> 8) & 0x101010);
139 scratching (scratch * scratches, gint scratch_lines, guint32 * dest, gint width,
146 for (i = 0; i < scratch_lines; i++) {
147 scratch = &scratches[i];
150 scratch->x = scratch->x + scratch->dx;
152 if (scratch->x < 0 || scratch->x > width * 256) {
156 p = dest + (scratch->x >> 8);
167 y2 = fastrand () % height;
169 for (y = y1; y < y2; y++) {
173 *p = a | (b - (b >> 8));
177 if ((fastrand () & 0xf0000000) == 0) {
178 scratch->life = 2 + (fastrand () >> 27);
179 scratch->x = fastrand () % (width * 256);
180 scratch->dx = ((int) fastrand ()) >> 23;
181 scratch->init = (fastrand () % (height - 1)) + 1;
188 dusts (guint32 * dest, gint width, gint height, gint * dust_interval,
196 if (*dust_interval == 0) {
197 if ((fastrand () & 0xf0000000) == 0) {
198 *dust_interval = fastrand () >> 29;
202 dnum = area_scale * 4 + (fastrand () >> 27);
204 for (i = 0; i < dnum; i++) {
205 x = fastrand () % width;
206 y = fastrand () % height;
207 d = fastrand () >> 29;
208 len = fastrand () % area_scale + 5;
209 for (j = 0; j < len; j++) {
210 dest[y * width + x] = 0x101010;
214 if (y >= height || x >= width)
217 d = (d + fastrand () % 3 - 1) & 7;
220 *dust_interval = *dust_interval - 1;
224 pits (guint32 * dest, gint width, gint height, gint area_scale,
225 gint * pits_interval)
228 gint pnum, size, pnumscale;
231 pnumscale = area_scale * 2;
232 if (*pits_interval) {
233 pnum = pnumscale + (fastrand () % pnumscale);
235 *pits_interval = *pits_interval - 1;
237 pnum = fastrand () % pnumscale;
239 if ((fastrand () & 0xf8000000) == 0) {
240 *pits_interval = (fastrand () >> 28) + 20;
243 for (i = 0; i < pnum; i++) {
244 x = fastrand () % (width - 1);
245 y = fastrand () % (height - 1);
247 size = fastrand () >> 28;
249 for (j = 0; j < size; j++) {
250 x = x + fastrand () % 3 - 1;
251 y = y + fastrand () % 3 - 1;
253 if (y >= height || x >= width)
256 dest[y * width + x] = 0xc0c0c0;
262 gst_agingtv_get_property (GObject * object, guint prop_id,
263 GValue * value, GParamSpec * pspec)
265 GstAgingTV *agingtv = GST_AGINGTV (object);
267 GST_OBJECT_LOCK (agingtv);
269 case PROP_SCRATCH_LINES:
270 g_value_set_uint (value, agingtv->scratch_lines);
272 case PROP_COLOR_AGING:
273 g_value_set_boolean (value, agingtv->color_aging);
276 g_value_set_boolean (value, agingtv->pits);
279 g_value_set_boolean (value, agingtv->dusts);
282 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
284 GST_OBJECT_UNLOCK (agingtv);
288 gst_agingtv_set_property (GObject * object, guint prop_id,
289 const GValue * value, GParamSpec * pspec)
291 GstAgingTV *agingtv = GST_AGINGTV (object);
294 case PROP_SCRATCH_LINES:
295 agingtv->scratch_lines = g_value_get_uint (value);
297 case PROP_COLOR_AGING:
298 agingtv->color_aging = g_value_get_boolean (value);
301 agingtv->pits = g_value_get_boolean (value);
304 agingtv->dusts = g_value_get_boolean (value);
307 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
312 gst_agingtv_start (GstBaseTransform * trans)
314 GstAgingTV *agingtv = GST_AGINGTV (trans);
316 agingtv->coloraging_state = 0x18;
317 agingtv->dust_interval = 0;
318 agingtv->pits_interval = 0;
320 memset (agingtv->scratches, 0, sizeof (agingtv->scratches));
326 gst_agingtv_transform (GstBaseTransform * trans, GstBuffer * in,
329 GstAgingTV *agingtv = GST_AGINGTV (trans);
330 GstVideoFrame in_frame, out_frame;
332 GstClockTime timestamp, stream_time;
333 gint width, height, stride, video_size;
336 timestamp = GST_BUFFER_TIMESTAMP (in);
338 gst_segment_to_stream_time (&trans->segment, GST_FORMAT_TIME, timestamp);
340 GST_DEBUG_OBJECT (agingtv, "sync to %" GST_TIME_FORMAT,
341 GST_TIME_ARGS (timestamp));
343 if (GST_CLOCK_TIME_IS_VALID (stream_time))
344 gst_object_sync_values (G_OBJECT (agingtv), stream_time);
346 if (!gst_video_frame_map (&in_frame, &agingtv->info, in, GST_MAP_READ))
349 if (!gst_video_frame_map (&out_frame, &agingtv->info, out, GST_MAP_WRITE))
353 width = GST_VIDEO_FRAME_WIDTH (&in_frame);
354 height = GST_VIDEO_FRAME_HEIGHT (&in_frame);
355 stride = GST_VIDEO_FRAME_PLANE_STRIDE (&in_frame, 0);
356 video_size = stride * height;
358 src = GST_VIDEO_FRAME_PLANE_DATA (&in_frame, 0);
359 dest = GST_VIDEO_FRAME_PLANE_DATA (&out_frame, 0);
361 area_scale = width * height / 64 / 480;
365 if (agingtv->color_aging)
366 coloraging (src, dest, video_size, &agingtv->coloraging_state);
368 memcpy (dest, src, video_size);
370 scratching (agingtv->scratches, agingtv->scratch_lines, dest, width, height);
372 pits (dest, width, height, area_scale, &agingtv->pits_interval);
373 if (area_scale > 1 && agingtv->dusts)
374 dusts (dest, width, height, &agingtv->dust_interval, area_scale);
376 gst_video_frame_unmap (&in_frame);
377 gst_video_frame_unmap (&out_frame);
384 GST_DEBUG_OBJECT (agingtv, "invalid input frame");
385 return GST_FLOW_ERROR;
389 GST_DEBUG_OBJECT (agingtv, "invalid output frame");
390 gst_video_frame_unmap (&in_frame);
391 return GST_FLOW_ERROR;
396 gst_agingtv_class_init (GstAgingTVClass * klass)
398 GObjectClass *gobject_class = (GObjectClass *) klass;
399 GstElementClass *gstelement_class = (GstElementClass *) klass;
400 GstBaseTransformClass *trans_class = (GstBaseTransformClass *) klass;
402 gobject_class->set_property = gst_agingtv_set_property;
403 gobject_class->get_property = gst_agingtv_get_property;
405 g_object_class_install_property (gobject_class, PROP_SCRATCH_LINES,
406 g_param_spec_uint ("scratch-lines", "Scratch Lines",
407 "Number of scratch lines", 0, SCRATCH_MAX, DEFAULT_SCRATCH_LINES,
408 G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS | GST_PARAM_CONTROLLABLE));
410 g_object_class_install_property (gobject_class, PROP_COLOR_AGING,
411 g_param_spec_boolean ("color-aging", "Color Aging",
412 "Color Aging", DEFAULT_COLOR_AGING,
413 G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS | GST_PARAM_CONTROLLABLE));
415 g_object_class_install_property (gobject_class, PROP_PITS,
416 g_param_spec_boolean ("pits", "Pits",
417 "Pits", DEFAULT_PITS,
418 G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS | GST_PARAM_CONTROLLABLE));
420 g_object_class_install_property (gobject_class, PROP_DUSTS,
421 g_param_spec_boolean ("dusts", "Dusts",
422 "Dusts", DEFAULT_DUSTS,
423 G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS | GST_PARAM_CONTROLLABLE));
425 gst_element_class_set_details_simple (gstelement_class, "AgingTV effect",
426 "Filter/Effect/Video",
427 "AgingTV adds age to video input using scratches and dust",
428 "Sam Lantinga <slouken@devolution.com>");
430 gst_element_class_add_pad_template (gstelement_class,
431 gst_static_pad_template_get (&gst_agingtv_sink_template));
432 gst_element_class_add_pad_template (gstelement_class,
433 gst_static_pad_template_get (&gst_agingtv_src_template));
435 trans_class->set_caps = GST_DEBUG_FUNCPTR (gst_agingtv_set_caps);
436 trans_class->transform = GST_DEBUG_FUNCPTR (gst_agingtv_transform);
437 trans_class->start = GST_DEBUG_FUNCPTR (gst_agingtv_start);
441 gst_agingtv_init (GstAgingTV * agingtv)
443 agingtv->scratch_lines = DEFAULT_SCRATCH_LINES;
444 agingtv->color_aging = DEFAULT_COLOR_AGING;
445 agingtv->pits = DEFAULT_PITS;
446 agingtv->dusts = DEFAULT_DUSTS;