include sys/select.h to get select, according to posix 2001,
[ffmpeg.git] / libavformat / tcp.c
1 /*
2  * TCP protocol
3  * Copyright (c) 2002 Fabrice Bellard.
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21 #include "avformat.h"
22 #include <unistd.h>
23 #include "network.h"
24 #include "os_support.h"
25 #include <sys/select.h>
26 #include <sys/time.h>
27
28 typedef struct TCPContext {
29     int fd;
30 } TCPContext;
31
32 /* return non zero if error */
33 static int tcp_open(URLContext *h, const char *uri, int flags)
34 {
35     struct sockaddr_in dest_addr;
36     int port, fd = -1;
37     TCPContext *s = NULL;
38     fd_set wfds;
39     int fd_max, ret;
40     struct timeval tv;
41     socklen_t optlen;
42     char hostname[1024],proto[1024],path[1024];
43
44     if(!ff_network_init())
45         return AVERROR(EIO);
46
47     url_split(proto, sizeof(proto), NULL, 0, hostname, sizeof(hostname),
48         &port, path, sizeof(path), uri);
49     if (strcmp(proto,"tcp") || port <= 0 || port >= 65536)
50         return AVERROR(EINVAL);
51
52     dest_addr.sin_family = AF_INET;
53     dest_addr.sin_port = htons(port);
54     if (resolve_host(&dest_addr.sin_addr, hostname) < 0)
55         return AVERROR(EIO);
56
57     fd = socket(AF_INET, SOCK_STREAM, 0);
58     if (fd < 0)
59         return AVERROR(EIO);
60     ff_socket_nonblock(fd, 1);
61
62  redo:
63     ret = connect(fd, (struct sockaddr *)&dest_addr,
64                   sizeof(dest_addr));
65     if (ret < 0) {
66         if (ff_neterrno() == FF_NETERROR(EINTR))
67             goto redo;
68         if (ff_neterrno() != FF_NETERROR(EINPROGRESS) &&
69             ff_neterrno() != FF_NETERROR(EAGAIN))
70             goto fail;
71
72         /* wait until we are connected or until abort */
73         for(;;) {
74             if (url_interrupt_cb()) {
75                 ret = AVERROR(EINTR);
76                 goto fail1;
77             }
78             fd_max = fd;
79             FD_ZERO(&wfds);
80             FD_SET(fd, &wfds);
81             tv.tv_sec = 0;
82             tv.tv_usec = 100 * 1000;
83             ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
84             if (ret > 0 && FD_ISSET(fd, &wfds))
85                 break;
86         }
87
88         /* test error */
89         optlen = sizeof(ret);
90         getsockopt (fd, SOL_SOCKET, SO_ERROR, &ret, &optlen);
91         if (ret != 0)
92             goto fail;
93     }
94     s = av_malloc(sizeof(TCPContext));
95     if (!s)
96         return AVERROR(ENOMEM);
97     h->priv_data = s;
98     h->is_streamed = 1;
99     s->fd = fd;
100     return 0;
101
102  fail:
103     ret = AVERROR(EIO);
104  fail1:
105     if (fd >= 0)
106         closesocket(fd);
107     return ret;
108 }
109
110 static int tcp_read(URLContext *h, uint8_t *buf, int size)
111 {
112     TCPContext *s = h->priv_data;
113     int len, fd_max, ret;
114     fd_set rfds;
115     struct timeval tv;
116
117     for (;;) {
118         if (url_interrupt_cb())
119             return AVERROR(EINTR);
120         fd_max = s->fd;
121         FD_ZERO(&rfds);
122         FD_SET(s->fd, &rfds);
123         tv.tv_sec = 0;
124         tv.tv_usec = 100 * 1000;
125         ret = select(fd_max + 1, &rfds, NULL, NULL, &tv);
126         if (ret > 0 && FD_ISSET(s->fd, &rfds)) {
127             len = recv(s->fd, buf, size, 0);
128             if (len < 0) {
129                 if (ff_neterrno() != FF_NETERROR(EINTR) &&
130                     ff_neterrno() != FF_NETERROR(EAGAIN))
131                     return AVERROR(errno);
132             } else return len;
133         } else if (ret < 0) {
134             return -1;
135         }
136     }
137 }
138
139 static int tcp_write(URLContext *h, uint8_t *buf, int size)
140 {
141     TCPContext *s = h->priv_data;
142     int ret, size1, fd_max, len;
143     fd_set wfds;
144     struct timeval tv;
145
146     size1 = size;
147     while (size > 0) {
148         if (url_interrupt_cb())
149             return AVERROR(EINTR);
150         fd_max = s->fd;
151         FD_ZERO(&wfds);
152         FD_SET(s->fd, &wfds);
153         tv.tv_sec = 0;
154         tv.tv_usec = 100 * 1000;
155         ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
156         if (ret > 0 && FD_ISSET(s->fd, &wfds)) {
157             len = send(s->fd, buf, size, 0);
158             if (len < 0) {
159                 if (ff_neterrno() != FF_NETERROR(EINTR) &&
160                     ff_neterrno() != FF_NETERROR(EAGAIN))
161                     return AVERROR(errno);
162                 continue;
163             }
164             size -= len;
165             buf += len;
166         } else if (ret < 0) {
167             return -1;
168         }
169     }
170     return size1 - size;
171 }
172
173 static int tcp_close(URLContext *h)
174 {
175     TCPContext *s = h->priv_data;
176     closesocket(s->fd);
177     ff_network_close();
178     av_free(s);
179     return 0;
180 }
181
182 URLProtocol tcp_protocol = {
183     "tcp",
184     tcp_open,
185     tcp_read,
186     tcp_write,
187     NULL, /* seek */
188     tcp_close,
189 };