suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix OpenSSL ephemeral cipher test

Browse Source 
Thanks to Sam for the repair.
This commit is contained in:
Matthew Flatt 2019-06-27 15:02:30 -06:00
parent 993563a829
commit 67a1cd9274
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkgs/racket-test/tests/openssl/test-ephemeral.rkt
View File

@ -52,7 +52,7 @@
;; Test ECDHE ciphers ;; Test ECDHE ciphers
(test-ephemeral (lambda (server-ctx) (test-ephemeral (lambda (server-ctx)
(ssl-server-context-enable-ecdhe! server-ctx 'secp192k1)) (ssl-server-context-enable-ecdhe! server-ctx 'secp521r1))
"ECDHE-RSA-AES128-SHA256") "ECDHE-RSA-AES128-SHA256")
;; Sanity check for DHE: connection fails when enable! not called ;; Sanity check for DHE: connection fails when enable! not called
@ -63,7 +63,10 @@
(parameterize ((current-error-port (open-output-string))) (parameterize ((current-error-port (open-output-string)))
(test-ephemeral void "AES+EDH")))) (test-ephemeral void "AES+EDH"))))
;; Sanity check for ECDHE: connection fails when enable! not called ;; This used to be a sanity check for ECDHE, where the connection
;; fails when `enable!` is not called. But calling `enable!` is
;; apparently no longer necessary.
#;
(check-exn (check-exn
#rx"connect failed" #rx"connect failed"
(lambda () (lambda ()