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