Allow to accept / reject participants

Signed-off-by: Thomas Citharel <tcit@tcit.fr>

lib/mobilizon_web/api/participations.ex

@@ -4,9 +4,9 @@ defmodule MobilizonWeb.API.Participations do
   """
 
   alias Mobilizon.Actors.Actor
+  alias Mobilizon.Events
   alias Mobilizon.Events.{Event, Participant}
   alias Mobilizon.Service.ActivityPub
-  require Logger
 
   @spec join(Event.t(), Actor.t()) :: {:ok, Participant.t()}
   def join(%Event{id: event_id} = event, %Actor{id: actor_id} = actor) do
@@ -21,4 +21,42 @@ defmodule MobilizonWeb.API.Participations do
       {:ok, activity, participant}
     end
   end
+
+  def accept(
+        %Participant{} = participation,
+        %Actor{} = moderator
+      ) do
+    with {:ok, activity, _} <-
+           ActivityPub.accept(
+             %{
+               to: [participation.actor.url],
+               actor: moderator.url,
+               object: participation.url
+             },
+             "#{MobilizonWeb.Endpoint.url()}/accept/join/#{participation.id}"
+           ),
+         {:ok, %Participant{role: :participant} = participation} <-
+           Events.update_participant(participation, %{"role" => :participant}) do
+      {:ok, activity, participation}
+    end
+  end
+
+  def reject(
+        %Participant{} = participation,
+        %Actor{} = moderator
+      ) do
+    with {:ok, activity, _} <-
+           ActivityPub.reject(
+             %{
+               to: [participation.actor.url],
+               actor: moderator.url,
+               object: participation.url
+             },
+             "#{MobilizonWeb.Endpoint.url()}/reject/join/#{participation.id}"
+           ),
+         {:ok, %Participant{} = participation} <-
+           Events.delete_participant(participation) do
+      {:ok, activity, participation}
+    end
+  end
 end