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