Merge remote-tracking branch 'origin/master' into 0.11
[platform/upstream/gstreamer.git] / gst-libs / gst / pbutils / gstdiscoverer.c
1 /* GStreamer
2  * Copyright (C) 2009 Edward Hervey <edward.hervey@collabora.co.uk>
3  *               2009 Nokia Corporation
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Library General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Library General Public License for more details.
14  *
15  * You should have received a copy of the GNU Library General Public
16  * License along with this library; if not, write to the
17  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18  * Boston, MA 02111-1307, USA.
19  */
20
21 /**
22  * SECTION:gstdiscoverer
23  * @short_description: Utility for discovering information on URIs.
24  *
25  * The #GstDiscoverer is a utility object which allows to get as much
26  * information as possible from one or many URIs.
27  *
28  * It provides two APIs, allowing usage in blocking or non-blocking mode.
29  *
30  * The blocking mode just requires calling gst_discoverer_discover_uri()
31  * with the URI one wishes to discover.
32  *
33  * The non-blocking mode requires a running #GMainLoop in the default
34  * #GMainContext, where one connects to the various signals, appends the
35  * URIs to be processed (through gst_discoverer_discover_uri_async()) and then
36  * asks for the discovery to begin (through gst_discoverer_start()).
37  *
38  * All the information is returned in a #GstDiscovererInfo structure.
39  *
40  * Since: 0.10.31
41  */
42
43 #ifdef HAVE_CONFIG_H
44 #include "config.h"
45 #endif
46
47 #include <gst/video/video.h>
48
49 #include "pbutils.h"
50 #include "pbutils-marshal.h"
51 #include "pbutils-private.h"
52
53 GST_DEBUG_CATEGORY_STATIC (discoverer_debug);
54 #define GST_CAT_DEFAULT discoverer_debug
55
56 static GQuark _CAPS_QUARK;
57 static GQuark _TAGS_QUARK;
58 static GQuark _MISSING_PLUGIN_QUARK;
59 static GQuark _STREAM_TOPOLOGY_QUARK;
60 static GQuark _TOPOLOGY_PAD_QUARK;
61
62
63 typedef struct
64 {
65   GstDiscoverer *dc;
66   GstPad *pad;
67   GstElement *queue;
68   GstElement *sink;
69   GstTagList *tags;
70 } PrivateStream;
71
72 struct _GstDiscovererPrivate
73 {
74   gboolean async;
75
76   /* allowed time to discover each uri in nanoseconds */
77   GstClockTime timeout;
78
79   /* list of pending URI to process (current excluded) */
80   GList *pending_uris;
81
82   GMutex *lock;
83
84   /* TRUE if processing a URI */
85   gboolean processing;
86
87   /* TRUE if discoverer has been started */
88   gboolean running;
89
90   /* current items */
91   GstDiscovererInfo *current_info;
92   GError *current_error;
93   GstStructure *current_topology;
94
95   /* List of private streams */
96   GList *streams;
97
98   /* Global elements */
99   GstBin *pipeline;
100   GstElement *uridecodebin;
101   GstBus *bus;
102
103   GType decodebin_type;
104
105   /* Custom main context variables */
106   GMainContext *ctx;
107   guint sourceid;
108   guint timeoutid;
109
110   /* reusable queries */
111   GstQuery *seeking_query;
112
113   /* Handler ids for various callbacks */
114   gulong pad_added_id;
115   gulong pad_remove_id;
116   gulong element_added_id;
117   gulong bus_cb_id;
118 };
119
120 #define DISCO_LOCK(dc) g_mutex_lock (dc->priv->lock);
121 #define DISCO_UNLOCK(dc) g_mutex_unlock (dc->priv->lock);
122
123 static void
124 _do_init (void)
125 {
126   GST_DEBUG_CATEGORY_INIT (discoverer_debug, "discoverer", 0, "Discoverer");
127
128   _CAPS_QUARK = g_quark_from_static_string ("caps");
129   _TAGS_QUARK = g_quark_from_static_string ("tags");
130   _MISSING_PLUGIN_QUARK = g_quark_from_static_string ("missing-plugin");
131   _STREAM_TOPOLOGY_QUARK = g_quark_from_static_string ("stream-topology");
132   _TOPOLOGY_PAD_QUARK = g_quark_from_static_string ("pad");
133 };
134
135 G_DEFINE_TYPE_EXTENDED (GstDiscoverer, gst_discoverer, G_TYPE_OBJECT, 0,
136     _do_init ());
137
138 enum
139 {
140   SIGNAL_FINISHED,
141   SIGNAL_STARTING,
142   SIGNAL_DISCOVERED,
143   LAST_SIGNAL
144 };
145
146 #define DEFAULT_PROP_TIMEOUT 15 * GST_SECOND
147
148 enum
149 {
150   PROP_0,
151   PROP_TIMEOUT
152 };
153
154 static guint gst_discoverer_signals[LAST_SIGNAL] = { 0 };
155
156 static void gst_discoverer_set_timeout (GstDiscoverer * dc,
157     GstClockTime timeout);
158 static gboolean async_timeout_cb (GstDiscoverer * dc);
159
160 static void discoverer_bus_cb (GstBus * bus, GstMessage * msg,
161     GstDiscoverer * dc);
162 static void uridecodebin_pad_added_cb (GstElement * uridecodebin, GstPad * pad,
163     GstDiscoverer * dc);
164 static void uridecodebin_pad_removed_cb (GstElement * uridecodebin,
165     GstPad * pad, GstDiscoverer * dc);
166
167 static void gst_discoverer_dispose (GObject * dc);
168 static void gst_discoverer_set_property (GObject * object, guint prop_id,
169     const GValue * value, GParamSpec * pspec);
170 static void gst_discoverer_get_property (GObject * object, guint prop_id,
171     GValue * value, GParamSpec * pspec);
172
173 static void
174 gst_discoverer_class_init (GstDiscovererClass * klass)
175 {
176   GObjectClass *gobject_class = (GObjectClass *) klass;
177
178   gobject_class->dispose = gst_discoverer_dispose;
179
180   gobject_class->set_property = gst_discoverer_set_property;
181   gobject_class->get_property = gst_discoverer_get_property;
182
183   g_type_class_add_private (klass, sizeof (GstDiscovererPrivate));
184
185   /* properties */
186   /**
187    * GstDiscoverer:timeout
188    *
189    * The duration (in nanoseconds) after which the discovery of an individual
190    * URI will timeout.
191    *
192    * If the discovery of a URI times out, the %GST_DISCOVERER_TIMEOUT will be
193    * set on the result flags.
194    */
195   g_object_class_install_property (gobject_class, PROP_TIMEOUT,
196       g_param_spec_uint64 ("timeout", "timeout", "Timeout",
197           GST_SECOND, 3600 * GST_SECOND, DEFAULT_PROP_TIMEOUT,
198           G_PARAM_READWRITE | G_PARAM_CONSTRUCT | G_PARAM_STATIC_STRINGS));
199
200   /* signals */
201   /**
202    * GstDiscoverer::finished:
203    * @discoverer: the #GstDiscoverer
204    *
205    * Will be emitted when all pending URIs have been processed.
206    */
207   gst_discoverer_signals[SIGNAL_FINISHED] =
208       g_signal_new ("finished", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
209       G_STRUCT_OFFSET (GstDiscovererClass, finished),
210       NULL, NULL, g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0, G_TYPE_NONE);
211
212   /**
213    * GstDiscoverer::starting:
214    * @discoverer: the #GstDiscoverer
215    *
216    * Will be emitted when the discover starts analyzing the pending URIs
217    */
218   gst_discoverer_signals[SIGNAL_STARTING] =
219       g_signal_new ("starting", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
220       G_STRUCT_OFFSET (GstDiscovererClass, starting),
221       NULL, NULL, g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0, G_TYPE_NONE);
222
223   /**
224    * GstDiscoverer::discovered:
225    * @discoverer: the #GstDiscoverer
226    * @info: the results #GstDiscovererInfo
227    * @error: (type GLib.Error): #GError, which will be non-NULL if an error
228    *                            occurred during discovery
229    *
230    * Will be emitted when all information on a URI could be discovered.
231    */
232   gst_discoverer_signals[SIGNAL_DISCOVERED] =
233       g_signal_new ("discovered", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
234       G_STRUCT_OFFSET (GstDiscovererClass, discovered),
235       NULL, NULL, pbutils_marshal_VOID__POINTER_BOXED,
236       G_TYPE_NONE, 2, GST_TYPE_DISCOVERER_INFO, GST_TYPE_G_ERROR);
237 }
238
239 static void
240 uridecodebin_element_added_cb (GstElement * uridecodebin,
241     GstElement * child, GstDiscoverer * dc)
242 {
243   GST_DEBUG ("New element added to uridecodebin : %s",
244       GST_ELEMENT_NAME (child));
245
246   if (G_OBJECT_TYPE (child) == dc->priv->decodebin_type) {
247     g_object_set (child, "post-stream-topology", TRUE, NULL);
248   }
249 }
250
251 static void
252 gst_discoverer_init (GstDiscoverer * dc)
253 {
254   GstElement *tmp;
255   GstFormat format = GST_FORMAT_TIME;
256
257   dc->priv = G_TYPE_INSTANCE_GET_PRIVATE (dc, GST_TYPE_DISCOVERER,
258       GstDiscovererPrivate);
259
260   dc->priv->timeout = DEFAULT_PROP_TIMEOUT;
261   dc->priv->async = FALSE;
262
263   dc->priv->lock = g_mutex_new ();
264
265   GST_LOG ("Creating pipeline");
266   dc->priv->pipeline = (GstBin *) gst_pipeline_new ("Discoverer");
267   GST_LOG_OBJECT (dc, "Creating uridecodebin");
268   dc->priv->uridecodebin =
269       gst_element_factory_make ("uridecodebin", "discoverer-uri");
270   if (G_UNLIKELY (dc->priv->uridecodebin == NULL)) {
271     GST_ERROR ("Can't create uridecodebin");
272     return;
273   }
274   GST_LOG_OBJECT (dc, "Adding uridecodebin to pipeline");
275   gst_bin_add (dc->priv->pipeline, dc->priv->uridecodebin);
276
277   dc->priv->pad_added_id =
278       g_signal_connect_object (dc->priv->uridecodebin, "pad-added",
279       G_CALLBACK (uridecodebin_pad_added_cb), dc, 0);
280   dc->priv->pad_remove_id =
281       g_signal_connect_object (dc->priv->uridecodebin, "pad-removed",
282       G_CALLBACK (uridecodebin_pad_removed_cb), dc, 0);
283
284   GST_LOG_OBJECT (dc, "Getting pipeline bus");
285   dc->priv->bus = gst_pipeline_get_bus ((GstPipeline *) dc->priv->pipeline);
286
287   dc->priv->bus_cb_id =
288       g_signal_connect_object (dc->priv->bus, "message",
289       G_CALLBACK (discoverer_bus_cb), dc, 0);
290
291   GST_DEBUG_OBJECT (dc, "Done initializing Discoverer");
292
293   /* This is ugly. We get the GType of decodebin so we can quickly detect
294    * when a decodebin is added to uridecodebin so we can set the
295    * post-stream-topology setting to TRUE */
296   dc->priv->element_added_id =
297       g_signal_connect_object (dc->priv->uridecodebin, "element-added",
298       G_CALLBACK (uridecodebin_element_added_cb), dc, 0);
299   tmp = gst_element_factory_make ("decodebin", NULL);
300   dc->priv->decodebin_type = G_OBJECT_TYPE (tmp);
301   gst_object_unref (tmp);
302
303   /* create queries */
304   dc->priv->seeking_query = gst_query_new_seeking (format);
305 }
306
307 static void
308 discoverer_reset (GstDiscoverer * dc)
309 {
310   GST_DEBUG_OBJECT (dc, "Resetting");
311
312   if (dc->priv->pending_uris) {
313     g_list_foreach (dc->priv->pending_uris, (GFunc) g_free, NULL);
314     g_list_free (dc->priv->pending_uris);
315     dc->priv->pending_uris = NULL;
316   }
317
318   if (dc->priv->pipeline)
319     gst_element_set_state ((GstElement *) dc->priv->pipeline, GST_STATE_NULL);
320 }
321
322 #define DISCONNECT_SIGNAL(o,i) G_STMT_START{           \
323   if ((i) && g_signal_handler_is_connected ((o), (i))) \
324     g_signal_handler_disconnect ((o), (i));            \
325   (i) = 0;                                             \
326 }G_STMT_END
327
328 static void
329 gst_discoverer_dispose (GObject * obj)
330 {
331   GstDiscoverer *dc = (GstDiscoverer *) obj;
332
333   GST_DEBUG_OBJECT (dc, "Disposing");
334
335   discoverer_reset (dc);
336
337   if (G_LIKELY (dc->priv->pipeline)) {
338     /* Workaround for bug #118536 */
339     DISCONNECT_SIGNAL (dc->priv->uridecodebin, dc->priv->pad_added_id);
340     DISCONNECT_SIGNAL (dc->priv->uridecodebin, dc->priv->pad_remove_id);
341     DISCONNECT_SIGNAL (dc->priv->uridecodebin, dc->priv->element_added_id);
342     DISCONNECT_SIGNAL (dc->priv->bus, dc->priv->bus_cb_id);
343
344     /* pipeline was set to NULL in _reset */
345     gst_object_unref (dc->priv->pipeline);
346     gst_object_unref (dc->priv->bus);
347
348     dc->priv->pipeline = NULL;
349     dc->priv->uridecodebin = NULL;
350     dc->priv->bus = NULL;
351   }
352
353   gst_discoverer_stop (dc);
354
355   if (dc->priv->lock) {
356     g_mutex_free (dc->priv->lock);
357     dc->priv->lock = NULL;
358   }
359
360   if (dc->priv->seeking_query) {
361     gst_query_unref (dc->priv->seeking_query);
362     dc->priv->seeking_query = NULL;
363   }
364
365   G_OBJECT_CLASS (gst_discoverer_parent_class)->dispose (obj);
366 }
367
368 static void
369 gst_discoverer_set_property (GObject * object, guint prop_id,
370     const GValue * value, GParamSpec * pspec)
371 {
372   GstDiscoverer *dc = (GstDiscoverer *) object;
373
374   switch (prop_id) {
375     case PROP_TIMEOUT:
376       gst_discoverer_set_timeout (dc, g_value_get_uint64 (value));
377       break;
378     default:
379       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
380       break;
381   }
382 }
383
384 static void
385 gst_discoverer_get_property (GObject * object, guint prop_id,
386     GValue * value, GParamSpec * pspec)
387 {
388   GstDiscoverer *dc = (GstDiscoverer *) object;
389
390   switch (prop_id) {
391     case PROP_TIMEOUT:
392       DISCO_LOCK (dc);
393       g_value_set_uint64 (value, dc->priv->timeout);
394       DISCO_UNLOCK (dc);
395       break;
396     default:
397       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
398       break;
399   }
400 }
401
402 static void
403 gst_discoverer_set_timeout (GstDiscoverer * dc, GstClockTime timeout)
404 {
405   GST_DEBUG_OBJECT (dc, "timeout : %" GST_TIME_FORMAT, GST_TIME_ARGS (timeout));
406
407   /* FIXME : update current pending timeout if we're running */
408   DISCO_LOCK (dc);
409   dc->priv->timeout = timeout;
410   DISCO_UNLOCK (dc);
411 }
412
413 static GstProbeReturn
414 _event_probe (GstPad * pad, GstProbeType type, GstEvent * event,
415     PrivateStream * ps)
416 {
417   if (GST_EVENT_TYPE (event) == GST_EVENT_TAG) {
418     GstTagList *tl = NULL, *tmp;
419
420     gst_event_parse_tag (event, &tl);
421     GST_DEBUG_OBJECT (pad, "tags %" GST_PTR_FORMAT, tl);
422     DISCO_LOCK (ps->dc);
423     /* If preroll is complete, drop these tags - the collected information is
424      * possibly already being processed and adding more tags would be racy */
425     if (G_LIKELY (ps->dc->priv->processing)) {
426       GST_DEBUG_OBJECT (pad, "private stream %p old tags %" GST_PTR_FORMAT, ps,
427           ps->tags);
428       tmp = gst_tag_list_merge (ps->tags, tl, GST_TAG_MERGE_APPEND);
429       if (ps->tags)
430         gst_tag_list_free (ps->tags);
431       ps->tags = tmp;
432       GST_DEBUG_OBJECT (pad, "private stream %p new tags %" GST_PTR_FORMAT, ps,
433           tmp);
434     } else
435       GST_DEBUG_OBJECT (pad, "Dropping tags since preroll is done");
436     DISCO_UNLOCK (ps->dc);
437   }
438
439   return GST_PROBE_OK;
440 }
441
442 static gboolean
443 is_subtitle_caps (const GstCaps * caps)
444 {
445   static GstCaps *subs_caps = NULL;
446
447   if (!subs_caps) {
448     subs_caps = gst_caps_from_string ("text/plain; text/x-pango-markup; "
449         "subpicture/x-pgs; subpicture/x-dvb; application/x-subtitle-unknown; "
450         "application/x-ssa; application/x-ass; subtitle/x-kate; "
451         "application/x-kate; video/x-dvd-subpicture; ");
452   }
453
454   return gst_caps_can_intersect (caps, subs_caps);
455 }
456
457 static void
458 uridecodebin_pad_added_cb (GstElement * uridecodebin, GstPad * pad,
459     GstDiscoverer * dc)
460 {
461   PrivateStream *ps;
462   GstPad *sinkpad = NULL;
463   GstCaps *caps;
464
465   GST_DEBUG_OBJECT (dc, "pad %s:%s", GST_DEBUG_PAD_NAME (pad));
466
467   ps = g_slice_new0 (PrivateStream);
468
469   ps->dc = dc;
470   ps->pad = pad;
471   ps->queue = gst_element_factory_make ("queue", NULL);
472   ps->sink = gst_element_factory_make ("fakesink", NULL);
473
474   if (G_UNLIKELY (ps->queue == NULL || ps->sink == NULL))
475     goto error;
476
477   g_object_set (ps->sink, "silent", TRUE, NULL);
478   g_object_set (ps->queue, "max-size-buffers", 1, "silent", TRUE, NULL);
479
480   caps = gst_pad_get_caps (pad, NULL);
481
482   if (is_subtitle_caps (caps)) {
483     /* Subtitle streams are sparse and may not provide any information - don't
484      * wait for data to preroll */
485     g_object_set (ps->sink, "async", FALSE, NULL);
486   }
487
488   gst_caps_unref (caps);
489
490   gst_bin_add_many (dc->priv->pipeline, ps->queue, ps->sink, NULL);
491
492   if (!gst_element_link_pads_full (ps->queue, "src", ps->sink, "sink",
493           GST_PAD_LINK_CHECK_NOTHING))
494     goto error;
495   if (!gst_element_sync_state_with_parent (ps->sink))
496     goto error;
497   if (!gst_element_sync_state_with_parent (ps->queue))
498     goto error;
499
500   sinkpad = gst_element_get_static_pad (ps->queue, "sink");
501   if (sinkpad == NULL)
502     goto error;
503   if (gst_pad_link_full (pad, sinkpad,
504           GST_PAD_LINK_CHECK_NOTHING) != GST_PAD_LINK_OK)
505     goto error;
506   gst_object_unref (sinkpad);
507
508   /* Add an event probe */
509   gst_pad_add_probe (pad, GST_PROBE_TYPE_EVENT,
510       (GstPadProbeCallback) _event_probe, ps, NULL);
511
512   DISCO_LOCK (dc);
513   dc->priv->streams = g_list_append (dc->priv->streams, ps);
514   DISCO_UNLOCK (dc);
515
516   GST_DEBUG_OBJECT (dc, "Done handling pad");
517
518   return;
519
520 error:
521   GST_ERROR_OBJECT (dc, "Error while handling pad");
522   if (sinkpad)
523     gst_object_unref (sinkpad);
524   if (ps->queue)
525     gst_object_unref (ps->queue);
526   if (ps->sink)
527     gst_object_unref (ps->sink);
528   g_slice_free (PrivateStream, ps);
529   return;
530 }
531
532 static void
533 uridecodebin_pad_removed_cb (GstElement * uridecodebin, GstPad * pad,
534     GstDiscoverer * dc)
535 {
536   GList *tmp;
537   PrivateStream *ps;
538   GstPad *sinkpad;
539
540   GST_DEBUG_OBJECT (dc, "pad %s:%s", GST_DEBUG_PAD_NAME (pad));
541
542   /* Find the PrivateStream */
543   DISCO_LOCK (dc);
544   for (tmp = dc->priv->streams; tmp; tmp = tmp->next) {
545     ps = (PrivateStream *) tmp->data;
546     if (ps->pad == pad)
547       break;
548   }
549
550   if (tmp == NULL) {
551     DISCO_UNLOCK (dc);
552     GST_DEBUG ("The removed pad wasn't controlled by us !");
553     return;
554   }
555
556   dc->priv->streams = g_list_delete_link (dc->priv->streams, tmp);
557   DISCO_UNLOCK (dc);
558
559   gst_element_set_state (ps->sink, GST_STATE_NULL);
560   gst_element_set_state (ps->queue, GST_STATE_NULL);
561   gst_element_unlink (ps->queue, ps->sink);
562
563   sinkpad = gst_element_get_static_pad (ps->queue, "sink");
564   gst_pad_unlink (pad, sinkpad);
565   gst_object_unref (sinkpad);
566
567   /* references removed here */
568   gst_bin_remove_many (dc->priv->pipeline, ps->sink, ps->queue, NULL);
569
570   if (ps->tags) {
571     gst_tag_list_free (ps->tags);
572   }
573
574   g_slice_free (PrivateStream, ps);
575
576   GST_DEBUG ("Done handling pad");
577 }
578
579 static GstStructure *
580 collect_stream_information (GstDiscoverer * dc, PrivateStream * ps, guint idx)
581 {
582   GstCaps *caps;
583   GstStructure *st;
584   gchar *stname;
585
586   stname = g_strdup_printf ("stream-%02d", idx);
587   st = gst_structure_empty_new (stname);
588   g_free (stname);
589
590   /* Get caps */
591   caps = gst_pad_get_current_caps (ps->pad);
592   if (!caps) {
593     GST_WARNING ("Couldn't get negotiated caps from %s:%s",
594         GST_DEBUG_PAD_NAME (ps->pad));
595     caps = gst_pad_get_caps (ps->pad, NULL);
596   }
597   if (caps) {
598     GST_DEBUG ("Got caps %" GST_PTR_FORMAT, caps);
599     gst_structure_id_set (st, _CAPS_QUARK, GST_TYPE_CAPS, caps, NULL);
600
601     gst_caps_unref (caps);
602   }
603   if (ps->tags)
604     gst_structure_id_set (st, _TAGS_QUARK, GST_TYPE_STRUCTURE, ps->tags, NULL);
605
606   return st;
607 }
608
609 /* Parses a set of caps and tags in st and populates a GstDiscovererStreamInfo
610  * structure (parent, if !NULL, otherwise it allocates one)
611  */
612 static GstDiscovererStreamInfo *
613 collect_information (GstDiscoverer * dc, const GstStructure * st,
614     GstDiscovererStreamInfo * parent)
615 {
616   GstCaps *caps;
617   GstStructure *caps_st, *tags_st;
618   const gchar *name;
619   int tmp;
620   guint utmp;
621
622   if (!st || !gst_structure_id_has_field (st, _CAPS_QUARK)) {
623     GST_WARNING ("Couldn't find caps !");
624     if (parent)
625       return parent;
626     else
627       return (GstDiscovererStreamInfo *)
628           g_object_new (GST_TYPE_DISCOVERER_STREAM_INFO, NULL);
629   }
630
631   gst_structure_id_get (st, _CAPS_QUARK, GST_TYPE_CAPS, &caps, NULL);
632   caps_st = gst_caps_get_structure (caps, 0);
633   name = gst_structure_get_name (caps_st);
634
635   if (g_str_has_prefix (name, "audio/")) {
636     GstDiscovererAudioInfo *info;
637
638     if (parent)
639       info = (GstDiscovererAudioInfo *) parent;
640     else {
641       info = (GstDiscovererAudioInfo *)
642           g_object_new (GST_TYPE_DISCOVERER_AUDIO_INFO, NULL);
643       info->parent.caps = caps;
644     }
645
646     if (gst_structure_get_int (caps_st, "rate", &tmp))
647       info->sample_rate = (guint) tmp;
648
649     if (gst_structure_get_int (caps_st, "channels", &tmp))
650       info->channels = (guint) tmp;
651
652     if (gst_structure_get_int (caps_st, "depth", &tmp))
653       info->depth = (guint) tmp;
654
655     if (gst_structure_id_has_field (st, _TAGS_QUARK)) {
656       gst_structure_id_get (st, _TAGS_QUARK,
657           GST_TYPE_STRUCTURE, &tags_st, NULL);
658       if (gst_structure_get_uint (tags_st, GST_TAG_BITRATE, &utmp) ||
659           gst_structure_get_uint (tags_st, GST_TAG_NOMINAL_BITRATE, &utmp))
660         info->bitrate = utmp;
661
662       if (gst_structure_get_uint (tags_st, GST_TAG_MAXIMUM_BITRATE, &utmp))
663         info->max_bitrate = utmp;
664
665       /* FIXME: Is it worth it to remove the tags we've parsed? */
666       info->parent.tags = gst_tag_list_merge (info->parent.tags,
667           (GstTagList *) tags_st, GST_TAG_MERGE_REPLACE);
668
669       gst_structure_free (tags_st);
670     }
671
672     if (!info->language && ((GstDiscovererStreamInfo *) info)->tags) {
673       gchar *language;
674       if (gst_tag_list_get_string (((GstDiscovererStreamInfo *) info)->tags,
675               GST_TAG_LANGUAGE_CODE, &language)) {
676         info->language = language;
677       }
678     }
679
680     return (GstDiscovererStreamInfo *) info;
681
682   } else if (g_str_has_prefix (name, "video/") ||
683       g_str_has_prefix (name, "image/")) {
684     GstDiscovererVideoInfo *info;
685     GstVideoInfo vinfo;
686
687     if (parent)
688       info = (GstDiscovererVideoInfo *) parent;
689     else {
690       info = (GstDiscovererVideoInfo *)
691           g_object_new (GST_TYPE_DISCOVERER_VIDEO_INFO, NULL);
692       info->parent.caps = caps;
693     }
694
695     if (gst_video_info_from_caps (&vinfo, caps)) {
696       info->width = (guint) vinfo.width;
697       info->height = (guint) vinfo.height;
698
699       info->depth = (guint) 0;
700
701       info->par_num = vinfo.par_n;
702       info->par_denom = vinfo.par_d;
703
704       info->framerate_num = vinfo.fps_n;
705       info->framerate_denom = vinfo.fps_d;
706
707       info->interlaced = (vinfo.flags & GST_VIDEO_FLAG_INTERLACED) != 0;
708     }
709
710     if (gst_structure_id_has_field (st, _TAGS_QUARK)) {
711       gst_structure_id_get (st, _TAGS_QUARK,
712           GST_TYPE_STRUCTURE, &tags_st, NULL);
713       if (gst_structure_get_uint (tags_st, GST_TAG_BITRATE, &utmp) ||
714           gst_structure_get_uint (tags_st, GST_TAG_NOMINAL_BITRATE, &utmp))
715         info->bitrate = utmp;
716
717       if (gst_structure_get_uint (tags_st, GST_TAG_MAXIMUM_BITRATE, &utmp))
718         info->max_bitrate = utmp;
719
720       /* FIXME: Is it worth it to remove the tags we've parsed? */
721       info->parent.tags = gst_tag_list_merge (info->parent.tags,
722           (GstTagList *) tags_st, GST_TAG_MERGE_REPLACE);
723       gst_structure_free (tags_st);
724     }
725
726     return (GstDiscovererStreamInfo *) info;
727
728   } else if (is_subtitle_caps (caps)) {
729     GstDiscovererSubtitleInfo *info;
730
731     if (parent)
732       info = (GstDiscovererSubtitleInfo *) parent;
733     else {
734       info = (GstDiscovererSubtitleInfo *)
735           g_object_new (GST_TYPE_DISCOVERER_SUBTITLE_INFO, NULL);
736       info->parent.caps = caps;
737     }
738
739     if (gst_structure_id_has_field (st, _TAGS_QUARK)) {
740       const gchar *language;
741
742       gst_structure_id_get (st, _TAGS_QUARK,
743           GST_TYPE_STRUCTURE, &tags_st, NULL);
744
745       language = gst_structure_get_string (caps_st, GST_TAG_LANGUAGE_CODE);
746       if (language)
747         info->language = g_strdup (language);
748
749       /* FIXME: Is it worth it to remove the tags we've parsed? */
750       info->parent.tags = gst_tag_list_merge (info->parent.tags,
751           (GstTagList *) tags_st, GST_TAG_MERGE_REPLACE);
752       gst_structure_free (tags_st);
753
754     }
755
756     if (!info->language && ((GstDiscovererStreamInfo *) info)->tags) {
757       gchar *language;
758       if (gst_tag_list_get_string (((GstDiscovererStreamInfo *) info)->tags,
759               GST_TAG_LANGUAGE_CODE, &language)) {
760         info->language = language;
761       }
762     }
763
764     return (GstDiscovererStreamInfo *) info;
765
766   } else {
767     /* None of the above - populate what information we can */
768     GstDiscovererStreamInfo *info;
769
770     if (parent)
771       info = parent;
772     else {
773       info = (GstDiscovererStreamInfo *)
774           g_object_new (GST_TYPE_DISCOVERER_STREAM_INFO, NULL);
775       info->caps = caps;
776     }
777
778     if (gst_structure_id_get (st, _TAGS_QUARK,
779             GST_TYPE_STRUCTURE, &tags_st, NULL)) {
780       info->tags = gst_tag_list_merge (info->tags, (GstTagList *) tags_st,
781           GST_TAG_MERGE_REPLACE);
782       gst_structure_free (tags_st);
783     }
784
785     return info;
786   }
787
788 }
789
790 static GstStructure *
791 find_stream_for_node (GstDiscoverer * dc, const GstStructure * topology)
792 {
793   GstPad *pad;
794   GstPad *target_pad = NULL;
795   GstStructure *st = NULL;
796   PrivateStream *ps;
797   guint i;
798   GList *tmp;
799
800   if (!gst_structure_id_has_field (topology, _TOPOLOGY_PAD_QUARK)) {
801     GST_DEBUG ("Could not find pad for node %" GST_PTR_FORMAT "\n", topology);
802     return NULL;
803   }
804
805   gst_structure_id_get (topology, _TOPOLOGY_PAD_QUARK,
806       GST_TYPE_PAD, &pad, NULL);
807
808   if (!dc->priv->streams)
809     return NULL;
810
811   for (i = 0, tmp = dc->priv->streams; tmp; tmp = tmp->next, i++) {
812     ps = (PrivateStream *) tmp->data;
813
814     target_pad = gst_ghost_pad_get_target (GST_GHOST_PAD (ps->pad));
815     gst_object_unref (target_pad);
816
817     if (target_pad == pad)
818       break;
819   }
820
821   if (tmp)
822     st = collect_stream_information (dc, ps, i);
823
824   gst_object_unref (pad);
825
826   return st;
827 }
828
829 static gboolean
830 child_is_raw_stream (GstCaps * parent, GstCaps * child)
831 {
832   GstStructure *st1, *st2;
833   const gchar *name1, *name2;
834
835   st1 = gst_caps_get_structure (parent, 0);
836   name1 = gst_structure_get_name (st1);
837   st2 = gst_caps_get_structure (child, 0);
838   name2 = gst_structure_get_name (st2);
839
840   if ((g_str_has_prefix (name1, "audio/") &&
841           g_str_has_prefix (name2, "audio/x-raw")) ||
842       ((g_str_has_prefix (name1, "video/") ||
843               g_str_has_prefix (name1, "image/")) &&
844           g_str_has_prefix (name2, "video/x-raw"))) {
845     /* child is the "raw" sub-stream corresponding to parent */
846     return TRUE;
847   }
848
849   if (is_subtitle_caps (parent))
850     return TRUE;
851
852   return FALSE;
853 }
854
855 /* If a parent is non-NULL, collected stream information will be appended to it
856  * (and where the information exists, it will be overriden)
857  */
858 static GstDiscovererStreamInfo *
859 parse_stream_topology (GstDiscoverer * dc, const GstStructure * topology,
860     GstDiscovererStreamInfo * parent)
861 {
862   GstDiscovererStreamInfo *res = NULL;
863   GstCaps *caps = NULL;
864   const GValue *nval = NULL;
865
866   GST_DEBUG ("parsing: %" GST_PTR_FORMAT, topology);
867
868   nval = gst_structure_get_value (topology, "next");
869
870   if (nval == NULL || GST_VALUE_HOLDS_STRUCTURE (nval)) {
871     GstStructure *st = find_stream_for_node (dc, topology);
872     gboolean add_to_list = TRUE;
873
874     if (st) {
875       res = collect_information (dc, st, parent);
876       gst_structure_free (st);
877     } else {
878       /* Didn't find a stream structure, so let's just use the caps we have */
879       res = collect_information (dc, topology, parent);
880     }
881
882     if (nval == NULL) {
883       /* FIXME : aggregate with information from main streams */
884       GST_DEBUG ("Coudn't find 'next' ! might be the last entry");
885     } else {
886       GstCaps *caps;
887       const GstStructure *st;
888
889       st = gst_value_get_structure (nval);
890
891       GST_DEBUG ("next is a structure %" GST_PTR_FORMAT, st);
892
893       if (!parent)
894         parent = res;
895
896       if (gst_structure_id_get (st, _CAPS_QUARK, GST_TYPE_CAPS, &caps, NULL)) {
897         if (gst_caps_can_intersect (parent->caps, caps)) {
898           /* We sometimes get an extra sub-stream from the parser. If this is
899            * the case, we just replace the parent caps with this stream's caps
900            * since they might contain more information */
901           gst_caps_unref (parent->caps);
902           parent->caps = caps;
903
904           parse_stream_topology (dc, st, parent);
905           add_to_list = FALSE;
906
907         } else if (child_is_raw_stream (parent->caps, caps)) {
908           /* This is the "raw" stream corresponding to the parent. This
909            * contains more information than the parent, tags etc. */
910           parse_stream_topology (dc, st, parent);
911           add_to_list = FALSE;
912           gst_caps_unref (caps);
913
914         } else {
915           GstDiscovererStreamInfo *next = parse_stream_topology (dc, st, NULL);
916           res->next = next;
917           next->previous = res;
918         }
919       }
920     }
921
922     if (add_to_list) {
923       dc->priv->current_info->stream_list =
924           g_list_append (dc->priv->current_info->stream_list, res);
925     }
926
927   } else if (GST_VALUE_HOLDS_LIST (nval)) {
928     guint i, len;
929     GstDiscovererContainerInfo *cont;
930     GstTagList *tags;
931
932     if (!gst_structure_id_get (topology, _CAPS_QUARK,
933             GST_TYPE_CAPS, &caps, NULL))
934       GST_WARNING ("Couldn't find caps !");
935
936     len = gst_value_list_get_size (nval);
937     GST_DEBUG ("next is a list of %d entries", len);
938
939     cont = (GstDiscovererContainerInfo *)
940         g_object_new (GST_TYPE_DISCOVERER_CONTAINER_INFO, NULL);
941     cont->parent.caps = caps;
942     res = (GstDiscovererStreamInfo *) cont;
943
944     if (gst_structure_id_has_field (topology, _TAGS_QUARK)) {
945       GstTagList *tmp;
946
947       gst_structure_id_get (topology, _TAGS_QUARK,
948           GST_TYPE_STRUCTURE, &tags, NULL);
949
950       GST_DEBUG ("Merge tags %" GST_PTR_FORMAT, tags);
951
952       tmp =
953           gst_tag_list_merge (cont->parent.tags, (GstTagList *) tags,
954           GST_TAG_MERGE_APPEND);
955       gst_tag_list_free (tags);
956       if (cont->parent.tags)
957         gst_tag_list_free (cont->parent.tags);
958       cont->parent.tags = tmp;
959       GST_DEBUG ("Container info tags %" GST_PTR_FORMAT, tmp);
960     }
961
962     for (i = 0; i < len; i++) {
963       const GValue *subv = gst_value_list_get_value (nval, i);
964       const GstStructure *subst = gst_value_get_structure (subv);
965       GstDiscovererStreamInfo *substream;
966
967       GST_DEBUG ("%d %" GST_PTR_FORMAT, i, subst);
968
969       substream = parse_stream_topology (dc, subst, NULL);
970
971       substream->previous = res;
972       cont->streams =
973           g_list_append (cont->streams,
974           gst_discoverer_stream_info_ref (substream));
975     }
976   }
977
978   return res;
979 }
980
981 /* Called when pipeline is pre-rolled */
982 static void
983 discoverer_collect (GstDiscoverer * dc)
984 {
985   GST_DEBUG ("Collecting information");
986
987   /* Stop the timeout handler if present */
988   if (dc->priv->timeoutid) {
989     g_source_remove (dc->priv->timeoutid);
990     dc->priv->timeoutid = 0;
991   }
992
993   if (dc->priv->streams) {
994     /* FIXME : Make this querying optional */
995     if (TRUE) {
996       GstElement *pipeline = (GstElement *) dc->priv->pipeline;
997       gint64 dur;
998
999       GST_DEBUG ("Attempting to query duration");
1000
1001       if (gst_element_query_duration (pipeline, GST_FORMAT_TIME, &dur)) {
1002         GST_DEBUG ("Got duration %" GST_TIME_FORMAT, GST_TIME_ARGS (dur));
1003         dc->priv->current_info->duration = (guint64) dur;
1004       }
1005
1006       if (dc->priv->seeking_query) {
1007         if (gst_element_query (pipeline, dc->priv->seeking_query)) {
1008           GstFormat format;
1009           gboolean seekable;
1010
1011           gst_query_parse_seeking (dc->priv->seeking_query, &format,
1012               &seekable, NULL, NULL);
1013           if (format == GST_FORMAT_TIME) {
1014             GST_DEBUG ("Got seekable %d", seekable);
1015             dc->priv->current_info->seekable = seekable;
1016           }
1017         }
1018       }
1019     }
1020
1021     if (dc->priv->current_topology)
1022       dc->priv->current_info->stream_info = parse_stream_topology (dc,
1023           dc->priv->current_topology, NULL);
1024
1025     /*
1026      * Images need some special handling. They do not have a duration, have
1027      * caps named image/<foo> (th exception being MJPEG video which is also
1028      * type image/jpeg), and should consist of precisely one stream (actually
1029      * initially there are 2, the image and raw stream, but we squash these
1030      * while parsing the stream topology). At some point, if we find that these
1031      * conditions are not sufficient, we can count the number of decoders and
1032      * parsers in the chain, and if there's more than one decoder, or any
1033      * parser at all, we should not mark this as an image.
1034      */
1035     if (dc->priv->current_info->duration == 0 &&
1036         dc->priv->current_info->stream_info != NULL &&
1037         dc->priv->current_info->stream_info->next == NULL) {
1038       GstStructure *st =
1039           gst_caps_get_structure (dc->priv->current_info->stream_info->caps, 0);
1040
1041       if (g_str_has_prefix (gst_structure_get_name (st), "image/"))
1042         ((GstDiscovererVideoInfo *) dc->priv->current_info->stream_info)->
1043             is_image = TRUE;
1044     }
1045   }
1046
1047   if (dc->priv->async) {
1048     GST_DEBUG ("Emitting 'discoverered'");
1049     g_signal_emit (dc, gst_discoverer_signals[SIGNAL_DISCOVERED], 0,
1050         dc->priv->current_info, dc->priv->current_error);
1051     /* Clients get a copy of current_info since it is a boxed type */
1052     gst_discoverer_info_unref (dc->priv->current_info);
1053   }
1054 }
1055
1056 static void
1057 get_async_cb (gpointer cb_data, GSource * source, GSourceFunc * func,
1058     gpointer * data)
1059 {
1060   *func = (GSourceFunc) async_timeout_cb;
1061   *data = cb_data;
1062 }
1063
1064 /* Wrapper since GSourceCallbackFuncs don't expect a return value from ref() */
1065 static void
1066 _void_g_object_ref (gpointer object)
1067 {
1068   g_object_ref (G_OBJECT (object));
1069 }
1070
1071 static void
1072 handle_current_async (GstDiscoverer * dc)
1073 {
1074   GSource *source;
1075   static GSourceCallbackFuncs cb_funcs = {
1076     _void_g_object_ref,
1077     g_object_unref,
1078     get_async_cb,
1079   };
1080
1081   /* Attach a timeout to the main context */
1082   source = g_timeout_source_new (dc->priv->timeout / GST_MSECOND);
1083   g_source_set_callback_indirect (source, g_object_ref (dc), &cb_funcs);
1084   dc->priv->timeoutid = g_source_attach (source, dc->priv->ctx);
1085   g_source_unref (source);
1086 }
1087
1088
1089 /* Returns TRUE if processing should stop */
1090 static gboolean
1091 handle_message (GstDiscoverer * dc, GstMessage * msg)
1092 {
1093   gboolean done = FALSE;
1094
1095   GST_DEBUG_OBJECT (GST_MESSAGE_SRC (msg), "got a %s message",
1096       GST_MESSAGE_TYPE_NAME (msg));
1097
1098   switch (GST_MESSAGE_TYPE (msg)) {
1099     case GST_MESSAGE_ERROR:{
1100       GError *gerr;
1101       gchar *debug;
1102
1103       gst_message_parse_error (msg, &gerr, &debug);
1104       GST_WARNING_OBJECT (GST_MESSAGE_SRC (msg),
1105           "Got an error [debug:%s], [message:%s]", debug, gerr->message);
1106       dc->priv->current_error = gerr;
1107       g_free (debug);
1108
1109       /* We need to stop */
1110       done = TRUE;
1111
1112       GST_DEBUG ("Setting result to ERROR");
1113       dc->priv->current_info->result = GST_DISCOVERER_ERROR;
1114     }
1115       break;
1116
1117     case GST_MESSAGE_EOS:
1118       GST_DEBUG ("Got EOS !");
1119       done = TRUE;
1120       break;
1121
1122     case GST_MESSAGE_ASYNC_DONE:
1123       if (GST_MESSAGE_SRC (msg) == (GstObject *) dc->priv->pipeline) {
1124         GST_DEBUG ("Finished changing state asynchronously");
1125         done = TRUE;
1126
1127       }
1128       break;
1129
1130     case GST_MESSAGE_ELEMENT:
1131     {
1132       GQuark sttype;
1133       const GstStructure *structure;
1134
1135       structure = gst_message_get_structure (msg);
1136       sttype = gst_structure_get_name_id (structure);
1137       GST_DEBUG_OBJECT (GST_MESSAGE_SRC (msg),
1138           "structure %" GST_PTR_FORMAT, structure);
1139       if (sttype == _MISSING_PLUGIN_QUARK) {
1140         GST_DEBUG_OBJECT (GST_MESSAGE_SRC (msg),
1141             "Setting result to MISSING_PLUGINS");
1142         dc->priv->current_info->result = GST_DISCOVERER_MISSING_PLUGINS;
1143         dc->priv->current_info->misc = gst_structure_copy (structure);
1144       } else if (sttype == _STREAM_TOPOLOGY_QUARK) {
1145         dc->priv->current_topology = gst_structure_copy (structure);
1146       }
1147     }
1148       break;
1149
1150     case GST_MESSAGE_TAG:
1151     {
1152       GstTagList *tl, *tmp;
1153
1154       gst_message_parse_tag (msg, &tl);
1155       GST_DEBUG_OBJECT (GST_MESSAGE_SRC (msg), "Got tags %" GST_PTR_FORMAT, tl);
1156       /* Merge with current tags */
1157       tmp =
1158           gst_tag_list_merge (dc->priv->current_info->tags, tl,
1159           GST_TAG_MERGE_APPEND);
1160       gst_tag_list_free (tl);
1161       if (dc->priv->current_info->tags)
1162         gst_tag_list_free (dc->priv->current_info->tags);
1163       dc->priv->current_info->tags = tmp;
1164       GST_DEBUG_OBJECT (GST_MESSAGE_SRC (msg), "Current info %p, tags %"
1165           GST_PTR_FORMAT, dc->priv->current_info, tmp);
1166     }
1167       break;
1168
1169     default:
1170       break;
1171   }
1172
1173   return done;
1174 }
1175
1176
1177 static void
1178 handle_current_sync (GstDiscoverer * dc)
1179 {
1180   GTimer *timer;
1181   gdouble deadline = ((gdouble) dc->priv->timeout) / GST_SECOND;
1182   GstMessage *msg;
1183   gboolean done = FALSE;
1184
1185   timer = g_timer_new ();
1186   g_timer_start (timer);
1187
1188   do {
1189     /* poll bus with timeout */
1190     /* FIXME : make the timeout more fine-tuned */
1191     if ((msg = gst_bus_timed_pop (dc->priv->bus, GST_SECOND / 2))) {
1192       done = handle_message (dc, msg);
1193       gst_message_unref (msg);
1194     }
1195
1196   } while (!done && (g_timer_elapsed (timer, NULL) < deadline));
1197
1198   /* return result */
1199   if (!done) {
1200     GST_DEBUG ("we timed out! Setting result to TIMEOUT");
1201     dc->priv->current_info->result = GST_DISCOVERER_TIMEOUT;
1202   }
1203
1204   GST_DEBUG ("Done");
1205
1206   g_timer_stop (timer);
1207   g_timer_destroy (timer);
1208 }
1209
1210 static void
1211 _setup_locked (GstDiscoverer * dc)
1212 {
1213   GstStateChangeReturn ret;
1214
1215   GST_DEBUG ("Setting up");
1216
1217   /* Pop URI off the pending URI list */
1218   dc->priv->current_info =
1219       (GstDiscovererInfo *) g_object_new (GST_TYPE_DISCOVERER_INFO, NULL);
1220   dc->priv->current_info->uri = (gchar *) dc->priv->pending_uris->data;
1221   dc->priv->pending_uris =
1222       g_list_delete_link (dc->priv->pending_uris, dc->priv->pending_uris);
1223
1224   /* set uri on uridecodebin */
1225   g_object_set (dc->priv->uridecodebin, "uri", dc->priv->current_info->uri,
1226       NULL);
1227
1228   GST_DEBUG ("Current is now %s", dc->priv->current_info->uri);
1229
1230   dc->priv->processing = TRUE;
1231
1232   /* set pipeline to PAUSED */
1233   DISCO_UNLOCK (dc);
1234   GST_DEBUG ("Setting pipeline to PAUSED");
1235   ret =
1236       gst_element_set_state ((GstElement *) dc->priv->pipeline,
1237       GST_STATE_PAUSED);
1238   DISCO_LOCK (dc);
1239
1240   GST_DEBUG_OBJECT (dc, "Pipeline going to PAUSED : %s",
1241       gst_element_state_change_return_get_name (ret));
1242 }
1243
1244 static void
1245 discoverer_cleanup (GstDiscoverer * dc)
1246 {
1247   GST_DEBUG ("Cleaning up");
1248
1249   gst_bus_set_flushing (dc->priv->bus, TRUE);
1250   gst_element_set_state ((GstElement *) dc->priv->pipeline, GST_STATE_READY);
1251   gst_bus_set_flushing (dc->priv->bus, FALSE);
1252
1253   DISCO_LOCK (dc);
1254   if (dc->priv->current_error)
1255     g_error_free (dc->priv->current_error);
1256   dc->priv->current_error = NULL;
1257   if (dc->priv->current_topology) {
1258     gst_structure_free (dc->priv->current_topology);
1259     dc->priv->current_topology = NULL;
1260   }
1261
1262   dc->priv->current_info = NULL;
1263
1264   /* Try popping the next uri */
1265   if (dc->priv->async) {
1266     if (dc->priv->pending_uris != NULL) {
1267       _setup_locked (dc);
1268       DISCO_UNLOCK (dc);
1269       /* Start timeout */
1270       handle_current_async (dc);
1271     } else {
1272       /* We're done ! */
1273       DISCO_UNLOCK (dc);
1274       g_signal_emit (dc, gst_discoverer_signals[SIGNAL_FINISHED], 0);
1275     }
1276   } else
1277     DISCO_UNLOCK (dc);
1278
1279   GST_DEBUG ("out");
1280 }
1281
1282 static void
1283 discoverer_bus_cb (GstBus * bus, GstMessage * msg, GstDiscoverer * dc)
1284 {
1285   if (dc->priv->processing) {
1286     if (handle_message (dc, msg)) {
1287       GST_DEBUG ("Stopping asynchronously");
1288       /* Serialise with _event_probe() */
1289       DISCO_LOCK (dc);
1290       dc->priv->processing = FALSE;
1291       DISCO_UNLOCK (dc);
1292       discoverer_collect (dc);
1293       discoverer_cleanup (dc);
1294     }
1295   }
1296 }
1297
1298 static gboolean
1299 async_timeout_cb (GstDiscoverer * dc)
1300 {
1301   if (!g_source_is_destroyed (g_main_current_source ())) {
1302     dc->priv->timeoutid = 0;
1303     GST_DEBUG ("Setting result to TIMEOUT");
1304     dc->priv->current_info->result = GST_DISCOVERER_TIMEOUT;
1305     dc->priv->processing = FALSE;
1306     discoverer_collect (dc);
1307     discoverer_cleanup (dc);
1308   }
1309   return FALSE;
1310 }
1311
1312 /* If there is a pending URI, it will pop it from the list of pending
1313  * URIs and start the discovery on it.
1314  *
1315  * Returns GST_DISCOVERER_OK if the next URI was popped and is processing,
1316  * else a error flag.
1317  */
1318 static GstDiscovererResult
1319 start_discovering (GstDiscoverer * dc)
1320 {
1321   GstDiscovererResult res = GST_DISCOVERER_OK;
1322
1323   GST_DEBUG ("Starting");
1324
1325   DISCO_LOCK (dc);
1326   if (dc->priv->pending_uris == NULL) {
1327     GST_WARNING ("No URI to process");
1328     res = GST_DISCOVERER_URI_INVALID;
1329     DISCO_UNLOCK (dc);
1330     goto beach;
1331   }
1332
1333   if (dc->priv->current_info != NULL) {
1334     GST_WARNING ("Already processing a file");
1335     res = GST_DISCOVERER_BUSY;
1336     DISCO_UNLOCK (dc);
1337     goto beach;
1338   }
1339
1340   g_signal_emit (dc, gst_discoverer_signals[SIGNAL_STARTING], 0);
1341
1342   _setup_locked (dc);
1343
1344   DISCO_UNLOCK (dc);
1345
1346   if (dc->priv->async)
1347     handle_current_async (dc);
1348   else
1349     handle_current_sync (dc);
1350
1351 beach:
1352   return res;
1353 }
1354
1355
1356 /**
1357  * gst_discoverer_start:
1358  * @discoverer: A #GstDiscoverer
1359  *
1360  * Allow asynchronous discovering of URIs to take place.
1361  * A #GMainLoop must be available for #GstDiscoverer to properly work in
1362  * asynchronous mode.
1363  *
1364  * Since: 0.10.31
1365  */
1366 void
1367 gst_discoverer_start (GstDiscoverer * discoverer)
1368 {
1369   GSource *source;
1370   GMainContext *ctx = NULL;
1371
1372   GST_DEBUG_OBJECT (discoverer, "Starting...");
1373
1374   if (discoverer->priv->async) {
1375     GST_DEBUG_OBJECT (discoverer, "We were already started");
1376     return;
1377   }
1378
1379   discoverer->priv->async = TRUE;
1380   discoverer->priv->running = TRUE;
1381
1382   ctx = g_main_context_get_thread_default ();
1383
1384   /* Connect to bus signals */
1385   if (ctx == NULL)
1386     ctx = g_main_context_default ();
1387
1388   source = gst_bus_create_watch (discoverer->priv->bus);
1389   g_source_set_callback (source, (GSourceFunc) gst_bus_async_signal_func,
1390       NULL, NULL);
1391   discoverer->priv->sourceid = g_source_attach (source, ctx);
1392   g_source_unref (source);
1393   discoverer->priv->ctx = g_main_context_ref (ctx);
1394
1395   start_discovering (discoverer);
1396   GST_DEBUG_OBJECT (discoverer, "Started");
1397 }
1398
1399 /**
1400  * gst_discoverer_stop:
1401  * @discoverer: A #GstDiscoverer
1402  *
1403  * Stop the discovery of any pending URIs and clears the list of
1404  * pending URIS (if any).
1405  *
1406  * Since: 0.10.31
1407  */
1408 void
1409 gst_discoverer_stop (GstDiscoverer * discoverer)
1410 {
1411   GST_DEBUG_OBJECT (discoverer, "Stopping...");
1412
1413   if (!discoverer->priv->async) {
1414     GST_DEBUG_OBJECT (discoverer,
1415         "We were already stopped, or running synchronously");
1416     return;
1417   }
1418
1419   DISCO_LOCK (discoverer);
1420   if (discoverer->priv->processing) {
1421     /* We prevent any further processing by setting the bus to
1422      * flushing and setting the pipeline to READY.
1423      * _reset() will take care of the rest of the cleanup */
1424     if (discoverer->priv->bus)
1425       gst_bus_set_flushing (discoverer->priv->bus, TRUE);
1426     if (discoverer->priv->pipeline)
1427       gst_element_set_state ((GstElement *) discoverer->priv->pipeline,
1428           GST_STATE_READY);
1429   }
1430   discoverer->priv->running = FALSE;
1431   DISCO_UNLOCK (discoverer);
1432
1433   /* Remove timeout handler */
1434   if (discoverer->priv->timeoutid) {
1435     g_source_remove (discoverer->priv->timeoutid);
1436     discoverer->priv->timeoutid = 0;
1437   }
1438   /* Remove signal watch */
1439   if (discoverer->priv->sourceid) {
1440     g_source_remove (discoverer->priv->sourceid);
1441     discoverer->priv->sourceid = 0;
1442   }
1443   /* Unref main context */
1444   if (discoverer->priv->ctx) {
1445     g_main_context_unref (discoverer->priv->ctx);
1446     discoverer->priv->ctx = NULL;
1447   }
1448   discoverer_reset (discoverer);
1449
1450   discoverer->priv->async = FALSE;
1451
1452   GST_DEBUG_OBJECT (discoverer, "Stopped");
1453 }
1454
1455 /**
1456  * gst_discoverer_discover_uri_async:
1457  * @discoverer: A #GstDiscoverer
1458  * @uri: the URI to add.
1459  *
1460  * Appends the given @uri to the list of URIs to discoverer. The actual
1461  * discovery of the @uri will only take place if gst_discoverer_start() has
1462  * been called.
1463  *
1464  * A copy of @uri will be made internally, so the caller can safely g_free()
1465  * afterwards.
1466  *
1467  * Returns: %TRUE if the @uri was succesfully appended to the list of pending
1468  * uris, else %FALSE
1469  *
1470  * Since: 0.10.31
1471  */
1472 gboolean
1473 gst_discoverer_discover_uri_async (GstDiscoverer * discoverer,
1474     const gchar * uri)
1475 {
1476   gboolean can_run;
1477
1478   GST_DEBUG_OBJECT (discoverer, "uri : %s", uri);
1479
1480   DISCO_LOCK (discoverer);
1481   can_run = (discoverer->priv->pending_uris == NULL);
1482   discoverer->priv->pending_uris =
1483       g_list_append (discoverer->priv->pending_uris, g_strdup (uri));
1484   DISCO_UNLOCK (discoverer);
1485
1486   if (can_run)
1487     start_discovering (discoverer);
1488
1489   return TRUE;
1490 }
1491
1492
1493 /* Synchronous mode */
1494 /**
1495  * gst_discoverer_discover_uri:
1496  * @discoverer: A #GstDiscoverer
1497  * @uri: The URI to run on.
1498  * @err: (out) (allow-none): If an error occurred, this field will be filled in.
1499  *
1500  * Synchronously discovers the given @uri.
1501  *
1502  * A copy of @uri will be made internally, so the caller can safely g_free()
1503  * afterwards.
1504  *
1505  * Returns: (transfer full): the result of the scanning. Can be %NULL if an
1506  * error occurred.
1507  *
1508  * Since: 0.10.31
1509  */
1510 GstDiscovererInfo *
1511 gst_discoverer_discover_uri (GstDiscoverer * discoverer, const gchar * uri,
1512     GError ** err)
1513 {
1514   GstDiscovererResult res = 0;
1515   GstDiscovererInfo *info;
1516
1517   GST_DEBUG_OBJECT (discoverer, "uri:%s", uri);
1518
1519   DISCO_LOCK (discoverer);
1520   if (G_UNLIKELY (discoverer->priv->current_info)) {
1521     DISCO_UNLOCK (discoverer);
1522     GST_WARNING_OBJECT (discoverer, "Already handling a uri");
1523     return NULL;
1524   }
1525
1526   discoverer->priv->pending_uris =
1527       g_list_append (discoverer->priv->pending_uris, g_strdup (uri));
1528   DISCO_UNLOCK (discoverer);
1529
1530   res = start_discovering (discoverer);
1531   discoverer_collect (discoverer);
1532
1533   /* Get results */
1534   if (err) {
1535     if (discoverer->priv->current_error)
1536       *err = g_error_copy (discoverer->priv->current_error);
1537     else
1538       *err = NULL;
1539   }
1540   if (res != GST_DISCOVERER_OK) {
1541     GST_DEBUG ("Setting result to %d (was %d)", res,
1542         discoverer->priv->current_info->result);
1543     discoverer->priv->current_info->result = res;
1544   }
1545   info = discoverer->priv->current_info;
1546
1547   discoverer_cleanup (discoverer);
1548
1549   return info;
1550 }
1551
1552 /**
1553  * gst_discoverer_new:
1554  * @timeout: timeout per file, in nanoseconds. Allowed are values between
1555  *     one second (#GST_SECOND) and one hour (3600 * #GST_SECOND)
1556  * @err: a pointer to a #GError. can be %NULL
1557  *
1558  * Creates a new #GstDiscoverer with the provided timeout.
1559  *
1560  * Returns: (transfer full): The new #GstDiscoverer.
1561  * If an error occurred when creating the discoverer, @err will be set
1562  * accordingly and %NULL will be returned. If @err is set, the caller must
1563  * free it when no longer needed using g_error_free().
1564  *
1565  * Since: 0.10.31
1566  */
1567 GstDiscoverer *
1568 gst_discoverer_new (GstClockTime timeout, GError ** err)
1569 {
1570   GstDiscoverer *res;
1571
1572   res = g_object_new (GST_TYPE_DISCOVERER, "timeout", timeout, NULL);
1573   if (res->priv->uridecodebin == NULL) {
1574     if (err)
1575       *err = g_error_new (GST_CORE_ERROR, GST_CORE_ERROR_MISSING_PLUGIN,
1576           "Couldn't create 'uridecodebin' element");
1577     gst_object_unref (res);
1578     res = NULL;
1579   }
1580   return res;
1581 }