Packages
arke
0.3.5
1.1.33
retired
0.6.3
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/core/arke.ex
# Copyright 2023 Arkemis S.r.l.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
defmodule Arke.Core.Arke do
@moduledoc """
Defines the skeleton of an Arke by defining its characteristics and the various parameters of which it is composed
"""
defstruct [:id, :label, :active, :type, :parameters]
use Arke.System
alias Arke.Core.Parameter
alias Arke.Boundary.ArkeManager
arke id: :arke do
end
def on_create(arke, unit) do
unit = check_base_parameters(arke, unit)
ArkeManager.create(unit)
{:ok, unit}
end
def on_update(_, %{id: id, metadata: %{project: project}} = unit) do
ArkeManager.update(id, project, unit)
{:ok, unit}
end
def on_update(_, %{id: id, metadata: %{project: project}, data: data} = unit) do
parameters =
Enum.reduce(data.parameters, [], fn a, new_parameters ->
[handle_link_init(a, :parameters) | new_parameters]
end)
unit = Unit.update(unit, %{parameters: parameters})
ArkeManager.update(id, project, unit)
{:ok, unit}
end
def handle_link_init(u, p) when is_binary(u),
do: %{id: String.to_atom(u), metadata: %{"parameter_id" => Atom.to_string(p)}}
def handle_link_init(u, p) when is_atom(u),
do: %{id: u, metadata: %{"parameter_id" => Atom.to_string(p)}}
def handle_link_init(u, _), do: u
def on_delete(_, unit) do
ArkeManager.remove(unit)
{:ok, unit}
end
def check_base_parameters(arke, %{data: %{parameters: []}} = unit),
do: Arke.Core.Unit.update(unit, parameters: base_parameters(arke, unit))
def check_base_parameters(_, unit), do: unit
def base_parameters(arke, %{data: %{parameters: []}} = unit), do: base_parameters(arke)
def base_parameters(_, unit), do: unit.data.parameters
def base_parameters(arke) do
Enum.reduce(arke.data.parameters, [], fn %{metadata: metadata} = p, arke_parameters ->
check_arke_base_parameter(p, metadata |> Enum.into(%{}), arke_parameters)
end)
end
def check_arke_base_parameter(parameter, %{:persistence => "table_column"}, parameters),
do: [parameter | parameters]
def check_arke_base_parameter(_, _, parameters), do: parameters
end