Packages

erlang_behaviour_trees

0.4.0
0.5.22 0.5.21 0.5.20 0.5.18 0.5.17 0.5.16 0.5.15 0.5.14 0.5.13 0.5.12 0.5.11 0.5.10 0.5.9 0.5.8 0.5.7 0.5.6 0.5.5 0.5.4 0.5.3 0.5.2 0.5.1 0.5.0 0.4.5 0.4.4 0.4.3 0.4.2 0.4.1 0.4.0 0.3.1 0.3.0 0.2.0 0.1.0

An implementation of behaviour trees in erlang.

Current section

Files

Jump to
Readme
32 Versions
3 Dependencies
Dependants
Files
Activity
erlang_behaviour_trees src bt_engine erl_parser bt_erl_parser.erl
Raw

src/bt_engine/erl_parser/bt_erl_parser.erl 

-module(bt_erl_parser).

-include("../bt_node_behaviours/bt_nodes.hrl").

-export([

  parse/2,

  parse/3

]).



%% root

-spec parse(TreeModule :: atom(), ArgsAsProplist :: list()) -> {Node :: bt_node(), NewBB :: blackboard()}.

parse(TreeModule, ArgsAsProplist) when is_list(ArgsAsProplist) ->

  parse({TreeModule, maps:from_list(ArgsAsProplist)}, bt_parser_utils:get_namespace(), bt_blackboard:get_empty()).



%% sequence

-spec parse(Node :: bt_node() | {TreeModule :: atom(), Args :: map()}, Namespace :: namespace(), BB :: blackboard()) -> {Node :: bt_node(), NewBB :: blackboard()}.

parse(Sequence, Namespace, BB) when is_record(Sequence, sequence) ->

  erl_parse_sequence:parse(Sequence, Namespace, BB);

%% selector (TODO)

parse(Selector, Namespace, BB) when is_record(Selector, selector) ->

  erl_parse_selector:parse(Selector, Namespace, BB);

%% decorator

parse(Decorator = #decorator{child = Child}, Namespace, BB) when is_record(Decorator, decorator) ->

  {NewChild, NewBB} = parse(Child, Namespace, BB),

  {Decorator#decorator{child = NewChild}, NewBB};

%% task

parse(Task, Namespace, BB) when is_record(Task, task) ->

  erl_parse_task:parse(Task, Namespace, BB);

%% if none of the above, then its a subtree

parse({TreeModule, Args}, Namespace, BB) when is_map(Args) ->

  UnresolvedKeys = TreeModule:get_bb_keys(),

  Params = TreeModule:get_params(),

  NewBB = bt_parser_utils:get_blackboard(UnresolvedKeys, Namespace, BB),

  bt_parser_utils:throw_error_if_args_and_params_dont_match(atom_to_list(TreeModule), Args, Params),

  BBKeyMap = bt_parser_utils:get_unresolved_key_bb_map(UnresolvedKeys, Namespace),

  parse(TreeModule:get_tree(Args, BBKeyMap), Namespace, NewBB).