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

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