alternative-dns-names ( certificate -- dns-names )

Vocabulary

io.sockets.secure.openssl

Inputs

certificate

an SSL peer certificate

Outputs

dns-names

a sequence

Word description

Alternative subject names for the certificate.

Definition

USING: accessors alien.strings io.encodings.utf8 kernel
openssl.libssl sequences ;

IN: io.sockets.secure.openssl

: alternative-dns-names ( certificate -- dns-names )
    NID_subject_alt_name f f X509_get_ext_d2i
    [ name-stack>sequence ] [ f ] if*
    [ type>> GEN_DNS = ] filter
    [ d>> dNSName>> data>> utf8 alien>string ] map ;