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
49int 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
63int 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
70int 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
142void 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
160int 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
214const 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
226int ff_socket_nonblock(int socket, int enable)
227{
228#if HAVE_WINSOCK2_H
229   return ioctlsocket(socket, FIONBIO, &enable);
230#else
231   if (enable)
232      return fcntl(socket, F_SETFL, fcntl(socket, F_GETFL) | O_NONBLOCK);
233   else
234      return fcntl(socket, F_SETFL, fcntl(socket, F_GETFL) & ~O_NONBLOCK);
235#endif
236}
237#endif /* CONFIG_NETWORK */
238
239#if CONFIG_FFSERVER
240#if !HAVE_POLL_H
241int poll(struct pollfd *fds, nfds_t numfds, int timeout)
242{
243    fd_set read_set;
244    fd_set write_set;
245    fd_set exception_set;
246    nfds_t i;
247    int n;
248    int rc;
249
250#if HAVE_WINSOCK2_H
251    if (numfds >= FD_SETSIZE) {
252        errno = EINVAL;
253        return -1;
254    }
255#endif
256
257    FD_ZERO(&read_set);
258    FD_ZERO(&write_set);
259    FD_ZERO(&exception_set);
260
261    n = -1;
262    for(i = 0; i < numfds; i++) {
263        if (fds[i].fd < 0)
264            continue;
265#if !HAVE_WINSOCK2_H
266        if (fds[i].fd >= FD_SETSIZE) {
267            errno = EINVAL;
268            return -1;
269        }
270#endif
271
272        if (fds[i].events & POLLIN)  FD_SET(fds[i].fd, &read_set);
273        if (fds[i].events & POLLOUT) FD_SET(fds[i].fd, &write_set);
274        if (fds[i].events & POLLERR) FD_SET(fds[i].fd, &exception_set);
275
276        if (fds[i].fd > n)
277            n = fds[i].fd;
278    };
279
280    if (n == -1)
281        /* Hey!? Nothing to poll, in fact!!! */
282        return 0;
283
284    if (timeout < 0)
285        rc = select(n+1, &read_set, &write_set, &exception_set, NULL);
286    else {
287        struct timeval    tv;
288
289        tv.tv_sec = timeout / 1000;
290        tv.tv_usec = 1000 * (timeout % 1000);
291        rc = select(n+1, &read_set, &write_set, &exception_set, &tv);
292    };
293
294    if (rc < 0)
295        return rc;
296
297    for(i = 0; i < (nfds_t) n; i++) {
298        fds[i].revents = 0;
299
300        if (FD_ISSET(fds[i].fd, &read_set))      fds[i].revents |= POLLIN;
301        if (FD_ISSET(fds[i].fd, &write_set))     fds[i].revents |= POLLOUT;
302        if (FD_ISSET(fds[i].fd, &exception_set)) fds[i].revents |= POLLERR;
303    };
304
305    return rc;
306}
307#endif /* HAVE_POLL_H */
308#endif /* CONFIG_FFSERVER */
309
310