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