Return correct response when reply to a direct message is not direct itself
[akkoma] / lib / pleroma / web / common_api / common_api.ex
1 # Pleroma: A lightweight social networking server
2 # Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
3 # SPDX-License-Identifier: AGPL-3.0-only
4
5 defmodule Pleroma.Web.CommonAPI do
6 alias Pleroma.Activity
7 alias Pleroma.Bookmark
8 alias Pleroma.Formatter
9 alias Pleroma.Object
10 alias Pleroma.ThreadMute
11 alias Pleroma.User
12 alias Pleroma.Web.ActivityPub.ActivityPub
13 alias Pleroma.Web.ActivityPub.Utils
14
15 import Pleroma.Web.CommonAPI.Utils
16
17 def follow(follower, followed) do
18 with {:ok, follower} <- User.maybe_direct_follow(follower, followed),
19 {:ok, activity} <- ActivityPub.follow(follower, followed),
20 {:ok, follower, followed} <-
21 User.wait_and_refresh(
22 Pleroma.Config.get([:activitypub, :follow_handshake_timeout]),
23 follower,
24 followed
25 ) do
26 {:ok, follower, followed, activity}
27 end
28 end
29
30 def unfollow(follower, unfollowed) do
31 with {:ok, follower, _follow_activity} <- User.unfollow(follower, unfollowed),
32 {:ok, _activity} <- ActivityPub.unfollow(follower, unfollowed) do
33 {:ok, follower}
34 end
35 end
36
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"),
41 {:ok, _activity} <-
42 ActivityPub.accept(%{
43 to: [follower.ap_id],
44 actor: followed,
45 object: follow_activity.data["id"],
46 type: "Accept"
47 }) do
48 {:ok, follower}
49 end
50 end
51
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"),
55 {:ok, _activity} <-
56 ActivityPub.reject(%{
57 to: [follower.ap_id],
58 actor: followed,
59 object: follow_activity.data["id"],
60 type: "Reject"
61 }) do
62 {:ok, follower}
63 end
64 end
65
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
73 {:ok, delete}
74 else
75 _ ->
76 {:error, "Could not delete"}
77 end
78 end
79
80 def repeat(id_or_ap_id, user) do
81 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
82 object <- Object.normalize(activity),
83 nil <- Utils.get_existing_announce(user.ap_id, object) do
84 ActivityPub.announce(user, object)
85 else
86 _ ->
87 {:error, "Could not repeat"}
88 end
89 end
90
91 def unrepeat(id_or_ap_id, user) do
92 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
93 object <- Object.normalize(activity) do
94 ActivityPub.unannounce(user, object)
95 else
96 _ ->
97 {:error, "Could not unrepeat"}
98 end
99 end
100
101 def favorite(id_or_ap_id, user) do
102 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
103 object <- Object.normalize(activity),
104 nil <- Utils.get_existing_like(user.ap_id, object) do
105 ActivityPub.like(user, object)
106 else
107 _ ->
108 {:error, "Could not favorite"}
109 end
110 end
111
112 def unfavorite(id_or_ap_id, user) do
113 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
114 object <- Object.normalize(activity) do
115 ActivityPub.unlike(user, object)
116 else
117 _ ->
118 {:error, "Could not unfavorite"}
119 end
120 end
121
122 def vote(user, object, choices) do
123 with "Question" <- object.data["type"],
124 {:author, false} <- {:author, object.data["actor"] == user.ap_id},
125 {:existing_votes, []} <- {:existing_votes, Utils.get_existing_votes(user.ap_id, object)},
126 {options, max_count} <- get_options_and_max_count(object),
127 option_count <- Enum.count(options),
128 {:choice_check, {choices, true}} <-
129 {:choice_check, normalize_and_validate_choice_indices(choices, option_count)},
130 {:count_check, true} <- {:count_check, Enum.count(choices) <= max_count} do
131 answer_activities =
132 Enum.map(choices, fn index ->
133 answer_data = make_answer_data(user, object, Enum.at(options, index)["name"])
134
135 {:ok, activity} =
136 ActivityPub.create(%{
137 to: answer_data["to"],
138 actor: user,
139 context: object.data["context"],
140 object: answer_data,
141 additional: %{"cc" => answer_data["cc"]}
142 })
143
144 activity
145 end)
146
147 object = Object.get_cached_by_ap_id(object.data["id"])
148 {:ok, answer_activities, object}
149 else
150 {:author, _} -> {:error, "Poll's author can't vote"}
151 {:existing_votes, _} -> {:error, "Already voted"}
152 {:choice_check, {_, false}} -> {:error, "Invalid indices"}
153 {:count_check, false} -> {:error, "Too many choices"}
154 end
155 end
156
157 defp get_options_and_max_count(object) do
158 if Map.has_key?(object.data, "anyOf") do
159 {object.data["anyOf"], Enum.count(object.data["anyOf"])}
160 else
161 {object.data["oneOf"], 1}
162 end
163 end
164
165 defp normalize_and_validate_choice_indices(choices, count) do
166 Enum.map_reduce(choices, true, fn index, valid ->
167 index = if is_binary(index), do: String.to_integer(index), else: index
168 {index, if(valid, do: index < count, else: valid)}
169 end)
170 end
171
172 def get_visibility(%{"visibility" => visibility}, in_reply_to)
173 when visibility in ~w{public unlisted private direct},
174 do: {visibility, get_replied_to_visibility(in_reply_to)}
175
176 def get_visibility(_, in_reply_to) when not is_nil(in_reply_to) do
177 visibility = get_replied_to_visibility(in_reply_to)
178 {visibility, visibility}
179 end
180
181 def get_visibility(_, in_reply_to), do: {"public", get_replied_to_visibility(in_reply_to)}
182
183 def get_replied_to_visibility(nil), do: nil
184
185 def get_replied_to_visibility(activity) do
186 with %Object{} = object <- Object.normalize(activity) do
187 Pleroma.Web.ActivityPub.Visibility.get_visibility(object)
188 end
189 end
190
191 def post(user, %{"status" => status} = data) do
192 limit = Pleroma.Config.get([:instance, :limit])
193
194 with status <- String.trim(status),
195 attachments <- attachments_from_ids(data),
196 in_reply_to <- get_replied_to_activity(data["in_reply_to_status_id"]),
197 {visibility, in_reply_to_visibility} <- get_visibility(data, in_reply_to),
198 {_, false} <-
199 {:private_to_public, in_reply_to_visibility == "direct" && visibility != "direct"},
200 {content_html, mentions, tags} <-
201 make_content_html(
202 status,
203 attachments,
204 data,
205 visibility
206 ),
207 mentioned_users <- for({_, mentioned_user} <- mentions, do: mentioned_user.ap_id),
208 addressed_users <- get_addressed_users(mentioned_users, data["to"]),
209 {poll, poll_emoji} <- make_poll_data(data),
210 {to, cc} <- get_to_and_cc(user, addressed_users, in_reply_to, visibility),
211 context <- make_context(in_reply_to),
212 cw <- data["spoiler_text"] || "",
213 sensitive <- data["sensitive"] || Enum.member?(tags, {"#nsfw", "nsfw"}),
214 full_payload <- String.trim(status <> cw),
215 :ok <- validate_character_limit(full_payload, attachments, limit),
216 object <-
217 make_note_data(
218 user.ap_id,
219 to,
220 context,
221 content_html,
222 attachments,
223 in_reply_to,
224 tags,
225 cw,
226 cc,
227 sensitive,
228 poll
229 ),
230 object <-
231 Map.put(
232 object,
233 "emoji",
234 Map.merge(Formatter.get_emoji_map(full_payload), poll_emoji)
235 ) do
236 res =
237 ActivityPub.create(
238 %{
239 to: to,
240 actor: user,
241 context: context,
242 object: object,
243 additional: %{"cc" => cc, "directMessage" => visibility == "direct"}
244 },
245 Pleroma.Web.ControllerHelper.truthy_param?(data["preview"]) || false
246 )
247
248 res
249 else
250 {:private_to_public, true} -> {:error, "The message visibility must be direct"}
251 {:error, _} = e -> e
252 e -> {:error, e}
253 end
254 end
255
256 # Updates the emojis for a user based on their profile
257 def update(user) do
258 user =
259 with emoji <- emoji_from_profile(user),
260 source_data <- (user.info.source_data || %{}) |> Map.put("tag", emoji),
261 info_cng <- User.Info.set_source_data(user.info, source_data),
262 change <- Ecto.Changeset.change(user) |> Ecto.Changeset.put_embed(:info, info_cng),
263 {:ok, user} <- User.update_and_set_cache(change) do
264 user
265 else
266 _e ->
267 user
268 end
269
270 ActivityPub.update(%{
271 local: true,
272 to: [user.follower_address],
273 cc: [],
274 actor: user.ap_id,
275 object: Pleroma.Web.ActivityPub.UserView.render("user.json", %{user: user})
276 })
277 end
278
279 def pin(id_or_ap_id, %{ap_id: user_ap_id} = user) do
280 with %Activity{
281 actor: ^user_ap_id,
282 data: %{
283 "type" => "Create"
284 },
285 object: %Object{
286 data: %{
287 "to" => object_to,
288 "type" => "Note"
289 }
290 }
291 } = activity <- get_by_id_or_ap_id(id_or_ap_id),
292 true <- Enum.member?(object_to, "https://www.w3.org/ns/activitystreams#Public"),
293 %{valid?: true} = info_changeset <-
294 User.Info.add_pinnned_activity(user.info, activity),
295 changeset <-
296 Ecto.Changeset.change(user) |> Ecto.Changeset.put_embed(:info, info_changeset),
297 {:ok, _user} <- User.update_and_set_cache(changeset) do
298 {:ok, activity}
299 else
300 %{errors: [pinned_activities: {err, _}]} ->
301 {:error, err}
302
303 _ ->
304 {:error, "Could not pin"}
305 end
306 end
307
308 def unpin(id_or_ap_id, user) do
309 with %Activity{} = activity <- get_by_id_or_ap_id(id_or_ap_id),
310 %{valid?: true} = info_changeset <-
311 User.Info.remove_pinnned_activity(user.info, activity),
312 changeset <-
313 Ecto.Changeset.change(user) |> Ecto.Changeset.put_embed(:info, info_changeset),
314 {:ok, _user} <- User.update_and_set_cache(changeset) do
315 {:ok, activity}
316 else
317 %{errors: [pinned_activities: {err, _}]} ->
318 {:error, err}
319
320 _ ->
321 {:error, "Could not unpin"}
322 end
323 end
324
325 def add_mute(user, activity) do
326 with {:ok, _} <- ThreadMute.add_mute(user.id, activity.data["context"]) do
327 {:ok, activity}
328 else
329 {:error, _} -> {:error, "conversation is already muted"}
330 end
331 end
332
333 def remove_mute(user, activity) do
334 ThreadMute.remove_mute(user.id, activity.data["context"])
335 {:ok, activity}
336 end
337
338 def thread_muted?(%{id: nil} = _user, _activity), do: false
339
340 def thread_muted?(user, activity) do
341 with [] <- ThreadMute.check_muted(user.id, activity.data["context"]) do
342 false
343 else
344 _ -> true
345 end
346 end
347
348 def bookmarked?(user, activity) do
349 with %Bookmark{} <- Bookmark.get(user.id, activity.id) do
350 true
351 else
352 _ ->
353 false
354 end
355 end
356
357 def report(user, data) do
358 with {:account_id, %{"account_id" => account_id}} <- {:account_id, data},
359 {:account, %User{} = account} <- {:account, User.get_cached_by_id(account_id)},
360 {:ok, {content_html, _, _}} <- make_report_content_html(data["comment"]),
361 {:ok, statuses} <- get_report_statuses(account, data),
362 {:ok, activity} <-
363 ActivityPub.flag(%{
364 context: Utils.generate_context_id(),
365 actor: user,
366 account: account,
367 statuses: statuses,
368 content: content_html,
369 forward: data["forward"] || false
370 }) do
371 {:ok, activity}
372 else
373 {:error, err} -> {:error, err}
374 {:account_id, %{}} -> {:error, "Valid `account_id` required"}
375 {:account, nil} -> {:error, "Account not found"}
376 end
377 end
378
379 def update_report_state(activity_id, state) do
380 with %Activity{} = activity <- Activity.get_by_id(activity_id),
381 {:ok, activity} <- Utils.update_report_state(activity, state) do
382 {:ok, activity}
383 else
384 nil ->
385 {:error, :not_found}
386
387 {:error, reason} ->
388 {:error, reason}
389
390 _ ->
391 {:error, "Could not update state"}
392 end
393 end
394
395 def update_activity_scope(activity_id, opts \\ %{}) do
396 with %Activity{} = activity <- Activity.get_by_id_with_object(activity_id),
397 {:ok, activity} <- toggle_sensitive(activity, opts),
398 {:ok, activity} <- set_visibility(activity, opts) do
399 {:ok, activity}
400 else
401 nil ->
402 {:error, :not_found}
403
404 {:error, reason} ->
405 {:error, reason}
406 end
407 end
408
409 defp toggle_sensitive(activity, %{"sensitive" => sensitive}) when sensitive in ~w(true false) do
410 toggle_sensitive(activity, %{"sensitive" => String.to_existing_atom(sensitive)})
411 end
412
413 defp toggle_sensitive(%Activity{object: object} = activity, %{"sensitive" => sensitive})
414 when is_boolean(sensitive) do
415 new_data = Map.put(object.data, "sensitive", sensitive)
416
417 {:ok, object} =
418 object
419 |> Object.change(%{data: new_data})
420 |> Object.update_and_set_cache()
421
422 {:ok, Map.put(activity, :object, object)}
423 end
424
425 defp toggle_sensitive(activity, _), do: {:ok, activity}
426
427 defp set_visibility(activity, %{"visibility" => visibility}) do
428 Utils.update_activity_visibility(activity, visibility)
429 end
430
431 defp set_visibility(activity, _), do: {:ok, activity}
432
433 def hide_reblogs(user, muted) do
434 ap_id = muted.ap_id
435
436 if ap_id not in user.info.muted_reblogs do
437 info_changeset = User.Info.add_reblog_mute(user.info, ap_id)
438 changeset = Ecto.Changeset.change(user) |> Ecto.Changeset.put_embed(:info, info_changeset)
439 User.update_and_set_cache(changeset)
440 end
441 end
442
443 def show_reblogs(user, muted) do
444 ap_id = muted.ap_id
445
446 if ap_id in user.info.muted_reblogs do
447 info_changeset = User.Info.remove_reblog_mute(user.info, ap_id)
448 changeset = Ecto.Changeset.change(user) |> Ecto.Changeset.put_embed(:info, info_changeset)
449 User.update_and_set_cache(changeset)
450 end
451 end
452 end