2 * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
3 * Copyright (C) <2004> Thomas Vander Stichele <thomas at apestaart dot org>
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Library General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Library General Public License for more details.
15 * You should have received a copy of the GNU Library General Public
16 * License along with this library; if not, write to the
17 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 * Boston, MA 02111-1307, USA.
26 #include <gst/gst-i18n-plugin.h>
28 #include "gsttcpserversrc.h"
29 #include <string.h> /* memset */
31 #include <sys/ioctl.h>
35 GST_DEBUG_CATEGORY_STATIC (tcpserversrc_debug);
36 #define GST_CAT_DEFAULT tcpserversrc_debug
38 #define TCP_DEFAULT_LISTEN_HOST NULL /* listen on all interfaces */
39 #define TCP_BACKLOG 1 /* client connection queue */
42 static const GstElementDetails gst_tcp_server_src_details =
43 GST_ELEMENT_DETAILS ("TCP server source",
45 "Receive data as a server over the network via TCP",
46 "Thomas Vander Stichele <thomas at apestaart dot org>");
48 static GstStaticPadTemplate srctemplate = GST_STATIC_PAD_TEMPLATE ("src",
63 GST_BOILERPLATE (GstTCPServerSrc, gst_tcp_server_src, GstPushSrc,
67 static void gst_tcp_server_src_finalize (GObject * gobject);
69 static gboolean gst_tcp_server_src_start (GstBaseSrc * bsrc);
70 static gboolean gst_tcp_server_src_stop (GstBaseSrc * bsrc);
71 static gboolean gst_tcp_server_src_unlock (GstBaseSrc * bsrc);
72 static GstFlowReturn gst_tcp_server_src_create (GstPushSrc * psrc,
75 static void gst_tcp_server_src_set_property (GObject * object, guint prop_id,
76 const GValue * value, GParamSpec * pspec);
77 static void gst_tcp_server_src_get_property (GObject * object, guint prop_id,
78 GValue * value, GParamSpec * pspec);
82 gst_tcp_server_src_base_init (gpointer g_class)
84 GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
86 gst_element_class_add_pad_template (element_class,
87 gst_static_pad_template_get (&srctemplate));
89 gst_element_class_set_details (element_class, &gst_tcp_server_src_details);
93 gst_tcp_server_src_class_init (GstTCPServerSrcClass * klass)
95 GObjectClass *gobject_class;
96 GstBaseSrcClass *gstbasesrc_class;
97 GstPushSrcClass *gstpush_src_class;
99 gobject_class = (GObjectClass *) klass;
100 gstbasesrc_class = (GstBaseSrcClass *) klass;
101 gstpush_src_class = (GstPushSrcClass *) klass;
103 gobject_class->set_property = gst_tcp_server_src_set_property;
104 gobject_class->get_property = gst_tcp_server_src_get_property;
105 gobject_class->finalize = gst_tcp_server_src_finalize;
107 g_object_class_install_property (gobject_class, PROP_HOST,
108 g_param_spec_string ("host", "Host", "The hostname to listen as",
109 TCP_DEFAULT_LISTEN_HOST, G_PARAM_READWRITE));
110 g_object_class_install_property (gobject_class, PROP_PORT,
111 g_param_spec_int ("port", "Port", "The port to listen to",
112 0, TCP_HIGHEST_PORT, TCP_DEFAULT_PORT, G_PARAM_READWRITE));
113 g_object_class_install_property (gobject_class, PROP_PROTOCOL,
114 g_param_spec_enum ("protocol", "Protocol", "The protocol to wrap data in",
115 GST_TYPE_TCP_PROTOCOL, GST_TCP_PROTOCOL_NONE, G_PARAM_READWRITE));
117 gstbasesrc_class->start = gst_tcp_server_src_start;
118 gstbasesrc_class->stop = gst_tcp_server_src_stop;
119 gstbasesrc_class->unlock = gst_tcp_server_src_unlock;
121 gstpush_src_class->create = gst_tcp_server_src_create;
123 GST_DEBUG_CATEGORY_INIT (tcpserversrc_debug, "tcpserversrc", 0,
124 "TCP Server Source");
128 gst_tcp_server_src_init (GstTCPServerSrc * src, GstTCPServerSrcClass * g_class)
130 src->server_port = TCP_DEFAULT_PORT;
131 src->host = g_strdup (TCP_DEFAULT_HOST);
132 src->server_sock_fd.fd = -1;
133 src->client_sock_fd.fd = -1;
134 src->protocol = GST_TCP_PROTOCOL_NONE;
136 GST_OBJECT_FLAG_UNSET (src, GST_TCP_SERVER_SRC_OPEN);
140 gst_tcp_server_src_finalize (GObject * gobject)
142 GstTCPServerSrc *src = GST_TCP_SERVER_SRC (gobject);
146 G_OBJECT_CLASS (parent_class)->finalize (gobject);
150 gst_tcp_server_src_create (GstPushSrc * psrc, GstBuffer ** outbuf)
152 GstTCPServerSrc *src;
153 GstFlowReturn ret = GST_FLOW_OK;
155 src = GST_TCP_SERVER_SRC (psrc);
157 if (!GST_OBJECT_FLAG_IS_SET (src, GST_TCP_SERVER_SRC_OPEN))
161 if (src->client_sock_fd.fd >= 0) {
162 /* if we have a client, wait for read */
163 gst_poll_fd_ctl_read (src->fdset, &src->server_sock_fd, FALSE);
164 gst_poll_fd_ctl_read (src->fdset, &src->client_sock_fd, TRUE);
166 /* else wait on server socket for connections */
167 gst_poll_fd_ctl_read (src->fdset, &src->server_sock_fd, TRUE);
170 /* no action (0) is an error too in our case */
171 if ((ret = gst_poll_wait (src->fdset, GST_CLOCK_TIME_NONE)) <= 0) {
172 if (ret == -1 && errno == EBUSY)
173 goto select_cancelled;
178 /* if we have no client socket we can accept one now */
179 if (src->client_sock_fd.fd < 0) {
180 if (gst_poll_fd_can_read (src->fdset, &src->server_sock_fd)) {
181 if ((src->client_sock_fd.fd =
182 accept (src->server_sock_fd.fd,
183 (struct sockaddr *) &src->client_sin,
184 &src->client_sin_len)) == -1)
187 gst_poll_add_fd (src->fdset, &src->client_sock_fd);
189 /* and restart now to poll the socket. */
193 GST_LOG_OBJECT (src, "asked for a buffer");
195 switch (src->protocol) {
196 case GST_TCP_PROTOCOL_NONE:
197 ret = gst_tcp_read_buffer (GST_ELEMENT (src), src->client_sock_fd.fd,
201 case GST_TCP_PROTOCOL_GDP:
202 if (!src->caps_received) {
206 ret = gst_tcp_gdp_read_caps (GST_ELEMENT (src), src->client_sock_fd.fd,
209 if (ret == GST_FLOW_WRONG_STATE)
212 if (ret != GST_FLOW_OK)
213 goto gdp_caps_read_error;
215 src->caps_received = TRUE;
216 string = gst_caps_to_string (caps);
217 GST_DEBUG_OBJECT (src, "Received caps through GDP: %s", string);
220 gst_pad_set_caps (GST_BASE_SRC_PAD (psrc), caps);
223 ret = gst_tcp_gdp_read_buffer (GST_ELEMENT (src), src->client_sock_fd.fd,
226 if (ret == GST_FLOW_OK)
227 gst_buffer_set_caps (*outbuf, GST_PAD_CAPS (GST_BASE_SRC_PAD (src)));
232 /* need to assert as buf == NULL */
233 g_assert ("Unhandled protocol type");
237 if (ret == GST_FLOW_OK) {
239 "Returning buffer from _get of size %d, ts %"
240 GST_TIME_FORMAT ", dur %" GST_TIME_FORMAT
241 ", offset %" G_GINT64_FORMAT ", offset_end %" G_GINT64_FORMAT,
242 GST_BUFFER_SIZE (*outbuf),
243 GST_TIME_ARGS (GST_BUFFER_TIMESTAMP (*outbuf)),
244 GST_TIME_ARGS (GST_BUFFER_DURATION (*outbuf)),
245 GST_BUFFER_OFFSET (*outbuf), GST_BUFFER_OFFSET_END (*outbuf));
252 GST_DEBUG_OBJECT (src, "connection to closed, cannot read data");
253 return GST_FLOW_WRONG_STATE;
257 GST_ELEMENT_ERROR (src, RESOURCE, READ, (NULL),
258 ("Select error: %s", g_strerror (errno)));
259 return GST_FLOW_ERROR;
263 GST_DEBUG_OBJECT (src, "select canceled");
264 return GST_FLOW_WRONG_STATE;
268 GST_ELEMENT_ERROR (src, RESOURCE, OPEN_READ, (NULL),
269 ("Could not accept client on server socket: %s", g_strerror (errno)));
270 return GST_FLOW_ERROR;
274 GST_DEBUG_OBJECT (src, "reading gdp canceled");
275 return GST_FLOW_WRONG_STATE;
279 /* if we did not get canceled, report an error */
280 if (ret != GST_FLOW_WRONG_STATE) {
281 GST_ELEMENT_ERROR (src, RESOURCE, READ, (NULL),
282 ("Could not read caps through GDP"));
289 gst_tcp_server_src_set_property (GObject * object, guint prop_id,
290 const GValue * value, GParamSpec * pspec)
292 GstTCPServerSrc *tcpserversrc = GST_TCP_SERVER_SRC (object);
296 if (!g_value_get_string (value)) {
297 g_warning ("host property cannot be NULL");
300 g_free (tcpserversrc->host);
301 tcpserversrc->host = g_strdup (g_value_get_string (value));
304 tcpserversrc->server_port = g_value_get_int (value);
307 tcpserversrc->protocol = g_value_get_enum (value);
311 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
317 gst_tcp_server_src_get_property (GObject * object, guint prop_id,
318 GValue * value, GParamSpec * pspec)
320 GstTCPServerSrc *tcpserversrc = GST_TCP_SERVER_SRC (object);
324 g_value_set_string (value, tcpserversrc->host);
327 g_value_set_int (value, tcpserversrc->server_port);
330 g_value_set_enum (value, tcpserversrc->protocol);
334 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
341 gst_tcp_server_src_start (GstBaseSrc * bsrc)
344 GstTCPServerSrc *src = GST_TCP_SERVER_SRC (bsrc);
346 /* reset caps_received flag */
347 src->caps_received = FALSE;
349 /* create the server listener socket */
350 if ((src->server_sock_fd.fd = socket (AF_INET, SOCK_STREAM, 0)) == -1)
353 GST_DEBUG_OBJECT (src, "opened receiving server socket with fd %d",
354 src->server_sock_fd.fd);
356 /* make address reusable */
358 if (setsockopt (src->server_sock_fd.fd, SOL_SOCKET, SO_REUSEADDR, &ret,
362 /* name the socket */
363 memset (&src->server_sin, 0, sizeof (src->server_sin));
364 src->server_sin.sin_family = AF_INET; /* network socket */
365 src->server_sin.sin_port = htons (src->server_port); /* on port */
369 if (!(host = gst_tcp_host_to_ip (GST_ELEMENT (src), src->host)))
371 src->server_sin.sin_addr.s_addr = inet_addr (host);
374 src->server_sin.sin_addr.s_addr = htonl (INADDR_ANY);
377 GST_DEBUG_OBJECT (src, "binding server socket to address");
378 if ((ret = bind (src->server_sock_fd.fd, (struct sockaddr *) &src->server_sin,
379 sizeof (src->server_sin))) < 0)
382 GST_DEBUG_OBJECT (src, "listening on server socket %d with queue of %d",
383 src->server_sock_fd.fd, TCP_BACKLOG);
385 if (listen (src->server_sock_fd.fd, TCP_BACKLOG) == -1)
388 /* create an fdset to keep track of our file descriptors */
389 if ((src->fdset = gst_poll_new (GST_POLL_MODE_AUTO, TRUE)) == NULL)
392 gst_poll_add_fd (src->fdset, &src->server_sock_fd);
394 GST_DEBUG_OBJECT (src, "received client");
396 GST_OBJECT_FLAG_SET (src, GST_TCP_SERVER_SRC_OPEN);
403 GST_ELEMENT_ERROR (src, RESOURCE, OPEN_READ, (NULL), GST_ERROR_SYSTEM);
408 GST_ELEMENT_ERROR (src, RESOURCE, SETTINGS, (NULL),
409 ("Could not setsockopt: %s", g_strerror (errno)));
410 gst_tcp_socket_close (&src->server_sock_fd);
415 gst_tcp_socket_close (&src->server_sock_fd);
420 gst_tcp_socket_close (&src->server_sock_fd);
423 GST_ELEMENT_ERROR (src, RESOURCE, OPEN_READ, (NULL),
424 ("bind failed: %s", g_strerror (errno)));
431 gst_tcp_socket_close (&src->server_sock_fd);
432 GST_ELEMENT_ERROR (src, RESOURCE, OPEN_READ, (NULL),
433 ("Could not listen on server socket: %s", g_strerror (errno)));
438 GST_ELEMENT_ERROR (src, RESOURCE, OPEN_READ_WRITE, (NULL),
440 gst_tcp_socket_close (&src->server_sock_fd);
446 gst_tcp_server_src_stop (GstBaseSrc * bsrc)
448 GstTCPServerSrc *src = GST_TCP_SERVER_SRC (bsrc);
450 gst_poll_free (src->fdset);
453 gst_tcp_socket_close (&src->server_sock_fd);
454 gst_tcp_socket_close (&src->client_sock_fd);
456 GST_OBJECT_FLAG_UNSET (src, GST_TCP_SERVER_SRC_OPEN);
461 /* will be called only between calls to start() and stop() */
463 gst_tcp_server_src_unlock (GstBaseSrc * bsrc)
465 GstTCPServerSrc *src = GST_TCP_SERVER_SRC (bsrc);
467 gst_poll_set_flushing (src->fdset, TRUE);