build-auth-cmd ( cmd -- cmd )

Vocabulary

mongodb.connection.private

Inputs

cmd

an object

Outputs

cmd

an object

Definition

USING: accessors kernel mongodb.cmd mongodb.connection ;

IN: mongodb.connection.private

: build-auth-cmd ( cmd -- cmd )
    mdb-instance username>> "user" set-cmd-opt get-nonce
    [ "nonce" set-cmd-opt ] [ ] bi
    calculate-key-digest "key" set-cmd-opt ; inline