check-certificate ( host handle -- )

Vocabulary

io.sockets.secure

Inputs

host	an object
handle	an object

Outputs

None

Definition

IN: io.sockets.secure

HOOK: check-certificate secure-socket-backend ( host handle -- )

Methods

USING: accessors io.sockets.secure io.sockets.secure.openssl
kernel openssl ;

M: openssl check-certificate
    current-secure-context config>> verify>> [
        handle>>
        [ nip check-verify-result ] [ check-subject-name ] 2bi
    ] [ 2drop ] if ;