Packages
arke
0.1.0
1.1.33
retired
0.6.2
0.6.1
0.6.0
0.5.0
0.4.5
0.4.4
0.4.3
0.4.2
0.4.1
0.4.0
0.4.0-bulk.1
0.4.0-bulk.0
0.3.17
0.3.16
0.3.15
0.3.14
0.3.13
0.3.12
0.3.11
0.3.10
0.3.9
0.3.8
0.3.7
0.3.6
0.3.5
0.3.4
0.3.3
0.3.2
0.3.1
0.3.0
0.1.38
0.1.37
0.1.36
0.1.35
0.1.34
0.1.33
0.1.32
0.1.31
0.1.30
0.1.29
0.1.28
0.1.27
0.1.26
0.1.25
0.1.24
0.1.23
0.1.22
0.1.21
0.1.20
0.1.19
0.1.18
0.1.17
0.1.16
0.1.15
0.1.14
0.1.13
0.1.12
0.1.11
0.1.10
0.1.9
0.1.8
0.1.7
0.1.6
0.1.5
0.1.4
0.1.3
0.1.2
0.1.1
0.1.0
Arke low code framework Core
Current section
Files
Jump to
Current section
Files
lib/arke/boundary/group_manager.ex
defmodule Arke.Boundary.GroupManager do
@moduledoc false
use Arke.UnitManager
set_registry_name :group_registry
set_supervisor_name :group_supervisor
def before_create(%{id: id, data: data, metadata: unit_metadata}=unit, project) do
arke_list = Enum.reduce(data.arke_list, [], fn %{id: arke_id, metadata: arke_metadata}=_, arke_list ->
case init_arke(project, arke_id, arke_metadata) do
{:error, msg} -> %{id: arke_id, metadata: arke_metadata}
arke -> [arke | arke_list]
end
end)
{Unit.update(unit, arke_list: arke_list), project}
end
def get_parameters(%{id: id, metadata: %{project: project}}=group), do: get_parameters(id, project)
def get_parameters(group_id, project) do
GenServer.call(via({group_id, project}), :get_parameters)
end
# Get parameters call handler
def handle_call(:get_parameters, _from, {unit, project}) do
parameters = Enum.map(unit.data.arke_list, fn x -> x.id end)
|> get_group_parameters(project)
|> init_parameters_by_ids(project)
{:reply, parameters, {unit, project}}
end
defp get_group_parameters(arke_list, project) do
Enum.reduce(arke_list, [], fn arke_id, group_parameters ->
arke = Arke.Boundary.ArkeManager.get(arke_id, project)
check_group_parameters(group_parameters, arke.data.parameters)
end)
end
defp init_parameters_by_ids(ids, project) do
Enum.reduce(ids, [], fn id, parameters ->
[Arke.Boundary.ParameterManager.get(id, project) | parameters]
end)
end
defp check_group_parameters([], arke_parameters), do: Enum.map(arke_parameters, fn p -> p.id end)
defp check_group_parameters(group_parameters, arke_parameters) do
arke_ids = Enum.map(arke_parameters, fn p -> p.id end)
group_parameters -- (group_parameters -- arke_ids)
end
defp link_init(project, :arke_list, child_id, metadata) do
case init_arke(project, child_id, metadata) do {:error, msg} -> %{id: child_id, metadata: metadata}; p -> p end
end
defp init_arke(project, id, metadata) do
case Arke.Boundary.ArkeManager.get(id, project) do
{:error, msg} ->
IO.inspect({id, msg})
{:error, msg}
arke -> arke
end
end
end