Added gst-plugins-base-subtitles0.10-0.10.34 for Meego Harmattan 1.2
[mafwsubrenderer] / gst-plugins-base-subtitles0.10 / gst / videorate / gstvideorate.c
1 /* GStreamer
2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Library General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Library General Public License for more details.
13  *
14  * You should have received a copy of the GNU Library General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19
20 /**
21  * SECTION:element-videorate
22  *
23  * This element takes an incoming stream of timestamped video frames.
24  * It will produce a perfect stream that matches the source pad's framerate.
25  *
26  * The correction is performed by dropping and duplicating frames, no fancy
27  * algorithm is used to interpolate frames (yet).
28  *
29  * By default the element will simply negotiate the same framerate on its
30  * source and sink pad.
31  *
32  * This operation is useful to link to elements that require a perfect stream.
33  * Typical examples are formats that do not store timestamps for video frames,
34  * but only store a framerate, like Ogg and AVI.
35  *
36  * A conversion to a specific framerate can be forced by using filtered caps on
37  * the source pad.
38  *
39  * The properties #GstVideoRate:in, #GstVideoRate:out, #GstVideoRate:duplicate
40  * and #GstVideoRate:drop can be read to obtain information about number of
41  * input frames, output frames, dropped frames (i.e. the number of unused input
42  * frames) and duplicated frames (i.e. the number of times an input frame was
43  * duplicated, beside being used normally).
44  *
45  * An input stream that needs no adjustments will thus never have dropped or
46  * duplicated frames.
47  *
48  * When the #GstVideoRate:silent property is set to FALSE, a GObject property
49  * notification will be emitted whenever one of the #GstVideoRate:duplicate or
50  * #GstVideoRate:drop values changes.
51  * This can potentially cause performance degradation.
52  * Note that property notification will happen from the streaming thread, so
53  * applications should be prepared for this.
54  *
55  * <refsect2>
56  * <title>Example pipelines</title>
57  * |[
58  * gst-launch -v filesrc location=videotestsrc.ogg ! oggdemux ! theoradec ! videorate ! video/x-raw-yuv,framerate=15/1 ! xvimagesink
59  * ]| Decode an Ogg/Theora file and adjust the framerate to 15 fps before playing.
60  * To create the test Ogg/Theora file refer to the documentation of theoraenc.
61  * |[
62  * gst-launch -v v4lsrc ! videorate ! video/x-raw-yuv,framerate=25/2 ! theoraenc ! oggmux ! filesink location=v4l.ogg
63  * ]| Capture video from a V4L device, and adjust the stream to 12.5 fps before
64  * encoding to Ogg/Theora.
65  * </refsect2>
66  *
67  * Last reviewed on 2006-09-02 (0.10.11)
68  */
69
70 #ifdef HAVE_CONFIG_H
71 #include "config.h"
72 #endif
73
74 #include "gstvideorate.h"
75
76 GST_DEBUG_CATEGORY_STATIC (video_rate_debug);
77 #define GST_CAT_DEFAULT video_rate_debug
78
79 /* GstVideoRate signals and args */
80 enum
81 {
82   /* FILL ME */
83   LAST_SIGNAL
84 };
85
86 #define DEFAULT_SILENT          TRUE
87 #define DEFAULT_NEW_PREF        1.0
88 #define DEFAULT_SKIP_TO_FIRST   FALSE
89
90 enum
91 {
92   ARG_0,
93   ARG_IN,
94   ARG_OUT,
95   ARG_DUP,
96   ARG_DROP,
97   ARG_SILENT,
98   ARG_NEW_PREF,
99   ARG_SKIP_TO_FIRST
100       /* FILL ME */
101 };
102
103 static GstStaticPadTemplate gst_video_rate_src_template =
104     GST_STATIC_PAD_TEMPLATE ("src",
105     GST_PAD_SRC,
106     GST_PAD_ALWAYS,
107     GST_STATIC_CAPS ("video/x-raw-yuv;"
108         "video/x-raw-rgb;" "video/x-raw-gray;" "image/jpeg;" "image/png")
109     );
110
111 static GstStaticPadTemplate gst_video_rate_sink_template =
112     GST_STATIC_PAD_TEMPLATE ("sink",
113     GST_PAD_SINK,
114     GST_PAD_ALWAYS,
115     GST_STATIC_CAPS ("video/x-raw-yuv;"
116         "video/x-raw-rgb;" "video/x-raw-gray;" "image/jpeg;" "image/png")
117     );
118
119 static void gst_video_rate_swap_prev (GstVideoRate * videorate,
120     GstBuffer * buffer, gint64 time);
121 static gboolean gst_video_rate_event (GstPad * pad, GstEvent * event);
122 static gboolean gst_video_rate_query (GstPad * pad, GstQuery * query);
123 static GstFlowReturn gst_video_rate_chain (GstPad * pad, GstBuffer * buffer);
124
125 static void gst_video_rate_set_property (GObject * object,
126     guint prop_id, const GValue * value, GParamSpec * pspec);
127 static void gst_video_rate_get_property (GObject * object,
128     guint prop_id, GValue * value, GParamSpec * pspec);
129
130 static GstStateChangeReturn gst_video_rate_change_state (GstElement * element,
131     GstStateChange transition);
132
133 /*static guint gst_video_rate_signals[LAST_SIGNAL] = { 0 }; */
134
135 static GParamSpec *pspec_drop = NULL;
136 static GParamSpec *pspec_duplicate = NULL;
137
138 GST_BOILERPLATE (GstVideoRate, gst_video_rate, GstElement, GST_TYPE_ELEMENT);
139
140 static void
141 gst_video_rate_base_init (gpointer g_class)
142 {
143   GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
144
145   gst_element_class_set_details_simple (element_class,
146       "Video rate adjuster", "Filter/Effect/Video",
147       "Drops/duplicates/adjusts timestamps on video frames to make a perfect stream",
148       "Wim Taymans <wim@fluendo.com>");
149
150   gst_element_class_add_pad_template (element_class,
151       gst_static_pad_template_get (&gst_video_rate_sink_template));
152   gst_element_class_add_pad_template (element_class,
153       gst_static_pad_template_get (&gst_video_rate_src_template));
154 }
155
156 static void
157 gst_video_rate_class_init (GstVideoRateClass * klass)
158 {
159   GObjectClass *object_class = G_OBJECT_CLASS (klass);
160   GstElementClass *element_class = GST_ELEMENT_CLASS (klass);
161
162   parent_class = g_type_class_peek_parent (klass);
163
164   object_class->set_property = gst_video_rate_set_property;
165   object_class->get_property = gst_video_rate_get_property;
166
167   g_object_class_install_property (object_class, ARG_IN,
168       g_param_spec_uint64 ("in", "In",
169           "Number of input frames", 0, G_MAXUINT64, 0,
170           G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
171   g_object_class_install_property (object_class, ARG_OUT,
172       g_param_spec_uint64 ("out", "Out", "Number of output frames", 0,
173           G_MAXUINT64, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
174   pspec_duplicate = g_param_spec_uint64 ("duplicate", "Duplicate",
175       "Number of duplicated frames", 0, G_MAXUINT64, 0,
176       G_PARAM_READABLE | G_PARAM_STATIC_STRINGS);
177   g_object_class_install_property (object_class, ARG_DUP, pspec_duplicate);
178   pspec_drop = g_param_spec_uint64 ("drop", "Drop", "Number of dropped frames",
179       0, G_MAXUINT64, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS);
180   g_object_class_install_property (object_class, ARG_DROP, pspec_drop);
181   g_object_class_install_property (object_class, ARG_SILENT,
182       g_param_spec_boolean ("silent", "silent",
183           "Don't emit notify for dropped and duplicated frames", DEFAULT_SILENT,
184           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
185   g_object_class_install_property (object_class, ARG_NEW_PREF,
186       g_param_spec_double ("new-pref", "New Pref",
187           "Value indicating how much to prefer new frames (unused)", 0.0, 1.0,
188           DEFAULT_NEW_PREF, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
189
190   /**
191    * GstVideoRate:skip-to-first:
192    * 
193    * Don't produce buffers before the first one we receive.
194    *
195    * Since: 0.10.25
196    */
197   g_object_class_install_property (object_class, ARG_SKIP_TO_FIRST,
198       g_param_spec_boolean ("skip-to-first", "Skip to first buffer",
199           "Don't produce buffers before the first one we receive",
200           DEFAULT_SKIP_TO_FIRST, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
201
202   element_class->change_state = GST_DEBUG_FUNCPTR (gst_video_rate_change_state);
203 }
204
205 /* return the caps that can be used on out_pad given in_caps on in_pad */
206 static gboolean
207 gst_video_rate_transformcaps (GstPad * in_pad, GstCaps * in_caps,
208     GstPad * out_pad, GstCaps ** out_caps)
209 {
210   GstCaps *intersect;
211   const GstCaps *in_templ;
212   gint i;
213   GSList *extra_structures = NULL;
214   GSList *iter;
215
216   in_templ = gst_pad_get_pad_template_caps (in_pad);
217   intersect = gst_caps_intersect (in_caps, in_templ);
218
219   /* all possible framerates are allowed */
220   for (i = 0; i < gst_caps_get_size (intersect); i++) {
221     GstStructure *structure;
222
223     structure = gst_caps_get_structure (intersect, i);
224
225     if (gst_structure_has_field (structure, "framerate")) {
226       GstStructure *copy_structure;
227
228       copy_structure = gst_structure_copy (structure);
229       gst_structure_set (copy_structure,
230           "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, G_MAXINT, 1, NULL);
231       extra_structures = g_slist_append (extra_structures, copy_structure);
232     }
233   }
234
235   /* append the extra structures */
236   for (iter = extra_structures; iter != NULL; iter = g_slist_next (iter)) {
237     gst_caps_append_structure (intersect, (GstStructure *) iter->data);
238   }
239   g_slist_free (extra_structures);
240
241   *out_caps = intersect;
242
243   return TRUE;
244 }
245
246 static GstCaps *
247 gst_video_rate_getcaps (GstPad * pad)
248 {
249   GstVideoRate *videorate;
250   GstPad *otherpad;
251   GstCaps *caps;
252
253   videorate = GST_VIDEO_RATE (GST_PAD_PARENT (pad));
254
255   otherpad = (pad == videorate->srcpad) ? videorate->sinkpad :
256       videorate->srcpad;
257
258   /* we can do what the peer can */
259   caps = gst_pad_peer_get_caps (otherpad);
260   if (caps) {
261     GstCaps *transform;
262
263     gst_video_rate_transformcaps (otherpad, caps, pad, &transform);
264     gst_caps_unref (caps);
265     caps = transform;
266   } else {
267     /* no peer, our padtemplate is enough then */
268     caps = gst_caps_copy (gst_pad_get_pad_template_caps (pad));
269   }
270
271   return caps;
272 }
273
274 static gboolean
275 gst_video_rate_setcaps (GstPad * pad, GstCaps * caps)
276 {
277   GstVideoRate *videorate;
278   GstStructure *structure;
279   gboolean ret = TRUE;
280   GstPad *otherpad, *opeer;
281   gint rate_numerator, rate_denominator;
282
283   videorate = GST_VIDEO_RATE (gst_pad_get_parent (pad));
284
285   GST_DEBUG_OBJECT (pad, "setcaps called %" GST_PTR_FORMAT, caps);
286
287   structure = gst_caps_get_structure (caps, 0);
288   if (!gst_structure_get_fraction (structure, "framerate",
289           &rate_numerator, &rate_denominator))
290     goto no_framerate;
291
292   if (pad == videorate->srcpad) {
293     /* out_frame_count is scaled by the frame rate caps when calculating next_ts.
294      * when the frame rate caps change, we must update base_ts and reset
295      * out_frame_count */
296     if (videorate->to_rate_numerator) {
297       videorate->base_ts +=
298           gst_util_uint64_scale (videorate->out_frame_count,
299           videorate->to_rate_denominator * GST_SECOND,
300           videorate->to_rate_numerator);
301     }
302     videorate->out_frame_count = 0;
303     videorate->to_rate_numerator = rate_numerator;
304     videorate->to_rate_denominator = rate_denominator;
305     otherpad = videorate->sinkpad;
306   } else {
307     videorate->from_rate_numerator = rate_numerator;
308     videorate->from_rate_denominator = rate_denominator;
309     otherpad = videorate->srcpad;
310   }
311
312   /* now try to find something for the peer */
313   opeer = gst_pad_get_peer (otherpad);
314   if (opeer) {
315     if (gst_pad_accept_caps (opeer, caps)) {
316       /* the peer accepts the caps as they are */
317       gst_pad_set_caps (otherpad, caps);
318
319       ret = TRUE;
320     } else {
321       GstCaps *peercaps;
322       GstCaps *transform = NULL;
323
324       ret = FALSE;
325
326       /* see how we can transform the input caps */
327       if (!gst_video_rate_transformcaps (pad, caps, otherpad, &transform))
328         goto no_transform;
329
330       /* see what the peer can do */
331       peercaps = gst_pad_get_caps (opeer);
332
333       GST_DEBUG_OBJECT (opeer, "icaps %" GST_PTR_FORMAT, peercaps);
334       GST_DEBUG_OBJECT (videorate, "transform %" GST_PTR_FORMAT, transform);
335
336       /* filter against our possibilities */
337       caps = gst_caps_intersect (peercaps, transform);
338       gst_caps_unref (peercaps);
339       gst_caps_unref (transform);
340
341       GST_DEBUG_OBJECT (videorate, "intersect %" GST_PTR_FORMAT, caps);
342
343       /* could turn up empty, due to e.g. colorspace etc */
344       if (gst_caps_get_size (caps) == 0) {
345         gst_caps_unref (caps);
346         goto no_transform;
347       }
348
349       /* take first possibility */
350       gst_caps_truncate (caps);
351       structure = gst_caps_get_structure (caps, 0);
352
353       /* and fixate */
354       gst_structure_fixate_field_nearest_fraction (structure, "framerate",
355           rate_numerator, rate_denominator);
356
357       gst_structure_get_fraction (structure, "framerate",
358           &rate_numerator, &rate_denominator);
359
360       if (otherpad == videorate->srcpad) {
361         videorate->to_rate_numerator = rate_numerator;
362         videorate->to_rate_denominator = rate_denominator;
363       } else {
364         videorate->from_rate_numerator = rate_numerator;
365         videorate->from_rate_denominator = rate_denominator;
366       }
367
368       if (gst_structure_has_field (structure, "interlaced"))
369         gst_structure_fixate_field_boolean (structure, "interlaced", FALSE);
370       if (gst_structure_has_field (structure, "color-matrix"))
371         gst_structure_fixate_field_string (structure, "color-matrix", "sdtv");
372       if (gst_structure_has_field (structure, "chroma-site"))
373         gst_structure_fixate_field_string (structure, "chroma-site", "mpeg2");
374       if (gst_structure_has_field (structure, "pixel-aspect-ratio"))
375         gst_structure_fixate_field_nearest_fraction (structure,
376             "pixel-aspect-ratio", 1, 1);
377
378       gst_pad_set_caps (otherpad, caps);
379       gst_caps_unref (caps);
380       ret = TRUE;
381     }
382     gst_object_unref (opeer);
383   }
384 done:
385   /* After a setcaps, our caps may have changed. In that case, we can't use
386    * the old buffer, if there was one (it might have different dimensions) */
387   GST_DEBUG_OBJECT (videorate, "swapping old buffers");
388   gst_video_rate_swap_prev (videorate, NULL, GST_CLOCK_TIME_NONE);
389
390   gst_object_unref (videorate);
391   return ret;
392
393 no_framerate:
394   {
395     GST_DEBUG_OBJECT (videorate, "no framerate specified");
396     goto done;
397   }
398 no_transform:
399   {
400     GST_DEBUG_OBJECT (videorate, "no framerate transform possible");
401     ret = FALSE;
402     goto done;
403   }
404 }
405
406 static void
407 gst_video_rate_reset (GstVideoRate * videorate)
408 {
409   GST_DEBUG_OBJECT (videorate, "resetting internal variables");
410
411   videorate->in = 0;
412   videorate->out = 0;
413   videorate->base_ts = 0;
414   videorate->out_frame_count = 0;
415   videorate->drop = 0;
416   videorate->dup = 0;
417   videorate->next_ts = GST_CLOCK_TIME_NONE;
418   videorate->last_ts = GST_CLOCK_TIME_NONE;
419   videorate->discont = TRUE;
420   gst_video_rate_swap_prev (videorate, NULL, 0);
421
422   gst_segment_init (&videorate->segment, GST_FORMAT_TIME);
423 }
424
425 static void
426 gst_video_rate_init (GstVideoRate * videorate, GstVideoRateClass * klass)
427 {
428   videorate->sinkpad =
429       gst_pad_new_from_static_template (&gst_video_rate_sink_template, "sink");
430   gst_pad_set_event_function (videorate->sinkpad,
431       GST_DEBUG_FUNCPTR (gst_video_rate_event));
432   gst_pad_set_chain_function (videorate->sinkpad,
433       GST_DEBUG_FUNCPTR (gst_video_rate_chain));
434   gst_pad_set_getcaps_function (videorate->sinkpad,
435       GST_DEBUG_FUNCPTR (gst_video_rate_getcaps));
436   gst_pad_set_setcaps_function (videorate->sinkpad,
437       GST_DEBUG_FUNCPTR (gst_video_rate_setcaps));
438   gst_element_add_pad (GST_ELEMENT (videorate), videorate->sinkpad);
439
440   videorate->srcpad =
441       gst_pad_new_from_static_template (&gst_video_rate_src_template, "src");
442   gst_pad_set_query_function (videorate->srcpad,
443       GST_DEBUG_FUNCPTR (gst_video_rate_query));
444   gst_pad_set_getcaps_function (videorate->srcpad,
445       GST_DEBUG_FUNCPTR (gst_video_rate_getcaps));
446   gst_pad_set_setcaps_function (videorate->srcpad,
447       GST_DEBUG_FUNCPTR (gst_video_rate_setcaps));
448   gst_element_add_pad (GST_ELEMENT (videorate), videorate->srcpad);
449
450   gst_video_rate_reset (videorate);
451   videorate->silent = DEFAULT_SILENT;
452   videorate->new_pref = DEFAULT_NEW_PREF;
453
454   videorate->from_rate_numerator = 0;
455   videorate->from_rate_denominator = 0;
456   videorate->to_rate_numerator = 0;
457   videorate->to_rate_denominator = 0;
458 }
459
460 /* flush the oldest buffer */
461 static GstFlowReturn
462 gst_video_rate_flush_prev (GstVideoRate * videorate, gboolean duplicate)
463 {
464   GstFlowReturn res;
465   GstBuffer *outbuf;
466   GstClockTime push_ts;
467
468   if (!videorate->prevbuf)
469     goto eos_before_buffers;
470
471   /* make sure we can write to the metadata */
472   outbuf = gst_buffer_make_metadata_writable
473       (gst_buffer_ref (videorate->prevbuf));
474
475   GST_BUFFER_OFFSET (outbuf) = videorate->out;
476   GST_BUFFER_OFFSET_END (outbuf) = videorate->out + 1;
477
478   if (videorate->discont) {
479     GST_BUFFER_FLAG_SET (outbuf, GST_BUFFER_FLAG_DISCONT);
480     videorate->discont = FALSE;
481   } else
482     GST_BUFFER_FLAG_UNSET (outbuf, GST_BUFFER_FLAG_DISCONT);
483
484   if (duplicate)
485     GST_BUFFER_FLAG_SET (outbuf, GST_BUFFER_FLAG_GAP);
486   else
487     GST_BUFFER_FLAG_UNSET (outbuf, GST_BUFFER_FLAG_GAP);
488
489   /* this is the timestamp we put on the buffer */
490   push_ts = videorate->next_ts;
491
492   videorate->out++;
493   videorate->out_frame_count++;
494   if (videorate->to_rate_numerator) {
495     /* interpolate next expected timestamp in the segment */
496     videorate->next_ts =
497         videorate->segment.accum + videorate->segment.start +
498         videorate->base_ts + gst_util_uint64_scale (videorate->out_frame_count,
499         videorate->to_rate_denominator * GST_SECOND,
500         videorate->to_rate_numerator);
501     GST_BUFFER_DURATION (outbuf) = videorate->next_ts - push_ts;
502   }
503
504   /* adapt for looping, bring back to time in current segment. */
505   GST_BUFFER_TIMESTAMP (outbuf) = push_ts - videorate->segment.accum;
506
507   gst_buffer_set_caps (outbuf, GST_PAD_CAPS (videorate->srcpad));
508
509   GST_LOG_OBJECT (videorate,
510       "old is best, dup, pushing buffer outgoing ts %" GST_TIME_FORMAT,
511       GST_TIME_ARGS (push_ts));
512
513   res = gst_pad_push (videorate->srcpad, outbuf);
514
515   return res;
516
517   /* WARNINGS */
518 eos_before_buffers:
519   {
520     GST_INFO_OBJECT (videorate, "got EOS before any buffer was received");
521     return GST_FLOW_OK;
522   }
523 }
524
525 static void
526 gst_video_rate_swap_prev (GstVideoRate * videorate, GstBuffer * buffer,
527     gint64 time)
528 {
529   GST_LOG_OBJECT (videorate, "swap_prev: storing buffer %p in prev", buffer);
530   if (videorate->prevbuf)
531     gst_buffer_unref (videorate->prevbuf);
532   videorate->prevbuf = buffer;
533   videorate->prev_ts = time;
534 }
535
536 static void
537 gst_video_rate_notify_drop (GstVideoRate * videorate)
538 {
539 #if !GLIB_CHECK_VERSION(2,26,0)
540   g_object_notify ((GObject *) videorate, "drop");
541 #else
542   g_object_notify_by_pspec ((GObject *) videorate, pspec_drop);
543 #endif
544 }
545
546 static void
547 gst_video_rate_notify_duplicate (GstVideoRate * videorate)
548 {
549 #if !GLIB_CHECK_VERSION(2,26,0)
550   g_object_notify ((GObject *) videorate, "duplicate");
551 #else
552   g_object_notify_by_pspec ((GObject *) videorate, pspec_duplicate);
553 #endif
554 }
555
556 #define MAGIC_LIMIT  25
557 static gboolean
558 gst_video_rate_event (GstPad * pad, GstEvent * event)
559 {
560   GstVideoRate *videorate;
561   gboolean ret;
562
563   videorate = GST_VIDEO_RATE (gst_pad_get_parent (pad));
564
565   switch (GST_EVENT_TYPE (event)) {
566     case GST_EVENT_NEWSEGMENT:
567     {
568       gint64 start, stop, time;
569       gdouble rate, arate;
570       gboolean update;
571       GstFormat format;
572
573       gst_event_parse_new_segment_full (event, &update, &rate, &arate, &format,
574           &start, &stop, &time);
575
576       if (format != GST_FORMAT_TIME)
577         goto format_error;
578
579       GST_DEBUG_OBJECT (videorate, "handle NEWSEGMENT");
580
581       /* close up the previous segment, if appropriate */
582       if (!update && videorate->prevbuf) {
583         gint count = 0;
584         GstFlowReturn res;
585
586         res = GST_FLOW_OK;
587         /* fill up to the end of current segment,
588          * or only send out the stored buffer if there is no specific stop.
589          * regardless, prevent going loopy in strange cases */
590         while (res == GST_FLOW_OK && count <= MAGIC_LIMIT &&
591             ((GST_CLOCK_TIME_IS_VALID (videorate->segment.stop) &&
592                     videorate->next_ts - videorate->segment.accum
593                     < videorate->segment.stop)
594                 || count < 1)) {
595           res = gst_video_rate_flush_prev (videorate, count > 0);
596           count++;
597         }
598         if (count > 1) {
599           videorate->dup += count - 1;
600           if (!videorate->silent)
601             gst_video_rate_notify_duplicate (videorate);
602         } else if (count == 0) {
603           videorate->drop++;
604           if (!videorate->silent)
605             gst_video_rate_notify_drop (videorate);
606         }
607         /* clean up for the new one; _chain will resume from the new start */
608         videorate->base_ts = 0;
609         videorate->out_frame_count = 0;
610         gst_video_rate_swap_prev (videorate, NULL, 0);
611         videorate->next_ts = GST_CLOCK_TIME_NONE;
612       }
613
614       /* We just want to update the accumulated stream_time  */
615       gst_segment_set_newsegment_full (&videorate->segment, update, rate, arate,
616           format, start, stop, time);
617
618       GST_DEBUG_OBJECT (videorate, "updated segment: %" GST_SEGMENT_FORMAT,
619           &videorate->segment);
620       break;
621     }
622     case GST_EVENT_EOS:{
623       gint count = 0;
624       GstFlowReturn res = GST_FLOW_OK;
625
626       GST_DEBUG_OBJECT (videorate, "Got EOS");
627
628       /* If the segment has a stop position, fill the segment */
629       if (GST_CLOCK_TIME_IS_VALID (videorate->segment.stop)) {
630         /* fill up to the end of current segment,
631          * or only send out the stored buffer if there is no specific stop.
632          * regardless, prevent going loopy in strange cases */
633         while (res == GST_FLOW_OK && count <= MAGIC_LIMIT &&
634             ((videorate->next_ts - videorate->segment.accum <
635                     videorate->segment.stop)
636                 || count < 1)) {
637           res = gst_video_rate_flush_prev (videorate, count > 0);
638           count++;
639         }
640       } else if (videorate->prevbuf) {
641         /* Output at least one frame but if the buffer duration is valid, output
642          * enough frames to use the complete buffer duration */
643         if (GST_BUFFER_DURATION_IS_VALID (videorate->prevbuf)) {
644           GstClockTime end_ts =
645               videorate->next_ts + GST_BUFFER_DURATION (videorate->prevbuf);
646
647           while (res == GST_FLOW_OK && count <= MAGIC_LIMIT &&
648               ((videorate->next_ts - videorate->segment.accum < end_ts)
649                   || count < 1)) {
650             res = gst_video_rate_flush_prev (videorate, count > 0);
651             count++;
652           }
653         } else {
654           res = gst_video_rate_flush_prev (videorate, FALSE);
655           count = 1;
656         }
657       }
658
659       if (count > 1) {
660         videorate->dup += count - 1;
661         if (!videorate->silent)
662           gst_video_rate_notify_duplicate (videorate);
663       } else if (count == 0) {
664         videorate->drop++;
665         if (!videorate->silent)
666           gst_video_rate_notify_drop (videorate);
667       }
668
669       break;
670     }
671     case GST_EVENT_FLUSH_STOP:
672       /* also resets the segment */
673       GST_DEBUG_OBJECT (videorate, "Got FLUSH_STOP");
674       gst_video_rate_reset (videorate);
675       break;
676     default:
677       break;
678   }
679
680   ret = gst_pad_push_event (videorate->srcpad, event);
681
682 done:
683   gst_object_unref (videorate);
684
685   return ret;
686
687   /* ERRORS */
688 format_error:
689   {
690     GST_WARNING_OBJECT (videorate,
691         "Got segment but doesn't have GST_FORMAT_TIME value");
692     gst_event_unref (event);
693     ret = FALSE;
694     goto done;
695   }
696 }
697
698 static gboolean
699 gst_video_rate_query (GstPad * pad, GstQuery * query)
700 {
701   GstVideoRate *videorate;
702   gboolean res = FALSE;
703
704   videorate = GST_VIDEO_RATE (gst_pad_get_parent (pad));
705
706   switch (GST_QUERY_TYPE (query)) {
707     case GST_QUERY_LATENCY:
708     {
709       GstClockTime min, max;
710       gboolean live;
711       guint64 latency;
712       GstPad *peer;
713
714       if ((peer = gst_pad_get_peer (videorate->sinkpad))) {
715         if ((res = gst_pad_query (peer, query))) {
716           gst_query_parse_latency (query, &live, &min, &max);
717
718           GST_DEBUG_OBJECT (videorate, "Peer latency: min %"
719               GST_TIME_FORMAT " max %" GST_TIME_FORMAT,
720               GST_TIME_ARGS (min), GST_TIME_ARGS (max));
721
722           if (videorate->from_rate_numerator != 0) {
723             /* add latency. We don't really know since we hold on to the frames
724              * until we get a next frame, which can be anything. We assume
725              * however that this will take from_rate time. */
726             latency = gst_util_uint64_scale (GST_SECOND,
727                 videorate->from_rate_denominator,
728                 videorate->from_rate_numerator);
729           } else {
730             /* no input framerate, we don't know */
731             latency = 0;
732           }
733
734           GST_DEBUG_OBJECT (videorate, "Our latency: %"
735               GST_TIME_FORMAT, GST_TIME_ARGS (latency));
736
737           min += latency;
738           if (max != -1)
739             max += latency;
740
741           GST_DEBUG_OBJECT (videorate, "Calculated total latency : min %"
742               GST_TIME_FORMAT " max %" GST_TIME_FORMAT,
743               GST_TIME_ARGS (min), GST_TIME_ARGS (max));
744
745           gst_query_set_latency (query, live, min, max);
746         }
747         gst_object_unref (peer);
748       }
749       break;
750     }
751     default:
752       res = gst_pad_query_default (pad, query);
753       break;
754   }
755   gst_object_unref (videorate);
756
757   return res;
758 }
759
760 static GstFlowReturn
761 gst_video_rate_chain (GstPad * pad, GstBuffer * buffer)
762 {
763   GstVideoRate *videorate;
764   GstFlowReturn res = GST_FLOW_OK;
765   GstClockTime intime, in_ts, in_dur;
766
767   videorate = GST_VIDEO_RATE (GST_PAD_PARENT (pad));
768
769   /* make sure the denominators are not 0 */
770   if (videorate->from_rate_denominator == 0 ||
771       videorate->to_rate_denominator == 0)
772     goto not_negotiated;
773
774   in_ts = GST_BUFFER_TIMESTAMP (buffer);
775   in_dur = GST_BUFFER_DURATION (buffer);
776
777   if (G_UNLIKELY (in_ts == GST_CLOCK_TIME_NONE)) {
778     in_ts = videorate->last_ts;
779     if (G_UNLIKELY (in_ts == GST_CLOCK_TIME_NONE))
780       goto invalid_buffer;
781   }
782
783   /* get the time of the next expected buffer timestamp, we use this when the
784    * next buffer has -1 as a timestamp */
785   videorate->last_ts = in_ts;
786   if (in_dur != GST_CLOCK_TIME_NONE)
787     videorate->last_ts += in_dur;
788
789   GST_DEBUG_OBJECT (videorate, "got buffer with timestamp %" GST_TIME_FORMAT,
790       GST_TIME_ARGS (in_ts));
791
792   /* the input time is the time in the segment + all previously accumulated
793    * segments */
794   intime = in_ts + videorate->segment.accum;
795
796   /* we need to have two buffers to compare */
797   if (videorate->prevbuf == NULL) {
798     gst_video_rate_swap_prev (videorate, buffer, intime);
799     videorate->in++;
800     if (!GST_CLOCK_TIME_IS_VALID (videorate->next_ts)) {
801       /* new buffer, we expect to output a buffer that matches the first
802        * timestamp in the segment */
803       if (videorate->skip_to_first) {
804         videorate->next_ts = intime;
805         videorate->base_ts = in_ts - videorate->segment.start;
806         videorate->out_frame_count = 0;
807       } else {
808         videorate->next_ts =
809             videorate->segment.start + videorate->segment.accum;
810       }
811     }
812   } else {
813     GstClockTime prevtime;
814     gint count = 0;
815     gint64 diff1, diff2;
816
817     prevtime = videorate->prev_ts;
818
819     GST_LOG_OBJECT (videorate,
820         "BEGINNING prev buf %" GST_TIME_FORMAT " new buf %" GST_TIME_FORMAT
821         " outgoing ts %" GST_TIME_FORMAT, GST_TIME_ARGS (prevtime),
822         GST_TIME_ARGS (intime), GST_TIME_ARGS (videorate->next_ts));
823
824     videorate->in++;
825
826     /* drop new buffer if it's before previous one */
827     if (intime < prevtime) {
828       GST_DEBUG_OBJECT (videorate,
829           "The new buffer (%" GST_TIME_FORMAT
830           ") is before the previous buffer (%"
831           GST_TIME_FORMAT "). Dropping new buffer.",
832           GST_TIME_ARGS (intime), GST_TIME_ARGS (prevtime));
833       videorate->drop++;
834       if (!videorate->silent)
835         gst_video_rate_notify_drop (videorate);
836       gst_buffer_unref (buffer);
837       goto done;
838     }
839
840     /* got 2 buffers, see which one is the best */
841     do {
842
843       diff1 = prevtime - videorate->next_ts;
844       diff2 = intime - videorate->next_ts;
845
846       /* take absolute values, beware: abs and ABS don't work for gint64 */
847       if (diff1 < 0)
848         diff1 = -diff1;
849       if (diff2 < 0)
850         diff2 = -diff2;
851
852       GST_LOG_OBJECT (videorate,
853           "diff with prev %" GST_TIME_FORMAT " diff with new %"
854           GST_TIME_FORMAT " outgoing ts %" GST_TIME_FORMAT,
855           GST_TIME_ARGS (diff1), GST_TIME_ARGS (diff2),
856           GST_TIME_ARGS (videorate->next_ts));
857
858       /* output first one when its the best */
859       if (diff1 <= diff2) {
860         count++;
861
862         /* on error the _flush function posted a warning already */
863         if ((res =
864                 gst_video_rate_flush_prev (videorate,
865                     count > 1)) != GST_FLOW_OK) {
866           gst_buffer_unref (buffer);
867           goto done;
868         }
869       }
870       /* continue while the first one was the best, if they were equal avoid
871        * going into an infinite loop */
872     }
873     while (diff1 < diff2);
874
875     /* if we outputed the first buffer more then once, we have dups */
876     if (count > 1) {
877       videorate->dup += count - 1;
878       if (!videorate->silent)
879         gst_video_rate_notify_duplicate (videorate);
880     }
881     /* if we didn't output the first buffer, we have a drop */
882     else if (count == 0) {
883       videorate->drop++;
884
885       if (!videorate->silent)
886         gst_video_rate_notify_drop (videorate);
887
888       GST_LOG_OBJECT (videorate,
889           "new is best, old never used, drop, outgoing ts %"
890           GST_TIME_FORMAT, GST_TIME_ARGS (videorate->next_ts));
891     }
892     GST_LOG_OBJECT (videorate,
893         "END, putting new in old, diff1 %" GST_TIME_FORMAT
894         ", diff2 %" GST_TIME_FORMAT ", next_ts %" GST_TIME_FORMAT
895         ", in %" G_GUINT64_FORMAT ", out %" G_GUINT64_FORMAT ", drop %"
896         G_GUINT64_FORMAT ", dup %" G_GUINT64_FORMAT, GST_TIME_ARGS (diff1),
897         GST_TIME_ARGS (diff2), GST_TIME_ARGS (videorate->next_ts),
898         videorate->in, videorate->out, videorate->drop, videorate->dup);
899
900     /* swap in new one when it's the best */
901     gst_video_rate_swap_prev (videorate, buffer, intime);
902   }
903 done:
904   return res;
905
906   /* ERRORS */
907 not_negotiated:
908   {
909     GST_WARNING_OBJECT (videorate, "no framerate negotiated");
910     gst_buffer_unref (buffer);
911     res = GST_FLOW_NOT_NEGOTIATED;
912     goto done;
913   }
914
915 invalid_buffer:
916   {
917     GST_WARNING_OBJECT (videorate,
918         "Got buffer with GST_CLOCK_TIME_NONE timestamp, discarding it");
919     gst_buffer_unref (buffer);
920     goto done;
921   }
922 }
923
924 static void
925 gst_video_rate_set_property (GObject * object,
926     guint prop_id, const GValue * value, GParamSpec * pspec)
927 {
928   GstVideoRate *videorate = GST_VIDEO_RATE (object);
929
930   switch (prop_id) {
931     case ARG_SILENT:
932       videorate->silent = g_value_get_boolean (value);
933       break;
934     case ARG_NEW_PREF:
935       videorate->new_pref = g_value_get_double (value);
936       break;
937     case ARG_SKIP_TO_FIRST:
938       videorate->skip_to_first = g_value_get_boolean (value);
939       break;
940     default:
941       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
942       break;
943   }
944 }
945
946 static void
947 gst_video_rate_get_property (GObject * object,
948     guint prop_id, GValue * value, GParamSpec * pspec)
949 {
950   GstVideoRate *videorate = GST_VIDEO_RATE (object);
951
952   switch (prop_id) {
953     case ARG_IN:
954       g_value_set_uint64 (value, videorate->in);
955       break;
956     case ARG_OUT:
957       g_value_set_uint64 (value, videorate->out);
958       break;
959     case ARG_DUP:
960       g_value_set_uint64 (value, videorate->dup);
961       break;
962     case ARG_DROP:
963       g_value_set_uint64 (value, videorate->drop);
964       break;
965     case ARG_SILENT:
966       g_value_set_boolean (value, videorate->silent);
967       break;
968     case ARG_NEW_PREF:
969       g_value_set_double (value, videorate->new_pref);
970       break;
971     case ARG_SKIP_TO_FIRST:
972       g_value_set_boolean (value, videorate->skip_to_first);
973       break;
974     default:
975       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
976       break;
977   }
978 }
979
980 static GstStateChangeReturn
981 gst_video_rate_change_state (GstElement * element, GstStateChange transition)
982 {
983   GstStateChangeReturn ret;
984   GstVideoRate *videorate;
985
986   videorate = GST_VIDEO_RATE (element);
987
988   switch (transition) {
989     case GST_STATE_CHANGE_READY_TO_PAUSED:
990       videorate->discont = TRUE;
991       videorate->last_ts = -1;
992       break;
993     default:
994       break;
995   }
996
997   ret = parent_class->change_state (element, transition);
998
999   switch (transition) {
1000     case GST_STATE_CHANGE_PAUSED_TO_READY:
1001       gst_video_rate_reset (videorate);
1002       break;
1003     default:
1004       break;
1005   }
1006
1007   return ret;
1008 }
1009
1010 static gboolean
1011 plugin_init (GstPlugin * plugin)
1012 {
1013   GST_DEBUG_CATEGORY_INIT (video_rate_debug, "videorate", 0,
1014       "VideoRate stream fixer");
1015
1016   return gst_element_register (plugin, "videorate", GST_RANK_NONE,
1017       GST_TYPE_VIDEO_RATE);
1018 }
1019
1020 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
1021     GST_VERSION_MINOR,
1022     "videorate",
1023     "Adjusts video frames",
1024     plugin_init, VERSION, GST_LICENSE, GST_PACKAGE_NAME, GST_PACKAGE_ORIGIN)