first version, based on mnesia_eleveldb

2018-02-06 09:43:57 +01:00
commit 6c9f5b565f
30 changed files with 4835 additions and 0 deletions
@@ -0,0 +1,59 @@
+%%----------------------------------------------------------------
+%% Copyright (c) 2013-2016 Klarna AB
+%%
+%% This file is provided to you under the Apache License,
+%% Version 2.0 (the "License"); you may not use this file
+%% except in compliance with the License.  You may obtain
+%% a copy of the License at
+%%
+%%   http://www.apache.org/licenses/LICENSE-2.0
+%%
+%% Unless required by applicable law or agreed to in writing,
+%% software distributed under the License is distributed on an
+%% "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+%% KIND, either express or implied.  See the License for the
+%% specific language governing permissions and limitations
+%% under the License.
+%%----------------------------------------------------------------
+
+-module(mnesia_rocksdb_conv_bigtab).
+
+-export([init/0, mktab/2, run/1]).
+
+-record(t, {k, i, v}).
+
+run(Sz) ->
+    mnesia:stop(),
+    init(),
+    mktab(disc_copies, Sz),
+    mnesia:change_table_copy_type(t, node(), rdb).
+
+init() ->
+    mnesia_rocksdb_tlib:start_mnesia(reset).
+
+mktab(Backend, Sz) ->
+    mnesia_rocksdb_tlib:create_table(Backend, [k, i, v], [i]),
+    fill_table(Sz).
+
+
+fill_table(Sz) when is_integer(Sz), Sz > 0 ->
+    fill_table(1, Sz).
+
+fill_table(N, Max) when N =< Max ->
+    mnesia:dirty_write(#t{k = N, i = N, v = val()}),
+    fill_table(N+1, Max);
+fill_table(N, _) when is_integer(N) ->
+    ok.
+
+val() ->
+    {1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0,
+     1,2,3,4,5,6,7,8,9,0}.