1 # Pleroma: A lightweight social networking server
2 # Copyright © 2017-2018 Pleroma Authors <https://pleroma.social/>
3 # SPDX-License-Identifier: AGPL-3.0-only
5 defmodule Pleroma.UserTest do
6 alias Pleroma.Builders.UserBuilder
7 alias Pleroma.{User, Repo, Activity}
8 alias Pleroma.Web.CommonAPI
11 import Pleroma.Factory
14 Tesla.Mock.mock_global(fn env -> apply(HttpRequestMock, :request, [env]) end)
18 describe "when tags are nil" do
19 test "tagging a user" do
20 user = insert(:user, %{tags: nil})
21 user = User.tag(user, ["cool", "dude"])
23 assert "cool" in user.tags
24 assert "dude" in user.tags
27 test "untagging a user" do
28 user = insert(:user, %{tags: nil})
29 user = User.untag(user, ["cool", "dude"])
31 assert user.tags == []
35 test "ap_id returns the activity pub id for the user" do
36 user = UserBuilder.build()
38 expected_ap_id = "#{Pleroma.Web.base_url()}/users/#{user.nickname}"
40 assert expected_ap_id == User.ap_id(user)
43 test "ap_followers returns the followers collection for the user" do
44 user = UserBuilder.build()
46 expected_followers_collection = "#{User.ap_id(user)}/followers"
48 assert expected_followers_collection == User.ap_followers(user)
51 test "follow takes a user and another user" do
53 followed = insert(:user)
55 {:ok, user} = User.follow(user, followed)
57 user = Repo.get(User, user.id)
59 followed = User.get_by_ap_id(followed.ap_id)
60 assert followed.info.follower_count == 1
62 assert User.ap_followers(followed) in user.following
65 test "can't follow a deactivated users" do
67 followed = insert(:user, info: %{deactivated: true})
69 {:error, _} = User.follow(user, followed)
72 test "can't follow a user who blocked us" do
73 blocker = insert(:user)
74 blockee = insert(:user)
76 {:ok, blocker} = User.block(blocker, blockee)
78 {:error, _} = User.follow(blockee, blocker)
81 test "local users do not automatically follow local locked accounts" do
82 follower = insert(:user, info: %{locked: true})
83 followed = insert(:user, info: %{locked: true})
85 {:ok, follower} = User.maybe_direct_follow(follower, followed)
87 refute User.following?(follower, followed)
90 # This is a somewhat useless test.
91 # test "following a remote user will ensure a websub subscription is present" do
92 # user = insert(:user)
93 # {:ok, followed} = OStatus.make_user("shp@social.heldscal.la")
95 # assert followed.local == false
97 # {:ok, user} = User.follow(user, followed)
98 # assert User.ap_followers(followed) in user.following
100 # query = from w in WebsubClientSubscription,
101 # where: w.topic == ^followed.info["topic"]
102 # websub = Repo.one(query)
107 test "unfollow takes a user and another user" do
108 followed = insert(:user)
109 user = insert(:user, %{following: [User.ap_followers(followed)]})
111 {:ok, user, _activity} = User.unfollow(user, followed)
113 user = Repo.get(User, user.id)
115 assert user.following == []
118 test "unfollow doesn't unfollow yourself" do
121 {:error, _} = User.unfollow(user, user)
123 user = Repo.get(User, user.id)
124 assert user.following == [user.ap_id]
127 test "test if a user is following another user" do
128 followed = insert(:user)
129 user = insert(:user, %{following: [User.ap_followers(followed)]})
131 assert User.following?(user, followed)
132 refute User.following?(followed, user)
135 describe "user registration" do
141 password_confirmation: "test",
142 email: "email@example.com"
145 test "it autofollows accounts that are set for it" do
147 remote_user = insert(:user, %{local: false})
149 Pleroma.Config.put([:instance, :autofollowed_nicknames], [
154 cng = User.register_changeset(%User{}, @full_user_data)
156 {:ok, registered_user} = User.register(cng)
158 assert User.following?(registered_user, user)
159 refute User.following?(registered_user, remote_user)
162 test "it requires an email, name, nickname and password, bio is optional" do
165 |> Enum.each(fn key ->
166 params = Map.delete(@full_user_data, key)
167 changeset = User.register_changeset(%User{}, params)
169 assert if key == :bio, do: changeset.valid?, else: not changeset.valid?
173 test "it restricts certain nicknames" do
174 [restricted_name | _] = Pleroma.Config.get([Pleroma.User, :restricted_nicknames])
176 assert is_bitstring(restricted_name)
180 |> Map.put(:nickname, restricted_name)
182 changeset = User.register_changeset(%User{}, params)
184 refute changeset.valid?
187 test "it sets the password_hash, ap_id and following fields" do
188 changeset = User.register_changeset(%User{}, @full_user_data)
190 assert changeset.valid?
192 assert is_binary(changeset.changes[:password_hash])
193 assert changeset.changes[:ap_id] == User.ap_id(%User{nickname: @full_user_data.nickname})
195 assert changeset.changes[:following] == [
196 User.ap_followers(%User{nickname: @full_user_data.nickname})
199 assert changeset.changes.follower_address == "#{changeset.changes.ap_id}/followers"
202 test "it ensures info is not nil" do
203 changeset = User.register_changeset(%User{}, @full_user_data)
205 assert changeset.valid?
211 refute is_nil(user.info)
215 describe "user registration, with :account_activation_required" do
221 password_confirmation: "test",
222 email: "email@example.com"
226 setting = Pleroma.Config.get([:instance, :account_activation_required])
229 Pleroma.Config.put([:instance, :account_activation_required], true)
230 on_exit(fn -> Pleroma.Config.put([:instance, :account_activation_required], setting) end)
236 test "it creates unconfirmed user" do
237 changeset = User.register_changeset(%User{}, @full_user_data)
238 assert changeset.valid?
240 {:ok, user} = Repo.insert(changeset)
242 assert user.info.confirmation_pending
243 assert user.info.confirmation_token
246 test "it creates confirmed user if :confirmed option is given" do
247 changeset = User.register_changeset(%User{}, @full_user_data, confirmed: true)
248 assert changeset.valid?
250 {:ok, user} = Repo.insert(changeset)
252 refute user.info.confirmation_pending
253 refute user.info.confirmation_token
257 describe "get_or_fetch/1" do
258 test "gets an existing user by nickname" do
260 fetched_user = User.get_or_fetch(user.nickname)
262 assert user == fetched_user
265 test "gets an existing user by ap_id" do
266 ap_id = "http://mastodon.example.org/users/admin"
272 nickname: "admin@mastodon.example.org",
277 fetched_user = User.get_or_fetch(ap_id)
278 freshed_user = refresh_record(user)
279 assert freshed_user == fetched_user
283 describe "fetching a user from nickname or trying to build one" do
284 test "gets an existing user" do
286 fetched_user = User.get_or_fetch_by_nickname(user.nickname)
288 assert user == fetched_user
291 test "gets an existing user, case insensitive" do
292 user = insert(:user, nickname: "nick")
293 fetched_user = User.get_or_fetch_by_nickname("NICK")
295 assert user == fetched_user
298 test "gets an existing user by fully qualified nickname" do
302 User.get_or_fetch_by_nickname(user.nickname <> "@" <> Pleroma.Web.Endpoint.host())
304 assert user == fetched_user
307 test "gets an existing user by fully qualified nickname, case insensitive" do
308 user = insert(:user, nickname: "nick")
309 casing_altered_fqn = String.upcase(user.nickname <> "@" <> Pleroma.Web.Endpoint.host())
311 fetched_user = User.get_or_fetch_by_nickname(casing_altered_fqn)
313 assert user == fetched_user
316 test "fetches an external user via ostatus if no user exists" do
317 fetched_user = User.get_or_fetch_by_nickname("shp@social.heldscal.la")
318 assert fetched_user.nickname == "shp@social.heldscal.la"
321 test "returns nil if no user could be fetched" do
322 fetched_user = User.get_or_fetch_by_nickname("nonexistant@social.heldscal.la")
323 assert fetched_user == nil
326 test "returns nil for nonexistant local user" do
327 fetched_user = User.get_or_fetch_by_nickname("nonexistant")
328 assert fetched_user == nil
331 test "updates an existing user, if stale" do
332 a_week_ago = NaiveDateTime.add(NaiveDateTime.utc_now(), -604_800)
338 nickname: "admin@mastodon.example.org",
339 ap_id: "http://mastodon.example.org/users/admin",
340 last_refreshed_at: a_week_ago,
344 assert orig_user.last_refreshed_at == a_week_ago
346 user = User.get_or_fetch_by_ap_id("http://mastodon.example.org/users/admin")
347 assert user.info.source_data["endpoints"]
349 refute user.last_refreshed_at == orig_user.last_refreshed_at
353 test "returns an ap_id for a user" do
356 assert User.ap_id(user) ==
357 Pleroma.Web.Router.Helpers.o_status_url(
358 Pleroma.Web.Endpoint,
364 test "returns an ap_followers link for a user" do
367 assert User.ap_followers(user) ==
368 Pleroma.Web.Router.Helpers.o_status_url(
369 Pleroma.Web.Endpoint,
375 describe "remote user creation changeset" do
381 info: %{some: "info"},
382 avatar: %{some: "avatar"}
385 test "it confirms validity" do
386 cs = User.remote_user_creation(@valid_remote)
390 test "it sets the follower_adress" do
391 cs = User.remote_user_creation(@valid_remote)
392 # remote users get a fake local follower address
393 assert cs.changes.follower_address ==
394 User.ap_followers(%User{nickname: @valid_remote[:nickname]})
397 test "it enforces the fqn format for nicknames" do
398 cs = User.remote_user_creation(%{@valid_remote | nickname: "bla"})
399 assert cs.changes.local == false
400 assert cs.changes.avatar
404 test "it has required fields" do
406 |> Enum.each(fn field ->
407 cs = User.remote_user_creation(Map.delete(@valid_remote, field))
412 test "it restricts some sizes" do
413 [bio: 5000, name: 100]
414 |> Enum.each(fn {field, size} ->
415 string = String.pad_leading(".", size)
416 cs = User.remote_user_creation(Map.put(@valid_remote, field, string))
419 string = String.pad_leading(".", size + 1)
420 cs = User.remote_user_creation(Map.put(@valid_remote, field, string))
426 describe "followers and friends" do
427 test "gets all followers for a given user" do
429 follower_one = insert(:user)
430 follower_two = insert(:user)
431 not_follower = insert(:user)
433 {:ok, follower_one} = User.follow(follower_one, user)
434 {:ok, follower_two} = User.follow(follower_two, user)
436 {:ok, res} = User.get_followers(user)
438 assert Enum.member?(res, follower_one)
439 assert Enum.member?(res, follower_two)
440 refute Enum.member?(res, not_follower)
443 test "gets all friends (followed users) for a given user" do
445 followed_one = insert(:user)
446 followed_two = insert(:user)
447 not_followed = insert(:user)
449 {:ok, user} = User.follow(user, followed_one)
450 {:ok, user} = User.follow(user, followed_two)
452 {:ok, res} = User.get_friends(user)
454 followed_one = User.get_by_ap_id(followed_one.ap_id)
455 followed_two = User.get_by_ap_id(followed_two.ap_id)
456 assert Enum.member?(res, followed_one)
457 assert Enum.member?(res, followed_two)
458 refute Enum.member?(res, not_followed)
462 describe "updating note and follower count" do
463 test "it sets the info->note_count property" do
466 user = User.get_by_ap_id(note.data["actor"])
468 assert user.info.note_count == 0
470 {:ok, user} = User.update_note_count(user)
472 assert user.info.note_count == 1
475 test "it increases the info->note_count property" do
477 user = User.get_by_ap_id(note.data["actor"])
479 assert user.info.note_count == 0
481 {:ok, user} = User.increase_note_count(user)
483 assert user.info.note_count == 1
485 {:ok, user} = User.increase_note_count(user)
487 assert user.info.note_count == 2
490 test "it decreases the info->note_count property" do
492 user = User.get_by_ap_id(note.data["actor"])
494 assert user.info.note_count == 0
496 {:ok, user} = User.increase_note_count(user)
498 assert user.info.note_count == 1
500 {:ok, user} = User.decrease_note_count(user)
502 assert user.info.note_count == 0
504 {:ok, user} = User.decrease_note_count(user)
506 assert user.info.note_count == 0
509 test "it sets the info->follower_count property" do
511 follower = insert(:user)
513 User.follow(follower, user)
515 assert user.info.follower_count == 0
517 {:ok, user} = User.update_follower_count(user)
519 assert user.info.follower_count == 1
523 describe "follow_import" do
524 test "it imports user followings from list" do
525 [user1, user2, user3] = insert_list(3, :user)
532 result = User.follow_import(user1, identifiers)
533 assert is_list(result)
534 assert result == [user2, user3]
539 test "it blocks people" do
541 blocked_user = insert(:user)
543 refute User.blocks?(user, blocked_user)
545 {:ok, user} = User.block(user, blocked_user)
547 assert User.blocks?(user, blocked_user)
550 test "it unblocks users" do
552 blocked_user = insert(:user)
554 {:ok, user} = User.block(user, blocked_user)
555 {:ok, user} = User.unblock(user, blocked_user)
557 refute User.blocks?(user, blocked_user)
560 test "blocks tear down cyclical follow relationships" do
561 blocker = insert(:user)
562 blocked = insert(:user)
564 {:ok, blocker} = User.follow(blocker, blocked)
565 {:ok, blocked} = User.follow(blocked, blocker)
567 assert User.following?(blocker, blocked)
568 assert User.following?(blocked, blocker)
570 {:ok, blocker} = User.block(blocker, blocked)
571 blocked = Repo.get(User, blocked.id)
573 assert User.blocks?(blocker, blocked)
575 refute User.following?(blocker, blocked)
576 refute User.following?(blocked, blocker)
579 test "blocks tear down blocker->blocked follow relationships" do
580 blocker = insert(:user)
581 blocked = insert(:user)
583 {:ok, blocker} = User.follow(blocker, blocked)
585 assert User.following?(blocker, blocked)
586 refute User.following?(blocked, blocker)
588 {:ok, blocker} = User.block(blocker, blocked)
589 blocked = Repo.get(User, blocked.id)
591 assert User.blocks?(blocker, blocked)
593 refute User.following?(blocker, blocked)
594 refute User.following?(blocked, blocker)
597 test "blocks tear down blocked->blocker follow relationships" do
598 blocker = insert(:user)
599 blocked = insert(:user)
601 {:ok, blocked} = User.follow(blocked, blocker)
603 refute User.following?(blocker, blocked)
604 assert User.following?(blocked, blocker)
606 {:ok, blocker} = User.block(blocker, blocked)
607 blocked = Repo.get(User, blocked.id)
609 assert User.blocks?(blocker, blocked)
611 refute User.following?(blocker, blocked)
612 refute User.following?(blocked, blocker)
616 describe "domain blocking" do
617 test "blocks domains" do
619 collateral_user = insert(:user, %{ap_id: "https://awful-and-rude-instance.com/user/bully"})
621 {:ok, user} = User.block_domain(user, "awful-and-rude-instance.com")
623 assert User.blocks?(user, collateral_user)
626 test "unblocks domains" do
628 collateral_user = insert(:user, %{ap_id: "https://awful-and-rude-instance.com/user/bully"})
630 {:ok, user} = User.block_domain(user, "awful-and-rude-instance.com")
631 {:ok, user} = User.unblock_domain(user, "awful-and-rude-instance.com")
633 refute User.blocks?(user, collateral_user)
637 describe "blocks_import" do
638 test "it imports user blocks from list" do
639 [user1, user2, user3] = insert_list(3, :user)
646 result = User.blocks_import(user1, identifiers)
647 assert is_list(result)
648 assert result == [user2, user3]
652 test "get recipients from activity" do
653 actor = insert(:user)
654 user = insert(:user, local: true)
655 user_two = insert(:user, local: false)
656 addressed = insert(:user, local: true)
657 addressed_remote = insert(:user, local: false)
660 CommonAPI.post(actor, %{
661 "status" => "hey @#{addressed.nickname} @#{addressed_remote.nickname}"
664 assert [addressed] == User.get_recipients_from_activity(activity)
666 {:ok, user} = User.follow(user, actor)
667 {:ok, _user_two} = User.follow(user_two, actor)
668 recipients = User.get_recipients_from_activity(activity)
669 assert length(recipients) == 2
670 assert user in recipients
671 assert addressed in recipients
674 test ".deactivate can de-activate then re-activate a user" do
676 assert false == user.info.deactivated
677 {:ok, user} = User.deactivate(user)
678 assert true == user.info.deactivated
679 {:ok, user} = User.deactivate(user, false)
680 assert false == user.info.deactivated
683 test ".delete deactivates a user, all follow relationships and all create activities" do
685 followed = insert(:user)
686 follower = insert(:user)
688 {:ok, user} = User.follow(user, followed)
689 {:ok, follower} = User.follow(follower, user)
691 {:ok, activity} = CommonAPI.post(user, %{"status" => "2hu"})
692 {:ok, activity_two} = CommonAPI.post(follower, %{"status" => "3hu"})
694 {:ok, _, _} = CommonAPI.favorite(activity_two.id, user)
695 {:ok, _, _} = CommonAPI.favorite(activity.id, follower)
696 {:ok, _, _} = CommonAPI.repeat(activity.id, follower)
698 {:ok, _} = User.delete(user)
700 followed = Repo.get(User, followed.id)
701 follower = Repo.get(User, follower.id)
702 user = Repo.get(User, user.id)
704 assert user.info.deactivated
706 refute User.following?(user, followed)
707 refute User.following?(followed, follower)
709 # TODO: Remove favorites, repeats, delete activities.
711 refute Repo.get(Activity, activity.id)
714 test "get_public_key_for_ap_id fetches a user that's not in the db" do
715 assert {:ok, _key} = User.get_public_key_for_ap_id("http://mastodon.example.org/users/admin")
718 test "insert or update a user from given data" do
719 user = insert(:user, %{nickname: "nick@name.de"})
720 data = %{ap_id: user.ap_id <> "xxx", name: user.name, nickname: user.nickname}
722 assert {:ok, %User{}} = User.insert_or_update_user(data)
725 describe "per-user rich-text filtering" do
726 test "html_filter_policy returns default policies, when rich-text is enabled" do
729 assert Pleroma.Config.get([:markup, :scrub_policy]) == User.html_filter_policy(user)
732 test "html_filter_policy returns TwitterText scrubber when rich-text is disabled" do
733 user = insert(:user, %{info: %{no_rich_text: true}})
735 assert Pleroma.HTML.Scrubber.TwitterText == User.html_filter_policy(user)
739 describe "caching" do
740 test "invalidate_cache works" do
742 _user_info = User.get_cached_user_info(user)
744 User.invalidate_cache(user)
746 {:ok, nil} = Cachex.get(:user_cache, "ap_id:#{user.ap_id}")
747 {:ok, nil} = Cachex.get(:user_cache, "nickname:#{user.nickname}")
748 {:ok, nil} = Cachex.get(:user_cache, "user_info:#{user.id}")
751 test "User.delete() plugs any possible zombie objects" do
754 {:ok, _} = User.delete(user)
756 {:ok, cached_user} = Cachex.get(:user_cache, "ap_id:#{user.ap_id}")
758 assert cached_user != user
760 {:ok, cached_user} = Cachex.get(:user_cache, "nickname:#{user.ap_id}")
762 assert cached_user != user
766 describe "User.search" do
767 test "finds a user, ranking by similarity" do
768 _user = insert(:user, %{name: "lain"})
769 _user_two = insert(:user, %{name: "ean"})
770 _user_three = insert(:user, %{name: "ebn", nickname: "lain@mastodon.social"})
771 user_four = insert(:user, %{nickname: "lain@pleroma.soykaf.com"})
774 User.search("lain@ple") |> List.first() |> Map.put(:search_distance, nil)
777 test "finds a user whose name is nil" do
778 _user = insert(:user, %{name: "notamatch", nickname: "testuser@pleroma.amplifie.red"})
779 user_two = insert(:user, %{name: nil, nickname: "lain@pleroma.soykaf.com"})
782 User.search("lain@pleroma.soykaf.com")
784 |> Map.put(:search_distance, nil)