/* * Copyright (c) 2007 The FFmpeg Project * * This file is part of FFmpeg. * * FFmpeg is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * FFmpeg is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with FFmpeg; if not, write to the Free Software * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ #include <fcntl.h> #include "network.h" #include "url.h" #include "libavcodec/internal.h" #include "libavutil/avutil.h" #include "libavutil/mem.h" #include "libavutil/time.h" #if HAVE_THREADS #if HAVE_PTHREADS #include <pthread.h> #elif HAVE_OS2THREADS #include "compat/os2threads.h" #else #include "compat/w32pthreads.h" #endif #endif #if CONFIG_OPENSSL #include <openssl/ssl.h> static int openssl_init; #if HAVE_THREADS #include <openssl/crypto.h> pthread_mutex_t *openssl_mutexes; static void openssl_lock(int mode, int type, const char *file, int line) { if (mode & CRYPTO_LOCK) pthread_mutex_lock(&openssl_mutexes[type]); else pthread_mutex_unlock(&openssl_mutexes[type]); } #if !defined(WIN32) && OPENSSL_VERSION_NUMBER < 0x10000000 static unsigned long openssl_thread_id(void) { return (intptr_t) pthread_self(); } #endif #endif #endif #if CONFIG_GNUTLS #include <gnutls/gnutls.h> #if HAVE_THREADS && GNUTLS_VERSION_NUMBER <= 0x020b00 #include <gcrypt.h> #include <errno.h> GCRY_THREAD_OPTION_PTHREAD_IMPL; #endif #endif void ff_tls_init(void) { avpriv_lock_avformat(); #if CONFIG_OPENSSL if (!openssl_init) { SSL_library_init(); SSL_load_error_strings(); #if HAVE_THREADS if (!CRYPTO_get_locking_callback()) { int i; openssl_mutexes = av_malloc_array(sizeof(pthread_mutex_t), CRYPTO_num_locks()); for (i = 0; i < CRYPTO_num_locks(); i++) pthread_mutex_init(&openssl_mutexes[i], NULL); CRYPTO_set_locking_callback(openssl_lock); #if !defined(WIN32) && OPENSSL_VERSION_NUMBER < 0x10000000 CRYPTO_set_id_callback(openssl_thread_id); #endif } #endif } openssl_init++; #endif #if CONFIG_GNUTLS #if HAVE_THREADS && GNUTLS_VERSION_NUMBER < 0x020b00 if (gcry_control(GCRYCTL_ANY_INITIALIZATION_P) == 0) gcry_control(GCRYCTL_SET_THREAD_CBS, &gcry_threads_pthread); #endif gnutls_global_init(); #endif avpriv_unlock_avformat(); } void ff_tls_deinit(void) { avpriv_lock_avformat(); #if CONFIG_OPENSSL openssl_init--; if (!openssl_init) { #if HAVE_THREADS if (CRYPTO_get_locking_callback() == openssl_lock) { int i; CRYPTO_set_locking_callback(NULL); for (i = 0; i < CRYPTO_num_locks(); i++) pthread_mutex_destroy(&openssl_mutexes[i]); av_free(openssl_mutexes); } #endif } #endif #if CONFIG_GNUTLS gnutls_global_deinit(); #endif avpriv_unlock_avformat(); } int ff_network_inited_globally; int ff_network_init(void) { #if HAVE_WINSOCK2_H WSADATA wsaData; #endif if (!ff_network_inited_globally) av_log(NULL, AV_LOG_WARNING, "Using network protocols without global " "network initialization. Please use " "avformat_network_init(), this will " "become mandatory later.\n"); #if HAVE_WINSOCK2_H if (WSAStartup(MAKEWORD(1,1), &wsaData)) return 0; #endif return 1; } int ff_network_wait_fd(int fd, int write) { int ev = write ? POLLOUT : POLLIN; struct pollfd p = { .fd = fd, .events = ev, .revents = 0 }; int ret; ret = poll(&p, 1, 100); return ret < 0 ? ff_neterrno() : p.revents & (ev | POLLERR | POLLHUP) ? 0 : AVERROR(EAGAIN); } int ff_network_wait_fd_timeout(int fd, int write, int64_t timeout, AVIOInterruptCB *int_cb) { int ret; int64_t wait_start = 0; while (1) { if (ff_check_interrupt(int_cb)) return AVERROR_EXIT; ret = ff_network_wait_fd(fd, write); if (ret != AVERROR(EAGAIN)) return ret; if (timeout > 0) { if (!wait_start) wait_start = av_gettime_relative(); else if (av_gettime_relative() - wait_start > timeout) return AVERROR(ETIMEDOUT); } } } void ff_network_close(void) { #if HAVE_WINSOCK2_H WSACleanup(); #endif } #if HAVE_WINSOCK2_H int ff_neterrno(void) { int err = WSAGetLastError(); switch (err) { case WSAEWOULDBLOCK: return AVERROR(EAGAIN); case WSAEINTR: return AVERROR(EINTR); case WSAEPROTONOSUPPORT: return AVERROR(EPROTONOSUPPORT); case WSAETIMEDOUT: return AVERROR(ETIMEDOUT); case WSAECONNREFUSED: return AVERROR(ECONNREFUSED); case WSAEINPROGRESS: return AVERROR(EINPROGRESS); } return -err; } #endif int ff_is_multicast_address(struct sockaddr *addr) { if (addr->sa_family == AF_INET) { return IN_MULTICAST(ntohl(((struct sockaddr_in *)addr)->sin_addr.s_addr)); } #if HAVE_STRUCT_SOCKADDR_IN6 if (addr->sa_family == AF_INET6) { return IN6_IS_ADDR_MULTICAST(&((struct sockaddr_in6 *)addr)->sin6_addr); } #endif return 0; } static int ff_poll_interrupt(struct pollfd *p, nfds_t nfds, int timeout, AVIOInterruptCB *cb) { int runs = timeout / POLLING_TIME; int ret = 0; do { if (ff_check_interrupt(cb)) return AVERROR_EXIT; ret = poll(p, nfds, POLLING_TIME); if (ret != 0) break; } while (timeout <= 0 || runs-- > 0); if (!ret) return AVERROR(ETIMEDOUT); if (ret < 0) return AVERROR(errno); return ret; } int ff_socket(int af, int type, int proto) { int fd; #ifdef SOCK_CLOEXEC fd = socket(af, type | SOCK_CLOEXEC, proto); if (fd == -1 && errno == EINVAL) #endif { fd = socket(af, type, proto); #if HAVE_FCNTL if (fd != -1) { if (fcntl(fd, F_SETFD, FD_CLOEXEC) == -1) av_log(NULL, AV_LOG_DEBUG, "Failed to set close on exec\n"); } #endif } return fd; } int ff_listen_bind(int fd, const struct sockaddr *addr, socklen_t addrlen, int timeout, URLContext *h) { int ret; int reuse = 1; struct pollfd lp = { fd, POLLIN, 0 }; if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &reuse, sizeof(reuse))) { av_log(NULL, AV_LOG_WARNING, "setsockopt(SO_REUSEADDR) failed\n"); } ret = bind(fd, addr, addrlen); if (ret) return ff_neterrno(); ret = listen(fd, 1); if (ret) return ff_neterrno(); ret = ff_poll_interrupt(&lp, 1, timeout, &h->interrupt_callback); if (ret < 0) return ret; ret = accept(fd, NULL, NULL); if (ret < 0) return ff_neterrno(); closesocket(fd); if (ff_socket_nonblock(ret, 1) < 0) av_log(NULL, AV_LOG_DEBUG, "ff_socket_nonblock failed\n"); return ret; } int ff_listen_connect(int fd, const struct sockaddr *addr, socklen_t addrlen, int timeout, URLContext *h, int will_try_next) { struct pollfd p = {fd, POLLOUT, 0}; int ret; socklen_t optlen; if (ff_socket_nonblock(fd, 1) < 0) av_log(NULL, AV_LOG_DEBUG, "ff_socket_nonblock failed\n"); while ((ret = connect(fd, addr, addrlen))) { ret = ff_neterrno(); switch (ret) { case AVERROR(EINTR): if (ff_check_interrupt(&h->interrupt_callback)) return AVERROR_EXIT; continue; case AVERROR(EINPROGRESS): case AVERROR(EAGAIN): ret = ff_poll_interrupt(&p, 1, timeout, &h->interrupt_callback); if (ret < 0) return ret; optlen = sizeof(ret); if (getsockopt (fd, SOL_SOCKET, SO_ERROR, &ret, &optlen)) ret = AVUNERROR(ff_neterrno()); if (ret != 0) { char errbuf[100]; ret = AVERROR(ret); av_strerror(ret, errbuf, sizeof(errbuf)); if (will_try_next) av_log(h, AV_LOG_WARNING, "Connection to %s failed (%s), trying next address\n", h->filename, errbuf); else av_log(h, AV_LOG_ERROR, "Connection to %s failed: %s\n", h->filename, errbuf); } default: return ret; } } return ret; } static int match_host_pattern(const char *pattern, const char *hostname) { int len_p, len_h; if (!strcmp(pattern, "*")) return 1; // Skip a possible *. at the start of the pattern if (pattern[0] == '*') pattern++; if (pattern[0] == '.') pattern++; len_p = strlen(pattern); len_h = strlen(hostname); if (len_p > len_h) return 0; // Simply check if the end of hostname is equal to 'pattern' if (!strcmp(pattern, &hostname[len_h - len_p])) { if (len_h == len_p) return 1; // Exact match if (hostname[len_h - len_p - 1] == '.') return 1; // The matched substring is a domain and not just a substring of a domain } return 0; } int ff_http_match_no_proxy(const char *no_proxy, const char *hostname) { char *buf, *start; int ret = 0; if (!no_proxy) return 0; if (!hostname) return 0; buf = av_strdup(no_proxy); if (!buf) return 0; start = buf; while (start) { char *sep, *next = NULL; start += strspn(start, " ,"); sep = start + strcspn(start, " ,"); if (*sep) { next = sep + 1; *sep = '\0'; } if (match_host_pattern(start, hostname)) { ret = 1; break; } start = next; } av_free(buf); return ret; }