io.sockets.secure.openssl.tests: remove windows.winsock import and another test for subject-name

db4
Björn Lindqvist 2013-10-10 18:41:33 +02:00 committed by John Benediktsson
parent 0b15b47743
commit 729bd8a362
1 changed files with 12 additions and 2 deletions

View File

@ -7,8 +7,7 @@ USING:
openssl.libcrypto openssl.libssl
sequences
tools.test
urls
windows.winsock ;
urls ;
IN: io.sockets.secure.openssl.tests
: new-ssl ( -- ssl )
@ -30,3 +29,14 @@ IN: io.sockets.secure.openssl.tests
new-ssl dup remote ssl-socket-connect dup SSL_set_bio
dup SSL_connect drop SSL_get_peer_certificate subject-name
] unit-test
[ "www.google.com" ] [
new-ssl
[
remote (client) drop nip handle>> handle>>
alien-address BIO_NOCLOSE BIO_new_socket dup SSL_set_bio
]
[ SSL_connect drop ]
[ SSL_get_peer_certificate ] tri
subject-name
] unit-test