zf

zenflows testing
git clone https://s.sonu.ch/~srfsh/zf.git
Log | Files | Refs | Submodules | README | LICENSE

resolv.ex (2030B)

      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.Resolv do
     19 @moduledoc false
     20 
     21 alias Zenflows.GQL.Connection
     22 alias Zenflows.VF.{AgentRelationship, AgentRelationship.Domain}
     23 
     24 def agent_relationship(params, _) do
     25 	Domain.one(params)
     26 end
     27 
     28 def agent_relationships(params, _) do
     29 	with {:ok, page} <- Connection.parse(params),
     30 			{:ok, schemas} <- Domain.all(page) do
     31 		{:ok, Connection.from_list(schemas, page)}
     32 	end
     33 end
     34 
     35 def create_agent_relationship(%{relationship: params}, _) do
     36 	with {:ok, rel} <- Domain.create(params) do
     37 		{:ok, %{agent_relationship: rel}}
     38 	end
     39 end
     40 
     41 def update_agent_relationship(%{relationship: %{id: id} = params}, _) do
     42 	with {:ok, rel} <- Domain.update(id, params) do
     43 		{:ok, %{agent_relationship: rel}}
     44 	end
     45 end
     46 
     47 def delete_agent_relationship(%{id: id}, _) do
     48 	with {:ok, _rel} <- Domain.delete(id) do
     49 		{:ok, true}
     50 	end
     51 end
     52 
     53 def subject(%AgentRelationship{} = rel, _, _) do
     54 	rel = Domain.preload(rel, :subject)
     55 	{:ok, rel.subject}
     56 end
     57 
     58 def object(%AgentRelationship{} = rel, _, _) do
     59 	rel = Domain.preload(rel, :object)
     60 	{:ok, rel.object}
     61 end
     62 
     63 def relationship(%AgentRelationship{} = rel, _, _) do
     64 	rel = Domain.preload(rel, :relationship)
     65 	{:ok, rel.relationship}
     66 end
     67 
     68 end