sign ( s3-request -- string )

Vocabulary

s3.private

Inputs

s3-request

an object

Outputs

string

an object

Definition

USING: base64 checksums.hmac checksums.sha make namespaces s3 ;

IN: s3.private

: sign ( s3-request -- string )
    [
        "AWS " % key-id get % ":" %
        signature secret-key get sha1 hmac-bytes >base64 %
    ] "" make ;