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