22ab293910
For now it simply includes reading in the reflog as a list of entries. This does mean that the drop/append functions don't need to be wrapped, as we can use erlang's list handling. It however also means that we cannot write this back out, as there is currently no way to create an empty reflog that we can fill with our own list.
55 lines
1.1 KiB
C
55 lines
1.1 KiB
C
#include <git2.h>
|
|
#include <string.h>
|
|
|
|
#include "geef.h"
|
|
#include "oid.h"
|
|
|
|
int geef_oid_bin(ErlNifBinary *bin, const git_oid *id)
|
|
{
|
|
if (!enif_alloc_binary(GIT_OID_RAWSZ, bin)) {
|
|
printf("cannot alloc an id!\n");
|
|
return -1;
|
|
}
|
|
|
|
memcpy(bin->data, id, GIT_OID_RAWSZ);
|
|
return 0;
|
|
}
|
|
|
|
ERL_NIF_TERM
|
|
geef_oid_fmt(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[])
|
|
{
|
|
ErlNifBinary bin, bin_out;
|
|
git_oid id;
|
|
|
|
if (!enif_inspect_binary(env, argv[0], &bin))
|
|
return enif_make_badarg(env);
|
|
|
|
if (bin.size < GIT_OID_RAWSZ)
|
|
return enif_make_badarg(env);
|
|
|
|
if (!enif_alloc_binary(GIT_OID_HEXSZ, &bin_out))
|
|
return geef_oom(env);
|
|
|
|
git_oid_fromraw(&id, bin.data);
|
|
git_oid_fmt((char *)bin_out.data, &id);
|
|
|
|
return enif_make_binary(env, &bin_out);
|
|
}
|
|
|
|
ERL_NIF_TERM
|
|
geef_oid_parse(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[])
|
|
{
|
|
ErlNifBinary bin, bin_out;
|
|
git_oid id;
|
|
|
|
if (!enif_inspect_iolist_as_binary(env, argv[0], &bin))
|
|
return enif_make_badarg(env);
|
|
|
|
git_oid_fromstrn(&id, (const char *)bin.data, bin.size);
|
|
|
|
if (geef_oid_bin(&bin_out, &id) < 0)
|
|
return geef_oom(env);
|
|
|
|
return enif_make_binary(env, &bin_out);
|
|
}
|