domain.ex (4236B)
1 # Zenflows is designed to implement the Valueflows vocabulary, 2 # written and maintained by srfsh <info@dyne.org>. 3 # Copyright (C) 2021-2023 Dyne.org foundation <foundation@dyne.org>. 4 # 5 # This program is free software: you can redistribute it and/or modify 6 # it under the terms of the GNU Affero General Public License as published by 7 # the Free Software Foundation, either version 3 of the License, or 8 # (at your option) any later version. 9 # 10 # This program is distributed in the hope that it will be useful, 11 # but WITHOUT ANY WARRANTY; without even the implied warranty of 12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 # GNU Affero General Public License for more details. 14 # 15 # You should have received a copy of the GNU Affero General Public License 16 # along with this program. If not, see <https://www.gnu.org/licenses/>. 17 18 defmodule Zenflows.VF.AgentRelationship.Domain do 19 @moduledoc "Domain logic of AgentRelationships." 20 21 alias Ecto.{Changeset, Multi} 22 alias Zenflows.DB.{Page, Repo, Schema} 23 alias Zenflows.VF.AgentRelationship 24 25 @spec one(Ecto.Repo.t(), Schema.id() | map() | Keyword.t()) 26 :: {:ok, AgentRelationship.t()} | {:error, String.t()} 27 def one(repo \\ Repo, _) 28 def one(repo, id) when is_binary(id), do: one(repo, id: id) 29 def one(repo, clauses) do 30 case repo.get_by(AgentRelationship, clauses) do 31 nil -> {:error, "not found"} 32 found -> {:ok, found} 33 end 34 end 35 36 @spec one!(Ecto.Repo.t(), Schema.id() | map() | Keyword.t()) 37 :: AgentRelationship.t() 38 def one!(repo \\ Repo, id_or_clauses) do 39 {:ok, value} = one(repo, id_or_clauses) 40 value 41 end 42 43 @spec all(Page.t()) :: {:ok, [AgentRelationship.t()]} | {:error, Changeset.t()} 44 def all(page \\ Page.new()) do 45 {:ok, Page.all(AgentRelationship, page)} 46 end 47 48 @spec all!(Page.t()) :: [AgentRelationship.t()] 49 def all!(page \\ Page.new()) do 50 {:ok, value} = all(page) 51 value 52 end 53 54 @spec create(Schema.params()) 55 :: {:ok, AgentRelationship.t()} | {:error, Changeset.t()} 56 def create(params) do 57 key = multi_key() 58 Multi.new() 59 |> multi_insert(params) 60 |> Repo.transaction() 61 |> case do 62 {:ok, %{^key => value}} -> {:ok, value} 63 {:error, _, reason, _} -> {:error, reason} 64 end 65 end 66 67 @spec create!(Schema.params()) :: AgentRelationship.t() 68 def create!(params) do 69 {:ok, value} = create(params) 70 value 71 end 72 73 @spec update(Schema.id(), Schema.params()) 74 :: {:ok, AgentRelationship.t()} | {:error, String.t() | Changeset.t()} 75 def update(id, params) do 76 key = multi_key() 77 Multi.new() 78 |> multi_update(id, params) 79 |> Repo.transaction() 80 |> case do 81 {:ok, %{^key => value}} -> {:ok, value} 82 {:error, _, reason, _} -> {:error, reason} 83 end 84 end 85 86 @spec update!(Schema.id(), Schema.params()) :: AgentRelationship.t() 87 def update!(id, params) do 88 {:ok, value} = update(id, params) 89 value 90 end 91 92 @spec delete(Schema.id()) 93 :: {:ok, AgentRelationship.t()} | {:error, String.t() | Changeset.t()} 94 def delete(id) do 95 key = multi_key() 96 Multi.new() 97 |> multi_delete(id) 98 |> Repo.transaction() 99 |> case do 100 {:ok, %{^key => value}} -> {:ok, value} 101 {:error, _, reason, _} -> {:error, reason} 102 end 103 end 104 105 @spec delete!(Schema.id) :: AgentRelationship.t() 106 def delete!(id) do 107 {:ok, value} = delete(id) 108 value 109 end 110 111 @spec preload(AgentRelationship.t(), :subject | :object | :relationship) 112 :: AgentRelationship.t() 113 def preload(rel, x) when x in ~w[subject object relationship]a do 114 Repo.preload(rel, x) 115 end 116 117 @spec multi_key() :: atom() 118 def multi_key(), do: :agent_relationship 119 120 @spec multi_one(Multi.t(), term(), Schema.id()) :: Multi.t() 121 def multi_one(m, key \\ multi_key(), id) do 122 Multi.run(m, key, fn repo, _ -> one(repo, id) end) 123 end 124 125 @spec multi_insert(Multi.t(), term(), Schema.params()) :: Multi.t() 126 def multi_insert(m, key \\ multi_key(), params) do 127 Multi.insert(m, key, AgentRelationship.changeset(params)) 128 end 129 130 @spec multi_update(Multi.t(), term(), Schema.id(), Schema.params()) :: Multi.t() 131 def multi_update(m, key \\ multi_key(), id, params) do 132 m 133 |> multi_one("#{key}.one", id) 134 |> Multi.update(key, 135 &AgentRelationship.changeset(Map.fetch!(&1, "#{key}.one"), params)) 136 end 137 138 @spec multi_delete(Multi.t(), term(), Schema.id()) :: Multi.t() 139 def multi_delete(m, key \\ multi_key(), id) do 140 m 141 |> multi_one("#{key}.one", id) 142 |> Multi.delete(key, &Map.fetch!(&1, "#{key}.one")) 143 end 144 end