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