Add a way to look up objects

c_src/object.c

@@ -0,0 +1,62 @@
+#include "geef.h"
+#include "repository.h"
+#include "object.h"
+#include "oid.h"
+#include <string.h>
+#include <git2.h>
+
+void geef_object_free(ErlNifEnv *env, void *cd)
+{
+	geef_object *obj = (geef_object *) cd;
+	git_object_free(obj->obj);
+}
+
+static ERL_NIF_TERM object_type(git_object *obj)
+{
+	switch(git_object_type(obj)) {
+	case GIT_OBJ_COMMIT:
+		return atoms.commit;
+	case GIT_OBJ_TREE:
+		return atoms.tree;
+	case GIT_OBJ_BLOB:
+		return atoms.blob;
+	case GIT_OBJ_TAG:
+		return atoms.tag;
+	default:
+		return atoms.error;
+	}
+}
+
+ERL_NIF_TERM
+geef_object_lookup(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[])
+{
+	geef_repository *repo;
+	ErlNifBinary bin;
+	git_oid id;
+	geef_object *obj;
+	ERL_NIF_TERM term_obj;
+
+	if (!enif_get_resource(env, argv[0], geef_repository_type, (void **) &repo))
+		return enif_make_badarg(env);
+
+	if (!enif_inspect_binary(env, argv[1], &bin))
+		return enif_make_badarg(env);
+
+	if (bin.size < GIT_OID_RAWSZ)
+		return enif_make_badarg(env);
+
+	git_oid_fromraw(&id, bin.data);
+
+	obj = enif_alloc_resource(geef_object_type, sizeof(geef_object));
+	if (git_object_lookup(&obj->obj, repo->repo, &id, GIT_OBJ_ANY) < 0) {
+		enif_release_resource(obj);
+		return geef_error(env);
+	}
+
+
+	term_obj = enif_make_resource(env, obj);
+	enif_release_resource(obj);
+
+
+	return enif_make_tuple3(env, atoms.ok, object_type(obj->obj), term_obj);
+}