openssl.libssl: Add some bindings

diff --git a/basis/openssl/libssl/libssl.factor b/basis/openssl/libssl/libssl.factor
index 8f220167c9fae2c4812d0a34160899055a2476d8..537e10f98474f1735d94fb93b86ee61bd48a5b37 100644 (file)
--- a/basis/openssl/libssl/libssl.factor
+++ b/basis/openssl/libssl/libssl.factor
@@ -411,6 +411,28 @@ FUNCTION: ssl-method TLSv1_method (  )
 FUNCTION: ssl-method TLSv1_1_method (  )
 FUNCTION: ssl-method TLSv1_2_method (  )
 
+CONSTANT: DTLS1_VERSION_MAJOR 0xfe
+CONSTANT: SSL3_VERSION_MAJOR 0x03
+CONSTANT: SSL3_VERSION 0x0300
+CONSTANT: TLS1_VERSION 0x0301
+CONSTANT: TLS1_1_VERSION 0x0302
+CONSTANT: TLS1_2_VERSION 0x0303
+CONSTANT: TLS1_3_VERSION 0x0304
+CONSTANT: DTLS1_VERSION 0xfeff
+CONSTANT: DTLS1_2_VERSION 0xfefd
+
+FUNCTION: int SSL_CTX_set_min_proto_version ( SSL_CTX* ctx, uint16_t version )
+FUNCTION: int SSL_CTX_set_max_proto_version ( SSL_CTX* ctx, uint16_t version )
+FUNCTION: uint16_t SSL_CTX_get_min_proto_version ( SSL_CTX* ctx )
+FUNCTION: uint16_t SSL_CTX_get_max_proto_version ( SSL_CTX* ctx )
+
+FUNCTION: int SSL_set_min_proto_version ( SSL* ssl, uint16_t version )
+FUNCTION: int SSL_set_max_proto_version ( SSL* ssl, uint16_t version )
+FUNCTION: uint16_t SSL_get_min_proto_version ( SSL* ssl )
+FUNCTION: uint16_t SSL_get_max_proto_version ( SSL* ssl )
+
+FUNCTION: int SSL_version ( SSL *ssl )
+
 FUNCTION: void SSL_SESSION_free ( SSL_SESSION* ses )
 FUNCTION: void RAND_seed ( void* buf, int num )
 FUNCTION: void* BIO_f_ssl (  )