<ssl-handle> ( fd -- ssl )

Vocabulary

io.sockets.secure.openssl

Inputs

fd

an object

Outputs

ssl

an object

Definition

USING: accessors destructors kernel openssl openssl.libssl ;

IN: io.sockets.secure.openssl

: <ssl-handle> ( fd -- ssl )
    [
        ssl-handle new-disposable |dispose
        current-secure-context handle>> SSL_new dup ssl-error
        >>handle swap >>file set-secure-cipher-list-only
    ] with-destructors ;