/***************************************************************************

 *                                  _   _ ____  _

 *  Project                     ___| | | |  _ \| |

 *                             / __| | | | |_) | |

 *                            | (__| |_| |  _ <| |___

 *                             \___|\___/|_| \_\_____|

 *

 * Copyright (C) Daniel Stenberg, <daniel@haxx.se>, et al.

 *

 * This software is licensed as described in the file COPYING, which

 * you should have received as part of this distribution. The terms

 * are also available at https://curl.se/docs/copyright.html.

 *

 * You may opt to use, copy, modify, merge, publish, distribute and/or sell

 * copies of the Software, and permit persons to whom the Software is

 * furnished to do so, under the terms of the COPYING file.

 *

 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY

 * KIND, either express or implied.

 *

 * SPDX-License-Identifier: curl

 *

 ***************************************************************************/

#include "curl_setup.h"

#ifdef USE_NGHTTP2

#include <nghttp2/nghttp2.h>

#endif

#include <curl/curl.h>

#include "urldata.h"

#include "vtls/vtls.h"

#include "http2.h"

#include "vssh/ssh.h"

#include "vquic/vquic.h"

#include "curl_printf.h"

#include "easy_lock.h"

#ifdef USE_ARES

#  include <ares.h>

#endif

#ifdef USE_LIBIDN2

#include <idn2.h>

#endif

#ifdef USE_LIBPSL

#include <libpsl.h>

#endif

#ifdef USE_LIBRTMP

#include <librtmp/rtmp.h>

#include "curl_rtmp.h"

#endif

#ifdef HAVE_LIBZ

#include <zlib.h>

#endif

#ifdef HAVE_BROTLI

#if defined(__GNUC__) || defined(__clang__)

/* Ignore -Wvla warnings in brotli headers */

#pragma GCC diagnostic push

#pragma GCC diagnostic ignored "-Wvla"

#endif

#include <brotli/decode.h>

#if defined(__GNUC__) || defined(__clang__)

#pragma GCC diagnostic pop

#endif

#endif

#ifdef HAVE_ZSTD

#include <zstd.h>

#endif

#ifdef USE_GSASL

#include <gsasl.h>

#endif

#ifdef USE_OPENLDAP

#include <ldap.h>

#endif

#ifdef HAVE_BROTLI

static void brotli_version(char *buf, size_t bufsz)

{

  uint32_t brotli_version = BrotliDecoderVersion();

  unsigned int major = brotli_version >> 24;

  unsigned int minor = (brotli_version & 0x00FFFFFF) >> 12;

  unsigned int patch = brotli_version & 0x00000FFF;

  (void)msnprintf(buf, bufsz, "brotli/%u.%u.%u", major, minor, patch);

}

#endif

#ifdef HAVE_ZSTD

static void zstd_version(char *buf, size_t bufsz)

{

  unsigned int version = ZSTD_versionNumber();

  unsigned int major = version / (100 * 100);

  unsigned int minor = (version - (major * 100 * 100)) / 100;

  unsigned int patch = version - (major * 100 * 100) - (minor * 100);

  (void)msnprintf(buf, bufsz, "zstd/%u.%u.%u", major, minor, patch);

}

#endif

#ifdef USE_OPENLDAP

static void oldap_version(char *buf, size_t bufsz)

{

  LDAPAPIInfo api;

  api.ldapai_info_version = LDAP_API_INFO_VERSION;

  if(ldap_get_option(NULL, LDAP_OPT_API_INFO, &api) == LDAP_OPT_SUCCESS) {

    unsigned int patch = (unsigned int)(api.ldapai_vendor_version % 100);

    unsigned int major = (unsigned int)(api.ldapai_vendor_version / 10000);

    unsigned int minor =

      (((unsigned int)api.ldapai_vendor_version - major * 10000)

       - patch) / 100;

    msnprintf(buf, bufsz, "%s/%u.%u.%u",

              api.ldapai_vendor_name, major, minor, patch);

    ldap_memfree(api.ldapai_vendor_name);

    ber_memvfree((void **)api.ldapai_extensions);

  }

  else

    msnprintf(buf, bufsz, "OpenLDAP");

}

#endif

#ifdef USE_LIBPSL

static void psl_version(char *buf, size_t bufsz)

{

#if defined(PSL_VERSION_MAJOR) && (PSL_VERSION_MAJOR > 0 ||     \

                                   PSL_VERSION_MINOR >= 11)

  int num = psl_check_version_number(0);

  msnprintf(buf, bufsz, "libpsl/%d.%d.%d",

            num >> 16, (num >> 8) & 0xff, num & 0xff);

#else

  msnprintf(buf, bufsz, "libpsl/%s", psl_get_version());

#endif

}

#endif

#if defined(USE_LIBIDN2) || defined(USE_WIN32_IDN) || defined(USE_APPLE_IDN)

#define USE_IDN

#endif

#ifdef USE_IDN

static void idn_version(char *buf, size_t bufsz)

{

#ifdef USE_LIBIDN2

  msnprintf(buf, bufsz, "libidn2/%s", idn2_check_version(NULL));

#elif defined(USE_WIN32_IDN)

  msnprintf(buf, bufsz, "WinIDN");

#elif defined(USE_APPLE_IDN)

  msnprintf(buf, bufsz, "AppleIDN");

#endif

}

#endif

/*

 * curl_version() returns a pointer to a static buffer.

 *

 * It is implemented to work multi-threaded by making sure repeated invokes

 * generate the exact same string and never write any temporary data like

 * zeros in the data.

 */

#define VERSION_PARTS 16 /* number of substrings we can concatenate */

char *curl_version(void)

{

  static char out[300];

  char *outp;

  size_t outlen;

  const char *src[VERSION_PARTS];

#ifdef USE_SSL

  char ssl_version[200];

#endif

#ifdef HAVE_LIBZ

  char z_version[30];

#endif

#ifdef HAVE_BROTLI

  char br_version[30];

#endif

#ifdef HAVE_ZSTD

  char zstd_ver[30];

#endif

#ifdef USE_ARES

  char cares_version[30];

#endif

#ifdef USE_IDN

  char idn_ver[30];

#endif

#ifdef USE_LIBPSL

  char psl_ver[30];

#endif

#ifdef USE_SSH

  char ssh_version[30];

#endif

#ifdef USE_NGHTTP2

  char h2_version[30];

#endif

#ifdef USE_HTTP3

  char h3_version[30];

#endif

#ifdef USE_LIBRTMP

  char rtmp_version[30];

#endif

#ifdef USE_GSASL

  char gsasl_buf[30];

#endif

#ifdef USE_OPENLDAP

  char ldap_buf[30];

#endif

  int i = 0;

  int j;

#ifdef DEBUGBUILD

  /* Override version string when environment variable CURL_VERSION is set */

  const char *debugversion = getenv("CURL_VERSION");

  if(debugversion) {

    msnprintf(out, sizeof(out), "%s", debugversion);

    return out;

  }

#endif

  src[i++] = LIBCURL_NAME "/" LIBCURL_VERSION;

#ifdef USE_SSL

  Curl_ssl_version(ssl_version, sizeof(ssl_version));

  src[i++] = ssl_version;

#endif

#ifdef HAVE_LIBZ

  msnprintf(z_version, sizeof(z_version), "zlib/%s", zlibVersion());

  src[i++] = z_version;

#endif

#ifdef HAVE_BROTLI

  brotli_version(br_version, sizeof(br_version));

  src[i++] = br_version;

#endif

#ifdef HAVE_ZSTD

  zstd_version(zstd_ver, sizeof(zstd_ver));

  src[i++] = zstd_ver;

#endif

#ifdef USE_ARES

  msnprintf(cares_version, sizeof(cares_version),

            "c-ares/%s", ares_version(NULL));

  src[i++] = cares_version;

#endif

#ifdef USE_IDN

  idn_version(idn_ver, sizeof(idn_ver));

  src[i++] = idn_ver;

#endif

#ifdef USE_LIBPSL

  psl_version(psl_ver, sizeof(psl_ver));

  src[i++] = psl_ver;

#endif

#ifdef USE_SSH

  Curl_ssh_version(ssh_version, sizeof(ssh_version));

  src[i++] = ssh_version;

#endif

#ifdef USE_NGHTTP2

  Curl_http2_ver(h2_version, sizeof(h2_version));

  src[i++] = h2_version;

#endif

#ifdef USE_HTTP3

  Curl_quic_ver(h3_version, sizeof(h3_version));

  src[i++] = h3_version;

#endif

#ifdef USE_LIBRTMP

  Curl_rtmp_version(rtmp_version, sizeof(rtmp_version));

  src[i++] = rtmp_version;

#endif

#ifdef USE_GSASL

  msnprintf(gsasl_buf, sizeof(gsasl_buf), "libgsasl/%s",

            gsasl_check_version(NULL));

  src[i++] = gsasl_buf;

#endif

#ifdef USE_OPENLDAP

  oldap_version(ldap_buf, sizeof(ldap_buf));

  src[i++] = ldap_buf;

#endif

  DEBUGASSERT(i <= VERSION_PARTS);

  outp = &out[0];

  outlen = sizeof(out);

  for(j = 0; j < i; j++) {

    size_t n = strlen(src[j]);

    /* we need room for a space, the string and the final zero */

    if(outlen <= (n + 2))

      break;

    if(j) {

      /* prepend a space if not the first */

      *outp++ = ' ';

      outlen--;

    }

    memcpy(outp, src[j], n);

    outp += n;

    outlen -= n;

  }

  *outp = 0;

  return out;

}

/* data for curl_version_info

   Keep the list sorted alphabetically. It is also written so that each

   protocol line has its own #if line to make things easier on the eye.

 */

static const char * const supported_protocols[] = {

#ifndef CURL_DISABLE_DICT

  "dict",

#endif

#ifndef CURL_DISABLE_FILE

  "file",

#endif

#ifndef CURL_DISABLE_FTP

  "ftp",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_FTP)

  "ftps",

#endif

#ifndef CURL_DISABLE_GOPHER

  "gopher",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_GOPHER)

  "gophers",

#endif

#ifndef CURL_DISABLE_HTTP

  "http",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_HTTP)

  "https",

#endif

#ifndef CURL_DISABLE_IMAP

  "imap",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_IMAP)

  "imaps",

#endif

#ifndef CURL_DISABLE_LDAP

  "ldap",

#if !defined(CURL_DISABLE_LDAPS) && \

    ((defined(USE_OPENLDAP) && defined(USE_SSL)) || \

     (!defined(USE_OPENLDAP) && defined(HAVE_LDAP_SSL)))

  "ldaps",

#endif

#endif

#ifndef CURL_DISABLE_MQTT

  "mqtt",

#endif

#ifndef CURL_DISABLE_POP3

  "pop3",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_POP3)

  "pop3s",

#endif

#ifdef USE_LIBRTMP

  "rtmp",

  "rtmpe",

  "rtmps",

  "rtmpt",

  "rtmpte",

  "rtmpts",

#endif

#ifndef CURL_DISABLE_RTSP

  "rtsp",

#endif

#if defined(USE_SSH) && !defined(USE_WOLFSSH)

  "scp",

#endif

#ifdef USE_SSH

  "sftp",

#endif

#if !defined(CURL_DISABLE_SMB) && defined(USE_CURL_NTLM_CORE)

  "smb",

#  ifdef USE_SSL

  "smbs",

#  endif

#endif

#ifndef CURL_DISABLE_SMTP

  "smtp",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_SMTP)

  "smtps",

#endif

#ifndef CURL_DISABLE_TELNET

  "telnet",

#endif

#ifndef CURL_DISABLE_TFTP

  "tftp",

#endif

#ifndef CURL_DISABLE_HTTP

  /* WebSocket support relies on HTTP */

#ifndef CURL_DISABLE_WEBSOCKETS

  "ws",

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_WEBSOCKETS)

  "wss",

#endif

#endif

  NULL

};

/*

 * Feature presence runtime check functions.

 *

 * Warning: the value returned by these should not change between

 * curl_global_init() and curl_global_cleanup() calls.

 */

#if defined(USE_LIBIDN2) || defined(USE_WIN32_IDN) || defined(USE_APPLE_IDN)

static int idn_present(curl_version_info_data *info)

{

#if defined(USE_WIN32_IDN) || defined(USE_APPLE_IDN)

  (void)info;

  return TRUE;

#else

  return info->libidn != NULL;

#endif

}

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_PROXY) && \

  !defined(CURL_DISABLE_HTTP)

static int https_proxy_present(curl_version_info_data *info)

{

  (void) info;

  return Curl_ssl_supports(NULL, SSLSUPP_HTTPS_PROXY);

}

#endif

#if defined(USE_SSL) && defined(USE_ECH)

static int ech_present(curl_version_info_data *info)

{

  (void) info;

  return Curl_ssl_supports(NULL, SSLSUPP_ECH);

}

#endif

/*

 * Features table.

 *

 * Keep the features alphabetically sorted.

 * Use FEATURE() macro to define an entry: this allows documentation check.

 */

#define FEATURE(name, present, bitmask) {(name), (present), (bitmask)}

struct feat {

  const char *name;

  int        (*present)(curl_version_info_data *info);

  int        bitmask;

};

static const struct feat features_table[] = {

#ifndef CURL_DISABLE_ALTSVC

  FEATURE("alt-svc",     NULL,                CURL_VERSION_ALTSVC),

#endif

#if defined(USE_ARES) && defined(CURLRES_THREADED) && defined(USE_HTTPSRR)

  FEATURE("asyn-rr", NULL,             0),

#endif

#ifdef CURLRES_ASYNCH

  FEATURE("AsynchDNS",   NULL,                CURL_VERSION_ASYNCHDNS),

#endif

#ifdef HAVE_BROTLI

  FEATURE("brotli",      NULL,                CURL_VERSION_BROTLI),

#endif

#ifdef DEBUGBUILD

  FEATURE("Debug",       NULL,                CURL_VERSION_DEBUG),

#endif

#if defined(USE_SSL) && defined(USE_ECH)

  FEATURE("ECH",         ech_present,         0),

#ifndef USE_HTTPSRR

#error "ECH enabled but not HTTPSRR, must be a config error"

#endif

#endif

#ifdef USE_GSASL

  FEATURE("gsasl",       NULL,                CURL_VERSION_GSASL),

#endif

#ifdef HAVE_GSSAPI

  FEATURE("GSS-API",     NULL,                CURL_VERSION_GSSAPI),

#endif

#ifndef CURL_DISABLE_HSTS

  FEATURE("HSTS",        NULL,                CURL_VERSION_HSTS),

#endif

#if defined(USE_NGHTTP2)

  FEATURE("HTTP2",       NULL,                CURL_VERSION_HTTP2),

#endif

#if defined(USE_HTTP3)

  FEATURE("HTTP3",       NULL,                CURL_VERSION_HTTP3),

#endif

#if defined(USE_SSL) && !defined(CURL_DISABLE_PROXY) && \

  !defined(CURL_DISABLE_HTTP)

  FEATURE("HTTPS-proxy", https_proxy_present, CURL_VERSION_HTTPS_PROXY),

#endif

#if defined(USE_HTTPSRR)

  FEATURE("HTTPSRR",     NULL,                0),

#endif

#if defined(USE_LIBIDN2) || defined(USE_WIN32_IDN) || defined(USE_APPLE_IDN)

  FEATURE("IDN",         idn_present,         CURL_VERSION_IDN),

#endif

#ifdef USE_IPV6

  FEATURE("IPv6",        NULL,                CURL_VERSION_IPV6),

#endif

#ifdef USE_KERBEROS5

  FEATURE("Kerberos",    NULL,                CURL_VERSION_KERBEROS5),

#endif

#if (SIZEOF_CURL_OFF_T > 4) && \

    ( (SIZEOF_OFF_T > 4) || defined(USE_WIN32_LARGE_FILES) )

  FEATURE("Largefile",   NULL,                CURL_VERSION_LARGEFILE),

#endif

#ifdef HAVE_LIBZ

  FEATURE("libz",        NULL,                CURL_VERSION_LIBZ),

#endif

#ifdef CURL_WITH_MULTI_SSL

  FEATURE("MultiSSL",    NULL,                CURL_VERSION_MULTI_SSL),

#endif

#ifdef USE_NTLM

  FEATURE("NTLM",        NULL,                CURL_VERSION_NTLM),

#endif

#if defined(USE_LIBPSL)

  FEATURE("PSL",         NULL,                CURL_VERSION_PSL),

#endif

#ifdef USE_SPNEGO

  FEATURE("SPNEGO",      NULL,                CURL_VERSION_SPNEGO),

#endif

#ifdef USE_SSL

  FEATURE("SSL",         NULL,                CURL_VERSION_SSL),

#endif

#if defined(USE_SSLS_EXPORT)

  FEATURE("SSLS-EXPORT", NULL,                0),

#endif

#ifdef USE_WINDOWS_SSPI

  FEATURE("SSPI",        NULL,                CURL_VERSION_SSPI),

#endif

#ifdef GLOBAL_INIT_IS_THREADSAFE

  FEATURE("threadsafe",  NULL,                CURL_VERSION_THREADSAFE),

#endif

#ifdef USE_TLS_SRP

  FEATURE("TLS-SRP",     NULL,                CURL_VERSION_TLSAUTH_SRP),

#endif

#ifdef CURLDEBUG

  FEATURE("TrackMemory", NULL,                CURL_VERSION_CURLDEBUG),

#endif

#if defined(_WIN32) && defined(UNICODE) && defined(_UNICODE)

  FEATURE("Unicode",     NULL,                CURL_VERSION_UNICODE),

#endif

#ifdef USE_UNIX_SOCKETS

  FEATURE("UnixSockets", NULL,                CURL_VERSION_UNIX_SOCKETS),

#endif

#ifdef HAVE_ZSTD

  FEATURE("zstd",        NULL,                CURL_VERSION_ZSTD),

#endif

  {NULL,                 NULL,                0}

};

static const char *feature_names[sizeof(features_table) /

                                 sizeof(features_table[0])] = {NULL};

static curl_version_info_data version_info = {

  CURLVERSION_NOW,

  LIBCURL_VERSION,

  LIBCURL_VERSION_NUM,

  CURL_OS, /* as found by configure or set by hand at build-time */

  0,    /* features bitmask is built at runtime */

  NULL, /* ssl_version */

  0,    /* ssl_version_num, this is kept at zero */

  NULL, /* zlib_version */

  supported_protocols,

  NULL, /* c-ares version */

  0,    /* c-ares version numerical */

  NULL, /* libidn version */

  0,    /* iconv version */

  NULL, /* ssh lib version */

  0,    /* brotli_ver_num */

  NULL, /* brotli version */

  0,    /* nghttp2 version number */

  NULL, /* nghttp2 version string */

  NULL, /* quic library string */

#ifdef CURL_CA_BUNDLE

  CURL_CA_BUNDLE, /* cainfo */

#else

  NULL,

#endif

#ifdef CURL_CA_PATH

  CURL_CA_PATH,  /* capath */

#else

  NULL,

#endif

  0,    /* zstd_ver_num */

  NULL, /* zstd version */

  NULL, /* Hyper version */

  NULL, /* gsasl version */

  feature_names,

  NULL  /* rtmp version */

};

curl_version_info_data *curl_version_info(CURLversion stamp)

{

  size_t n;

  const struct feat *p;

  int features = 0;

#if defined(USE_SSH)

  static char ssh_buf[80];  /* 'ssh_buffer' clashes with libssh/libssh.h */

#endif

#ifdef USE_SSL

#ifdef CURL_WITH_MULTI_SSL

  static char ssl_buffer[200];

#else

  static char ssl_buffer[80];

#endif

#endif

#ifdef HAVE_BROTLI

  static char brotli_buffer[80];

#endif

#ifdef HAVE_ZSTD

  static char zstd_buffer[80];

#endif

  (void)stamp; /* avoid compiler warnings, we do not use this */

#ifdef USE_SSL

  Curl_ssl_version(ssl_buffer, sizeof(ssl_buffer));

  version_info.ssl_version = ssl_buffer;

#endif

#ifdef HAVE_LIBZ

  version_info.libz_version = zlibVersion();

  /* libz left NULL if non-existing */

#endif

#ifdef USE_ARES

  {

    int aresnum;

    version_info.ares = ares_version(&aresnum);

    version_info.ares_num = aresnum;

  }

#endif

#ifdef USE_LIBIDN2

  /* This returns a version string if we use the given version or later,

     otherwise it returns NULL */

  version_info.libidn = idn2_check_version(IDN2_VERSION);

#endif

#if defined(USE_SSH)

  Curl_ssh_version(ssh_buf, sizeof(ssh_buf));

  version_info.libssh_version = ssh_buf;

#endif

#ifdef HAVE_BROTLI

  version_info.brotli_ver_num = BrotliDecoderVersion();

  brotli_version(brotli_buffer, sizeof(brotli_buffer));

  version_info.brotli_version = brotli_buffer;

#endif

#ifdef HAVE_ZSTD

  version_info.zstd_ver_num = (unsigned int)ZSTD_versionNumber();

  zstd_version(zstd_buffer, sizeof(zstd_buffer));

  version_info.zstd_version = zstd_buffer;

#endif

#ifdef USE_NGHTTP2

  {

    nghttp2_info *h2 = nghttp2_version(0);

    version_info.nghttp2_ver_num = (unsigned int)h2->version_num;

    version_info.nghttp2_version = h2->version_str;

  }

#endif

#ifdef USE_HTTP3

  {

    static char quicbuffer[80];

    Curl_quic_ver(quicbuffer, sizeof(quicbuffer));

    version_info.quic_version = quicbuffer;

  }

#endif

#ifdef USE_GSASL

  {

    version_info.gsasl_version = gsasl_check_version(NULL);

  }

#endif

  /* Get available features, build bitmask and names array. */

  n = 0;

  for(p = features_table; p->name; p++)

    if(!p->present || p->present(&version_info)) {

      features |= p->bitmask;

      feature_names[n++] = p->name;

    }

  feature_names[n] = NULL;  /* Terminate array. */

  version_info.features = features;

#ifdef USE_LIBRTMP

  {

    static char rtmp_version[30];

    Curl_rtmp_version(rtmp_version, sizeof(rtmp_version));

    version_info.rtmp_version = rtmp_version;

  }

#endif

  return &version_info;

}