[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).