08fe9f193d683be7f5e4312cb870b5cb3dda6f9e
[platform/upstream/gstreamer.git] / gst / rtsp-server / rtsp-client.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-client
21  * @short_description: A client connection state
22  * @see_also: #GstRTSPServer, #GstRTSPThreadPool
23  *
24  * The client object handles the connection with a client for as long as a TCP
25  * connection is open.
26  *
27  * A #GstRTSPClient is created by #GstRTSPServer when a new connection is
28  * accepted and it inherits the #GstRTSPMountPoints, #GstRTSPSessionPool,
29  * #GstRTSPAuth and #GstRTSPThreadPool from the server.
30  *
31  * The client connection should be configured with the #GstRTSPConnection using
32  * gst_rtsp_client_set_connection() before it can be attached to a #GMainContext
33  * using gst_rtsp_client_attach(). From then on the client will handle requests
34  * on the connection.
35  *
36  * Use gst_rtsp_client_session_filter() to iterate or modify all the
37  * #GstRTSPSession objects managed by the client object.
38  *
39  * Last reviewed on 2013-07-11 (1.0.0)
40  */
41
42 #include <stdio.h>
43 #include <string.h>
44
45 #include "rtsp-client.h"
46 #include "rtsp-sdp.h"
47 #include "rtsp-params.h"
48
49 #define GST_RTSP_CLIENT_GET_PRIVATE(obj)  \
50    (G_TYPE_INSTANCE_GET_PRIVATE ((obj), GST_TYPE_RTSP_CLIENT, GstRTSPClientPrivate))
51
52 /* locking order:
53  * send_lock, lock, tunnels_lock
54  */
55
56 struct _GstRTSPClientPrivate
57 {
58   GMutex lock;                  /* protects everything else */
59   GMutex send_lock;
60   GstRTSPConnection *connection;
61   GstRTSPWatch *watch;
62   guint close_seq;
63   gchar *server_ip;
64   gboolean is_ipv6;
65
66   GstRTSPClientSendFunc send_func;      /* protected by send_lock */
67   gpointer send_data;           /* protected by send_lock */
68   GDestroyNotify send_notify;   /* protected by send_lock */
69
70   GstRTSPSessionPool *session_pool;
71   GstRTSPMountPoints *mount_points;
72   GstRTSPAuth *auth;
73   GstRTSPThreadPool *thread_pool;
74
75   /* used to cache the media in the last requested DESCRIBE so that
76    * we can pick it up in the next SETUP immediately */
77   gchar *path;
78   GstRTSPMedia *media;
79
80   GList *transports;
81   GList *sessions;
82 };
83
84 static GMutex tunnels_lock;
85 static GHashTable *tunnels;     /* protected by tunnels_lock */
86
87 #define DEFAULT_SESSION_POOL            NULL
88 #define DEFAULT_MOUNT_POINTS            NULL
89
90 enum
91 {
92   PROP_0,
93   PROP_SESSION_POOL,
94   PROP_MOUNT_POINTS,
95   PROP_LAST
96 };
97
98 enum
99 {
100   SIGNAL_CLOSED,
101   SIGNAL_NEW_SESSION,
102   SIGNAL_OPTIONS_REQUEST,
103   SIGNAL_DESCRIBE_REQUEST,
104   SIGNAL_SETUP_REQUEST,
105   SIGNAL_PLAY_REQUEST,
106   SIGNAL_PAUSE_REQUEST,
107   SIGNAL_TEARDOWN_REQUEST,
108   SIGNAL_SET_PARAMETER_REQUEST,
109   SIGNAL_GET_PARAMETER_REQUEST,
110   SIGNAL_LAST
111 };
112
113 GST_DEBUG_CATEGORY_STATIC (rtsp_client_debug);
114 #define GST_CAT_DEFAULT rtsp_client_debug
115
116 static guint gst_rtsp_client_signals[SIGNAL_LAST] = { 0 };
117
118 static void gst_rtsp_client_get_property (GObject * object, guint propid,
119     GValue * value, GParamSpec * pspec);
120 static void gst_rtsp_client_set_property (GObject * object, guint propid,
121     const GValue * value, GParamSpec * pspec);
122 static void gst_rtsp_client_finalize (GObject * obj);
123
124 static GstSDPMessage *create_sdp (GstRTSPClient * client, GstRTSPMedia * media);
125 static void client_session_finalized (GstRTSPClient * client,
126     GstRTSPSession * session);
127 static void unlink_session_transports (GstRTSPClient * client,
128     GstRTSPSession * session, GstRTSPSessionMedia * sessmedia);
129 static gboolean default_configure_client_transport (GstRTSPClient * client,
130     GstRTSPContext * ctx, GstRTSPTransport * ct);
131 static GstRTSPResult default_params_set (GstRTSPClient * client,
132     GstRTSPContext * ctx);
133 static GstRTSPResult default_params_get (GstRTSPClient * client,
134     GstRTSPContext * ctx);
135
136 G_DEFINE_TYPE (GstRTSPClient, gst_rtsp_client, G_TYPE_OBJECT);
137
138 static void
139 gst_rtsp_client_class_init (GstRTSPClientClass * klass)
140 {
141   GObjectClass *gobject_class;
142
143   g_type_class_add_private (klass, sizeof (GstRTSPClientPrivate));
144
145   gobject_class = G_OBJECT_CLASS (klass);
146
147   gobject_class->get_property = gst_rtsp_client_get_property;
148   gobject_class->set_property = gst_rtsp_client_set_property;
149   gobject_class->finalize = gst_rtsp_client_finalize;
150
151   klass->create_sdp = create_sdp;
152   klass->configure_client_transport = default_configure_client_transport;
153   klass->params_set = default_params_set;
154   klass->params_get = default_params_get;
155
156   g_object_class_install_property (gobject_class, PROP_SESSION_POOL,
157       g_param_spec_object ("session-pool", "Session Pool",
158           "The session pool to use for client session",
159           GST_TYPE_RTSP_SESSION_POOL,
160           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
161
162   g_object_class_install_property (gobject_class, PROP_MOUNT_POINTS,
163       g_param_spec_object ("mount-points", "Mount Points",
164           "The mount points to use for client session",
165           GST_TYPE_RTSP_MOUNT_POINTS,
166           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
167
168   gst_rtsp_client_signals[SIGNAL_CLOSED] =
169       g_signal_new ("closed", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
170       G_STRUCT_OFFSET (GstRTSPClientClass, closed), NULL, NULL,
171       g_cclosure_marshal_VOID__VOID, G_TYPE_NONE, 0, G_TYPE_NONE);
172
173   gst_rtsp_client_signals[SIGNAL_NEW_SESSION] =
174       g_signal_new ("new-session", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
175       G_STRUCT_OFFSET (GstRTSPClientClass, new_session), NULL, NULL,
176       g_cclosure_marshal_VOID__OBJECT, G_TYPE_NONE, 1, GST_TYPE_RTSP_SESSION);
177
178   gst_rtsp_client_signals[SIGNAL_OPTIONS_REQUEST] =
179       g_signal_new ("options-request", G_TYPE_FROM_CLASS (klass),
180       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, options_request),
181       NULL, NULL, g_cclosure_marshal_VOID__POINTER, G_TYPE_NONE, 1,
182       G_TYPE_POINTER);
183
184   gst_rtsp_client_signals[SIGNAL_DESCRIBE_REQUEST] =
185       g_signal_new ("describe-request", G_TYPE_FROM_CLASS (klass),
186       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, describe_request),
187       NULL, NULL, g_cclosure_marshal_VOID__POINTER, G_TYPE_NONE, 1,
188       G_TYPE_POINTER);
189
190   gst_rtsp_client_signals[SIGNAL_SETUP_REQUEST] =
191       g_signal_new ("setup-request", G_TYPE_FROM_CLASS (klass),
192       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, setup_request),
193       NULL, NULL, g_cclosure_marshal_VOID__POINTER, G_TYPE_NONE, 1,
194       G_TYPE_POINTER);
195
196   gst_rtsp_client_signals[SIGNAL_PLAY_REQUEST] =
197       g_signal_new ("play-request", G_TYPE_FROM_CLASS (klass),
198       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, play_request),
199       NULL, NULL, g_cclosure_marshal_VOID__POINTER, G_TYPE_NONE, 1,
200       G_TYPE_POINTER);
201
202   gst_rtsp_client_signals[SIGNAL_PAUSE_REQUEST] =
203       g_signal_new ("pause-request", G_TYPE_FROM_CLASS (klass),
204       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, pause_request),
205       NULL, NULL, g_cclosure_marshal_VOID__POINTER, G_TYPE_NONE, 1,
206       G_TYPE_POINTER);
207
208   gst_rtsp_client_signals[SIGNAL_TEARDOWN_REQUEST] =
209       g_signal_new ("teardown-request", G_TYPE_FROM_CLASS (klass),
210       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, teardown_request),
211       NULL, NULL, g_cclosure_marshal_VOID__POINTER, G_TYPE_NONE, 1,
212       G_TYPE_POINTER);
213
214   gst_rtsp_client_signals[SIGNAL_SET_PARAMETER_REQUEST] =
215       g_signal_new ("set-parameter-request", G_TYPE_FROM_CLASS (klass),
216       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass,
217           set_parameter_request), NULL, NULL, g_cclosure_marshal_VOID__POINTER,
218       G_TYPE_NONE, 1, G_TYPE_POINTER);
219
220   gst_rtsp_client_signals[SIGNAL_GET_PARAMETER_REQUEST] =
221       g_signal_new ("get-parameter-request", G_TYPE_FROM_CLASS (klass),
222       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass,
223           get_parameter_request), NULL, NULL, g_cclosure_marshal_VOID__POINTER,
224       G_TYPE_NONE, 1, G_TYPE_POINTER);
225
226   tunnels =
227       g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_object_unref);
228   g_mutex_init (&tunnels_lock);
229
230   GST_DEBUG_CATEGORY_INIT (rtsp_client_debug, "rtspclient", 0, "GstRTSPClient");
231 }
232
233 static void
234 gst_rtsp_client_init (GstRTSPClient * client)
235 {
236   GstRTSPClientPrivate *priv = GST_RTSP_CLIENT_GET_PRIVATE (client);
237
238   client->priv = priv;
239
240   g_mutex_init (&priv->lock);
241   g_mutex_init (&priv->send_lock);
242   priv->close_seq = 0;
243 }
244
245 static GstRTSPFilterResult
246 filter_session (GstRTSPSession * sess, GstRTSPSessionMedia * sessmedia,
247     gpointer user_data)
248 {
249   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
250
251   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_NULL);
252   unlink_session_transports (client, sess, sessmedia);
253
254   /* unmanage the media in the session */
255   return GST_RTSP_FILTER_REMOVE;
256 }
257
258 static void
259 client_unlink_session (GstRTSPClient * client, GstRTSPSession * session)
260 {
261   /* unlink all media managed in this session */
262   gst_rtsp_session_filter (session, filter_session, client);
263 }
264
265 static void
266 client_watch_session (GstRTSPClient * client, GstRTSPSession * session)
267 {
268   GstRTSPClientPrivate *priv = client->priv;
269   GList *walk;
270
271   for (walk = priv->sessions; walk; walk = g_list_next (walk)) {
272     GstRTSPSession *msession = (GstRTSPSession *) walk->data;
273
274     /* we already know about this session */
275     if (msession == session)
276       return;
277   }
278
279   GST_INFO ("watching session %p", session);
280
281   g_object_weak_ref (G_OBJECT (session), (GWeakNotify) client_session_finalized,
282       client);
283   priv->sessions = g_list_prepend (priv->sessions, session);
284 }
285
286 static void
287 client_unwatch_session (GstRTSPClient * client, GstRTSPSession * session)
288 {
289   GstRTSPClientPrivate *priv = client->priv;
290
291   GST_INFO ("unwatching session %p", session);
292
293   g_object_weak_unref (G_OBJECT (session),
294       (GWeakNotify) client_session_finalized, client);
295   priv->sessions = g_list_remove (priv->sessions, session);
296 }
297
298 static void
299 client_cleanup_session (GstRTSPClient * client, GstRTSPSession * session)
300 {
301   g_object_weak_unref (G_OBJECT (session),
302       (GWeakNotify) client_session_finalized, client);
303   client_unlink_session (client, session);
304 }
305
306 static void
307 client_cleanup_sessions (GstRTSPClient * client)
308 {
309   GstRTSPClientPrivate *priv = client->priv;
310   GList *sessions;
311
312   /* remove weak-ref from sessions */
313   for (sessions = priv->sessions; sessions; sessions = g_list_next (sessions)) {
314     client_cleanup_session (client, (GstRTSPSession *) sessions->data);
315   }
316   g_list_free (priv->sessions);
317   priv->sessions = NULL;
318 }
319
320 /* A client is finalized when the connection is broken */
321 static void
322 gst_rtsp_client_finalize (GObject * obj)
323 {
324   GstRTSPClient *client = GST_RTSP_CLIENT (obj);
325   GstRTSPClientPrivate *priv = client->priv;
326
327   GST_INFO ("finalize client %p", client);
328
329   gst_rtsp_client_set_send_func (client, NULL, NULL, NULL);
330
331   if (priv->watch)
332     g_source_destroy ((GSource *) priv->watch);
333
334   client_cleanup_sessions (client);
335
336   if (priv->connection)
337     gst_rtsp_connection_free (priv->connection);
338   if (priv->session_pool)
339     g_object_unref (priv->session_pool);
340   if (priv->mount_points)
341     g_object_unref (priv->mount_points);
342   if (priv->auth)
343     g_object_unref (priv->auth);
344
345   if (priv->path)
346     g_free (priv->path);
347   if (priv->media) {
348     gst_rtsp_media_unprepare (priv->media);
349     g_object_unref (priv->media);
350   }
351
352   g_free (priv->server_ip);
353   g_mutex_clear (&priv->lock);
354   g_mutex_clear (&priv->send_lock);
355
356   G_OBJECT_CLASS (gst_rtsp_client_parent_class)->finalize (obj);
357 }
358
359 static void
360 gst_rtsp_client_get_property (GObject * object, guint propid,
361     GValue * value, GParamSpec * pspec)
362 {
363   GstRTSPClient *client = GST_RTSP_CLIENT (object);
364
365   switch (propid) {
366     case PROP_SESSION_POOL:
367       g_value_take_object (value, gst_rtsp_client_get_session_pool (client));
368       break;
369     case PROP_MOUNT_POINTS:
370       g_value_take_object (value, gst_rtsp_client_get_mount_points (client));
371       break;
372     default:
373       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, propid, pspec);
374   }
375 }
376
377 static void
378 gst_rtsp_client_set_property (GObject * object, guint propid,
379     const GValue * value, GParamSpec * pspec)
380 {
381   GstRTSPClient *client = GST_RTSP_CLIENT (object);
382
383   switch (propid) {
384     case PROP_SESSION_POOL:
385       gst_rtsp_client_set_session_pool (client, g_value_get_object (value));
386       break;
387     case PROP_MOUNT_POINTS:
388       gst_rtsp_client_set_mount_points (client, g_value_get_object (value));
389       break;
390     default:
391       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, propid, pspec);
392   }
393 }
394
395 /**
396  * gst_rtsp_client_new:
397  *
398  * Create a new #GstRTSPClient instance.
399  *
400  * Returns: a new #GstRTSPClient
401  */
402 GstRTSPClient *
403 gst_rtsp_client_new (void)
404 {
405   GstRTSPClient *result;
406
407   result = g_object_new (GST_TYPE_RTSP_CLIENT, NULL);
408
409   return result;
410 }
411
412 static void
413 send_message (GstRTSPClient * client, GstRTSPSession * session,
414     GstRTSPMessage * message, gboolean close)
415 {
416   GstRTSPClientPrivate *priv = client->priv;
417
418   gst_rtsp_message_add_header (message, GST_RTSP_HDR_SERVER,
419       "GStreamer RTSP server");
420
421   /* remove any previous header */
422   gst_rtsp_message_remove_header (message, GST_RTSP_HDR_SESSION, -1);
423
424   /* add the new session header for new session ids */
425   if (session) {
426     gst_rtsp_message_take_header (message, GST_RTSP_HDR_SESSION,
427         gst_rtsp_session_get_header (session));
428   }
429
430   if (gst_debug_category_get_threshold (rtsp_client_debug) >= GST_LEVEL_LOG) {
431     gst_rtsp_message_dump (message);
432   }
433
434   if (close)
435     gst_rtsp_message_add_header (message, GST_RTSP_HDR_CONNECTION, "close");
436
437   g_mutex_lock (&priv->send_lock);
438   if (priv->send_func)
439     priv->send_func (client, message, close, priv->send_data);
440   g_mutex_unlock (&priv->send_lock);
441
442   gst_rtsp_message_unset (message);
443 }
444
445 static void
446 send_generic_response (GstRTSPClient * client, GstRTSPStatusCode code,
447     GstRTSPContext * ctx)
448 {
449   gst_rtsp_message_init_response (ctx->response, code,
450       gst_rtsp_status_as_text (code), ctx->request);
451
452   send_message (client, NULL, ctx->response, FALSE);
453 }
454
455 static gboolean
456 paths_are_equal (const gchar * path1, const gchar * path2, gint len2)
457 {
458   if (path1 == NULL || path2 == NULL)
459     return FALSE;
460
461   if (strlen (path1) != len2)
462     return FALSE;
463
464   if (strncmp (path1, path2, len2))
465     return FALSE;
466
467   return TRUE;
468 }
469
470 /* this function is called to initially find the media for the DESCRIBE request
471  * but is cached for when the same client (without breaking the connection) is
472  * doing a setup for the exact same url. */
473 static GstRTSPMedia *
474 find_media (GstRTSPClient * client, GstRTSPContext * ctx, gint * matched)
475 {
476   GstRTSPClientPrivate *priv = client->priv;
477   GstRTSPMediaFactory *factory;
478   GstRTSPMedia *media;
479   gchar *path;
480   gint path_len;
481
482   if (!priv->mount_points)
483     goto no_mount_points;
484
485   path = ctx->uri->abspath;
486
487   /* find the longest matching factory for the uri first */
488   if (!(factory = gst_rtsp_mount_points_match (priv->mount_points,
489               path, matched)))
490     goto no_factory;
491
492   ctx->factory = factory;
493
494   if (!gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_MEDIA_FACTORY_ACCESS))
495     goto no_factory_access;
496
497   if (!gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_MEDIA_FACTORY_CONSTRUCT))
498     goto not_authorized;
499
500   if (matched)
501     path_len = *matched;
502   else
503     path_len = strlen (path);
504
505   if (!paths_are_equal (priv->path, path, path_len)) {
506     GstRTSPThread *thread;
507
508     /* remove any previously cached values before we try to construct a new
509      * media for uri */
510     if (priv->path)
511       g_free (priv->path);
512     priv->path = NULL;
513     if (priv->media) {
514       gst_rtsp_media_unprepare (priv->media);
515       g_object_unref (priv->media);
516     }
517     priv->media = NULL;
518
519     /* prepare the media and add it to the pipeline */
520     if (!(media = gst_rtsp_media_factory_construct (factory, ctx->uri)))
521       goto no_media;
522
523     ctx->media = media;
524
525     thread = gst_rtsp_thread_pool_get_thread (priv->thread_pool,
526         GST_RTSP_THREAD_TYPE_MEDIA, ctx);
527     if (thread == NULL)
528       goto no_thread;
529
530     /* prepare the media */
531     if (!(gst_rtsp_media_prepare (media, thread)))
532       goto no_prepare;
533
534     /* now keep track of the uri and the media */
535     priv->path = g_strndup (path, path_len);
536     priv->media = media;
537   } else {
538     /* we have seen this path before, used cached media */
539     media = priv->media;
540     ctx->media = media;
541     GST_INFO ("reusing cached media %p for path %s", media, priv->path);
542   }
543
544   g_object_unref (factory);
545   ctx->factory = NULL;
546
547   if (media)
548     g_object_ref (media);
549
550   return media;
551
552   /* ERRORS */
553 no_mount_points:
554   {
555     GST_ERROR ("client %p: no mount points configured", client);
556     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
557     return NULL;
558   }
559 no_factory:
560   {
561     GST_ERROR ("client %p: no factory for uri %s", client, path);
562     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
563     return NULL;
564   }
565 no_factory_access:
566   {
567     GST_ERROR ("client %p: not authorized to see factory uri %s", client, path);
568     return NULL;
569   }
570 not_authorized:
571   {
572     GST_ERROR ("client %p: not authorized for factory uri %s", client, path);
573     return NULL;
574   }
575 no_media:
576   {
577     GST_ERROR ("client %p: can't create media", client);
578     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
579     g_object_unref (factory);
580     ctx->factory = NULL;
581     return NULL;
582   }
583 no_thread:
584   {
585     GST_ERROR ("client %p: can't create thread", client);
586     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
587     g_object_unref (media);
588     ctx->media = NULL;
589     g_object_unref (factory);
590     ctx->factory = NULL;
591     return NULL;
592   }
593 no_prepare:
594   {
595     GST_ERROR ("client %p: can't prepare media", client);
596     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
597     g_object_unref (media);
598     ctx->media = NULL;
599     g_object_unref (factory);
600     ctx->factory = NULL;
601     return NULL;
602   }
603 }
604
605 static gboolean
606 do_send_data (GstBuffer * buffer, guint8 channel, GstRTSPClient * client)
607 {
608   GstRTSPClientPrivate *priv = client->priv;
609   GstRTSPMessage message = { 0 };
610   GstMapInfo map_info;
611   guint8 *data;
612   guint usize;
613
614   gst_rtsp_message_init_data (&message, channel);
615
616   /* FIXME, need some sort of iovec RTSPMessage here */
617   if (!gst_buffer_map (buffer, &map_info, GST_MAP_READ))
618     return FALSE;
619
620   gst_rtsp_message_take_body (&message, map_info.data, map_info.size);
621
622   g_mutex_lock (&priv->send_lock);
623   if (priv->send_func)
624     priv->send_func (client, &message, FALSE, priv->send_data);
625   g_mutex_unlock (&priv->send_lock);
626
627   gst_rtsp_message_steal_body (&message, &data, &usize);
628   gst_buffer_unmap (buffer, &map_info);
629
630   gst_rtsp_message_unset (&message);
631
632   return TRUE;
633 }
634
635 static void
636 link_transport (GstRTSPClient * client, GstRTSPSession * session,
637     GstRTSPStreamTransport * trans)
638 {
639   GstRTSPClientPrivate *priv = client->priv;
640
641   GST_DEBUG ("client %p: linking transport %p", client, trans);
642
643   gst_rtsp_stream_transport_set_callbacks (trans,
644       (GstRTSPSendFunc) do_send_data,
645       (GstRTSPSendFunc) do_send_data, client, NULL);
646
647   priv->transports = g_list_prepend (priv->transports, trans);
648
649   /* make sure our session can't expire */
650   gst_rtsp_session_prevent_expire (session);
651 }
652
653 static void
654 unlink_transport (GstRTSPClient * client, GstRTSPSession * session,
655     GstRTSPStreamTransport * trans)
656 {
657   GstRTSPClientPrivate *priv = client->priv;
658
659   GST_DEBUG ("client %p: unlinking transport %p", client, trans);
660
661   gst_rtsp_stream_transport_set_callbacks (trans, NULL, NULL, NULL, NULL);
662
663   priv->transports = g_list_remove (priv->transports, trans);
664
665   /* our session can now expire */
666   gst_rtsp_session_allow_expire (session);
667 }
668
669 static void
670 unlink_session_transports (GstRTSPClient * client, GstRTSPSession * session,
671     GstRTSPSessionMedia * sessmedia)
672 {
673   guint n_streams, i;
674
675   n_streams =
676       gst_rtsp_media_n_streams (gst_rtsp_session_media_get_media (sessmedia));
677   for (i = 0; i < n_streams; i++) {
678     GstRTSPStreamTransport *trans;
679     const GstRTSPTransport *tr;
680
681     /* get the transport, if there is no transport configured, skip this stream */
682     trans = gst_rtsp_session_media_get_transport (sessmedia, i);
683     if (trans == NULL)
684       continue;
685
686     tr = gst_rtsp_stream_transport_get_transport (trans);
687
688     if (tr->lower_transport == GST_RTSP_LOWER_TRANS_TCP) {
689       /* for TCP, unlink the stream from the TCP connection of the client */
690       unlink_transport (client, session, trans);
691     }
692   }
693 }
694
695 static void
696 close_connection (GstRTSPClient * client)
697 {
698   GstRTSPClientPrivate *priv = client->priv;
699   const gchar *tunnelid;
700
701   GST_DEBUG ("client %p: closing connection", client);
702
703   if ((tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection))) {
704     g_mutex_lock (&tunnels_lock);
705     /* remove from tunnelids */
706     g_hash_table_remove (tunnels, tunnelid);
707     g_mutex_unlock (&tunnels_lock);
708   }
709
710   gst_rtsp_connection_close (priv->connection);
711 }
712
713 static gboolean
714 handle_teardown_request (GstRTSPClient * client, GstRTSPContext * ctx)
715 {
716   GstRTSPClientPrivate *priv = client->priv;
717   GstRTSPSession *session;
718   GstRTSPSessionMedia *sessmedia;
719   GstRTSPStatusCode code;
720   const gchar *path;
721   gint matched;
722
723   if (!ctx->session)
724     goto no_session;
725
726   session = ctx->session;
727
728   if (!ctx->uri)
729     goto no_uri;
730
731   path = ctx->uri->abspath;
732
733   /* get a handle to the configuration of the media in the session */
734   sessmedia = gst_rtsp_session_get_media (session, path, &matched);
735   if (!sessmedia)
736     goto not_found;
737
738   /* only aggregate control for now.. */
739   if (path[matched] != '\0')
740     goto no_aggregate;
741
742   ctx->sessmedia = sessmedia;
743
744   /* we emit the signal before closing the connection */
745   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_TEARDOWN_REQUEST],
746       0, ctx);
747
748   /* unlink the all TCP callbacks */
749   unlink_session_transports (client, session, sessmedia);
750
751   /* remove the session from the watched sessions */
752   client_unwatch_session (client, session);
753
754   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_NULL);
755
756   /* unmanage the media in the session, returns false if all media session
757    * are torn down. */
758   if (!gst_rtsp_session_release_media (session, sessmedia)) {
759     /* remove the session */
760     gst_rtsp_session_pool_remove (priv->session_pool, session);
761   }
762   /* construct the response now */
763   code = GST_RTSP_STS_OK;
764   gst_rtsp_message_init_response (ctx->response, code,
765       gst_rtsp_status_as_text (code), ctx->request);
766
767   send_message (client, session, ctx->response, TRUE);
768
769   return TRUE;
770
771   /* ERRORS */
772 no_session:
773   {
774     GST_ERROR ("client %p: no session", client);
775     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
776     return FALSE;
777   }
778 no_uri:
779   {
780     GST_ERROR ("client %p: no uri supplied", client);
781     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
782     return FALSE;
783   }
784 not_found:
785   {
786     GST_ERROR ("client %p: no media for uri", client);
787     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
788     return FALSE;
789   }
790 no_aggregate:
791   {
792     GST_ERROR ("client %p: no aggregate path %s", client, path);
793     send_generic_response (client,
794         GST_RTSP_STS_ONLY_AGGREGATE_OPERATION_ALLOWED, ctx);
795     return FALSE;
796   }
797 }
798
799 static GstRTSPResult
800 default_params_set (GstRTSPClient * client, GstRTSPContext * ctx)
801 {
802   GstRTSPResult res;
803
804   res = gst_rtsp_params_set (client, ctx);
805
806   return res;
807 }
808
809 static GstRTSPResult
810 default_params_get (GstRTSPClient * client, GstRTSPContext * ctx)
811 {
812   GstRTSPResult res;
813
814   res = gst_rtsp_params_get (client, ctx);
815
816   return res;
817 }
818
819 static gboolean
820 handle_get_param_request (GstRTSPClient * client, GstRTSPContext * ctx)
821 {
822   GstRTSPResult res;
823   guint8 *data;
824   guint size;
825
826   res = gst_rtsp_message_get_body (ctx->request, &data, &size);
827   if (res != GST_RTSP_OK)
828     goto bad_request;
829
830   if (size == 0) {
831     /* no body, keep-alive request */
832     send_generic_response (client, GST_RTSP_STS_OK, ctx);
833   } else {
834     /* there is a body, handle the params */
835     res = GST_RTSP_CLIENT_GET_CLASS (client)->params_get (client, ctx);
836     if (res != GST_RTSP_OK)
837       goto bad_request;
838
839     send_message (client, ctx->session, ctx->response, FALSE);
840   }
841
842   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_GET_PARAMETER_REQUEST],
843       0, ctx);
844
845   return TRUE;
846
847   /* ERRORS */
848 bad_request:
849   {
850     GST_ERROR ("client %p: bad request", client);
851     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
852     return FALSE;
853   }
854 }
855
856 static gboolean
857 handle_set_param_request (GstRTSPClient * client, GstRTSPContext * ctx)
858 {
859   GstRTSPResult res;
860   guint8 *data;
861   guint size;
862
863   res = gst_rtsp_message_get_body (ctx->request, &data, &size);
864   if (res != GST_RTSP_OK)
865     goto bad_request;
866
867   if (size == 0) {
868     /* no body, keep-alive request */
869     send_generic_response (client, GST_RTSP_STS_OK, ctx);
870   } else {
871     /* there is a body, handle the params */
872     res = GST_RTSP_CLIENT_GET_CLASS (client)->params_set (client, ctx);
873     if (res != GST_RTSP_OK)
874       goto bad_request;
875
876     send_message (client, ctx->session, ctx->response, FALSE);
877   }
878
879   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_SET_PARAMETER_REQUEST],
880       0, ctx);
881
882   return TRUE;
883
884   /* ERRORS */
885 bad_request:
886   {
887     GST_ERROR ("client %p: bad request", client);
888     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
889     return FALSE;
890   }
891 }
892
893 static gboolean
894 handle_pause_request (GstRTSPClient * client, GstRTSPContext * ctx)
895 {
896   GstRTSPSession *session;
897   GstRTSPSessionMedia *sessmedia;
898   GstRTSPStatusCode code;
899   GstRTSPState rtspstate;
900   const gchar *path;
901   gint matched;
902
903   if (!(session = ctx->session))
904     goto no_session;
905
906   if (!ctx->uri)
907     goto no_uri;
908
909   path = ctx->uri->abspath;
910
911   /* get a handle to the configuration of the media in the session */
912   sessmedia = gst_rtsp_session_get_media (session, path, &matched);
913   if (!sessmedia)
914     goto not_found;
915
916   if (path[matched] != '\0')
917     goto no_aggregate;
918
919   ctx->sessmedia = sessmedia;
920
921   rtspstate = gst_rtsp_session_media_get_rtsp_state (sessmedia);
922   /* the session state must be playing or recording */
923   if (rtspstate != GST_RTSP_STATE_PLAYING &&
924       rtspstate != GST_RTSP_STATE_RECORDING)
925     goto invalid_state;
926
927   /* unlink the all TCP callbacks */
928   unlink_session_transports (client, session, sessmedia);
929
930   /* then pause sending */
931   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_PAUSED);
932
933   /* construct the response now */
934   code = GST_RTSP_STS_OK;
935   gst_rtsp_message_init_response (ctx->response, code,
936       gst_rtsp_status_as_text (code), ctx->request);
937
938   send_message (client, session, ctx->response, FALSE);
939
940   /* the state is now READY */
941   gst_rtsp_session_media_set_rtsp_state (sessmedia, GST_RTSP_STATE_READY);
942
943   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_PAUSE_REQUEST], 0, ctx);
944
945   return TRUE;
946
947   /* ERRORS */
948 no_session:
949   {
950     GST_ERROR ("client %p: no seesion", client);
951     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
952     return FALSE;
953   }
954 no_uri:
955   {
956     GST_ERROR ("client %p: no uri supplied", client);
957     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
958     return FALSE;
959   }
960 not_found:
961   {
962     GST_ERROR ("client %p: no media for uri", client);
963     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
964     return FALSE;
965   }
966 no_aggregate:
967   {
968     GST_ERROR ("client %p: no aggregate path %s", client, path);
969     send_generic_response (client,
970         GST_RTSP_STS_ONLY_AGGREGATE_OPERATION_ALLOWED, ctx);
971     return FALSE;
972   }
973 invalid_state:
974   {
975     GST_ERROR ("client %p: not PLAYING or RECORDING", client);
976     send_generic_response (client, GST_RTSP_STS_METHOD_NOT_VALID_IN_THIS_STATE,
977         ctx);
978     return FALSE;
979   }
980 }
981
982 static gboolean
983 handle_play_request (GstRTSPClient * client, GstRTSPContext * ctx)
984 {
985   GstRTSPSession *session;
986   GstRTSPSessionMedia *sessmedia;
987   GstRTSPMedia *media;
988   GstRTSPStatusCode code;
989   GString *rtpinfo;
990   guint n_streams, i, infocount;
991   gchar *str;
992   GstRTSPTimeRange *range;
993   GstRTSPResult res;
994   GstRTSPState rtspstate;
995   GstRTSPRangeUnit unit = GST_RTSP_RANGE_NPT;
996   const gchar *path;
997   gint matched;
998
999   if (!(session = ctx->session))
1000     goto no_session;
1001
1002   if (!ctx->uri)
1003     goto no_uri;
1004
1005   path = ctx->uri->abspath;
1006
1007   /* get a handle to the configuration of the media in the session */
1008   sessmedia = gst_rtsp_session_get_media (session, path, &matched);
1009   if (!sessmedia)
1010     goto not_found;
1011
1012   if (path[matched] != '\0')
1013     goto no_aggregate;
1014
1015   ctx->sessmedia = sessmedia;
1016   ctx->media = media = gst_rtsp_session_media_get_media (sessmedia);
1017
1018   /* the session state must be playing or ready */
1019   rtspstate = gst_rtsp_session_media_get_rtsp_state (sessmedia);
1020   if (rtspstate != GST_RTSP_STATE_PLAYING && rtspstate != GST_RTSP_STATE_READY)
1021     goto invalid_state;
1022
1023   /* parse the range header if we have one */
1024   res = gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_RANGE, &str, 0);
1025   if (res == GST_RTSP_OK) {
1026     if (gst_rtsp_range_parse (str, &range) == GST_RTSP_OK) {
1027       /* we have a range, seek to the position */
1028       unit = range->unit;
1029       gst_rtsp_media_seek (media, range);
1030       gst_rtsp_range_free (range);
1031     }
1032   }
1033
1034   /* grab RTPInfo from the payloaders now */
1035   rtpinfo = g_string_new ("");
1036
1037   n_streams = gst_rtsp_media_n_streams (media);
1038   for (i = 0, infocount = 0; i < n_streams; i++) {
1039     GstRTSPStreamTransport *trans;
1040     GstRTSPStream *stream;
1041     const GstRTSPTransport *tr;
1042     gchar *uristr;
1043     guint rtptime, seq;
1044
1045     /* get the transport, if there is no transport configured, skip this stream */
1046     trans = gst_rtsp_session_media_get_transport (sessmedia, i);
1047     if (trans == NULL) {
1048       GST_INFO ("stream %d is not configured", i);
1049       continue;
1050     }
1051     tr = gst_rtsp_stream_transport_get_transport (trans);
1052
1053     if (tr->lower_transport == GST_RTSP_LOWER_TRANS_TCP) {
1054       /* for TCP, link the stream to the TCP connection of the client */
1055       link_transport (client, session, trans);
1056     }
1057
1058     stream = gst_rtsp_stream_transport_get_stream (trans);
1059     if (gst_rtsp_stream_get_rtpinfo (stream, &rtptime, &seq)) {
1060       if (infocount > 0)
1061         g_string_append (rtpinfo, ", ");
1062
1063       uristr = gst_rtsp_url_get_request_uri (ctx->uri);
1064       g_string_append_printf (rtpinfo, "url=%s/stream=%d;seq=%u;rtptime=%u",
1065           uristr, i, seq, rtptime);
1066       g_free (uristr);
1067
1068       infocount++;
1069     } else {
1070       GST_WARNING ("RTP-Info cannot be determined for stream %d", i);
1071     }
1072   }
1073
1074   /* construct the response now */
1075   code = GST_RTSP_STS_OK;
1076   gst_rtsp_message_init_response (ctx->response, code,
1077       gst_rtsp_status_as_text (code), ctx->request);
1078
1079   /* add the RTP-Info header */
1080   if (infocount > 0) {
1081     str = g_string_free (rtpinfo, FALSE);
1082     gst_rtsp_message_take_header (ctx->response, GST_RTSP_HDR_RTP_INFO, str);
1083   } else {
1084     g_string_free (rtpinfo, TRUE);
1085   }
1086
1087   /* add the range */
1088   str = gst_rtsp_media_get_range_string (media, TRUE, unit);
1089   if (str)
1090     gst_rtsp_message_take_header (ctx->response, GST_RTSP_HDR_RANGE, str);
1091
1092   send_message (client, session, ctx->response, FALSE);
1093
1094   /* start playing after sending the request */
1095   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_PLAYING);
1096
1097   gst_rtsp_session_media_set_rtsp_state (sessmedia, GST_RTSP_STATE_PLAYING);
1098
1099   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_PLAY_REQUEST], 0, ctx);
1100
1101   return TRUE;
1102
1103   /* ERRORS */
1104 no_session:
1105   {
1106     GST_ERROR ("client %p: no session", client);
1107     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1108     return FALSE;
1109   }
1110 no_uri:
1111   {
1112     GST_ERROR ("client %p: no uri supplied", client);
1113     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1114     return FALSE;
1115   }
1116 not_found:
1117   {
1118     GST_ERROR ("client %p: media not found", client);
1119     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1120     return FALSE;
1121   }
1122 no_aggregate:
1123   {
1124     GST_ERROR ("client %p: no aggregate path %s", client, path);
1125     send_generic_response (client,
1126         GST_RTSP_STS_ONLY_AGGREGATE_OPERATION_ALLOWED, ctx);
1127     return FALSE;
1128   }
1129 invalid_state:
1130   {
1131     GST_ERROR ("client %p: not PLAYING or READY", client);
1132     send_generic_response (client, GST_RTSP_STS_METHOD_NOT_VALID_IN_THIS_STATE,
1133         ctx);
1134     return FALSE;
1135   }
1136 }
1137
1138 static void
1139 do_keepalive (GstRTSPSession * session)
1140 {
1141   GST_INFO ("keep session %p alive", session);
1142   gst_rtsp_session_touch (session);
1143 }
1144
1145 /* parse @transport and return a valid transport in @tr. only transports
1146  * from @supported are returned. Returns FALSE if no valid transport
1147  * was found. */
1148 static gboolean
1149 parse_transport (const char *transport, GstRTSPLowerTrans supported,
1150     GstRTSPTransport * tr)
1151 {
1152   gint i;
1153   gboolean res;
1154   gchar **transports;
1155
1156   res = FALSE;
1157   gst_rtsp_transport_init (tr);
1158
1159   GST_DEBUG ("parsing transports %s", transport);
1160
1161   transports = g_strsplit (transport, ",", 0);
1162
1163   /* loop through the transports, try to parse */
1164   for (i = 0; transports[i]; i++) {
1165     res = gst_rtsp_transport_parse (transports[i], tr);
1166     if (res != GST_RTSP_OK) {
1167       /* no valid transport, search some more */
1168       GST_WARNING ("could not parse transport %s", transports[i]);
1169       goto next;
1170     }
1171
1172     /* we have a transport, see if it's RTP/AVP */
1173     if (tr->trans != GST_RTSP_TRANS_RTP || tr->profile != GST_RTSP_PROFILE_AVP) {
1174       GST_WARNING ("invalid transport %s", transports[i]);
1175       goto next;
1176     }
1177
1178     if (!(tr->lower_transport & supported)) {
1179       GST_WARNING ("unsupported transport %s", transports[i]);
1180       goto next;
1181     }
1182
1183     /* we have a valid transport */
1184     GST_INFO ("found valid transport %s", transports[i]);
1185     res = TRUE;
1186     break;
1187
1188   next:
1189     gst_rtsp_transport_init (tr);
1190   }
1191   g_strfreev (transports);
1192
1193   return res;
1194 }
1195
1196 static gboolean
1197 handle_blocksize (GstRTSPMedia * media, GstRTSPStream * stream,
1198     GstRTSPMessage * request)
1199 {
1200   gchar *blocksize_str;
1201   gboolean ret = TRUE;
1202
1203   if (gst_rtsp_message_get_header (request, GST_RTSP_HDR_BLOCKSIZE,
1204           &blocksize_str, 0) == GST_RTSP_OK) {
1205     guint64 blocksize;
1206     gchar *end;
1207
1208     blocksize = g_ascii_strtoull (blocksize_str, &end, 10);
1209     if (end == blocksize_str) {
1210       GST_ERROR ("failed to parse blocksize");
1211       ret = FALSE;
1212     } else {
1213       /* we don't want to change the mtu when this media
1214        * can be shared because it impacts other clients */
1215       if (gst_rtsp_media_is_shared (media))
1216         return TRUE;
1217
1218       if (blocksize > G_MAXUINT)
1219         blocksize = G_MAXUINT;
1220       gst_rtsp_stream_set_mtu (stream, blocksize);
1221     }
1222   }
1223   return ret;
1224 }
1225
1226 static gboolean
1227 default_configure_client_transport (GstRTSPClient * client,
1228     GstRTSPContext * ctx, GstRTSPTransport * ct)
1229 {
1230   GstRTSPClientPrivate *priv = client->priv;
1231
1232   /* we have a valid transport now, set the destination of the client. */
1233   if (ct->lower_transport == GST_RTSP_LOWER_TRANS_UDP_MCAST) {
1234     gboolean use_client_settings;
1235
1236     use_client_settings =
1237         gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_TRANSPORT_CLIENT_SETTINGS);
1238
1239     if (ct->destination && use_client_settings) {
1240       GstRTSPAddress *addr;
1241
1242       addr = gst_rtsp_stream_reserve_address (ctx->stream, ct->destination,
1243           ct->port.min, ct->port.max - ct->port.min + 1, ct->ttl);
1244
1245       if (addr == NULL)
1246         goto no_address;
1247
1248       gst_rtsp_address_free (addr);
1249     } else {
1250       GstRTSPAddress *addr;
1251       GSocketFamily family;
1252
1253       family = priv->is_ipv6 ? G_SOCKET_FAMILY_IPV6 : G_SOCKET_FAMILY_IPV4;
1254
1255       addr = gst_rtsp_stream_get_multicast_address (ctx->stream, family);
1256       if (addr == NULL)
1257         goto no_address;
1258
1259       g_free (ct->destination);
1260       ct->destination = g_strdup (addr->address);
1261       ct->port.min = addr->port;
1262       ct->port.max = addr->port + addr->n_ports - 1;
1263       ct->ttl = addr->ttl;
1264
1265       gst_rtsp_address_free (addr);
1266     }
1267   } else {
1268     GstRTSPUrl *url;
1269
1270     url = gst_rtsp_connection_get_url (priv->connection);
1271     g_free (ct->destination);
1272     ct->destination = g_strdup (url->host);
1273
1274     if (ct->lower_transport & GST_RTSP_LOWER_TRANS_TCP) {
1275       /* check if the client selected channels for TCP */
1276       if (ct->interleaved.min == -1 || ct->interleaved.max == -1) {
1277         gst_rtsp_session_media_alloc_channels (ctx->sessmedia,
1278             &ct->interleaved);
1279       }
1280     }
1281   }
1282   return TRUE;
1283
1284   /* ERRORS */
1285 no_address:
1286   {
1287     GST_ERROR_OBJECT (client, "failed to acquire address for stream");
1288     return FALSE;
1289   }
1290 }
1291
1292 static GstRTSPTransport *
1293 make_server_transport (GstRTSPClient * client, GstRTSPContext * ctx,
1294     GstRTSPTransport * ct)
1295 {
1296   GstRTSPTransport *st;
1297   GInetAddress *addr;
1298   GSocketFamily family;
1299
1300   /* prepare the server transport */
1301   gst_rtsp_transport_new (&st);
1302
1303   st->trans = ct->trans;
1304   st->profile = ct->profile;
1305   st->lower_transport = ct->lower_transport;
1306
1307   addr = g_inet_address_new_from_string (ct->destination);
1308
1309   if (!addr) {
1310     GST_ERROR ("failed to get inet addr from client destination");
1311     family = G_SOCKET_FAMILY_IPV4;
1312   } else {
1313     family = g_inet_address_get_family (addr);
1314     g_object_unref (addr);
1315     addr = NULL;
1316   }
1317
1318   switch (st->lower_transport) {
1319     case GST_RTSP_LOWER_TRANS_UDP:
1320       st->client_port = ct->client_port;
1321       gst_rtsp_stream_get_server_port (ctx->stream, &st->server_port, family);
1322       break;
1323     case GST_RTSP_LOWER_TRANS_UDP_MCAST:
1324       st->port = ct->port;
1325       st->destination = g_strdup (ct->destination);
1326       st->ttl = ct->ttl;
1327       break;
1328     case GST_RTSP_LOWER_TRANS_TCP:
1329       st->interleaved = ct->interleaved;
1330     default:
1331       break;
1332   }
1333
1334   gst_rtsp_stream_get_ssrc (ctx->stream, &st->ssrc);
1335
1336   return st;
1337 }
1338
1339 static gboolean
1340 handle_setup_request (GstRTSPClient * client, GstRTSPContext * ctx)
1341 {
1342   GstRTSPClientPrivate *priv = client->priv;
1343   GstRTSPResult res;
1344   GstRTSPUrl *uri;
1345   gchar *transport;
1346   GstRTSPTransport *ct, *st;
1347   GstRTSPLowerTrans supported;
1348   GstRTSPStatusCode code;
1349   GstRTSPSession *session;
1350   GstRTSPStreamTransport *trans;
1351   gchar *trans_str;
1352   GstRTSPSessionMedia *sessmedia;
1353   GstRTSPMedia *media;
1354   GstRTSPStream *stream;
1355   GstRTSPState rtspstate;
1356   GstRTSPClientClass *klass;
1357   gchar *path, *control;
1358   gint matched;
1359
1360   if (!ctx->uri)
1361     goto no_uri;
1362
1363   uri = ctx->uri;
1364   path = uri->abspath;
1365
1366   /* parse the transport */
1367   res =
1368       gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_TRANSPORT,
1369       &transport, 0);
1370   if (res != GST_RTSP_OK)
1371     goto no_transport;
1372
1373   /* we create the session after parsing stuff so that we don't make
1374    * a session for malformed requests */
1375   if (priv->session_pool == NULL)
1376     goto no_pool;
1377
1378   session = ctx->session;
1379
1380   if (session) {
1381     g_object_ref (session);
1382     /* get a handle to the configuration of the media in the session, this can
1383      * return NULL if this is a new url to manage in this session. */
1384     sessmedia = gst_rtsp_session_get_media (session, path, &matched);
1385   } else {
1386     /* we need a new media configuration in this session */
1387     sessmedia = NULL;
1388   }
1389
1390   /* we have no session media, find one and manage it */
1391   if (sessmedia == NULL) {
1392     /* get a handle to the configuration of the media in the session */
1393     media = find_media (client, ctx, &matched);
1394   } else {
1395     if ((media = gst_rtsp_session_media_get_media (sessmedia)))
1396       g_object_ref (media);
1397   }
1398   /* no media, not found then */
1399   if (media == NULL)
1400     goto media_not_found;
1401
1402   /* path is what matched. We can modify the parsed uri in place */
1403   path[matched] = '\0';
1404   /* control is remainder */
1405   control = &path[matched + 1];
1406
1407   /* find the stream now using the control part */
1408   stream = gst_rtsp_media_find_stream (media, control);
1409   if (stream == NULL)
1410     goto stream_not_found;
1411
1412   /* now we have a uri identifying a valid media and stream */
1413   ctx->stream = stream;
1414   ctx->media = media;
1415
1416   if (session == NULL) {
1417     /* create a session if this fails we probably reached our session limit or
1418      * something. */
1419     if (!(session = gst_rtsp_session_pool_create (priv->session_pool)))
1420       goto service_unavailable;
1421
1422     /* make sure this client is closed when the session is closed */
1423     client_watch_session (client, session);
1424
1425     /* signal new session */
1426     g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_NEW_SESSION], 0,
1427         session);
1428
1429     ctx->session = session;
1430   }
1431
1432   if (sessmedia == NULL) {
1433     /* manage the media in our session now, if not done already  */
1434     sessmedia = gst_rtsp_session_manage_media (session, path, media);
1435     /* if we stil have no media, error */
1436     if (sessmedia == NULL)
1437       goto sessmedia_unavailable;
1438   } else {
1439     g_object_unref (media);
1440   }
1441
1442   ctx->sessmedia = sessmedia;
1443
1444   /* set blocksize on this stream */
1445   if (!handle_blocksize (media, stream, ctx->request))
1446     goto invalid_blocksize;
1447
1448   gst_rtsp_transport_new (&ct);
1449
1450   /* our supported transports */
1451   supported = gst_rtsp_stream_get_protocols (stream);
1452
1453   /* parse and find a usable supported transport */
1454   if (!parse_transport (transport, supported, ct))
1455     goto unsupported_transports;
1456
1457   /* update the client transport */
1458   klass = GST_RTSP_CLIENT_GET_CLASS (client);
1459   if (!klass->configure_client_transport (client, ctx, ct))
1460     goto unsupported_client_transport;
1461
1462   /* set in the session media transport */
1463   trans = gst_rtsp_session_media_set_transport (sessmedia, stream, ct);
1464
1465   /* configure keepalive for this transport */
1466   gst_rtsp_stream_transport_set_keepalive (trans,
1467       (GstRTSPKeepAliveFunc) do_keepalive, session, NULL);
1468
1469   /* create and serialize the server transport */
1470   st = make_server_transport (client, ctx, ct);
1471   trans_str = gst_rtsp_transport_as_text (st);
1472   gst_rtsp_transport_free (st);
1473
1474   /* construct the response now */
1475   code = GST_RTSP_STS_OK;
1476   gst_rtsp_message_init_response (ctx->response, code,
1477       gst_rtsp_status_as_text (code), ctx->request);
1478
1479   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_TRANSPORT,
1480       trans_str);
1481   g_free (trans_str);
1482
1483   send_message (client, session, ctx->response, FALSE);
1484
1485   /* update the state */
1486   rtspstate = gst_rtsp_session_media_get_rtsp_state (sessmedia);
1487   switch (rtspstate) {
1488     case GST_RTSP_STATE_PLAYING:
1489     case GST_RTSP_STATE_RECORDING:
1490     case GST_RTSP_STATE_READY:
1491       /* no state change */
1492       break;
1493     default:
1494       gst_rtsp_session_media_set_rtsp_state (sessmedia, GST_RTSP_STATE_READY);
1495       break;
1496   }
1497   g_object_unref (session);
1498
1499   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_SETUP_REQUEST], 0, ctx);
1500
1501   return TRUE;
1502
1503   /* ERRORS */
1504 no_uri:
1505   {
1506     GST_ERROR ("client %p: no uri", client);
1507     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1508     return FALSE;
1509   }
1510 no_transport:
1511   {
1512     GST_ERROR ("client %p: no transport", client);
1513     send_generic_response (client, GST_RTSP_STS_UNSUPPORTED_TRANSPORT, ctx);
1514     return FALSE;
1515   }
1516 no_pool:
1517   {
1518     GST_ERROR ("client %p: no session pool configured", client);
1519     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1520     return FALSE;
1521   }
1522 media_not_found:
1523   {
1524     GST_ERROR ("client %p: media '%s' not found", client, path);
1525     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1526     return FALSE;
1527   }
1528 stream_not_found:
1529   {
1530     GST_ERROR ("client %p: stream '%s' not found", client, control);
1531     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1532     g_object_unref (media);
1533     return FALSE;
1534   }
1535 service_unavailable:
1536   {
1537     GST_ERROR ("client %p: can't create session", client);
1538     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
1539     g_object_unref (media);
1540     return FALSE;
1541   }
1542 sessmedia_unavailable:
1543   {
1544     GST_ERROR ("client %p: can't create session media", client);
1545     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
1546     g_object_unref (media);
1547     g_object_unref (session);
1548     return FALSE;
1549   }
1550 invalid_blocksize:
1551   {
1552     GST_ERROR ("client %p: invalid blocksize", client);
1553     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1554     g_object_unref (session);
1555     return FALSE;
1556   }
1557 unsupported_transports:
1558   {
1559     GST_ERROR ("client %p: unsupported transports", client);
1560     send_generic_response (client, GST_RTSP_STS_UNSUPPORTED_TRANSPORT, ctx);
1561     gst_rtsp_transport_free (ct);
1562     g_object_unref (session);
1563     return FALSE;
1564   }
1565 unsupported_client_transport:
1566   {
1567     GST_ERROR ("client %p: unsupported client transport", client);
1568     send_generic_response (client, GST_RTSP_STS_UNSUPPORTED_TRANSPORT, ctx);
1569     gst_rtsp_transport_free (ct);
1570     g_object_unref (session);
1571     return FALSE;
1572   }
1573 }
1574
1575 static GstSDPMessage *
1576 create_sdp (GstRTSPClient * client, GstRTSPMedia * media)
1577 {
1578   GstRTSPClientPrivate *priv = client->priv;
1579   GstSDPMessage *sdp;
1580   GstSDPInfo info;
1581   const gchar *proto;
1582
1583   gst_sdp_message_new (&sdp);
1584
1585   /* some standard things first */
1586   gst_sdp_message_set_version (sdp, "0");
1587
1588   if (priv->is_ipv6)
1589     proto = "IP6";
1590   else
1591     proto = "IP4";
1592
1593   gst_sdp_message_set_origin (sdp, "-", "1188340656180883", "1", "IN", proto,
1594       priv->server_ip);
1595
1596   gst_sdp_message_set_session_name (sdp, "Session streamed with GStreamer");
1597   gst_sdp_message_set_information (sdp, "rtsp-server");
1598   gst_sdp_message_add_time (sdp, "0", "0", NULL);
1599   gst_sdp_message_add_attribute (sdp, "tool", "GStreamer");
1600   gst_sdp_message_add_attribute (sdp, "type", "broadcast");
1601   gst_sdp_message_add_attribute (sdp, "control", "*");
1602
1603   info.is_ipv6 = priv->is_ipv6;
1604   info.server_ip = priv->server_ip;
1605
1606   /* create an SDP for the media object */
1607   if (!gst_rtsp_sdp_from_media (sdp, &info, media))
1608     goto no_sdp;
1609
1610   return sdp;
1611
1612   /* ERRORS */
1613 no_sdp:
1614   {
1615     GST_ERROR ("client %p: could not create SDP", client);
1616     gst_sdp_message_free (sdp);
1617     return NULL;
1618   }
1619 }
1620
1621 /* for the describe we must generate an SDP */
1622 static gboolean
1623 handle_describe_request (GstRTSPClient * client, GstRTSPContext * ctx)
1624 {
1625   GstRTSPResult res;
1626   GstSDPMessage *sdp;
1627   guint i, str_len;
1628   gchar *str, *content_base;
1629   GstRTSPMedia *media;
1630   GstRTSPClientClass *klass;
1631
1632   klass = GST_RTSP_CLIENT_GET_CLASS (client);
1633
1634   if (!ctx->uri)
1635     goto no_uri;
1636
1637   /* check what kind of format is accepted, we don't really do anything with it
1638    * and always return SDP for now. */
1639   for (i = 0; i++;) {
1640     gchar *accept;
1641
1642     res =
1643         gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_ACCEPT,
1644         &accept, i);
1645     if (res == GST_RTSP_ENOTIMPL)
1646       break;
1647
1648     if (g_ascii_strcasecmp (accept, "application/sdp") == 0)
1649       break;
1650   }
1651
1652   /* find the media object for the uri */
1653   if (!(media = find_media (client, ctx, NULL)))
1654     goto no_media;
1655
1656   /* create an SDP for the media object on this client */
1657   if (!(sdp = klass->create_sdp (client, media)))
1658     goto no_sdp;
1659
1660   g_object_unref (media);
1661
1662   gst_rtsp_message_init_response (ctx->response, GST_RTSP_STS_OK,
1663       gst_rtsp_status_as_text (GST_RTSP_STS_OK), ctx->request);
1664
1665   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_CONTENT_TYPE,
1666       "application/sdp");
1667
1668   /* content base for some clients that might screw up creating the setup uri */
1669   str = gst_rtsp_url_get_request_uri (ctx->uri);
1670   str_len = strlen (str);
1671
1672   /* check for trailing '/' and append one */
1673   if (str[str_len - 1] != '/') {
1674     content_base = g_malloc (str_len + 2);
1675     memcpy (content_base, str, str_len);
1676     content_base[str_len] = '/';
1677     content_base[str_len + 1] = '\0';
1678     g_free (str);
1679   } else {
1680     content_base = str;
1681   }
1682
1683   GST_INFO ("adding content-base: %s", content_base);
1684
1685   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_CONTENT_BASE,
1686       content_base);
1687   g_free (content_base);
1688
1689   /* add SDP to the response body */
1690   str = gst_sdp_message_as_text (sdp);
1691   gst_rtsp_message_take_body (ctx->response, (guint8 *) str, strlen (str));
1692   gst_sdp_message_free (sdp);
1693
1694   send_message (client, ctx->session, ctx->response, FALSE);
1695
1696   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_DESCRIBE_REQUEST],
1697       0, ctx);
1698
1699   return TRUE;
1700
1701   /* ERRORS */
1702 no_uri:
1703   {
1704     GST_ERROR ("client %p: no uri", client);
1705     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1706     return FALSE;
1707   }
1708 no_media:
1709   {
1710     GST_ERROR ("client %p: no media", client);
1711     /* error reply is already sent */
1712     return FALSE;
1713   }
1714 no_sdp:
1715   {
1716     GST_ERROR ("client %p: can't create SDP", client);
1717     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
1718     g_object_unref (media);
1719     return FALSE;
1720   }
1721 }
1722
1723 static gboolean
1724 handle_options_request (GstRTSPClient * client, GstRTSPContext * ctx)
1725 {
1726   GstRTSPMethod options;
1727   gchar *str;
1728
1729   options = GST_RTSP_DESCRIBE |
1730       GST_RTSP_OPTIONS |
1731       GST_RTSP_PAUSE |
1732       GST_RTSP_PLAY |
1733       GST_RTSP_SETUP |
1734       GST_RTSP_GET_PARAMETER | GST_RTSP_SET_PARAMETER | GST_RTSP_TEARDOWN;
1735
1736   str = gst_rtsp_options_as_text (options);
1737
1738   gst_rtsp_message_init_response (ctx->response, GST_RTSP_STS_OK,
1739       gst_rtsp_status_as_text (GST_RTSP_STS_OK), ctx->request);
1740
1741   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_PUBLIC, str);
1742   g_free (str);
1743
1744   send_message (client, ctx->session, ctx->response, FALSE);
1745
1746   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_OPTIONS_REQUEST],
1747       0, ctx);
1748
1749   return TRUE;
1750 }
1751
1752 /* remove duplicate and trailing '/' */
1753 static void
1754 sanitize_uri (GstRTSPUrl * uri)
1755 {
1756   gint i, len;
1757   gchar *s, *d;
1758   gboolean have_slash, prev_slash;
1759
1760   s = d = uri->abspath;
1761   len = strlen (uri->abspath);
1762
1763   prev_slash = FALSE;
1764
1765   for (i = 0; i < len; i++) {
1766     have_slash = s[i] == '/';
1767     *d = s[i];
1768     if (!have_slash || !prev_slash)
1769       d++;
1770     prev_slash = have_slash;
1771   }
1772   len = d - uri->abspath;
1773   /* don't remove the first slash if that's the only thing left */
1774   if (len > 1 && *(d - 1) == '/')
1775     d--;
1776   *d = '\0';
1777 }
1778
1779 static void
1780 client_session_finalized (GstRTSPClient * client, GstRTSPSession * session)
1781 {
1782   GstRTSPClientPrivate *priv = client->priv;
1783
1784   GST_INFO ("client %p: session %p finished", client, session);
1785
1786   /* unlink all media managed in this session */
1787   client_unlink_session (client, session);
1788
1789   /* remove the session */
1790   if (!(priv->sessions = g_list_remove (priv->sessions, session))) {
1791     GST_INFO ("client %p: all sessions finalized, close the connection",
1792         client);
1793     close_connection (client);
1794   }
1795 }
1796
1797 static void
1798 handle_request (GstRTSPClient * client, GstRTSPMessage * request)
1799 {
1800   GstRTSPClientPrivate *priv = client->priv;
1801   GstRTSPMethod method;
1802   const gchar *uristr;
1803   GstRTSPUrl *uri = NULL;
1804   GstRTSPVersion version;
1805   GstRTSPResult res;
1806   GstRTSPSession *session = NULL;
1807   GstRTSPContext sctx = { NULL }, *ctx;
1808   GstRTSPMessage response = { 0 };
1809   gchar *sessid;
1810
1811   if (!(ctx = gst_rtsp_context_get_current ())) {
1812     ctx = &sctx;
1813     ctx->auth = priv->auth;
1814     gst_rtsp_context_push_current (ctx);
1815   }
1816
1817   ctx->conn = priv->connection;
1818   ctx->client = client;
1819   ctx->request = request;
1820   ctx->response = &response;
1821
1822   if (gst_debug_category_get_threshold (rtsp_client_debug) >= GST_LEVEL_LOG) {
1823     gst_rtsp_message_dump (request);
1824   }
1825
1826   GST_INFO ("client %p: received a request", client);
1827
1828   gst_rtsp_message_parse_request (request, &method, &uristr, &version);
1829
1830   /* we can only handle 1.0 requests */
1831   if (version != GST_RTSP_VERSION_1_0)
1832     goto not_supported;
1833
1834   ctx->method = method;
1835
1836   /* we always try to parse the url first */
1837   if (strcmp (uristr, "*") == 0) {
1838     /* special case where we have * as uri, keep uri = NULL */
1839   } else if (gst_rtsp_url_parse (uristr, &uri) != GST_RTSP_OK)
1840     goto bad_request;
1841
1842   /* get the session if there is any */
1843   res = gst_rtsp_message_get_header (request, GST_RTSP_HDR_SESSION, &sessid, 0);
1844   if (res == GST_RTSP_OK) {
1845     if (priv->session_pool == NULL)
1846       goto no_pool;
1847
1848     /* we had a session in the request, find it again */
1849     if (!(session = gst_rtsp_session_pool_find (priv->session_pool, sessid)))
1850       goto session_not_found;
1851
1852     /* we add the session to the client list of watched sessions. When a session
1853      * disappears because it times out, we will be notified. If all sessions are
1854      * gone, we will close the connection */
1855     client_watch_session (client, session);
1856   }
1857
1858   /* sanitize the uri */
1859   if (uri)
1860     sanitize_uri (uri);
1861   ctx->uri = uri;
1862   ctx->session = session;
1863
1864   if (!gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_URL))
1865     goto not_authorized;
1866
1867   /* now see what is asked and dispatch to a dedicated handler */
1868   switch (method) {
1869     case GST_RTSP_OPTIONS:
1870       handle_options_request (client, ctx);
1871       break;
1872     case GST_RTSP_DESCRIBE:
1873       handle_describe_request (client, ctx);
1874       break;
1875     case GST_RTSP_SETUP:
1876       handle_setup_request (client, ctx);
1877       break;
1878     case GST_RTSP_PLAY:
1879       handle_play_request (client, ctx);
1880       break;
1881     case GST_RTSP_PAUSE:
1882       handle_pause_request (client, ctx);
1883       break;
1884     case GST_RTSP_TEARDOWN:
1885       handle_teardown_request (client, ctx);
1886       break;
1887     case GST_RTSP_SET_PARAMETER:
1888       handle_set_param_request (client, ctx);
1889       break;
1890     case GST_RTSP_GET_PARAMETER:
1891       handle_get_param_request (client, ctx);
1892       break;
1893     case GST_RTSP_ANNOUNCE:
1894     case GST_RTSP_RECORD:
1895     case GST_RTSP_REDIRECT:
1896       goto not_implemented;
1897     case GST_RTSP_INVALID:
1898     default:
1899       goto bad_request;
1900   }
1901
1902 done:
1903   if (ctx == &sctx)
1904     gst_rtsp_context_pop_current (ctx);
1905   if (session)
1906     g_object_unref (session);
1907   if (uri)
1908     gst_rtsp_url_free (uri);
1909   return;
1910
1911   /* ERRORS */
1912 not_supported:
1913   {
1914     GST_ERROR ("client %p: version %d not supported", client, version);
1915     send_generic_response (client, GST_RTSP_STS_RTSP_VERSION_NOT_SUPPORTED,
1916         ctx);
1917     goto done;
1918   }
1919 bad_request:
1920   {
1921     GST_ERROR ("client %p: bad request", client);
1922     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1923     goto done;
1924   }
1925 no_pool:
1926   {
1927     GST_ERROR ("client %p: no pool configured", client);
1928     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1929     goto done;
1930   }
1931 session_not_found:
1932   {
1933     GST_ERROR ("client %p: session not found", client);
1934     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1935     goto done;
1936   }
1937 not_authorized:
1938   {
1939     GST_ERROR ("client %p: not allowed", client);
1940     goto done;
1941   }
1942 not_implemented:
1943   {
1944     GST_ERROR ("client %p: method %d not implemented", client, method);
1945     send_generic_response (client, GST_RTSP_STS_NOT_IMPLEMENTED, ctx);
1946     goto done;
1947   }
1948 }
1949
1950 static void
1951 handle_data (GstRTSPClient * client, GstRTSPMessage * message)
1952 {
1953   GstRTSPClientPrivate *priv = client->priv;
1954   GstRTSPResult res;
1955   guint8 channel;
1956   GList *walk;
1957   guint8 *data;
1958   guint size;
1959   GstBuffer *buffer;
1960   gboolean handled;
1961
1962   /* find the stream for this message */
1963   res = gst_rtsp_message_parse_data (message, &channel);
1964   if (res != GST_RTSP_OK)
1965     return;
1966
1967   gst_rtsp_message_steal_body (message, &data, &size);
1968
1969   buffer = gst_buffer_new_wrapped (data, size);
1970
1971   handled = FALSE;
1972   for (walk = priv->transports; walk; walk = g_list_next (walk)) {
1973     GstRTSPStreamTransport *trans;
1974     GstRTSPStream *stream;
1975     const GstRTSPTransport *tr;
1976
1977     trans = walk->data;
1978
1979     tr = gst_rtsp_stream_transport_get_transport (trans);
1980     stream = gst_rtsp_stream_transport_get_stream (trans);
1981
1982     /* check for TCP transport */
1983     if (tr->lower_transport == GST_RTSP_LOWER_TRANS_TCP) {
1984       /* dispatch to the stream based on the channel number */
1985       if (tr->interleaved.min == channel) {
1986         gst_rtsp_stream_recv_rtp (stream, buffer);
1987         handled = TRUE;
1988         break;
1989       } else if (tr->interleaved.max == channel) {
1990         gst_rtsp_stream_recv_rtcp (stream, buffer);
1991         handled = TRUE;
1992         break;
1993       }
1994     }
1995   }
1996   if (!handled)
1997     gst_buffer_unref (buffer);
1998 }
1999
2000 /**
2001  * gst_rtsp_client_set_session_pool:
2002  * @client: a #GstRTSPClient
2003  * @pool: a #GstRTSPSessionPool
2004  *
2005  * Set @pool as the sessionpool for @client which it will use to find
2006  * or allocate sessions. the sessionpool is usually inherited from the server
2007  * that created the client but can be overridden later.
2008  */
2009 void
2010 gst_rtsp_client_set_session_pool (GstRTSPClient * client,
2011     GstRTSPSessionPool * pool)
2012 {
2013   GstRTSPSessionPool *old;
2014   GstRTSPClientPrivate *priv;
2015
2016   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2017
2018   priv = client->priv;
2019
2020   if (pool)
2021     g_object_ref (pool);
2022
2023   g_mutex_lock (&priv->lock);
2024   old = priv->session_pool;
2025   priv->session_pool = pool;
2026   g_mutex_unlock (&priv->lock);
2027
2028   if (old)
2029     g_object_unref (old);
2030 }
2031
2032 /**
2033  * gst_rtsp_client_get_session_pool:
2034  * @client: a #GstRTSPClient
2035  *
2036  * Get the #GstRTSPSessionPool object that @client uses to manage its sessions.
2037  *
2038  * Returns: (transfer full): a #GstRTSPSessionPool, unref after usage.
2039  */
2040 GstRTSPSessionPool *
2041 gst_rtsp_client_get_session_pool (GstRTSPClient * client)
2042 {
2043   GstRTSPClientPrivate *priv;
2044   GstRTSPSessionPool *result;
2045
2046   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2047
2048   priv = client->priv;
2049
2050   g_mutex_lock (&priv->lock);
2051   if ((result = priv->session_pool))
2052     g_object_ref (result);
2053   g_mutex_unlock (&priv->lock);
2054
2055   return result;
2056 }
2057
2058 /**
2059  * gst_rtsp_client_set_mount_points:
2060  * @client: a #GstRTSPClient
2061  * @mounts: a #GstRTSPMountPoints
2062  *
2063  * Set @mounts as the mount points for @client which it will use to map urls
2064  * to media streams. These mount points are usually inherited from the server that
2065  * created the client but can be overriden later.
2066  */
2067 void
2068 gst_rtsp_client_set_mount_points (GstRTSPClient * client,
2069     GstRTSPMountPoints * mounts)
2070 {
2071   GstRTSPClientPrivate *priv;
2072   GstRTSPMountPoints *old;
2073
2074   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2075
2076   priv = client->priv;
2077
2078   if (mounts)
2079     g_object_ref (mounts);
2080
2081   g_mutex_lock (&priv->lock);
2082   old = priv->mount_points;
2083   priv->mount_points = mounts;
2084   g_mutex_unlock (&priv->lock);
2085
2086   if (old)
2087     g_object_unref (old);
2088 }
2089
2090 /**
2091  * gst_rtsp_client_get_mount_points:
2092  * @client: a #GstRTSPClient
2093  *
2094  * Get the #GstRTSPMountPoints object that @client uses to manage its sessions.
2095  *
2096  * Returns: (transfer full): a #GstRTSPMountPoints, unref after usage.
2097  */
2098 GstRTSPMountPoints *
2099 gst_rtsp_client_get_mount_points (GstRTSPClient * client)
2100 {
2101   GstRTSPClientPrivate *priv;
2102   GstRTSPMountPoints *result;
2103
2104   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2105
2106   priv = client->priv;
2107
2108   g_mutex_lock (&priv->lock);
2109   if ((result = priv->mount_points))
2110     g_object_ref (result);
2111   g_mutex_unlock (&priv->lock);
2112
2113   return result;
2114 }
2115
2116 /**
2117  * gst_rtsp_client_set_auth:
2118  * @client: a #GstRTSPClient
2119  * @auth: a #GstRTSPAuth
2120  *
2121  * configure @auth to be used as the authentication manager of @client.
2122  */
2123 void
2124 gst_rtsp_client_set_auth (GstRTSPClient * client, GstRTSPAuth * auth)
2125 {
2126   GstRTSPClientPrivate *priv;
2127   GstRTSPAuth *old;
2128
2129   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2130
2131   priv = client->priv;
2132
2133   if (auth)
2134     g_object_ref (auth);
2135
2136   g_mutex_lock (&priv->lock);
2137   old = priv->auth;
2138   priv->auth = auth;
2139   g_mutex_unlock (&priv->lock);
2140
2141   if (old)
2142     g_object_unref (old);
2143 }
2144
2145
2146 /**
2147  * gst_rtsp_client_get_auth:
2148  * @client: a #GstRTSPClient
2149  *
2150  * Get the #GstRTSPAuth used as the authentication manager of @client.
2151  *
2152  * Returns: (transfer full): the #GstRTSPAuth of @client. g_object_unref() after
2153  * usage.
2154  */
2155 GstRTSPAuth *
2156 gst_rtsp_client_get_auth (GstRTSPClient * client)
2157 {
2158   GstRTSPClientPrivate *priv;
2159   GstRTSPAuth *result;
2160
2161   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2162
2163   priv = client->priv;
2164
2165   g_mutex_lock (&priv->lock);
2166   if ((result = priv->auth))
2167     g_object_ref (result);
2168   g_mutex_unlock (&priv->lock);
2169
2170   return result;
2171 }
2172
2173 /**
2174  * gst_rtsp_client_set_thread_pool:
2175  * @client: a #GstRTSPClient
2176  * @pool: a #GstRTSPThreadPool
2177  *
2178  * configure @pool to be used as the thread pool of @client.
2179  */
2180 void
2181 gst_rtsp_client_set_thread_pool (GstRTSPClient * client,
2182     GstRTSPThreadPool * pool)
2183 {
2184   GstRTSPClientPrivate *priv;
2185   GstRTSPThreadPool *old;
2186
2187   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2188
2189   priv = client->priv;
2190
2191   if (pool)
2192     g_object_ref (pool);
2193
2194   g_mutex_lock (&priv->lock);
2195   old = priv->thread_pool;
2196   priv->thread_pool = pool;
2197   g_mutex_unlock (&priv->lock);
2198
2199   if (old)
2200     g_object_unref (old);
2201 }
2202
2203 /**
2204  * gst_rtsp_client_get_thread_pool:
2205  * @client: a #GstRTSPClient
2206  *
2207  * Get the #GstRTSPThreadPool used as the thread pool of @client.
2208  *
2209  * Returns: (transfer full): the #GstRTSPThreadPool of @client. g_object_unref() after
2210  * usage.
2211  */
2212 GstRTSPThreadPool *
2213 gst_rtsp_client_get_thread_pool (GstRTSPClient * client)
2214 {
2215   GstRTSPClientPrivate *priv;
2216   GstRTSPThreadPool *result;
2217
2218   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2219
2220   priv = client->priv;
2221
2222   g_mutex_lock (&priv->lock);
2223   if ((result = priv->thread_pool))
2224     g_object_ref (result);
2225   g_mutex_unlock (&priv->lock);
2226
2227   return result;
2228 }
2229
2230 /**
2231  * gst_rtsp_client_set_connection:
2232  * @client: a #GstRTSPClient
2233  * @conn: (transfer full): a #GstRTSPConnection
2234  *
2235  * Set the #GstRTSPConnection of @client. This function takes ownership of
2236  * @conn.
2237  *
2238  * Returns: %TRUE on success.
2239  */
2240 gboolean
2241 gst_rtsp_client_set_connection (GstRTSPClient * client,
2242     GstRTSPConnection * conn)
2243 {
2244   GstRTSPClientPrivate *priv;
2245   GSocket *read_socket;
2246   GSocketAddress *address;
2247   GstRTSPUrl *url;
2248   GError *error = NULL;
2249
2250   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), FALSE);
2251   g_return_val_if_fail (conn != NULL, FALSE);
2252
2253   priv = client->priv;
2254
2255   read_socket = gst_rtsp_connection_get_read_socket (conn);
2256
2257   if (!(address = g_socket_get_local_address (read_socket, &error)))
2258     goto no_address;
2259
2260   g_free (priv->server_ip);
2261   /* keep the original ip that the client connected to */
2262   if (G_IS_INET_SOCKET_ADDRESS (address)) {
2263     GInetAddress *iaddr;
2264
2265     iaddr = g_inet_socket_address_get_address (G_INET_SOCKET_ADDRESS (address));
2266
2267     /* socket might be ipv6 but adress still ipv4 */
2268     priv->is_ipv6 = g_inet_address_get_family (iaddr) == G_SOCKET_FAMILY_IPV6;
2269     priv->server_ip = g_inet_address_to_string (iaddr);
2270     g_object_unref (address);
2271   } else {
2272     priv->is_ipv6 = g_socket_get_family (read_socket) == G_SOCKET_FAMILY_IPV6;
2273     priv->server_ip = g_strdup ("unknown");
2274   }
2275
2276   GST_INFO ("client %p connected to server ip %s, ipv6 = %d", client,
2277       priv->server_ip, priv->is_ipv6);
2278
2279   url = gst_rtsp_connection_get_url (conn);
2280   GST_INFO ("added new client %p ip %s:%d", client, url->host, url->port);
2281
2282   priv->connection = conn;
2283
2284   return TRUE;
2285
2286   /* ERRORS */
2287 no_address:
2288   {
2289     GST_ERROR ("could not get local address %s", error->message);
2290     g_error_free (error);
2291     return FALSE;
2292   }
2293 }
2294
2295 /**
2296  * gst_rtsp_client_get_connection:
2297  * @client: a #GstRTSPClient
2298  *
2299  * Get the #GstRTSPConnection of @client.
2300  *
2301  * Returns: (transfer none): the #GstRTSPConnection of @client.
2302  * The connection object returned remains valid until the client is freed.
2303  */
2304 GstRTSPConnection *
2305 gst_rtsp_client_get_connection (GstRTSPClient * client)
2306 {
2307   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2308
2309   return client->priv->connection;
2310 }
2311
2312 /**
2313  * gst_rtsp_client_set_send_func:
2314  * @client: a #GstRTSPClient
2315  * @func: a #GstRTSPClientSendFunc
2316  * @user_data: user data passed to @func
2317  * @notify: called when @user_data is no longer in use
2318  *
2319  * Set @func as the callback that will be called when a new message needs to be
2320  * sent to the client. @user_data is passed to @func and @notify is called when
2321  * @user_data is no longer in use.
2322  *
2323  * By default, the client will send the messages on the #GstRTSPConnection that
2324  * was configured with gst_rtsp_client_attach() was called.
2325  */
2326 void
2327 gst_rtsp_client_set_send_func (GstRTSPClient * client,
2328     GstRTSPClientSendFunc func, gpointer user_data, GDestroyNotify notify)
2329 {
2330   GstRTSPClientPrivate *priv;
2331   GDestroyNotify old_notify;
2332   gpointer old_data;
2333
2334   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2335
2336   priv = client->priv;
2337
2338   g_mutex_lock (&priv->send_lock);
2339   priv->send_func = func;
2340   old_notify = priv->send_notify;
2341   old_data = priv->send_data;
2342   priv->send_notify = notify;
2343   priv->send_data = user_data;
2344   g_mutex_unlock (&priv->send_lock);
2345
2346   if (old_notify)
2347     old_notify (old_data);
2348 }
2349
2350 /**
2351  * gst_rtsp_client_handle_message:
2352  * @client: a #GstRTSPClient
2353  * @message: an #GstRTSPMessage
2354  *
2355  * Let the client handle @message.
2356  *
2357  * Returns: a #GstRTSPResult.
2358  */
2359 GstRTSPResult
2360 gst_rtsp_client_handle_message (GstRTSPClient * client,
2361     GstRTSPMessage * message)
2362 {
2363   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), GST_RTSP_EINVAL);
2364   g_return_val_if_fail (message != NULL, GST_RTSP_EINVAL);
2365
2366   switch (message->type) {
2367     case GST_RTSP_MESSAGE_REQUEST:
2368       handle_request (client, message);
2369       break;
2370     case GST_RTSP_MESSAGE_RESPONSE:
2371       break;
2372     case GST_RTSP_MESSAGE_DATA:
2373       handle_data (client, message);
2374       break;
2375     default:
2376       break;
2377   }
2378   return GST_RTSP_OK;
2379 }
2380
2381 /**
2382  * gst_rtsp_client_send_message:
2383  * @client: a #GstRTSPClient
2384  * @session: a #GstRTSPSession to send the message to or %NULL
2385  * @message: The #GstRTSPMessage to send
2386  *
2387  * Send a message message to the remote end. @message must be a
2388  * #GST_RTSP_MESSAGE_REQUEST or a #GST_RTSP_MESSAGE_RESPONSE.
2389  */
2390 GstRTSPResult
2391 gst_rtsp_client_send_message (GstRTSPClient * client, GstRTSPSession * session,
2392     GstRTSPMessage * message)
2393 {
2394   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), GST_RTSP_EINVAL);
2395   g_return_val_if_fail (message != NULL, GST_RTSP_EINVAL);
2396   g_return_val_if_fail (message->type == GST_RTSP_MESSAGE_REQUEST ||
2397       message->type == GST_RTSP_MESSAGE_RESPONSE, GST_RTSP_EINVAL);
2398
2399   send_message (client, session, message, FALSE);
2400
2401   return GST_RTSP_OK;
2402 }
2403
2404 static GstRTSPResult
2405 do_send_message (GstRTSPClient * client, GstRTSPMessage * message,
2406     gboolean close, gpointer user_data)
2407 {
2408   GstRTSPClientPrivate *priv = client->priv;
2409
2410   /* send the response and store the seq number so we can wait until it's
2411    * written to the client to close the connection */
2412   return gst_rtsp_watch_send_message (priv->watch, message, close ?
2413       &priv->close_seq : NULL);
2414 }
2415
2416 static GstRTSPResult
2417 message_received (GstRTSPWatch * watch, GstRTSPMessage * message,
2418     gpointer user_data)
2419 {
2420   return gst_rtsp_client_handle_message (GST_RTSP_CLIENT (user_data), message);
2421 }
2422
2423 static GstRTSPResult
2424 message_sent (GstRTSPWatch * watch, guint cseq, gpointer user_data)
2425 {
2426   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2427   GstRTSPClientPrivate *priv = client->priv;
2428
2429   if (priv->close_seq && priv->close_seq == cseq) {
2430     priv->close_seq = 0;
2431     close_connection (client);
2432   }
2433
2434   return GST_RTSP_OK;
2435 }
2436
2437 static GstRTSPResult
2438 closed (GstRTSPWatch * watch, gpointer user_data)
2439 {
2440   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2441   GstRTSPClientPrivate *priv = client->priv;
2442   const gchar *tunnelid;
2443
2444   GST_INFO ("client %p: connection closed", client);
2445
2446   if ((tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection))) {
2447     g_mutex_lock (&tunnels_lock);
2448     /* remove from tunnelids */
2449     g_hash_table_remove (tunnels, tunnelid);
2450     g_mutex_unlock (&tunnels_lock);
2451   }
2452
2453   gst_rtsp_client_set_send_func (client, NULL, NULL, NULL);
2454
2455   return GST_RTSP_OK;
2456 }
2457
2458 static GstRTSPResult
2459 error (GstRTSPWatch * watch, GstRTSPResult result, gpointer user_data)
2460 {
2461   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2462   gchar *str;
2463
2464   str = gst_rtsp_strresult (result);
2465   GST_INFO ("client %p: received an error %s", client, str);
2466   g_free (str);
2467
2468   return GST_RTSP_OK;
2469 }
2470
2471 static GstRTSPResult
2472 error_full (GstRTSPWatch * watch, GstRTSPResult result,
2473     GstRTSPMessage * message, guint id, gpointer user_data)
2474 {
2475   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2476   gchar *str;
2477
2478   str = gst_rtsp_strresult (result);
2479   GST_INFO
2480       ("client %p: error when handling message %p with id %d: %s",
2481       client, message, id, str);
2482   g_free (str);
2483
2484   return GST_RTSP_OK;
2485 }
2486
2487 static gboolean
2488 remember_tunnel (GstRTSPClient * client)
2489 {
2490   GstRTSPClientPrivate *priv = client->priv;
2491   const gchar *tunnelid;
2492
2493   /* store client in the pending tunnels */
2494   tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection);
2495   if (tunnelid == NULL)
2496     goto no_tunnelid;
2497
2498   GST_INFO ("client %p: inserting tunnel session %s", client, tunnelid);
2499
2500   /* we can't have two clients connecting with the same tunnelid */
2501   g_mutex_lock (&tunnels_lock);
2502   if (g_hash_table_lookup (tunnels, tunnelid))
2503     goto tunnel_existed;
2504
2505   g_hash_table_insert (tunnels, g_strdup (tunnelid), g_object_ref (client));
2506   g_mutex_unlock (&tunnels_lock);
2507
2508   return TRUE;
2509
2510   /* ERRORS */
2511 no_tunnelid:
2512   {
2513     GST_ERROR ("client %p: no tunnelid provided", client);
2514     return FALSE;
2515   }
2516 tunnel_existed:
2517   {
2518     g_mutex_unlock (&tunnels_lock);
2519     GST_ERROR ("client %p: tunnel session %s already existed", client,
2520         tunnelid);
2521     return FALSE;
2522   }
2523 }
2524
2525 static GstRTSPStatusCode
2526 tunnel_start (GstRTSPWatch * watch, gpointer user_data)
2527 {
2528   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2529   GstRTSPClientPrivate *priv = client->priv;
2530
2531   GST_INFO ("client %p: tunnel start (connection %p)", client,
2532       priv->connection);
2533
2534   if (!remember_tunnel (client))
2535     goto tunnel_error;
2536
2537   return GST_RTSP_STS_OK;
2538
2539   /* ERRORS */
2540 tunnel_error:
2541   {
2542     GST_ERROR ("client %p: error starting tunnel", client);
2543     return GST_RTSP_STS_SERVICE_UNAVAILABLE;
2544   }
2545 }
2546
2547 static GstRTSPResult
2548 tunnel_lost (GstRTSPWatch * watch, gpointer user_data)
2549 {
2550   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2551   GstRTSPClientPrivate *priv = client->priv;
2552
2553   GST_WARNING ("client %p: tunnel lost (connection %p)", client,
2554       priv->connection);
2555
2556   /* ignore error, it'll only be a problem when the client does a POST again */
2557   remember_tunnel (client);
2558
2559   return GST_RTSP_OK;
2560 }
2561
2562 static GstRTSPResult
2563 tunnel_complete (GstRTSPWatch * watch, gpointer user_data)
2564 {
2565   const gchar *tunnelid;
2566   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
2567   GstRTSPClientPrivate *priv = client->priv;
2568   GstRTSPClient *oclient;
2569   GstRTSPClientPrivate *opriv;
2570
2571   GST_INFO ("client %p: tunnel complete", client);
2572
2573   /* find previous tunnel */
2574   tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection);
2575   if (tunnelid == NULL)
2576     goto no_tunnelid;
2577
2578   g_mutex_lock (&tunnels_lock);
2579   if (!(oclient = g_hash_table_lookup (tunnels, tunnelid)))
2580     goto no_tunnel;
2581
2582   /* remove the old client from the table. ref before because removing it will
2583    * remove the ref to it. */
2584   g_object_ref (oclient);
2585   g_hash_table_remove (tunnels, tunnelid);
2586
2587   opriv = oclient->priv;
2588
2589   if (opriv->watch == NULL)
2590     goto tunnel_closed;
2591   g_mutex_unlock (&tunnels_lock);
2592
2593   GST_INFO ("client %p: found tunnel %p (old %p, new %p)", client, oclient,
2594       opriv->connection, priv->connection);
2595
2596   /* merge the tunnels into the first client */
2597   gst_rtsp_connection_do_tunnel (opriv->connection, priv->connection);
2598   gst_rtsp_watch_reset (opriv->watch);
2599   g_object_unref (oclient);
2600
2601   return GST_RTSP_OK;
2602
2603   /* ERRORS */
2604 no_tunnelid:
2605   {
2606     GST_ERROR ("client %p: no tunnelid provided", client);
2607     return GST_RTSP_ERROR;
2608   }
2609 no_tunnel:
2610   {
2611     g_mutex_unlock (&tunnels_lock);
2612     GST_ERROR ("client %p: tunnel session %s not found", client, tunnelid);
2613     return GST_RTSP_ERROR;
2614   }
2615 tunnel_closed:
2616   {
2617     g_mutex_unlock (&tunnels_lock);
2618     GST_ERROR ("client %p: tunnel session %s was closed", client, tunnelid);
2619     g_object_unref (oclient);
2620     return GST_RTSP_ERROR;
2621   }
2622 }
2623
2624 static GstRTSPWatchFuncs watch_funcs = {
2625   message_received,
2626   message_sent,
2627   closed,
2628   error,
2629   tunnel_start,
2630   tunnel_complete,
2631   error_full,
2632   tunnel_lost
2633 };
2634
2635 static void
2636 client_watch_notify (GstRTSPClient * client)
2637 {
2638   GstRTSPClientPrivate *priv = client->priv;
2639
2640   GST_INFO ("client %p: watch destroyed", client);
2641   priv->watch = NULL;
2642   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_CLOSED], 0, NULL);
2643   g_object_unref (client);
2644 }
2645
2646 /**
2647  * gst_rtsp_client_attach:
2648  * @client: a #GstRTSPClient
2649  * @context: (allow-none): a #GMainContext
2650  *
2651  * Attaches @client to @context. When the mainloop for @context is run, the
2652  * client will be dispatched. When @context is NULL, the default context will be
2653  * used).
2654  *
2655  * This function should be called when the client properties and urls are fully
2656  * configured and the client is ready to start.
2657  *
2658  * Returns: the ID (greater than 0) for the source within the GMainContext.
2659  */
2660 guint
2661 gst_rtsp_client_attach (GstRTSPClient * client, GMainContext * context)
2662 {
2663   GstRTSPClientPrivate *priv;
2664   guint res;
2665
2666   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), 0);
2667   priv = client->priv;
2668   g_return_val_if_fail (priv->connection != NULL, 0);
2669   g_return_val_if_fail (priv->watch == NULL, 0);
2670
2671   /* create watch for the connection and attach */
2672   priv->watch = gst_rtsp_watch_new (priv->connection, &watch_funcs,
2673       g_object_ref (client), (GDestroyNotify) client_watch_notify);
2674   gst_rtsp_client_set_send_func (client, do_send_message, priv->watch,
2675       (GDestroyNotify) gst_rtsp_watch_unref);
2676
2677   /* FIXME make this configurable. We don't want to do this yet because it will
2678    * be superceeded by a cache object later */
2679   gst_rtsp_watch_set_send_backlog (priv->watch, 0, 100);
2680
2681   GST_INFO ("attaching to context %p", context);
2682   res = gst_rtsp_watch_attach (priv->watch, context);
2683
2684   return res;
2685 }
2686
2687 /**
2688  * gst_rtsp_client_session_filter:
2689  * @client: a #GstRTSPClient
2690  * @func: (scope call): a callback
2691  * @user_data: user data passed to @func
2692  *
2693  * Call @func for each session managed by @client. The result value of @func
2694  * determines what happens to the session. @func will be called with @client
2695  * locked so no further actions on @client can be performed from @func.
2696  *
2697  * If @func returns #GST_RTSP_FILTER_REMOVE, the session will be removed from
2698  * @client.
2699  *
2700  * If @func returns #GST_RTSP_FILTER_KEEP, the session will remain in @client.
2701  *
2702  * If @func returns #GST_RTSP_FILTER_REF, the session will remain in @client but
2703  * will also be added with an additional ref to the result #GList of this
2704  * function..
2705  *
2706  * Returns: (element-type GstRTSPSession) (transfer full): a #GList with all
2707  * sessions for which @func returned #GST_RTSP_FILTER_REF. After usage, each
2708  * element in the #GList should be unreffed before the list is freed.
2709  */
2710 GList *
2711 gst_rtsp_client_session_filter (GstRTSPClient * client,
2712     GstRTSPClientSessionFilterFunc func, gpointer user_data)
2713 {
2714   GstRTSPClientPrivate *priv;
2715   GList *result, *walk, *next;
2716
2717   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2718   g_return_val_if_fail (func != NULL, NULL);
2719
2720   priv = client->priv;
2721
2722   result = NULL;
2723
2724   g_mutex_lock (&priv->lock);
2725   for (walk = priv->sessions; walk; walk = next) {
2726     GstRTSPSession *sess = walk->data;
2727
2728     next = g_list_next (walk);
2729
2730     switch (func (client, sess, user_data)) {
2731       case GST_RTSP_FILTER_REMOVE:
2732         /* stop watching the session and pretent it went away */
2733         client_cleanup_session (client, sess);
2734         break;
2735       case GST_RTSP_FILTER_REF:
2736         result = g_list_prepend (result, g_object_ref (sess));
2737         break;
2738       case GST_RTSP_FILTER_KEEP:
2739       default:
2740         break;
2741     }
2742   }
2743   g_mutex_unlock (&priv->lock);
2744
2745   return result;
2746 }