@@ -1,20 +1,7 @@
-module(oauth).
--export(
- [ get/5
- , get/6
- , header/1
- , post/5
- , post/6
- , signature/5
- , signature_base_string/3
- , signed_params/6
- , token/1
- , token_secret/1
- , uri/2
- , verify/6
- ]).
-
+-export([get/5, get/6, header/1, post/5, post/6, signature/5, signature_base_string/3,
+ signed_params/6, token/1, token_secret/1, uri/2, verify/6]).
get(URL, ExtraParams, Consumer, Token, TokenSecret) ->
get(URL, ExtraParams, Consumer, Token, TokenSecret, []).
@@ -2,7 +2,6 @@
-export([signature/3, verify/4]).
signature(BaseString, CS, TS) ->
Key = oauth_uri:calate("&", [CS, TS]),
base64:encode_to_string(crypto:sha_mac(Key, BaseString)).
-export([get/1, get/2, post/2, post/3, response_params/1, response_body/1, response_code/1]).
get(URL) ->
get(URL, []).
-export([signature/2, verify/3]).
signature(CS, TS) ->
oauth_uri:calate("&", [CS, TS]).
@@ -4,7 +4,6 @@
-include_lib("public_key/include/public_key.hrl").
signature(BaseString, PrivateKeyPath) ->
{ok, [Info]} = public_key:pem_to_der(PrivateKeyPath),
{ok, PrivateKey} = public_key:decode_private_key(Info),
-export([timestamp/0]).
timestamp() ->
timestamp(calendar:universal_time()).
@@ -1,12 +1,10 @@
-module(oauth_uri).
--export([normalize/1, calate/2, encode/1]).
--export([params_from_string/1, params_to_string/1,
- params_from_header_string/1, params_to_header_string/1]).
+-export([calate/2, encode/1, normalize/1, params_from_string/1,
+ params_from_header_string/1, params_to_string/1, params_to_header_string/1]).
-import(lists, [concat/1]).
normalize(URI) ->
case http_uri:parse(URI) of
{Scheme, UserInfo, Host, Port, Path, _Query} ->