Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / libavformat / os_support.c
1 /*
2  * various OS-feature replacement utilities
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
75 int ff_inet_aton (const char * str, struct in_addr * add)
76 {
77     unsigned int add1 = 0, add2 = 0, add3 = 0, add4 = 0;
78
79     if (sscanf(str, "%d.%d.%d.%d", &add1, &add2, &add3, &add4) != 4)
80         return 0;
81
82     if (!add1 || (add1|add2|add3|add4) > 255) return 0;
83
84     add->s_addr = htonl((add1 << 24) + (add2 << 16) + (add3 << 8) + add4);
85
86     return 1;
87 }
88 #else
89 int ff_inet_aton (const char * str, struct in_addr * add)
90 {
91     return inet_aton(str, add);
92 }
93 #endif /* !HAVE_INET_ATON */
94
95 #if !HAVE_GETADDRINFO
96 int ff_getaddrinfo(const char *node, const char *service,
97                 const struct addrinfo *hints, struct addrinfo **res)
98 {
99     struct hostent *h = NULL;
100     struct addrinfo *ai;
101     struct sockaddr_in *sin;
102
103 #if HAVE_WINSOCK2_H
104     int (WSAAPI *win_getaddrinfo)(const char *node, const char *service,
105                                   const struct addrinfo *hints,
106                                   struct addrinfo **res);
107     HMODULE ws2mod = GetModuleHandle("ws2_32.dll");
108     win_getaddrinfo = GetProcAddress(ws2mod, "getaddrinfo");
109     if (win_getaddrinfo)
110         return win_getaddrinfo(node, service, hints, res);
111 #endif
112
113     *res = NULL;
114     sin = av_mallocz(sizeof(struct sockaddr_in));
115     if (!sin)
116         return EAI_FAIL;
117     sin->sin_family = AF_INET;
118
119     if (node) {
120         if (!ff_inet_aton(node, &sin->sin_addr)) {
121             if (hints && (hints->ai_flags & AI_NUMERICHOST)) {
122                 av_free(sin);
123                 return EAI_FAIL;
124             }
125             h = gethostbyname(node);
126             if (!h) {
127                 av_free(sin);
128                 return EAI_FAIL;
129             }
130             memcpy(&sin->sin_addr, h->h_addr_list[0], sizeof(struct in_addr));
131         }
132     } else {
133         if (hints && (hints->ai_flags & AI_PASSIVE)) {
134             sin->sin_addr.s_addr = INADDR_ANY;
135         } else
136             sin->sin_addr.s_addr = INADDR_LOOPBACK;
137     }
138
139     /* Note: getaddrinfo allows service to be a string, which
140      * should be looked up using getservbyname. */
141     if (service)
142         sin->sin_port = htons(atoi(service));
143
144     ai = av_mallocz(sizeof(struct addrinfo));
145     if (!ai) {
146         av_free(sin);
147         return EAI_FAIL;
148     }
149
150     *res = ai;
151     ai->ai_family = AF_INET;
152     ai->ai_socktype = hints ? hints->ai_socktype : 0;
153     switch (ai->ai_socktype) {
154     case SOCK_STREAM: ai->ai_protocol = IPPROTO_TCP; break;
155     case SOCK_DGRAM:  ai->ai_protocol = IPPROTO_UDP; break;
156     default:          ai->ai_protocol = 0;           break;
157     }
158
159     ai->ai_addr = (struct sockaddr *)sin;
160     ai->ai_addrlen = sizeof(struct sockaddr_in);
161     if (hints && (hints->ai_flags & AI_CANONNAME))
162         ai->ai_canonname = h ? av_strdup(h->h_name) : NULL;
163
164     ai->ai_next = NULL;
165     return 0;
166 }
167
168 void ff_freeaddrinfo(struct addrinfo *res)
169 {
170 #if HAVE_WINSOCK2_H
171     void (WSAAPI *win_freeaddrinfo)(struct addrinfo *res);
172     HMODULE ws2mod = GetModuleHandle("ws2_32.dll");
173     win_freeaddrinfo = (void (WSAAPI *)(struct addrinfo *res))
174                        GetProcAddress(ws2mod, "freeaddrinfo");
175     if (win_freeaddrinfo) {
176         win_freeaddrinfo(res);
177         return;
178     }
179 #endif
180
181     av_free(res->ai_canonname);
182     av_free(res->ai_addr);
183     av_free(res);
184 }
185
186 int ff_getnameinfo(const struct sockaddr *sa, int salen,
187                    char *host, int hostlen,
188                    char *serv, int servlen, int flags)
189 {
190     const struct sockaddr_in *sin = (const struct sockaddr_in *)sa;
191
192 #if HAVE_WINSOCK2_H
193     int (WSAAPI *win_getnameinfo)(const struct sockaddr *sa, socklen_t salen,
194                                   char *host, DWORD hostlen,
195                                   char *serv, DWORD servlen, int flags);
196     HMODULE ws2mod = GetModuleHandle("ws2_32.dll");
197     win_getnameinfo = GetProcAddress(ws2mod, "getnameinfo");
198     if (win_getnameinfo)
199         return win_getnameinfo(sa, salen, host, hostlen, serv, servlen, flags);
200 #endif
201
202     if (sa->sa_family != AF_INET)
203         return EAI_FAMILY;
204     if (!host && !serv)
205         return EAI_NONAME;
206
207     if (host && hostlen > 0) {
208         struct hostent *ent = NULL;
209         uint32_t a;
210         if (!(flags & NI_NUMERICHOST))
211             ent = gethostbyaddr((const char *)&sin->sin_addr,
212                                 sizeof(sin->sin_addr), AF_INET);
213
214         if (ent) {
215             snprintf(host, hostlen, "%s", ent->h_name);
216         } else if (flags & NI_NAMERQD) {
217             return EAI_NONAME;
218         } else {
219             a = ntohl(sin->sin_addr.s_addr);
220             snprintf(host, hostlen, "%d.%d.%d.%d",
221                      ((a >> 24) & 0xff), ((a >> 16) & 0xff),
222                      ((a >>  8) & 0xff), ( a        & 0xff));
223         }
224     }
225
226     if (serv && servlen > 0) {
227         struct servent *ent = NULL;
228         if (!(flags & NI_NUMERICSERV))
229             ent = getservbyport(sin->sin_port, flags & NI_DGRAM ? "udp" : "tcp");
230
231         if (ent) {
232             snprintf(serv, servlen, "%s", ent->s_name);
233         } else
234             snprintf(serv, servlen, "%d", ntohs(sin->sin_port));
235     }
236
237     return 0;
238 }
239
240 const char *ff_gai_strerror(int ecode)
241 {
242     switch(ecode) {
243     case EAI_FAIL   : return "A non-recoverable error occurred";
244     case EAI_FAMILY : return "The address family was not recognized or the address length was invalid for the specified family";
245     case EAI_NONAME : return "The name does not resolve for the supplied parameters";
246     }
247
248     return "Unknown error";
249 }
250 #endif
251
252 int ff_socket_nonblock(int socket, int enable)
253 {
254 #if HAVE_WINSOCK2_H
255    return ioctlsocket(socket, FIONBIO, &enable);
256 #else
257    if (enable)
258       return fcntl(socket, F_SETFL, fcntl(socket, F_GETFL) | O_NONBLOCK);
259    else
260       return fcntl(socket, F_SETFL, fcntl(socket, F_GETFL) & ~O_NONBLOCK);
261 #endif
262 }
263
264 #if !HAVE_POLL_H
265 int poll(struct pollfd *fds, nfds_t numfds, int timeout)
266 {
267     fd_set read_set;
268     fd_set write_set;
269     fd_set exception_set;
270     nfds_t i;
271     int n;
272     int rc;
273
274 #if HAVE_WINSOCK2_H
275     if (numfds >= FD_SETSIZE) {
276         errno = EINVAL;
277         return -1;
278     }
279 #endif
280
281     FD_ZERO(&read_set);
282     FD_ZERO(&write_set);
283     FD_ZERO(&exception_set);
284
285     n = -1;
286     for(i = 0; i < numfds; i++) {
287         if (fds[i].fd < 0)
288             continue;
289 #if !HAVE_WINSOCK2_H
290         if (fds[i].fd >= FD_SETSIZE) {
291             errno = EINVAL;
292             return -1;
293         }
294 #endif
295
296         if (fds[i].events & POLLIN)  FD_SET(fds[i].fd, &read_set);
297         if (fds[i].events & POLLOUT) FD_SET(fds[i].fd, &write_set);
298         if (fds[i].events & POLLERR) FD_SET(fds[i].fd, &exception_set);
299
300         if (fds[i].fd > n)
301             n = fds[i].fd;
302     };
303
304     if (n == -1)
305         /* Hey!? Nothing to poll, in fact!!! */
306         return 0;
307
308     if (timeout < 0)
309         rc = select(n+1, &read_set, &write_set, &exception_set, NULL);
310     else {
311         struct timeval    tv;
312
313         tv.tv_sec = timeout / 1000;
314         tv.tv_usec = 1000 * (timeout % 1000);
315         rc = select(n+1, &read_set, &write_set, &exception_set, &tv);
316     };
317
318     if (rc < 0)
319         return rc;
320
321     for(i = 0; i < numfds; i++) {
322         fds[i].revents = 0;
323
324         if (FD_ISSET(fds[i].fd, &read_set))      fds[i].revents |= POLLIN;
325         if (FD_ISSET(fds[i].fd, &write_set))     fds[i].revents |= POLLOUT;
326         if (FD_ISSET(fds[i].fd, &exception_set)) fds[i].revents |= POLLERR;
327     };
328
329     return rc;
330 }
331 #endif /* HAVE_POLL_H */
332 #endif /* CONFIG_NETWORK */