blob: 35549cfcdeb703d03435351e581f55db1f4f4321 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
-module(oauth_hmac_sha1).
-export([signature/3, verify/4]).
signature(BaseString, CS, TS) ->
Key = oauth_uri:calate("&", [CS, TS]),
base64:encode_to_string(crypto:sha_mac(Key, BaseString)).
verify(Signature, BaseString, CS, TS) ->
couch_util:verify(Signature, signature(BaseString, CS, TS)).
|
