Added ETS driver and config.

Author: nathanaschbacher

examples/basho_bench_ets.config

@@ -0,0 +1,14 @@
+{mode, max}.
+
+{duration, 3}.
+
+{concurrent, 4}.
+
+{driver, basho_bench_driver_ets}.
+
+{operations, [{get,1}, {put,1}]}.
+
+{key_generator, {int_to_bin_littleendian, {uniform_int, 1000}}}.
+
+{value_generator, {fixed_bin, 100000}}.
+

src/basho_bench_driver_ets.erl

@@ -0,0 +1,30 @@
+-module(basho_bench_driver_ets).
+
+-export([new/1,
+         run/4]).
+
+new(_Id) ->
+    EtsTable = ets:new(basho_bench, [ordered_set]),
+    {ok, EtsTable}.
+
+run(get, KeyGen, _ValueGen, EtsTable) ->
+    Start = KeyGen(),
+    case ets:lookup(EtsTable, Start) of
+        [] -> 
+            {ok, EtsTable};
+        [{_Key, _Val}] ->
+            {ok, EtsTable};
+        Error ->
+            {error, Error, EtsTable}
+    end;
+
+run(put, KeyGen, ValueGen, EtsTable) ->
+    Object = {KeyGen(), ValueGen()},
+    ets:insert(EtsTable, Object),
+    {ok, EtsTable};
+
+run(delete, KeyGen, _ValueGen, EtsTable) ->
+    Start = KeyGen(),
+    ets:delete(EtsTable, Start),
+    {ok, EtsTable}.
+