EMQX消息存储MongoDB源码分析(2)

-module(emqx_backend_mongo_sup).
-include("../include/emqx_backend_mongo.hrl").

-behaviour(supervisor).

-export([start_link/1]).

-export([init/1]).


start_link(Pools) ->
  supervisor:start_link({local, emqx_backend_mongo_sup}, emqx_backend_mongo_sup, [Pools]).

init([Pools]) ->
  {ok, {{one_for_one, 10, 100}, [pool_spec(Pool, Env) || {Pool, Env} <- Pools]}}.

pool_spec(Pool, Env) ->
  ecpool:pool_spec({emqx_backend_mongo, Pool}, emqx_backend_mongo:pool_name(Pool), emqx_backend_mongo_cli, Env).