Bind ref name dwim

src/geef_nif.erl

@@ -62,6 +62,9 @@ reference_type(_Handle) ->
 reference_name(_Handle) ->
     nif_error(?LINE).
 
+reference_dwim(_Handle, _Name) ->
+    ?NIF_FN.
+
 odb_object_exists(_Val, _Val) ->
     nif_error(?LINE).
 

src/geef_ref.erl

@@ -1,6 +1,6 @@
 -module(geef_ref).
 
--export([lookup/2, resolve/1, create/4]).
+-export([lookup/2, resolve/1, create/4, dwim/2]).
 
 -include("geef_records.hrl").
 
@@ -42,3 +42,13 @@ resolve(#geef_reference{handle=Handle}) ->
 	Other ->
 	    Other
     end.
+
+-spec dwim(pid(), iolist()) -> {ok, geef_reference()} | {error, term()}.
+dwim(Repo, Name) ->
+    case geef_repo:reference_dwim(Repo, Name) of
+	{ok, Handle} ->
+	    {ok, FullName} = geef_nif:reference_name(Handle),
+	    {ok, new(FullName, Handle)};
+	Err ->
+	    Err
+    end.

src/geef_repo.erl

@@ -16,7 +16,8 @@
 
 %% API
 -export([open/1, init/2, path/1, workdir/1, odb/1, is_bare/1, references/1, discover/1,
-	 lookup_object/2, lookup_reference/2, create_reference/4, revwalk/1, stop/1, handle/1]).
+	 lookup_object/2, lookup_reference/2, create_reference/4, revwalk/1, stop/1,
+	 reference_dwim/2, handle/1]).
 
 -include("geef_records.hrl").
 -record(state, {handle}).
@@ -85,6 +86,10 @@ lookup_object(Pid, Oid) ->
 lookup_reference(Pid, Name) ->
     gen_server:call(Pid, {lookup_reference, Name}).
 
+%% @private
+reference_dwim(Pid, Name) ->
+    gen_server:call(Pid, {dwim_reference, Name}).
+
 %% @private
 create_reference(Pid, Name, Target, Force) ->
     gen_server:call(Pid, {create_reference, Name, Target, Force}).
@@ -131,6 +136,9 @@ handle_call({lookup_object, Oid}, _From, State = #state{handle=Handle}) ->
 handle_call({lookup_reference, Name}, _From, State = #state{handle=Handle}) ->
     Reply = geef_nif:reference_lookup(Handle, Name),
     {reply, Reply, State};
+handle_call({dwim_reference, Name}, _From, State = #state{handle=Handle}) ->
+    Reply = geef_nif:reference_dwim(Handle, Name),
+    {reply, Reply, State};
 handle_call({create_reference, Name, Target, Force}, _From, State = #state{handle=Handle}) ->
     Reply = handle_create_reference(Handle, Name, Target, Force),
     {reply, Reply, State};