media: implement ssrc-multiplexed retransmission support
[platform/upstream/gstreamer.git] / gst / rtsp-server / rtsp-media.c
1 /* GStreamer
2  * Copyright (C) 2008 Wim Taymans <wim.taymans at gmail.com>
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., 51 Franklin St, Fifth Floor,
17  * Boston, MA 02110-1301, USA.
18  */
19 /**
20  * SECTION:rtsp-media
21  * @short_description: The media pipeline
22  * @see_also: #GstRTSPMediaFactory, #GstRTSPStream, #GstRTSPSession,
23  *     #GstRTSPSessionMedia
24  *
25  * a #GstRTSPMedia contains the complete GStreamer pipeline to manage the
26  * streaming to the clients. The actual data transfer is done by the
27  * #GstRTSPStream objects that are created and exposed by the #GstRTSPMedia.
28  *
29  * The #GstRTSPMedia is usually created from a #GstRTSPMediaFactory when the
30  * client does a DESCRIBE or SETUP of a resource.
31  *
32  * A media is created with gst_rtsp_media_new() that takes the element that will
33  * provide the streaming elements. For each of the streams, a new #GstRTSPStream
34  * object needs to be made with the gst_rtsp_media_create_stream() which takes
35  * the payloader element and the source pad that produces the RTP stream.
36  *
37  * The pipeline of the media is set to PAUSED with gst_rtsp_media_prepare(). The
38  * prepare method will add rtpbin and sinks and sources to send and receive RTP
39  * and RTCP packets from the clients. Each stream srcpad is connected to an
40  * input into the internal rtpbin.
41  *
42  * It is also possible to dynamically create #GstRTSPStream objects during the
43  * prepare phase. With gst_rtsp_media_get_status() you can check the status of
44  * the prepare phase.
45  *
46  * After the media is prepared, it is ready for streaming. It will usually be
47  * managed in a session with gst_rtsp_session_manage_media(). See
48  * #GstRTSPSession and #GstRTSPSessionMedia.
49  *
50  * The state of the media can be controlled with gst_rtsp_media_set_state ().
51  * Seeking can be done with gst_rtsp_media_seek().
52  *
53  * With gst_rtsp_media_unprepare() the pipeline is stopped and shut down. When
54  * gst_rtsp_media_set_eos_shutdown() an EOS will be sent to the pipeline to
55  * cleanly shut down.
56  *
57  * With gst_rtsp_media_set_shared(), the media can be shared between multiple
58  * clients. With gst_rtsp_media_set_reusable() you can control if the pipeline
59  * can be prepared again after an unprepare.
60  *
61  * Last reviewed on 2013-07-11 (1.0.0)
62  */
63
64 #include <string.h>
65 #include <stdlib.h>
66
67 #include <gst/app/gstappsrc.h>
68 #include <gst/app/gstappsink.h>
69
70 #include "rtsp-media.h"
71
72 #define GST_RTSP_MEDIA_GET_PRIVATE(obj)  \
73      (G_TYPE_INSTANCE_GET_PRIVATE ((obj), GST_TYPE_RTSP_MEDIA, GstRTSPMediaPrivate))
74
75 struct _GstRTSPMediaPrivate
76 {
77   GMutex lock;
78   GCond cond;
79
80   /* protected by lock */
81   GstRTSPPermissions *permissions;
82   gboolean shared;
83   gboolean suspend_mode;
84   gboolean reusable;
85   GstRTSPProfile profiles;
86   GstRTSPLowerTrans protocols;
87   gboolean reused;
88   gboolean eos_shutdown;
89   guint buffer_size;
90   GstRTSPAddressPool *pool;
91   gboolean blocked;
92
93   GstElement *element;
94   GRecMutex state_lock;         /* locking order: state lock, lock */
95   GPtrArray *streams;           /* protected by lock */
96   GList *dynamic;               /* protected by lock */
97   GstRTSPMediaStatus status;    /* protected by lock */
98   gint prepare_count;
99   gint n_active;
100   gboolean adding;
101
102   /* the pipeline for the media */
103   GstElement *pipeline;
104   GstElement *fakesink;         /* protected by lock */
105   GSource *source;
106   guint id;
107   GstRTSPThread *thread;
108
109   gboolean time_provider;
110   GstNetTimeProvider *nettime;
111
112   gboolean is_live;
113   gboolean seekable;
114   gboolean buffering;
115   GstState target_state;
116
117   /* RTP session manager */
118   GstElement *rtpbin;
119
120   /* the range of media */
121   GstRTSPTimeRange range;       /* protected by lock */
122   GstClockTime range_start;
123   GstClockTime range_stop;
124
125   GList *payloads;              /* protected by lock */
126   GstClockTime rtx_time;        /* protected by lock */
127 };
128
129 #define DEFAULT_SHARED          FALSE
130 #define DEFAULT_SUSPEND_MODE    GST_RTSP_SUSPEND_MODE_NONE
131 #define DEFAULT_REUSABLE        FALSE
132 #define DEFAULT_PROFILES        GST_RTSP_PROFILE_AVP
133 #define DEFAULT_PROTOCOLS       GST_RTSP_LOWER_TRANS_UDP | GST_RTSP_LOWER_TRANS_UDP_MCAST | \
134                                         GST_RTSP_LOWER_TRANS_TCP
135 #define DEFAULT_EOS_SHUTDOWN    FALSE
136 #define DEFAULT_BUFFER_SIZE     0x80000
137 #define DEFAULT_TIME_PROVIDER   FALSE
138
139 /* define to dump received RTCP packets */
140 #undef DUMP_STATS
141
142 enum
143 {
144   PROP_0,
145   PROP_SHARED,
146   PROP_SUSPEND_MODE,
147   PROP_REUSABLE,
148   PROP_PROFILES,
149   PROP_PROTOCOLS,
150   PROP_EOS_SHUTDOWN,
151   PROP_BUFFER_SIZE,
152   PROP_ELEMENT,
153   PROP_TIME_PROVIDER,
154   PROP_LAST
155 };
156
157 enum
158 {
159   SIGNAL_NEW_STREAM,
160   SIGNAL_REMOVED_STREAM,
161   SIGNAL_PREPARED,
162   SIGNAL_UNPREPARED,
163   SIGNAL_TARGET_STATE,
164   SIGNAL_NEW_STATE,
165   SIGNAL_LAST
166 };
167
168 GST_DEBUG_CATEGORY_STATIC (rtsp_media_debug);
169 #define GST_CAT_DEFAULT rtsp_media_debug
170
171 static void gst_rtsp_media_get_property (GObject * object, guint propid,
172     GValue * value, GParamSpec * pspec);
173 static void gst_rtsp_media_set_property (GObject * object, guint propid,
174     const GValue * value, GParamSpec * pspec);
175 static void gst_rtsp_media_finalize (GObject * obj);
176
177 static gboolean default_handle_message (GstRTSPMedia * media,
178     GstMessage * message);
179 static void finish_unprepare (GstRTSPMedia * media);
180 static gboolean default_prepare (GstRTSPMedia * media, GstRTSPThread * thread);
181 static gboolean default_unprepare (GstRTSPMedia * media);
182 static gboolean default_suspend (GstRTSPMedia * media);
183 static gboolean default_unsuspend (GstRTSPMedia * media);
184 static gboolean default_convert_range (GstRTSPMedia * media,
185     GstRTSPTimeRange * range, GstRTSPRangeUnit unit);
186 static gboolean default_query_position (GstRTSPMedia * media,
187     gint64 * position);
188 static gboolean default_query_stop (GstRTSPMedia * media, gint64 * stop);
189 static GstElement *default_create_rtpbin (GstRTSPMedia * media);
190 static gboolean default_setup_sdp (GstRTSPMedia * media, GstSDPMessage * sdp,
191     GstSDPInfo * info);
192
193 static gboolean wait_preroll (GstRTSPMedia * media);
194
195 static guint gst_rtsp_media_signals[SIGNAL_LAST] = { 0 };
196
197 #define C_ENUM(v) ((gint) v)
198
199 #define GST_TYPE_RTSP_SUSPEND_MODE (gst_rtsp_suspend_mode_get_type())
200 GType
201 gst_rtsp_suspend_mode_get_type (void)
202 {
203   static gsize id = 0;
204   static const GEnumValue values[] = {
205     {C_ENUM (GST_RTSP_SUSPEND_MODE_NONE), "GST_RTSP_SUSPEND_MODE_NONE", "none"},
206     {C_ENUM (GST_RTSP_SUSPEND_MODE_PAUSE), "GST_RTSP_SUSPEND_MODE_PAUSE",
207         "pause"},
208     {C_ENUM (GST_RTSP_SUSPEND_MODE_RESET), "GST_RTSP_SUSPEND_MODE_RESET",
209         "reset"},
210     {0, NULL, NULL}
211   };
212
213   if (g_once_init_enter (&id)) {
214     GType tmp = g_enum_register_static ("GstRTSPSuspendMode", values);
215     g_once_init_leave (&id, tmp);
216   }
217   return (GType) id;
218 }
219
220 G_DEFINE_TYPE (GstRTSPMedia, gst_rtsp_media, G_TYPE_OBJECT);
221
222 static void
223 gst_rtsp_media_class_init (GstRTSPMediaClass * klass)
224 {
225   GObjectClass *gobject_class;
226
227   g_type_class_add_private (klass, sizeof (GstRTSPMediaPrivate));
228
229   gobject_class = G_OBJECT_CLASS (klass);
230
231   gobject_class->get_property = gst_rtsp_media_get_property;
232   gobject_class->set_property = gst_rtsp_media_set_property;
233   gobject_class->finalize = gst_rtsp_media_finalize;
234
235   g_object_class_install_property (gobject_class, PROP_SHARED,
236       g_param_spec_boolean ("shared", "Shared",
237           "If this media pipeline can be shared", DEFAULT_SHARED,
238           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
239
240   g_object_class_install_property (gobject_class, PROP_SUSPEND_MODE,
241       g_param_spec_enum ("suspend-mode", "Suspend Mode",
242           "How to suspend the media in PAUSED", GST_TYPE_RTSP_SUSPEND_MODE,
243           DEFAULT_SUSPEND_MODE, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
244
245   g_object_class_install_property (gobject_class, PROP_REUSABLE,
246       g_param_spec_boolean ("reusable", "Reusable",
247           "If this media pipeline can be reused after an unprepare",
248           DEFAULT_REUSABLE, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
249
250   g_object_class_install_property (gobject_class, PROP_PROFILES,
251       g_param_spec_flags ("profiles", "Profiles",
252           "Allowed transfer profiles", GST_TYPE_RTSP_PROFILE,
253           DEFAULT_PROFILES, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
254
255   g_object_class_install_property (gobject_class, PROP_PROTOCOLS,
256       g_param_spec_flags ("protocols", "Protocols",
257           "Allowed lower transport protocols", GST_TYPE_RTSP_LOWER_TRANS,
258           DEFAULT_PROTOCOLS, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
259
260   g_object_class_install_property (gobject_class, PROP_EOS_SHUTDOWN,
261       g_param_spec_boolean ("eos-shutdown", "EOS Shutdown",
262           "Send an EOS event to the pipeline before unpreparing",
263           DEFAULT_EOS_SHUTDOWN, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
264
265   g_object_class_install_property (gobject_class, PROP_BUFFER_SIZE,
266       g_param_spec_uint ("buffer-size", "Buffer Size",
267           "The kernel UDP buffer size to use", 0, G_MAXUINT,
268           DEFAULT_BUFFER_SIZE, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
269
270   g_object_class_install_property (gobject_class, PROP_ELEMENT,
271       g_param_spec_object ("element", "The Element",
272           "The GstBin to use for streaming the media", GST_TYPE_ELEMENT,
273           G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE));
274
275   g_object_class_install_property (gobject_class, PROP_TIME_PROVIDER,
276       g_param_spec_boolean ("time-provider", "Time Provider",
277           "Use a NetTimeProvider for clients",
278           DEFAULT_TIME_PROVIDER, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
279
280   gst_rtsp_media_signals[SIGNAL_NEW_STREAM] =
281       g_signal_new ("new-stream", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
282       G_STRUCT_OFFSET (GstRTSPMediaClass, new_stream), NULL, NULL,
283       g_cclosure_marshal_generic, G_TYPE_NONE, 1, GST_TYPE_RTSP_STREAM);
284
285   gst_rtsp_media_signals[SIGNAL_REMOVED_STREAM] =
286       g_signal_new ("removed-stream", G_TYPE_FROM_CLASS (klass),
287       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPMediaClass, removed_stream),
288       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
289       GST_TYPE_RTSP_STREAM);
290
291   gst_rtsp_media_signals[SIGNAL_PREPARED] =
292       g_signal_new ("prepared", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
293       G_STRUCT_OFFSET (GstRTSPMediaClass, prepared), NULL, NULL,
294       g_cclosure_marshal_generic, G_TYPE_NONE, 0, G_TYPE_NONE);
295
296   gst_rtsp_media_signals[SIGNAL_UNPREPARED] =
297       g_signal_new ("unprepared", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
298       G_STRUCT_OFFSET (GstRTSPMediaClass, unprepared), NULL, NULL,
299       g_cclosure_marshal_generic, G_TYPE_NONE, 0, G_TYPE_NONE);
300
301   gst_rtsp_media_signals[SIGNAL_TARGET_STATE] =
302       g_signal_new ("target-state", G_TYPE_FROM_CLASS (klass),
303       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPMediaClass, target_state),
304       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1, G_TYPE_INT);
305
306   gst_rtsp_media_signals[SIGNAL_NEW_STATE] =
307       g_signal_new ("new-state", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
308       G_STRUCT_OFFSET (GstRTSPMediaClass, new_state), NULL, NULL,
309       g_cclosure_marshal_generic, G_TYPE_NONE, 1, G_TYPE_INT);
310
311   GST_DEBUG_CATEGORY_INIT (rtsp_media_debug, "rtspmedia", 0, "GstRTSPMedia");
312
313   klass->handle_message = default_handle_message;
314   klass->prepare = default_prepare;
315   klass->unprepare = default_unprepare;
316   klass->suspend = default_suspend;
317   klass->unsuspend = default_unsuspend;
318   klass->convert_range = default_convert_range;
319   klass->query_position = default_query_position;
320   klass->query_stop = default_query_stop;
321   klass->create_rtpbin = default_create_rtpbin;
322   klass->setup_sdp = default_setup_sdp;
323 }
324
325 static void
326 gst_rtsp_media_init (GstRTSPMedia * media)
327 {
328   GstRTSPMediaPrivate *priv = GST_RTSP_MEDIA_GET_PRIVATE (media);
329
330   media->priv = priv;
331
332   priv->streams = g_ptr_array_new_with_free_func (g_object_unref);
333   g_mutex_init (&priv->lock);
334   g_cond_init (&priv->cond);
335   g_rec_mutex_init (&priv->state_lock);
336
337   priv->shared = DEFAULT_SHARED;
338   priv->suspend_mode = DEFAULT_SUSPEND_MODE;
339   priv->reusable = DEFAULT_REUSABLE;
340   priv->profiles = DEFAULT_PROFILES;
341   priv->protocols = DEFAULT_PROTOCOLS;
342   priv->eos_shutdown = DEFAULT_EOS_SHUTDOWN;
343   priv->buffer_size = DEFAULT_BUFFER_SIZE;
344   priv->time_provider = DEFAULT_TIME_PROVIDER;
345 }
346
347 static void
348 gst_rtsp_media_finalize (GObject * obj)
349 {
350   GstRTSPMediaPrivate *priv;
351   GstRTSPMedia *media;
352
353   media = GST_RTSP_MEDIA (obj);
354   priv = media->priv;
355
356   GST_INFO ("finalize media %p", media);
357
358   if (priv->permissions)
359     gst_rtsp_permissions_unref (priv->permissions);
360
361   g_ptr_array_unref (priv->streams);
362
363   g_list_free_full (priv->dynamic, gst_object_unref);
364
365   if (priv->pipeline)
366     gst_object_unref (priv->pipeline);
367   if (priv->nettime)
368     gst_object_unref (priv->nettime);
369   gst_object_unref (priv->element);
370   if (priv->pool)
371     g_object_unref (priv->pool);
372   if (priv->payloads)
373     g_list_free (priv->payloads);
374   g_mutex_clear (&priv->lock);
375   g_cond_clear (&priv->cond);
376   g_rec_mutex_clear (&priv->state_lock);
377
378   G_OBJECT_CLASS (gst_rtsp_media_parent_class)->finalize (obj);
379 }
380
381 static void
382 gst_rtsp_media_get_property (GObject * object, guint propid,
383     GValue * value, GParamSpec * pspec)
384 {
385   GstRTSPMedia *media = GST_RTSP_MEDIA (object);
386
387   switch (propid) {
388     case PROP_ELEMENT:
389       g_value_set_object (value, media->priv->element);
390       break;
391     case PROP_SHARED:
392       g_value_set_boolean (value, gst_rtsp_media_is_shared (media));
393       break;
394     case PROP_SUSPEND_MODE:
395       g_value_set_enum (value, gst_rtsp_media_get_suspend_mode (media));
396       break;
397     case PROP_REUSABLE:
398       g_value_set_boolean (value, gst_rtsp_media_is_reusable (media));
399       break;
400     case PROP_PROFILES:
401       g_value_set_flags (value, gst_rtsp_media_get_profiles (media));
402       break;
403     case PROP_PROTOCOLS:
404       g_value_set_flags (value, gst_rtsp_media_get_protocols (media));
405       break;
406     case PROP_EOS_SHUTDOWN:
407       g_value_set_boolean (value, gst_rtsp_media_is_eos_shutdown (media));
408       break;
409     case PROP_BUFFER_SIZE:
410       g_value_set_uint (value, gst_rtsp_media_get_buffer_size (media));
411       break;
412     case PROP_TIME_PROVIDER:
413       g_value_set_boolean (value, gst_rtsp_media_is_time_provider (media));
414       break;
415     default:
416       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, propid, pspec);
417   }
418 }
419
420 static void
421 gst_rtsp_media_set_property (GObject * object, guint propid,
422     const GValue * value, GParamSpec * pspec)
423 {
424   GstRTSPMedia *media = GST_RTSP_MEDIA (object);
425
426   switch (propid) {
427     case PROP_ELEMENT:
428       media->priv->element = g_value_get_object (value);
429       gst_object_ref_sink (media->priv->element);
430       break;
431     case PROP_SHARED:
432       gst_rtsp_media_set_shared (media, g_value_get_boolean (value));
433       break;
434     case PROP_SUSPEND_MODE:
435       gst_rtsp_media_set_suspend_mode (media, g_value_get_enum (value));
436       break;
437     case PROP_REUSABLE:
438       gst_rtsp_media_set_reusable (media, g_value_get_boolean (value));
439       break;
440     case PROP_PROFILES:
441       gst_rtsp_media_set_profiles (media, g_value_get_flags (value));
442       break;
443     case PROP_PROTOCOLS:
444       gst_rtsp_media_set_protocols (media, g_value_get_flags (value));
445       break;
446     case PROP_EOS_SHUTDOWN:
447       gst_rtsp_media_set_eos_shutdown (media, g_value_get_boolean (value));
448       break;
449     case PROP_BUFFER_SIZE:
450       gst_rtsp_media_set_buffer_size (media, g_value_get_uint (value));
451       break;
452     case PROP_TIME_PROVIDER:
453       gst_rtsp_media_use_time_provider (media, g_value_get_boolean (value));
454       break;
455     default:
456       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, propid, pspec);
457   }
458 }
459
460 typedef struct
461 {
462   gint64 position;
463   gboolean ret;
464 } DoQueryPositionData;
465
466 static void
467 do_query_position (GstRTSPStream * stream, DoQueryPositionData * data)
468 {
469   gint64 tmp;
470
471   if (gst_rtsp_stream_query_position (stream, &tmp)) {
472     data->position = MAX (data->position, tmp);
473     data->ret = TRUE;
474   }
475 }
476
477 static gboolean
478 default_query_position (GstRTSPMedia * media, gint64 * position)
479 {
480   GstRTSPMediaPrivate *priv;
481   DoQueryPositionData data;
482
483   priv = media->priv;
484
485   data.position = -1;
486   data.ret = FALSE;
487
488   g_ptr_array_foreach (priv->streams, (GFunc) do_query_position, &data);
489
490   *position = data.position;
491
492   return data.ret;
493 }
494
495 typedef struct
496 {
497   gint64 stop;
498   gboolean ret;
499 } DoQueryStopData;
500
501 static void
502 do_query_stop (GstRTSPStream * stream, DoQueryStopData * data)
503 {
504   gint64 tmp;
505
506   if (gst_rtsp_stream_query_stop (stream, &tmp)) {
507     data->stop = MAX (data->stop, tmp);
508     data->ret = TRUE;
509   }
510 }
511
512 static gboolean
513 default_query_stop (GstRTSPMedia * media, gint64 * stop)
514 {
515   GstRTSPMediaPrivate *priv;
516   DoQueryStopData data;
517
518   priv = media->priv;
519
520   data.stop = -1;
521   data.ret = FALSE;
522
523   g_ptr_array_foreach (priv->streams, (GFunc) do_query_stop, &data);
524
525   *stop = data.stop;
526
527   return data.ret;
528 }
529
530 static GstElement *
531 default_create_rtpbin (GstRTSPMedia * media)
532 {
533   GstElement *rtpbin;
534
535   rtpbin = gst_element_factory_make ("rtpbin", NULL);
536
537   return rtpbin;
538 }
539
540 /* must be called with state lock */
541 static void
542 collect_media_stats (GstRTSPMedia * media)
543 {
544   GstRTSPMediaPrivate *priv = media->priv;
545   gint64 position = 0, stop = -1;
546
547   if (priv->status != GST_RTSP_MEDIA_STATUS_PREPARED &&
548       priv->status != GST_RTSP_MEDIA_STATUS_PREPARING)
549     return;
550
551   priv->range.unit = GST_RTSP_RANGE_NPT;
552
553   GST_INFO ("collect media stats");
554
555   if (priv->is_live) {
556     priv->range.min.type = GST_RTSP_TIME_NOW;
557     priv->range.min.seconds = -1;
558     priv->range_start = -1;
559     priv->range.max.type = GST_RTSP_TIME_END;
560     priv->range.max.seconds = -1;
561     priv->range_stop = -1;
562   } else {
563     GstRTSPMediaClass *klass;
564     gboolean ret;
565
566     klass = GST_RTSP_MEDIA_GET_CLASS (media);
567
568     /* get the position */
569     ret = FALSE;
570     if (klass->query_position)
571       ret = klass->query_position (media, &position);
572
573     if (!ret) {
574       GST_INFO ("position query failed");
575       position = 0;
576     }
577
578     /* get the current segment stop */
579     ret = FALSE;
580     if (klass->query_stop)
581       ret = klass->query_stop (media, &stop);
582
583     if (!ret) {
584       GST_INFO ("stop query failed");
585       stop = -1;
586     }
587
588     GST_INFO ("stats: position %" GST_TIME_FORMAT ", stop %"
589         GST_TIME_FORMAT, GST_TIME_ARGS (position), GST_TIME_ARGS (stop));
590
591     if (position == -1) {
592       priv->range.min.type = GST_RTSP_TIME_NOW;
593       priv->range.min.seconds = -1;
594       priv->range_start = -1;
595     } else {
596       priv->range.min.type = GST_RTSP_TIME_SECONDS;
597       priv->range.min.seconds = ((gdouble) position) / GST_SECOND;
598       priv->range_start = position;
599     }
600     if (stop == -1) {
601       priv->range.max.type = GST_RTSP_TIME_END;
602       priv->range.max.seconds = -1;
603       priv->range_stop = -1;
604     } else {
605       priv->range.max.type = GST_RTSP_TIME_SECONDS;
606       priv->range.max.seconds = ((gdouble) stop) / GST_SECOND;
607       priv->range_stop = stop;
608     }
609   }
610 }
611
612 /**
613  * gst_rtsp_media_new:
614  * @element: (transfer full): a #GstElement
615  *
616  * Create a new #GstRTSPMedia instance. @element is the bin element that
617  * provides the different streams. The #GstRTSPMedia object contains the
618  * element to produce RTP data for one or more related (audio/video/..)
619  * streams.
620  *
621  * Ownership is taken of @element.
622  *
623  * Returns: (transfer full): a new #GstRTSPMedia object.
624  */
625 GstRTSPMedia *
626 gst_rtsp_media_new (GstElement * element)
627 {
628   GstRTSPMedia *result;
629
630   g_return_val_if_fail (GST_IS_ELEMENT (element), NULL);
631
632   result = g_object_new (GST_TYPE_RTSP_MEDIA, "element", element, NULL);
633
634   return result;
635 }
636
637 /**
638  * gst_rtsp_media_get_element:
639  * @media: a #GstRTSPMedia
640  *
641  * Get the element that was used when constructing @media.
642  *
643  * Returns: (transfer full): a #GstElement. Unref after usage.
644  */
645 GstElement *
646 gst_rtsp_media_get_element (GstRTSPMedia * media)
647 {
648   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
649
650   return gst_object_ref (media->priv->element);
651 }
652
653 /**
654  * gst_rtsp_media_take_pipeline:
655  * @media: a #GstRTSPMedia
656  * @pipeline: (transfer full): a #GstPipeline
657  *
658  * Set @pipeline as the #GstPipeline for @media. Ownership is
659  * taken of @pipeline.
660  */
661 void
662 gst_rtsp_media_take_pipeline (GstRTSPMedia * media, GstPipeline * pipeline)
663 {
664   GstRTSPMediaPrivate *priv;
665   GstElement *old;
666   GstNetTimeProvider *nettime;
667
668   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
669   g_return_if_fail (GST_IS_PIPELINE (pipeline));
670
671   priv = media->priv;
672
673   g_mutex_lock (&priv->lock);
674   old = priv->pipeline;
675   priv->pipeline = GST_ELEMENT_CAST (pipeline);
676   nettime = priv->nettime;
677   priv->nettime = NULL;
678   g_mutex_unlock (&priv->lock);
679
680   if (old)
681     gst_object_unref (old);
682
683   if (nettime)
684     gst_object_unref (nettime);
685
686   gst_bin_add (GST_BIN_CAST (pipeline), priv->element);
687 }
688
689 /**
690  * gst_rtsp_media_set_permissions:
691  * @media: a #GstRTSPMedia
692  * @permissions: (transfer none): a #GstRTSPPermissions
693  *
694  * Set @permissions on @media.
695  */
696 void
697 gst_rtsp_media_set_permissions (GstRTSPMedia * media,
698     GstRTSPPermissions * permissions)
699 {
700   GstRTSPMediaPrivate *priv;
701
702   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
703
704   priv = media->priv;
705
706   g_mutex_lock (&priv->lock);
707   if (priv->permissions)
708     gst_rtsp_permissions_unref (priv->permissions);
709   if ((priv->permissions = permissions))
710     gst_rtsp_permissions_ref (permissions);
711   g_mutex_unlock (&priv->lock);
712 }
713
714 /**
715  * gst_rtsp_media_get_permissions:
716  * @media: a #GstRTSPMedia
717  *
718  * Get the permissions object from @media.
719  *
720  * Returns: (transfer full): a #GstRTSPPermissions object, unref after usage.
721  */
722 GstRTSPPermissions *
723 gst_rtsp_media_get_permissions (GstRTSPMedia * media)
724 {
725   GstRTSPMediaPrivate *priv;
726   GstRTSPPermissions *result;
727
728   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
729
730   priv = media->priv;
731
732   g_mutex_lock (&priv->lock);
733   if ((result = priv->permissions))
734     gst_rtsp_permissions_ref (result);
735   g_mutex_unlock (&priv->lock);
736
737   return result;
738 }
739
740 /**
741  * gst_rtsp_media_set_suspend_mode:
742  * @media: a #GstRTSPMedia
743  * @mode: the new #GstRTSPSuspendMode
744  *
745  * Control how @ media will be suspended after the SDP has been generated and
746  * after a PAUSE request has been performed.
747  *
748  * Media must be unprepared when setting the suspend mode.
749  */
750 void
751 gst_rtsp_media_set_suspend_mode (GstRTSPMedia * media, GstRTSPSuspendMode mode)
752 {
753   GstRTSPMediaPrivate *priv;
754
755   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
756
757   priv = media->priv;
758
759   g_rec_mutex_lock (&priv->state_lock);
760   if (priv->status == GST_RTSP_MEDIA_STATUS_PREPARED)
761     goto was_prepared;
762   priv->suspend_mode = mode;
763   g_rec_mutex_unlock (&priv->state_lock);
764
765   return;
766
767   /* ERRORS */
768 was_prepared:
769   {
770     GST_WARNING ("media %p was prepared", media);
771     g_rec_mutex_unlock (&priv->state_lock);
772   }
773 }
774
775 /**
776  * gst_rtsp_media_get_suspend_mode:
777  * @media: a #GstRTSPMedia
778  *
779  * Get how @media will be suspended.
780  *
781  * Returns: #GstRTSPSuspendMode.
782  */
783 GstRTSPSuspendMode
784 gst_rtsp_media_get_suspend_mode (GstRTSPMedia * media)
785 {
786   GstRTSPMediaPrivate *priv;
787   GstRTSPSuspendMode res;
788
789   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), GST_RTSP_SUSPEND_MODE_NONE);
790
791   priv = media->priv;
792
793   g_rec_mutex_lock (&priv->state_lock);
794   res = priv->suspend_mode;
795   g_rec_mutex_unlock (&priv->state_lock);
796
797   return res;
798 }
799
800 /**
801  * gst_rtsp_media_set_shared:
802  * @media: a #GstRTSPMedia
803  * @shared: the new value
804  *
805  * Set or unset if the pipeline for @media can be shared will multiple clients.
806  * When @shared is %TRUE, client requests for this media will share the media
807  * pipeline.
808  */
809 void
810 gst_rtsp_media_set_shared (GstRTSPMedia * media, gboolean shared)
811 {
812   GstRTSPMediaPrivate *priv;
813
814   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
815
816   priv = media->priv;
817
818   g_mutex_lock (&priv->lock);
819   priv->shared = shared;
820   g_mutex_unlock (&priv->lock);
821 }
822
823 /**
824  * gst_rtsp_media_is_shared:
825  * @media: a #GstRTSPMedia
826  *
827  * Check if the pipeline for @media can be shared between multiple clients.
828  *
829  * Returns: %TRUE if the media can be shared between clients.
830  */
831 gboolean
832 gst_rtsp_media_is_shared (GstRTSPMedia * media)
833 {
834   GstRTSPMediaPrivate *priv;
835   gboolean res;
836
837   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
838
839   priv = media->priv;
840
841   g_mutex_lock (&priv->lock);
842   res = priv->shared;
843   g_mutex_unlock (&priv->lock);
844
845   return res;
846 }
847
848 /**
849  * gst_rtsp_media_set_reusable:
850  * @media: a #GstRTSPMedia
851  * @reusable: the new value
852  *
853  * Set or unset if the pipeline for @media can be reused after the pipeline has
854  * been unprepared.
855  */
856 void
857 gst_rtsp_media_set_reusable (GstRTSPMedia * media, gboolean reusable)
858 {
859   GstRTSPMediaPrivate *priv;
860
861   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
862
863   priv = media->priv;
864
865   g_mutex_lock (&priv->lock);
866   priv->reusable = reusable;
867   g_mutex_unlock (&priv->lock);
868 }
869
870 /**
871  * gst_rtsp_media_is_reusable:
872  * @media: a #GstRTSPMedia
873  *
874  * Check if the pipeline for @media can be reused after an unprepare.
875  *
876  * Returns: %TRUE if the media can be reused
877  */
878 gboolean
879 gst_rtsp_media_is_reusable (GstRTSPMedia * media)
880 {
881   GstRTSPMediaPrivate *priv;
882   gboolean res;
883
884   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
885
886   priv = media->priv;
887
888   g_mutex_lock (&priv->lock);
889   res = priv->reusable;
890   g_mutex_unlock (&priv->lock);
891
892   return res;
893 }
894
895 static void
896 do_set_profiles (GstRTSPStream * stream, GstRTSPProfile * profiles)
897 {
898   gst_rtsp_stream_set_profiles (stream, *profiles);
899 }
900
901 /**
902  * gst_rtsp_media_set_profiles:
903  * @media: a #GstRTSPMedia
904  * @profiles: the new flags
905  *
906  * Configure the allowed lower transport for @media.
907  */
908 void
909 gst_rtsp_media_set_profiles (GstRTSPMedia * media, GstRTSPProfile profiles)
910 {
911   GstRTSPMediaPrivate *priv;
912
913   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
914
915   priv = media->priv;
916
917   g_mutex_lock (&priv->lock);
918   priv->profiles = profiles;
919   g_ptr_array_foreach (priv->streams, (GFunc) do_set_profiles, &profiles);
920   g_mutex_unlock (&priv->lock);
921 }
922
923 /**
924  * gst_rtsp_media_get_profiles:
925  * @media: a #GstRTSPMedia
926  *
927  * Get the allowed profiles of @media.
928  *
929  * Returns: a #GstRTSPProfile
930  */
931 GstRTSPProfile
932 gst_rtsp_media_get_profiles (GstRTSPMedia * media)
933 {
934   GstRTSPMediaPrivate *priv;
935   GstRTSPProfile res;
936
937   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), GST_RTSP_PROFILE_UNKNOWN);
938
939   priv = media->priv;
940
941   g_mutex_lock (&priv->lock);
942   res = priv->profiles;
943   g_mutex_unlock (&priv->lock);
944
945   return res;
946 }
947
948 static void
949 do_set_protocols (GstRTSPStream * stream, GstRTSPLowerTrans * protocols)
950 {
951   gst_rtsp_stream_set_protocols (stream, *protocols);
952 }
953
954 /**
955  * gst_rtsp_media_set_protocols:
956  * @media: a #GstRTSPMedia
957  * @protocols: the new flags
958  *
959  * Configure the allowed lower transport for @media.
960  */
961 void
962 gst_rtsp_media_set_protocols (GstRTSPMedia * media, GstRTSPLowerTrans protocols)
963 {
964   GstRTSPMediaPrivate *priv;
965
966   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
967
968   priv = media->priv;
969
970   g_mutex_lock (&priv->lock);
971   priv->protocols = protocols;
972   g_ptr_array_foreach (priv->streams, (GFunc) do_set_protocols, &protocols);
973   g_mutex_unlock (&priv->lock);
974 }
975
976 /**
977  * gst_rtsp_media_get_protocols:
978  * @media: a #GstRTSPMedia
979  *
980  * Get the allowed protocols of @media.
981  *
982  * Returns: a #GstRTSPLowerTrans
983  */
984 GstRTSPLowerTrans
985 gst_rtsp_media_get_protocols (GstRTSPMedia * media)
986 {
987   GstRTSPMediaPrivate *priv;
988   GstRTSPLowerTrans res;
989
990   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media),
991       GST_RTSP_LOWER_TRANS_UNKNOWN);
992
993   priv = media->priv;
994
995   g_mutex_lock (&priv->lock);
996   res = priv->protocols;
997   g_mutex_unlock (&priv->lock);
998
999   return res;
1000 }
1001
1002 /**
1003  * gst_rtsp_media_set_eos_shutdown:
1004  * @media: a #GstRTSPMedia
1005  * @eos_shutdown: the new value
1006  *
1007  * Set or unset if an EOS event will be sent to the pipeline for @media before
1008  * it is unprepared.
1009  */
1010 void
1011 gst_rtsp_media_set_eos_shutdown (GstRTSPMedia * media, gboolean eos_shutdown)
1012 {
1013   GstRTSPMediaPrivate *priv;
1014
1015   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
1016
1017   priv = media->priv;
1018
1019   g_mutex_lock (&priv->lock);
1020   priv->eos_shutdown = eos_shutdown;
1021   g_mutex_unlock (&priv->lock);
1022 }
1023
1024 /**
1025  * gst_rtsp_media_is_eos_shutdown:
1026  * @media: a #GstRTSPMedia
1027  *
1028  * Check if the pipeline for @media will send an EOS down the pipeline before
1029  * unpreparing.
1030  *
1031  * Returns: %TRUE if the media will send EOS before unpreparing.
1032  */
1033 gboolean
1034 gst_rtsp_media_is_eos_shutdown (GstRTSPMedia * media)
1035 {
1036   GstRTSPMediaPrivate *priv;
1037   gboolean res;
1038
1039   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
1040
1041   priv = media->priv;
1042
1043   g_mutex_lock (&priv->lock);
1044   res = priv->eos_shutdown;
1045   g_mutex_unlock (&priv->lock);
1046
1047   return res;
1048 }
1049
1050 /**
1051  * gst_rtsp_media_set_buffer_size:
1052  * @media: a #GstRTSPMedia
1053  * @size: the new value
1054  *
1055  * Set the kernel UDP buffer size.
1056  */
1057 void
1058 gst_rtsp_media_set_buffer_size (GstRTSPMedia * media, guint size)
1059 {
1060   GstRTSPMediaPrivate *priv;
1061
1062   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
1063
1064   GST_LOG_OBJECT (media, "set buffer size %u", size);
1065
1066   priv = media->priv;
1067
1068   g_mutex_lock (&priv->lock);
1069   priv->buffer_size = size;
1070   g_mutex_unlock (&priv->lock);
1071 }
1072
1073 /**
1074  * gst_rtsp_media_get_buffer_size:
1075  * @media: a #GstRTSPMedia
1076  *
1077  * Get the kernel UDP buffer size.
1078  *
1079  * Returns: the kernel UDP buffer size.
1080  */
1081 guint
1082 gst_rtsp_media_get_buffer_size (GstRTSPMedia * media)
1083 {
1084   GstRTSPMediaPrivate *priv;
1085   guint res;
1086
1087   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
1088
1089   priv = media->priv;
1090
1091   g_mutex_unlock (&priv->lock);
1092   res = priv->buffer_size;
1093   g_mutex_unlock (&priv->lock);
1094
1095   return res;
1096 }
1097
1098 /**
1099  * gst_rtsp_media_set_retransmission_time:
1100  * @media: a #GstRTSPMedia
1101  * @time: the new value
1102  *
1103  * Set the amount of time to store retransmission packets.
1104  */
1105 void
1106 gst_rtsp_media_set_retransmission_time (GstRTSPMedia * media, GstClockTime time)
1107 {
1108   GstRTSPMediaPrivate *priv;
1109   guint i;
1110
1111   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
1112
1113   GST_LOG_OBJECT (media, "set retransmission time %" G_GUINT64_FORMAT, time);
1114
1115   priv = media->priv;
1116
1117   g_mutex_lock (&priv->lock);
1118   priv->rtx_time = time;
1119   for (i = 0; i < priv->streams->len; i++) {
1120     GstRTSPStream *stream = g_ptr_array_index (priv->streams, i);
1121
1122     gst_rtsp_stream_set_retransmission_time (stream, time);
1123   }
1124
1125   if (priv->rtpbin)
1126     g_object_set (priv->rtpbin, "do-retransmission", time > 0, NULL);
1127   g_mutex_unlock (&priv->lock);
1128 }
1129
1130 /**
1131  * gst_rtsp_media_get_retransmission_time:
1132  * @media: a #GstRTSPMedia
1133  *
1134  * Get the amount of time to store retransmission data.
1135  *
1136  * Returns: the amount of time to store retransmission data.
1137  */
1138 GstClockTime
1139 gst_rtsp_media_get_retransmission_time (GstRTSPMedia * media)
1140 {
1141   GstRTSPMediaPrivate *priv;
1142   GstClockTime res;
1143
1144   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
1145
1146   priv = media->priv;
1147
1148   g_mutex_unlock (&priv->lock);
1149   res = priv->rtx_time;
1150   g_mutex_unlock (&priv->lock);
1151
1152   return res;
1153 }
1154
1155 /**
1156  * gst_rtsp_media_use_time_provider:
1157  * @media: a #GstRTSPMedia
1158  * @time_provider: if a #GstNetTimeProvider should be used
1159  *
1160  * Set @media to provide a #GstNetTimeProvider.
1161  */
1162 void
1163 gst_rtsp_media_use_time_provider (GstRTSPMedia * media, gboolean time_provider)
1164 {
1165   GstRTSPMediaPrivate *priv;
1166
1167   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
1168
1169   priv = media->priv;
1170
1171   g_mutex_lock (&priv->lock);
1172   priv->time_provider = time_provider;
1173   g_mutex_unlock (&priv->lock);
1174 }
1175
1176 /**
1177  * gst_rtsp_media_is_time_provider:
1178  * @media: a #GstRTSPMedia
1179  *
1180  * Check if @media can provide a #GstNetTimeProvider for its pipeline clock.
1181  *
1182  * Use gst_rtsp_media_get_time_provider() to get the network clock.
1183  *
1184  * Returns: %TRUE if @media can provide a #GstNetTimeProvider.
1185  */
1186 gboolean
1187 gst_rtsp_media_is_time_provider (GstRTSPMedia * media)
1188 {
1189   GstRTSPMediaPrivate *priv;
1190   gboolean res;
1191
1192   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
1193
1194   priv = media->priv;
1195
1196   g_mutex_unlock (&priv->lock);
1197   res = priv->time_provider;
1198   g_mutex_unlock (&priv->lock);
1199
1200   return res;
1201 }
1202
1203 /**
1204  * gst_rtsp_media_set_address_pool:
1205  * @media: a #GstRTSPMedia
1206  * @pool: (transfer none): a #GstRTSPAddressPool
1207  *
1208  * configure @pool to be used as the address pool of @media.
1209  */
1210 void
1211 gst_rtsp_media_set_address_pool (GstRTSPMedia * media,
1212     GstRTSPAddressPool * pool)
1213 {
1214   GstRTSPMediaPrivate *priv;
1215   GstRTSPAddressPool *old;
1216
1217   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
1218
1219   priv = media->priv;
1220
1221   GST_LOG_OBJECT (media, "set address pool %p", pool);
1222
1223   g_mutex_lock (&priv->lock);
1224   if ((old = priv->pool) != pool)
1225     priv->pool = pool ? g_object_ref (pool) : NULL;
1226   else
1227     old = NULL;
1228   g_ptr_array_foreach (priv->streams, (GFunc) gst_rtsp_stream_set_address_pool,
1229       pool);
1230   g_mutex_unlock (&priv->lock);
1231
1232   if (old)
1233     g_object_unref (old);
1234 }
1235
1236 /**
1237  * gst_rtsp_media_get_address_pool:
1238  * @media: a #GstRTSPMedia
1239  *
1240  * Get the #GstRTSPAddressPool used as the address pool of @media.
1241  *
1242  * Returns: (transfer full): the #GstRTSPAddressPool of @media. g_object_unref() after
1243  * usage.
1244  */
1245 GstRTSPAddressPool *
1246 gst_rtsp_media_get_address_pool (GstRTSPMedia * media)
1247 {
1248   GstRTSPMediaPrivate *priv;
1249   GstRTSPAddressPool *result;
1250
1251   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
1252
1253   priv = media->priv;
1254
1255   g_mutex_lock (&priv->lock);
1256   if ((result = priv->pool))
1257     g_object_ref (result);
1258   g_mutex_unlock (&priv->lock);
1259
1260   return result;
1261 }
1262
1263 static GList *
1264 _find_payload_types (GstRTSPMedia * media)
1265 {
1266   GList *ret = NULL;
1267   gint i, n;
1268
1269   n = media->priv->streams->len;
1270   for (i = 0; i < n; i++) {
1271     GstRTSPStream *stream = g_ptr_array_index (media->priv->streams, i);
1272     guint pt = gst_rtsp_stream_get_pt (stream);
1273
1274     ret = g_list_append (ret, GUINT_TO_POINTER (pt));
1275   }
1276
1277   return ret;
1278 }
1279
1280 static guint
1281 _next_available_pt (GList * payloads)
1282 {
1283   guint i;
1284
1285   for (i = 96; i <= 127; i++) {
1286     GList *iter = g_list_find (payloads, GINT_TO_POINTER (i));
1287     if (!iter)
1288       return GPOINTER_TO_UINT (i);
1289   }
1290
1291   return 0;
1292 }
1293
1294 /**
1295  * gst_rtsp_media_collect_streams:
1296  * @media: a #GstRTSPMedia
1297  *
1298  * Find all payloader elements, they should be named pay\%d in the
1299  * element of @media, and create #GstRTSPStreams for them.
1300  *
1301  * Collect all dynamic elements, named dynpay\%d, and add them to
1302  * the list of dynamic elements.
1303  */
1304 void
1305 gst_rtsp_media_collect_streams (GstRTSPMedia * media)
1306 {
1307   GstRTSPMediaPrivate *priv;
1308   GstElement *element, *elem;
1309   GstPad *pad;
1310   gint i;
1311   gboolean have_elem;
1312
1313   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
1314
1315   priv = media->priv;
1316   element = priv->element;
1317
1318   have_elem = TRUE;
1319   for (i = 0; have_elem; i++) {
1320     gchar *name;
1321
1322     have_elem = FALSE;
1323
1324     name = g_strdup_printf ("pay%d", i);
1325     if ((elem = gst_bin_get_by_name (GST_BIN (element), name))) {
1326       GST_INFO ("found stream %d with payloader %p", i, elem);
1327
1328       /* take the pad of the payloader */
1329       pad = gst_element_get_static_pad (elem, "src");
1330       /* create the stream */
1331       gst_rtsp_media_create_stream (media, elem, pad);
1332       gst_object_unref (pad);
1333       gst_object_unref (elem);
1334
1335       have_elem = TRUE;
1336     }
1337     g_free (name);
1338
1339     name = g_strdup_printf ("dynpay%d", i);
1340     if ((elem = gst_bin_get_by_name (GST_BIN (element), name))) {
1341       /* a stream that will dynamically create pads to provide RTP packets */
1342       GST_INFO ("found dynamic element %d, %p", i, elem);
1343
1344       g_mutex_lock (&priv->lock);
1345       priv->dynamic = g_list_prepend (priv->dynamic, elem);
1346       g_mutex_unlock (&priv->lock);
1347
1348       have_elem = TRUE;
1349     }
1350     g_free (name);
1351   }
1352 }
1353
1354 /**
1355  * gst_rtsp_media_create_stream:
1356  * @media: a #GstRTSPMedia
1357  * @payloader: a #GstElement
1358  * @srcpad: a source #GstPad
1359  *
1360  * Create a new stream in @media that provides RTP data on @srcpad.
1361  * @srcpad should be a pad of an element inside @media->element.
1362  *
1363  * Returns: (transfer none): a new #GstRTSPStream that remains valid for as long
1364  * as @media exists.
1365  */
1366 GstRTSPStream *
1367 gst_rtsp_media_create_stream (GstRTSPMedia * media, GstElement * payloader,
1368     GstPad * pad)
1369 {
1370   GstRTSPMediaPrivate *priv;
1371   GstRTSPStream *stream;
1372   GstPad *srcpad;
1373   gchar *name;
1374   gint idx;
1375   gint i, n;
1376
1377   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
1378   g_return_val_if_fail (GST_IS_ELEMENT (payloader), NULL);
1379   g_return_val_if_fail (GST_IS_PAD (pad), NULL);
1380   g_return_val_if_fail (GST_PAD_IS_SRC (pad), NULL);
1381
1382   priv = media->priv;
1383
1384   g_mutex_lock (&priv->lock);
1385   idx = priv->streams->len;
1386
1387   GST_DEBUG ("media %p: creating stream with index %d", media, idx);
1388
1389   name = g_strdup_printf ("src_%u", idx);
1390   srcpad = gst_ghost_pad_new (name, pad);
1391   gst_pad_set_active (srcpad, TRUE);
1392   gst_element_add_pad (priv->element, srcpad);
1393   g_free (name);
1394
1395   stream = gst_rtsp_stream_new (idx, payloader, srcpad);
1396   if (priv->pool)
1397     gst_rtsp_stream_set_address_pool (stream, priv->pool);
1398   gst_rtsp_stream_set_profiles (stream, priv->profiles);
1399   gst_rtsp_stream_set_protocols (stream, priv->protocols);
1400   gst_rtsp_stream_set_retransmission_time (stream, priv->rtx_time);
1401
1402   g_ptr_array_add (priv->streams, stream);
1403
1404   if (priv->payloads)
1405     g_list_free (priv->payloads);
1406   priv->payloads = _find_payload_types (media);
1407
1408   n = priv->streams->len;
1409   for (i = 0; i < n; i++) {
1410     GstRTSPStream *stream = g_ptr_array_index (priv->streams, i);
1411     guint rtx_pt = _next_available_pt (priv->payloads);
1412
1413     if (rtx_pt == 0) {
1414       /* FIXME: ran out of space of dynamic payload types */
1415       break;
1416     }
1417
1418     gst_rtsp_stream_set_retransmission_pt (stream, rtx_pt);
1419
1420     priv->payloads = g_list_append (priv->payloads, GUINT_TO_POINTER (rtx_pt));
1421   }
1422   g_mutex_unlock (&priv->lock);
1423
1424   g_signal_emit (media, gst_rtsp_media_signals[SIGNAL_NEW_STREAM], 0, stream,
1425       NULL);
1426
1427   return stream;
1428 }
1429
1430 static void
1431 gst_rtsp_media_remove_stream (GstRTSPMedia * media, GstRTSPStream * stream)
1432 {
1433   GstRTSPMediaPrivate *priv;
1434   GstPad *srcpad;
1435
1436   priv = media->priv;
1437
1438   g_mutex_lock (&priv->lock);
1439   /* remove the ghostpad */
1440   srcpad = gst_rtsp_stream_get_srcpad (stream);
1441   gst_element_remove_pad (priv->element, srcpad);
1442   gst_object_unref (srcpad);
1443   /* now remove the stream */
1444   g_object_ref (stream);
1445   g_ptr_array_remove (priv->streams, stream);
1446   g_mutex_unlock (&priv->lock);
1447
1448   g_signal_emit (media, gst_rtsp_media_signals[SIGNAL_REMOVED_STREAM], 0,
1449       stream, NULL);
1450
1451   g_object_unref (stream);
1452 }
1453
1454 /**
1455  * gst_rtsp_media_n_streams:
1456  * @media: a #GstRTSPMedia
1457  *
1458  * Get the number of streams in this media.
1459  *
1460  * Returns: The number of streams.
1461  */
1462 guint
1463 gst_rtsp_media_n_streams (GstRTSPMedia * media)
1464 {
1465   GstRTSPMediaPrivate *priv;
1466   guint res;
1467
1468   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), 0);
1469
1470   priv = media->priv;
1471
1472   g_mutex_lock (&priv->lock);
1473   res = priv->streams->len;
1474   g_mutex_unlock (&priv->lock);
1475
1476   return res;
1477 }
1478
1479 /**
1480  * gst_rtsp_media_get_stream:
1481  * @media: a #GstRTSPMedia
1482  * @idx: the stream index
1483  *
1484  * Retrieve the stream with index @idx from @media.
1485  *
1486  * Returns: (nullable) (transfer none): the #GstRTSPStream at index
1487  * @idx or %NULL when a stream with that index did not exist.
1488  */
1489 GstRTSPStream *
1490 gst_rtsp_media_get_stream (GstRTSPMedia * media, guint idx)
1491 {
1492   GstRTSPMediaPrivate *priv;
1493   GstRTSPStream *res;
1494
1495   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
1496
1497   priv = media->priv;
1498
1499   g_mutex_lock (&priv->lock);
1500   if (idx < priv->streams->len)
1501     res = g_ptr_array_index (priv->streams, idx);
1502   else
1503     res = NULL;
1504   g_mutex_unlock (&priv->lock);
1505
1506   return res;
1507 }
1508
1509 /**
1510  * gst_rtsp_media_find_stream:
1511  * @media: a #GstRTSPMedia
1512  * @control: the control of the stream
1513  *
1514  * Find a stream in @media with @control as the control uri.
1515  *
1516  * Returns: (nullable) (transfer none): the #GstRTSPStream with
1517  * control uri @control or %NULL when a stream with that control did
1518  * not exist.
1519  */
1520 GstRTSPStream *
1521 gst_rtsp_media_find_stream (GstRTSPMedia * media, const gchar * control)
1522 {
1523   GstRTSPMediaPrivate *priv;
1524   GstRTSPStream *res;
1525   gint i;
1526
1527   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
1528   g_return_val_if_fail (control != NULL, NULL);
1529
1530   priv = media->priv;
1531
1532   res = NULL;
1533
1534   g_mutex_lock (&priv->lock);
1535   for (i = 0; i < priv->streams->len; i++) {
1536     GstRTSPStream *test;
1537
1538     test = g_ptr_array_index (priv->streams, i);
1539     if (gst_rtsp_stream_has_control (test, control)) {
1540       res = test;
1541       break;
1542     }
1543   }
1544   g_mutex_unlock (&priv->lock);
1545
1546   return res;
1547 }
1548
1549 /* called with state-lock */
1550 static gboolean
1551 default_convert_range (GstRTSPMedia * media, GstRTSPTimeRange * range,
1552     GstRTSPRangeUnit unit)
1553 {
1554   return gst_rtsp_range_convert_units (range, unit);
1555 }
1556
1557 /**
1558  * gst_rtsp_media_get_range_string:
1559  * @media: a #GstRTSPMedia
1560  * @play: for the PLAY request
1561  * @unit: the unit to use for the string
1562  *
1563  * Get the current range as a string. @media must be prepared with
1564  * gst_rtsp_media_prepare ().
1565  *
1566  * Returns: (transfer full): The range as a string, g_free() after usage.
1567  */
1568 gchar *
1569 gst_rtsp_media_get_range_string (GstRTSPMedia * media, gboolean play,
1570     GstRTSPRangeUnit unit)
1571 {
1572   GstRTSPMediaClass *klass;
1573   GstRTSPMediaPrivate *priv;
1574   gchar *result;
1575   GstRTSPTimeRange range;
1576
1577   klass = GST_RTSP_MEDIA_GET_CLASS (media);
1578   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
1579   g_return_val_if_fail (klass->convert_range != NULL, FALSE);
1580
1581   priv = media->priv;
1582
1583   g_rec_mutex_lock (&priv->state_lock);
1584   if (priv->status != GST_RTSP_MEDIA_STATUS_PREPARED &&
1585       priv->status != GST_RTSP_MEDIA_STATUS_SUSPENDED)
1586     goto not_prepared;
1587
1588   g_mutex_lock (&priv->lock);
1589
1590   /* Update the range value with current position/duration */
1591   collect_media_stats (media);
1592
1593   /* make copy */
1594   range = priv->range;
1595
1596   if (!play && priv->n_active > 0) {
1597     range.min.type = GST_RTSP_TIME_NOW;
1598     range.min.seconds = -1;
1599   }
1600   g_mutex_unlock (&priv->lock);
1601   g_rec_mutex_unlock (&priv->state_lock);
1602
1603   if (!klass->convert_range (media, &range, unit))
1604     goto conversion_failed;
1605
1606   result = gst_rtsp_range_to_string (&range);
1607
1608   return result;
1609
1610   /* ERRORS */
1611 not_prepared:
1612   {
1613     GST_WARNING ("media %p was not prepared", media);
1614     g_rec_mutex_unlock (&priv->state_lock);
1615     return NULL;
1616   }
1617 conversion_failed:
1618   {
1619     GST_WARNING ("range conversion to unit %d failed", unit);
1620     return NULL;
1621   }
1622 }
1623
1624 static void
1625 stream_update_blocked (GstRTSPStream * stream, GstRTSPMedia * media)
1626 {
1627   gst_rtsp_stream_set_blocked (stream, media->priv->blocked);
1628 }
1629
1630 static void
1631 media_streams_set_blocked (GstRTSPMedia * media, gboolean blocked)
1632 {
1633   GstRTSPMediaPrivate *priv = media->priv;
1634
1635   GST_DEBUG ("media %p set blocked %d", media, blocked);
1636   priv->blocked = blocked;
1637   g_ptr_array_foreach (priv->streams, (GFunc) stream_update_blocked, media);
1638 }
1639
1640 static void
1641 gst_rtsp_media_set_status (GstRTSPMedia * media, GstRTSPMediaStatus status)
1642 {
1643   GstRTSPMediaPrivate *priv = media->priv;
1644
1645   g_mutex_lock (&priv->lock);
1646   priv->status = status;
1647   GST_DEBUG ("setting new status to %d", status);
1648   g_cond_broadcast (&priv->cond);
1649   g_mutex_unlock (&priv->lock);
1650 }
1651
1652 /**
1653  * gst_rtsp_media_get_status:
1654  * @media: a #GstRTSPMedia
1655  *
1656  * Get the status of @media. When @media is busy preparing, this function waits
1657  * until @media is prepared or in error.
1658  *
1659  * Returns: the status of @media.
1660  */
1661 GstRTSPMediaStatus
1662 gst_rtsp_media_get_status (GstRTSPMedia * media)
1663 {
1664   GstRTSPMediaPrivate *priv = media->priv;
1665   GstRTSPMediaStatus result;
1666   gint64 end_time;
1667
1668   g_mutex_lock (&priv->lock);
1669   end_time = g_get_monotonic_time () + 20 * G_TIME_SPAN_SECOND;
1670   /* while we are preparing, wait */
1671   while (priv->status == GST_RTSP_MEDIA_STATUS_PREPARING) {
1672     GST_DEBUG ("waiting for status change");
1673     if (!g_cond_wait_until (&priv->cond, &priv->lock, end_time)) {
1674       GST_DEBUG ("timeout, assuming error status");
1675       priv->status = GST_RTSP_MEDIA_STATUS_ERROR;
1676     }
1677   }
1678   /* could be success or error */
1679   result = priv->status;
1680   GST_DEBUG ("got status %d", result);
1681   g_mutex_unlock (&priv->lock);
1682
1683   return result;
1684 }
1685
1686 /**
1687  * gst_rtsp_media_seek:
1688  * @media: a #GstRTSPMedia
1689  * @range: (transfer none): a #GstRTSPTimeRange
1690  *
1691  * Seek the pipeline of @media to @range. @media must be prepared with
1692  * gst_rtsp_media_prepare().
1693  *
1694  * Returns: %TRUE on success.
1695  */
1696 gboolean
1697 gst_rtsp_media_seek (GstRTSPMedia * media, GstRTSPTimeRange * range)
1698 {
1699   GstRTSPMediaClass *klass;
1700   GstRTSPMediaPrivate *priv;
1701   gboolean res;
1702   GstClockTime start, stop;
1703   GstSeekType start_type, stop_type;
1704   GstQuery *query;
1705
1706   klass = GST_RTSP_MEDIA_GET_CLASS (media);
1707
1708   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
1709   g_return_val_if_fail (range != NULL, FALSE);
1710   g_return_val_if_fail (klass->convert_range != NULL, FALSE);
1711
1712   priv = media->priv;
1713
1714   g_rec_mutex_lock (&priv->state_lock);
1715   if (priv->status != GST_RTSP_MEDIA_STATUS_PREPARED)
1716     goto not_prepared;
1717
1718   /* Update the seekable state of the pipeline in case it changed */
1719   query = gst_query_new_seeking (GST_FORMAT_TIME);
1720   if (gst_element_query (priv->pipeline, query)) {
1721     GstFormat format;
1722     gboolean seekable;
1723     gint64 start, end;
1724
1725     gst_query_parse_seeking (query, &format, &seekable, &start, &end);
1726     priv->seekable = seekable;
1727   }
1728   gst_query_unref (query);
1729
1730   if (!priv->seekable)
1731     goto not_seekable;
1732
1733   start_type = stop_type = GST_SEEK_TYPE_NONE;
1734
1735   if (!klass->convert_range (media, range, GST_RTSP_RANGE_NPT))
1736     goto not_supported;
1737   gst_rtsp_range_get_times (range, &start, &stop);
1738
1739   GST_INFO ("got %" GST_TIME_FORMAT " - %" GST_TIME_FORMAT,
1740       GST_TIME_ARGS (start), GST_TIME_ARGS (stop));
1741   GST_INFO ("current %" GST_TIME_FORMAT " - %" GST_TIME_FORMAT,
1742       GST_TIME_ARGS (priv->range_start), GST_TIME_ARGS (priv->range_stop));
1743
1744   if (start != GST_CLOCK_TIME_NONE)
1745     start_type = GST_SEEK_TYPE_SET;
1746
1747   if (priv->range_stop == stop)
1748     stop = GST_CLOCK_TIME_NONE;
1749   else if (stop != GST_CLOCK_TIME_NONE)
1750     stop_type = GST_SEEK_TYPE_SET;
1751
1752   if (start != GST_CLOCK_TIME_NONE || stop != GST_CLOCK_TIME_NONE) {
1753     GstSeekFlags flags;
1754
1755     GST_INFO ("seeking to %" GST_TIME_FORMAT " - %" GST_TIME_FORMAT,
1756         GST_TIME_ARGS (start), GST_TIME_ARGS (stop));
1757
1758     gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARING);
1759     if (priv->blocked)
1760       media_streams_set_blocked (media, TRUE);
1761
1762     /* depends on the current playing state of the pipeline. We might need to
1763      * queue this until we get EOS. */
1764     flags = GST_SEEK_FLAG_FLUSH;
1765
1766     /* if range start was not supplied we must continue from current position.
1767      * but since we're doing a flushing seek, let us query the current position
1768      * so we end up at exactly the same position after the seek. */
1769     if (range->min.type == GST_RTSP_TIME_END) { /* Yepp, that's right! */
1770       gint64 position;
1771       gboolean ret = FALSE;
1772
1773       if (klass->query_position)
1774         ret = klass->query_position (media, &position);
1775
1776       if (!ret) {
1777         GST_WARNING ("position query failed");
1778       } else {
1779         GST_DEBUG ("doing accurate seek to %" GST_TIME_FORMAT,
1780             GST_TIME_ARGS (position));
1781         start = position;
1782         start_type = GST_SEEK_TYPE_SET;
1783         flags |= GST_SEEK_FLAG_ACCURATE;
1784       }
1785     } else {
1786       /* only set keyframe flag when modifying start */
1787       if (start_type != GST_SEEK_TYPE_NONE)
1788         flags |= GST_SEEK_FLAG_KEY_UNIT;
1789     }
1790
1791     /* FIXME, we only do forwards playback, no trick modes yet */
1792     res = gst_element_seek (priv->pipeline, 1.0, GST_FORMAT_TIME,
1793         flags, start_type, start, stop_type, stop);
1794
1795     /* and block for the seek to complete */
1796     GST_INFO ("done seeking %d", res);
1797     g_rec_mutex_unlock (&priv->state_lock);
1798
1799     /* wait until pipeline is prerolled again, this will also collect stats */
1800     if (!wait_preroll (media))
1801       goto preroll_failed;
1802
1803     g_rec_mutex_lock (&priv->state_lock);
1804     GST_INFO ("prerolled again");
1805   } else {
1806     GST_INFO ("no seek needed");
1807     res = TRUE;
1808   }
1809   g_rec_mutex_unlock (&priv->state_lock);
1810
1811   return res;
1812
1813   /* ERRORS */
1814 not_prepared:
1815   {
1816     g_rec_mutex_unlock (&priv->state_lock);
1817     GST_INFO ("media %p is not prepared", media);
1818     return FALSE;
1819   }
1820 not_seekable:
1821   {
1822     g_rec_mutex_unlock (&priv->state_lock);
1823     GST_INFO ("pipeline is not seekable");
1824     return FALSE;
1825   }
1826 not_supported:
1827   {
1828     g_rec_mutex_unlock (&priv->state_lock);
1829     GST_WARNING ("conversion to npt not supported");
1830     return FALSE;
1831   }
1832 preroll_failed:
1833   {
1834     GST_WARNING ("failed to preroll after seek");
1835     return FALSE;
1836   }
1837 }
1838
1839 static void
1840 stream_collect_blocking (GstRTSPStream * stream, gboolean * blocked)
1841 {
1842   *blocked &= gst_rtsp_stream_is_blocking (stream);
1843 }
1844
1845 static gboolean
1846 media_streams_blocking (GstRTSPMedia * media)
1847 {
1848   gboolean blocking = TRUE;
1849
1850   g_ptr_array_foreach (media->priv->streams, (GFunc) stream_collect_blocking,
1851       &blocking);
1852
1853   return blocking;
1854 }
1855
1856 static GstStateChangeReturn
1857 set_state (GstRTSPMedia * media, GstState state)
1858 {
1859   GstRTSPMediaPrivate *priv = media->priv;
1860   GstStateChangeReturn ret;
1861
1862   GST_INFO ("set state to %s for media %p", gst_element_state_get_name (state),
1863       media);
1864   ret = gst_element_set_state (priv->pipeline, state);
1865
1866   return ret;
1867 }
1868
1869 static GstStateChangeReturn
1870 set_target_state (GstRTSPMedia * media, GstState state, gboolean do_state)
1871 {
1872   GstRTSPMediaPrivate *priv = media->priv;
1873   GstStateChangeReturn ret;
1874
1875   GST_INFO ("set target state to %s for media %p",
1876       gst_element_state_get_name (state), media);
1877   priv->target_state = state;
1878
1879   g_signal_emit (media, gst_rtsp_media_signals[SIGNAL_TARGET_STATE], 0,
1880       priv->target_state, NULL);
1881
1882   if (do_state)
1883     ret = set_state (media, state);
1884   else
1885     ret = GST_STATE_CHANGE_SUCCESS;
1886
1887   return ret;
1888 }
1889
1890 /* called with state-lock */
1891 static gboolean
1892 default_handle_message (GstRTSPMedia * media, GstMessage * message)
1893 {
1894   GstRTSPMediaPrivate *priv = media->priv;
1895   GstMessageType type;
1896
1897   type = GST_MESSAGE_TYPE (message);
1898
1899   switch (type) {
1900     case GST_MESSAGE_STATE_CHANGED:
1901       break;
1902     case GST_MESSAGE_BUFFERING:
1903     {
1904       gint percent;
1905
1906       gst_message_parse_buffering (message, &percent);
1907
1908       /* no state management needed for live pipelines */
1909       if (priv->is_live)
1910         break;
1911
1912       if (percent == 100) {
1913         /* a 100% message means buffering is done */
1914         priv->buffering = FALSE;
1915         /* if the desired state is playing, go back */
1916         if (priv->target_state == GST_STATE_PLAYING) {
1917           GST_INFO ("Buffering done, setting pipeline to PLAYING");
1918           set_state (media, GST_STATE_PLAYING);
1919         } else {
1920           GST_INFO ("Buffering done");
1921         }
1922       } else {
1923         /* buffering busy */
1924         if (priv->buffering == FALSE) {
1925           if (priv->target_state == GST_STATE_PLAYING) {
1926             /* we were not buffering but PLAYING, PAUSE  the pipeline. */
1927             GST_INFO ("Buffering, setting pipeline to PAUSED ...");
1928             set_state (media, GST_STATE_PAUSED);
1929           } else {
1930             GST_INFO ("Buffering ...");
1931           }
1932         }
1933         priv->buffering = TRUE;
1934       }
1935       break;
1936     }
1937     case GST_MESSAGE_LATENCY:
1938     {
1939       gst_bin_recalculate_latency (GST_BIN_CAST (priv->pipeline));
1940       break;
1941     }
1942     case GST_MESSAGE_ERROR:
1943     {
1944       GError *gerror;
1945       gchar *debug;
1946
1947       gst_message_parse_error (message, &gerror, &debug);
1948       GST_WARNING ("%p: got error %s (%s)", media, gerror->message, debug);
1949       g_error_free (gerror);
1950       g_free (debug);
1951
1952       gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_ERROR);
1953       break;
1954     }
1955     case GST_MESSAGE_WARNING:
1956     {
1957       GError *gerror;
1958       gchar *debug;
1959
1960       gst_message_parse_warning (message, &gerror, &debug);
1961       GST_WARNING ("%p: got warning %s (%s)", media, gerror->message, debug);
1962       g_error_free (gerror);
1963       g_free (debug);
1964       break;
1965     }
1966     case GST_MESSAGE_ELEMENT:
1967     {
1968       const GstStructure *s;
1969
1970       s = gst_message_get_structure (message);
1971       if (gst_structure_has_name (s, "GstRTSPStreamBlocking")) {
1972         GST_DEBUG ("media received blocking message");
1973         if (priv->blocked && media_streams_blocking (media)) {
1974           GST_DEBUG ("media is blocking");
1975           collect_media_stats (media);
1976
1977           if (priv->status == GST_RTSP_MEDIA_STATUS_PREPARING)
1978             gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARED);
1979         }
1980       }
1981       break;
1982     }
1983     case GST_MESSAGE_STREAM_STATUS:
1984       break;
1985     case GST_MESSAGE_ASYNC_DONE:
1986       if (priv->adding) {
1987         /* when we are dynamically adding pads, the addition of the udpsrc will
1988          * temporarily produce ASYNC_DONE messages. We have to ignore them and
1989          * wait for the final ASYNC_DONE after everything prerolled */
1990         GST_INFO ("%p: ignoring ASYNC_DONE", media);
1991       } else {
1992         GST_INFO ("%p: got ASYNC_DONE", media);
1993         collect_media_stats (media);
1994
1995         if (priv->status == GST_RTSP_MEDIA_STATUS_PREPARING)
1996           gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARED);
1997       }
1998       break;
1999     case GST_MESSAGE_EOS:
2000       GST_INFO ("%p: got EOS", media);
2001
2002       if (priv->status == GST_RTSP_MEDIA_STATUS_UNPREPARING) {
2003         GST_DEBUG ("shutting down after EOS");
2004         finish_unprepare (media);
2005       }
2006       break;
2007     default:
2008       GST_INFO ("%p: got message type %d (%s)", media, type,
2009           gst_message_type_get_name (type));
2010       break;
2011   }
2012   return TRUE;
2013 }
2014
2015 static gboolean
2016 bus_message (GstBus * bus, GstMessage * message, GstRTSPMedia * media)
2017 {
2018   GstRTSPMediaPrivate *priv = media->priv;
2019   GstRTSPMediaClass *klass;
2020   gboolean ret;
2021
2022   klass = GST_RTSP_MEDIA_GET_CLASS (media);
2023
2024   g_rec_mutex_lock (&priv->state_lock);
2025   if (klass->handle_message)
2026     ret = klass->handle_message (media, message);
2027   else
2028     ret = FALSE;
2029   g_rec_mutex_unlock (&priv->state_lock);
2030
2031   return ret;
2032 }
2033
2034 static void
2035 watch_destroyed (GstRTSPMedia * media)
2036 {
2037   GST_DEBUG_OBJECT (media, "source destroyed");
2038   g_object_unref (media);
2039 }
2040
2041 static GstElement *
2042 find_payload_element (GstElement * payloader)
2043 {
2044   GstElement *pay = NULL;
2045
2046   if (GST_IS_BIN (payloader)) {
2047     GstIterator *iter;
2048     GValue item = { 0 };
2049
2050     iter = gst_bin_iterate_recurse (GST_BIN (payloader));
2051     while (gst_iterator_next (iter, &item) == GST_ITERATOR_OK) {
2052       GstElement *element = (GstElement *) g_value_get_object (&item);
2053       GstElementClass *eclass = GST_ELEMENT_GET_CLASS (element);
2054       const gchar *klass;
2055
2056       klass =
2057           gst_element_class_get_metadata (eclass, GST_ELEMENT_METADATA_KLASS);
2058       if (klass == NULL)
2059         continue;
2060
2061       if (strstr (klass, "Payloader") && strstr (klass, "RTP")) {
2062         pay = gst_object_ref (element);
2063         g_value_unset (&item);
2064         break;
2065       }
2066       g_value_unset (&item);
2067     }
2068     gst_iterator_free (iter);
2069   } else {
2070     pay = g_object_ref (payloader);
2071   }
2072
2073   return pay;
2074 }
2075
2076 /* called from streaming threads */
2077 static void
2078 pad_added_cb (GstElement * element, GstPad * pad, GstRTSPMedia * media)
2079 {
2080   GstRTSPMediaPrivate *priv = media->priv;
2081   GstRTSPStream *stream;
2082   GstElement *pay;
2083
2084   /* find the real payload element */
2085   pay = find_payload_element (element);
2086   stream = gst_rtsp_media_create_stream (media, pay, pad);
2087   gst_object_unref (pay);
2088
2089   GST_INFO ("pad added %s:%s, stream %p", GST_DEBUG_PAD_NAME (pad), stream);
2090
2091   g_rec_mutex_lock (&priv->state_lock);
2092   if (priv->status != GST_RTSP_MEDIA_STATUS_PREPARING)
2093     goto not_preparing;
2094
2095   g_object_set_data (G_OBJECT (pad), "gst-rtsp-dynpad-stream", stream);
2096
2097   /* we will be adding elements below that will cause ASYNC_DONE to be
2098    * posted in the bus. We want to ignore those messages until the
2099    * pipeline really prerolled. */
2100   priv->adding = TRUE;
2101
2102   /* join the element in the PAUSED state because this callback is
2103    * called from the streaming thread and it is PAUSED */
2104   if (!gst_rtsp_stream_join_bin (stream, GST_BIN (priv->pipeline),
2105           priv->rtpbin, GST_STATE_PAUSED)) {
2106     GST_WARNING ("failed to join bin element");
2107   }
2108
2109   priv->adding = FALSE;
2110   g_rec_mutex_unlock (&priv->state_lock);
2111
2112   return;
2113
2114   /* ERRORS */
2115 not_preparing:
2116   {
2117     gst_rtsp_media_remove_stream (media, stream);
2118     g_rec_mutex_unlock (&priv->state_lock);
2119     GST_INFO ("ignore pad because we are not preparing");
2120     return;
2121   }
2122 }
2123
2124 static void
2125 pad_removed_cb (GstElement * element, GstPad * pad, GstRTSPMedia * media)
2126 {
2127   GstRTSPMediaPrivate *priv = media->priv;
2128   GstRTSPStream *stream;
2129
2130   stream = g_object_get_data (G_OBJECT (pad), "gst-rtsp-dynpad-stream");
2131   if (stream == NULL)
2132     return;
2133
2134   GST_INFO ("pad removed %s:%s, stream %p", GST_DEBUG_PAD_NAME (pad), stream);
2135
2136   g_rec_mutex_lock (&priv->state_lock);
2137   gst_rtsp_stream_leave_bin (stream, GST_BIN (priv->pipeline), priv->rtpbin);
2138   g_rec_mutex_unlock (&priv->state_lock);
2139
2140   gst_rtsp_media_remove_stream (media, stream);
2141 }
2142
2143 static void
2144 remove_fakesink (GstRTSPMediaPrivate * priv)
2145 {
2146   GstElement *fakesink;
2147
2148   g_mutex_lock (&priv->lock);
2149   if ((fakesink = priv->fakesink))
2150     gst_object_ref (fakesink);
2151   priv->fakesink = NULL;
2152   g_mutex_unlock (&priv->lock);
2153
2154   if (fakesink) {
2155     gst_bin_remove (GST_BIN (priv->pipeline), fakesink);
2156     gst_element_set_state (fakesink, GST_STATE_NULL);
2157     gst_object_unref (fakesink);
2158     GST_INFO ("removed fakesink");
2159   }
2160 }
2161
2162 static void
2163 no_more_pads_cb (GstElement * element, GstRTSPMedia * media)
2164 {
2165   GstRTSPMediaPrivate *priv = media->priv;
2166
2167   GST_INFO ("no more pads");
2168   remove_fakesink (priv);
2169 }
2170
2171 typedef struct _DynPaySignalHandlers DynPaySignalHandlers;
2172
2173 struct _DynPaySignalHandlers
2174 {
2175   gulong pad_added_handler;
2176   gulong pad_removed_handler;
2177   gulong no_more_pads_handler;
2178 };
2179
2180 static gboolean
2181 start_preroll (GstRTSPMedia * media)
2182 {
2183   GstRTSPMediaPrivate *priv = media->priv;
2184   GstStateChangeReturn ret;
2185
2186   GST_INFO ("setting pipeline to PAUSED for media %p", media);
2187   /* first go to PAUSED */
2188   ret = set_target_state (media, GST_STATE_PAUSED, TRUE);
2189
2190   switch (ret) {
2191     case GST_STATE_CHANGE_SUCCESS:
2192       GST_INFO ("SUCCESS state change for media %p", media);
2193       priv->seekable = TRUE;
2194       break;
2195     case GST_STATE_CHANGE_ASYNC:
2196       GST_INFO ("ASYNC state change for media %p", media);
2197       priv->seekable = TRUE;
2198       break;
2199     case GST_STATE_CHANGE_NO_PREROLL:
2200       /* we need to go to PLAYING */
2201       GST_INFO ("NO_PREROLL state change: live media %p", media);
2202       /* FIXME we disable seeking for live streams for now. We should perform a
2203        * seeking query in preroll instead */
2204       priv->seekable = FALSE;
2205       priv->is_live = TRUE;
2206       /* start blocked  to make sure nothing goes to the sink */
2207       media_streams_set_blocked (media, TRUE);
2208       ret = set_state (media, GST_STATE_PLAYING);
2209       if (ret == GST_STATE_CHANGE_FAILURE)
2210         goto state_failed;
2211       break;
2212     case GST_STATE_CHANGE_FAILURE:
2213       goto state_failed;
2214   }
2215
2216   return TRUE;
2217
2218 state_failed:
2219   {
2220     GST_WARNING ("failed to preroll pipeline");
2221     return FALSE;
2222   }
2223 }
2224
2225 static gboolean
2226 wait_preroll (GstRTSPMedia * media)
2227 {
2228   GstRTSPMediaStatus status;
2229
2230   GST_DEBUG ("wait to preroll pipeline");
2231
2232   /* wait until pipeline is prerolled */
2233   status = gst_rtsp_media_get_status (media);
2234   if (status == GST_RTSP_MEDIA_STATUS_ERROR)
2235     goto preroll_failed;
2236
2237   return TRUE;
2238
2239 preroll_failed:
2240   {
2241     GST_WARNING ("failed to preroll pipeline");
2242     return FALSE;
2243   }
2244 }
2245
2246 static gboolean
2247 start_prepare (GstRTSPMedia * media)
2248 {
2249   GstRTSPMediaPrivate *priv = media->priv;
2250   guint i;
2251   GList *walk;
2252
2253   /* link streams we already have, other streams might appear when we have
2254    * dynamic elements */
2255   for (i = 0; i < priv->streams->len; i++) {
2256     GstRTSPStream *stream;
2257
2258     stream = g_ptr_array_index (priv->streams, i);
2259
2260     if (!gst_rtsp_stream_join_bin (stream, GST_BIN (priv->pipeline),
2261             priv->rtpbin, GST_STATE_NULL)) {
2262       goto join_bin_failed;
2263     }
2264   }
2265
2266   if (priv->rtpbin)
2267     g_object_set (priv->rtpbin, "do-retransmission", priv->rtx_time > 0, NULL);
2268
2269   for (walk = priv->dynamic; walk; walk = g_list_next (walk)) {
2270     GstElement *elem = walk->data;
2271     DynPaySignalHandlers *handlers = g_slice_new (DynPaySignalHandlers);
2272
2273     GST_INFO ("adding callbacks for dynamic element %p", elem);
2274
2275     handlers->pad_added_handler = g_signal_connect (elem, "pad-added",
2276         (GCallback) pad_added_cb, media);
2277     handlers->pad_removed_handler = g_signal_connect (elem, "pad-removed",
2278         (GCallback) pad_removed_cb, media);
2279     handlers->no_more_pads_handler = g_signal_connect (elem, "no-more-pads",
2280         (GCallback) no_more_pads_cb, media);
2281
2282     g_object_set_data (G_OBJECT (elem), "gst-rtsp-dynpay-handlers", handlers);
2283
2284     /* we add a fakesink here in order to make the state change async. We remove
2285      * the fakesink again in the no-more-pads callback. */
2286     priv->fakesink = gst_element_factory_make ("fakesink", "fakesink");
2287     gst_bin_add (GST_BIN (priv->pipeline), priv->fakesink);
2288   }
2289
2290   if (!start_preroll (media))
2291     goto preroll_failed;
2292
2293   return FALSE;
2294
2295 join_bin_failed:
2296   {
2297     GST_WARNING ("failed to join bin element");
2298     gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_ERROR);
2299     return FALSE;
2300   }
2301 preroll_failed:
2302   {
2303     GST_WARNING ("failed to preroll pipeline");
2304     gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_ERROR);
2305     return FALSE;
2306   }
2307 }
2308
2309 static gboolean
2310 default_prepare (GstRTSPMedia * media, GstRTSPThread * thread)
2311 {
2312   GstRTSPMediaPrivate *priv;
2313   GstRTSPMediaClass *klass;
2314   GstBus *bus;
2315   GMainContext *context;
2316   GSource *source;
2317
2318   priv = media->priv;
2319
2320   klass = GST_RTSP_MEDIA_GET_CLASS (media);
2321
2322   if (!klass->create_rtpbin)
2323     goto no_create_rtpbin;
2324
2325   priv->rtpbin = klass->create_rtpbin (media);
2326   if (priv->rtpbin != NULL) {
2327     gboolean success = TRUE;
2328
2329     if (klass->setup_rtpbin)
2330       success = klass->setup_rtpbin (media, priv->rtpbin);
2331
2332     if (success == FALSE) {
2333       gst_object_unref (priv->rtpbin);
2334       priv->rtpbin = NULL;
2335     }
2336   }
2337   if (priv->rtpbin == NULL)
2338     goto no_rtpbin;
2339
2340   priv->thread = thread;
2341   context = (thread != NULL) ? (thread->context) : NULL;
2342
2343   bus = gst_pipeline_get_bus (GST_PIPELINE_CAST (priv->pipeline));
2344
2345   /* add the pipeline bus to our custom mainloop */
2346   priv->source = gst_bus_create_watch (bus);
2347   gst_object_unref (bus);
2348
2349   g_source_set_callback (priv->source, (GSourceFunc) bus_message,
2350       g_object_ref (media), (GDestroyNotify) watch_destroyed);
2351
2352   priv->id = g_source_attach (priv->source, context);
2353
2354   /* add stuff to the bin */
2355   gst_bin_add (GST_BIN (priv->pipeline), priv->rtpbin);
2356
2357   /* do remainder in context */
2358   source = g_idle_source_new ();
2359   g_source_set_callback (source, (GSourceFunc) start_prepare, media, NULL);
2360   g_source_attach (source, context);
2361   g_source_unref (source);
2362
2363   return TRUE;
2364
2365   /* ERRORS */
2366 no_create_rtpbin:
2367   {
2368     GST_ERROR ("no create_rtpbin function");
2369     g_critical ("no create_rtpbin vmethod function set");
2370     return FALSE;
2371   }
2372 no_rtpbin:
2373   {
2374     GST_WARNING ("no rtpbin element");
2375     g_warning ("failed to create element 'rtpbin', check your installation");
2376     return FALSE;
2377   }
2378 }
2379
2380 /**
2381  * gst_rtsp_media_prepare:
2382  * @media: a #GstRTSPMedia
2383  * @thread: (transfer full) (allow-none): a #GstRTSPThread to run the
2384  *   bus handler or %NULL
2385  *
2386  * Prepare @media for streaming. This function will create the objects
2387  * to manage the streaming. A pipeline must have been set on @media with
2388  * gst_rtsp_media_take_pipeline().
2389  *
2390  * It will preroll the pipeline and collect vital information about the streams
2391  * such as the duration.
2392  *
2393  * Returns: %TRUE on success.
2394  */
2395 gboolean
2396 gst_rtsp_media_prepare (GstRTSPMedia * media, GstRTSPThread * thread)
2397 {
2398   GstRTSPMediaPrivate *priv;
2399   GstRTSPMediaClass *klass;
2400
2401   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
2402
2403   priv = media->priv;
2404
2405   g_rec_mutex_lock (&priv->state_lock);
2406   priv->prepare_count++;
2407
2408   if (priv->status == GST_RTSP_MEDIA_STATUS_PREPARED ||
2409       priv->status == GST_RTSP_MEDIA_STATUS_SUSPENDED)
2410     goto was_prepared;
2411
2412   if (priv->status == GST_RTSP_MEDIA_STATUS_PREPARING)
2413     goto is_preparing;
2414
2415   if (priv->status != GST_RTSP_MEDIA_STATUS_UNPREPARED)
2416     goto not_unprepared;
2417
2418   if (!priv->reusable && priv->reused)
2419     goto is_reused;
2420
2421   GST_INFO ("preparing media %p", media);
2422
2423   /* reset some variables */
2424   priv->is_live = FALSE;
2425   priv->seekable = FALSE;
2426   priv->buffering = FALSE;
2427
2428   /* we're preparing now */
2429   gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARING);
2430
2431   klass = GST_RTSP_MEDIA_GET_CLASS (media);
2432   if (klass->prepare) {
2433     if (!klass->prepare (media, thread))
2434       goto prepare_failed;
2435   }
2436
2437 wait_status:
2438   g_rec_mutex_unlock (&priv->state_lock);
2439
2440   /* now wait for all pads to be prerolled, FIXME, we should somehow be
2441    * able to do this async so that we don't block the server thread. */
2442   if (!wait_preroll (media))
2443     goto preroll_failed;
2444
2445   g_signal_emit (media, gst_rtsp_media_signals[SIGNAL_PREPARED], 0, NULL);
2446
2447   GST_INFO ("object %p is prerolled", media);
2448
2449   return TRUE;
2450
2451   /* OK */
2452 is_preparing:
2453   {
2454     /* we are not going to use the giving thread, so stop it. */
2455     if (thread)
2456       gst_rtsp_thread_stop (thread);
2457     goto wait_status;
2458   }
2459 was_prepared:
2460   {
2461     GST_LOG ("media %p was prepared", media);
2462     /* we are not going to use the giving thread, so stop it. */
2463     if (thread)
2464       gst_rtsp_thread_stop (thread);
2465     g_rec_mutex_unlock (&priv->state_lock);
2466     return TRUE;
2467   }
2468   /* ERRORS */
2469 not_unprepared:
2470   {
2471     /* we are not going to use the giving thread, so stop it. */
2472     if (thread)
2473       gst_rtsp_thread_stop (thread);
2474     GST_WARNING ("media %p was not unprepared", media);
2475     priv->prepare_count--;
2476     g_rec_mutex_unlock (&priv->state_lock);
2477     return FALSE;
2478   }
2479 is_reused:
2480   {
2481     /* we are not going to use the giving thread, so stop it. */
2482     if (thread)
2483       gst_rtsp_thread_stop (thread);
2484     priv->prepare_count--;
2485     g_rec_mutex_unlock (&priv->state_lock);
2486     GST_WARNING ("can not reuse media %p", media);
2487     return FALSE;
2488   }
2489 prepare_failed:
2490   {
2491     /* we are not going to use the giving thread, so stop it. */
2492     if (thread)
2493       gst_rtsp_thread_stop (thread);
2494     priv->prepare_count--;
2495     g_rec_mutex_unlock (&priv->state_lock);
2496     GST_ERROR ("failed to prepare media");
2497     return FALSE;
2498   }
2499 preroll_failed:
2500   {
2501     GST_WARNING ("failed to preroll pipeline");
2502     gst_rtsp_media_unprepare (media);
2503     return FALSE;
2504   }
2505 }
2506
2507 /* must be called with state-lock */
2508 static void
2509 finish_unprepare (GstRTSPMedia * media)
2510 {
2511   GstRTSPMediaPrivate *priv = media->priv;
2512   gint i;
2513   GList *walk;
2514
2515   GST_DEBUG ("shutting down");
2516
2517   /* release the lock on shutdown, otherwise pad_added_cb might try to
2518    * acquire the lock and then we deadlock */
2519   g_rec_mutex_unlock (&priv->state_lock);
2520   set_state (media, GST_STATE_NULL);
2521   g_rec_mutex_lock (&priv->state_lock);
2522   remove_fakesink (priv);
2523
2524   for (i = 0; i < priv->streams->len; i++) {
2525     GstRTSPStream *stream;
2526
2527     GST_INFO ("Removing elements of stream %d from pipeline", i);
2528
2529     stream = g_ptr_array_index (priv->streams, i);
2530
2531     gst_rtsp_stream_leave_bin (stream, GST_BIN (priv->pipeline), priv->rtpbin);
2532   }
2533
2534   /* remove the pad signal handlers */
2535   for (walk = priv->dynamic; walk; walk = g_list_next (walk)) {
2536     GstElement *elem = walk->data;
2537     DynPaySignalHandlers *handlers;
2538
2539     handlers =
2540         g_object_steal_data (G_OBJECT (elem), "gst-rtsp-dynpay-handlers");
2541     g_assert (handlers != NULL);
2542
2543     g_signal_handler_disconnect (G_OBJECT (elem), handlers->pad_added_handler);
2544     g_signal_handler_disconnect (G_OBJECT (elem),
2545         handlers->pad_removed_handler);
2546     g_signal_handler_disconnect (G_OBJECT (elem),
2547         handlers->no_more_pads_handler);
2548
2549     g_slice_free (DynPaySignalHandlers, handlers);
2550   }
2551
2552   gst_bin_remove (GST_BIN (priv->pipeline), priv->rtpbin);
2553   priv->rtpbin = NULL;
2554
2555   if (priv->nettime)
2556     gst_object_unref (priv->nettime);
2557   priv->nettime = NULL;
2558
2559   priv->reused = TRUE;
2560   gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_UNPREPARED);
2561
2562   /* when the media is not reusable, this will effectively unref the media and
2563    * recreate it */
2564   g_signal_emit (media, gst_rtsp_media_signals[SIGNAL_UNPREPARED], 0, NULL);
2565
2566   /* the source has the last ref to the media */
2567   if (priv->source) {
2568     GST_DEBUG ("destroy source");
2569     g_source_destroy (priv->source);
2570     g_source_unref (priv->source);
2571   }
2572   if (priv->thread) {
2573     GST_DEBUG ("stop thread");
2574     gst_rtsp_thread_stop (priv->thread);
2575   }
2576 }
2577
2578 /* called with state-lock */
2579 static gboolean
2580 default_unprepare (GstRTSPMedia * media)
2581 {
2582   GstRTSPMediaPrivate *priv = media->priv;
2583
2584   gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_UNPREPARING);
2585
2586   if (priv->eos_shutdown) {
2587     GST_DEBUG ("sending EOS for shutdown");
2588     /* ref so that we don't disappear */
2589     gst_element_send_event (priv->pipeline, gst_event_new_eos ());
2590     /* we need to go to playing again for the EOS to propagate, normally in this
2591      * state, nothing is receiving data from us anymore so this is ok. */
2592     set_state (media, GST_STATE_PLAYING);
2593   } else {
2594     finish_unprepare (media);
2595   }
2596   return TRUE;
2597 }
2598
2599 /**
2600  * gst_rtsp_media_unprepare:
2601  * @media: a #GstRTSPMedia
2602  *
2603  * Unprepare @media. After this call, the media should be prepared again before
2604  * it can be used again. If the media is set to be non-reusable, a new instance
2605  * must be created.
2606  *
2607  * Returns: %TRUE on success.
2608  */
2609 gboolean
2610 gst_rtsp_media_unprepare (GstRTSPMedia * media)
2611 {
2612   GstRTSPMediaPrivate *priv;
2613   gboolean success;
2614
2615   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
2616
2617   priv = media->priv;
2618
2619   g_rec_mutex_lock (&priv->state_lock);
2620   if (priv->status == GST_RTSP_MEDIA_STATUS_UNPREPARED)
2621     goto was_unprepared;
2622
2623   priv->prepare_count--;
2624   if (priv->prepare_count > 0)
2625     goto is_busy;
2626
2627   GST_INFO ("unprepare media %p", media);
2628   if (priv->blocked)
2629     media_streams_set_blocked (media, FALSE);
2630   set_target_state (media, GST_STATE_NULL, FALSE);
2631   success = TRUE;
2632
2633   if (priv->status == GST_RTSP_MEDIA_STATUS_PREPARED) {
2634     GstRTSPMediaClass *klass;
2635
2636     klass = GST_RTSP_MEDIA_GET_CLASS (media);
2637     if (klass->unprepare)
2638       success = klass->unprepare (media);
2639   } else {
2640     finish_unprepare (media);
2641   }
2642   g_rec_mutex_unlock (&priv->state_lock);
2643
2644   return success;
2645
2646 was_unprepared:
2647   {
2648     g_rec_mutex_unlock (&priv->state_lock);
2649     GST_INFO ("media %p was already unprepared", media);
2650     return TRUE;
2651   }
2652 is_busy:
2653   {
2654     GST_INFO ("media %p still prepared %d times", media, priv->prepare_count);
2655     g_rec_mutex_unlock (&priv->state_lock);
2656     return TRUE;
2657   }
2658 }
2659
2660 /* should be called with state-lock */
2661 static GstClock *
2662 get_clock_unlocked (GstRTSPMedia * media)
2663 {
2664   if (media->priv->status != GST_RTSP_MEDIA_STATUS_PREPARED) {
2665     GST_DEBUG_OBJECT (media, "media was not prepared");
2666     return NULL;
2667   }
2668   return gst_pipeline_get_clock (GST_PIPELINE_CAST (media->priv->pipeline));
2669 }
2670
2671 /**
2672  * gst_rtsp_media_get_clock:
2673  * @media: a #GstRTSPMedia
2674  *
2675  * Get the clock that is used by the pipeline in @media.
2676  *
2677  * @media must be prepared before this method returns a valid clock object.
2678  *
2679  * Returns: (transfer full): the #GstClock used by @media. unref after usage.
2680  */
2681 GstClock *
2682 gst_rtsp_media_get_clock (GstRTSPMedia * media)
2683 {
2684   GstClock *clock;
2685   GstRTSPMediaPrivate *priv;
2686
2687   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
2688
2689   priv = media->priv;
2690
2691   g_rec_mutex_lock (&priv->state_lock);
2692   clock = get_clock_unlocked (media);
2693   g_rec_mutex_unlock (&priv->state_lock);
2694
2695   return clock;
2696 }
2697
2698 /**
2699  * gst_rtsp_media_get_base_time:
2700  * @media: a #GstRTSPMedia
2701  *
2702  * Get the base_time that is used by the pipeline in @media.
2703  *
2704  * @media must be prepared before this method returns a valid base_time.
2705  *
2706  * Returns: the base_time used by @media.
2707  */
2708 GstClockTime
2709 gst_rtsp_media_get_base_time (GstRTSPMedia * media)
2710 {
2711   GstClockTime result;
2712   GstRTSPMediaPrivate *priv;
2713
2714   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), GST_CLOCK_TIME_NONE);
2715
2716   priv = media->priv;
2717
2718   g_rec_mutex_lock (&priv->state_lock);
2719   if (media->priv->status != GST_RTSP_MEDIA_STATUS_PREPARED)
2720     goto not_prepared;
2721
2722   result = gst_element_get_base_time (media->priv->pipeline);
2723   g_rec_mutex_unlock (&priv->state_lock);
2724
2725   return result;
2726
2727   /* ERRORS */
2728 not_prepared:
2729   {
2730     g_rec_mutex_unlock (&priv->state_lock);
2731     GST_DEBUG_OBJECT (media, "media was not prepared");
2732     return GST_CLOCK_TIME_NONE;
2733   }
2734 }
2735
2736 /**
2737  * gst_rtsp_media_get_time_provider:
2738  * @media: a #GstRTSPMedia
2739  * @address: (allow-none): an address or %NULL
2740  * @port: a port or 0
2741  *
2742  * Get the #GstNetTimeProvider for the clock used by @media. The time provider
2743  * will listen on @address and @port for client time requests.
2744  *
2745  * Returns: (transfer full): the #GstNetTimeProvider of @media.
2746  */
2747 GstNetTimeProvider *
2748 gst_rtsp_media_get_time_provider (GstRTSPMedia * media, const gchar * address,
2749     guint16 port)
2750 {
2751   GstRTSPMediaPrivate *priv;
2752   GstNetTimeProvider *provider = NULL;
2753
2754   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), NULL);
2755
2756   priv = media->priv;
2757
2758   g_rec_mutex_lock (&priv->state_lock);
2759   if (priv->time_provider) {
2760     if ((provider = priv->nettime) == NULL) {
2761       GstClock *clock;
2762
2763       if (priv->time_provider && (clock = get_clock_unlocked (media))) {
2764         provider = gst_net_time_provider_new (clock, address, port);
2765         gst_object_unref (clock);
2766
2767         priv->nettime = provider;
2768       }
2769     }
2770   }
2771   g_rec_mutex_unlock (&priv->state_lock);
2772
2773   if (provider)
2774     gst_object_ref (provider);
2775
2776   return provider;
2777 }
2778
2779 static gboolean
2780 default_setup_sdp (GstRTSPMedia * media, GstSDPMessage * sdp, GstSDPInfo * info)
2781 {
2782   return gst_rtsp_sdp_from_media (sdp, info, media);
2783 }
2784
2785 /**
2786  * gst_rtsp_media_setup_sdp:
2787  * @media: a #GstRTSPMedia
2788  * @sdp: (transfer none): a #GstSDPMessage
2789  * @info: (transfer none): a #GstSDPInfo
2790  *
2791  * Add @media specific info to @sdp. @info is used to configure the connection
2792  * information in the SDP.
2793  *
2794  * Returns: TRUE on success.
2795  */
2796 gboolean
2797 gst_rtsp_media_setup_sdp (GstRTSPMedia * media, GstSDPMessage * sdp,
2798     GstSDPInfo * info)
2799 {
2800   GstRTSPMediaPrivate *priv;
2801   GstRTSPMediaClass *klass;
2802   gboolean res;
2803
2804   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
2805   g_return_val_if_fail (sdp != NULL, FALSE);
2806   g_return_val_if_fail (info != NULL, FALSE);
2807
2808   priv = media->priv;
2809
2810   g_rec_mutex_lock (&priv->state_lock);
2811
2812   klass = GST_RTSP_MEDIA_GET_CLASS (media);
2813
2814   if (!klass->setup_sdp)
2815     goto no_setup_sdp;
2816
2817   res = klass->setup_sdp (media, sdp, info);
2818
2819   g_rec_mutex_unlock (&priv->state_lock);
2820
2821   return res;
2822
2823   /* ERRORS */
2824 no_setup_sdp:
2825   {
2826     g_rec_mutex_unlock (&priv->state_lock);
2827     GST_ERROR ("no setup_sdp function");
2828     g_critical ("no setup_sdp vmethod function set");
2829     return FALSE;
2830   }
2831 }
2832
2833 static void
2834 do_set_seqnum (GstRTSPStream * stream)
2835 {
2836   guint16 seq_num;
2837   seq_num = gst_rtsp_stream_get_current_seqnum (stream);
2838   gst_rtsp_stream_set_seqnum_offset (stream, seq_num + 1);
2839 }
2840
2841 /* call with state_lock */
2842 gboolean
2843 default_suspend (GstRTSPMedia * media)
2844 {
2845   GstRTSPMediaPrivate *priv = media->priv;
2846   GstStateChangeReturn ret;
2847
2848   switch (priv->suspend_mode) {
2849     case GST_RTSP_SUSPEND_MODE_NONE:
2850       GST_DEBUG ("media %p no suspend", media);
2851       break;
2852     case GST_RTSP_SUSPEND_MODE_PAUSE:
2853       GST_DEBUG ("media %p suspend to PAUSED", media);
2854       ret = set_target_state (media, GST_STATE_PAUSED, TRUE);
2855       if (ret == GST_STATE_CHANGE_FAILURE)
2856         goto state_failed;
2857       break;
2858     case GST_RTSP_SUSPEND_MODE_RESET:
2859       GST_DEBUG ("media %p suspend to NULL", media);
2860       ret = set_target_state (media, GST_STATE_NULL, TRUE);
2861       if (ret == GST_STATE_CHANGE_FAILURE)
2862         goto state_failed;
2863       /* Because payloader needs to set the sequence number as
2864        * monotonic, we need to preserve the sequence number
2865        * after pause. (otherwise going from pause to play,  which
2866        * is actually from NULL to PLAY will create a new sequence
2867        * number. */
2868       g_ptr_array_foreach (priv->streams, (GFunc) do_set_seqnum, NULL);
2869       break;
2870     default:
2871       break;
2872   }
2873
2874   /* let the streams do the state changes freely, if any */
2875   media_streams_set_blocked (media, FALSE);
2876
2877   return TRUE;
2878
2879   /* ERRORS */
2880 state_failed:
2881   {
2882     GST_WARNING ("failed changing pipeline's state for media %p", media);
2883     return FALSE;
2884   }
2885 }
2886
2887 /**
2888  * gst_rtsp_media_suspend:
2889  * @media: a #GstRTSPMedia
2890  *
2891  * Suspend @media. The state of the pipeline managed by @media is set to
2892  * GST_STATE_NULL but all streams are kept. @media can be prepared again
2893  * with gst_rtsp_media_unsuspend()
2894  *
2895  * @media must be prepared with gst_rtsp_media_prepare();
2896  *
2897  * Returns: %TRUE on success.
2898  */
2899 gboolean
2900 gst_rtsp_media_suspend (GstRTSPMedia * media)
2901 {
2902   GstRTSPMediaPrivate *priv = media->priv;
2903   GstRTSPMediaClass *klass;
2904
2905   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
2906
2907   GST_FIXME ("suspend for dynamic pipelines needs fixing");
2908
2909   g_rec_mutex_lock (&priv->state_lock);
2910   if (priv->status != GST_RTSP_MEDIA_STATUS_PREPARED)
2911     goto not_prepared;
2912
2913   /* don't attempt to suspend when something is busy */
2914   if (priv->n_active > 0)
2915     goto done;
2916
2917   klass = GST_RTSP_MEDIA_GET_CLASS (media);
2918   if (klass->suspend) {
2919     if (!klass->suspend (media))
2920       goto suspend_failed;
2921   }
2922
2923   gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_SUSPENDED);
2924 done:
2925   g_rec_mutex_unlock (&priv->state_lock);
2926
2927   return TRUE;
2928
2929   /* ERRORS */
2930 not_prepared:
2931   {
2932     g_rec_mutex_unlock (&priv->state_lock);
2933     GST_WARNING ("media %p was not prepared", media);
2934     return FALSE;
2935   }
2936 suspend_failed:
2937   {
2938     g_rec_mutex_unlock (&priv->state_lock);
2939     gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_ERROR);
2940     GST_WARNING ("failed to suspend media %p", media);
2941     return FALSE;
2942   }
2943 }
2944
2945 /* call with state_lock */
2946 gboolean
2947 default_unsuspend (GstRTSPMedia * media)
2948 {
2949   GstRTSPMediaPrivate *priv = media->priv;
2950
2951   switch (priv->suspend_mode) {
2952     case GST_RTSP_SUSPEND_MODE_NONE:
2953       gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARED);
2954       break;
2955     case GST_RTSP_SUSPEND_MODE_PAUSE:
2956       gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARED);
2957       break;
2958     case GST_RTSP_SUSPEND_MODE_RESET:
2959     {
2960       gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_PREPARING);
2961       if (!start_preroll (media))
2962         goto start_failed;
2963       g_rec_mutex_unlock (&priv->state_lock);
2964
2965       if (!wait_preroll (media))
2966         goto preroll_failed;
2967
2968       g_rec_mutex_lock (&priv->state_lock);
2969     }
2970     default:
2971       break;
2972   }
2973
2974   return TRUE;
2975
2976   /* ERRORS */
2977 start_failed:
2978   {
2979     GST_WARNING ("failed to preroll pipeline");
2980     return FALSE;
2981   }
2982 preroll_failed:
2983   {
2984     GST_WARNING ("failed to preroll pipeline");
2985     return FALSE;
2986   }
2987 }
2988
2989 /**
2990  * gst_rtsp_media_unsuspend:
2991  * @media: a #GstRTSPMedia
2992  *
2993  * Unsuspend @media if it was in a suspended state. This method does nothing
2994  * when the media was not in the suspended state.
2995  *
2996  * Returns: %TRUE on success.
2997  */
2998 gboolean
2999 gst_rtsp_media_unsuspend (GstRTSPMedia * media)
3000 {
3001   GstRTSPMediaPrivate *priv = media->priv;
3002   GstRTSPMediaClass *klass;
3003
3004   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
3005
3006   g_rec_mutex_lock (&priv->state_lock);
3007   if (priv->status != GST_RTSP_MEDIA_STATUS_SUSPENDED)
3008     goto done;
3009
3010   klass = GST_RTSP_MEDIA_GET_CLASS (media);
3011   if (klass->unsuspend) {
3012     if (!klass->unsuspend (media))
3013       goto unsuspend_failed;
3014   }
3015
3016 done:
3017   g_rec_mutex_unlock (&priv->state_lock);
3018
3019   return TRUE;
3020
3021   /* ERRORS */
3022 unsuspend_failed:
3023   {
3024     g_rec_mutex_unlock (&priv->state_lock);
3025     GST_WARNING ("failed to unsuspend media %p", media);
3026     gst_rtsp_media_set_status (media, GST_RTSP_MEDIA_STATUS_ERROR);
3027     return FALSE;
3028   }
3029 }
3030
3031 /* must be called with state-lock */
3032 static void
3033 media_set_pipeline_state_locked (GstRTSPMedia * media, GstState state)
3034 {
3035   GstRTSPMediaPrivate *priv = media->priv;
3036
3037   if (state == GST_STATE_NULL) {
3038     gst_rtsp_media_unprepare (media);
3039   } else {
3040     GST_INFO ("state %s media %p", gst_element_state_get_name (state), media);
3041     set_target_state (media, state, FALSE);
3042     /* when we are buffering, don't update the state yet, this will be done
3043      * when buffering finishes */
3044     if (priv->buffering) {
3045       GST_INFO ("Buffering busy, delay state change");
3046     } else {
3047       if (state == GST_STATE_PLAYING)
3048         /* make sure pads are not blocking anymore when going to PLAYING */
3049         media_streams_set_blocked (media, FALSE);
3050
3051       set_state (media, state);
3052
3053       /* and suspend after pause */
3054       if (state == GST_STATE_PAUSED)
3055         gst_rtsp_media_suspend (media);
3056     }
3057   }
3058 }
3059
3060 /**
3061  * gst_rtsp_media_set_pipeline_state:
3062  * @media: a #GstRTSPMedia
3063  * @state: the target state of the pipeline
3064  *
3065  * Set the state of the pipeline managed by @media to @state
3066  */
3067 void
3068 gst_rtsp_media_set_pipeline_state (GstRTSPMedia * media, GstState state)
3069 {
3070   g_return_if_fail (GST_IS_RTSP_MEDIA (media));
3071
3072   g_rec_mutex_lock (&media->priv->state_lock);
3073   media_set_pipeline_state_locked (media, state);
3074   g_rec_mutex_unlock (&media->priv->state_lock);
3075 }
3076
3077 /**
3078  * gst_rtsp_media_set_state:
3079  * @media: a #GstRTSPMedia
3080  * @state: the target state of the media
3081  * @transports: (transfer none) (element-type GstRtspServer.RTSPStreamTransport):
3082  * a #GPtrArray of #GstRTSPStreamTransport pointers
3083  *
3084  * Set the state of @media to @state and for the transports in @transports.
3085  *
3086  * @media must be prepared with gst_rtsp_media_prepare();
3087  *
3088  * Returns: %TRUE on success.
3089  */
3090 gboolean
3091 gst_rtsp_media_set_state (GstRTSPMedia * media, GstState state,
3092     GPtrArray * transports)
3093 {
3094   GstRTSPMediaPrivate *priv;
3095   gint i;
3096   gboolean activate, deactivate, do_state;
3097   gint old_active;
3098
3099   g_return_val_if_fail (GST_IS_RTSP_MEDIA (media), FALSE);
3100   g_return_val_if_fail (transports != NULL, FALSE);
3101
3102   priv = media->priv;
3103
3104   g_rec_mutex_lock (&priv->state_lock);
3105   if (priv->status == GST_RTSP_MEDIA_STATUS_ERROR)
3106     goto error_status;
3107   if (priv->status != GST_RTSP_MEDIA_STATUS_PREPARED &&
3108       priv->status != GST_RTSP_MEDIA_STATUS_SUSPENDED)
3109     goto not_prepared;
3110
3111   /* NULL and READY are the same */
3112   if (state == GST_STATE_READY)
3113     state = GST_STATE_NULL;
3114
3115   activate = deactivate = FALSE;
3116
3117   GST_INFO ("going to state %s media %p, target state %s",
3118       gst_element_state_get_name (state), media,
3119       gst_element_state_get_name (priv->target_state));
3120
3121   switch (state) {
3122     case GST_STATE_NULL:
3123       /* we're going from PLAYING or PAUSED to READY or NULL, deactivate */
3124       if (priv->target_state >= GST_STATE_PAUSED)
3125         deactivate = TRUE;
3126       break;
3127     case GST_STATE_PAUSED:
3128       /* we're going from PLAYING to PAUSED, READY or NULL, deactivate */
3129       if (priv->target_state == GST_STATE_PLAYING)
3130         deactivate = TRUE;
3131       break;
3132     case GST_STATE_PLAYING:
3133       /* we're going to PLAYING, activate */
3134       activate = TRUE;
3135       break;
3136     default:
3137       break;
3138   }
3139   old_active = priv->n_active;
3140
3141   GST_DEBUG ("%d transports, activate %d, deactivate %d", transports->len,
3142       activate, deactivate);
3143   for (i = 0; i < transports->len; i++) {
3144     GstRTSPStreamTransport *trans;
3145
3146     /* we need a non-NULL entry in the array */
3147     trans = g_ptr_array_index (transports, i);
3148     if (trans == NULL)
3149       continue;
3150
3151     if (activate) {
3152       if (gst_rtsp_stream_transport_set_active (trans, TRUE))
3153         priv->n_active++;
3154     } else if (deactivate) {
3155       if (gst_rtsp_stream_transport_set_active (trans, FALSE))
3156         priv->n_active--;
3157     }
3158   }
3159
3160   /* we just activated the first media, do the playing state change */
3161   if (old_active == 0 && activate)
3162     do_state = TRUE;
3163   /* if we have no more active media, do the downward state changes */
3164   else if (priv->n_active == 0)
3165     do_state = TRUE;
3166   else
3167     do_state = FALSE;
3168
3169   GST_INFO ("state %d active %d media %p do_state %d", state, priv->n_active,
3170       media, do_state);
3171
3172   if (priv->target_state != state) {
3173     if (do_state)
3174       media_set_pipeline_state_locked (media, state);
3175
3176     g_signal_emit (media, gst_rtsp_media_signals[SIGNAL_NEW_STATE], 0, state,
3177         NULL);
3178   }
3179
3180   /* remember where we are */
3181   if (state != GST_STATE_NULL && (state == GST_STATE_PAUSED ||
3182           old_active != priv->n_active))
3183     collect_media_stats (media);
3184
3185   g_rec_mutex_unlock (&priv->state_lock);
3186
3187   return TRUE;
3188
3189   /* ERRORS */
3190 not_prepared:
3191   {
3192     GST_WARNING ("media %p was not prepared", media);
3193     g_rec_mutex_unlock (&priv->state_lock);
3194     return FALSE;
3195   }
3196 error_status:
3197   {
3198     GST_WARNING ("media %p in error status while changing to state %d",
3199         media, state);
3200     if (state == GST_STATE_NULL) {
3201       for (i = 0; i < transports->len; i++) {
3202         GstRTSPStreamTransport *trans;
3203
3204         /* we need a non-NULL entry in the array */
3205         trans = g_ptr_array_index (transports, i);
3206         if (trans == NULL)
3207           continue;
3208
3209         gst_rtsp_stream_transport_set_active (trans, FALSE);
3210       }
3211       priv->n_active = 0;
3212     }
3213     g_rec_mutex_unlock (&priv->state_lock);
3214     return FALSE;
3215   }
3216 }