0d24afb089
This means we no longer accept any iolist in some of the functions, but we might bring it back later. There is also a new function, geef_ref:create_symbolic() to create symbolic references, since we can no longer differentiate between a name and an OID.
35 lines
827 B
Erlang
35 lines
827 B
Erlang
-module(geef_blob).
|
|
|
|
-ifdef(TEST).
|
|
-include_lib("eunit/include/eunit.hrl").
|
|
-endif.
|
|
|
|
-include("geef_records.hrl").
|
|
|
|
-type blob() :: geef_obj:object(blob).
|
|
-export_type([blob/0]).
|
|
|
|
-export([lookup/2, size/1, content/1]).
|
|
|
|
-spec lookup(pid(), geef_oid:oid() | iolist()) -> {ok, blob()} | {error, term()}.
|
|
lookup(Repo, Id) ->
|
|
geef_obj:lookup(Repo, Id, blob).
|
|
|
|
size(#geef_object{type=blob, handle=Handle}) ->
|
|
geef_nif:blob_size(Handle).
|
|
|
|
content(#geef_object{type=blob, handle=Handle}) ->
|
|
{ok, Content} = geef_nif:blob_content(Handle),
|
|
Content.
|
|
|
|
|
|
-ifdef(TEST).
|
|
|
|
blob_size_test() ->
|
|
{ok, Repo} = geef_repo:open(".."),
|
|
{ok, Blob} = lookup(Repo, geef_oid:parse("80d5c15a040c93a4f98f4496a05ebf30cdd58650")),
|
|
?assertMatch(889, ?MODULE:size(Blob)),
|
|
?assertMatch(889, erlang:size(content(Blob))).
|
|
|
|
-endif.
|