代码改变世界

Erlang OTP设计原则Gen_Fsm行为

2012-05-13 15:25  rhinovirus  阅读(7759)  评论(2编辑  收藏  举报

  1. Fsm 称为 有限状态机,举个例子,游戏中的怪物称为NPC,NPC一般有几种状态,比如:静止,移动,死亡,被攻击,攻击英雄等等几个有限的状态,那么我们就可以有限状态机实现NPC的状态变更。

  一个有限状态机可以用一个关系式来描述,State(静止状态S1) x Event(英雄进入视野范围事件E) -> Actions(开始移动动作A), State(移动状态S2)

  解释如下:当一个NPC处于静止状态S1,有一个英雄进入NPC视野范围时E,会触发NPC开始移动动作A,并且NPC转变状态为移动状态S2

  对于一个用 gen_fsm 行为实现的FSM来说,状态转换规则被写为符合如下约定的一系列Erlang函数:

StateName( Event, StateData ) ->

    .. 这里放动作的代码 ...

    { next_state, StateName', StateData' }

  2. 接下来我们来看个例子,游戏中NPC状态变化,当然我做了很大的简化,真正游戏中的逻辑比这复杂的多。这里我只是为了说明,erlang OTP设计原则中的gen_fsm如何使用,代码如下:

-module(npc).

-behaviour(gen_fsm).

%% API
-export([start_link/0]).

%% gen_fsm callbacks
-export([init/1, static/2, moving/2, handle_event/3,
	 handle_sync_event/4, handle_info/3, terminate/3, code_change/4]).

-export([hero_join/0, hero_leave/0]).

-define(SERVER, ?MODULE).

-record(npc, {state}).

start_link() ->
    gen_fsm:start_link({local, ?SERVER}, ?MODULE, [], []).

%% 初始化NPC为静止状态
init([]) ->
    io:format("init...~n"),
    State = #npc{state = static},
    io:format("init State: ~p~n", [State]),
   {ok, static, State}.

%% 英雄进入视野
hero_join() ->
    gen_fsm:send_event(?SERVER, hero_join).

%% 英雄离开视野
hero_leave() ->
    gen_fsm:send_event(?SERVER, hero_leave).

%% 静止状态下,接受来自客户端的事件
static(Event, State) ->
    case Event of
	hero_join -> %% 英雄进入视野
	    do_moving(), %% 执行动作
	    NewState = State#npc{state = moving},
	    io:format("npc set state: ~p~n", [NewState]),
	    {next_state, moving, NewState}
    end.

%% 移动状态下,接受来自客户端的事件
moving(Event, State) ->
    case Event of
	hero_leave -> %% 英雄离开视野
	    do_static(), %% 执行动作
	    NewState = State#npc{state = static},
	    io:format("npc set state: ~p~n", [NewState]),
	    {next_state, static, NewState}
    end.

handle_event(_Event, StateName, State) ->
    {next_state, StateName, State}.

handle_sync_event(_Event, _From, StateName, State) ->
    Reply = ok,
    {reply, Reply, StateName, State}.

handle_info(_Info, StateName, State) ->
    {next_state, StateName, State}.

terminate(_Reason, _StateName, _State) ->
    ok.

code_change(_OldVsn, StateName, State, _Extra) ->
    {ok, StateName, State}.

%% NPC 开始移动,进入移动状态
do_moving() ->
    io:format("npc beigin moving...~n").

%% NPC 停止移动,进入静止状态
do_static() ->
    io:format("npc stop moving, join static...~n").

   代码注释比较详细,接下来可以通过运行代码,来好好理解下这个例子,

  1. 首先,调用 npc:start_link(). 来初始化NPC服务;这个时候NPC处于静止状态 static;

  2. 当npc处于静止状态时,我们通过调用 npc:hero_join().来表示有一个侠客进入NPC的视野,那么这个时候gen_fsm会默认调用当前gen_fsm处于的状态,也就是static的处理方法,也就是 static(Event, State) 这个函数,这边可能比较绕,我已经尽量去用直白的语言来表达,能力有限,大家多思考下,呵呵;

  3. 当处理 static 函数时,Event 这个变量,就是 gen_fsm:send_event(?SERVER, hero_join). hero_join,紧接着执行对应的动作,在这里也就是 do_moving(),开始移动;

  4. 最后,我们需要返回 {next_state, moving, NewState} 让gen_fsm进入下一个状态,也就是 moving 状态;

  5. 当npc处于移动时,我们通过调用 npc:hero_leave(). 来表示 该侠客移动NPC的视野,那么对应的 moving(Event, State) 函数就会被调用,其他的处理与 static 时的处理是类似的,这里就不重复表述了。

  这个例子还有一些函数,我没有讲到,希望在以后的教程来跟大家分享,谢谢。