From e6db8a57cb56c7f2c5fdee16cea41c9e4430851e Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@nordu.net>
Date: Mon, 6 Feb 2017 07:55:45 +0100
Subject: Add a bit of status and debug printout.

---
 merge/src/merge_dist.erl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to 'merge')

diff --git a/merge/src/merge_dist.erl b/merge/src/merge_dist.erl
index 4aa94aa..25e13ec 100644
--- a/merge/src/merge_dist.erl
+++ b/merge/src/merge_dist.erl
@@ -51,11 +51,14 @@ dist({struct, PropList} = STH,
     Timestamp = proplists:get_value(<<"timestamp">>, PropList),
     RootHash = base64:decode(proplists:get_value(<<"sha256_root_hash">>, PropList)),
     Signature = base64:decode(proplists:get_value(<<"tree_head_signature">>, PropList)),
+    Logordersize = index:indexsize(logorder),
     TS = case Timestamp > LastTimestamp of
              true ->
                  true = plop:verify_sth(Treesize, Timestamp, RootHash, Signature),
                  try
-                     ok = do_dist(NodeAddress, min(Treesize, index:indexsize(logorder))),
+                     lager:info("~p: starting dist, sth at ~B, logorder at ~B",
+                                [NodeAddress, Treesize, Logordersize]),
+                     ok = do_dist(NodeAddress, min(Treesize, Logordersize)),
                      ok = publish_sth(NodeAddress, STH),
                      lager:info("~p: Published STH with size ~B and timestamp " ++
                                     "~p.", [NodeAddress, Treesize, Timestamp]),
@@ -79,7 +82,8 @@ dist({struct, PropList} = STH,
 %% merge_util:request/4.
 do_dist(NodeAddress, Size) ->
     {ok, VerifiedSize} = frontend_get_verifiedsize(NodeAddress),
-    true = Size >= VerifiedSize,
+    lager:debug("~p: verifiedsize ~B", [NodeAddress, VerifiedSize]),
+    true = VerifiedSize =< Size,
     do_dist(NodeAddress, VerifiedSize, Size - VerifiedSize).
 
 do_dist(_, _, 0) ->
-- 
cgit v1.1