update net/win32-ssl docs for 'secure

This commit is contained in:
Matthew Flatt 2016-01-06 09:04:52 -07:00
parent f9d224929c
commit 2ad4ca6776

View File

@ -13,16 +13,13 @@ OpenSSL libraries are installed.}
@defproc[(win32-ssl-connect [hostname string?] @defproc[(win32-ssl-connect [hostname string?]
[port-no (integer-in 1 65535)] [port-no (integer-in 1 65535)]
[client-protocol [client-protocol
(or/c 'sslv2-or-v3 (or/c 'secure 'auto
'sslv2 'sslv2-or-v3 'sslv2 'sslv3 'tls 'tls11 'tls12)
'sslv3 'auto])
'tls)
'sslv2-or-v3])
(values (and/c input-port? win32-ssl-port?) (values (and/c input-port? win32-ssl-port?)
(and/c output-port? win32-ssl-port?))]{ (and/c output-port? win32-ssl-port?))]{
Like @racket[ssl-connect], but without support for client contexts Like @racket[ssl-connect], but without support for client contexts.}
(which could enable certificate checking, for example).}
@defproc[(win32-ssl-abandon-port [in (and/c win32-ssl-port? output-port?)]) void?]{ @defproc[(win32-ssl-abandon-port [in (and/c win32-ssl-port? output-port?)]) void?]{
@ -33,11 +30,18 @@ Analogous to @racket[ssl-abandon-port].}
@defproc[(ports->win32-ssl-ports @defproc[(ports->win32-ssl-ports
[input-port input-port?] [input-port input-port?]
[output-port output-port?] [output-port output-port?]
[#:encrypt protocol (or/c 'sslv2-or-v3 'sslv2 'sslv3 'tls) 'sslv2-or-v3]) [#:encrypt protocol (or/c 'secure 'auto
'sslv2-or-v3 'sslv2 'sslv3 'tls 'tls11 'tls12)]
[#:hostname hostname (or/c #f string?) #f])
(values (and/c input-port? win32-ssl-port?) (values (and/c input-port? win32-ssl-port?)
(and/c output-port? win32-ssl-port?))]{ (and/c output-port? win32-ssl-port?))]{
Analogous to @racket[ports->ssl-ports].} Analogous to @racket[ports->ssl-ports].
If hostname verification is enabled via @racket['secure], the peer
server's certificate is checked against @racket[hostname].
@history[#:changed "6.3.0.12" @elem{Added the @racket[#:hostname] argument.}]}
@defproc[(win32-ssl-port? [v any/c]) boolean?]{ @defproc[(win32-ssl-port? [v any/c]) boolean?]{