Отказ от ответственности: я довольно новичок в Erlang и OTP.
Мне нужен простой pubsub в Erlang / OTP, где процессы могут подписаться на каком-то «хабе» и получать копии сообщений, которые были отправлены на этот хаб.
Я знаю о gen_event
, но он обрабатывает события в одном процессе менеджера событий, в то время как я хочу, чтобы каждый подписчик был отдельным, автономным процессом. Кроме того, я не смог уловить надзор за обработчиками gen_event
. К сожалению, результаты Google были полны ссылок XMPP (Ejabberd) и RabbitMQ, поэтому я не нашел ничего подходящего для моей идеи.
Моя идея заключается в том, что такая модель pubsub легко отображается в дереве наблюдения. Поэтому я решил расширить супервизор (gen_server
под колпаком), чтобы иметь возможность отправлять кастовое сообщение всем его дочерним элементам.
Я взломал это в своём быстром и грязном пользовательском поведении диспетчера:
-module(dispatcher).
-extends(supervisor).
-export([notify/2, start_link/2, start_link/3, handle_cast/2]).
start_link(Mod, Args) ->
gen_server:start_link(dispatcher, {self, Mod, Args}, []).
start_link(SupName, Mod, Args) ->
gen_server:start_link(SupName, dispatcher, {SupName, Mod, Args}, []).
notify(Dispatcher, Message) ->
gen_server:cast(Dispatcher, {message, Message}).
handle_cast({message, Message}, State) ->
{reply, Children, State} = supervisor:handle_call(which_children, dummy, State),
Pids = lists:filter(fun(Pid) -> is_pid(Pid) end,
lists:map(fun({_Id, Child, _Type, _Modules}) -> Child end,
Children)),
[gen_server:cast(Pid, Message) || Pid <- Pids],
{noreply, State}.
Однако, хотя на первый взгляд кажется, что все работает нормально (дети получают сообщения и без проблем перезагружаются при сбое), я удивляюсь, когда это было хорошей идеей.
Может ли кто-нибудь, пожалуйста, раскритиковать (или одобрить) мой подход и / или порекомендовать несколько альтернатив?