[WIP] Test transmogrifier

Introduce MobilizonWeb.API namespace Signed-off-by: Thomas Citharel <tcit@tcit.fr> Format Signed-off-by: Thomas Citharel <tcit@tcit.fr> WIP Signed-off-by: Thomas Citharel <tcit@tcit.fr> remove unneeded code Signed-off-by: Thomas Citharel <tcit@tcit.fr> Fix tests Signed-off-by: Thomas Citharel <tcit@tcit.fr> Fix warnings Signed-off-by: Thomas Citharel <tcit@tcit.fr>
2018-12-14 17:41:55 +01:00
parent e3a8343112
commit c1e6612405
41 changed files with 2961 additions and 246 deletions
--- a/lib/mobilizon_web/api/comments.ex
+++ b/lib/mobilizon_web/api/comments.ex
@@ -0,0 +1,58 @@
+defmodule MobilizonWeb.API.Comments do
+  @moduledoc """
+  API for Comments
+  """
+
+  alias Mobilizon.Actors
+  alias Mobilizon.Actors.Actor
+  alias Mobilizon.Events.Comment
+  alias Mobilizon.Service.Formatter
+  alias Mobilizon.Service.ActivityPub
+  alias Mobilizon.Service.ActivityPub.Utils, as: ActivityPubUtils
+  import MobilizonWeb.API.Utils
+
+  @doc """
+  Create a comment
+
+  Creates a comment from an actor and a status
+  """
+  @spec create_comment(String.t(), String.t(), String.t()) :: {:ok, Activity.t()} | any()
+  def create_comment(from_username, status, visibility \\ "public", inReplyToCommentURL \\ nil) do
+    with %Actor{url: url} = actor <- Actors.get_local_actor_by_name(from_username),
+         status <- String.trim(status),
+         mentions <- Formatter.parse_mentions(status),
+         inReplyToComment <- get_in_reply_to_comment(inReplyToCommentURL),
+         {to, cc} <- to_for_actor_and_mentions(actor, mentions, inReplyToComment, visibility),
+         tags <- Formatter.parse_tags(status),
+         content_html <-
+           make_content_html(
+             status,
+             mentions,
+             tags,
+             "text/plain"
+           ),
+         comment <-
+           ActivityPubUtils.make_comment_data(
+             url,
+             to,
+             content_html,
+             inReplyToComment,
+             tags,
+             cc
+           ) do
+      ActivityPub.create(%{
+        to: ["https://www.w3.org/ns/activitystreams#Public"],
+        actor: actor,
+        object: comment,
+        local: true
+      })
+    end
+  end
+
+  @spec get_in_reply_to_comment(nil) :: nil
+  defp get_in_reply_to_comment(nil), do: nil
+  @spec get_in_reply_to_comment(String.t()) :: Comment.t()
+  defp get_in_reply_to_comment(inReplyToCommentURL) do
+    ActivityPub.fetch_object_from_url(inReplyToCommentURL)
+  end
+end