evp-md-context

Vocabulary

checksums.openssl.private

Definition

USING: destructors ;

IN: checksums.openssl.private

TUPLE: evp-md-context < disposable handle ;

Methods

USING: accessors checksums checksums.openssl.private kernel
openssl openssl.libcrypto sequences ;

M: evp-md-context add-checksum-bytes
    [ dup handle>> ] dip dup length EVP_DigestUpdate ssl-error ;


USING: accessors checksums.openssl.private destructors ;

M: evp-md-context dispose* handle>> evp-md-ctx-free ;


USING: accessors alien.c-types alien.data checksums
checksums.openssl.private openssl openssl.libcrypto ;

M: evp-md-context get-checksum
    handle>>
    { { int EVP_MAX_MD_SIZE } int }
    [ EVP_DigestFinal_ex ssl-error ] with-out-parameters
    memory>byte-array ;