[erl] erlang 进程注册和注销

 

想要注册一个进程，必须先要创建一个进程。

　　如何创建一个进程，可以使用spawn、spawn_link，它们虽然都能创建进程，但是也有微妙的区别：　　　　

　　　　1）当前进程中创建一个并行进程，当被生成的进程崩溃时，当前进程不会察觉

　　　　Pid = spawn(Fun).

　　　　2）如果当前进程创建的进程非正常的崩溃，当前进程也会跟着消失

　　　　Pid = spawn_link(Fun).

　　Erlang中管理注册进程的有4个内置函数，register、unregister、whereis、registered，它们的用法如下：　　

　　　　1）register(AnAtom, Pid)：将一个进程Pid注册一个名为AnAtom的原子，如果原子AnAtom已经被另一个注册进程所使用，那么注册就会失败。

　　　　2）unregister(AnAtom)：移除与AnAtom相对应进程的所有注册信息。如果一个注册死亡，那么它也会被自动取消注册。

　　　　3）whereis(AnAtom) -> Pid | undefined：判断AnAtom是否已经被其他进程注册。如果成功，则返回进程标识符Pid。如果AnAtom没有与之相对应的进程，那么就返回原子undefined。

　　　　4）registered() -> [AnAtom ::atom()]：返回一个系统中所有已经注册的名称列表。

　　　　此中所说原子不同与java中原子（我记得java中也有原子定义，和线程安全有关），它是一种识别标识。

例子：

-module(chat).

-export([start/0,stop/0]).

start() ->

　　spawn(fun() ->

　　　　register(chat_process,self()),

　　　　process_flag(trap_exit,true),

　　　　Port = open_port({spawn,"./chat"},[{packet,2}]),

　　　　loop(Port)

　　end).

stop() ->

　　chat_process ! stop.

loop(Port) ->

　　receive

　　　　{call,Caller,Msg} ->

　　　　　　Port ! {self(),{command,Msg}},

　　　　　　receive

　　　　　　　　{Port,{data,Data}} ->

　　　　　　　　　　Caller ! {chat_process,Data}

　　　　　　end,

　　　　　　loop(Port);

　　　　stop ->

　　　　　　Port ! {self(),close},

　　　　　　receive

　　　　　　　　{Port,closed} ->

　　　　　　　　　　exit(normal)

　　　　　　end;

　　　　{'EXIT',Port,Reason} ->

　　　　　　exit({port_terminated,Reason})

　　end.

其中，chat_process、call、data、port_terminated等就是一个原子.

当不需要这个注册进程时可以：unregister(chat_process).