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