-module(testevent). -behaviour(gen_event). -export([init/1, handle_event/2, handle_call/2, handle_info/2, terminate/2, code_change/3]). -record(state, {}). init([]) -> {ok, #state{}}. handle_event(Event, State) -> {ok, State}. handle_call(Request, State) -> Reply = ok, {ok, Reply, State}. handle_info(Info, State) -> {ok, State}. terminate(Reason, State) -> ok. code_change(OldVsn, State, Extra) -> {ok, State}.
看了一下实现,发现没,和gen_server很像,有木有?
init/1 : 当函数start或者start_link调用后,自己回调这个函数.这里 start_link 启动有一定讲究.何时用start何时用start_link?
handle_event/2 : 由 gen_event:notify 驱动
handle_call/2 : 由 gen_event:call 驱动
handle_info/2 : 这个系统内部消息驱动,或者消息过来,比如send !.还是一样需深入一下
terminate/2 : 当进程被终止时驱动.
code_change/3 : 当代码热更新时被驱动.
handle_event/2和 handle_call/2有什么区别呢,是的第一个函数没有我们需要的返回值,第二个是有返回值的.
那么gen_event和gen_server到底什么区别呢:
gen_event可以动态添加修改删除事件,看上去很好用,很实用,实际上很少会用到这个(看了otp源码很少用这个).
那怎么添加删除事件呢:看以下函数就明白了:
gen_event:start(Handler) -> {ok, Pid} | {error, What} gen_event:add_handler(Handler, Mod, Args) -> ok | Other gen_event:notify(Handler, Event) -> ok gen_event:call(Handler, Mod, Query) -> {ok, Val} | {error, Why} gen_event:call(Handler, Mod, Query, Timeout) -> {ok, Val} | {error, Why} gen_event:delete_handler(Handler, Mod, Args) -> Val gen_event:swap_handler(Handler, {OldMod, Args1}, {NewMod, Args2}) -> ok gen_event:which_handler(Handler) -> [Mod] gen_event:stop(Handler) -> ok