Packages

jose

1.1.3
1.11.12 1.11.11 1.11.10 1.11.9 1.11.8 1.11.7 1.11.6 1.11.5 1.11.4 1.11.2 1.11.1 1.11.0 1.10.1 1.10.0 1.9.0 1.8.4 1.8.3 1.8.2 1.8.1 1.8.0 1.7.9 1.7.8 1.7.7 1.7.6 1.7.5 1.7.4 1.7.3 1.7.2 1.7.1 1.7.0 1.6.1 1.6.0 1.5.2 1.5.1 1.5.0 1.4.2 1.4.1 1.4.0 1.3.0 1.2.0 1.1.3 1.1.2 1.1.1 1.1.0 1.0.1 1.0.0

JSON Object Signing and Encryption (JOSE) for Erlang and Elixir.

Security advisory: This version has known vulnerabilities. View advisories
HexDocs

Current section

Files

Jump to
Readme
46 Versions
2 Dependencies
Dependants
1 Advisory
Files
Activity
jose src jose_jws_alg_hmac.erl
Raw

src/jose_jws_alg_hmac.erl 

%% -*- mode: erlang; tab-width: 4; indent-tabs-mode: 1; st-rulers: [70] -*-

%% vim: ts=4 sw=4 ft=erlang noet

%%%-------------------------------------------------------------------

%%% @author Andrew Bennett <andrew@pixid.com>

%%% @copyright 2014-2015, Andrew Bennett

%%% @doc

%%%

%%% @end

%%% Created :  23 Jul 2015 by Andrew Bennett <andrew@pixid.com>

%%%-------------------------------------------------------------------

-module(jose_jws_alg_hmac).

-behaviour(jose_jws).

-behaviour(jose_jws_alg).



-include("jose_jwk.hrl").



%% jose_jws callbacks

-export([from_map/1]).

-export([to_map/2]).

%% jose_jws_alg callbacks

-export([sign/3]).

-export([verify/4]).

%% API



%% Types

-record(jose_jws_alg_hmac, {

	hmac = undefined :: undefined | sha256 | sha384 | sha512

}).



-type alg() :: #jose_jws_alg_hmac{}.



-export_type([alg/0]).



-define(HS256, #jose_jws_alg_hmac{hmac=sha256}).

-define(HS384, #jose_jws_alg_hmac{hmac=sha384}).

-define(HS512, #jose_jws_alg_hmac{hmac=sha512}).



%%====================================================================

%% jose_jws callbacks

%%====================================================================



from_map(F = #{ <<"alg">> := <<"HS256">> }) ->

	{?HS256, maps:remove(<<"alg">>, F)};

from_map(F = #{ <<"alg">> := <<"HS384">> }) ->

	{?HS384, maps:remove(<<"alg">>, F)};

from_map(F = #{ <<"alg">> := <<"HS512">> }) ->

	{?HS512, maps:remove(<<"alg">>, F)}.



to_map(?HS256, F) ->

	F#{ <<"alg">> => <<"HS256">> };

to_map(?HS384, F) ->

	F#{ <<"alg">> => <<"HS384">> };

to_map(?HS512, F) ->

	F#{ <<"alg">> => <<"HS512">> }.



%%====================================================================

%% jose_jws_alg callbacks

%%====================================================================



sign(#jose_jwk{kty={KTYModule, KTY}}, Message, #jose_jws_alg_hmac{hmac=HMAC}) ->

	KTYModule:sign(Message, HMAC, KTY).



verify(#jose_jwk{kty={KTYModule, KTY}}, Message, Signature, #jose_jws_alg_hmac{hmac=HMAC}) ->

	KTYModule:verify(Message, HMAC, Signature, KTY).



%%====================================================================

%% API functions

%%====================================================================



%%%-------------------------------------------------------------------

%%% Internal functions

%%%-------------------------------------------------------------------