-module(nifHashb).

-on_load(init/0).

-export([
   new/0
   , get/2
   , put/3
   , hash1/2
   , hash2/2
   , hash3/2
   , cb1/2
   , cb2/2
   , compareBin1/2
   , compareBin2/2
]).

init() ->
   SoName =
      case code:priv_dir(?MODULE) of
         {error, _} ->
            case code:which(?MODULE) of
               Filename when is_list(Filename) ->
                  filename:join([filename:dirname(Filename), "../priv", "nifHashb"]);
               _ ->
                  filename:join("../priv", "nifHashb")
            end;
         Dir ->
            filename:join(Dir, "nifHashb")
      end,
   erlang:load_nif(SoName, 0).

new() ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

get(Ref, Key) ->
   KeyBin = erlang:term_to_binary(Key),
   Hash1 = erlang:phash2(KeyBin),
   Hash2 = erlang:phash2(KeyBin, 123211111),
   get(Ref, Hash1, Hash2, KeyBin).

get(Ref, Hash1, Hash2, KeyBin) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

put(Ref, Key, Value) ->
   KeyBin = erlang:term_to_binary(Key),
   ValueBin = erlang:term_to_binary(Value),
   Hash1 = erlang:phash2(KeyBin),
   Hash2 = erlang:phash2(KeyBin, 123211111),
   put(Ref, Hash1, Hash2, KeyBin, ValueBin).

put(Ref, Hash1, Hash2, Key, Value) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

hash1(Term, Range) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

hash2(Term, Range) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

hash3(Term, Range) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

cb1(Term1, Term2) ->
   compareBin1(term_to_binary(Term1), term_to_binary(Term2)).

cb2(Term1, Term2) ->
   compareBin2(term_to_binary(Term1), term_to_binary(Term2)).

compareBin1(Bin1, Bin2) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).

compareBin2(Bin1, Bin2) ->
   erlang:nif_error({nif_not_loaded, module, ?MODULE, line, ?LINE}).