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