769282182c57026894afe945d74baa7ca6737279
[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 <sys/types.h>
24 #include <sys/socket.h>
25 #include <netinet/in.h>
26 #include <arpa/inet.h>
27 #include <netdb.h>
28 #include <sys/time.h>
29 #include <fcntl.h>
30
31 typedef struct TCPContext {
32     int fd;
33 } TCPContext;
34
35 /* resolve host with also IP address parsing */
36 int resolve_host(struct in_addr *sin_addr, const char *hostname)
37 {
38     struct hostent *hp;
39
40     if ((inet_aton(hostname, sin_addr)) == 0) {
41         hp = gethostbyname(hostname);
42         if (!hp)
43             return -1;
44         memcpy (sin_addr, hp->h_addr, sizeof(struct in_addr));
45     }
46     return 0;
47 }
48
49 /* return non zero if error */
50 static int tcp_open(URLContext *h, const char *uri, int flags)
51 {
52     struct sockaddr_in dest_addr;
53     char hostname[1024], *q;
54     int port, fd = -1;
55     TCPContext *s = NULL;
56     fd_set wfds;
57     int fd_max, ret;
58     struct timeval tv;
59     socklen_t optlen;
60     char proto[1024],path[1024],tmp[1024];  // PETR: protocol and path strings
61
62     url_split(proto, sizeof(proto), NULL, 0, hostname, sizeof(hostname),
63       &port, path, sizeof(path), uri);  // PETR: use url_split
64     if (strcmp(proto,"tcp")) goto fail; // PETR: check protocol
65     if ((q = strchr(hostname,'@'))) { strcpy(tmp,q+1); strcpy(hostname,tmp); } // PETR: take only the part after '@' for tcp protocol
66
67     s = av_malloc(sizeof(TCPContext));
68     if (!s)
69         return -ENOMEM;
70     h->priv_data = s;
71
72     if (port <= 0 || port >= 65536)
73         goto fail;
74
75     dest_addr.sin_family = AF_INET;
76     dest_addr.sin_port = htons(port);
77     if (resolve_host(&dest_addr.sin_addr, hostname) < 0)
78         goto fail;
79
80     fd = socket(PF_INET, SOCK_STREAM, 0);
81     if (fd < 0)
82         goto fail;
83     fcntl(fd, F_SETFL, O_NONBLOCK);
84
85  redo:
86     ret = connect(fd, (struct sockaddr *)&dest_addr,
87                   sizeof(dest_addr));
88     if (ret < 0) {
89         if (errno == EINTR)
90             goto redo;
91         if (errno != EINPROGRESS)
92             goto fail;
93
94         /* wait until we are connected or until abort */
95         for(;;) {
96             if (url_interrupt_cb()) {
97                 ret = -EINTR;
98                 goto fail1;
99             }
100             fd_max = fd;
101             FD_ZERO(&wfds);
102             FD_SET(fd, &wfds);
103             tv.tv_sec = 0;
104             tv.tv_usec = 100 * 1000;
105             ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
106             if (ret > 0 && FD_ISSET(fd, &wfds))
107                 break;
108         }
109
110         /* test error */
111         optlen = sizeof(ret);
112         getsockopt (fd, SOL_SOCKET, SO_ERROR, &ret, &optlen);
113         if (ret != 0)
114             goto fail;
115     }
116     s->fd = fd;
117     return 0;
118
119  fail:
120     ret = AVERROR_IO;
121  fail1:
122     if (fd >= 0)
123         closesocket(fd);
124     av_free(s);
125     return ret;
126 }
127
128 static int tcp_read(URLContext *h, uint8_t *buf, int size)
129 {
130     TCPContext *s = h->priv_data;
131     int len, fd_max, ret;
132     fd_set rfds;
133     struct timeval tv;
134
135     for (;;) {
136         if (url_interrupt_cb())
137             return -EINTR;
138         fd_max = s->fd;
139         FD_ZERO(&rfds);
140         FD_SET(s->fd, &rfds);
141         tv.tv_sec = 0;
142         tv.tv_usec = 100 * 1000;
143         ret = select(fd_max + 1, &rfds, NULL, NULL, &tv);
144         if (ret > 0 && FD_ISSET(s->fd, &rfds)) {
145             len = recv(s->fd, buf, size, 0);
146             if (len < 0) {
147                 if (errno != EINTR && errno != EAGAIN)
148 #ifdef __BEOS__
149                     return errno;
150 #else
151                     return -errno;
152 #endif
153             } else return len;
154         } else if (ret < 0) {
155             return -1;
156         }
157     }
158 }
159
160 static int tcp_write(URLContext *h, uint8_t *buf, int size)
161 {
162     TCPContext *s = h->priv_data;
163     int ret, size1, fd_max, len;
164     fd_set wfds;
165     struct timeval tv;
166
167     size1 = size;
168     while (size > 0) {
169         if (url_interrupt_cb())
170             return -EINTR;
171         fd_max = s->fd;
172         FD_ZERO(&wfds);
173         FD_SET(s->fd, &wfds);
174         tv.tv_sec = 0;
175         tv.tv_usec = 100 * 1000;
176         ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
177         if (ret > 0 && FD_ISSET(s->fd, &wfds)) {
178             len = send(s->fd, buf, size, 0);
179             if (len < 0) {
180                 if (errno != EINTR && errno != EAGAIN) {
181 #ifdef __BEOS__
182                     return errno;
183 #else
184                     return -errno;
185 #endif
186                 }
187                 continue;
188             }
189             size -= len;
190             buf += len;
191         } else if (ret < 0) {
192             return -1;
193         }
194     }
195     return size1 - size;
196 }
197
198 static int tcp_close(URLContext *h)
199 {
200     TCPContext *s = h->priv_data;
201     closesocket(s->fd);
202     av_free(s);
203     return 0;
204 }
205
206 URLProtocol tcp_protocol = {
207     "tcp",
208     tcp_open,
209     tcp_read,
210     tcp_write,
211     NULL, /* seek */
212     tcp_close,
213 };