Fix memleak on some OSes in case network initialization fails. See
[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/time.h>
26
27 typedef struct TCPContext {
28     int fd;
29 } TCPContext;
30
31 /* return non zero if error */
32 static int tcp_open(URLContext *h, const char *uri, int flags)
33 {
34     struct sockaddr_in dest_addr;
35     char hostname[1024], *q;
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 proto[1024],path[1024],tmp[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")) goto fail;
50     if ((q = strchr(hostname,'@'))) { strcpy(tmp,q+1); strcpy(hostname,tmp); }
51
52     s = av_malloc(sizeof(TCPContext));
53     if (!s)
54         return AVERROR(ENOMEM);
55     h->priv_data = s;
56     h->is_streamed = 1;
57
58     if (port <= 0 || port >= 65536)
59         goto fail;
60
61     dest_addr.sin_family = AF_INET;
62     dest_addr.sin_port = htons(port);
63     if (resolve_host(&dest_addr.sin_addr, hostname) < 0)
64         goto fail;
65
66     fd = socket(AF_INET, SOCK_STREAM, 0);
67     if (fd < 0)
68         goto fail;
69     ff_socket_nonblock(fd, 1);
70
71  redo:
72     ret = connect(fd, (struct sockaddr *)&dest_addr,
73                   sizeof(dest_addr));
74     if (ret < 0) {
75         if (ff_neterrno() == FF_NETERROR(EINTR))
76             goto redo;
77         if (ff_neterrno() != FF_NETERROR(EINPROGRESS) &&
78             ff_neterrno() != FF_NETERROR(EAGAIN))
79             goto fail;
80
81         /* wait until we are connected or until abort */
82         for(;;) {
83             if (url_interrupt_cb()) {
84                 ret = AVERROR(EINTR);
85                 goto fail1;
86             }
87             fd_max = fd;
88             FD_ZERO(&wfds);
89             FD_SET(fd, &wfds);
90             tv.tv_sec = 0;
91             tv.tv_usec = 100 * 1000;
92             ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
93             if (ret > 0 && FD_ISSET(fd, &wfds))
94                 break;
95         }
96
97         /* test error */
98         optlen = sizeof(ret);
99         getsockopt (fd, SOL_SOCKET, SO_ERROR, &ret, &optlen);
100         if (ret != 0)
101             goto fail;
102     }
103     s->fd = fd;
104     return 0;
105
106  fail:
107     ret = AVERROR(EIO);
108  fail1:
109     if (fd >= 0)
110         closesocket(fd);
111     av_free(s);
112     return ret;
113 }
114
115 static int tcp_read(URLContext *h, uint8_t *buf, int size)
116 {
117     TCPContext *s = h->priv_data;
118     int len, fd_max, ret;
119     fd_set rfds;
120     struct timeval tv;
121
122     for (;;) {
123         if (url_interrupt_cb())
124             return AVERROR(EINTR);
125         fd_max = s->fd;
126         FD_ZERO(&rfds);
127         FD_SET(s->fd, &rfds);
128         tv.tv_sec = 0;
129         tv.tv_usec = 100 * 1000;
130         ret = select(fd_max + 1, &rfds, NULL, NULL, &tv);
131         if (ret > 0 && FD_ISSET(s->fd, &rfds)) {
132             len = recv(s->fd, buf, size, 0);
133             if (len < 0) {
134                 if (ff_neterrno() != FF_NETERROR(EINTR) &&
135                     ff_neterrno() != FF_NETERROR(EAGAIN))
136                     return AVERROR(errno);
137             } else return len;
138         } else if (ret < 0) {
139             return -1;
140         }
141     }
142 }
143
144 static int tcp_write(URLContext *h, uint8_t *buf, int size)
145 {
146     TCPContext *s = h->priv_data;
147     int ret, size1, fd_max, len;
148     fd_set wfds;
149     struct timeval tv;
150
151     size1 = size;
152     while (size > 0) {
153         if (url_interrupt_cb())
154             return AVERROR(EINTR);
155         fd_max = s->fd;
156         FD_ZERO(&wfds);
157         FD_SET(s->fd, &wfds);
158         tv.tv_sec = 0;
159         tv.tv_usec = 100 * 1000;
160         ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
161         if (ret > 0 && FD_ISSET(s->fd, &wfds)) {
162             len = send(s->fd, buf, size, 0);
163             if (len < 0) {
164                 if (ff_neterrno() != FF_NETERROR(EINTR) &&
165                     ff_neterrno() != FF_NETERROR(EAGAIN))
166                     return AVERROR(errno);
167                 continue;
168             }
169             size -= len;
170             buf += len;
171         } else if (ret < 0) {
172             return -1;
173         }
174     }
175     return size1 - size;
176 }
177
178 static int tcp_close(URLContext *h)
179 {
180     TCPContext *s = h->priv_data;
181     closesocket(s->fd);
182     ff_network_close();
183     av_free(s);
184     return 0;
185 }
186
187 URLProtocol tcp_protocol = {
188     "tcp",
189     tcp_open,
190     tcp_read,
191     tcp_write,
192     NULL, /* seek */
193     tcp_close,
194 };