1 # Pleroma: A lightweight social networking server
2 # Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
3 # SPDX-License-Identifier: AGPL-3.0-only
5 defmodule Pleroma.Web.CommonAPI do
7 alias Pleroma.ActivityExpiration
8 alias Pleroma.Conversation.Participation
10 alias Pleroma.ThreadMute
12 alias Pleroma.Web.ActivityPub.ActivityPub
13 alias Pleroma.Web.ActivityPub.Utils
14 alias Pleroma.Web.ActivityPub.Visibility
16 import Pleroma.Web.Gettext
17 import Pleroma.Web.CommonAPI.Utils
19 def follow(follower, followed) do
20 timeout = Pleroma.Config.get([:activitypub, :follow_handshake_timeout])
22 with {:ok, follower} <- User.maybe_direct_follow(follower, followed),
23 {:ok, activity} <- ActivityPub.follow(follower, followed),
24 {:ok, follower, followed} <- User.wait_and_refresh(timeout, follower, followed) do
25 {:ok, follower, followed, activity}
29 def unfollow(follower, unfollowed) do
30 with {:ok, follower, _follow_activity} <- User.unfollow(follower, unfollowed),
31 {:ok, _activity} <- ActivityPub.unfollow(follower, unfollowed),
32 {:ok, _unfollowed} <- User.unsubscribe(follower, unfollowed) do
37 def accept_follow_request(follower, followed) do
38 with {:ok, follower} <- User.follow(follower, followed),
39 %Activity{} = follow_activity <- Utils.fetch_latest_follow(follower, followed),
40 {:ok, follow_activity} <- Utils.update_follow_state_for_all(follow_activity, "accept"),
45 object: follow_activity.data["id"],
52 def reject_follow_request(follower, followed) do
53 with %Activity{} = follow_activity <- Utils.fetch_latest_follow(follower, followed),
54 {:ok, follow_activity} <- Utils.update_follow_state_for_all(follow_activity, "reject"),
59 object: follow_activity.data["id"],
66 def delete(activity_id, user) do
67 with %Activity{data: %{"object" => _}} = activity <-
68 Activity.get_by_id_with_object(activity_id),
69 %Object{} = object <- Object.normalize(activity),
70 true <- User.superuser?(user) || user.ap_id == object.data["actor"],
71 {:ok, _} <- unpin(activity_id, user),
72 {:ok, delete} <- ActivityPub.delete(object) do
75 _ -> {:error, dgettext("errors", "Could not delete")}
79 def repeat(id_or_ap_id, user, params \\ %{}) do
80 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
81 object <- Object.normalize(activity),
82 nil <- Utils.get_existing_announce(user.ap_id, object),
83 public <- public_announce?(object, params) do
84 ActivityPub.announce(user, object, nil, true, public)
86 _ -> {:error, dgettext("errors", "Could not repeat")}
90 def unrepeat(id_or_ap_id, user) do
91 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id) do
92 object = Object.normalize(activity)
93 ActivityPub.unannounce(user, object)
95 _ -> {:error, dgettext("errors", "Could not unrepeat")}
99 def favorite(id_or_ap_id, user) do
100 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
101 object <- Object.normalize(activity),
102 nil <- Utils.get_existing_like(user.ap_id, object) do
103 ActivityPub.like(user, object)
105 _ -> {:error, dgettext("errors", "Could not favorite")}
109 def unfavorite(id_or_ap_id, user) do
110 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id) do
111 object = Object.normalize(activity)
112 ActivityPub.unlike(user, object)
114 _ -> {:error, dgettext("errors", "Could not unfavorite")}
118 def react_with_emoji(id, user, emoji) do
119 with %Activity{} = activity <- Activity.get_by_id(id),
120 object <- Object.normalize(activity) do
121 ActivityPub.react_with_emoji(user, object, emoji)
124 {:error, dgettext("errors", "Could not add reaction emoji")}
128 def vote(user, %{data: %{"type" => "Question"}} = object, choices) do
129 with :ok <- validate_not_author(object, user),
130 :ok <- validate_existing_votes(user, object),
131 {:ok, options, choices} <- normalize_and_validate_choices(choices, object) do
133 Enum.map(choices, fn index ->
134 answer_data = make_answer_data(user, object, Enum.at(options, index)["name"])
137 ActivityPub.create(%{
138 to: answer_data["to"],
140 context: object.data["context"],
142 additional: %{"cc" => answer_data["cc"]}
148 object = Object.get_cached_by_ap_id(object.data["id"])
149 {:ok, answer_activities, object}
153 defp validate_not_author(%{data: %{"actor" => ap_id}}, %{ap_id: ap_id}),
154 do: {:error, dgettext("errors", "Poll's author can't vote")}
156 defp validate_not_author(_, _), do: :ok
158 defp validate_existing_votes(%{ap_id: ap_id}, object) do
159 if Utils.get_existing_votes(ap_id, object) == [] do
162 {:error, dgettext("errors", "Already voted")}
166 defp get_options_and_max_count(%{data: %{"anyOf" => any_of}}), do: {any_of, Enum.count(any_of)}
167 defp get_options_and_max_count(%{data: %{"oneOf" => one_of}}), do: {one_of, 1}
169 defp normalize_and_validate_choices(choices, object) do
170 choices = Enum.map(choices, fn i -> if is_binary(i), do: String.to_integer(i), else: i end)
171 {options, max_count} = get_options_and_max_count(object)
172 count = Enum.count(options)
174 with {_, true} <- {:valid_choice, Enum.all?(choices, &(&1 < count))},
175 {_, true} <- {:count_check, Enum.count(choices) <= max_count} do
176 {:ok, options, choices}
178 {:valid_choice, _} -> {:error, dgettext("errors", "Invalid indices")}
179 {:count_check, _} -> {:error, dgettext("errors", "Too many choices")}
183 def public_announce?(_, %{"visibility" => visibility})
184 when visibility in ~w{public unlisted private direct},
185 do: visibility in ~w(public unlisted)
187 def public_announce?(object, _) do
188 Visibility.is_public?(object)
191 def get_visibility(_, _, %Participation{}), do: {"direct", "direct"}
193 def get_visibility(%{"visibility" => visibility}, in_reply_to, _)
194 when visibility in ~w{public unlisted private direct},
195 do: {visibility, get_replied_to_visibility(in_reply_to)}
197 def get_visibility(%{"visibility" => "list:" <> list_id}, in_reply_to, _) do
198 visibility = {:list, String.to_integer(list_id)}
199 {visibility, get_replied_to_visibility(in_reply_to)}
202 def get_visibility(_, in_reply_to, _) when not is_nil(in_reply_to) do
203 visibility = get_replied_to_visibility(in_reply_to)
204 {visibility, visibility}
207 def get_visibility(_, in_reply_to, _), do: {"public", get_replied_to_visibility(in_reply_to)}
209 def get_replied_to_visibility(nil), do: nil
211 def get_replied_to_visibility(activity) do
212 with %Object{} = object <- Object.normalize(activity) do
213 Visibility.get_visibility(object)
217 def check_expiry_date({:ok, nil} = res), do: res
219 def check_expiry_date({:ok, in_seconds}) do
220 expiry = NaiveDateTime.utc_now() |> NaiveDateTime.add(in_seconds)
222 if ActivityExpiration.expires_late_enough?(expiry) do
225 {:error, "Expiry date is too soon"}
229 def check_expiry_date(expiry_str) do
230 Ecto.Type.cast(:integer, expiry_str)
231 |> check_expiry_date()
234 def listen(user, %{"title" => _} = data) do
235 with visibility <- data["visibility"] || "public",
236 {to, cc} <- get_to_and_cc(user, [], nil, visibility, nil),
238 Map.take(data, ["album", "artist", "title", "length"])
239 |> Map.put("type", "Audio")
242 |> Map.put("actor", user.ap_id),
244 ActivityPub.listen(%{
248 context: Utils.generate_context_id(),
249 additional: %{"cc" => cc}
255 def post(user, %{"status" => _} = data) do
256 with {:ok, draft} <- Pleroma.Web.CommonAPI.ActivityDraft.create(user, data) do
258 |> ActivityPub.create(draft.preview?)
259 |> maybe_create_activity_expiration(draft.expires_at)
263 defp maybe_create_activity_expiration({:ok, activity}, %NaiveDateTime{} = expires_at) do
264 with {:ok, _} <- ActivityExpiration.create(activity, expires_at) do
269 defp maybe_create_activity_expiration(result, _), do: result
271 # Updates the emojis for a user based on their profile
273 emoji = emoji_from_profile(user)
274 source_data = user.info |> Map.get(:source_data, %{}) |> Map.put("tag", emoji)
277 case User.update_info(user, &User.Info.set_source_data(&1, source_data)) do
282 ActivityPub.update(%{
284 to: [user.follower_address],
287 object: Pleroma.Web.ActivityPub.UserView.render("user.json", %{user: user})
291 def pin(id_or_ap_id, %{ap_id: user_ap_id} = user) do
294 data: %{"type" => "Create"},
295 object: %Object{data: %{"type" => "Note"}}
296 } = activity <- get_by_id_or_ap_id(id_or_ap_id),
297 true <- Visibility.is_public?(activity),
298 {:ok, _user} <- User.update_info(user, &User.Info.add_pinnned_activity(&1, activity)) do
301 {:error, %{changes: %{info: %{errors: [pinned_activities: {err, _}]}}}} -> {:error, err}
302 _ -> {:error, dgettext("errors", "Could not pin")}
306 def unpin(id_or_ap_id, user) do
307 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
308 {:ok, _user} <- User.update_info(user, &User.Info.remove_pinnned_activity(&1, activity)) do
311 %{errors: [pinned_activities: {err, _}]} -> {:error, err}
312 _ -> {:error, dgettext("errors", "Could not unpin")}
316 def add_mute(user, activity) do
317 with {:ok, _} <- ThreadMute.add_mute(user.id, activity.data["context"]) do
320 {:error, _} -> {:error, dgettext("errors", "conversation is already muted")}
324 def remove_mute(user, activity) do
325 ThreadMute.remove_mute(user.id, activity.data["context"])
329 def thread_muted?(%{id: nil} = _user, _activity), do: false
331 def thread_muted?(user, activity) do
332 ThreadMute.check_muted(user.id, activity.data["context"]) != []
335 def report(user, %{"account_id" => account_id} = data) do
336 with {:ok, account} <- get_reported_account(account_id),
337 {:ok, {content_html, _, _}} <- make_report_content_html(data["comment"]),
338 {:ok, statuses} <- get_report_statuses(account, data) do
340 context: Utils.generate_context_id(),
344 content: content_html,
345 forward: data["forward"] || false
350 def report(_user, _params), do: {:error, dgettext("errors", "Valid `account_id` required")}
352 defp get_reported_account(account_id) do
353 case User.get_cached_by_id(account_id) do
354 %User{} = account -> {:ok, account}
355 _ -> {:error, dgettext("errors", "Account not found")}
359 def update_report_state(activity_id, state) do
360 with %Activity{} = activity <- Activity.get_by_id(activity_id) do
361 Utils.update_report_state(activity, state)
363 nil -> {:error, :not_found}
364 _ -> {:error, dgettext("errors", "Could not update state")}
368 def update_activity_scope(activity_id, opts \\ %{}) do
369 with %Activity{} = activity <- Activity.get_by_id_with_object(activity_id),
370 {:ok, activity} <- toggle_sensitive(activity, opts) do
371 set_visibility(activity, opts)
373 nil -> {:error, :not_found}
374 {:error, reason} -> {:error, reason}
378 defp toggle_sensitive(activity, %{"sensitive" => sensitive}) when sensitive in ~w(true false) do
379 toggle_sensitive(activity, %{"sensitive" => String.to_existing_atom(sensitive)})
382 defp toggle_sensitive(%Activity{object: object} = activity, %{"sensitive" => sensitive})
383 when is_boolean(sensitive) do
384 new_data = Map.put(object.data, "sensitive", sensitive)
388 |> Object.change(%{data: new_data})
389 |> Object.update_and_set_cache()
391 {:ok, Map.put(activity, :object, object)}
394 defp toggle_sensitive(activity, _), do: {:ok, activity}
396 defp set_visibility(activity, %{"visibility" => visibility}) do
397 Utils.update_activity_visibility(activity, visibility)
400 defp set_visibility(activity, _), do: {:ok, activity}
402 def hide_reblogs(user, %{ap_id: ap_id} = _muted) do
403 if ap_id not in user.info.muted_reblogs do
404 User.update_info(user, &User.Info.add_reblog_mute(&1, ap_id))
408 def show_reblogs(user, %{ap_id: ap_id} = _muted) do
409 if ap_id in user.info.muted_reblogs do
410 User.update_info(user, &User.Info.remove_reblog_mute(&1, ap_id))