mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-01-31 03:27:39 +00:00
cc1920749e
Your redbean can now interoperate with clients that require TLS crypto. This is accomplished using a protocol polyglot that lets us distinguish between HTTP and HTTPS regardless of the port number. Certificates will be generated automatically, if none are supplied by the user. Footprint increases by only a few hundred kb so redbean in MODY=tiny is now 1.0mb - Add lseek() polyfills for ZIP executable - Automatically polyfill /tmp/FOO paths on NT - Fix readdir() / ftw() / nftw() bugs on Windows - Introduce -B flag for slower SSL that's stronger - Remove mbedtls features Cosmopolitan doesn't need - Have base64 decoder support the uri-safe alternative - Remove Truncated HMAC because it's forbidden by the IETF - Add all the mbedtls test suites and make them go 3x faster - Support opendir() / readdir() / closedir() on ZIP executable - Use Everest for ECDHE-ECDSA because it's so good it's so good - Add tinier implementation of sha1 since it's not worth the rom - Add chi-square monte-carlo mean correlation tests for getrandom() - Source entropy on Windows from the proper interface everyone uses We're continuing to outperform NGINX and other servers on raw message throughput. Using SSL means that instead of 1,000,000 qps you can get around 300,000 qps. However redbean isn't as fast as NGINX yet at SSL handshakes, since redbean can do 2,627 per second and NGINX does 4.3k Right now, the SSL UX story works best if you give your redbean a key signing key since that can be easily generated by openssl using a one liner then redbean will do all the things that are impossibly hard to do like signing ecdsa and rsa certificates that'll work in chrome. We should integrate the let's encrypt acme protocol in the future. Live Demo: https://redbean.justine.lol/ Root Cert: https://redbean.justine.lol/redbean1.crt
298 lines
12 KiB
C
298 lines
12 KiB
C
#ifndef MBEDTLS_DEBUG_H
|
|
#define MBEDTLS_DEBUG_H
|
|
#include "third_party/mbedtls/config.h"
|
|
#include "third_party/mbedtls/ecp.h"
|
|
#include "third_party/mbedtls/ssl.h"
|
|
COSMOPOLITAN_C_START_
|
|
|
|
#ifdef MBEDTLS_DEBUG_C
|
|
|
|
#define MBEDTLS_DEBUG_STRIP_PARENS(...) __VA_ARGS__
|
|
|
|
#define MBEDTLS_SSL_DEBUG_MSG(level, args) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_print_msg(ssl, level, __FILE__, __LINE__, \
|
|
MBEDTLS_DEBUG_STRIP_PARENS args); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define MBEDTLS_SSL_DEBUG_RET(level, text, ret) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_print_ret(ssl, level, __FILE__, __LINE__, text, ret); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define MBEDTLS_SSL_DEBUG_BUF(level, text, buf, len) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_print_buf(ssl, level, __FILE__, __LINE__, text, buf, len); \
|
|
} \
|
|
} while (0)
|
|
|
|
#if defined(MBEDTLS_BIGNUM_C)
|
|
#define MBEDTLS_SSL_DEBUG_MPI(level, text, X) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_print_mpi(ssl, level, __FILE__, __LINE__, text, X); \
|
|
} \
|
|
} while (0)
|
|
#endif
|
|
|
|
#if defined(MBEDTLS_ECP_C)
|
|
#define MBEDTLS_SSL_DEBUG_ECP(level, text, X) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_print_ecp(ssl, level, __FILE__, __LINE__, text, X); \
|
|
} \
|
|
} while (0)
|
|
#endif
|
|
|
|
#if defined(MBEDTLS_X509_CRT_PARSE_C)
|
|
#define MBEDTLS_SSL_DEBUG_CRT(level, text, crt) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_print_crt(ssl, level, __FILE__, __LINE__, text, crt); \
|
|
} \
|
|
} while (0)
|
|
#endif
|
|
|
|
#if defined(MBEDTLS_ECDH_C)
|
|
#define MBEDTLS_SSL_DEBUG_ECDH(level, ecdh, attr) \
|
|
do { \
|
|
if (level <= mbedtls_debug_threshold) { \
|
|
mbedtls_debug_printf_ecdh(ssl, level, __FILE__, __LINE__, ecdh, attr); \
|
|
} \
|
|
} while (0)
|
|
#endif
|
|
|
|
#else /* MBEDTLS_DEBUG_C */
|
|
|
|
#define MBEDTLS_SSL_DEBUG_MSG(level, args) ((void)0)
|
|
#define MBEDTLS_SSL_DEBUG_RET(level, text, ret) ((void)0)
|
|
#define MBEDTLS_SSL_DEBUG_BUF(level, text, buf, len) ((void)0)
|
|
#define MBEDTLS_SSL_DEBUG_MPI(level, text, X) ((void)0)
|
|
#define MBEDTLS_SSL_DEBUG_ECP(level, text, X) ((void)0)
|
|
#define MBEDTLS_SSL_DEBUG_CRT(level, text, crt) ((void)0)
|
|
#define MBEDTLS_SSL_DEBUG_ECDH(level, ecdh, attr) ((void)0)
|
|
|
|
#endif /* MBEDTLS_DEBUG_C */
|
|
|
|
/**
|
|
* \def MBEDTLS_PRINTF_ATTRIBUTE
|
|
*
|
|
* Mark a function as having printf attributes, and thus enable checking
|
|
* via -wFormat and other flags. This does nothing on builds with compilers
|
|
* that do not support the format attribute
|
|
*
|
|
* Module: library/debug.c
|
|
* Caller:
|
|
*
|
|
* This module provides debugging functions.
|
|
*/
|
|
#if defined(__has_attribute)
|
|
#if __has_attribute(format)
|
|
#define MBEDTLS_PRINTF_ATTRIBUTE(string_index, first_to_check) \
|
|
__attribute__((format(printf, string_index, first_to_check)))
|
|
#else /* __has_attribute(format) */
|
|
#define MBEDTLS_PRINTF_ATTRIBUTE(string_index, first_to_check)
|
|
#endif /* __has_attribute(format) */
|
|
#else /* defined(__has_attribute) */
|
|
#define MBEDTLS_PRINTF_ATTRIBUTE(string_index, first_to_check)
|
|
#endif
|
|
|
|
/**
|
|
* \def MBEDTLS_PRINTF_SIZET
|
|
*
|
|
* MBEDTLS_PRINTF_xxx: Due to issues with older window compilers
|
|
* and MinGW we need to define the printf specifier for size_t
|
|
* and long long per platform.
|
|
*
|
|
* Module: library/debug.c
|
|
* Caller:
|
|
*
|
|
* This module provides debugging functions.
|
|
*/
|
|
#if defined(__MINGW32__) || (defined(_MSC_VER) && _MSC_VER < 1800)
|
|
#define MBEDTLS_PRINTF_SIZET PRIuPTR
|
|
#define MBEDTLS_PRINTF_LONGLONG "I64d"
|
|
#else /* defined(__MINGW32__) || (defined(_MSC_VER) && _MSC_VER < 1800) */
|
|
#define MBEDTLS_PRINTF_SIZET "zu"
|
|
#define MBEDTLS_PRINTF_LONGLONG "lld"
|
|
#endif /* defined(__MINGW32__) || (defined(_MSC_VER) && _MSC_VER < 1800) */
|
|
|
|
extern char mbedtls_debug_threshold;
|
|
|
|
/**
|
|
* \brief Set the threshold error level to handle globally all debug output.
|
|
* Debug messages that have a level over the threshold value are
|
|
* discarded.
|
|
* (Default value: 0 = No debug )
|
|
*
|
|
* \param threshold theshold level of messages to filter on. Messages at a
|
|
* higher level will be discarded.
|
|
* - Debug levels
|
|
* - 0 No debug
|
|
* - 1 Error
|
|
* - 2 State change
|
|
* - 3 Informational
|
|
* - 4 Verbose
|
|
*/
|
|
void mbedtls_debug_set_threshold(int threshold);
|
|
|
|
/**
|
|
* \brief Print a message to the debug output. This function is always used
|
|
* through the MBEDTLS_SSL_DEBUG_MSG() macro, which supplies the ssl
|
|
* context, file and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the message has occurred in
|
|
* \param line line number the message has occurred at
|
|
* \param format format specifier, in printf format
|
|
* \param ... variables used by the format specifier
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_print_msg(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line, const char *format,
|
|
...) MBEDTLS_PRINTF_ATTRIBUTE(5, 6);
|
|
|
|
/**
|
|
* \brief Print the return value of a function to the debug output. This
|
|
* function is always used through the MBEDTLS_SSL_DEBUG_RET() macro,
|
|
* which supplies the ssl context, file and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the error has occurred in
|
|
* \param line line number the error has occurred in
|
|
* \param text the name of the function that returned the error
|
|
* \param ret the return code value
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_print_ret(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line, const char *text,
|
|
int ret);
|
|
|
|
/**
|
|
* \brief Output a buffer of size len bytes to the debug output. This function
|
|
* is always used through the MBEDTLS_SSL_DEBUG_BUF() macro,
|
|
* which supplies the ssl context, file and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the error has occurred in
|
|
* \param line line number the error has occurred in
|
|
* \param text a name or label for the buffer being dumped. Normally the
|
|
* variable or buffer name
|
|
* \param buf the buffer to be outputted
|
|
* \param len length of the buffer
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_print_buf(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line, const char *text,
|
|
const unsigned char *buf, size_t len);
|
|
|
|
#if defined(MBEDTLS_BIGNUM_C)
|
|
/**
|
|
* \brief Print a MPI variable to the debug output. This function is always
|
|
* used through the MBEDTLS_SSL_DEBUG_MPI() macro, which supplies the
|
|
* ssl context, file and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the error has occurred in
|
|
* \param line line number the error has occurred in
|
|
* \param text a name or label for the MPI being output. Normally the
|
|
* variable name
|
|
* \param X the MPI variable
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_print_mpi(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line, const char *text,
|
|
const mbedtls_mpi *X);
|
|
#endif
|
|
|
|
#if defined(MBEDTLS_ECP_C)
|
|
/**
|
|
* \brief Print an ECP point to the debug output. This function is always
|
|
* used through the MBEDTLS_SSL_DEBUG_ECP() macro, which supplies the
|
|
* ssl context, file and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the error has occurred in
|
|
* \param line line number the error has occurred in
|
|
* \param text a name or label for the ECP point being output. Normally the
|
|
* variable name
|
|
* \param X the ECP point
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_print_ecp(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line, const char *text,
|
|
const mbedtls_ecp_point *X);
|
|
#endif
|
|
|
|
#if defined(MBEDTLS_X509_CRT_PARSE_C)
|
|
/**
|
|
* \brief Print a X.509 certificate structure to the debug output. This
|
|
* function is always used through the MBEDTLS_SSL_DEBUG_CRT() macro,
|
|
* which supplies the ssl context, file and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the error has occurred in
|
|
* \param line line number the error has occurred in
|
|
* \param text a name or label for the certificate being output
|
|
* \param crt X.509 certificate structure
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_print_crt(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line, const char *text,
|
|
const mbedtls_x509_crt *crt);
|
|
#endif
|
|
|
|
#if defined(MBEDTLS_ECDH_C)
|
|
typedef enum {
|
|
MBEDTLS_DEBUG_ECDH_Q,
|
|
MBEDTLS_DEBUG_ECDH_QP,
|
|
MBEDTLS_DEBUG_ECDH_Z,
|
|
} mbedtls_debug_ecdh_attr;
|
|
|
|
/**
|
|
* \brief Print a field of the ECDH structure in the SSL context to the debug
|
|
* output. This function is always used through the
|
|
* MBEDTLS_SSL_DEBUG_ECDH() macro, which supplies the ssl context, file
|
|
* and line number parameters.
|
|
*
|
|
* \param ssl SSL context
|
|
* \param level error level of the debug message
|
|
* \param file file the error has occurred in
|
|
* \param line line number the error has occurred in
|
|
* \param ecdh the ECDH context
|
|
* \param attr the identifier of the attribute being output
|
|
*
|
|
* \attention This function is intended for INTERNAL usage within the
|
|
* library only.
|
|
*/
|
|
void mbedtls_debug_printf_ecdh(const mbedtls_ssl_context *ssl, int level,
|
|
const char *file, int line,
|
|
const mbedtls_ecdh_context *ecdh,
|
|
mbedtls_debug_ecdh_attr attr);
|
|
#endif
|
|
|
|
COSMOPOLITAN_C_END_
|
|
#endif /* MBEDTLS_DEBUG_H */
|