implement SSL_set_verify_result

Overrides the value that will be returned by `SSL_get_verify_result()`.
Is this smart to do? Probably not.

Author: cpu

MATRIX.md

@@ -475,7 +475,7 @@
 | `SSL_set_trust`  |  |  |  |
 | `SSL_set_verify`  |  | :white_check_mark: | :white_check_mark: |
 | `SSL_set_verify_depth`  |  | :white_check_mark: | :white_check_mark: |
-| `SSL_set_verify_result`  |  |  |  |
+| `SSL_set_verify_result`  |  |  | :white_check_mark: |
 | `SSL_set_wfd` [^sock] |  |  |  |
 | `SSL_shutdown`  | :white_check_mark: | :white_check_mark: | :white_check_mark: |
 | `SSL_srp_server_param_with_username` [^deprecatedin_3_0] [^srp] |  |  |  |

build.rs

@@ -210,6 +210,7 @@ const ENTRYPOINTS: &[&str] = &[
     "SSL_set_SSL_CTX",
     "SSL_set_verify",
     "SSL_set_verify_depth",
+    "SSL_set_verify_result",
     "SSL_shutdown",
     "SSL_up_ref",
     "SSL_use_certificate",

src/entry.rs

@@ -1294,6 +1294,12 @@ entry! {
     }
 }
 
+entry! {
+    pub fn _SSL_set_verify_result(ssl: *mut SSL, v: c_long) {
+        try_clone_arc!(ssl).get().set_last_verification_result(v)
+    }
+}
+
 entry! {
     pub fn _SSL_get_certificate(ssl: *const SSL) -> *mut X509 {
         try_clone_arc!(ssl).get().get_certificate()

src/lib.rs

@@ -1395,6 +1395,14 @@ impl Ssl {
         }
     }
 
+    fn set_last_verification_result(&self, v: i64) {
+        match &self.conn {
+            ConnState::Client(_, verifier) => verifier.update_last_result(v),
+            ConnState::Server(_, verifier, _) => verifier.update_last_result(v),
+            _ => {}
+        }
+    }
+
     fn get_last_verification_sig_scheme(&self) -> Option<SignatureScheme> {
         match &self.conn {
             ConnState::Client(_, verifier) => verifier.last_sig_scheme(),

src/verifier.rs

@@ -66,6 +66,10 @@ impl ServerVerifier {
         self.last_result.load(Ordering::Acquire)
     }
 
+    pub fn update_last_result(&self, v: i64) {
+        self.last_result.store(v, Ordering::Relaxed);
+    }
+
     pub fn last_sig_scheme(&self) -> Option<SignatureScheme> {
         self.last_sig_scheme.read().ok().map(|scheme| *scheme)?
     }
@@ -202,6 +206,10 @@ impl ClientVerifier {
         self.last_result.load(Ordering::Acquire)
     }
 
+    pub fn update_last_result(&self, v: i64) {
+        self.last_result.store(v, Ordering::Relaxed);
+    }
+
     pub fn last_sig_scheme(&self) -> Option<SignatureScheme> {
         self.last_sig_scheme.read().ok().map(|scheme| *scheme)?
     }