defmodule Pleroma.Web.PleromaAPI.ChatController do
use Pleroma.Web, :controller
+ alias Pleroma.Activity
alias Pleroma.Chat
alias Pleroma.Object
alias Pleroma.Pagination
alias Pleroma.Web.PleromaAPI.ChatView
import Ecto.Query
+ import Pleroma.Web.ActivityPub.ObjectValidator, only: [stringify_keys: 1]
- # TODO
- # - Error handling
+ action_fallback(Pleroma.Web.MastodonAPI.FallbackController)
plug(
OAuthScopesPlug,
- %{scopes: ["write:statuses"]} when action in [:post_chat_message, :create]
+ %{scopes: ["write:statuses"]}
+ when action in [:post_chat_message, :create, :mark_as_read, :delete_message]
)
plug(
OAuthScopesPlug,
- %{scopes: ["read:statuses"]} when action in [:messages, :index]
+ %{scopes: ["read:statuses"]} when action in [:messages, :index, :show]
)
+ plug(OpenApiSpex.Plug.CastAndValidate, render_error: Pleroma.Web.ApiSpec.RenderError)
+
defdelegate open_api_operation(action), to: Pleroma.Web.ApiSpec.ChatOperation
- def post_chat_message(%{assigns: %{user: %{id: user_id} = user}} = conn, %{
- "id" => id,
- "content" => content
+ def delete_message(%{assigns: %{user: %{ap_id: actor} = user}} = conn, %{
+ message_id: id
}) do
+ with %Object{
+ data: %{
+ "actor" => ^actor,
+ "id" => object,
+ "to" => [recipient],
+ "type" => "ChatMessage"
+ }
+ } = message <- Object.get_by_id(id),
+ %Chat{} = chat <- Chat.get(user.id, recipient),
+ %Activity{} = activity <- Activity.get_create_by_object_ap_id(object),
+ {:ok, _delete} <- CommonAPI.delete(activity.id, user) do
+ conn
+ |> put_view(ChatMessageView)
+ |> render("show.json", for: user, object: message, chat: chat)
+ else
+ _e -> {:error, :could_not_delete}
+ end
+ end
+
+ def post_chat_message(
+ %{body_params: %{content: content} = params, assigns: %{user: %{id: user_id} = user}} =
+ conn,
+ %{
+ id: id
+ }
+ ) do
with %Chat{} = chat <- Repo.get_by(Chat, id: id, user_id: user_id),
%User{} = recipient <- User.get_cached_by_ap_id(chat.recipient),
- {:ok, activity} <- CommonAPI.post_chat_message(user, recipient, content),
+ {:ok, activity} <-
+ CommonAPI.post_chat_message(user, recipient, content, media_id: params[:media_id]),
message <- Object.normalize(activity) do
conn
|> put_view(ChatMessageView)
end
end
- def messages(%{assigns: %{user: %{id: user_id} = user}} = conn, %{"id" => id} = params) do
+ def mark_as_read(%{assigns: %{user: %{id: user_id}}} = conn, %{id: id}) do
+ with %Chat{} = chat <- Repo.get_by(Chat, id: id, user_id: user_id),
+ {:ok, chat} <- Chat.mark_as_read(chat) do
+ conn
+ |> put_view(ChatView)
+ |> render("show.json", chat: chat)
+ end
+ end
+
+ def messages(%{assigns: %{user: %{id: user_id} = user}} = conn, %{id: id} = params) do
with %Chat{} = chat <- Repo.get_by(Chat, id: id, user_id: user_id) do
messages =
- from(o in Object,
- where: fragment("?->>'type' = ?", o.data, "ChatMessage"),
- where:
- fragment(
- """
- (?->>'actor' = ? and ?->'to' = ?)
- OR (?->>'actor' = ? and ?->'to' = ?)
- """,
- o.data,
- ^user.ap_id,
- o.data,
- ^[chat.recipient],
- o.data,
- ^chat.recipient,
- o.data,
- ^[user.ap_id]
- )
- )
- |> Pagination.fetch_paginated(params)
+ chat
+ |> Chat.messages_for_chat_query()
+ |> Pagination.fetch_paginated(params |> stringify_keys())
conn
|> put_view(ChatMessageView)
where: c.user_id == ^user_id,
order_by: [desc: c.updated_at]
)
- |> Pagination.fetch_paginated(params)
+ |> Pagination.fetch_paginated(params |> stringify_keys)
conn
|> put_view(ChatView)
end
def create(%{assigns: %{user: user}} = conn, params) do
- recipient = params["ap_id"] |> URI.decode_www_form()
+ with %User{ap_id: recipient} <- User.get_by_id(params[:id]),
+ {:ok, %Chat{} = chat} <- Chat.get_or_create(user.id, recipient) do
+ conn
+ |> put_view(ChatView)
+ |> render("show.json", chat: chat)
+ end
+ end
- with {:ok, %Chat{} = chat} <- Chat.get_or_create(user.id, recipient) do
+ def show(%{assigns: %{user: user}} = conn, params) do
+ with %Chat{} = chat <- Repo.get_by(Chat, user_id: user.id, id: params[:id]) do
conn
|> put_view(ChatView)
|> render("show.json", chat: chat)