tim / erlang-oauth
watch download tarball
public
Forks8Right
Watchers53Right
Description: An Erlang OAuth implementation
Homepage:
Clone URL: git://github.com/tim/erlang-oauth.git 
Specifying version key, to help automatic building tools to build the 
application.
Roberto Aloi (author)
Thu Jun 04 02:17:53 -0700 2009
Tim Fletcher (committer)
Thu Jun 04 14:23:42 -0700 2009
commit  5d93e6bf3b1593281a0f4a926f13c64dbcd9c4dc
tree    e980803e090ed699b5f8e5abac60a79206cf4d9d
parent  09857076a1cb0963eacc2f46495bb22b9c6ef8db
erlang-oauth / src / oauth_hmac_sha1.erl
100644 12 lines (7 sloc) 0.286 kb
raw blame history 
1
2
3
4
5
6
7
8
9
10
11
12

-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) ->
  Signature =:= signature(BaseString, CS, TS).