diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/catlfish.erl | 1 | ||||
-rw-r--r-- | src/catlfish_app.erl | 3 | ||||
-rw-r--r-- | src/v1.erl | 11 |
3 files changed, 7 insertions, 8 deletions
diff --git a/src/catlfish.erl b/src/catlfish.erl index cd871f5..73066bb 100644 --- a/src/catlfish.erl +++ b/src/catlfish.erl @@ -4,7 +4,6 @@ -module(catlfish). -export([add_chain/2, entries/2, entry_and_proof/2]). -export([known_roots/0, update_known_roots/0]). --include("$CTROOT/plop/include/plop.hrl"). -include_lib("eunit/include/eunit.hrl"). -define(PROTOCOL_VERSION, 0). diff --git a/src/catlfish_app.erl b/src/catlfish_app.erl index 7e26243..39c3109 100644 --- a/src/catlfish_app.erl +++ b/src/catlfish_app.erl @@ -1,3 +1,6 @@ +%%% Copyright (c) 2014, NORDUnet A/S. +%%% See LICENSE for licensing information. + -module(catlfish_app). -behaviour(application). @@ -9,8 +9,6 @@ 'get-sth-consistency'/3, 'get-proof-by-hash'/3, 'get-entries'/3, 'get-roots'/3, 'get-entry-and-proof'/3]). --include("$CTROOT/plop/include/plop.hrl"). - %% Public functions, i.e. part of URL. 'add-chain'(SessionID, _Env, Input) -> R = case (catch jiffy:decode(Input)) of @@ -44,11 +42,10 @@ niy(SessionID). 'get-sth'(SessionID, _Env, _Input) -> - #sth{ - treesize = Treesize, - timestamp = Timestamp, - roothash = Roothash, - signature = Signature} = plop:sth(), + { Treesize, + Timestamp, + Roothash, + Signature} = plop:sth(), R = [{tree_size, Treesize}, {timestamp, Timestamp}, {sha256_root_hash, base64:encode(Roothash)}, |