implemented brg06 issuersFrameVar

lib/local_augmentation_example.ex

@@ -68,6 +68,23 @@ defmodule Index.Augmentation do
       end
     end
 
+    def issuersFrameVar(global_bindex,local_bindex) do
+      key = :ets.first(local_bindex)
+      [{key, head}] = :ets.lookup(local_bindex, key)
+      if head.number==0 do
+        :ets.insert(local_bindex, {key, Map.merge(head, %{issuersFrameVar: 0})})
+      else
+        [[head_1_id]] = :dets.match(global_bindex, {:"$1", %{number: head.number - 1}})
+        [{_key_1, head_1}] = :dets.lookup(global_bindex, head_1_id)
+        variation = head_1.issuersFrameVar + 5*(head.issuersCount - head_1.issuersCount)
+        case head_1.issuersFrameVar do
+          x when x>0 -> variation - 1
+          x when x<0 -> variation + 1
+          0 -> variation
+        end |> (&:ets.insert(local_bindex, {key, Map.merge(head, %{issuersFrameVar: &1})})).()
+      end
+    end
+
     def previousHash(global_bindex, local_bindex) do
       key = :ets.first(local_bindex)
       [{key, head}] = :ets.lookup(local_bindex, key)

test/block/augmentation/issuersFrameVar_test.exs

+defmodule Block.Augmentation.IssuersFrameVarTest do
+  use ExUnit.Case
+
+  doctest Index.Augmentation.BIndex
+
+  setup_all do
+    :file.delete("test/global_bindex")
+    local_bindex = :ets.new(:"test/local_bindex", [:ordered_set, :protected])
+    {:ok, global_bindex} = :dets.open_file(:"test/global_bindex", type: :set)
+    :dets.insert(global_bindex, {2, %{number: 2, issuersFrameVar: 5, issuersCount: 19}})
+    :dets.insert(global_bindex, {1, %{number: 1, issuersFrameVar: -3, issuersCount: 51 }})
+    :dets.insert(global_bindex, {0, %{number: 0, issuersFrameVar: 0, issuersCount: 24 }})
+
+    :ets.insert(local_bindex, {4, %{number: 0, issuersCount: 58}})
+    Index.Augmentation.BIndex.issuersFrameVar(global_bindex, local_bindex)
+    [{4, head}] = :ets.lookup(local_bindex, 4)
+    issuersFrameVar_0 = head.issuersFrameVar
+
+    :ets.insert(local_bindex, {3, %{number: 3,issuersCount: 29}})
+    Index.Augmentation.BIndex.issuersFrameVar(global_bindex, local_bindex)
+    [{3, head}] = :ets.lookup(local_bindex, 3)
+    issuersFrameVar_54 = head.issuersFrameVar
+
+    :ets.insert(local_bindex, {2, %{number: 2,issuersCount: 17}})
+    Index.Augmentation.BIndex.issuersFrameVar(global_bindex, local_bindex)
+    [{2, head}] = :ets.lookup(local_bindex, 2)
+    issuersFrameVar_m172 = head.issuersFrameVar
+
+    :ets.insert(local_bindex, {1, %{number: 1,issuersCount: 38}})
+    Index.Augmentation.BIndex.issuersFrameVar(global_bindex, local_bindex)
+    [{1, head}] = :ets.lookup(local_bindex, 1)
+    issuersFrameVar_70 = head.issuersFrameVar
+
+    :dets.close(global_bindex)
+    :dets.close(local_bindex)
+    :file.delete("test/global_bindex")
+    :file.delete("test/local_bindex")
+
+    {:ok, issuersFrameVar_0: issuersFrameVar_0, issuersFrameVar_54: issuersFrameVar_54, issuersFrameVar_m172: issuersFrameVar_m172, issuersFrameVar_70: issuersFrameVar_70}
+  end
+
+  test "check previousIssuer", state do
+    assert state.issuersFrameVar_0 == 0
+    assert state.issuersFrameVar_54== 54
+    assert state.issuersFrameVar_m172 == -172
+    assert state.issuersFrameVar_70 == 70
+  end
+end