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 #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 */