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