Introduce the group activity section

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

lib/federation/activity_pub/activity_pub.ex

@@ -459,6 +459,7 @@ defmodule Mobilizon.Federation.ActivityPub do
             Map.get(additional, :force_member_removal, false) ||
               !Actors.is_only_administrator?(member_id, group_id)},
          {:delete, {:ok, %Member{} = member}} <- {:delete, Actors.delete_member(member)},
+         Mobilizon.Service.Activity.Member.insert_activity(member, subject: "member_quit"),
          leave_data <- %{
            "to" => [group_members_url],
            "cc" => [group_url],
@@ -477,12 +478,17 @@ defmodule Mobilizon.Federation.ActivityPub do
   def remove(
         %Member{} = member,
         %Actor{type: :Group, url: group_url, members_url: group_members_url},
-        %Actor{url: moderator_url},
+        %Actor{url: moderator_url} = moderator,
         local,
         _additional \\ %{}
       ) do
     with {:ok, %Member{id: member_id}} <- Actors.update_member(member, %{role: :rejected}),
          %Member{} = member <- Actors.get_member(member_id),
+         {:ok, _} <-
+           Mobilizon.Service.Activity.Member.insert_activity(member,
+             moderator: moderator,
+             subject: "member_removed"
+           ),
          :ok <- Group.send_notification_to_removed_member(member),
          remove_data <- %{
            "to" => [group_members_url],
@@ -518,6 +524,11 @@ defmodule Mobilizon.Federation.ActivityPub do
              invited_by_id: actor_id,
              url: Map.get(additional, :url)
            }),
+         {:ok, _} <-
+           Mobilizon.Service.Activity.Member.insert_activity(member,
+             moderator: actor,
+             subject: "member_invited"
+           ),
          invite_data <- %{
            "type" => "Invite",
            "attributedTo" => group_url,
@@ -914,6 +925,10 @@ defmodule Mobilizon.Federation.ActivityPub do
   defp accept_join(%Member{} = member, additional) do
     with {:ok, %Member{} = member} <-
            Actors.update_member(member, %{role: :member}),
+         {:ok, _} <-
+           Mobilizon.Service.Activity.Member.insert_activity(member,
+             subject: "member_approved"
+           ),
          _ <-
            unless(is_nil(member.parent.domain),
              do: Refresher.fetch_group(member.parent.url, member.actor)
@@ -949,6 +964,10 @@ defmodule Mobilizon.Federation.ActivityPub do
          %Actor{url: actor_url} <- Actors.get_actor(actor_id),
          {:ok, %Member{id: member_id} = member} <-
            Actors.update_member(member, %{role: :member}),
+         {:ok, _} <-
+           Mobilizon.Service.Activity.Member.insert_activity(member,
+             subject: "member_accepted_invitation"
+           ),
          accept_data <- %{
            "type" => "Accept",
            "attributedTo" => member.parent.url,
@@ -1029,6 +1048,9 @@ defmodule Mobilizon.Federation.ActivityPub do
          %Actor{url: actor_url} <- Actors.get_actor(actor_id),
          {:ok, %Member{url: member_url, id: member_id} = member} <-
            Actors.delete_member(member),
+         Mobilizon.Service.Activity.Member.insert_activity(member,
+           subject: "member_rejected_invitation"
+         ),
          accept_data <- %{
            "type" => "Reject",
            "actor" => actor_url,