Add geef_index:read_tree()

c_src/geef.c

@@ -147,7 +147,8 @@ static ErlNifFunc geef_funcs[] =
 	{"index_write", 1, geef_index_write},
 	{"index_write_tree", 1, geef_index_write_tree},
 	{"index_write_tree", 2, geef_index_write_tree},
-	{"index_clear", 1, geef_index_clear},
+	{"index_clear",      1, geef_index_clear},
+	{"index_read_tree",  2, geef_index_read_tree},
 };
 
 ERL_NIF_INIT(geef_nif, geef_funcs, load, NULL, upgrade, unload)

c_src/index.c

@@ -1,6 +1,7 @@
 #include "geef.h"
 #include "oid.h"
 #include "index.h"
+#include "object.h"
 #include <string.h>
 #include <git2.h>
 
@@ -73,6 +74,24 @@ geef_index_write_tree(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[])
 	return enif_make_tuple2(env, atoms.ok, enif_make_binary(env, &bin));
 }
 
+ERL_NIF_TERM
+geef_index_read_tree(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[])
+{
+	geef_index *index;
+	geef_object *tree;
+
+	if (!enif_get_resource(env, argv[0], geef_index_type, (void **) &index))
+		return enif_make_badarg(env);
+
+	if (!enif_get_resource(env, argv[0], geef_object_type, (void **) &tree))
+		return enif_make_badarg(env);
+
+	if (git_index_read_tree(index->index, (git_tree *)tree->obj) < 0)
+		return geef_error(env);
+
+	return atoms.ok;
+}
+
 ERL_NIF_TERM
 geef_index_clear(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[])
 {

c_src/index.h

@@ -16,6 +16,6 @@ void geef_index_free(ErlNifEnv *env, void *cd);
 ERL_NIF_TERM geef_index_write(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[]);
 ERL_NIF_TERM geef_index_write_tree(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[]);
 ERL_NIF_TERM geef_index_clear(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[]);
-
+ERL_NIF_TERM geef_index_read_tree(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[]);
 
 #endif