Current section

Files

Jump to
arke lib arke link_manager.ex
Raw

lib/arke/link_manager.ex

defmodule Arke.LinkManager do
@moduledoc false
@record_fields [:id, :data, :configuration, :inserted_at, :updated_at]
import Ecto.Query
alias Arke.Boundary.ArkeManager
alias Arke.QueryManager
def add_node(project, parent, child, type \\ "link", metadata \\ %{}) do
arke_link = ArkeManager.get(:arke_link, :arke_system)
parent_id = get_node_id(parent)
child_id = get_node_id(child)
QueryManager.create(project, arke_link,
parent_id: parent_id,
child_id: child_id,
type: type,
metadata: metadata
)
end
def delete_node(project, parent, child, type, metadata \\ %{}) do
arke_link = ArkeManager.get(:arke_link, :arke_system)
parent_id = get_node_id(parent)
child_id = get_node_id(child)
# TODO: handle custom exception
with %Arke.Core.Unit{} = link <-
Arke.QueryManager.query(project: project, arke: arke_link)
|> Arke.QueryManager.filter(:parent_id, :eq, parent, false)
|> Arke.QueryManager.filter(:child_id, :eq, child, false)
|> Arke.QueryManager.filter(:type, :eq, type, false)
|> Arke.QueryManager.filter(:configuration, :eq, metadata, false)
|> Arke.QueryManager.one() do
Arke.QueryManager.delete(project, link)
{:ok, nil}
else
_ -> raise "link not found"
end
end
# TODO: unit id to_string()
defp get_node_id(id) when is_binary(id), do: id
defp get_node_id(id) when is_atom(id), do: Atom.to_string(id)
defp get_node_id(%{id: id} = _unit), do: id
end