系统技术非业余研究

erlang的定时器在做网络程序的时候几乎无所不在， 语法层面的receive after，IO操作超时，driver内部等都大量使用timer,特别是tcp 在发送接收都有个超时。 如果你有大量的tcp链接， 就意味着大量的定时器。 那么定时器的性能就是个很大的考验。erts的定时器是个timer_wheel实现， 和linux内核用的差不多，大概支持百万级别的规模。 测试如下：

并发开N个进程 每个进程里面0-10秒的随机定时，模拟tcp超时的情况。每个定时器事件的流程是这样的 进程检查消息队列 没消息 注册定时器事件 进程换出 定时器超时 进程换入 处理定时器事件。

root@nd-desktop:~/test# cat ttimer.erl 

-module(ttimer). 
-export([start/1]). 

upmap(F, L) -> 
    Parent = self(), 
    Ref = make_ref(), 
    [receive {Ref, Result} -> Result end 
     || _ <- [spawn(fun() -> Parent ! {Ref, F(X)} end) || X <- L]]. 

loop(0)-> 
    ok; 

loop(Cnt)-> 
        receive after random:uniform(10000) -> cont end, 
        loop(Cnt-1). 

start([A1, A2]) -> 
         Start= now(), 
         N= list_to_integer(atom_to_list(A1)), 
         Cnt = list_to_integer(atom_to_list(A2)), 
         io:format("spawn ~w process, loop ~w~n", [N, Cnt]), 
         upmap(fun loop/1, lists:duplicate(N, Cnt)), 
         io:format("run ~w ms~n", [round(timer:now_diff(now(), Start) /1000)]), 
         done. 

root@nd-desktop:~/test# erl -smp disable -noshell +P 9999999 -s ttimer start 500000 10 -s erlang halt 
spawn 500000 process, loop 10 
run 63201 ms 

单cpu保持在70-80%， 63秒处理了500W个定时器事件， 大概每秒8W.

root@nd-desktop:~/test# cat /proc/cpuinfo 
model name      : Pentium(R) Dual-Core  CPU      E5200  @ 2.50GHz 
bogomips        : 4987.08 

结论： 定时器处理还是比较费时间的。