git.squeep.com Git - akkoma/blob - test/user_test.exs

   1 # Pleroma: A lightweight social networking server
   2 # Copyright © 2017-2020 Pleroma Authors <https://pleroma.social/>
   3 # SPDX-License-Identifier: AGPL-3.0-only
   4
   5 defmodule Pleroma.UserTest do
   6   alias Pleroma.Activity
   7   alias Pleroma.Builders.UserBuilder
   8   alias Pleroma.Object
   9   alias Pleroma.Repo
  10   alias Pleroma.Tests.ObanHelpers
  11   alias Pleroma.User
  12   alias Pleroma.Web.ActivityPub.ActivityPub
  13   alias Pleroma.Web.CommonAPI
  14
  15   use Pleroma.DataCase
  16   use Oban.Testing, repo: Pleroma.Repo
  17
  18   import Pleroma.Factory
  19   import ExUnit.CaptureLog
  20   import Swoosh.TestAssertions
  21
  22   setup_all do
  23     Tesla.Mock.mock_global(fn env -> apply(HttpRequestMock, :request, [env]) end)
  24     :ok
  25   end
  26
  27   setup do: clear_config([:instance, :account_activation_required])
  28
  29   describe "service actors" do
  30     test "returns updated invisible actor" do
  31       uri = "#{Pleroma.Web.Endpoint.url()}/relay"
  32       followers_uri = "#{uri}/followers"
  33
  34       insert(
  35         :user,
  36         %{
  37           nickname: "relay",
  38           invisible: false,
  39           local: true,
  40           ap_id: uri,
  41           follower_address: followers_uri
  42         }
  43       )
  44
  45       actor = User.get_or_create_service_actor_by_ap_id(uri, "relay")
  46       assert actor.invisible
  47     end
  48
  49     test "returns relay user" do
  50       uri = "#{Pleroma.Web.Endpoint.url()}/relay"
  51       followers_uri = "#{uri}/followers"
  52
  53       assert %User{
  54                nickname: "relay",
  55                invisible: true,
  56                local: true,
  57                ap_id: ^uri,
  58                follower_address: ^followers_uri
  59              } = User.get_or_create_service_actor_by_ap_id(uri, "relay")
  60
  61       assert capture_log(fn ->
  62                refute User.get_or_create_service_actor_by_ap_id("/relay", "relay")
  63              end) =~ "Cannot create service actor:"
  64     end
  65
  66     test "returns invisible actor" do
  67       uri = "#{Pleroma.Web.Endpoint.url()}/internal/fetch-test"
  68       followers_uri = "#{uri}/followers"
  69       user = User.get_or_create_service_actor_by_ap_id(uri, "internal.fetch-test")
  70
  71       assert %User{
  72                nickname: "internal.fetch-test",
  73                invisible: true,
  74                local: true,
  75                ap_id: ^uri,
  76                follower_address: ^followers_uri
  77              } = user
  78
  79       user2 = User.get_or_create_service_actor_by_ap_id(uri, "internal.fetch-test")
  80       assert user.id == user2.id
  81     end
  82   end
  83
  84   describe "AP ID user relationships" do
  85     setup do
  86       {:ok, user: insert(:user)}
  87     end
  88
  89     test "outgoing_relationships_ap_ids/1", %{user: user} do
  90       rel_types = [:block, :mute, :notification_mute, :reblog_mute, :inverse_subscription]
  91
  92       ap_ids_by_rel =
  93         Enum.into(
  94           rel_types,
  95           %{},
  96           fn rel_type ->
  97             rel_records =
  98               insert_list(2, :user_relationship, %{source: user, relationship_type: rel_type})
  99
 100             ap_ids = Enum.map(rel_records, fn rr -> Repo.preload(rr, :target).target.ap_id end)
 101             {rel_type, Enum.sort(ap_ids)}
 102           end
 103         )
 104
 105       assert ap_ids_by_rel[:block] == Enum.sort(User.blocked_users_ap_ids(user))
 106       assert ap_ids_by_rel[:block] == Enum.sort(Enum.map(User.blocked_users(user), & &1.ap_id))
 107
 108       assert ap_ids_by_rel[:mute] == Enum.sort(User.muted_users_ap_ids(user))
 109       assert ap_ids_by_rel[:mute] == Enum.sort(Enum.map(User.muted_users(user), & &1.ap_id))
 110
 111       assert ap_ids_by_rel[:notification_mute] ==
 112                Enum.sort(User.notification_muted_users_ap_ids(user))
 113
 114       assert ap_ids_by_rel[:notification_mute] ==
 115                Enum.sort(Enum.map(User.notification_muted_users(user), & &1.ap_id))
 116
 117       assert ap_ids_by_rel[:reblog_mute] == Enum.sort(User.reblog_muted_users_ap_ids(user))
 118
 119       assert ap_ids_by_rel[:reblog_mute] ==
 120                Enum.sort(Enum.map(User.reblog_muted_users(user), & &1.ap_id))
 121
 122       assert ap_ids_by_rel[:inverse_subscription] == Enum.sort(User.subscriber_users_ap_ids(user))
 123
 124       assert ap_ids_by_rel[:inverse_subscription] ==
 125                Enum.sort(Enum.map(User.subscriber_users(user), & &1.ap_id))
 126
 127       outgoing_relationships_ap_ids = User.outgoing_relationships_ap_ids(user, rel_types)
 128
 129       assert ap_ids_by_rel ==
 130                Enum.into(outgoing_relationships_ap_ids, %{}, fn {k, v} -> {k, Enum.sort(v)} end)
 131     end
 132   end
 133
 134   describe "when tags are nil" do
 135     test "tagging a user" do
 136       user = insert(:user, %{tags: nil})
 137       user = User.tag(user, ["cool", "dude"])
 138
 139       assert "cool" in user.tags
 140       assert "dude" in user.tags
 141     end
 142
 143     test "untagging a user" do
 144       user = insert(:user, %{tags: nil})
 145       user = User.untag(user, ["cool", "dude"])
 146
 147       assert user.tags == []
 148     end
 149   end
 150
 151   test "ap_id returns the activity pub id for the user" do
 152     user = UserBuilder.build()
 153
 154     expected_ap_id = "#{Pleroma.Web.base_url()}/users/#{user.nickname}"
 155
 156     assert expected_ap_id == User.ap_id(user)
 157   end
 158
 159   test "ap_followers returns the followers collection for the user" do
 160     user = UserBuilder.build()
 161
 162     expected_followers_collection = "#{User.ap_id(user)}/followers"
 163
 164     assert expected_followers_collection == User.ap_followers(user)
 165   end
 166
 167   test "ap_following returns the following collection for the user" do
 168     user = UserBuilder.build()
 169
 170     expected_followers_collection = "#{User.ap_id(user)}/following"
 171
 172     assert expected_followers_collection == User.ap_following(user)
 173   end
 174
 175   test "returns all pending follow requests" do
 176     unlocked = insert(:user)
 177     locked = insert(:user, locked: true)
 178     follower = insert(:user)
 179
 180     CommonAPI.follow(follower, unlocked)
 181     CommonAPI.follow(follower, locked)
 182
 183     assert [] = User.get_follow_requests(unlocked)
 184     assert [activity] = User.get_follow_requests(locked)
 185
 186     assert activity
 187   end
 188
 189   test "doesn't return already accepted or duplicate follow requests" do
 190     locked = insert(:user, locked: true)
 191     pending_follower = insert(:user)
 192     accepted_follower = insert(:user)
 193
 194     CommonAPI.follow(pending_follower, locked)
 195     CommonAPI.follow(pending_follower, locked)
 196     CommonAPI.follow(accepted_follower, locked)
 197
 198     Pleroma.FollowingRelationship.update(accepted_follower, locked, :follow_accept)
 199
 200     assert [^pending_follower] = User.get_follow_requests(locked)
 201   end
 202
 203   test "doesn't return follow requests for deactivated accounts" do
 204     locked = insert(:user, locked: true)
 205     pending_follower = insert(:user, %{deactivated: true})
 206
 207     CommonAPI.follow(pending_follower, locked)
 208
 209     assert true == pending_follower.deactivated
 210     assert [] = User.get_follow_requests(locked)
 211   end
 212
 213   test "clears follow requests when requester is blocked" do
 214     followed = insert(:user, locked: true)
 215     follower = insert(:user)
 216
 217     CommonAPI.follow(follower, followed)
 218     assert [_activity] = User.get_follow_requests(followed)
 219
 220     {:ok, _user_relationship} = User.block(followed, follower)
 221     assert [] = User.get_follow_requests(followed)
 222   end
 223
 224   test "follow_all follows mutliple users" do
 225     user = insert(:user)
 226     followed_zero = insert(:user)
 227     followed_one = insert(:user)
 228     followed_two = insert(:user)
 229     blocked = insert(:user)
 230     not_followed = insert(:user)
 231     reverse_blocked = insert(:user)
 232
 233     {:ok, _user_relationship} = User.block(user, blocked)
 234     {:ok, _user_relationship} = User.block(reverse_blocked, user)
 235
 236     {:ok, user} = User.follow(user, followed_zero)
 237
 238     {:ok, user} = User.follow_all(user, [followed_one, followed_two, blocked, reverse_blocked])
 239
 240     assert User.following?(user, followed_one)
 241     assert User.following?(user, followed_two)
 242     assert User.following?(user, followed_zero)
 243     refute User.following?(user, not_followed)
 244     refute User.following?(user, blocked)
 245     refute User.following?(user, reverse_blocked)
 246   end
 247
 248   test "follow_all follows mutliple users without duplicating" do
 249     user = insert(:user)
 250     followed_zero = insert(:user)
 251     followed_one = insert(:user)
 252     followed_two = insert(:user)
 253
 254     {:ok, user} = User.follow_all(user, [followed_zero, followed_one])
 255     assert length(User.following(user)) == 3
 256
 257     {:ok, user} = User.follow_all(user, [followed_one, followed_two])
 258     assert length(User.following(user)) == 4
 259   end
 260
 261   test "follow takes a user and another user" do
 262     user = insert(:user)
 263     followed = insert(:user)
 264
 265     {:ok, user} = User.follow(user, followed)
 266
 267     user = User.get_cached_by_id(user.id)
 268     followed = User.get_cached_by_ap_id(followed.ap_id)
 269
 270     assert followed.follower_count == 1
 271     assert user.following_count == 1
 272
 273     assert User.ap_followers(followed) in User.following(user)
 274   end
 275
 276   test "can't follow a deactivated users" do
 277     user = insert(:user)
 278     followed = insert(:user, %{deactivated: true})
 279
 280     {:error, _} = User.follow(user, followed)
 281   end
 282
 283   test "can't follow a user who blocked us" do
 284     blocker = insert(:user)
 285     blockee = insert(:user)
 286
 287     {:ok, _user_relationship} = User.block(blocker, blockee)
 288
 289     {:error, _} = User.follow(blockee, blocker)
 290   end
 291
 292   test "can't subscribe to a user who blocked us" do
 293     blocker = insert(:user)
 294     blocked = insert(:user)
 295
 296     {:ok, _user_relationship} = User.block(blocker, blocked)
 297
 298     {:error, _} = User.subscribe(blocked, blocker)
 299   end
 300
 301   test "local users do not automatically follow local locked accounts" do
 302     follower = insert(:user, locked: true)
 303     followed = insert(:user, locked: true)
 304
 305     {:ok, follower} = User.maybe_direct_follow(follower, followed)
 306
 307     refute User.following?(follower, followed)
 308   end
 309
 310   describe "unfollow/2" do
 311     setup do: clear_config([:instance, :external_user_synchronization])
 312
 313     test "unfollow with syncronizes external user" do
 314       Pleroma.Config.put([:instance, :external_user_synchronization], true)
 315
 316       followed =
 317         insert(:user,
 318           nickname: "fuser1",
 319           follower_address: "http://localhost:4001/users/fuser1/followers",
 320           following_address: "http://localhost:4001/users/fuser1/following",
 321           ap_id: "http://localhost:4001/users/fuser1"
 322         )
 323
 324       user =
 325         insert(:user, %{
 326           local: false,
 327           nickname: "fuser2",
 328           ap_id: "http://localhost:4001/users/fuser2",
 329           follower_address: "http://localhost:4001/users/fuser2/followers",
 330           following_address: "http://localhost:4001/users/fuser2/following"
 331         })
 332
 333       {:ok, user} = User.follow(user, followed, :follow_accept)
 334
 335       {:ok, user, _activity} = User.unfollow(user, followed)
 336
 337       user = User.get_cached_by_id(user.id)
 338
 339       assert User.following(user) == []
 340     end
 341
 342     test "unfollow takes a user and another user" do
 343       followed = insert(:user)
 344       user = insert(:user)
 345
 346       {:ok, user} = User.follow(user, followed, :follow_accept)
 347
 348       assert User.following(user) == [user.follower_address, followed.follower_address]
 349
 350       {:ok, user, _activity} = User.unfollow(user, followed)
 351
 352       assert User.following(user) == [user.follower_address]
 353     end
 354
 355     test "unfollow doesn't unfollow yourself" do
 356       user = insert(:user)
 357
 358       {:error, _} = User.unfollow(user, user)
 359
 360       assert User.following(user) == [user.follower_address]
 361     end
 362   end
 363
 364   test "test if a user is following another user" do
 365     followed = insert(:user)
 366     user = insert(:user)
 367     User.follow(user, followed, :follow_accept)
 368
 369     assert User.following?(user, followed)
 370     refute User.following?(followed, user)
 371   end
 372
 373   test "fetches correct profile for nickname beginning with number" do
 374     # Use old-style integer ID to try to reproduce the problem
 375     user = insert(:user, %{id: 1080})
 376     user_with_numbers = insert(:user, %{nickname: "#{user.id}garbage"})
 377     assert user_with_numbers == User.get_cached_by_nickname_or_id(user_with_numbers.nickname)
 378   end
 379
 380   describe "user registration" do
 381     @full_user_data %{
 382       bio: "A guy",
 383       name: "my name",
 384       nickname: "nick",
 385       password: "test",
 386       password_confirmation: "test",
 387       email: "email@example.com"
 388     }
 389
 390     setup do: clear_config([:instance, :autofollowed_nicknames])
 391     setup do: clear_config([:instance, :welcome_message])
 392     setup do: clear_config([:instance, :welcome_user_nickname])
 393     setup do: clear_config([:instance, :account_activation_required])
 394
 395     test "it autofollows accounts that are set for it" do
 396       user = insert(:user)
 397       remote_user = insert(:user, %{local: false})
 398
 399       Pleroma.Config.put([:instance, :autofollowed_nicknames], [
 400         user.nickname,
 401         remote_user.nickname
 402       ])
 403
 404       cng = User.register_changeset(%User{}, @full_user_data)
 405
 406       {:ok, registered_user} = User.register(cng)
 407
 408       assert User.following?(registered_user, user)
 409       refute User.following?(registered_user, remote_user)
 410     end
 411
 412     test "it sends a welcome message if it is set" do
 413       welcome_user = insert(:user)
 414
 415       Pleroma.Config.put([:instance, :welcome_user_nickname], welcome_user.nickname)
 416       Pleroma.Config.put([:instance, :welcome_message], "Hello, this is a cool site")
 417
 418       cng = User.register_changeset(%User{}, @full_user_data)
 419       {:ok, registered_user} = User.register(cng)
 420
 421       activity = Repo.one(Pleroma.Activity)
 422       assert registered_user.ap_id in activity.recipients
 423       assert Object.normalize(activity).data["content"] =~ "cool site"
 424       assert activity.actor == welcome_user.ap_id
 425     end
 426
 427     test "it sends a confirm email" do
 428       Pleroma.Config.put([:instance, :account_activation_required], true)
 429
 430       cng = User.register_changeset(%User{}, @full_user_data)
 431       {:ok, registered_user} = User.register(cng)
 432       ObanHelpers.perform_all()
 433       assert_email_sent(Pleroma.Emails.UserEmail.account_confirmation_email(registered_user))
 434     end
 435
 436     test "it requires an email, name, nickname and password, bio is optional when account_activation_required is enabled" do
 437       Pleroma.Config.put([:instance, :account_activation_required], true)
 438
 439       @full_user_data
 440       |> Map.keys()
 441       |> Enum.each(fn key ->
 442         params = Map.delete(@full_user_data, key)
 443         changeset = User.register_changeset(%User{}, params)
 444
 445         assert if key == :bio, do: changeset.valid?, else: not changeset.valid?
 446       end)
 447     end
 448
 449     test "it requires an name, nickname and password, bio and email are optional when account_activation_required is disabled" do
 450       Pleroma.Config.put([:instance, :account_activation_required], false)
 451
 452       @full_user_data
 453       |> Map.keys()
 454       |> Enum.each(fn key ->
 455         params = Map.delete(@full_user_data, key)
 456         changeset = User.register_changeset(%User{}, params)
 457
 458         assert if key in [:bio, :email], do: changeset.valid?, else: not changeset.valid?
 459       end)
 460     end
 461
 462     test "it restricts certain nicknames" do
 463       [restricted_name | _] = Pleroma.Config.get([User, :restricted_nicknames])
 464
 465       assert is_bitstring(restricted_name)
 466
 467       params =
 468         @full_user_data
 469         |> Map.put(:nickname, restricted_name)
 470
 471       changeset = User.register_changeset(%User{}, params)
 472
 473       refute changeset.valid?
 474     end
 475
 476     test "it sets the password_hash and ap_id" do
 477       changeset = User.register_changeset(%User{}, @full_user_data)
 478
 479       assert changeset.valid?
 480
 481       assert is_binary(changeset.changes[:password_hash])
 482       assert changeset.changes[:ap_id] == User.ap_id(%User{nickname: @full_user_data.nickname})
 483
 484       assert changeset.changes.follower_address == "#{changeset.changes.ap_id}/followers"
 485     end
 486   end
 487
 488   describe "user registration, with :account_activation_required" do
 489     @full_user_data %{
 490       bio: "A guy",
 491       name: "my name",
 492       nickname: "nick",
 493       password: "test",
 494       password_confirmation: "test",
 495       email: "email@example.com"
 496     }
 497     setup do: clear_config([:instance, :account_activation_required], true)
 498
 499     test "it sets the 'accepts_chat_messages' set to true" do
 500       changeset = User.register_changeset(%User{}, @full_user_data)
 501       assert changeset.valid?
 502
 503       {:ok, user} = Repo.insert(changeset)
 504
 505       assert user.accepts_chat_messages
 506     end
 507
 508     test "it creates unconfirmed user" do
 509       changeset = User.register_changeset(%User{}, @full_user_data)
 510       assert changeset.valid?
 511
 512       {:ok, user} = Repo.insert(changeset)
 513
 514       assert user.confirmation_pending
 515       assert user.confirmation_token
 516     end
 517
 518     test "it creates confirmed user if :confirmed option is given" do
 519       changeset = User.register_changeset(%User{}, @full_user_data, need_confirmation: false)
 520       assert changeset.valid?
 521
 522       {:ok, user} = Repo.insert(changeset)
 523
 524       refute user.confirmation_pending
 525       refute user.confirmation_token
 526     end
 527   end
 528
 529   describe "user registration, with :account_approval_required" do
 530     @full_user_data %{
 531       bio: "A guy",
 532       name: "my name",
 533       nickname: "nick",
 534       password: "test",
 535       password_confirmation: "test",
 536       email: "email@example.com"
 537     }
 538     setup do: clear_config([:instance, :account_approval_required], true)
 539
 540     test "it creates unapproved user" do
 541       changeset = User.register_changeset(%User{}, @full_user_data)
 542       assert changeset.valid?
 543
 544       {:ok, user} = Repo.insert(changeset)
 545
 546       assert user.approval_pending
 547     end
 548   end
 549
 550   describe "get_or_fetch/1" do
 551     test "gets an existing user by nickname" do
 552       user = insert(:user)
 553       {:ok, fetched_user} = User.get_or_fetch(user.nickname)
 554
 555       assert user == fetched_user
 556     end
 557
 558     test "gets an existing user by ap_id" do
 559       ap_id = "http://mastodon.example.org/users/admin"
 560
 561       user =
 562         insert(
 563           :user,
 564           local: false,
 565           nickname: "admin@mastodon.example.org",
 566           ap_id: ap_id
 567         )
 568
 569       {:ok, fetched_user} = User.get_or_fetch(ap_id)
 570       freshed_user = refresh_record(user)
 571       assert freshed_user == fetched_user
 572     end
 573   end
 574
 575   describe "fetching a user from nickname or trying to build one" do
 576     test "gets an existing user" do
 577       user = insert(:user)
 578       {:ok, fetched_user} = User.get_or_fetch_by_nickname(user.nickname)
 579
 580       assert user == fetched_user
 581     end
 582
 583     test "gets an existing user, case insensitive" do
 584       user = insert(:user, nickname: "nick")
 585       {:ok, fetched_user} = User.get_or_fetch_by_nickname("NICK")
 586
 587       assert user == fetched_user
 588     end
 589
 590     test "gets an existing user by fully qualified nickname" do
 591       user = insert(:user)
 592
 593       {:ok, fetched_user} =
 594         User.get_or_fetch_by_nickname(user.nickname <> "@" <> Pleroma.Web.Endpoint.host())
 595
 596       assert user == fetched_user
 597     end
 598
 599     test "gets an existing user by fully qualified nickname, case insensitive" do
 600       user = insert(:user, nickname: "nick")
 601       casing_altered_fqn = String.upcase(user.nickname <> "@" <> Pleroma.Web.Endpoint.host())
 602
 603       {:ok, fetched_user} = User.get_or_fetch_by_nickname(casing_altered_fqn)
 604
 605       assert user == fetched_user
 606     end
 607
 608     @tag capture_log: true
 609     test "returns nil if no user could be fetched" do
 610       {:error, fetched_user} = User.get_or_fetch_by_nickname("nonexistant@social.heldscal.la")
 611       assert fetched_user == "not found nonexistant@social.heldscal.la"
 612     end
 613
 614     test "returns nil for nonexistant local user" do
 615       {:error, fetched_user} = User.get_or_fetch_by_nickname("nonexistant")
 616       assert fetched_user == "not found nonexistant"
 617     end
 618
 619     test "updates an existing user, if stale" do
 620       a_week_ago = NaiveDateTime.add(NaiveDateTime.utc_now(), -604_800)
 621
 622       orig_user =
 623         insert(
 624           :user,
 625           local: false,
 626           nickname: "admin@mastodon.example.org",
 627           ap_id: "http://mastodon.example.org/users/admin",
 628           last_refreshed_at: a_week_ago
 629         )
 630
 631       assert orig_user.last_refreshed_at == a_week_ago
 632
 633       {:ok, user} = User.get_or_fetch_by_ap_id("http://mastodon.example.org/users/admin")
 634
 635       assert user.inbox
 636
 637       refute user.last_refreshed_at == orig_user.last_refreshed_at
 638     end
 639
 640     test "if nicknames clash, the old user gets a prefix with the old id to the nickname" do
 641       a_week_ago = NaiveDateTime.add(NaiveDateTime.utc_now(), -604_800)
 642
 643       orig_user =
 644         insert(
 645           :user,
 646           local: false,
 647           nickname: "admin@mastodon.example.org",
 648           ap_id: "http://mastodon.example.org/users/harinezumigari",
 649           last_refreshed_at: a_week_ago
 650         )
 651
 652       assert orig_user.last_refreshed_at == a_week_ago
 653
 654       {:ok, user} = User.get_or_fetch_by_ap_id("http://mastodon.example.org/users/admin")
 655
 656       assert user.inbox
 657
 658       refute user.id == orig_user.id
 659
 660       orig_user = User.get_by_id(orig_user.id)
 661
 662       assert orig_user.nickname == "#{orig_user.id}.admin@mastodon.example.org"
 663     end
 664
 665     @tag capture_log: true
 666     test "it returns the old user if stale, but unfetchable" do
 667       a_week_ago = NaiveDateTime.add(NaiveDateTime.utc_now(), -604_800)
 668
 669       orig_user =
 670         insert(
 671           :user,
 672           local: false,
 673           nickname: "admin@mastodon.example.org",
 674           ap_id: "http://mastodon.example.org/users/raymoo",
 675           last_refreshed_at: a_week_ago
 676         )
 677
 678       assert orig_user.last_refreshed_at == a_week_ago
 679
 680       {:ok, user} = User.get_or_fetch_by_ap_id("http://mastodon.example.org/users/raymoo")
 681
 682       assert user.last_refreshed_at == orig_user.last_refreshed_at
 683     end
 684   end
 685
 686   test "returns an ap_id for a user" do
 687     user = insert(:user)
 688
 689     assert User.ap_id(user) ==
 690              Pleroma.Web.Router.Helpers.user_feed_url(
 691                Pleroma.Web.Endpoint,
 692                :feed_redirect,
 693                user.nickname
 694              )
 695   end
 696
 697   test "returns an ap_followers link for a user" do
 698     user = insert(:user)
 699
 700     assert User.ap_followers(user) ==
 701              Pleroma.Web.Router.Helpers.user_feed_url(
 702                Pleroma.Web.Endpoint,
 703                :feed_redirect,
 704                user.nickname
 705              ) <> "/followers"
 706   end
 707
 708   describe "remote user changeset" do
 709     @valid_remote %{
 710       bio: "hello",
 711       name: "Someone",
 712       nickname: "a@b.de",
 713       ap_id: "http...",
 714       avatar: %{some: "avatar"}
 715     }
 716     setup do: clear_config([:instance, :user_bio_length])
 717     setup do: clear_config([:instance, :user_name_length])
 718
 719     test "it confirms validity" do
 720       cs = User.remote_user_changeset(@valid_remote)
 721       assert cs.valid?
 722     end
 723
 724     test "it sets the follower_adress" do
 725       cs = User.remote_user_changeset(@valid_remote)
 726       # remote users get a fake local follower address
 727       assert cs.changes.follower_address ==
 728                User.ap_followers(%User{nickname: @valid_remote[:nickname]})
 729     end
 730
 731     test "it enforces the fqn format for nicknames" do
 732       cs = User.remote_user_changeset(%{@valid_remote | nickname: "bla"})
 733       assert Ecto.Changeset.get_field(cs, :local) == false
 734       assert cs.changes.avatar
 735       refute cs.valid?
 736     end
 737
 738     test "it has required fields" do
 739       [:ap_id]
 740       |> Enum.each(fn field ->
 741         cs = User.remote_user_changeset(Map.delete(@valid_remote, field))
 742         refute cs.valid?
 743       end)
 744     end
 745   end
 746
 747   describe "followers and friends" do
 748     test "gets all followers for a given user" do
 749       user = insert(:user)
 750       follower_one = insert(:user)
 751       follower_two = insert(:user)
 752       not_follower = insert(:user)
 753
 754       {:ok, follower_one} = User.follow(follower_one, user)
 755       {:ok, follower_two} = User.follow(follower_two, user)
 756
 757       res = User.get_followers(user)
 758
 759       assert Enum.member?(res, follower_one)
 760       assert Enum.member?(res, follower_two)
 761       refute Enum.member?(res, not_follower)
 762     end
 763
 764     test "gets all friends (followed users) for a given user" do
 765       user = insert(:user)
 766       followed_one = insert(:user)
 767       followed_two = insert(:user)
 768       not_followed = insert(:user)
 769
 770       {:ok, user} = User.follow(user, followed_one)
 771       {:ok, user} = User.follow(user, followed_two)
 772
 773       res = User.get_friends(user)
 774
 775       followed_one = User.get_cached_by_ap_id(followed_one.ap_id)
 776       followed_two = User.get_cached_by_ap_id(followed_two.ap_id)
 777       assert Enum.member?(res, followed_one)
 778       assert Enum.member?(res, followed_two)
 779       refute Enum.member?(res, not_followed)
 780     end
 781   end
 782
 783   describe "updating note and follower count" do
 784     test "it sets the note_count property" do
 785       note = insert(:note)
 786
 787       user = User.get_cached_by_ap_id(note.data["actor"])
 788
 789       assert user.note_count == 0
 790
 791       {:ok, user} = User.update_note_count(user)
 792
 793       assert user.note_count == 1
 794     end
 795
 796     test "it increases the note_count property" do
 797       note = insert(:note)
 798       user = User.get_cached_by_ap_id(note.data["actor"])
 799
 800       assert user.note_count == 0
 801
 802       {:ok, user} = User.increase_note_count(user)
 803
 804       assert user.note_count == 1
 805
 806       {:ok, user} = User.increase_note_count(user)
 807
 808       assert user.note_count == 2
 809     end
 810
 811     test "it decreases the note_count property" do
 812       note = insert(:note)
 813       user = User.get_cached_by_ap_id(note.data["actor"])
 814
 815       assert user.note_count == 0
 816
 817       {:ok, user} = User.increase_note_count(user)
 818
 819       assert user.note_count == 1
 820
 821       {:ok, user} = User.decrease_note_count(user)
 822
 823       assert user.note_count == 0
 824
 825       {:ok, user} = User.decrease_note_count(user)
 826
 827       assert user.note_count == 0
 828     end
 829
 830     test "it sets the follower_count property" do
 831       user = insert(:user)
 832       follower = insert(:user)
 833
 834       User.follow(follower, user)
 835
 836       assert user.follower_count == 0
 837
 838       {:ok, user} = User.update_follower_count(user)
 839
 840       assert user.follower_count == 1
 841     end
 842   end
 843
 844   describe "follow_import" do
 845     test "it imports user followings from list" do
 846       [user1, user2, user3] = insert_list(3, :user)
 847
 848       identifiers = [
 849         user2.ap_id,
 850         user3.nickname
 851       ]
 852
 853       {:ok, job} = User.follow_import(user1, identifiers)
 854
 855       assert {:ok, result} = ObanHelpers.perform(job)
 856       assert is_list(result)
 857       assert result == [user2, user3]
 858     end
 859   end
 860
 861   describe "mutes" do
 862     test "it mutes people" do
 863       user = insert(:user)
 864       muted_user = insert(:user)
 865
 866       refute User.mutes?(user, muted_user)
 867       refute User.muted_notifications?(user, muted_user)
 868
 869       {:ok, _user_relationships} = User.mute(user, muted_user)
 870
 871       assert User.mutes?(user, muted_user)
 872       assert User.muted_notifications?(user, muted_user)
 873     end
 874
 875     test "it unmutes users" do
 876       user = insert(:user)
 877       muted_user = insert(:user)
 878
 879       {:ok, _user_relationships} = User.mute(user, muted_user)
 880       {:ok, _user_mute} = User.unmute(user, muted_user)
 881
 882       refute User.mutes?(user, muted_user)
 883       refute User.muted_notifications?(user, muted_user)
 884     end
 885
 886     test "it mutes user without notifications" do
 887       user = insert(:user)
 888       muted_user = insert(:user)
 889
 890       refute User.mutes?(user, muted_user)
 891       refute User.muted_notifications?(user, muted_user)
 892
 893       {:ok, _user_relationships} = User.mute(user, muted_user, false)
 894
 895       assert User.mutes?(user, muted_user)
 896       refute User.muted_notifications?(user, muted_user)
 897     end
 898   end
 899
 900   describe "blocks" do
 901     test "it blocks people" do
 902       user = insert(:user)
 903       blocked_user = insert(:user)
 904
 905       refute User.blocks?(user, blocked_user)
 906
 907       {:ok, _user_relationship} = User.block(user, blocked_user)
 908
 909       assert User.blocks?(user, blocked_user)
 910     end
 911
 912     test "it unblocks users" do
 913       user = insert(:user)
 914       blocked_user = insert(:user)
 915
 916       {:ok, _user_relationship} = User.block(user, blocked_user)
 917       {:ok, _user_block} = User.unblock(user, blocked_user)
 918
 919       refute User.blocks?(user, blocked_user)
 920     end
 921
 922     test "blocks tear down cyclical follow relationships" do
 923       blocker = insert(:user)
 924       blocked = insert(:user)
 925
 926       {:ok, blocker} = User.follow(blocker, blocked)
 927       {:ok, blocked} = User.follow(blocked, blocker)
 928
 929       assert User.following?(blocker, blocked)
 930       assert User.following?(blocked, blocker)
 931
 932       {:ok, _user_relationship} = User.block(blocker, blocked)
 933       blocked = User.get_cached_by_id(blocked.id)
 934
 935       assert User.blocks?(blocker, blocked)
 936
 937       refute User.following?(blocker, blocked)
 938       refute User.following?(blocked, blocker)
 939     end
 940
 941     test "blocks tear down blocker->blocked follow relationships" do
 942       blocker = insert(:user)
 943       blocked = insert(:user)
 944
 945       {:ok, blocker} = User.follow(blocker, blocked)
 946
 947       assert User.following?(blocker, blocked)
 948       refute User.following?(blocked, blocker)
 949
 950       {:ok, _user_relationship} = User.block(blocker, blocked)
 951       blocked = User.get_cached_by_id(blocked.id)
 952
 953       assert User.blocks?(blocker, blocked)
 954
 955       refute User.following?(blocker, blocked)
 956       refute User.following?(blocked, blocker)
 957     end
 958
 959     test "blocks tear down blocked->blocker follow relationships" do
 960       blocker = insert(:user)
 961       blocked = insert(:user)
 962
 963       {:ok, blocked} = User.follow(blocked, blocker)
 964
 965       refute User.following?(blocker, blocked)
 966       assert User.following?(blocked, blocker)
 967
 968       {:ok, _user_relationship} = User.block(blocker, blocked)
 969       blocked = User.get_cached_by_id(blocked.id)
 970
 971       assert User.blocks?(blocker, blocked)
 972
 973       refute User.following?(blocker, blocked)
 974       refute User.following?(blocked, blocker)
 975     end
 976
 977     test "blocks tear down blocked->blocker subscription relationships" do
 978       blocker = insert(:user)
 979       blocked = insert(:user)
 980
 981       {:ok, _subscription} = User.subscribe(blocked, blocker)
 982
 983       assert User.subscribed_to?(blocked, blocker)
 984       refute User.subscribed_to?(blocker, blocked)
 985
 986       {:ok, _user_relationship} = User.block(blocker, blocked)
 987
 988       assert User.blocks?(blocker, blocked)
 989       refute User.subscribed_to?(blocker, blocked)
 990       refute User.subscribed_to?(blocked, blocker)
 991     end
 992   end
 993
 994   describe "domain blocking" do
 995     test "blocks domains" do
 996       user = insert(:user)
 997       collateral_user = insert(:user, %{ap_id: "https://awful-and-rude-instance.com/user/bully"})
 998
 999       {:ok, user} = User.block_domain(user, "awful-and-rude-instance.com")
1000
1001       assert User.blocks?(user, collateral_user)
1002     end
1003
1004     test "does not block domain with same end" do
1005       user = insert(:user)
1006
1007       collateral_user =
1008         insert(:user, %{ap_id: "https://another-awful-and-rude-instance.com/user/bully"})
1009
1010       {:ok, user} = User.block_domain(user, "awful-and-rude-instance.com")
1011
1012       refute User.blocks?(user, collateral_user)
1013     end
1014
1015     test "does not block domain with same end if wildcard added" do
1016       user = insert(:user)
1017
1018       collateral_user =
1019         insert(:user, %{ap_id: "https://another-awful-and-rude-instance.com/user/bully"})
1020
1021       {:ok, user} = User.block_domain(user, "*.awful-and-rude-instance.com")
1022
1023       refute User.blocks?(user, collateral_user)
1024     end
1025
1026     test "blocks domain with wildcard for subdomain" do
1027       user = insert(:user)
1028
1029       user_from_subdomain =
1030         insert(:user, %{ap_id: "https://subdomain.awful-and-rude-instance.com/user/bully"})
1031
1032       user_with_two_subdomains =
1033         insert(:user, %{
1034           ap_id: "https://subdomain.second_subdomain.awful-and-rude-instance.com/user/bully"
1035         })
1036
1037       user_domain = insert(:user, %{ap_id: "https://awful-and-rude-instance.com/user/bully"})
1038
1039       {:ok, user} = User.block_domain(user, "*.awful-and-rude-instance.com")
1040
1041       assert User.blocks?(user, user_from_subdomain)
1042       assert User.blocks?(user, user_with_two_subdomains)
1043       assert User.blocks?(user, user_domain)
1044     end
1045
1046     test "unblocks domains" do
1047       user = insert(:user)
1048       collateral_user = insert(:user, %{ap_id: "https://awful-and-rude-instance.com/user/bully"})
1049
1050       {:ok, user} = User.block_domain(user, "awful-and-rude-instance.com")
1051       {:ok, user} = User.unblock_domain(user, "awful-and-rude-instance.com")
1052
1053       refute User.blocks?(user, collateral_user)
1054     end
1055
1056     test "follows take precedence over domain blocks" do
1057       user = insert(:user)
1058       good_eggo = insert(:user, %{ap_id: "https://meanies.social/user/cuteposter"})
1059
1060       {:ok, user} = User.block_domain(user, "meanies.social")
1061       {:ok, user} = User.follow(user, good_eggo)
1062
1063       refute User.blocks?(user, good_eggo)
1064     end
1065   end
1066
1067   describe "blocks_import" do
1068     test "it imports user blocks from list" do
1069       [user1, user2, user3] = insert_list(3, :user)
1070
1071       identifiers = [
1072         user2.ap_id,
1073         user3.nickname
1074       ]
1075
1076       {:ok, job} = User.blocks_import(user1, identifiers)
1077
1078       assert {:ok, result} = ObanHelpers.perform(job)
1079       assert is_list(result)
1080       assert result == [user2, user3]
1081     end
1082   end
1083
1084   describe "get_recipients_from_activity" do
1085     test "works for announces" do
1086       actor = insert(:user)
1087       user = insert(:user, local: true)
1088
1089       {:ok, activity} = CommonAPI.post(actor, %{status: "hello"})
1090       {:ok, announce} = CommonAPI.repeat(activity.id, user)
1091
1092       recipients = User.get_recipients_from_activity(announce)
1093
1094       assert user in recipients
1095     end
1096
1097     test "get recipients" do
1098       actor = insert(:user)
1099       user = insert(:user, local: true)
1100       user_two = insert(:user, local: false)
1101       addressed = insert(:user, local: true)
1102       addressed_remote = insert(:user, local: false)
1103
1104       {:ok, activity} =
1105         CommonAPI.post(actor, %{
1106           status: "hey @#{addressed.nickname} @#{addressed_remote.nickname}"
1107         })
1108
1109       assert Enum.map([actor, addressed], & &1.ap_id) --
1110                Enum.map(User.get_recipients_from_activity(activity), & &1.ap_id) == []
1111
1112       {:ok, user} = User.follow(user, actor)
1113       {:ok, _user_two} = User.follow(user_two, actor)
1114       recipients = User.get_recipients_from_activity(activity)
1115       assert length(recipients) == 3
1116       assert user in recipients
1117       assert addressed in recipients
1118     end
1119
1120     test "has following" do
1121       actor = insert(:user)
1122       user = insert(:user)
1123       user_two = insert(:user)
1124       addressed = insert(:user, local: true)
1125
1126       {:ok, activity} =
1127         CommonAPI.post(actor, %{
1128           status: "hey @#{addressed.nickname}"
1129         })
1130
1131       assert Enum.map([actor, addressed], & &1.ap_id) --
1132                Enum.map(User.get_recipients_from_activity(activity), & &1.ap_id) == []
1133
1134       {:ok, _actor} = User.follow(actor, user)
1135       {:ok, _actor} = User.follow(actor, user_two)
1136       recipients = User.get_recipients_from_activity(activity)
1137       assert length(recipients) == 2
1138       assert addressed in recipients
1139     end
1140   end
1141
1142   describe ".deactivate" do
1143     test "can de-activate then re-activate a user" do
1144       user = insert(:user)
1145       assert false == user.deactivated
1146       {:ok, user} = User.deactivate(user)
1147       assert true == user.deactivated
1148       {:ok, user} = User.deactivate(user, false)
1149       assert false == user.deactivated
1150     end
1151
1152     test "hide a user from followers" do
1153       user = insert(:user)
1154       user2 = insert(:user)
1155
1156       {:ok, user} = User.follow(user, user2)
1157       {:ok, _user} = User.deactivate(user)
1158
1159       user2 = User.get_cached_by_id(user2.id)
1160
1161       assert user2.follower_count == 0
1162       assert [] = User.get_followers(user2)
1163     end
1164
1165     test "hide a user from friends" do
1166       user = insert(:user)
1167       user2 = insert(:user)
1168
1169       {:ok, user2} = User.follow(user2, user)
1170       assert user2.following_count == 1
1171       assert User.following_count(user2) == 1
1172
1173       {:ok, _user} = User.deactivate(user)
1174
1175       user2 = User.get_cached_by_id(user2.id)
1176
1177       assert refresh_record(user2).following_count == 0
1178       assert user2.following_count == 0
1179       assert User.following_count(user2) == 0
1180       assert [] = User.get_friends(user2)
1181     end
1182
1183     test "hide a user's statuses from timelines and notifications" do
1184       user = insert(:user)
1185       user2 = insert(:user)
1186
1187       {:ok, user2} = User.follow(user2, user)
1188
1189       {:ok, activity} = CommonAPI.post(user, %{status: "hey @#{user2.nickname}"})
1190
1191       activity = Repo.preload(activity, :bookmark)
1192
1193       [notification] = Pleroma.Notification.for_user(user2)
1194       assert notification.activity.id == activity.id
1195
1196       assert [activity] == ActivityPub.fetch_public_activities(%{}) |> Repo.preload(:bookmark)
1197
1198       assert [%{activity | thread_muted?: CommonAPI.thread_muted?(user2, activity)}] ==
1199                ActivityPub.fetch_activities([user2.ap_id | User.following(user2)], %{
1200                  user: user2
1201                })
1202
1203       {:ok, _user} = User.deactivate(user)
1204
1205       assert [] == ActivityPub.fetch_public_activities(%{})
1206       assert [] == Pleroma.Notification.for_user(user2)
1207
1208       assert [] ==
1209                ActivityPub.fetch_activities([user2.ap_id | User.following(user2)], %{
1210                  user: user2
1211                })
1212     end
1213   end
1214
1215   describe "approve" do
1216     test "approves a user" do
1217       user = insert(:user, approval_pending: true)
1218       assert true == user.approval_pending
1219       {:ok, user} = User.approve(user)
1220       assert false == user.approval_pending
1221     end
1222
1223     test "approves a list of users" do
1224       unapproved_users = [
1225         insert(:user, approval_pending: true),
1226         insert(:user, approval_pending: true),
1227         insert(:user, approval_pending: true)
1228       ]
1229
1230       {:ok, users} = User.approve(unapproved_users)
1231
1232       assert Enum.count(users) == 3
1233
1234       Enum.each(users, fn user ->
1235         assert false == user.approval_pending
1236       end)
1237     end
1238   end
1239
1240   describe "delete" do
1241     setup do
1242       {:ok, user} = insert(:user) |> User.set_cache()
1243
1244       [user: user]
1245     end
1246
1247     setup do: clear_config([:instance, :federating])
1248
1249     test ".delete_user_activities deletes all create activities", %{user: user} do
1250       {:ok, activity} = CommonAPI.post(user, %{status: "2hu"})
1251
1252       User.delete_user_activities(user)
1253
1254       # TODO: Test removal favorites, repeats, delete activities.
1255       refute Activity.get_by_id(activity.id)
1256     end
1257
1258     test "it deactivates a user, all follow relationships and all activities", %{user: user} do
1259       follower = insert(:user)
1260       {:ok, follower} = User.follow(follower, user)
1261
1262       locked_user = insert(:user, name: "locked", locked: true)
1263       {:ok, _} = User.follow(user, locked_user, :follow_pending)
1264
1265       object = insert(:note, user: user)
1266       activity = insert(:note_activity, user: user, note: object)
1267
1268       object_two = insert(:note, user: follower)
1269       activity_two = insert(:note_activity, user: follower, note: object_two)
1270
1271       {:ok, like} = CommonAPI.favorite(user, activity_two.id)
1272       {:ok, like_two} = CommonAPI.favorite(follower, activity.id)
1273       {:ok, repeat} = CommonAPI.repeat(activity_two.id, user)
1274
1275       {:ok, job} = User.delete(user)
1276       {:ok, _user} = ObanHelpers.perform(job)
1277
1278       follower = User.get_cached_by_id(follower.id)
1279
1280       refute User.following?(follower, user)
1281       assert %{deactivated: true} = User.get_by_id(user.id)
1282
1283       assert [] == User.get_follow_requests(locked_user)
1284
1285       user_activities =
1286         user.ap_id
1287         |> Activity.Queries.by_actor()
1288         |> Repo.all()
1289         |> Enum.map(fn act -> act.data["type"] end)
1290
1291       assert Enum.all?(user_activities, fn act -> act in ~w(Delete Undo) end)
1292
1293       refute Activity.get_by_id(activity.id)
1294       refute Activity.get_by_id(like.id)
1295       refute Activity.get_by_id(like_two.id)
1296       refute Activity.get_by_id(repeat.id)
1297     end
1298   end
1299
1300   describe "delete/1 when confirmation is pending" do
1301     setup do
1302       user = insert(:user, confirmation_pending: true)
1303       {:ok, user: user}
1304     end
1305
1306     test "deletes user from database when activation required", %{user: user} do
1307       clear_config([:instance, :account_activation_required], true)
1308
1309       {:ok, job} = User.delete(user)
1310       {:ok, _} = ObanHelpers.perform(job)
1311
1312       refute User.get_cached_by_id(user.id)
1313       refute User.get_by_id(user.id)
1314     end
1315
1316     test "deactivates user when activation is not required", %{user: user} do
1317       clear_config([:instance, :account_activation_required], false)
1318
1319       {:ok, job} = User.delete(user)
1320       {:ok, _} = ObanHelpers.perform(job)
1321
1322       assert %{deactivated: true} = User.get_cached_by_id(user.id)
1323       assert %{deactivated: true} = User.get_by_id(user.id)
1324     end
1325   end
1326
1327   test "delete/1 when approval is pending deletes the user" do
1328     user = insert(:user, approval_pending: true)
1329     {:ok, user: user}
1330
1331     {:ok, job} = User.delete(user)
1332     {:ok, _} = ObanHelpers.perform(job)
1333
1334     refute User.get_cached_by_id(user.id)
1335     refute User.get_by_id(user.id)
1336   end
1337
1338   test "get_public_key_for_ap_id fetches a user that's not in the db" do
1339     assert {:ok, _key} = User.get_public_key_for_ap_id("http://mastodon.example.org/users/admin")
1340   end
1341
1342   describe "per-user rich-text filtering" do
1343     test "html_filter_policy returns default policies, when rich-text is enabled" do
1344       user = insert(:user)
1345
1346       assert Pleroma.Config.get([:markup, :scrub_policy]) == User.html_filter_policy(user)
1347     end
1348
1349     test "html_filter_policy returns TwitterText scrubber when rich-text is disabled" do
1350       user = insert(:user, no_rich_text: true)
1351
1352       assert Pleroma.HTML.Scrubber.TwitterText == User.html_filter_policy(user)
1353     end
1354   end
1355
1356   describe "caching" do
1357     test "invalidate_cache works" do
1358       user = insert(:user)
1359
1360       User.set_cache(user)
1361       User.invalidate_cache(user)
1362
1363       {:ok, nil} = Cachex.get(:user_cache, "ap_id:#{user.ap_id}")
1364       {:ok, nil} = Cachex.get(:user_cache, "nickname:#{user.nickname}")
1365     end
1366
1367     test "User.delete() plugs any possible zombie objects" do
1368       user = insert(:user)
1369
1370       {:ok, job} = User.delete(user)
1371       {:ok, _} = ObanHelpers.perform(job)
1372
1373       {:ok, cached_user} = Cachex.get(:user_cache, "ap_id:#{user.ap_id}")
1374
1375       assert cached_user != user
1376
1377       {:ok, cached_user} = Cachex.get(:user_cache, "nickname:#{user.ap_id}")
1378
1379       assert cached_user != user
1380     end
1381   end
1382
1383   describe "account_status/1" do
1384     setup do: clear_config([:instance, :account_activation_required])
1385
1386     test "return confirmation_pending for unconfirm user" do
1387       Pleroma.Config.put([:instance, :account_activation_required], true)
1388       user = insert(:user, confirmation_pending: true)
1389       assert User.account_status(user) == :confirmation_pending
1390     end
1391
1392     test "return active for confirmed user" do
1393       Pleroma.Config.put([:instance, :account_activation_required], true)
1394       user = insert(:user, confirmation_pending: false)
1395       assert User.account_status(user) == :active
1396     end
1397
1398     test "return active for remote user" do
1399       user = insert(:user, local: false)
1400       assert User.account_status(user) == :active
1401     end
1402
1403     test "returns :password_reset_pending for user with reset password" do
1404       user = insert(:user, password_reset_pending: true)
1405       assert User.account_status(user) == :password_reset_pending
1406     end
1407
1408     test "returns :deactivated for deactivated user" do
1409       user = insert(:user, local: true, confirmation_pending: false, deactivated: true)
1410       assert User.account_status(user) == :deactivated
1411     end
1412
1413     test "returns :approval_pending for unapproved user" do
1414       user = insert(:user, local: true, approval_pending: true)
1415       assert User.account_status(user) == :approval_pending
1416
1417       user = insert(:user, local: true, confirmation_pending: true, approval_pending: true)
1418       assert User.account_status(user) == :approval_pending
1419     end
1420   end
1421
1422   describe "superuser?/1" do
1423     test "returns false for unprivileged users" do
1424       user = insert(:user, local: true)
1425
1426       refute User.superuser?(user)
1427     end
1428
1429     test "returns false for remote users" do
1430       user = insert(:user, local: false)
1431       remote_admin_user = insert(:user, local: false, is_admin: true)
1432
1433       refute User.superuser?(user)
1434       refute User.superuser?(remote_admin_user)
1435     end
1436
1437     test "returns true for local moderators" do
1438       user = insert(:user, local: true, is_moderator: true)
1439
1440       assert User.superuser?(user)
1441     end
1442
1443     test "returns true for local admins" do
1444       user = insert(:user, local: true, is_admin: true)
1445
1446       assert User.superuser?(user)
1447     end
1448   end
1449
1450   describe "invisible?/1" do
1451     test "returns true for an invisible user" do
1452       user = insert(:user, local: true, invisible: true)
1453
1454       assert User.invisible?(user)
1455     end
1456
1457     test "returns false for a non-invisible user" do
1458       user = insert(:user, local: true)
1459
1460       refute User.invisible?(user)
1461     end
1462   end
1463
1464   describe "visible_for/2" do
1465     test "returns true when the account is itself" do
1466       user = insert(:user, local: true)
1467
1468       assert User.visible_for(user, user) == :visible
1469     end
1470
1471     test "returns false when the account is unauthenticated and auth is required" do
1472       Pleroma.Config.put([:instance, :account_activation_required], true)
1473
1474       user = insert(:user, local: true, confirmation_pending: true)
1475       other_user = insert(:user, local: true)
1476
1477       refute User.visible_for(user, other_user) == :visible
1478     end
1479
1480     test "returns true when the account is unauthenticated and auth is not required" do
1481       user = insert(:user, local: true, confirmation_pending: true)
1482       other_user = insert(:user, local: true)
1483
1484       assert User.visible_for(user, other_user) == :visible
1485     end
1486
1487     test "returns true when the account is unauthenticated and being viewed by a privileged account (auth required)" do
1488       Pleroma.Config.put([:instance, :account_activation_required], true)
1489
1490       user = insert(:user, local: true, confirmation_pending: true)
1491       other_user = insert(:user, local: true, is_admin: true)
1492
1493       assert User.visible_for(user, other_user) == :visible
1494     end
1495   end
1496
1497   describe "parse_bio/2" do
1498     test "preserves hosts in user links text" do
1499       remote_user = insert(:user, local: false, nickname: "nick@domain.com")
1500       user = insert(:user)
1501       bio = "A.k.a. @nick@domain.com"
1502
1503       expected_text =
1504         ~s(A.k.a. <span class="h-card"><a class="u-url mention" data-user="#{remote_user.id}" href="#{
1505           remote_user.ap_id
1506         }" rel="ugc">@<span>nick@domain.com</span></a></span>)
1507
1508       assert expected_text == User.parse_bio(bio, user)
1509     end
1510
1511     test "Adds rel=me on linkbacked urls" do
1512       user = insert(:user, ap_id: "https://social.example.org/users/lain")
1513
1514       bio = "http://example.com/rel_me/null"
1515       expected_text = "<a href=\"#{bio}\">#{bio}</a>"
1516       assert expected_text == User.parse_bio(bio, user)
1517
1518       bio = "http://example.com/rel_me/link"
1519       expected_text = "<a href=\"#{bio}\" rel=\"me\">#{bio}</a>"
1520       assert expected_text == User.parse_bio(bio, user)
1521
1522       bio = "http://example.com/rel_me/anchor"
1523       expected_text = "<a href=\"#{bio}\" rel=\"me\">#{bio}</a>"
1524       assert expected_text == User.parse_bio(bio, user)
1525     end
1526   end
1527
1528   test "follower count is updated when a follower is blocked" do
1529     user = insert(:user)
1530     follower = insert(:user)
1531     follower2 = insert(:user)
1532     follower3 = insert(:user)
1533
1534     {:ok, follower} = User.follow(follower, user)
1535     {:ok, _follower2} = User.follow(follower2, user)
1536     {:ok, _follower3} = User.follow(follower3, user)
1537
1538     {:ok, _user_relationship} = User.block(user, follower)
1539     user = refresh_record(user)
1540
1541     assert user.follower_count == 2
1542   end
1543
1544   describe "list_inactive_users_query/1" do
1545     defp days_ago(days) do
1546       NaiveDateTime.add(
1547         NaiveDateTime.truncate(NaiveDateTime.utc_now(), :second),
1548         -days * 60 * 60 * 24,
1549         :second
1550       )
1551     end
1552
1553     test "Users are inactive by default" do
1554       total = 10
1555
1556       users =
1557         Enum.map(1..total, fn _ ->
1558           insert(:user, last_digest_emailed_at: days_ago(20), deactivated: false)
1559         end)
1560
1561       inactive_users_ids =
1562         Pleroma.User.list_inactive_users_query()
1563         |> Pleroma.Repo.all()
1564         |> Enum.map(& &1.id)
1565
1566       Enum.each(users, fn user ->
1567         assert user.id in inactive_users_ids
1568       end)
1569     end
1570
1571     test "Only includes users who has no recent activity" do
1572       total = 10
1573
1574       users =
1575         Enum.map(1..total, fn _ ->
1576           insert(:user, last_digest_emailed_at: days_ago(20), deactivated: false)
1577         end)
1578
1579       {inactive, active} = Enum.split(users, trunc(total / 2))
1580
1581       Enum.map(active, fn user ->
1582         to = Enum.random(users -- [user])
1583
1584         {:ok, _} =
1585           CommonAPI.post(user, %{
1586             status: "hey @#{to.nickname}"
1587           })
1588       end)
1589
1590       inactive_users_ids =
1591         Pleroma.User.list_inactive_users_query()
1592         |> Pleroma.Repo.all()
1593         |> Enum.map(& &1.id)
1594
1595       Enum.each(active, fn user ->
1596         refute user.id in inactive_users_ids
1597       end)
1598
1599       Enum.each(inactive, fn user ->
1600         assert user.id in inactive_users_ids
1601       end)
1602     end
1603
1604     test "Only includes users with no read notifications" do
1605       total = 10
1606
1607       users =
1608         Enum.map(1..total, fn _ ->
1609           insert(:user, last_digest_emailed_at: days_ago(20), deactivated: false)
1610         end)
1611
1612       [sender | recipients] = users
1613       {inactive, active} = Enum.split(recipients, trunc(total / 2))
1614
1615       Enum.each(recipients, fn to ->
1616         {:ok, _} =
1617           CommonAPI.post(sender, %{
1618             status: "hey @#{to.nickname}"
1619           })
1620
1621         {:ok, _} =
1622           CommonAPI.post(sender, %{
1623             status: "hey again @#{to.nickname}"
1624           })
1625       end)
1626
1627       Enum.each(active, fn user ->
1628         [n1, _n2] = Pleroma.Notification.for_user(user)
1629         {:ok, _} = Pleroma.Notification.read_one(user, n1.id)
1630       end)
1631
1632       inactive_users_ids =
1633         Pleroma.User.list_inactive_users_query()
1634         |> Pleroma.Repo.all()
1635         |> Enum.map(& &1.id)
1636
1637       Enum.each(active, fn user ->
1638         refute user.id in inactive_users_ids
1639       end)
1640
1641       Enum.each(inactive, fn user ->
1642         assert user.id in inactive_users_ids
1643       end)
1644     end
1645   end
1646
1647   describe "toggle_confirmation/1" do
1648     test "if user is confirmed" do
1649       user = insert(:user, confirmation_pending: false)
1650       {:ok, user} = User.toggle_confirmation(user)
1651
1652       assert user.confirmation_pending
1653       assert user.confirmation_token
1654     end
1655
1656     test "if user is unconfirmed" do
1657       user = insert(:user, confirmation_pending: true, confirmation_token: "some token")
1658       {:ok, user} = User.toggle_confirmation(user)
1659
1660       refute user.confirmation_pending
1661       refute user.confirmation_token
1662     end
1663   end
1664
1665   describe "ensure_keys_present" do
1666     test "it creates keys for a user and stores them in info" do
1667       user = insert(:user)
1668       refute is_binary(user.keys)
1669       {:ok, user} = User.ensure_keys_present(user)
1670       assert is_binary(user.keys)
1671     end
1672
1673     test "it doesn't create keys if there already are some" do
1674       user = insert(:user, keys: "xxx")
1675       {:ok, user} = User.ensure_keys_present(user)
1676       assert user.keys == "xxx"
1677     end
1678   end
1679
1680   describe "get_ap_ids_by_nicknames" do
1681     test "it returns a list of AP ids for a given set of nicknames" do
1682       user = insert(:user)
1683       user_two = insert(:user)
1684
1685       ap_ids = User.get_ap_ids_by_nicknames([user.nickname, user_two.nickname, "nonexistent"])
1686       assert length(ap_ids) == 2
1687       assert user.ap_id in ap_ids
1688       assert user_two.ap_id in ap_ids
1689     end
1690   end
1691
1692   describe "sync followers count" do
1693     setup do
1694       user1 = insert(:user, local: false, ap_id: "http://localhost:4001/users/masto_closed")
1695       user2 = insert(:user, local: false, ap_id: "http://localhost:4001/users/fuser2")
1696       insert(:user, local: true)
1697       insert(:user, local: false, deactivated: true)
1698       {:ok, user1: user1, user2: user2}
1699     end
1700
1701     test "external_users/1 external active users with limit", %{user1: user1, user2: user2} do
1702       [fdb_user1] = User.external_users(limit: 1)
1703
1704       assert fdb_user1.ap_id
1705       assert fdb_user1.ap_id == user1.ap_id
1706       assert fdb_user1.id == user1.id
1707
1708       [fdb_user2] = User.external_users(max_id: fdb_user1.id, limit: 1)
1709
1710       assert fdb_user2.ap_id
1711       assert fdb_user2.ap_id == user2.ap_id
1712       assert fdb_user2.id == user2.id
1713
1714       assert User.external_users(max_id: fdb_user2.id, limit: 1) == []
1715     end
1716   end
1717
1718   describe "is_internal_user?/1" do
1719     test "non-internal user returns false" do
1720       user = insert(:user)
1721       refute User.is_internal_user?(user)
1722     end
1723
1724     test "user with no nickname returns true" do
1725       user = insert(:user, %{nickname: nil})
1726       assert User.is_internal_user?(user)
1727     end
1728
1729     test "user with internal-prefixed nickname returns true" do
1730       user = insert(:user, %{nickname: "internal.test"})
1731       assert User.is_internal_user?(user)
1732     end
1733   end
1734
1735   describe "update_and_set_cache/1" do
1736     test "returns error when user is stale instead Ecto.StaleEntryError" do
1737       user = insert(:user)
1738
1739       changeset = Ecto.Changeset.change(user, bio: "test")
1740
1741       Repo.delete(user)
1742
1743       assert {:error, %Ecto.Changeset{errors: [id: {"is stale", [stale: true]}], valid?: false}} =
1744                User.update_and_set_cache(changeset)
1745     end
1746
1747     test "performs update cache if user updated" do
1748       user = insert(:user)
1749       assert {:ok, nil} = Cachex.get(:user_cache, "ap_id:#{user.ap_id}")
1750
1751       changeset = Ecto.Changeset.change(user, bio: "test-bio")
1752
1753       assert {:ok, %User{bio: "test-bio"} = user} = User.update_and_set_cache(changeset)
1754       assert {:ok, user} = Cachex.get(:user_cache, "ap_id:#{user.ap_id}")
1755       assert %User{bio: "test-bio"} = User.get_cached_by_ap_id(user.ap_id)
1756     end
1757   end
1758
1759   describe "following/followers synchronization" do
1760     setup do: clear_config([:instance, :external_user_synchronization])
1761
1762     test "updates the counters normally on following/getting a follow when disabled" do
1763       Pleroma.Config.put([:instance, :external_user_synchronization], false)
1764       user = insert(:user)
1765
1766       other_user =
1767         insert(:user,
1768           local: false,
1769           follower_address: "http://localhost:4001/users/masto_closed/followers",
1770           following_address: "http://localhost:4001/users/masto_closed/following",
1771           ap_enabled: true
1772         )
1773
1774       assert other_user.following_count == 0
1775       assert other_user.follower_count == 0
1776
1777       {:ok, user} = Pleroma.User.follow(user, other_user)
1778       other_user = Pleroma.User.get_by_id(other_user.id)
1779
1780       assert user.following_count == 1
1781       assert other_user.follower_count == 1
1782     end
1783
1784     test "syncronizes the counters with the remote instance for the followed when enabled" do
1785       Pleroma.Config.put([:instance, :external_user_synchronization], false)
1786
1787       user = insert(:user)
1788
1789       other_user =
1790         insert(:user,
1791           local: false,
1792           follower_address: "http://localhost:4001/users/masto_closed/followers",
1793           following_address: "http://localhost:4001/users/masto_closed/following",
1794           ap_enabled: true
1795         )
1796
1797       assert other_user.following_count == 0
1798       assert other_user.follower_count == 0
1799
1800       Pleroma.Config.put([:instance, :external_user_synchronization], true)
1801       {:ok, _user} = User.follow(user, other_user)
1802       other_user = User.get_by_id(other_user.id)
1803
1804       assert other_user.follower_count == 437
1805     end
1806
1807     test "syncronizes the counters with the remote instance for the follower when enabled" do
1808       Pleroma.Config.put([:instance, :external_user_synchronization], false)
1809
1810       user = insert(:user)
1811
1812       other_user =
1813         insert(:user,
1814           local: false,
1815           follower_address: "http://localhost:4001/users/masto_closed/followers",
1816           following_address: "http://localhost:4001/users/masto_closed/following",
1817           ap_enabled: true
1818         )
1819
1820       assert other_user.following_count == 0
1821       assert other_user.follower_count == 0
1822
1823       Pleroma.Config.put([:instance, :external_user_synchronization], true)
1824       {:ok, other_user} = User.follow(other_user, user)
1825
1826       assert other_user.following_count == 152
1827     end
1828   end
1829
1830   describe "change_email/2" do
1831     setup do
1832       [user: insert(:user)]
1833     end
1834
1835     test "blank email returns error", %{user: user} do
1836       assert {:error, %{errors: [email: {"can't be blank", _}]}} = User.change_email(user, "")
1837       assert {:error, %{errors: [email: {"can't be blank", _}]}} = User.change_email(user, nil)
1838     end
1839
1840     test "non unique email returns error", %{user: user} do
1841       %{email: email} = insert(:user)
1842
1843       assert {:error, %{errors: [email: {"has already been taken", _}]}} =
1844                User.change_email(user, email)
1845     end
1846
1847     test "invalid email returns error", %{user: user} do
1848       assert {:error, %{errors: [email: {"has invalid format", _}]}} =
1849                User.change_email(user, "cofe")
1850     end
1851
1852     test "changes email", %{user: user} do
1853       assert {:ok, %User{email: "cofe@cofe.party"}} = User.change_email(user, "cofe@cofe.party")
1854     end
1855   end
1856
1857   describe "get_cached_by_nickname_or_id" do
1858     setup do
1859       local_user = insert(:user)
1860       remote_user = insert(:user, nickname: "nickname@example.com", local: false)
1861
1862       [local_user: local_user, remote_user: remote_user]
1863     end
1864
1865     setup do: clear_config([:instance, :limit_to_local_content])
1866
1867     test "allows getting remote users by id no matter what :limit_to_local_content is set to", %{
1868       remote_user: remote_user
1869     } do
1870       Pleroma.Config.put([:instance, :limit_to_local_content], false)
1871       assert %User{} = User.get_cached_by_nickname_or_id(remote_user.id)
1872
1873       Pleroma.Config.put([:instance, :limit_to_local_content], true)
1874       assert %User{} = User.get_cached_by_nickname_or_id(remote_user.id)
1875
1876       Pleroma.Config.put([:instance, :limit_to_local_content], :unauthenticated)
1877       assert %User{} = User.get_cached_by_nickname_or_id(remote_user.id)
1878     end
1879
1880     test "disallows getting remote users by nickname without authentication when :limit_to_local_content is set to :unauthenticated",
1881          %{remote_user: remote_user} do
1882       Pleroma.Config.put([:instance, :limit_to_local_content], :unauthenticated)
1883       assert nil == User.get_cached_by_nickname_or_id(remote_user.nickname)
1884     end
1885
1886     test "allows getting remote users by nickname with authentication when :limit_to_local_content is set to :unauthenticated",
1887          %{remote_user: remote_user, local_user: local_user} do
1888       Pleroma.Config.put([:instance, :limit_to_local_content], :unauthenticated)
1889       assert %User{} = User.get_cached_by_nickname_or_id(remote_user.nickname, for: local_user)
1890     end
1891
1892     test "disallows getting remote users by nickname when :limit_to_local_content is set to true",
1893          %{remote_user: remote_user} do
1894       Pleroma.Config.put([:instance, :limit_to_local_content], true)
1895       assert nil == User.get_cached_by_nickname_or_id(remote_user.nickname)
1896     end
1897
1898     test "allows getting local users by nickname no matter what :limit_to_local_content is set to",
1899          %{local_user: local_user} do
1900       Pleroma.Config.put([:instance, :limit_to_local_content], false)
1901       assert %User{} = User.get_cached_by_nickname_or_id(local_user.nickname)
1902
1903       Pleroma.Config.put([:instance, :limit_to_local_content], true)
1904       assert %User{} = User.get_cached_by_nickname_or_id(local_user.nickname)
1905
1906       Pleroma.Config.put([:instance, :limit_to_local_content], :unauthenticated)
1907       assert %User{} = User.get_cached_by_nickname_or_id(local_user.nickname)
1908     end
1909   end
1910
1911   describe "update_email_notifications/2" do
1912     setup do
1913       user = insert(:user, email_notifications: %{"digest" => true})
1914
1915       {:ok, user: user}
1916     end
1917
1918     test "Notifications are updated", %{user: user} do
1919       true = user.email_notifications["digest"]
1920       assert {:ok, result} = User.update_email_notifications(user, %{"digest" => false})
1921       assert result.email_notifications["digest"] == false
1922     end
1923   end
1924
1925   test "avatar fallback" do
1926     user = insert(:user)
1927     assert User.avatar_url(user) =~ "/images/avi.png"
1928
1929     clear_config([:assets, :default_user_avatar], "avatar.png")
1930
1931     user = User.get_cached_by_nickname_or_id(user.nickname)
1932     assert User.avatar_url(user) =~ "avatar.png"
1933
1934     assert User.avatar_url(user, no_default: true) == nil
1935   end
1936 end