Plugins configuration insert to ets table
This commit is contained in:
parent
d3f52898ee
commit
7260b17cb5
|
@ -22,15 +22,43 @@
|
|||
set_usage/0,
|
||||
all_cfgs/0,
|
||||
get_cfg/2,
|
||||
get_cfg/3]).
|
||||
get_cfg/3,
|
||||
read_config/1,
|
||||
write_config/2]).
|
||||
|
||||
-define(APP, emqttd).
|
||||
-define(TAB, emqttd_config).
|
||||
|
||||
register_config() ->
|
||||
application:start(clique),
|
||||
F = fun() -> ekka_mnesia:running_nodes() end,
|
||||
clique:register_node_finder(F),
|
||||
register_config_cli().
|
||||
register_config_cli(),
|
||||
create_config_tab().
|
||||
|
||||
create_config_tab() ->
|
||||
case ets:info(?TAB, name) of
|
||||
undefined ->
|
||||
ets:new(?TAB, [named_table, public]),
|
||||
{ok, PluginsEtcDir} = emqttd:env(plugins_etc_dir),
|
||||
Files = filelib:wildcard("*.conf", PluginsEtcDir),
|
||||
lists:foreach(fun(File) ->
|
||||
[FileName, _] = string:split(File, "."),
|
||||
Configs = cuttlefish_conf:file(lists:concat([PluginsEtcDir, File])),
|
||||
ets:insert(?TAB, {list_to_atom(FileName), Configs})
|
||||
end, Files);
|
||||
_ ->
|
||||
ok
|
||||
end.
|
||||
|
||||
read_config(App) ->
|
||||
case ets:lookup(?TAB, App) of
|
||||
[] -> [];
|
||||
[{_, Value}] -> Value
|
||||
end.
|
||||
|
||||
write_config(App, Terms) ->
|
||||
ets:insert(?TAB, {App, Terms}).
|
||||
|
||||
run(Cmd) ->
|
||||
clique:run(Cmd).
|
||||
|
|
|
@ -57,6 +57,7 @@ write(App, Terms) ->
|
|||
Schema = cuttlefish_schema:files([Path]),
|
||||
case cuttlefish_generator:map(Schema, Configs) of
|
||||
[{App, Configs1}] ->
|
||||
emqttd_cli_config:write_config(App, Configs),
|
||||
lists:foreach(fun({Key, Val}) -> application:set_env(App, Key, Val) end, Configs1);
|
||||
_ ->
|
||||
error
|
||||
|
@ -87,8 +88,7 @@ get(App, Par, Def) ->
|
|||
|
||||
|
||||
read_(App) ->
|
||||
{ok, PluginsEtcDir} = emqttd:env(plugins_etc_dir),
|
||||
Configs = cuttlefish_conf:file(lists:concat([PluginsEtcDir, App, ".conf"])),
|
||||
Configs = emqttd_cli_config:read_config(App),
|
||||
Path = lists:concat([code:priv_dir(App), "/", App, ".schema"]),
|
||||
{_, Mappings, _} = cuttlefish_schema:files([Path]),
|
||||
OptionalCfg = lists:foldl(fun(Map, Acc) ->
|
||||
|
|
Loading…
Reference in New Issue