• erlang ets match spec使用
• erlang ets 性能數(shù)據(jù)測(cè)試

match spec教程和網(wǎng)上的文章基本看不懂，還是例子比較少。我給了一個(gè)使用match_spec很簡(jiǎn)單易懂的例子。
match spec說(shuō)白了，就是類(lèi)似于sql查詢(xún)語(yǔ)句，找出滿足條件的記錄。

%%% @copyright (C) 2016, <COMPANY>
%%% @doc
%%%
%%% @end
%%% Created : 02. 九月 2016 下午3:07
%%%-------------------------------------------------------------------
-module(test).
-author("mohe").
-include_lib("stdlib/include/ms_transform.hrl").
-record(user, {
  id :: integer(),
  name :: string()
}).
%% API
-compile([export_all/1]).
-define(ETS_NAME, ets_test).

init_ets({N}) ->
  ets:new(?ETS_NAME, [named_table, public, set, {keypos, #user.id}, 
{write_concurrency, true}, {read_concurrency, true}]),
  lists:foreach(fun(X) ->
 ets:insert(?ETS_NAME, #user{id = X, name = random_str()}) end,
 lists:seq(1, N)).

％％獲取id大于N的數(shù)據(jù)
gt_id(N) -> 
T1 = ms_time(), 
Mspec = ets:fun2ms(fun(#user{id = Id} = X) when Id > N -> X end),  
Res = ets:select(?ETS_NAME, Mspec),  
T2 = ms_time(), 
io:format("cost:~p ms", [T2 - T1]), 
 Res.

ms_time() -> 
 {_, S, M} = os:timestamp(),  (S * 1000000 + M) div 1000.

%%生成隨機(jī)字符串
random_str() ->  Str = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_",  
%%一次隨機(jī)取多個(gè)，再分別取出對(duì)應(yīng)值 
 N = [random:uniform(length(Str))|| _Elem <- lists:seq(1, 16)],  
RandomKey = [lists:nth(X, Str) || X <- N],  RandomKey.

測(cè)試

test:init_ets({10000}).
cost:20 ms...

其它

• 如果數(shù)據(jù)多了, match spec是很消耗時(shí)間的。如果有1000000條記錄，平均查詢(xún)時(shí)間為4000ms
• lookup_element()和look_up是常量時(shí)間，測(cè)試為0ms。也就是說(shuō)，如果調(diào)用這兩個(gè)查詢(xún)函數(shù)，不用考慮性能問(wèn)題
• ets表的寫(xiě)入性能相當(dāng)高，1000000條數(shù)據(jù)的插入，只用了4976ms，1s可以寫(xiě)入將近2000000條記錄
• 內(nèi)存占用
  按照測(cè)試的數(shù)據(jù)格式，插入1000000條記錄，占用內(nèi)存體積64M，我覺(jué)得非常省內(nèi)存
• 結(jié)論
  • match spec 可以進(jìn)行多條件查詢(xún)，類(lèi)似于sql。
  • 如果是單值查詢(xún)，別用match spec，用lookup_element和look_up
  • 如果用ets表，不要猶豫性能和內(nèi)存占用問(wèn)題。等有了性能問(wèn)題，你早就發(fā)財(cái)了(我目前是做手游的)；如果有內(nèi)存問(wèn)題，那么可以研究一下compressed選項(xiàng)