The long awaited BeOS cleanup, phase 1
[libav.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 #ifdef __BEOS__
146 len = recv(s->fd, buf, size, 0);
147 #else
148 len = read(s->fd, buf, size);
149 #endif
150 if (len < 0) {
151 if (errno != EINTR && errno != EAGAIN)
152 #ifdef __BEOS__
153 return errno;
154 #else
155 return -errno;
156 #endif
157 } else return len;
158 } else if (ret < 0) {
159 return -1;
160 }
161 }
162 }
163
164 static int tcp_write(URLContext *h, uint8_t *buf, int size)
165 {
166 TCPContext *s = h->priv_data;
167 int ret, size1, fd_max, len;
168 fd_set wfds;
169 struct timeval tv;
170
171 size1 = size;
172 while (size > 0) {
173 if (url_interrupt_cb())
174 return -EINTR;
175 fd_max = s->fd;
176 FD_ZERO(&wfds);
177 FD_SET(s->fd, &wfds);
178 tv.tv_sec = 0;
179 tv.tv_usec = 100 * 1000;
180 ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
181 if (ret > 0 && FD_ISSET(s->fd, &wfds)) {
182 #ifdef __BEOS__
183 len = send(s->fd, buf, size, 0);
184 #else
185 len = write(s->fd, buf, size);
186 #endif
187 if (len < 0) {
188 if (errno != EINTR && errno != EAGAIN) {
189 #ifdef __BEOS__
190 return errno;
191 #else
192 return -errno;
193 #endif
194 }
195 continue;
196 }
197 size -= len;
198 buf += len;
199 } else if (ret < 0) {
200 return -1;
201 }
202 }
203 return size1 - size;
204 }
205
206 static int tcp_close(URLContext *h)
207 {
208 TCPContext *s = h->priv_data;
209 closesocket(s->fd);
210 av_free(s);
211 return 0;
212 }
213
214 URLProtocol tcp_protocol = {
215 "tcp",
216 tcp_open,
217 tcp_read,
218 tcp_write,
219 NULL, /* seek */
220 tcp_close,
221 };