summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/catlfish.erl1
-rw-r--r--src/catlfish_app.erl3
-rw-r--r--src/v1.erl11
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).
diff --git a/src/v1.erl b/src/v1.erl
index 8c748e5..d5e65ea 100644
--- a/src/v1.erl
+++ b/src/v1.erl
@@ -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)},