Merge/split side data.
[ffmpeg.git] / libavformat / os_support.c
1 /*
2  * Various utilities for ffmpeg system
3  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
4  * copyright (c) 2002 Francois Revol
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 /* needed by inet_aton() */
24 #define _SVID_SOURCE
25
26 #include "config.h"
27 #include "avformat.h"
28 #include "os_support.h"
29
30 #if defined(_WIN32) && !defined(__MINGW32CE__)
31 #include <windows.h>
32
33 #undef open
34 int ff_win32_open(const char *filename_utf8, int oflag, int pmode)
35 {
36     int fd;
37     int num_chars;
38     wchar_t *filename_w;
39
40     /* convert UTF-8 to wide chars */
41     num_chars = MultiByteToWideChar(CP_UTF8, 0, filename_utf8, -1, NULL, 0);
42     if (num_chars <= 0)
43         return -1;
44     filename_w = av_mallocz(sizeof(wchar_t) * num_chars);
45     MultiByteToWideChar(CP_UTF8, 0, filename_utf8, -1, filename_w, num_chars);
46
47     fd = _wopen(filename_w, oflag, pmode);
48     av_freep(&filename_w);
49
50     /* filename maybe be in CP_ACP */
51     if (fd == -1 && !(oflag & O_CREAT))
52         return open(filename_utf8, oflag, pmode);
53
54     return fd;
55 }
56 #endif
57
58 #if CONFIG_NETWORK
59 #include <fcntl.h>
60 #include <unistd.h>
61 #if !HAVE_POLL_H
62 #include <sys/time.h>
63 #if HAVE_WINSOCK2_H
64 #include <winsock2.h>
65 #elif HAVE_SYS_SELECT_H
66 #include <sys/select.h>
67 #endif
68 #endif
69
70 #include "network.h"
71
72 #if !HAVE_INET_ATON
73 #include <stdlib.h>
74 #include <strings.h>
75
76 int ff_inet_aton (const char * str, struct in_addr * add)
77 {
78     unsigned int add1 = 0, add2 = 0, add3 = 0, add4 = 0;
79
80     if (sscanf(str, "%d.%d.%d.%d", &add1, &add2, &add3, &add4) != 4)
81         return 0;
82
83     if (!add1 || (add1|add2|add3|add4) > 255) return 0;
84
85     add->s_addr = htonl((add1 << 24) + (add2 << 16) + (add3 << 8) + add4);
86
87     return 1;
88 }
89 #else
90 int ff_inet_aton (const char * str, struct in_addr * add)
91 {
92     return inet_aton(str, add);
93 }
94 #endif /* !HAVE_INET_ATON */
95
96 #if !HAVE_GETADDRINFO
97 int ff_getaddrinfo(const char *node, const char *service,
98                 const struct addrinfo *hints, struct addrinfo **res)
99 {
100     struct hostent *h = NULL;
101     struct addrinfo *ai;
102     struct sockaddr_in *sin;
103
104 #if HAVE_WINSOCK2_H
105     int (WSAAPI *win_getaddrinfo)(const char *node, const char *service,
106                                   const struct addrinfo *hints,
107                                   struct addrinfo **res);
108     HMODULE ws2mod = GetModuleHandle("ws2_32.dll");
109     win_getaddrinfo = GetProcAddress(ws2mod, "getaddrinfo");
110     if (win_getaddrinfo)
111         return win_getaddrinfo(node, service, hints, res);
112 #endif
113
114     *res = NULL;
115     sin = av_mallocz(sizeof(struct sockaddr_in));
116     if (!sin)
117         return EAI_FAIL;
118     sin->sin_family = AF_INET;
119
120     if (node) {
121         if (!ff_inet_aton(node, &sin->sin_addr)) {
122             if (hints && (hints->ai_flags & AI_NUMERICHOST)) {
123                 av_free(sin);
124                 return EAI_FAIL;
125             }
126             h = gethostbyname(node);
127             if (!h) {
128                 av_free(sin);
129                 return EAI_FAIL;
130             }
131             memcpy(&sin->sin_addr, h->h_addr_list[0], sizeof(struct in_addr));
132         }
133     } else {
134         if (hints && (hints->ai_flags & AI_PASSIVE)) {
135             sin->sin_addr.s_addr = INADDR_ANY;
136         } else
137             sin->sin_addr.s_addr = INADDR_LOOPBACK;
138     }
139
140     /* Note: getaddrinfo allows service to be a string, which
141      * should be looked up using getservbyname. */
142     if (service)
143         sin->sin_port = htons(atoi(service));
144
145     ai = av_mallocz(sizeof(struct addrinfo));
146     if (!ai) {
147         av_free(sin);
148         return EAI_FAIL;
149     }
150
151     *res = ai;
152     ai->ai_family = AF_INET;
153     ai->ai_socktype = hints ? hints->ai_socktype : 0;
154     switch (ai->ai_socktype) {
155     case SOCK_STREAM: ai->ai_protocol = IPPROTO_TCP; break;
156     case SOCK_DGRAM:  ai->ai_protocol = IPPROTO_UDP; break;
157     default:          ai->ai_protocol = 0;           break;
158     }
159
160     ai->ai_addr = (struct sockaddr *)sin;
161     ai->ai_addrlen = sizeof(struct sockaddr_in);
162     if (hints && (hints->ai_flags & AI_CANONNAME))
163         ai->ai_canonname = h ? av_strdup(h->h_name) : NULL;
164
165     ai->ai_next = NULL;
166     return 0;
167 }
168
169 void ff_freeaddrinfo(struct addrinfo *res)
170 {
171 #if HAVE_WINSOCK2_H
172     void (WSAAPI *win_freeaddrinfo)(struct addrinfo *res);
173     HMODULE ws2mod = GetModuleHandle("ws2_32.dll");
174     win_freeaddrinfo = (void (WSAAPI *)(struct addrinfo *res))
175                        GetProcAddress(ws2mod, "freeaddrinfo");
176     if (win_freeaddrinfo) {
177         win_freeaddrinfo(res);
178         return;
179     }
180 #endif
181
182     av_free(res->ai_canonname);
183     av_free(res->ai_addr);
184     av_free(res);
185 }
186
187 int ff_getnameinfo(const struct sockaddr *sa, int salen,
188                    char *host, int hostlen,
189                    char *serv, int servlen, int flags)
190 {
191     const struct sockaddr_in *sin = (const struct sockaddr_in *)sa;
192
193 #if HAVE_WINSOCK2_H
194     int (WSAAPI *win_getnameinfo)(const struct sockaddr *sa, socklen_t salen,
195                                   char *host, DWORD hostlen,
196                                   char *serv, DWORD servlen, int flags);
197     HMODULE ws2mod = GetModuleHandle("ws2_32.dll");
198     win_getnameinfo = GetProcAddress(ws2mod, "getnameinfo");
199     if (win_getnameinfo)
200         return win_getnameinfo(sa, salen, host, hostlen, serv, servlen, flags);
201 #endif
202
203     if (sa->sa_family != AF_INET)
204         return EAI_FAMILY;
205     if (!host && !serv)
206         return EAI_NONAME;
207
208     if (host && hostlen > 0) {
209         struct hostent *ent = NULL;
210         uint32_t a;
211         if (!(flags & NI_NUMERICHOST))
212             ent = gethostbyaddr((const char *)&sin->sin_addr,
213                                 sizeof(sin->sin_addr), AF_INET);
214
215         if (ent) {
216             snprintf(host, hostlen, "%s", ent->h_name);
217         } else if (flags & NI_NAMERQD) {
218             return EAI_NONAME;
219         } else {
220             a = ntohl(sin->sin_addr.s_addr);
221             snprintf(host, hostlen, "%d.%d.%d.%d",
222                      ((a >> 24) & 0xff), ((a >> 16) & 0xff),
223                      ((a >>  8) & 0xff), ( a        & 0xff));
224         }
225     }
226
227     if (serv && servlen > 0) {
228         struct servent *ent = NULL;
229         if (!(flags & NI_NUMERICSERV))
230             ent = getservbyport(sin->sin_port, flags & NI_DGRAM ? "udp" : "tcp");
231
232         if (ent) {
233             snprintf(serv, servlen, "%s", ent->s_name);
234         } else
235             snprintf(serv, servlen, "%d", ntohs(sin->sin_port));
236     }
237
238     return 0;
239 }
240
241 const char *ff_gai_strerror(int ecode)
242 {
243     switch(ecode) {
244     case EAI_FAIL   : return "A non-recoverable error occurred";
245     case EAI_FAMILY : return "The address family was not recognized or the address length was invalid for the specified family";
246     case EAI_NONAME : return "The name does not resolve for the supplied parameters";
247     }
248
249     return "Unknown error";
250 }
251 #endif
252
253 int ff_socket_nonblock(int socket, int enable)
254 {
255 #if HAVE_WINSOCK2_H
256    return ioctlsocket(socket, FIONBIO, &enable);
257 #else
258    if (enable)
259       return fcntl(socket, F_SETFL, fcntl(socket, F_GETFL) | O_NONBLOCK);
260    else
261       return fcntl(socket, F_SETFL, fcntl(socket, F_GETFL) & ~O_NONBLOCK);
262 #endif
263 }
264
265 #if !HAVE_POLL_H
266 int poll(struct pollfd *fds, nfds_t numfds, int timeout)
267 {
268     fd_set read_set;
269     fd_set write_set;
270     fd_set exception_set;
271     nfds_t i;
272     int n;
273     int rc;
274
275 #if HAVE_WINSOCK2_H
276     if (numfds >= FD_SETSIZE) {
277         errno = EINVAL;
278         return -1;
279     }
280 #endif
281
282     FD_ZERO(&read_set);
283     FD_ZERO(&write_set);
284     FD_ZERO(&exception_set);
285
286     n = -1;
287     for(i = 0; i < numfds; i++) {
288         if (fds[i].fd < 0)
289             continue;
290 #if !HAVE_WINSOCK2_H
291         if (fds[i].fd >= FD_SETSIZE) {
292             errno = EINVAL;
293             return -1;
294         }
295 #endif
296
297         if (fds[i].events & POLLIN)  FD_SET(fds[i].fd, &read_set);
298         if (fds[i].events & POLLOUT) FD_SET(fds[i].fd, &write_set);
299         if (fds[i].events & POLLERR) FD_SET(fds[i].fd, &exception_set);
300
301         if (fds[i].fd > n)
302             n = fds[i].fd;
303     };
304
305     if (n == -1)
306         /* Hey!? Nothing to poll, in fact!!! */
307         return 0;
308
309     if (timeout < 0)
310         rc = select(n+1, &read_set, &write_set, &exception_set, NULL);
311     else {
312         struct timeval    tv;
313
314         tv.tv_sec = timeout / 1000;
315         tv.tv_usec = 1000 * (timeout % 1000);
316         rc = select(n+1, &read_set, &write_set, &exception_set, &tv);
317     };
318
319     if (rc < 0)
320         return rc;
321
322     for(i = 0; i < numfds; i++) {
323         fds[i].revents = 0;
324
325         if (FD_ISSET(fds[i].fd, &read_set))      fds[i].revents |= POLLIN;
326         if (FD_ISSET(fds[i].fd, &write_set))     fds[i].revents |= POLLOUT;
327         if (FD_ISSET(fds[i].fd, &exception_set)) fds[i].revents |= POLLERR;
328     };
329
330     return rc;
331 }
332 #endif /* HAVE_POLL_H */
333 #endif /* CONFIG_NETWORK */