rtsp-client: mikey memory leaks
[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 <gst/sdp/gstmikey.h>
46
47 #include "rtsp-client.h"
48 #include "rtsp-sdp.h"
49 #include "rtsp-params.h"
50
51 #define GST_RTSP_CLIENT_GET_PRIVATE(obj)  \
52    (G_TYPE_INSTANCE_GET_PRIVATE ((obj), GST_TYPE_RTSP_CLIENT, GstRTSPClientPrivate))
53
54 /* locking order:
55  * send_lock, lock, tunnels_lock
56  */
57
58 struct _GstRTSPClientPrivate
59 {
60   GMutex lock;                  /* protects everything else */
61   GMutex send_lock;
62   GMutex watch_lock;
63   GstRTSPConnection *connection;
64   GstRTSPWatch *watch;
65   GMainContext *watch_context;
66   guint close_seq;
67   gchar *server_ip;
68   gboolean is_ipv6;
69
70   GstRTSPClientSendFunc send_func;      /* protected by send_lock */
71   gpointer send_data;           /* protected by send_lock */
72   GDestroyNotify send_notify;   /* protected by send_lock */
73
74   GstRTSPSessionPool *session_pool;
75   gulong session_removed_id;
76   GstRTSPMountPoints *mount_points;
77   GstRTSPAuth *auth;
78   GstRTSPThreadPool *thread_pool;
79
80   /* used to cache the media in the last requested DESCRIBE so that
81    * we can pick it up in the next SETUP immediately */
82   gchar *path;
83   GstRTSPMedia *media;
84
85   GHashTable *transports;
86   GList *sessions;
87   guint sessions_cookie;
88
89   gboolean drop_backlog;
90 };
91
92 static GMutex tunnels_lock;
93 static GHashTable *tunnels;     /* protected by tunnels_lock */
94
95 /* FIXME make this configurable. We don't want to do this yet because it will
96  * be superceeded by a cache object later */
97 #define WATCH_BACKLOG_SIZE              100
98
99 #define DEFAULT_SESSION_POOL            NULL
100 #define DEFAULT_MOUNT_POINTS            NULL
101 #define DEFAULT_DROP_BACKLOG            TRUE
102
103 enum
104 {
105   PROP_0,
106   PROP_SESSION_POOL,
107   PROP_MOUNT_POINTS,
108   PROP_DROP_BACKLOG,
109   PROP_LAST
110 };
111
112 enum
113 {
114   SIGNAL_CLOSED,
115   SIGNAL_NEW_SESSION,
116   SIGNAL_OPTIONS_REQUEST,
117   SIGNAL_DESCRIBE_REQUEST,
118   SIGNAL_SETUP_REQUEST,
119   SIGNAL_PLAY_REQUEST,
120   SIGNAL_PAUSE_REQUEST,
121   SIGNAL_TEARDOWN_REQUEST,
122   SIGNAL_SET_PARAMETER_REQUEST,
123   SIGNAL_GET_PARAMETER_REQUEST,
124   SIGNAL_HANDLE_RESPONSE,
125   SIGNAL_SEND_MESSAGE,
126   SIGNAL_LAST
127 };
128
129 GST_DEBUG_CATEGORY_STATIC (rtsp_client_debug);
130 #define GST_CAT_DEFAULT rtsp_client_debug
131
132 static guint gst_rtsp_client_signals[SIGNAL_LAST] = { 0 };
133
134 static void gst_rtsp_client_get_property (GObject * object, guint propid,
135     GValue * value, GParamSpec * pspec);
136 static void gst_rtsp_client_set_property (GObject * object, guint propid,
137     const GValue * value, GParamSpec * pspec);
138 static void gst_rtsp_client_finalize (GObject * obj);
139
140 static GstSDPMessage *create_sdp (GstRTSPClient * client, GstRTSPMedia * media);
141 static gboolean default_configure_client_media (GstRTSPClient * client,
142     GstRTSPMedia * media, GstRTSPStream * stream, GstRTSPContext * ctx);
143 static gboolean default_configure_client_transport (GstRTSPClient * client,
144     GstRTSPContext * ctx, GstRTSPTransport * ct);
145 static GstRTSPResult default_params_set (GstRTSPClient * client,
146     GstRTSPContext * ctx);
147 static GstRTSPResult default_params_get (GstRTSPClient * client,
148     GstRTSPContext * ctx);
149 static gchar *default_make_path_from_uri (GstRTSPClient * client,
150     const GstRTSPUrl * uri);
151 static void client_session_removed (GstRTSPSessionPool * pool,
152     GstRTSPSession * session, GstRTSPClient * client);
153
154 G_DEFINE_TYPE (GstRTSPClient, gst_rtsp_client, G_TYPE_OBJECT);
155
156 static void
157 gst_rtsp_client_class_init (GstRTSPClientClass * klass)
158 {
159   GObjectClass *gobject_class;
160
161   g_type_class_add_private (klass, sizeof (GstRTSPClientPrivate));
162
163   gobject_class = G_OBJECT_CLASS (klass);
164
165   gobject_class->get_property = gst_rtsp_client_get_property;
166   gobject_class->set_property = gst_rtsp_client_set_property;
167   gobject_class->finalize = gst_rtsp_client_finalize;
168
169   klass->create_sdp = create_sdp;
170   klass->configure_client_media = default_configure_client_media;
171   klass->configure_client_transport = default_configure_client_transport;
172   klass->params_set = default_params_set;
173   klass->params_get = default_params_get;
174   klass->make_path_from_uri = default_make_path_from_uri;
175
176   g_object_class_install_property (gobject_class, PROP_SESSION_POOL,
177       g_param_spec_object ("session-pool", "Session Pool",
178           "The session pool to use for client session",
179           GST_TYPE_RTSP_SESSION_POOL,
180           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
181
182   g_object_class_install_property (gobject_class, PROP_MOUNT_POINTS,
183       g_param_spec_object ("mount-points", "Mount Points",
184           "The mount points to use for client session",
185           GST_TYPE_RTSP_MOUNT_POINTS,
186           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
187
188   g_object_class_install_property (gobject_class, PROP_DROP_BACKLOG,
189       g_param_spec_boolean ("drop-backlog", "Drop Backlog",
190           "Drop data when the backlog queue is full",
191           DEFAULT_DROP_BACKLOG, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
192
193   gst_rtsp_client_signals[SIGNAL_CLOSED] =
194       g_signal_new ("closed", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
195       G_STRUCT_OFFSET (GstRTSPClientClass, closed), NULL, NULL,
196       g_cclosure_marshal_generic, G_TYPE_NONE, 0, G_TYPE_NONE);
197
198   gst_rtsp_client_signals[SIGNAL_NEW_SESSION] =
199       g_signal_new ("new-session", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
200       G_STRUCT_OFFSET (GstRTSPClientClass, new_session), NULL, NULL,
201       g_cclosure_marshal_generic, G_TYPE_NONE, 1, GST_TYPE_RTSP_SESSION);
202
203   gst_rtsp_client_signals[SIGNAL_OPTIONS_REQUEST] =
204       g_signal_new ("options-request", G_TYPE_FROM_CLASS (klass),
205       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, options_request),
206       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
207       GST_TYPE_RTSP_CONTEXT);
208
209   gst_rtsp_client_signals[SIGNAL_DESCRIBE_REQUEST] =
210       g_signal_new ("describe-request", G_TYPE_FROM_CLASS (klass),
211       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, describe_request),
212       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
213       GST_TYPE_RTSP_CONTEXT);
214
215   gst_rtsp_client_signals[SIGNAL_SETUP_REQUEST] =
216       g_signal_new ("setup-request", G_TYPE_FROM_CLASS (klass),
217       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, setup_request),
218       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
219       GST_TYPE_RTSP_CONTEXT);
220
221   gst_rtsp_client_signals[SIGNAL_PLAY_REQUEST] =
222       g_signal_new ("play-request", G_TYPE_FROM_CLASS (klass),
223       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, play_request),
224       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
225       GST_TYPE_RTSP_CONTEXT);
226
227   gst_rtsp_client_signals[SIGNAL_PAUSE_REQUEST] =
228       g_signal_new ("pause-request", G_TYPE_FROM_CLASS (klass),
229       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, pause_request),
230       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
231       GST_TYPE_RTSP_CONTEXT);
232
233   gst_rtsp_client_signals[SIGNAL_TEARDOWN_REQUEST] =
234       g_signal_new ("teardown-request", G_TYPE_FROM_CLASS (klass),
235       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass, teardown_request),
236       NULL, NULL, g_cclosure_marshal_generic, G_TYPE_NONE, 1,
237       GST_TYPE_RTSP_CONTEXT);
238
239   gst_rtsp_client_signals[SIGNAL_SET_PARAMETER_REQUEST] =
240       g_signal_new ("set-parameter-request", G_TYPE_FROM_CLASS (klass),
241       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass,
242           set_parameter_request), NULL, NULL, g_cclosure_marshal_generic,
243       G_TYPE_NONE, 1, GST_TYPE_RTSP_CONTEXT);
244
245   gst_rtsp_client_signals[SIGNAL_GET_PARAMETER_REQUEST] =
246       g_signal_new ("get-parameter-request", G_TYPE_FROM_CLASS (klass),
247       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass,
248           get_parameter_request), NULL, NULL, g_cclosure_marshal_generic,
249       G_TYPE_NONE, 1, GST_TYPE_RTSP_CONTEXT);
250
251   gst_rtsp_client_signals[SIGNAL_HANDLE_RESPONSE] =
252       g_signal_new ("handle-response", G_TYPE_FROM_CLASS (klass),
253       G_SIGNAL_RUN_LAST, G_STRUCT_OFFSET (GstRTSPClientClass,
254           handle_response), NULL, NULL, g_cclosure_marshal_generic,
255       G_TYPE_NONE, 1, GST_TYPE_RTSP_CONTEXT);
256
257   /**
258    * GstRTSPClient::send-message:
259    * @client: The RTSP client
260    * @session: (type GstRtspServer.RTSPSession): The session
261    * @message: (type GstRtsp.RTSPMessage): The message
262    */
263   gst_rtsp_client_signals[SIGNAL_SEND_MESSAGE] =
264       g_signal_new ("send-message", G_TYPE_FROM_CLASS (klass),
265       G_SIGNAL_RUN_LAST, 0, NULL, NULL, g_cclosure_marshal_generic,
266       G_TYPE_NONE, 2, GST_TYPE_RTSP_CONTEXT, G_TYPE_POINTER);
267
268   tunnels =
269       g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_object_unref);
270   g_mutex_init (&tunnels_lock);
271
272   GST_DEBUG_CATEGORY_INIT (rtsp_client_debug, "rtspclient", 0, "GstRTSPClient");
273 }
274
275 static void
276 gst_rtsp_client_init (GstRTSPClient * client)
277 {
278   GstRTSPClientPrivate *priv = GST_RTSP_CLIENT_GET_PRIVATE (client);
279
280   client->priv = priv;
281
282   g_mutex_init (&priv->lock);
283   g_mutex_init (&priv->send_lock);
284   g_mutex_init (&priv->watch_lock);
285   priv->close_seq = 0;
286   priv->drop_backlog = DEFAULT_DROP_BACKLOG;
287   priv->transports = g_hash_table_new (g_direct_hash, g_direct_equal);
288 }
289
290 static GstRTSPFilterResult
291 filter_session_media (GstRTSPSession * sess, GstRTSPSessionMedia * sessmedia,
292     gpointer user_data)
293 {
294   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_NULL);
295
296   return GST_RTSP_FILTER_REMOVE;
297 }
298
299 static void
300 client_watch_session (GstRTSPClient * client, GstRTSPSession * session)
301 {
302   GstRTSPClientPrivate *priv = client->priv;
303
304   g_mutex_lock (&priv->lock);
305   /* check if we already know about this session */
306   if (g_list_find (priv->sessions, session) == NULL) {
307     GST_INFO ("watching session %p", session);
308
309     priv->sessions = g_list_prepend (priv->sessions, g_object_ref (session));
310     priv->sessions_cookie++;
311
312     /* connect removed session handler, it will be disconnected when the last
313      * session gets removed  */
314     if (priv->session_removed_id == 0)
315       priv->session_removed_id = g_signal_connect_data (priv->session_pool,
316           "session-removed", G_CALLBACK (client_session_removed),
317           g_object_ref (client), (GClosureNotify) g_object_unref, 0);
318   }
319   g_mutex_unlock (&priv->lock);
320
321   return;
322 }
323
324 /* should be called with lock */
325 static void
326 client_unwatch_session (GstRTSPClient * client, GstRTSPSession * session,
327     GList * link)
328 {
329   GstRTSPClientPrivate *priv = client->priv;
330
331   GST_INFO ("client %p: unwatch session %p", client, session);
332
333   if (link == NULL) {
334     link = g_list_find (priv->sessions, session);
335     if (link == NULL)
336       return;
337   }
338
339   priv->sessions = g_list_delete_link (priv->sessions, link);
340   priv->sessions_cookie++;
341
342   /* if this was the last session, disconnect the handler.
343    * This will also drop the extra client ref */
344   if (!priv->sessions) {
345     g_signal_handler_disconnect (priv->session_pool, priv->session_removed_id);
346     priv->session_removed_id = 0;
347   }
348
349   /* remove the session */
350   g_object_unref (session);
351 }
352
353 static GstRTSPFilterResult
354 cleanup_session (GstRTSPClient * client, GstRTSPSession * sess,
355     gpointer user_data)
356 {
357   /* unlink all media managed in this session. This needs to happen
358    * without the client lock, so we really want to do it here. */
359   gst_rtsp_session_filter (sess, filter_session_media, client);
360
361   return GST_RTSP_FILTER_REMOVE;
362 }
363
364 /* A client is finalized when the connection is broken */
365 static void
366 gst_rtsp_client_finalize (GObject * obj)
367 {
368   GstRTSPClient *client = GST_RTSP_CLIENT (obj);
369   GstRTSPClientPrivate *priv = client->priv;
370
371   GST_INFO ("finalize client %p", client);
372
373   if (priv->watch)
374     gst_rtsp_watch_set_flushing (priv->watch, TRUE);
375   gst_rtsp_client_set_send_func (client, NULL, NULL, NULL);
376
377   if (priv->watch)
378     g_source_destroy ((GSource *) priv->watch);
379
380   if (priv->watch_context)
381     g_main_context_unref (priv->watch_context);
382
383   /* all sessions should have been removed by now. We keep a ref to
384    * the client object for the session removed handler. The ref is
385    * dropped when the last session is removed from the list. */
386   g_assert (priv->sessions == NULL);
387   g_assert (priv->session_removed_id == 0);
388
389   g_hash_table_unref (priv->transports);
390
391   if (priv->connection)
392     gst_rtsp_connection_free (priv->connection);
393   if (priv->session_pool) {
394     g_object_unref (priv->session_pool);
395   }
396   if (priv->mount_points)
397     g_object_unref (priv->mount_points);
398   if (priv->auth)
399     g_object_unref (priv->auth);
400   if (priv->thread_pool)
401     g_object_unref (priv->thread_pool);
402
403   if (priv->path)
404     g_free (priv->path);
405   if (priv->media) {
406     gst_rtsp_media_unprepare (priv->media);
407     g_object_unref (priv->media);
408   }
409
410   g_free (priv->server_ip);
411   g_mutex_clear (&priv->lock);
412   g_mutex_clear (&priv->send_lock);
413   g_mutex_clear (&priv->watch_lock);
414
415   G_OBJECT_CLASS (gst_rtsp_client_parent_class)->finalize (obj);
416 }
417
418 static void
419 gst_rtsp_client_get_property (GObject * object, guint propid,
420     GValue * value, GParamSpec * pspec)
421 {
422   GstRTSPClient *client = GST_RTSP_CLIENT (object);
423   GstRTSPClientPrivate *priv = client->priv;
424
425   switch (propid) {
426     case PROP_SESSION_POOL:
427       g_value_take_object (value, gst_rtsp_client_get_session_pool (client));
428       break;
429     case PROP_MOUNT_POINTS:
430       g_value_take_object (value, gst_rtsp_client_get_mount_points (client));
431       break;
432     case PROP_DROP_BACKLOG:
433       g_value_set_boolean (value, priv->drop_backlog);
434       break;
435     default:
436       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, propid, pspec);
437   }
438 }
439
440 static void
441 gst_rtsp_client_set_property (GObject * object, guint propid,
442     const GValue * value, GParamSpec * pspec)
443 {
444   GstRTSPClient *client = GST_RTSP_CLIENT (object);
445   GstRTSPClientPrivate *priv = client->priv;
446
447   switch (propid) {
448     case PROP_SESSION_POOL:
449       gst_rtsp_client_set_session_pool (client, g_value_get_object (value));
450       break;
451     case PROP_MOUNT_POINTS:
452       gst_rtsp_client_set_mount_points (client, g_value_get_object (value));
453       break;
454     case PROP_DROP_BACKLOG:
455       g_mutex_lock (&priv->lock);
456       priv->drop_backlog = g_value_get_boolean (value);
457       g_mutex_unlock (&priv->lock);
458       break;
459     default:
460       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, propid, pspec);
461   }
462 }
463
464 /**
465  * gst_rtsp_client_new:
466  *
467  * Create a new #GstRTSPClient instance.
468  *
469  * Returns: (transfer full): a new #GstRTSPClient
470  */
471 GstRTSPClient *
472 gst_rtsp_client_new (void)
473 {
474   GstRTSPClient *result;
475
476   result = g_object_new (GST_TYPE_RTSP_CLIENT, NULL);
477
478   return result;
479 }
480
481 static void
482 send_message (GstRTSPClient * client, GstRTSPContext * ctx,
483     GstRTSPMessage * message, gboolean close)
484 {
485   GstRTSPClientPrivate *priv = client->priv;
486
487   gst_rtsp_message_add_header (message, GST_RTSP_HDR_SERVER,
488       "GStreamer RTSP server");
489
490   /* remove any previous header */
491   gst_rtsp_message_remove_header (message, GST_RTSP_HDR_SESSION, -1);
492
493   /* add the new session header for new session ids */
494   if (ctx->session) {
495     gst_rtsp_message_take_header (message, GST_RTSP_HDR_SESSION,
496         gst_rtsp_session_get_header (ctx->session));
497   }
498
499   if (gst_debug_category_get_threshold (rtsp_client_debug) >= GST_LEVEL_LOG) {
500     gst_rtsp_message_dump (message);
501   }
502
503   if (close)
504     gst_rtsp_message_add_header (message, GST_RTSP_HDR_CONNECTION, "close");
505
506   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_SEND_MESSAGE],
507       0, ctx, message);
508
509   g_mutex_lock (&priv->send_lock);
510   if (priv->send_func)
511     priv->send_func (client, message, close, priv->send_data);
512   g_mutex_unlock (&priv->send_lock);
513
514   gst_rtsp_message_unset (message);
515 }
516
517 static void
518 send_generic_response (GstRTSPClient * client, GstRTSPStatusCode code,
519     GstRTSPContext * ctx)
520 {
521   gst_rtsp_message_init_response (ctx->response, code,
522       gst_rtsp_status_as_text (code), ctx->request);
523
524   ctx->session = NULL;
525
526   send_message (client, ctx, ctx->response, FALSE);
527 }
528
529 static void
530 send_option_not_supported_response (GstRTSPClient * client,
531     GstRTSPContext * ctx, const gchar * unsupported_options)
532 {
533   GstRTSPStatusCode code = GST_RTSP_STS_OPTION_NOT_SUPPORTED;
534
535   gst_rtsp_message_init_response (ctx->response, code,
536       gst_rtsp_status_as_text (code), ctx->request);
537
538   if (unsupported_options != NULL) {
539     gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_UNSUPPORTED,
540         unsupported_options);
541   }
542
543   ctx->session = NULL;
544
545   send_message (client, ctx, ctx->response, FALSE);
546 }
547
548 static gboolean
549 paths_are_equal (const gchar * path1, const gchar * path2, gint len2)
550 {
551   if (path1 == NULL || path2 == NULL)
552     return FALSE;
553
554   if (strlen (path1) != len2)
555     return FALSE;
556
557   if (strncmp (path1, path2, len2))
558     return FALSE;
559
560   return TRUE;
561 }
562
563 /* this function is called to initially find the media for the DESCRIBE request
564  * but is cached for when the same client (without breaking the connection) is
565  * doing a setup for the exact same url. */
566 static GstRTSPMedia *
567 find_media (GstRTSPClient * client, GstRTSPContext * ctx, gchar * path,
568     gint * matched)
569 {
570   GstRTSPClientPrivate *priv = client->priv;
571   GstRTSPMediaFactory *factory;
572   GstRTSPMedia *media;
573   gint path_len;
574
575   /* find the longest matching factory for the uri first */
576   if (!(factory = gst_rtsp_mount_points_match (priv->mount_points,
577               path, matched)))
578     goto no_factory;
579
580   ctx->factory = factory;
581
582   if (!gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_MEDIA_FACTORY_ACCESS))
583     goto no_factory_access;
584
585   if (!gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_MEDIA_FACTORY_CONSTRUCT))
586     goto not_authorized;
587
588   if (matched)
589     path_len = *matched;
590   else
591     path_len = strlen (path);
592
593   if (!paths_are_equal (priv->path, path, path_len)) {
594     GstRTSPThread *thread;
595
596     /* remove any previously cached values before we try to construct a new
597      * media for uri */
598     if (priv->path)
599       g_free (priv->path);
600     priv->path = NULL;
601     if (priv->media) {
602       gst_rtsp_media_unprepare (priv->media);
603       g_object_unref (priv->media);
604     }
605     priv->media = NULL;
606
607     /* prepare the media and add it to the pipeline */
608     if (!(media = gst_rtsp_media_factory_construct (factory, ctx->uri)))
609       goto no_media;
610
611     ctx->media = media;
612
613     thread = gst_rtsp_thread_pool_get_thread (priv->thread_pool,
614         GST_RTSP_THREAD_TYPE_MEDIA, ctx);
615     if (thread == NULL)
616       goto no_thread;
617
618     /* prepare the media */
619     if (!(gst_rtsp_media_prepare (media, thread)))
620       goto no_prepare;
621
622     /* now keep track of the uri and the media */
623     priv->path = g_strndup (path, path_len);
624     priv->media = media;
625   } else {
626     /* we have seen this path before, used cached media */
627     media = priv->media;
628     ctx->media = media;
629     GST_INFO ("reusing cached media %p for path %s", media, priv->path);
630   }
631
632   g_object_unref (factory);
633   ctx->factory = NULL;
634
635   if (media)
636     g_object_ref (media);
637
638   return media;
639
640   /* ERRORS */
641 no_factory:
642   {
643     GST_ERROR ("client %p: no factory for path %s", client, path);
644     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
645     return NULL;
646   }
647 no_factory_access:
648   {
649     GST_ERROR ("client %p: not authorized to see factory path %s", client,
650         path);
651     /* error reply is already sent */
652     return NULL;
653   }
654 not_authorized:
655   {
656     GST_ERROR ("client %p: not authorized for factory path %s", client, path);
657     /* error reply is already sent */
658     return NULL;
659   }
660 no_media:
661   {
662     GST_ERROR ("client %p: can't create media", client);
663     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
664     g_object_unref (factory);
665     ctx->factory = NULL;
666     return NULL;
667   }
668 no_thread:
669   {
670     GST_ERROR ("client %p: can't create thread", client);
671     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
672     g_object_unref (media);
673     ctx->media = NULL;
674     g_object_unref (factory);
675     ctx->factory = NULL;
676     return NULL;
677   }
678 no_prepare:
679   {
680     GST_ERROR ("client %p: can't prepare media", client);
681     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
682     g_object_unref (media);
683     ctx->media = NULL;
684     g_object_unref (factory);
685     ctx->factory = NULL;
686     return NULL;
687   }
688 }
689
690 static gboolean
691 do_send_data (GstBuffer * buffer, guint8 channel, GstRTSPClient * client)
692 {
693   GstRTSPClientPrivate *priv = client->priv;
694   GstRTSPMessage message = { 0 };
695   GstRTSPResult res = GST_RTSP_OK;
696   GstMapInfo map_info;
697   guint8 *data;
698   guint usize;
699
700   gst_rtsp_message_init_data (&message, channel);
701
702   /* FIXME, need some sort of iovec RTSPMessage here */
703   if (!gst_buffer_map (buffer, &map_info, GST_MAP_READ))
704     return FALSE;
705
706   gst_rtsp_message_take_body (&message, map_info.data, map_info.size);
707
708   g_mutex_lock (&priv->send_lock);
709   if (priv->send_func)
710     res = priv->send_func (client, &message, FALSE, priv->send_data);
711   g_mutex_unlock (&priv->send_lock);
712
713   gst_rtsp_message_steal_body (&message, &data, &usize);
714   gst_buffer_unmap (buffer, &map_info);
715
716   gst_rtsp_message_unset (&message);
717
718   return res == GST_RTSP_OK;
719 }
720
721 /**
722  * gst_rtsp_client_close:
723  * @client: a #GstRTSPClient
724  *
725  * Close the connection of @client and remove all media it was managing.
726  *
727  * Since: 1.4
728  */
729 void
730 gst_rtsp_client_close (GstRTSPClient * client)
731 {
732   GstRTSPClientPrivate *priv = client->priv;
733   const gchar *tunnelid;
734
735   GST_DEBUG ("client %p: closing connection", client);
736
737   if (priv->connection) {
738     if ((tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection))) {
739       g_mutex_lock (&tunnels_lock);
740       /* remove from tunnelids */
741       g_hash_table_remove (tunnels, tunnelid);
742       g_mutex_unlock (&tunnels_lock);
743     }
744     gst_rtsp_connection_close (priv->connection);
745   }
746
747   /* connection is now closed, destroy the watch which will also cause the
748    * closed signal to be emitted */
749   if (priv->watch) {
750     GST_DEBUG ("client %p: destroying watch", client);
751     g_source_destroy ((GSource *) priv->watch);
752     priv->watch = NULL;
753     gst_rtsp_client_set_send_func (client, NULL, NULL, NULL);
754     g_main_context_unref (priv->watch_context);
755     priv->watch_context = NULL;
756   }
757 }
758
759 static gchar *
760 default_make_path_from_uri (GstRTSPClient * client, const GstRTSPUrl * uri)
761 {
762   gchar *path;
763
764   if (uri->query)
765     path = g_strconcat (uri->abspath, "?", uri->query, NULL);
766   else
767     path = g_strdup (uri->abspath);
768
769   return path;
770 }
771
772 static gboolean
773 handle_teardown_request (GstRTSPClient * client, GstRTSPContext * ctx)
774 {
775   GstRTSPClientPrivate *priv = client->priv;
776   GstRTSPClientClass *klass;
777   GstRTSPSession *session;
778   GstRTSPSessionMedia *sessmedia;
779   GstRTSPStatusCode code;
780   gchar *path;
781   gint matched;
782   gboolean keep_session;
783
784   if (!ctx->session)
785     goto no_session;
786
787   session = ctx->session;
788
789   if (!ctx->uri)
790     goto no_uri;
791
792   klass = GST_RTSP_CLIENT_GET_CLASS (client);
793   path = klass->make_path_from_uri (client, ctx->uri);
794
795   /* get a handle to the configuration of the media in the session */
796   sessmedia = gst_rtsp_session_get_media (session, path, &matched);
797   if (!sessmedia)
798     goto not_found;
799
800   /* only aggregate control for now.. */
801   if (path[matched] != '\0')
802     goto no_aggregate;
803
804   g_free (path);
805
806   ctx->sessmedia = sessmedia;
807
808   /* we emit the signal before closing the connection */
809   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_TEARDOWN_REQUEST],
810       0, ctx);
811
812   /* make sure we unblock the backlog and don't accept new messages
813    * on the watch */
814   if (priv->watch != NULL)
815     gst_rtsp_watch_set_flushing (priv->watch, TRUE);
816
817   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_NULL);
818
819   /* allow messages again so that we can send the reply */
820   if (priv->watch != NULL)
821     gst_rtsp_watch_set_flushing (priv->watch, FALSE);
822
823   /* unmanage the media in the session, returns false if all media session
824    * are torn down. */
825   keep_session = gst_rtsp_session_release_media (session, sessmedia);
826
827   /* construct the response now */
828   code = GST_RTSP_STS_OK;
829   gst_rtsp_message_init_response (ctx->response, code,
830       gst_rtsp_status_as_text (code), ctx->request);
831
832   send_message (client, ctx, ctx->response, TRUE);
833
834   if (!keep_session) {
835     /* remove the session */
836     gst_rtsp_session_pool_remove (priv->session_pool, session);
837   }
838
839   return TRUE;
840
841   /* ERRORS */
842 no_session:
843   {
844     GST_ERROR ("client %p: no session", client);
845     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
846     return FALSE;
847   }
848 no_uri:
849   {
850     GST_ERROR ("client %p: no uri supplied", client);
851     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
852     return FALSE;
853   }
854 not_found:
855   {
856     GST_ERROR ("client %p: no media for uri", client);
857     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
858     g_free (path);
859     return FALSE;
860   }
861 no_aggregate:
862   {
863     GST_ERROR ("client %p: no aggregate path %s", client, path);
864     send_generic_response (client,
865         GST_RTSP_STS_ONLY_AGGREGATE_OPERATION_ALLOWED, ctx);
866     g_free (path);
867     return FALSE;
868   }
869 }
870
871 static GstRTSPResult
872 default_params_set (GstRTSPClient * client, GstRTSPContext * ctx)
873 {
874   GstRTSPResult res;
875
876   res = gst_rtsp_params_set (client, ctx);
877
878   return res;
879 }
880
881 static GstRTSPResult
882 default_params_get (GstRTSPClient * client, GstRTSPContext * ctx)
883 {
884   GstRTSPResult res;
885
886   res = gst_rtsp_params_get (client, ctx);
887
888   return res;
889 }
890
891 static gboolean
892 handle_get_param_request (GstRTSPClient * client, GstRTSPContext * ctx)
893 {
894   GstRTSPResult res;
895   guint8 *data;
896   guint size;
897
898   res = gst_rtsp_message_get_body (ctx->request, &data, &size);
899   if (res != GST_RTSP_OK)
900     goto bad_request;
901
902   if (size == 0) {
903     /* no body, keep-alive request */
904     send_generic_response (client, GST_RTSP_STS_OK, ctx);
905   } else {
906     /* there is a body, handle the params */
907     res = GST_RTSP_CLIENT_GET_CLASS (client)->params_get (client, ctx);
908     if (res != GST_RTSP_OK)
909       goto bad_request;
910
911     send_message (client, ctx, ctx->response, FALSE);
912   }
913
914   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_GET_PARAMETER_REQUEST],
915       0, ctx);
916
917   return TRUE;
918
919   /* ERRORS */
920 bad_request:
921   {
922     GST_ERROR ("client %p: bad request", client);
923     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
924     return FALSE;
925   }
926 }
927
928 static gboolean
929 handle_set_param_request (GstRTSPClient * client, GstRTSPContext * ctx)
930 {
931   GstRTSPResult res;
932   guint8 *data;
933   guint size;
934
935   res = gst_rtsp_message_get_body (ctx->request, &data, &size);
936   if (res != GST_RTSP_OK)
937     goto bad_request;
938
939   if (size == 0) {
940     /* no body, keep-alive request */
941     send_generic_response (client, GST_RTSP_STS_OK, ctx);
942   } else {
943     /* there is a body, handle the params */
944     res = GST_RTSP_CLIENT_GET_CLASS (client)->params_set (client, ctx);
945     if (res != GST_RTSP_OK)
946       goto bad_request;
947
948     send_message (client, ctx, ctx->response, FALSE);
949   }
950
951   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_SET_PARAMETER_REQUEST],
952       0, ctx);
953
954   return TRUE;
955
956   /* ERRORS */
957 bad_request:
958   {
959     GST_ERROR ("client %p: bad request", client);
960     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
961     return FALSE;
962   }
963 }
964
965 static gboolean
966 handle_pause_request (GstRTSPClient * client, GstRTSPContext * ctx)
967 {
968   GstRTSPSession *session;
969   GstRTSPClientClass *klass;
970   GstRTSPSessionMedia *sessmedia;
971   GstRTSPStatusCode code;
972   GstRTSPState rtspstate;
973   gchar *path;
974   gint matched;
975
976   if (!(session = ctx->session))
977     goto no_session;
978
979   if (!ctx->uri)
980     goto no_uri;
981
982   klass = GST_RTSP_CLIENT_GET_CLASS (client);
983   path = klass->make_path_from_uri (client, ctx->uri);
984
985   /* get a handle to the configuration of the media in the session */
986   sessmedia = gst_rtsp_session_get_media (session, path, &matched);
987   if (!sessmedia)
988     goto not_found;
989
990   if (path[matched] != '\0')
991     goto no_aggregate;
992
993   g_free (path);
994
995   ctx->sessmedia = sessmedia;
996
997   rtspstate = gst_rtsp_session_media_get_rtsp_state (sessmedia);
998   /* the session state must be playing or recording */
999   if (rtspstate != GST_RTSP_STATE_PLAYING &&
1000       rtspstate != GST_RTSP_STATE_RECORDING)
1001     goto invalid_state;
1002
1003   /* then pause sending */
1004   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_PAUSED);
1005
1006   /* construct the response now */
1007   code = GST_RTSP_STS_OK;
1008   gst_rtsp_message_init_response (ctx->response, code,
1009       gst_rtsp_status_as_text (code), ctx->request);
1010
1011   send_message (client, ctx, ctx->response, FALSE);
1012
1013   /* the state is now READY */
1014   gst_rtsp_session_media_set_rtsp_state (sessmedia, GST_RTSP_STATE_READY);
1015
1016   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_PAUSE_REQUEST], 0, ctx);
1017
1018   return TRUE;
1019
1020   /* ERRORS */
1021 no_session:
1022   {
1023     GST_ERROR ("client %p: no seesion", client);
1024     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1025     return FALSE;
1026   }
1027 no_uri:
1028   {
1029     GST_ERROR ("client %p: no uri supplied", client);
1030     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1031     return FALSE;
1032   }
1033 not_found:
1034   {
1035     GST_ERROR ("client %p: no media for uri", client);
1036     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1037     g_free (path);
1038     return FALSE;
1039   }
1040 no_aggregate:
1041   {
1042     GST_ERROR ("client %p: no aggregate path %s", client, path);
1043     send_generic_response (client,
1044         GST_RTSP_STS_ONLY_AGGREGATE_OPERATION_ALLOWED, ctx);
1045     g_free (path);
1046     return FALSE;
1047   }
1048 invalid_state:
1049   {
1050     GST_ERROR ("client %p: not PLAYING or RECORDING", client);
1051     send_generic_response (client, GST_RTSP_STS_METHOD_NOT_VALID_IN_THIS_STATE,
1052         ctx);
1053     return FALSE;
1054   }
1055 }
1056
1057 /* convert @url and @path to a URL used as a content base for the factory
1058  * located at @path */
1059 static gchar *
1060 make_base_url (GstRTSPClient * client, GstRTSPUrl * url, const gchar * path)
1061 {
1062   GstRTSPUrl tmp;
1063   gchar *result;
1064   const gchar *trail;
1065
1066   /* check for trailing '/' and append one */
1067   trail = (path[strlen (path) - 1] != '/' ? "/" : "");
1068
1069   tmp = *url;
1070   tmp.user = NULL;
1071   tmp.passwd = NULL;
1072   tmp.abspath = g_strdup_printf ("%s%s", path, trail);
1073   tmp.query = NULL;
1074   result = gst_rtsp_url_get_request_uri (&tmp);
1075   g_free (tmp.abspath);
1076
1077   return result;
1078 }
1079
1080 static gboolean
1081 handle_play_request (GstRTSPClient * client, GstRTSPContext * ctx)
1082 {
1083   GstRTSPSession *session;
1084   GstRTSPClientClass *klass;
1085   GstRTSPSessionMedia *sessmedia;
1086   GstRTSPMedia *media;
1087   GstRTSPStatusCode code;
1088   GstRTSPUrl *uri;
1089   gchar *str;
1090   GstRTSPTimeRange *range;
1091   GstRTSPResult res;
1092   GstRTSPState rtspstate;
1093   GstRTSPRangeUnit unit = GST_RTSP_RANGE_NPT;
1094   gchar *path, *rtpinfo;
1095   gint matched;
1096
1097   if (!(session = ctx->session))
1098     goto no_session;
1099
1100   if (!(uri = ctx->uri))
1101     goto no_uri;
1102
1103   klass = GST_RTSP_CLIENT_GET_CLASS (client);
1104   path = klass->make_path_from_uri (client, uri);
1105
1106   /* get a handle to the configuration of the media in the session */
1107   sessmedia = gst_rtsp_session_get_media (session, path, &matched);
1108   if (!sessmedia)
1109     goto not_found;
1110
1111   if (path[matched] != '\0')
1112     goto no_aggregate;
1113
1114   g_free (path);
1115
1116   ctx->sessmedia = sessmedia;
1117   ctx->media = media = gst_rtsp_session_media_get_media (sessmedia);
1118
1119   /* the session state must be playing or ready */
1120   rtspstate = gst_rtsp_session_media_get_rtsp_state (sessmedia);
1121   if (rtspstate != GST_RTSP_STATE_PLAYING && rtspstate != GST_RTSP_STATE_READY)
1122     goto invalid_state;
1123
1124   /* in play we first unsuspend, media could be suspended from SDP or PAUSED */
1125   if (!gst_rtsp_media_unsuspend (media))
1126     goto unsuspend_failed;
1127
1128   /* parse the range header if we have one */
1129   res = gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_RANGE, &str, 0);
1130   if (res == GST_RTSP_OK) {
1131     if (gst_rtsp_range_parse (str, &range) == GST_RTSP_OK) {
1132       /* we have a range, seek to the position */
1133       unit = range->unit;
1134       gst_rtsp_media_seek (media, range);
1135       gst_rtsp_range_free (range);
1136     }
1137   }
1138
1139   /* grab RTPInfo from the media now */
1140   rtpinfo = gst_rtsp_session_media_get_rtpinfo (sessmedia);
1141
1142   /* construct the response now */
1143   code = GST_RTSP_STS_OK;
1144   gst_rtsp_message_init_response (ctx->response, code,
1145       gst_rtsp_status_as_text (code), ctx->request);
1146
1147   /* add the RTP-Info header */
1148   if (rtpinfo)
1149     gst_rtsp_message_take_header (ctx->response, GST_RTSP_HDR_RTP_INFO,
1150         rtpinfo);
1151
1152   /* add the range */
1153   str = gst_rtsp_media_get_range_string (media, TRUE, unit);
1154   if (str)
1155     gst_rtsp_message_take_header (ctx->response, GST_RTSP_HDR_RANGE, str);
1156
1157   send_message (client, ctx, ctx->response, FALSE);
1158
1159   /* start playing after sending the response */
1160   gst_rtsp_session_media_set_state (sessmedia, GST_STATE_PLAYING);
1161
1162   gst_rtsp_session_media_set_rtsp_state (sessmedia, GST_RTSP_STATE_PLAYING);
1163
1164   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_PLAY_REQUEST], 0, ctx);
1165
1166   return TRUE;
1167
1168   /* ERRORS */
1169 no_session:
1170   {
1171     GST_ERROR ("client %p: no session", client);
1172     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1173     return FALSE;
1174   }
1175 no_uri:
1176   {
1177     GST_ERROR ("client %p: no uri supplied", client);
1178     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1179     return FALSE;
1180   }
1181 not_found:
1182   {
1183     GST_ERROR ("client %p: media not found", client);
1184     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1185     return FALSE;
1186   }
1187 no_aggregate:
1188   {
1189     GST_ERROR ("client %p: no aggregate path %s", client, path);
1190     send_generic_response (client,
1191         GST_RTSP_STS_ONLY_AGGREGATE_OPERATION_ALLOWED, ctx);
1192     g_free (path);
1193     return FALSE;
1194   }
1195 invalid_state:
1196   {
1197     GST_ERROR ("client %p: not PLAYING or READY", client);
1198     send_generic_response (client, GST_RTSP_STS_METHOD_NOT_VALID_IN_THIS_STATE,
1199         ctx);
1200     return FALSE;
1201   }
1202 unsuspend_failed:
1203   {
1204     GST_ERROR ("client %p: unsuspend failed", client);
1205     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
1206     return FALSE;
1207   }
1208 }
1209
1210 static void
1211 do_keepalive (GstRTSPSession * session)
1212 {
1213   GST_INFO ("keep session %p alive", session);
1214   gst_rtsp_session_touch (session);
1215 }
1216
1217 /* parse @transport and return a valid transport in @tr. only transports
1218  * supported by @stream are returned. Returns FALSE if no valid transport
1219  * was found. */
1220 static gboolean
1221 parse_transport (const char *transport, GstRTSPStream * stream,
1222     GstRTSPTransport * tr)
1223 {
1224   gint i;
1225   gboolean res;
1226   gchar **transports;
1227
1228   res = FALSE;
1229   gst_rtsp_transport_init (tr);
1230
1231   GST_DEBUG ("parsing transports %s", transport);
1232
1233   transports = g_strsplit (transport, ",", 0);
1234
1235   /* loop through the transports, try to parse */
1236   for (i = 0; transports[i]; i++) {
1237     res = gst_rtsp_transport_parse (transports[i], tr);
1238     if (res != GST_RTSP_OK) {
1239       /* no valid transport, search some more */
1240       GST_WARNING ("could not parse transport %s", transports[i]);
1241       goto next;
1242     }
1243
1244     /* we have a transport, see if it's supported */
1245     if (!gst_rtsp_stream_is_transport_supported (stream, tr)) {
1246       GST_WARNING ("unsupported transport %s", transports[i]);
1247       goto next;
1248     }
1249
1250     /* we have a valid transport */
1251     GST_INFO ("found valid transport %s", transports[i]);
1252     res = TRUE;
1253     break;
1254
1255   next:
1256     gst_rtsp_transport_init (tr);
1257   }
1258   g_strfreev (transports);
1259
1260   return res;
1261 }
1262
1263 static gboolean
1264 default_configure_client_media (GstRTSPClient * client, GstRTSPMedia * media,
1265     GstRTSPStream * stream, GstRTSPContext * ctx)
1266 {
1267   GstRTSPMessage *request = ctx->request;
1268   gchar *blocksize_str;
1269
1270   if (gst_rtsp_message_get_header (request, GST_RTSP_HDR_BLOCKSIZE,
1271           &blocksize_str, 0) == GST_RTSP_OK) {
1272     guint64 blocksize;
1273     gchar *end;
1274
1275     blocksize = g_ascii_strtoull (blocksize_str, &end, 10);
1276     if (end == blocksize_str)
1277       goto parse_failed;
1278
1279     /* we don't want to change the mtu when this media
1280      * can be shared because it impacts other clients */
1281     if (gst_rtsp_media_is_shared (media))
1282       goto done;
1283
1284     if (blocksize > G_MAXUINT)
1285       blocksize = G_MAXUINT;
1286
1287     gst_rtsp_stream_set_mtu (stream, blocksize);
1288   }
1289 done:
1290   return TRUE;
1291
1292   /* ERRORS */
1293 parse_failed:
1294   {
1295     GST_ERROR_OBJECT (client, "failed to parse blocksize");
1296     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1297     return FALSE;
1298   }
1299 }
1300
1301 static gboolean
1302 default_configure_client_transport (GstRTSPClient * client,
1303     GstRTSPContext * ctx, GstRTSPTransport * ct)
1304 {
1305   GstRTSPClientPrivate *priv = client->priv;
1306
1307   /* we have a valid transport now, set the destination of the client. */
1308   if (ct->lower_transport == GST_RTSP_LOWER_TRANS_UDP_MCAST) {
1309     gboolean use_client_settings;
1310
1311     use_client_settings =
1312         gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_TRANSPORT_CLIENT_SETTINGS);
1313
1314     if (ct->destination && use_client_settings) {
1315       GstRTSPAddress *addr;
1316
1317       addr = gst_rtsp_stream_reserve_address (ctx->stream, ct->destination,
1318           ct->port.min, ct->port.max - ct->port.min + 1, ct->ttl);
1319
1320       if (addr == NULL)
1321         goto no_address;
1322
1323       gst_rtsp_address_free (addr);
1324     } else {
1325       GstRTSPAddress *addr;
1326       GSocketFamily family;
1327
1328       family = priv->is_ipv6 ? G_SOCKET_FAMILY_IPV6 : G_SOCKET_FAMILY_IPV4;
1329
1330       addr = gst_rtsp_stream_get_multicast_address (ctx->stream, family);
1331       if (addr == NULL)
1332         goto no_address;
1333
1334       g_free (ct->destination);
1335       ct->destination = g_strdup (addr->address);
1336       ct->port.min = addr->port;
1337       ct->port.max = addr->port + addr->n_ports - 1;
1338       ct->ttl = addr->ttl;
1339
1340       gst_rtsp_address_free (addr);
1341     }
1342   } else {
1343     GstRTSPUrl *url;
1344
1345     url = gst_rtsp_connection_get_url (priv->connection);
1346     g_free (ct->destination);
1347     ct->destination = g_strdup (url->host);
1348
1349     if (ct->lower_transport & GST_RTSP_LOWER_TRANS_TCP) {
1350       GSocket *sock;
1351       GSocketAddress *addr;
1352
1353       sock = gst_rtsp_connection_get_read_socket (priv->connection);
1354       if ((addr = g_socket_get_remote_address (sock, NULL))) {
1355         /* our read port is the sender port of client */
1356         ct->client_port.min =
1357             g_inet_socket_address_get_port (G_INET_SOCKET_ADDRESS (addr));
1358         g_object_unref (addr);
1359       }
1360       if ((addr = g_socket_get_local_address (sock, NULL))) {
1361         ct->server_port.max =
1362             g_inet_socket_address_get_port (G_INET_SOCKET_ADDRESS (addr));
1363         g_object_unref (addr);
1364       }
1365       sock = gst_rtsp_connection_get_write_socket (priv->connection);
1366       if ((addr = g_socket_get_remote_address (sock, NULL))) {
1367         /* our write port is the receiver port of client */
1368         ct->client_port.max =
1369             g_inet_socket_address_get_port (G_INET_SOCKET_ADDRESS (addr));
1370         g_object_unref (addr);
1371       }
1372       if ((addr = g_socket_get_local_address (sock, NULL))) {
1373         ct->server_port.min =
1374             g_inet_socket_address_get_port (G_INET_SOCKET_ADDRESS (addr));
1375         g_object_unref (addr);
1376       }
1377       /* check if the client selected channels for TCP */
1378       if (ct->interleaved.min == -1 || ct->interleaved.max == -1) {
1379         gst_rtsp_session_media_alloc_channels (ctx->sessmedia,
1380             &ct->interleaved);
1381       }
1382     }
1383   }
1384   return TRUE;
1385
1386   /* ERRORS */
1387 no_address:
1388   {
1389     GST_ERROR_OBJECT (client, "failed to acquire address for stream");
1390     return FALSE;
1391   }
1392 }
1393
1394 static GstRTSPTransport *
1395 make_server_transport (GstRTSPClient * client, GstRTSPContext * ctx,
1396     GstRTSPTransport * ct)
1397 {
1398   GstRTSPTransport *st;
1399   GInetAddress *addr;
1400   GSocketFamily family;
1401
1402   /* prepare the server transport */
1403   gst_rtsp_transport_new (&st);
1404
1405   st->trans = ct->trans;
1406   st->profile = ct->profile;
1407   st->lower_transport = ct->lower_transport;
1408
1409   addr = g_inet_address_new_from_string (ct->destination);
1410
1411   if (!addr) {
1412     GST_ERROR ("failed to get inet addr from client destination");
1413     family = G_SOCKET_FAMILY_IPV4;
1414   } else {
1415     family = g_inet_address_get_family (addr);
1416     g_object_unref (addr);
1417     addr = NULL;
1418   }
1419
1420   switch (st->lower_transport) {
1421     case GST_RTSP_LOWER_TRANS_UDP:
1422       st->client_port = ct->client_port;
1423       gst_rtsp_stream_get_server_port (ctx->stream, &st->server_port, family);
1424       break;
1425     case GST_RTSP_LOWER_TRANS_UDP_MCAST:
1426       st->port = ct->port;
1427       st->destination = g_strdup (ct->destination);
1428       st->ttl = ct->ttl;
1429       break;
1430     case GST_RTSP_LOWER_TRANS_TCP:
1431       st->interleaved = ct->interleaved;
1432       st->client_port = ct->client_port;
1433       st->server_port = ct->server_port;
1434     default:
1435       break;
1436   }
1437
1438   gst_rtsp_stream_get_ssrc (ctx->stream, &st->ssrc);
1439
1440   return st;
1441 }
1442
1443 #define AES_128_KEY_LEN 16
1444 #define AES_256_KEY_LEN 32
1445
1446 #define HMAC_32_KEY_LEN 4
1447 #define HMAC_80_KEY_LEN 10
1448
1449 static gboolean
1450 mikey_apply_policy (GstCaps * caps, GstMIKEYMessage * msg, guint8 policy)
1451 {
1452   const gchar *srtp_cipher;
1453   const gchar *srtp_auth;
1454   const GstMIKEYPayload *sp;
1455   guint i;
1456
1457   /* loop over Security policy until we find one containing policy */
1458   for (i = 0;; i++) {
1459     if ((sp = gst_mikey_message_find_payload (msg, GST_MIKEY_PT_SP, i)) == NULL)
1460       break;
1461
1462     if (((GstMIKEYPayloadSP *) sp)->policy == policy)
1463       break;
1464   }
1465
1466   /* the default ciphers */
1467   srtp_cipher = "aes-128-icm";
1468   srtp_auth = "hmac-sha1-80";
1469
1470   /* now override the defaults with what is in the Security Policy */
1471   if (sp != NULL) {
1472     guint len;
1473
1474     /* collect all the params and go over them */
1475     len = gst_mikey_payload_sp_get_n_params (sp);
1476     for (i = 0; i < len; i++) {
1477       const GstMIKEYPayloadSPParam *param =
1478           gst_mikey_payload_sp_get_param (sp, i);
1479
1480       switch (param->type) {
1481         case GST_MIKEY_SP_SRTP_ENC_ALG:
1482           switch (param->val[0]) {
1483             case 0:
1484               srtp_cipher = "null";
1485               break;
1486             case 2:
1487             case 1:
1488               srtp_cipher = "aes-128-icm";
1489               break;
1490             default:
1491               break;
1492           }
1493           break;
1494         case GST_MIKEY_SP_SRTP_ENC_KEY_LEN:
1495           switch (param->val[0]) {
1496             case AES_128_KEY_LEN:
1497               srtp_cipher = "aes-128-icm";
1498               break;
1499             case AES_256_KEY_LEN:
1500               srtp_cipher = "aes-256-icm";
1501               break;
1502             default:
1503               break;
1504           }
1505           break;
1506         case GST_MIKEY_SP_SRTP_AUTH_ALG:
1507           switch (param->val[0]) {
1508             case 0:
1509               srtp_auth = "null";
1510               break;
1511             case 2:
1512             case 1:
1513               srtp_auth = "hmac-sha1-80";
1514               break;
1515             default:
1516               break;
1517           }
1518           break;
1519         case GST_MIKEY_SP_SRTP_AUTH_KEY_LEN:
1520           switch (param->val[0]) {
1521             case HMAC_32_KEY_LEN:
1522               srtp_auth = "hmac-sha1-32";
1523               break;
1524             case HMAC_80_KEY_LEN:
1525               srtp_auth = "hmac-sha1-80";
1526               break;
1527             default:
1528               break;
1529           }
1530           break;
1531         case GST_MIKEY_SP_SRTP_SRTP_ENC:
1532           break;
1533         case GST_MIKEY_SP_SRTP_SRTCP_ENC:
1534           break;
1535         default:
1536           break;
1537       }
1538     }
1539   }
1540   /* now configure the SRTP parameters */
1541   gst_caps_set_simple (caps,
1542       "srtp-cipher", G_TYPE_STRING, srtp_cipher,
1543       "srtp-auth", G_TYPE_STRING, srtp_auth,
1544       "srtcp-cipher", G_TYPE_STRING, srtp_cipher,
1545       "srtcp-auth", G_TYPE_STRING, srtp_auth, NULL);
1546
1547   return TRUE;
1548 }
1549
1550 static gboolean
1551 handle_mikey_data (GstRTSPClient * client, GstRTSPContext * ctx,
1552     guint8 * data, gsize size)
1553 {
1554   GstMIKEYMessage *msg;
1555   guint i, n_cs;
1556   GstCaps *caps = NULL;
1557   GstMIKEYPayloadKEMAC *kemac;
1558   const GstMIKEYPayloadKeyData *pkd;
1559   GstBuffer *key;
1560
1561   /* the MIKEY message contains a CSB or crypto session bundle. It is a
1562    * set of Crypto Sessions protected with the same master key.
1563    * In the context of SRTP, an RTP and its RTCP stream is part of a
1564    * crypto session */
1565   if ((msg = gst_mikey_message_new_from_data (data, size, NULL, NULL)) == NULL)
1566     goto parse_failed;
1567
1568   /* we can only handle SRTP crypto sessions for now */
1569   if (msg->map_type != GST_MIKEY_MAP_TYPE_SRTP)
1570     goto invalid_map_type;
1571
1572   /* get the number of crypto sessions. This maps SSRC to its
1573    * security parameters */
1574   n_cs = gst_mikey_message_get_n_cs (msg);
1575   if (n_cs == 0)
1576     goto no_crypto_sessions;
1577
1578   /* we also need keys */
1579   if (!(kemac = (GstMIKEYPayloadKEMAC *) gst_mikey_message_find_payload
1580           (msg, GST_MIKEY_PT_KEMAC, 0)))
1581     goto no_keys;
1582
1583   /* we don't support encrypted keys */
1584   if (kemac->enc_alg != GST_MIKEY_ENC_NULL
1585       || kemac->mac_alg != GST_MIKEY_MAC_NULL)
1586     goto unsupported_encryption;
1587
1588   /* get Key data sub-payload */
1589   pkd = (const GstMIKEYPayloadKeyData *)
1590       gst_mikey_payload_kemac_get_sub (&kemac->pt, 0);
1591
1592   key =
1593       gst_buffer_new_wrapped (g_memdup (pkd->key_data, pkd->key_len),
1594       pkd->key_len);
1595
1596   /* go over all crypto sessions and create the security policy for each
1597    * SSRC */
1598   for (i = 0; i < n_cs; i++) {
1599     const GstMIKEYMapSRTP *map = gst_mikey_message_get_cs_srtp (msg, i);
1600
1601     caps = gst_caps_new_simple ("application/x-srtp",
1602         "ssrc", G_TYPE_UINT, map->ssrc,
1603         "roc", G_TYPE_UINT, map->roc, "srtp-key", GST_TYPE_BUFFER, key, NULL);
1604     mikey_apply_policy (caps, msg, map->policy);
1605
1606     gst_rtsp_stream_update_crypto (ctx->stream, map->ssrc, caps);
1607     gst_caps_unref (caps);
1608   }
1609   gst_mikey_message_unref (msg);
1610   gst_buffer_unref (key);
1611
1612   return TRUE;
1613
1614   /* ERRORS */
1615 parse_failed:
1616   {
1617     GST_DEBUG_OBJECT (client, "failed to parse MIKEY message");
1618     return FALSE;
1619   }
1620 invalid_map_type:
1621   {
1622     GST_DEBUG_OBJECT (client, "invalid map type %d", msg->map_type);
1623     goto cleanup_message;
1624   }
1625 no_crypto_sessions:
1626   {
1627     GST_DEBUG_OBJECT (client, "no crypto sessions");
1628     goto cleanup_message;
1629   }
1630 no_keys:
1631   {
1632     GST_DEBUG_OBJECT (client, "no keys found");
1633     goto cleanup_message;
1634   }
1635 unsupported_encryption:
1636   {
1637     GST_DEBUG_OBJECT (client, "unsupported key encryption");
1638     goto cleanup_message;
1639   }
1640 cleanup_message:
1641   {
1642     gst_mikey_message_unref (msg);
1643     return FALSE;
1644   }
1645 }
1646
1647 #define IS_STRIP_CHAR(c) (g_ascii_isspace ((guchar)(c)) || ((c) == '\"'))
1648
1649 static void
1650 strip_chars (gchar * str)
1651 {
1652   gchar *s;
1653   gsize len;
1654
1655   len = strlen (str);
1656   while (len--) {
1657     if (!IS_STRIP_CHAR (str[len]))
1658       break;
1659     str[len] = '\0';
1660   }
1661   for (s = str; *s && IS_STRIP_CHAR (*s); s++);
1662   memmove (str, s, len + 1);
1663 }
1664
1665 /* KeyMgmt = "KeyMgmt" ":" key-mgmt-spec 0*("," key-mgmt-spec)
1666  * key-mgmt-spec = "prot" "=" KMPID ";" ["uri" "=" %x22 URI %x22 ";"]
1667  */
1668 static gboolean
1669 handle_keymgmt (GstRTSPClient * client, GstRTSPContext * ctx, gchar * keymgmt)
1670 {
1671   gchar **specs;
1672   gint i, j;
1673
1674   specs = g_strsplit (keymgmt, ",", 0);
1675   for (i = 0; specs[i]; i++) {
1676     gchar **split;
1677
1678     split = g_strsplit (specs[i], ";", 0);
1679     for (j = 0; split[j]; j++) {
1680       g_strstrip (split[j]);
1681       if (g_str_has_prefix (split[j], "prot=")) {
1682         g_strstrip (split[j] + 5);
1683         if (!g_str_equal (split[j] + 5, "mikey"))
1684           break;
1685         GST_DEBUG ("found mikey");
1686       } else if (g_str_has_prefix (split[j], "uri=")) {
1687         strip_chars (split[j] + 4);
1688         GST_DEBUG ("found uri '%s'", split[j] + 4);
1689       } else if (g_str_has_prefix (split[j], "data=")) {
1690         guchar *data;
1691         gsize size;
1692         strip_chars (split[j] + 5);
1693         GST_DEBUG ("found data '%s'", split[j] + 5);
1694         data = g_base64_decode_inplace (split[j] + 5, &size);
1695         handle_mikey_data (client, ctx, data, size);
1696       }
1697     }
1698     g_strfreev (split);
1699   }
1700   g_strfreev (specs);
1701   return TRUE;
1702 }
1703
1704 static gboolean
1705 handle_setup_request (GstRTSPClient * client, GstRTSPContext * ctx)
1706 {
1707   GstRTSPClientPrivate *priv = client->priv;
1708   GstRTSPResult res;
1709   GstRTSPUrl *uri;
1710   gchar *transport, *keymgmt;
1711   GstRTSPTransport *ct, *st;
1712   GstRTSPStatusCode code;
1713   GstRTSPSession *session;
1714   GstRTSPStreamTransport *trans;
1715   gchar *trans_str;
1716   GstRTSPSessionMedia *sessmedia;
1717   GstRTSPMedia *media;
1718   GstRTSPStream *stream;
1719   GstRTSPState rtspstate;
1720   GstRTSPClientClass *klass;
1721   gchar *path, *control;
1722   gint matched;
1723   gboolean new_session = FALSE;
1724
1725   if (!ctx->uri)
1726     goto no_uri;
1727
1728   uri = ctx->uri;
1729   klass = GST_RTSP_CLIENT_GET_CLASS (client);
1730   path = klass->make_path_from_uri (client, uri);
1731
1732   /* parse the transport */
1733   res =
1734       gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_TRANSPORT,
1735       &transport, 0);
1736   if (res != GST_RTSP_OK)
1737     goto no_transport;
1738
1739   /* we create the session after parsing stuff so that we don't make
1740    * a session for malformed requests */
1741   if (priv->session_pool == NULL)
1742     goto no_pool;
1743
1744   session = ctx->session;
1745
1746   if (session) {
1747     g_object_ref (session);
1748     /* get a handle to the configuration of the media in the session, this can
1749      * return NULL if this is a new url to manage in this session. */
1750     sessmedia = gst_rtsp_session_get_media (session, path, &matched);
1751   } else {
1752     /* we need a new media configuration in this session */
1753     sessmedia = NULL;
1754   }
1755
1756   /* we have no session media, find one and manage it */
1757   if (sessmedia == NULL) {
1758     /* get a handle to the configuration of the media in the session */
1759     media = find_media (client, ctx, path, &matched);
1760   } else {
1761     if ((media = gst_rtsp_session_media_get_media (sessmedia)))
1762       g_object_ref (media);
1763     else
1764       goto media_not_found;
1765   }
1766   /* no media, not found then */
1767   if (media == NULL)
1768     goto media_not_found_no_reply;
1769
1770   if (path[matched] == '\0')
1771     goto control_not_found;
1772
1773   /* path is what matched. */
1774   path[matched] = '\0';
1775   /* control is remainder */
1776   control = &path[matched + 1];
1777
1778   /* find the stream now using the control part */
1779   stream = gst_rtsp_media_find_stream (media, control);
1780   if (stream == NULL)
1781     goto stream_not_found;
1782
1783   /* now we have a uri identifying a valid media and stream */
1784   ctx->stream = stream;
1785   ctx->media = media;
1786
1787   if (session == NULL) {
1788     /* create a session if this fails we probably reached our session limit or
1789      * something. */
1790     if (!(session = gst_rtsp_session_pool_create (priv->session_pool)))
1791       goto service_unavailable;
1792
1793     /* make sure this client is closed when the session is closed */
1794     client_watch_session (client, session);
1795
1796     new_session = TRUE;
1797     /* signal new session */
1798     g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_NEW_SESSION], 0,
1799         session);
1800
1801     ctx->session = session;
1802   }
1803
1804   if (!klass->configure_client_media (client, media, stream, ctx))
1805     goto configure_media_failed_no_reply;
1806
1807   gst_rtsp_transport_new (&ct);
1808
1809   /* parse and find a usable supported transport */
1810   if (!parse_transport (transport, stream, ct))
1811     goto unsupported_transports;
1812
1813   /* update the client transport */
1814   if (!klass->configure_client_transport (client, ctx, ct))
1815     goto unsupported_client_transport;
1816
1817   /* parse the keymgmt */
1818   if (gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_KEYMGMT,
1819           &keymgmt, 0) == GST_RTSP_OK) {
1820     if (!handle_keymgmt (client, ctx, keymgmt))
1821       goto keymgmt_error;
1822   }
1823
1824   if (sessmedia == NULL) {
1825     /* manage the media in our session now, if not done already  */
1826     sessmedia = gst_rtsp_session_manage_media (session, path, media);
1827     /* if we stil have no media, error */
1828     if (sessmedia == NULL)
1829       goto sessmedia_unavailable;
1830   } else {
1831     g_object_unref (media);
1832   }
1833
1834   ctx->sessmedia = sessmedia;
1835
1836   /* set in the session media transport */
1837   trans = gst_rtsp_session_media_set_transport (sessmedia, stream, ct);
1838
1839   ctx->trans = trans;
1840
1841   /* configure the url used to set this transport, this we will use when
1842    * generating the response for the PLAY request */
1843   gst_rtsp_stream_transport_set_url (trans, uri);
1844   /* configure keepalive for this transport */
1845   gst_rtsp_stream_transport_set_keepalive (trans,
1846       (GstRTSPKeepAliveFunc) do_keepalive, session, NULL);
1847
1848   if (ct->lower_transport == GST_RTSP_LOWER_TRANS_TCP) {
1849     /* our callbacks to send data on this TCP connection */
1850     gst_rtsp_stream_transport_set_callbacks (trans,
1851         (GstRTSPSendFunc) do_send_data,
1852         (GstRTSPSendFunc) do_send_data, client, NULL);
1853
1854     g_hash_table_insert (priv->transports,
1855         GINT_TO_POINTER (ct->interleaved.min), trans);
1856     g_hash_table_insert (priv->transports,
1857         GINT_TO_POINTER (ct->interleaved.max), trans);
1858   }
1859
1860   /* create and serialize the server transport */
1861   st = make_server_transport (client, ctx, ct);
1862   trans_str = gst_rtsp_transport_as_text (st);
1863   gst_rtsp_transport_free (st);
1864
1865   /* construct the response now */
1866   code = GST_RTSP_STS_OK;
1867   gst_rtsp_message_init_response (ctx->response, code,
1868       gst_rtsp_status_as_text (code), ctx->request);
1869
1870   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_TRANSPORT,
1871       trans_str);
1872   g_free (trans_str);
1873
1874   send_message (client, ctx, ctx->response, FALSE);
1875
1876   /* update the state */
1877   rtspstate = gst_rtsp_session_media_get_rtsp_state (sessmedia);
1878   switch (rtspstate) {
1879     case GST_RTSP_STATE_PLAYING:
1880     case GST_RTSP_STATE_RECORDING:
1881     case GST_RTSP_STATE_READY:
1882       /* no state change */
1883       break;
1884     default:
1885       gst_rtsp_session_media_set_rtsp_state (sessmedia, GST_RTSP_STATE_READY);
1886       break;
1887   }
1888   g_object_unref (session);
1889   g_free (path);
1890
1891   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_SETUP_REQUEST], 0, ctx);
1892
1893   return TRUE;
1894
1895   /* ERRORS */
1896 no_uri:
1897   {
1898     GST_ERROR ("client %p: no uri", client);
1899     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
1900     return FALSE;
1901   }
1902 no_transport:
1903   {
1904     GST_ERROR ("client %p: no transport", client);
1905     send_generic_response (client, GST_RTSP_STS_UNSUPPORTED_TRANSPORT, ctx);
1906     goto cleanup_path;
1907   }
1908 no_pool:
1909   {
1910     GST_ERROR ("client %p: no session pool configured", client);
1911     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
1912     goto cleanup_path;
1913   }
1914 media_not_found_no_reply:
1915   {
1916     GST_ERROR ("client %p: media '%s' not found", client, path);
1917     /* error reply is already sent */
1918     goto cleanup_path;
1919   }
1920 media_not_found:
1921   {
1922     GST_ERROR ("client %p: media '%s' not found", client, path);
1923     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1924     goto cleanup_path;
1925   }
1926 control_not_found:
1927   {
1928     GST_ERROR ("client %p: no control in path '%s'", client, path);
1929     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1930     g_object_unref (media);
1931     goto cleanup_path;
1932   }
1933 stream_not_found:
1934   {
1935     GST_ERROR ("client %p: stream '%s' not found", client, control);
1936     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
1937     g_object_unref (media);
1938     goto cleanup_path;
1939   }
1940 service_unavailable:
1941   {
1942     GST_ERROR ("client %p: can't create session", client);
1943     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
1944     g_object_unref (media);
1945     goto cleanup_path;
1946   }
1947 sessmedia_unavailable:
1948   {
1949     GST_ERROR ("client %p: can't create session media", client);
1950     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
1951     g_object_unref (media);
1952     goto cleanup_session;
1953   }
1954 configure_media_failed_no_reply:
1955   {
1956     GST_ERROR ("client %p: configure_media failed", client);
1957     /* error reply is already sent */
1958     goto cleanup_session;
1959   }
1960 unsupported_transports:
1961   {
1962     GST_ERROR ("client %p: unsupported transports", client);
1963     send_generic_response (client, GST_RTSP_STS_UNSUPPORTED_TRANSPORT, ctx);
1964     goto cleanup_transport;
1965   }
1966 unsupported_client_transport:
1967   {
1968     GST_ERROR ("client %p: unsupported client transport", client);
1969     send_generic_response (client, GST_RTSP_STS_UNSUPPORTED_TRANSPORT, ctx);
1970     goto cleanup_transport;
1971   }
1972 keymgmt_error:
1973   {
1974     GST_ERROR ("client %p: keymgmt error", client);
1975     send_generic_response (client, GST_RTSP_STS_KEY_MANAGEMENT_FAILURE, ctx);
1976     goto cleanup_transport;
1977   }
1978   {
1979   cleanup_transport:
1980     gst_rtsp_transport_free (ct);
1981   cleanup_session:
1982     if (new_session)
1983       gst_rtsp_session_pool_remove (priv->session_pool, session);
1984     g_object_unref (session);
1985   cleanup_path:
1986     g_free (path);
1987     return FALSE;
1988   }
1989 }
1990
1991 static GstSDPMessage *
1992 create_sdp (GstRTSPClient * client, GstRTSPMedia * media)
1993 {
1994   GstRTSPClientPrivate *priv = client->priv;
1995   GstSDPMessage *sdp;
1996   GstSDPInfo info;
1997   const gchar *proto;
1998
1999   gst_sdp_message_new (&sdp);
2000
2001   /* some standard things first */
2002   gst_sdp_message_set_version (sdp, "0");
2003
2004   if (priv->is_ipv6)
2005     proto = "IP6";
2006   else
2007     proto = "IP4";
2008
2009   gst_sdp_message_set_origin (sdp, "-", "1188340656180883", "1", "IN", proto,
2010       priv->server_ip);
2011
2012   gst_sdp_message_set_session_name (sdp, "Session streamed with GStreamer");
2013   gst_sdp_message_set_information (sdp, "rtsp-server");
2014   gst_sdp_message_add_time (sdp, "0", "0", NULL);
2015   gst_sdp_message_add_attribute (sdp, "tool", "GStreamer");
2016   gst_sdp_message_add_attribute (sdp, "type", "broadcast");
2017   gst_sdp_message_add_attribute (sdp, "control", "*");
2018
2019   info.is_ipv6 = priv->is_ipv6;
2020   info.server_ip = priv->server_ip;
2021
2022   /* create an SDP for the media object */
2023   if (!gst_rtsp_media_setup_sdp (media, sdp, &info))
2024     goto no_sdp;
2025
2026   return sdp;
2027
2028   /* ERRORS */
2029 no_sdp:
2030   {
2031     GST_ERROR ("client %p: could not create SDP", client);
2032     gst_sdp_message_free (sdp);
2033     return NULL;
2034   }
2035 }
2036
2037 /* for the describe we must generate an SDP */
2038 static gboolean
2039 handle_describe_request (GstRTSPClient * client, GstRTSPContext * ctx)
2040 {
2041   GstRTSPClientPrivate *priv = client->priv;
2042   GstRTSPResult res;
2043   GstSDPMessage *sdp;
2044   guint i;
2045   gchar *path, *str;
2046   GstRTSPMedia *media;
2047   GstRTSPClientClass *klass;
2048
2049   klass = GST_RTSP_CLIENT_GET_CLASS (client);
2050
2051   if (!ctx->uri)
2052     goto no_uri;
2053
2054   /* check what kind of format is accepted, we don't really do anything with it
2055    * and always return SDP for now. */
2056   for (i = 0;; i++) {
2057     gchar *accept;
2058
2059     res =
2060         gst_rtsp_message_get_header (ctx->request, GST_RTSP_HDR_ACCEPT,
2061         &accept, i);
2062     if (res == GST_RTSP_ENOTIMPL)
2063       break;
2064
2065     if (g_ascii_strcasecmp (accept, "application/sdp") == 0)
2066       break;
2067   }
2068
2069   if (!priv->mount_points)
2070     goto no_mount_points;
2071
2072   if (!(path = gst_rtsp_mount_points_make_path (priv->mount_points, ctx->uri)))
2073     goto no_path;
2074
2075   /* find the media object for the uri */
2076   if (!(media = find_media (client, ctx, path, NULL)))
2077     goto no_media;
2078
2079   /* create an SDP for the media object on this client */
2080   if (!(sdp = klass->create_sdp (client, media)))
2081     goto no_sdp;
2082
2083   /* we suspend after the describe */
2084   gst_rtsp_media_suspend (media);
2085   g_object_unref (media);
2086
2087   gst_rtsp_message_init_response (ctx->response, GST_RTSP_STS_OK,
2088       gst_rtsp_status_as_text (GST_RTSP_STS_OK), ctx->request);
2089
2090   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_CONTENT_TYPE,
2091       "application/sdp");
2092
2093   /* content base for some clients that might screw up creating the setup uri */
2094   str = make_base_url (client, ctx->uri, path);
2095   g_free (path);
2096
2097   GST_INFO ("adding content-base: %s", str);
2098   gst_rtsp_message_take_header (ctx->response, GST_RTSP_HDR_CONTENT_BASE, str);
2099
2100   /* add SDP to the response body */
2101   str = gst_sdp_message_as_text (sdp);
2102   gst_rtsp_message_take_body (ctx->response, (guint8 *) str, strlen (str));
2103   gst_sdp_message_free (sdp);
2104
2105   send_message (client, ctx, ctx->response, FALSE);
2106
2107   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_DESCRIBE_REQUEST],
2108       0, ctx);
2109
2110   return TRUE;
2111
2112   /* ERRORS */
2113 no_uri:
2114   {
2115     GST_ERROR ("client %p: no uri", client);
2116     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
2117     return FALSE;
2118   }
2119 no_mount_points:
2120   {
2121     GST_ERROR ("client %p: no mount points configured", client);
2122     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
2123     return FALSE;
2124   }
2125 no_path:
2126   {
2127     GST_ERROR ("client %p: can't find path for url", client);
2128     send_generic_response (client, GST_RTSP_STS_NOT_FOUND, ctx);
2129     return FALSE;
2130   }
2131 no_media:
2132   {
2133     GST_ERROR ("client %p: no media", client);
2134     g_free (path);
2135     /* error reply is already sent */
2136     return FALSE;
2137   }
2138 no_sdp:
2139   {
2140     GST_ERROR ("client %p: can't create SDP", client);
2141     send_generic_response (client, GST_RTSP_STS_SERVICE_UNAVAILABLE, ctx);
2142     g_free (path);
2143     g_object_unref (media);
2144     return FALSE;
2145   }
2146 }
2147
2148 static gboolean
2149 handle_options_request (GstRTSPClient * client, GstRTSPContext * ctx)
2150 {
2151   GstRTSPMethod options;
2152   gchar *str;
2153
2154   options = GST_RTSP_DESCRIBE |
2155       GST_RTSP_OPTIONS |
2156       GST_RTSP_PAUSE |
2157       GST_RTSP_PLAY |
2158       GST_RTSP_SETUP |
2159       GST_RTSP_GET_PARAMETER | GST_RTSP_SET_PARAMETER | GST_RTSP_TEARDOWN;
2160
2161   str = gst_rtsp_options_as_text (options);
2162
2163   gst_rtsp_message_init_response (ctx->response, GST_RTSP_STS_OK,
2164       gst_rtsp_status_as_text (GST_RTSP_STS_OK), ctx->request);
2165
2166   gst_rtsp_message_add_header (ctx->response, GST_RTSP_HDR_PUBLIC, str);
2167   g_free (str);
2168
2169   send_message (client, ctx, ctx->response, FALSE);
2170
2171   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_OPTIONS_REQUEST],
2172       0, ctx);
2173
2174   return TRUE;
2175 }
2176
2177 /* remove duplicate and trailing '/' */
2178 static void
2179 sanitize_uri (GstRTSPUrl * uri)
2180 {
2181   gint i, len;
2182   gchar *s, *d;
2183   gboolean have_slash, prev_slash;
2184
2185   s = d = uri->abspath;
2186   len = strlen (uri->abspath);
2187
2188   prev_slash = FALSE;
2189
2190   for (i = 0; i < len; i++) {
2191     have_slash = s[i] == '/';
2192     *d = s[i];
2193     if (!have_slash || !prev_slash)
2194       d++;
2195     prev_slash = have_slash;
2196   }
2197   len = d - uri->abspath;
2198   /* don't remove the first slash if that's the only thing left */
2199   if (len > 1 && *(d - 1) == '/')
2200     d--;
2201   *d = '\0';
2202 }
2203
2204 /* is called when the session is removed from its session pool. */
2205 static void
2206 client_session_removed (GstRTSPSessionPool * pool, GstRTSPSession * session,
2207     GstRTSPClient * client)
2208 {
2209   GstRTSPClientPrivate *priv = client->priv;
2210
2211   GST_INFO ("client %p: session %p removed", client, session);
2212
2213   g_mutex_lock (&priv->lock);
2214   if (priv->watch != NULL)
2215     gst_rtsp_watch_set_send_backlog (priv->watch, 0, 0);
2216   client_unwatch_session (client, session, NULL);
2217   if (priv->watch != NULL)
2218     gst_rtsp_watch_set_send_backlog (priv->watch, 0, WATCH_BACKLOG_SIZE);
2219   g_mutex_unlock (&priv->lock);
2220 }
2221
2222 /* Returns TRUE if there are no Require headers, otherwise returns FALSE
2223  * and also returns a newly-allocated string of (comma-separated) unsupported
2224  * options in the unsupported_reqs variable .
2225  *
2226  * There may be multiple Require headers, but we must send one single
2227  * Unsupported header with all the unsupported options as response. If
2228  * an incoming Require header contained a comma-separated list of options
2229  * GstRtspConnection will already have split that list up into multiple
2230  * headers.
2231  *
2232  * TODO: allow the application to decide what features are supported
2233  */
2234 static gboolean
2235 check_request_requirements (GstRTSPMessage * msg, gchar ** unsupported_reqs)
2236 {
2237   GstRTSPResult res;
2238   GPtrArray *arr = NULL;
2239   gchar *reqs = NULL;
2240   gint i;
2241
2242   i = 0;
2243   do {
2244     res = gst_rtsp_message_get_header (msg, GST_RTSP_HDR_REQUIRE, &reqs, i++);
2245
2246     if (res == GST_RTSP_ENOTIMPL)
2247       break;
2248
2249     if (arr == NULL)
2250       arr = g_ptr_array_new_with_free_func ((GDestroyNotify) g_free);
2251
2252     g_ptr_array_add (arr, g_strdup (reqs));
2253   }
2254   while (TRUE);
2255
2256   /* if we don't have any Require headers at all, all is fine */
2257   if (i == 1)
2258     return TRUE;
2259
2260   /* otherwise we've now processed at all the Require headers */
2261   g_ptr_array_add (arr, NULL);
2262
2263   /* for now we don't commit to supporting anything, so will just report
2264    * all of the required options as unsupported */
2265   *unsupported_reqs = g_strjoinv (", ", (gchar **) arr->pdata);
2266
2267   g_ptr_array_unref (arr);
2268   return FALSE;
2269 }
2270
2271 static void
2272 handle_request (GstRTSPClient * client, GstRTSPMessage * request)
2273 {
2274   GstRTSPClientPrivate *priv = client->priv;
2275   GstRTSPMethod method;
2276   const gchar *uristr;
2277   GstRTSPUrl *uri = NULL;
2278   GstRTSPVersion version;
2279   GstRTSPResult res;
2280   GstRTSPSession *session = NULL;
2281   GstRTSPContext sctx = { NULL }, *ctx;
2282   GstRTSPMessage response = { 0 };
2283   gchar *unsupported_reqs = NULL;
2284   gchar *sessid;
2285
2286   if (!(ctx = gst_rtsp_context_get_current ())) {
2287     ctx = &sctx;
2288     ctx->auth = priv->auth;
2289     gst_rtsp_context_push_current (ctx);
2290   }
2291
2292   ctx->conn = priv->connection;
2293   ctx->client = client;
2294   ctx->request = request;
2295   ctx->response = &response;
2296
2297   if (gst_debug_category_get_threshold (rtsp_client_debug) >= GST_LEVEL_LOG) {
2298     gst_rtsp_message_dump (request);
2299   }
2300
2301   gst_rtsp_message_parse_request (request, &method, &uristr, &version);
2302
2303   GST_INFO ("client %p: received a request %s %s %s", client,
2304       gst_rtsp_method_as_text (method), uristr,
2305       gst_rtsp_version_as_text (version));
2306
2307   /* we can only handle 1.0 requests */
2308   if (version != GST_RTSP_VERSION_1_0)
2309     goto not_supported;
2310
2311   ctx->method = method;
2312
2313   /* we always try to parse the url first */
2314   if (strcmp (uristr, "*") == 0) {
2315     /* special case where we have * as uri, keep uri = NULL */
2316   } else if (gst_rtsp_url_parse (uristr, &uri) != GST_RTSP_OK) {
2317     /* check if the uristr is an absolute path <=> scheme and host information
2318      * is missing */
2319     gchar *scheme;
2320
2321     scheme = g_uri_parse_scheme (uristr);
2322     if (scheme == NULL && g_str_has_prefix (uristr, "/")) {
2323       gchar *absolute_uristr = NULL;
2324
2325       GST_WARNING_OBJECT (client, "request doesn't contain absolute url");
2326       if (priv->server_ip == NULL) {
2327         GST_WARNING_OBJECT (client, "host information missing");
2328         goto bad_request;
2329       }
2330
2331       absolute_uristr =
2332           g_strdup_printf ("rtsp://%s%s", priv->server_ip, uristr);
2333
2334       GST_DEBUG_OBJECT (client, "absolute url: %s", absolute_uristr);
2335       if (gst_rtsp_url_parse (absolute_uristr, &uri) != GST_RTSP_OK) {
2336         g_free (absolute_uristr);
2337         goto bad_request;
2338       }
2339       g_free (absolute_uristr);
2340     } else {
2341       g_free (scheme);
2342       goto bad_request;
2343     }
2344   }
2345
2346   /* get the session if there is any */
2347   res = gst_rtsp_message_get_header (request, GST_RTSP_HDR_SESSION, &sessid, 0);
2348   if (res == GST_RTSP_OK) {
2349     if (priv->session_pool == NULL)
2350       goto no_pool;
2351
2352     /* we had a session in the request, find it again */
2353     if (!(session = gst_rtsp_session_pool_find (priv->session_pool, sessid)))
2354       goto session_not_found;
2355
2356     /* we add the session to the client list of watched sessions. When a session
2357      * disappears because it times out, we will be notified. If all sessions are
2358      * gone, we will close the connection */
2359     client_watch_session (client, session);
2360   }
2361
2362   /* sanitize the uri */
2363   if (uri)
2364     sanitize_uri (uri);
2365   ctx->uri = uri;
2366   ctx->session = session;
2367
2368   if (!gst_rtsp_auth_check (GST_RTSP_AUTH_CHECK_URL))
2369     goto not_authorized;
2370
2371   /* handle any 'Require' headers */
2372   if (!check_request_requirements (ctx->request, &unsupported_reqs))
2373     goto unsupported_requirement;
2374
2375   /* the backlog must be unlimited while processing requests.
2376    * the causes of this are two cases of deadlocks while streaming over TCP:
2377    *
2378    * 1. consider the scenario where the media pipeline's streaming thread
2379    * is blocking in the appsink (taking the appsink's preroll lock) because
2380    * the backlog is full. when a PAUSE request is received by the RTSP
2381    * client thread then the the state of the session media ought to change
2382    * to PAUSED. while most elements in the pipeline can change state this
2383    * can never happen for the appsink since its preroll lock is taken by
2384    * another thread.
2385    *
2386    * 2. consider the scenario where the media pipeline's streaming thread
2387    * is blocking in the appsink new_sample callback (taking the send lock
2388    * in RTSP client) because the backlog is full. when e.g. a GET request
2389    * is received by the RTSP client thread then a response ought to be sent
2390    * but this can never happen since it requires taking the send lock
2391    * already taken by another thread.
2392    *
2393    * the reason that the backlog is never emptied is that the source used
2394    * for dequeing messages from the backlog is never dispatched because it
2395    * is attached to the same mainloop as the source receving RTSP requests and
2396    * therefore run by the RTSP client thread which is alreayd blocking.
2397    *
2398    * without significant changes the easiest way to cope with this is to
2399    * not block indefinitely when the backlog is full, but rather let the
2400    * backlog grow in size. this in effect means that there can not be any
2401    * upper boundary on its size.
2402    */
2403   if (priv->watch != NULL)
2404     gst_rtsp_watch_set_send_backlog (priv->watch, 0, 0);
2405
2406   /* now see what is asked and dispatch to a dedicated handler */
2407   switch (method) {
2408     case GST_RTSP_OPTIONS:
2409       handle_options_request (client, ctx);
2410       break;
2411     case GST_RTSP_DESCRIBE:
2412       handle_describe_request (client, ctx);
2413       break;
2414     case GST_RTSP_SETUP:
2415       handle_setup_request (client, ctx);
2416       break;
2417     case GST_RTSP_PLAY:
2418       handle_play_request (client, ctx);
2419       break;
2420     case GST_RTSP_PAUSE:
2421       handle_pause_request (client, ctx);
2422       break;
2423     case GST_RTSP_TEARDOWN:
2424       handle_teardown_request (client, ctx);
2425       break;
2426     case GST_RTSP_SET_PARAMETER:
2427       handle_set_param_request (client, ctx);
2428       break;
2429     case GST_RTSP_GET_PARAMETER:
2430       handle_get_param_request (client, ctx);
2431       break;
2432     case GST_RTSP_ANNOUNCE:
2433     case GST_RTSP_RECORD:
2434     case GST_RTSP_REDIRECT:
2435       if (priv->watch != NULL)
2436         gst_rtsp_watch_set_send_backlog (priv->watch, 0, WATCH_BACKLOG_SIZE);
2437       goto not_implemented;
2438     case GST_RTSP_INVALID:
2439     default:
2440       if (priv->watch != NULL)
2441         gst_rtsp_watch_set_send_backlog (priv->watch, 0, WATCH_BACKLOG_SIZE);
2442       goto bad_request;
2443   }
2444
2445   if (priv->watch != NULL)
2446     gst_rtsp_watch_set_send_backlog (priv->watch, 0, WATCH_BACKLOG_SIZE);
2447
2448 done:
2449   if (ctx == &sctx)
2450     gst_rtsp_context_pop_current (ctx);
2451   if (session)
2452     g_object_unref (session);
2453   if (uri)
2454     gst_rtsp_url_free (uri);
2455   return;
2456
2457   /* ERRORS */
2458 not_supported:
2459   {
2460     GST_ERROR ("client %p: version %d not supported", client, version);
2461     send_generic_response (client, GST_RTSP_STS_RTSP_VERSION_NOT_SUPPORTED,
2462         ctx);
2463     goto done;
2464   }
2465 bad_request:
2466   {
2467     GST_ERROR ("client %p: bad request", client);
2468     send_generic_response (client, GST_RTSP_STS_BAD_REQUEST, ctx);
2469     goto done;
2470   }
2471 no_pool:
2472   {
2473     GST_ERROR ("client %p: no pool configured", client);
2474     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
2475     goto done;
2476   }
2477 session_not_found:
2478   {
2479     GST_ERROR ("client %p: session not found", client);
2480     send_generic_response (client, GST_RTSP_STS_SESSION_NOT_FOUND, ctx);
2481     goto done;
2482   }
2483 not_authorized:
2484   {
2485     GST_ERROR ("client %p: not allowed", client);
2486     /* error reply is already sent */
2487     goto done;
2488   }
2489 unsupported_requirement:
2490   {
2491     GST_ERROR ("client %p: Required option is not supported (%s)", client,
2492         unsupported_reqs);
2493     send_option_not_supported_response (client, ctx, unsupported_reqs);
2494     g_free (unsupported_reqs);
2495     goto done;
2496   }
2497 not_implemented:
2498   {
2499     GST_ERROR ("client %p: method %d not implemented", client, method);
2500     send_generic_response (client, GST_RTSP_STS_NOT_IMPLEMENTED, ctx);
2501     goto done;
2502   }
2503 }
2504
2505
2506 static void
2507 handle_response (GstRTSPClient * client, GstRTSPMessage * response)
2508 {
2509   GstRTSPClientPrivate *priv = client->priv;
2510   GstRTSPResult res;
2511   GstRTSPSession *session = NULL;
2512   GstRTSPContext sctx = { NULL }, *ctx;
2513   gchar *sessid;
2514
2515   if (!(ctx = gst_rtsp_context_get_current ())) {
2516     ctx = &sctx;
2517     ctx->auth = priv->auth;
2518     gst_rtsp_context_push_current (ctx);
2519   }
2520
2521   ctx->conn = priv->connection;
2522   ctx->client = client;
2523   ctx->request = NULL;
2524   ctx->uri = NULL;
2525   ctx->method = GST_RTSP_INVALID;
2526   ctx->response = response;
2527
2528   if (gst_debug_category_get_threshold (rtsp_client_debug) >= GST_LEVEL_LOG) {
2529     gst_rtsp_message_dump (response);
2530   }
2531
2532   GST_INFO ("client %p: received a response", client);
2533
2534   /* get the session if there is any */
2535   res =
2536       gst_rtsp_message_get_header (response, GST_RTSP_HDR_SESSION, &sessid, 0);
2537   if (res == GST_RTSP_OK) {
2538     if (priv->session_pool == NULL)
2539       goto no_pool;
2540
2541     /* we had a session in the request, find it again */
2542     if (!(session = gst_rtsp_session_pool_find (priv->session_pool, sessid)))
2543       goto session_not_found;
2544
2545     /* we add the session to the client list of watched sessions. When a session
2546      * disappears because it times out, we will be notified. If all sessions are
2547      * gone, we will close the connection */
2548     client_watch_session (client, session);
2549   }
2550
2551   ctx->session = session;
2552
2553   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_HANDLE_RESPONSE],
2554       0, ctx);
2555
2556 done:
2557   if (ctx == &sctx)
2558     gst_rtsp_context_pop_current (ctx);
2559   if (session)
2560     g_object_unref (session);
2561   return;
2562
2563 no_pool:
2564   {
2565     GST_ERROR ("client %p: no pool configured", client);
2566     goto done;
2567   }
2568 session_not_found:
2569   {
2570     GST_ERROR ("client %p: session not found", client);
2571     goto done;
2572   }
2573 }
2574
2575 static void
2576 handle_data (GstRTSPClient * client, GstRTSPMessage * message)
2577 {
2578   GstRTSPClientPrivate *priv = client->priv;
2579   GstRTSPResult res;
2580   guint8 channel;
2581   guint8 *data;
2582   guint size;
2583   GstBuffer *buffer;
2584   GstRTSPStreamTransport *trans;
2585
2586   /* find the stream for this message */
2587   res = gst_rtsp_message_parse_data (message, &channel);
2588   if (res != GST_RTSP_OK)
2589     return;
2590
2591   gst_rtsp_message_steal_body (message, &data, &size);
2592
2593   buffer = gst_buffer_new_wrapped (data, size);
2594
2595   trans =
2596       g_hash_table_lookup (priv->transports, GINT_TO_POINTER ((gint) channel));
2597   if (trans) {
2598     /* dispatch to the stream based on the channel number */
2599     gst_rtsp_stream_transport_recv_data (trans, channel, buffer);
2600   } else {
2601     gst_buffer_unref (buffer);
2602   }
2603 }
2604
2605 /**
2606  * gst_rtsp_client_set_session_pool:
2607  * @client: a #GstRTSPClient
2608  * @pool: (transfer none): a #GstRTSPSessionPool
2609  *
2610  * Set @pool as the sessionpool for @client which it will use to find
2611  * or allocate sessions. the sessionpool is usually inherited from the server
2612  * that created the client but can be overridden later.
2613  */
2614 void
2615 gst_rtsp_client_set_session_pool (GstRTSPClient * client,
2616     GstRTSPSessionPool * pool)
2617 {
2618   GstRTSPSessionPool *old;
2619   GstRTSPClientPrivate *priv;
2620
2621   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2622
2623   priv = client->priv;
2624
2625   if (pool)
2626     g_object_ref (pool);
2627
2628   g_mutex_lock (&priv->lock);
2629   old = priv->session_pool;
2630   priv->session_pool = pool;
2631
2632   if (priv->session_removed_id) {
2633     g_signal_handler_disconnect (old, priv->session_removed_id);
2634     priv->session_removed_id = 0;
2635   }
2636   g_mutex_unlock (&priv->lock);
2637
2638   /* FIXME, should remove all sessions from the old pool for this client */
2639   if (old)
2640     g_object_unref (old);
2641 }
2642
2643 /**
2644  * gst_rtsp_client_get_session_pool:
2645  * @client: a #GstRTSPClient
2646  *
2647  * Get the #GstRTSPSessionPool object that @client uses to manage its sessions.
2648  *
2649  * Returns: (transfer full): a #GstRTSPSessionPool, unref after usage.
2650  */
2651 GstRTSPSessionPool *
2652 gst_rtsp_client_get_session_pool (GstRTSPClient * client)
2653 {
2654   GstRTSPClientPrivate *priv;
2655   GstRTSPSessionPool *result;
2656
2657   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2658
2659   priv = client->priv;
2660
2661   g_mutex_lock (&priv->lock);
2662   if ((result = priv->session_pool))
2663     g_object_ref (result);
2664   g_mutex_unlock (&priv->lock);
2665
2666   return result;
2667 }
2668
2669 /**
2670  * gst_rtsp_client_set_mount_points:
2671  * @client: a #GstRTSPClient
2672  * @mounts: (transfer none): a #GstRTSPMountPoints
2673  *
2674  * Set @mounts as the mount points for @client which it will use to map urls
2675  * to media streams. These mount points are usually inherited from the server that
2676  * created the client but can be overriden later.
2677  */
2678 void
2679 gst_rtsp_client_set_mount_points (GstRTSPClient * client,
2680     GstRTSPMountPoints * mounts)
2681 {
2682   GstRTSPClientPrivate *priv;
2683   GstRTSPMountPoints *old;
2684
2685   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2686
2687   priv = client->priv;
2688
2689   if (mounts)
2690     g_object_ref (mounts);
2691
2692   g_mutex_lock (&priv->lock);
2693   old = priv->mount_points;
2694   priv->mount_points = mounts;
2695   g_mutex_unlock (&priv->lock);
2696
2697   if (old)
2698     g_object_unref (old);
2699 }
2700
2701 /**
2702  * gst_rtsp_client_get_mount_points:
2703  * @client: a #GstRTSPClient
2704  *
2705  * Get the #GstRTSPMountPoints object that @client uses to manage its sessions.
2706  *
2707  * Returns: (transfer full): a #GstRTSPMountPoints, unref after usage.
2708  */
2709 GstRTSPMountPoints *
2710 gst_rtsp_client_get_mount_points (GstRTSPClient * client)
2711 {
2712   GstRTSPClientPrivate *priv;
2713   GstRTSPMountPoints *result;
2714
2715   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2716
2717   priv = client->priv;
2718
2719   g_mutex_lock (&priv->lock);
2720   if ((result = priv->mount_points))
2721     g_object_ref (result);
2722   g_mutex_unlock (&priv->lock);
2723
2724   return result;
2725 }
2726
2727 /**
2728  * gst_rtsp_client_set_auth:
2729  * @client: a #GstRTSPClient
2730  * @auth: (transfer none): a #GstRTSPAuth
2731  *
2732  * configure @auth to be used as the authentication manager of @client.
2733  */
2734 void
2735 gst_rtsp_client_set_auth (GstRTSPClient * client, GstRTSPAuth * auth)
2736 {
2737   GstRTSPClientPrivate *priv;
2738   GstRTSPAuth *old;
2739
2740   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2741
2742   priv = client->priv;
2743
2744   if (auth)
2745     g_object_ref (auth);
2746
2747   g_mutex_lock (&priv->lock);
2748   old = priv->auth;
2749   priv->auth = auth;
2750   g_mutex_unlock (&priv->lock);
2751
2752   if (old)
2753     g_object_unref (old);
2754 }
2755
2756
2757 /**
2758  * gst_rtsp_client_get_auth:
2759  * @client: a #GstRTSPClient
2760  *
2761  * Get the #GstRTSPAuth used as the authentication manager of @client.
2762  *
2763  * Returns: (transfer full): the #GstRTSPAuth of @client. g_object_unref() after
2764  * usage.
2765  */
2766 GstRTSPAuth *
2767 gst_rtsp_client_get_auth (GstRTSPClient * client)
2768 {
2769   GstRTSPClientPrivate *priv;
2770   GstRTSPAuth *result;
2771
2772   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2773
2774   priv = client->priv;
2775
2776   g_mutex_lock (&priv->lock);
2777   if ((result = priv->auth))
2778     g_object_ref (result);
2779   g_mutex_unlock (&priv->lock);
2780
2781   return result;
2782 }
2783
2784 /**
2785  * gst_rtsp_client_set_thread_pool:
2786  * @client: a #GstRTSPClient
2787  * @pool: (transfer none): a #GstRTSPThreadPool
2788  *
2789  * configure @pool to be used as the thread pool of @client.
2790  */
2791 void
2792 gst_rtsp_client_set_thread_pool (GstRTSPClient * client,
2793     GstRTSPThreadPool * pool)
2794 {
2795   GstRTSPClientPrivate *priv;
2796   GstRTSPThreadPool *old;
2797
2798   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2799
2800   priv = client->priv;
2801
2802   if (pool)
2803     g_object_ref (pool);
2804
2805   g_mutex_lock (&priv->lock);
2806   old = priv->thread_pool;
2807   priv->thread_pool = pool;
2808   g_mutex_unlock (&priv->lock);
2809
2810   if (old)
2811     g_object_unref (old);
2812 }
2813
2814 /**
2815  * gst_rtsp_client_get_thread_pool:
2816  * @client: a #GstRTSPClient
2817  *
2818  * Get the #GstRTSPThreadPool used as the thread pool of @client.
2819  *
2820  * Returns: (transfer full): the #GstRTSPThreadPool of @client. g_object_unref() after
2821  * usage.
2822  */
2823 GstRTSPThreadPool *
2824 gst_rtsp_client_get_thread_pool (GstRTSPClient * client)
2825 {
2826   GstRTSPClientPrivate *priv;
2827   GstRTSPThreadPool *result;
2828
2829   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2830
2831   priv = client->priv;
2832
2833   g_mutex_lock (&priv->lock);
2834   if ((result = priv->thread_pool))
2835     g_object_ref (result);
2836   g_mutex_unlock (&priv->lock);
2837
2838   return result;
2839 }
2840
2841 /**
2842  * gst_rtsp_client_set_connection:
2843  * @client: a #GstRTSPClient
2844  * @conn: (transfer full): a #GstRTSPConnection
2845  *
2846  * Set the #GstRTSPConnection of @client. This function takes ownership of
2847  * @conn.
2848  *
2849  * Returns: %TRUE on success.
2850  */
2851 gboolean
2852 gst_rtsp_client_set_connection (GstRTSPClient * client,
2853     GstRTSPConnection * conn)
2854 {
2855   GstRTSPClientPrivate *priv;
2856   GSocket *read_socket;
2857   GSocketAddress *address;
2858   GstRTSPUrl *url;
2859   GError *error = NULL;
2860
2861   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), FALSE);
2862   g_return_val_if_fail (conn != NULL, FALSE);
2863
2864   priv = client->priv;
2865
2866   read_socket = gst_rtsp_connection_get_read_socket (conn);
2867
2868   if (!(address = g_socket_get_local_address (read_socket, &error)))
2869     goto no_address;
2870
2871   g_free (priv->server_ip);
2872   /* keep the original ip that the client connected to */
2873   if (G_IS_INET_SOCKET_ADDRESS (address)) {
2874     GInetAddress *iaddr;
2875
2876     iaddr = g_inet_socket_address_get_address (G_INET_SOCKET_ADDRESS (address));
2877
2878     /* socket might be ipv6 but adress still ipv4 */
2879     priv->is_ipv6 = g_inet_address_get_family (iaddr) == G_SOCKET_FAMILY_IPV6;
2880     priv->server_ip = g_inet_address_to_string (iaddr);
2881     g_object_unref (address);
2882   } else {
2883     priv->is_ipv6 = g_socket_get_family (read_socket) == G_SOCKET_FAMILY_IPV6;
2884     priv->server_ip = g_strdup ("unknown");
2885   }
2886
2887   GST_INFO ("client %p connected to server ip %s, ipv6 = %d", client,
2888       priv->server_ip, priv->is_ipv6);
2889
2890   url = gst_rtsp_connection_get_url (conn);
2891   GST_INFO ("added new client %p ip %s:%d", client, url->host, url->port);
2892
2893   priv->connection = conn;
2894
2895   return TRUE;
2896
2897   /* ERRORS */
2898 no_address:
2899   {
2900     GST_ERROR ("could not get local address %s", error->message);
2901     g_error_free (error);
2902     return FALSE;
2903   }
2904 }
2905
2906 /**
2907  * gst_rtsp_client_get_connection:
2908  * @client: a #GstRTSPClient
2909  *
2910  * Get the #GstRTSPConnection of @client.
2911  *
2912  * Returns: (transfer none): the #GstRTSPConnection of @client.
2913  * The connection object returned remains valid until the client is freed.
2914  */
2915 GstRTSPConnection *
2916 gst_rtsp_client_get_connection (GstRTSPClient * client)
2917 {
2918   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
2919
2920   return client->priv->connection;
2921 }
2922
2923 /**
2924  * gst_rtsp_client_set_send_func:
2925  * @client: a #GstRTSPClient
2926  * @func: (scope notified): a #GstRTSPClientSendFunc
2927  * @user_data: (closure): user data passed to @func
2928  * @notify: (allow-none): called when @user_data is no longer in use
2929  *
2930  * Set @func as the callback that will be called when a new message needs to be
2931  * sent to the client. @user_data is passed to @func and @notify is called when
2932  * @user_data is no longer in use.
2933  *
2934  * By default, the client will send the messages on the #GstRTSPConnection that
2935  * was configured with gst_rtsp_client_attach() was called.
2936  */
2937 void
2938 gst_rtsp_client_set_send_func (GstRTSPClient * client,
2939     GstRTSPClientSendFunc func, gpointer user_data, GDestroyNotify notify)
2940 {
2941   GstRTSPClientPrivate *priv;
2942   GDestroyNotify old_notify;
2943   gpointer old_data;
2944
2945   g_return_if_fail (GST_IS_RTSP_CLIENT (client));
2946
2947   priv = client->priv;
2948
2949   g_mutex_lock (&priv->send_lock);
2950   priv->send_func = func;
2951   old_notify = priv->send_notify;
2952   old_data = priv->send_data;
2953   priv->send_notify = notify;
2954   priv->send_data = user_data;
2955   g_mutex_unlock (&priv->send_lock);
2956
2957   if (old_notify)
2958     old_notify (old_data);
2959 }
2960
2961 /**
2962  * gst_rtsp_client_handle_message:
2963  * @client: a #GstRTSPClient
2964  * @message: (transfer none): an #GstRTSPMessage
2965  *
2966  * Let the client handle @message.
2967  *
2968  * Returns: a #GstRTSPResult.
2969  */
2970 GstRTSPResult
2971 gst_rtsp_client_handle_message (GstRTSPClient * client,
2972     GstRTSPMessage * message)
2973 {
2974   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), GST_RTSP_EINVAL);
2975   g_return_val_if_fail (message != NULL, GST_RTSP_EINVAL);
2976
2977   switch (message->type) {
2978     case GST_RTSP_MESSAGE_REQUEST:
2979       handle_request (client, message);
2980       break;
2981     case GST_RTSP_MESSAGE_RESPONSE:
2982       handle_response (client, message);
2983       break;
2984     case GST_RTSP_MESSAGE_DATA:
2985       handle_data (client, message);
2986       break;
2987     default:
2988       break;
2989   }
2990   return GST_RTSP_OK;
2991 }
2992
2993 /**
2994  * gst_rtsp_client_send_message:
2995  * @client: a #GstRTSPClient
2996  * @session: (allow-none) (transfer none): a #GstRTSPSession to send
2997  *   the message to or %NULL
2998  * @message: (transfer none): The #GstRTSPMessage to send
2999  *
3000  * Send a message message to the remote end. @message must be a
3001  * #GST_RTSP_MESSAGE_REQUEST or a #GST_RTSP_MESSAGE_RESPONSE.
3002  */
3003 GstRTSPResult
3004 gst_rtsp_client_send_message (GstRTSPClient * client, GstRTSPSession * session,
3005     GstRTSPMessage * message)
3006 {
3007   GstRTSPContext sctx = { NULL }
3008   , *ctx;
3009   GstRTSPClientPrivate *priv;
3010
3011   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), GST_RTSP_EINVAL);
3012   g_return_val_if_fail (message != NULL, GST_RTSP_EINVAL);
3013   g_return_val_if_fail (message->type == GST_RTSP_MESSAGE_REQUEST ||
3014       message->type == GST_RTSP_MESSAGE_RESPONSE, GST_RTSP_EINVAL);
3015
3016   priv = client->priv;
3017
3018   if (!(ctx = gst_rtsp_context_get_current ())) {
3019     ctx = &sctx;
3020     ctx->auth = priv->auth;
3021     gst_rtsp_context_push_current (ctx);
3022   }
3023
3024   ctx->conn = priv->connection;
3025   ctx->client = client;
3026   ctx->session = session;
3027
3028   send_message (client, ctx, message, FALSE);
3029
3030   if (ctx == &sctx)
3031     gst_rtsp_context_pop_current (ctx);
3032
3033   return GST_RTSP_OK;
3034 }
3035
3036 static GstRTSPResult
3037 do_send_message (GstRTSPClient * client, GstRTSPMessage * message,
3038     gboolean close, gpointer user_data)
3039 {
3040   GstRTSPClientPrivate *priv = client->priv;
3041   GstRTSPResult ret;
3042   GTimeVal time;
3043
3044   time.tv_sec = 1;
3045   time.tv_usec = 0;
3046
3047   do {
3048     /* send the response and store the seq number so we can wait until it's
3049      * written to the client to close the connection */
3050     ret =
3051         gst_rtsp_watch_send_message (priv->watch, message,
3052         close ? &priv->close_seq : NULL);
3053     if (ret == GST_RTSP_OK)
3054       break;
3055
3056     if (ret != GST_RTSP_ENOMEM)
3057       goto error;
3058
3059     /* drop backlog */
3060     if (priv->drop_backlog)
3061       break;
3062
3063     /* queue was full, wait for more space */
3064     GST_DEBUG_OBJECT (client, "waiting for backlog");
3065     ret = gst_rtsp_watch_wait_backlog (priv->watch, &time);
3066     GST_DEBUG_OBJECT (client, "Resend due to backlog full");
3067   } while (ret != GST_RTSP_EINTR);
3068
3069   return ret;
3070
3071   /* ERRORS */
3072 error:
3073   {
3074     GST_DEBUG_OBJECT (client, "got error %d", ret);
3075     return ret;
3076   }
3077 }
3078
3079 static GstRTSPResult
3080 message_received (GstRTSPWatch * watch, GstRTSPMessage * message,
3081     gpointer user_data)
3082 {
3083   return gst_rtsp_client_handle_message (GST_RTSP_CLIENT (user_data), message);
3084 }
3085
3086 static GstRTSPResult
3087 message_sent (GstRTSPWatch * watch, guint cseq, gpointer user_data)
3088 {
3089   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3090   GstRTSPClientPrivate *priv = client->priv;
3091
3092   if (priv->close_seq && priv->close_seq == cseq) {
3093     GST_INFO ("client %p: send close message", client);
3094     priv->close_seq = 0;
3095     gst_rtsp_client_close (client);
3096   }
3097
3098   return GST_RTSP_OK;
3099 }
3100
3101 static GstRTSPResult
3102 closed (GstRTSPWatch * watch, gpointer user_data)
3103 {
3104   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3105   GstRTSPClientPrivate *priv = client->priv;
3106   const gchar *tunnelid;
3107
3108   GST_INFO ("client %p: connection closed", client);
3109
3110   if ((tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection))) {
3111     g_mutex_lock (&tunnels_lock);
3112     /* remove from tunnelids */
3113     g_hash_table_remove (tunnels, tunnelid);
3114     g_mutex_unlock (&tunnels_lock);
3115   }
3116
3117   gst_rtsp_watch_set_flushing (watch, TRUE);
3118   g_mutex_lock (&priv->watch_lock);
3119   gst_rtsp_client_set_send_func (client, NULL, NULL, NULL);
3120   g_mutex_unlock (&priv->watch_lock);
3121
3122   return GST_RTSP_OK;
3123 }
3124
3125 static GstRTSPResult
3126 error (GstRTSPWatch * watch, GstRTSPResult result, gpointer user_data)
3127 {
3128   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3129   gchar *str;
3130
3131   str = gst_rtsp_strresult (result);
3132   GST_INFO ("client %p: received an error %s", client, str);
3133   g_free (str);
3134
3135   return GST_RTSP_OK;
3136 }
3137
3138 static GstRTSPResult
3139 error_full (GstRTSPWatch * watch, GstRTSPResult result,
3140     GstRTSPMessage * message, guint id, gpointer user_data)
3141 {
3142   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3143   gchar *str;
3144
3145   str = gst_rtsp_strresult (result);
3146   GST_INFO
3147       ("client %p: error when handling message %p with id %d: %s",
3148       client, message, id, str);
3149   g_free (str);
3150
3151   return GST_RTSP_OK;
3152 }
3153
3154 static gboolean
3155 remember_tunnel (GstRTSPClient * client)
3156 {
3157   GstRTSPClientPrivate *priv = client->priv;
3158   const gchar *tunnelid;
3159
3160   /* store client in the pending tunnels */
3161   tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection);
3162   if (tunnelid == NULL)
3163     goto no_tunnelid;
3164
3165   GST_INFO ("client %p: inserting tunnel session %s", client, tunnelid);
3166
3167   /* we can't have two clients connecting with the same tunnelid */
3168   g_mutex_lock (&tunnels_lock);
3169   if (g_hash_table_lookup (tunnels, tunnelid))
3170     goto tunnel_existed;
3171
3172   g_hash_table_insert (tunnels, g_strdup (tunnelid), g_object_ref (client));
3173   g_mutex_unlock (&tunnels_lock);
3174
3175   return TRUE;
3176
3177   /* ERRORS */
3178 no_tunnelid:
3179   {
3180     GST_ERROR ("client %p: no tunnelid provided", client);
3181     return FALSE;
3182   }
3183 tunnel_existed:
3184   {
3185     g_mutex_unlock (&tunnels_lock);
3186     GST_ERROR ("client %p: tunnel session %s already existed", client,
3187         tunnelid);
3188     return FALSE;
3189   }
3190 }
3191
3192 static GstRTSPResult
3193 tunnel_lost (GstRTSPWatch * watch, gpointer user_data)
3194 {
3195   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3196   GstRTSPClientPrivate *priv = client->priv;
3197
3198   GST_WARNING ("client %p: tunnel lost (connection %p)", client,
3199       priv->connection);
3200
3201   /* ignore error, it'll only be a problem when the client does a POST again */
3202   remember_tunnel (client);
3203
3204   return GST_RTSP_OK;
3205 }
3206
3207 static gboolean
3208 handle_tunnel (GstRTSPClient * client)
3209 {
3210   GstRTSPClientPrivate *priv = client->priv;
3211   GstRTSPClient *oclient;
3212   GstRTSPClientPrivate *opriv;
3213   const gchar *tunnelid;
3214
3215   tunnelid = gst_rtsp_connection_get_tunnelid (priv->connection);
3216   if (tunnelid == NULL)
3217     goto no_tunnelid;
3218
3219   /* check for previous tunnel */
3220   g_mutex_lock (&tunnels_lock);
3221   oclient = g_hash_table_lookup (tunnels, tunnelid);
3222
3223   if (oclient == NULL) {
3224     /* no previous tunnel, remember tunnel */
3225     g_hash_table_insert (tunnels, g_strdup (tunnelid), g_object_ref (client));
3226     g_mutex_unlock (&tunnels_lock);
3227
3228     GST_INFO ("client %p: no previous tunnel found, remembering tunnel (%p)",
3229         client, priv->connection);
3230   } else {
3231     /* merge both tunnels into the first client */
3232     /* remove the old client from the table. ref before because removing it will
3233      * remove the ref to it. */
3234     g_object_ref (oclient);
3235     g_hash_table_remove (tunnels, tunnelid);
3236     g_mutex_unlock (&tunnels_lock);
3237
3238     opriv = oclient->priv;
3239
3240     g_mutex_lock (&opriv->watch_lock);
3241     if (opriv->watch == NULL)
3242       goto tunnel_closed;
3243
3244     GST_INFO ("client %p: found previous tunnel %p (old %p, new %p)", client,
3245         oclient, opriv->connection, priv->connection);
3246
3247     gst_rtsp_connection_do_tunnel (opriv->connection, priv->connection);
3248     gst_rtsp_watch_reset (priv->watch);
3249     gst_rtsp_watch_reset (opriv->watch);
3250     g_mutex_unlock (&opriv->watch_lock);
3251     g_object_unref (oclient);
3252
3253     /* the old client owns the tunnel now, the new one will be freed */
3254     g_source_destroy ((GSource *) priv->watch);
3255     priv->watch = NULL;
3256     gst_rtsp_client_set_send_func (client, NULL, NULL, NULL);
3257   }
3258
3259   return TRUE;
3260
3261   /* ERRORS */
3262 no_tunnelid:
3263   {
3264     GST_ERROR ("client %p: no tunnelid provided", client);
3265     return FALSE;
3266   }
3267 tunnel_closed:
3268   {
3269     GST_ERROR ("client %p: tunnel session %s was closed", client, tunnelid);
3270     g_mutex_unlock (&opriv->watch_lock);
3271     g_object_unref (oclient);
3272     return FALSE;
3273   }
3274 }
3275
3276 static GstRTSPStatusCode
3277 tunnel_get (GstRTSPWatch * watch, gpointer user_data)
3278 {
3279   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3280
3281   GST_INFO ("client %p: tunnel get (connection %p)", client,
3282       client->priv->connection);
3283
3284   if (!handle_tunnel (client)) {
3285     return GST_RTSP_STS_SERVICE_UNAVAILABLE;
3286   }
3287
3288   return GST_RTSP_STS_OK;
3289 }
3290
3291 static GstRTSPResult
3292 tunnel_post (GstRTSPWatch * watch, gpointer user_data)
3293 {
3294   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3295
3296   GST_INFO ("client %p: tunnel post (connection %p)", client,
3297       client->priv->connection);
3298
3299   if (!handle_tunnel (client)) {
3300     return GST_RTSP_ERROR;
3301   }
3302
3303   return GST_RTSP_OK;
3304 }
3305
3306 static GstRTSPResult
3307 tunnel_http_response (GstRTSPWatch * watch, GstRTSPMessage * request,
3308     GstRTSPMessage * response, gpointer user_data)
3309 {
3310   GstRTSPClientClass *klass;
3311
3312   GstRTSPClient *client = GST_RTSP_CLIENT (user_data);
3313   klass = GST_RTSP_CLIENT_GET_CLASS (client);
3314
3315   if (klass->tunnel_http_response) {
3316     klass->tunnel_http_response (client, request, response);
3317   }
3318
3319   return GST_RTSP_OK;
3320 }
3321
3322 static GstRTSPWatchFuncs watch_funcs = {
3323   message_received,
3324   message_sent,
3325   closed,
3326   error,
3327   tunnel_get,
3328   tunnel_post,
3329   error_full,
3330   tunnel_lost,
3331   tunnel_http_response
3332 };
3333
3334 static void
3335 client_watch_notify (GstRTSPClient * client)
3336 {
3337   GstRTSPClientPrivate *priv = client->priv;
3338
3339   GST_INFO ("client %p: watch destroyed", client);
3340   priv->watch = NULL;
3341   /* remove all sessions and so drop the extra client ref */
3342   gst_rtsp_client_session_filter (client, cleanup_session, NULL);
3343   g_signal_emit (client, gst_rtsp_client_signals[SIGNAL_CLOSED], 0, NULL);
3344   g_object_unref (client);
3345 }
3346
3347 /**
3348  * gst_rtsp_client_attach:
3349  * @client: a #GstRTSPClient
3350  * @context: (allow-none): a #GMainContext
3351  *
3352  * Attaches @client to @context. When the mainloop for @context is run, the
3353  * client will be dispatched. When @context is %NULL, the default context will be
3354  * used).
3355  *
3356  * This function should be called when the client properties and urls are fully
3357  * configured and the client is ready to start.
3358  *
3359  * Returns: the ID (greater than 0) for the source within the GMainContext.
3360  */
3361 guint
3362 gst_rtsp_client_attach (GstRTSPClient * client, GMainContext * context)
3363 {
3364   GstRTSPClientPrivate *priv;
3365   guint res;
3366
3367   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), 0);
3368   priv = client->priv;
3369   g_return_val_if_fail (priv->connection != NULL, 0);
3370   g_return_val_if_fail (priv->watch == NULL, 0);
3371
3372   /* make sure noone will free the context before the watch is destroyed */
3373   priv->watch_context = g_main_context_ref (context);
3374
3375   /* create watch for the connection and attach */
3376   priv->watch = gst_rtsp_watch_new (priv->connection, &watch_funcs,
3377       g_object_ref (client), (GDestroyNotify) client_watch_notify);
3378   gst_rtsp_client_set_send_func (client, do_send_message, priv->watch,
3379       (GDestroyNotify) gst_rtsp_watch_unref);
3380
3381   gst_rtsp_watch_set_send_backlog (priv->watch, 0, WATCH_BACKLOG_SIZE);
3382
3383   GST_INFO ("client %p: attaching to context %p", client, context);
3384   res = gst_rtsp_watch_attach (priv->watch, context);
3385
3386   return res;
3387 }
3388
3389 /**
3390  * gst_rtsp_client_session_filter:
3391  * @client: a #GstRTSPClient
3392  * @func: (scope call) (allow-none): a callback
3393  * @user_data: user data passed to @func
3394  *
3395  * Call @func for each session managed by @client. The result value of @func
3396  * determines what happens to the session. @func will be called with @client
3397  * locked so no further actions on @client can be performed from @func.
3398  *
3399  * If @func returns #GST_RTSP_FILTER_REMOVE, the session will be removed from
3400  * @client.
3401  *
3402  * If @func returns #GST_RTSP_FILTER_KEEP, the session will remain in @client.
3403  *
3404  * If @func returns #GST_RTSP_FILTER_REF, the session will remain in @client but
3405  * will also be added with an additional ref to the result #GList of this
3406  * function..
3407  *
3408  * When @func is %NULL, #GST_RTSP_FILTER_REF will be assumed for each session.
3409  *
3410  * Returns: (element-type GstRTSPSession) (transfer full): a #GList with all
3411  * sessions for which @func returned #GST_RTSP_FILTER_REF. After usage, each
3412  * element in the #GList should be unreffed before the list is freed.
3413  */
3414 GList *
3415 gst_rtsp_client_session_filter (GstRTSPClient * client,
3416     GstRTSPClientSessionFilterFunc func, gpointer user_data)
3417 {
3418   GstRTSPClientPrivate *priv;
3419   GList *result, *walk, *next;
3420   GHashTable *visited;
3421   guint cookie;
3422
3423   g_return_val_if_fail (GST_IS_RTSP_CLIENT (client), NULL);
3424
3425   priv = client->priv;
3426
3427   result = NULL;
3428   if (func)
3429     visited = g_hash_table_new_full (NULL, NULL, g_object_unref, NULL);
3430
3431   g_mutex_lock (&priv->lock);
3432 restart:
3433   cookie = priv->sessions_cookie;
3434   for (walk = priv->sessions; walk; walk = next) {
3435     GstRTSPSession *sess = walk->data;
3436     GstRTSPFilterResult res;
3437     gboolean changed;
3438
3439     next = g_list_next (walk);
3440
3441     if (func) {
3442       /* only visit each session once */
3443       if (g_hash_table_contains (visited, sess))
3444         continue;
3445
3446       g_hash_table_add (visited, g_object_ref (sess));
3447       g_mutex_unlock (&priv->lock);
3448
3449       res = func (client, sess, user_data);
3450
3451       g_mutex_lock (&priv->lock);
3452     } else
3453       res = GST_RTSP_FILTER_REF;
3454
3455     changed = (cookie != priv->sessions_cookie);
3456
3457     switch (res) {
3458       case GST_RTSP_FILTER_REMOVE:
3459         /* stop watching the session and pretend it went away, if the list was
3460          * changed, we can't use the current list position, try to see if we
3461          * still have the session */
3462         client_unwatch_session (client, sess, changed ? NULL : walk);
3463         cookie = priv->sessions_cookie;
3464         break;
3465       case GST_RTSP_FILTER_REF:
3466         result = g_list_prepend (result, g_object_ref (sess));
3467         break;
3468       case GST_RTSP_FILTER_KEEP:
3469       default:
3470         break;
3471     }
3472     if (changed)
3473       goto restart;
3474   }
3475   g_mutex_unlock (&priv->lock);
3476
3477   if (func)
3478     g_hash_table_unref (visited);
3479
3480   return result;
3481 }