1 # frozen_string_literal: true
 
   5 class UserTest < ActiveSupport::TestCase
 
   6   include Rails::Dom::Testing::Assertions::SelectorAssertions
 
   8   def test_invalid_with_empty_attributes
 
   9     user = build(:user, :email => nil,
 
  15     assert_not_predicate user, :valid?
 
  16     assert_predicate user.errors[:email], :any?
 
  17     assert_predicate user.errors[:pass_crypt], :any?
 
  18     assert_predicate user.errors[:display_name], :any?
 
  19     assert_predicate user.errors[:home_lat], :none?
 
  20     assert_predicate user.errors[:home_lon], :none?
 
  21     assert_predicate user.errors[:home_zoom], :none?
 
  25     existing_user = create(:user)
 
  26     new_user = build(:user, :email => existing_user.email)
 
  27     assert_not new_user.save
 
  28     assert_includes new_user.errors[:email], "has already been taken"
 
  31   def test_unique_display_name
 
  32     create(:user, :display_name => "H\u{e9}nryIV")
 
  34     %W[H\u{e9}nryIV he\u{301}nryiv H\u{c9}nry\u2163 he\u{301}nry\u2173].each do |name|
 
  35       new_user = build(:user, :display_name => name)
 
  36       assert_not new_user.save
 
  37       assert_includes new_user.errors[:display_name], "has already been taken"
 
  42     ok = %w[a@s.com test@shaunmcdonald.me.uk hello_local@ping-d.ng
 
  43             test_local@openstreetmap.org test-local@example.com]
 
  44     bad = %w[hi ht@ n@ @.com help@.me.uk help"hi.me.uk も対@応します
 
  45              輕觸搖晃的遊戲@ah.com も対応します@s.name]
 
  50       assert user.valid?(:save), "#{name} isn't valid when it should be"
 
  56       assert user.invalid?(:save), "#{name} is valid when it shouldn't be"
 
  60   def test_display_name_length
 
  62     user.display_name = "123"
 
  63     assert_predicate user, :valid?, "should allow 3 char name name"
 
  64     user.display_name = "12"
 
  65     assert_not_predicate user, :valid?, "should not allow 2 char name"
 
  66     user.display_name = ""
 
  67     assert_not_predicate user, :valid?, "should not allow blank/0 char name"
 
  68     user.display_name = nil
 
  69     assert_not_predicate user, :valid?, "should not allow nil value"
 
  72   def test_display_name_width
 
  74     user.display_name = "123"
 
  75     assert_predicate user, :valid?, "should allow 3 column name name"
 
  76     user.display_name = "12"
 
  77     assert_not_predicate user, :valid?, "should not allow 2 column name"
 
  78     user.display_name = "1\u{200B}2"
 
  79     assert_not_predicate user, :valid?, "should not allow 2 column name"
 
  80     user.display_name = "\u{200B}\u{200B}\u{200B}"
 
  81     assert_not_predicate user, :valid?, "should not allow 0 column name"
 
  84   def test_display_name_valid
 
  85     # Due to sanitisation in the view some of these that you might not
 
  87     # However, would they affect the xml planet dumps?
 
  88     ok = ["Name", "'me", "he\"", "<hr>", "*ho", "\"help\"@",
 
  89           "vergrößern", "ルシステムにも対応します", "輕觸搖晃的遊戲", "space space"]
 
  90     # These need to be 3 chars in length, otherwise the length test above
 
  92     bad = ["<hr/>", "test@example.com", "s/f", "aa/", "aa;", "aa.",
 
  93            "aa,", "aa?", "/;.,?", "も対応します/", "#ping",
 
  94            "foo\x1fbar", "foo\x7fbar", "foo\ufffebar", "foo\uffffbar",
 
  95            "new", "terms", "save", "confirm", "confirm-email",
 
  96            "go_public", "reset-password", "forgot-password", "suspended",
 
  97            "trailing whitespace ", " leading whitespace"]
 
  98     ok.each do |display_name|
 
 100       user.display_name = display_name
 
 101       assert_predicate user, :valid?, "#{display_name} is invalid, when it should be"
 
 104     bad.each do |display_name|
 
 106       user.display_name = display_name
 
 107       assert_not_predicate user, :valid?, "#{display_name} is valid when it shouldn't be"
 
 111   def test_display_name_user_id_new
 
 112     existing_user = create(:user)
 
 115     user.display_name = "user_#{existing_user.id}"
 
 116     assert_not_predicate user, :valid?, "user_<id> name is valid for existing user id when it shouldn't be"
 
 118     user.display_name = "user_#{existing_user.id + 1}"
 
 119     assert_not_predicate user, :valid?, "user_<id> name is valid for new user id when it shouldn't be"
 
 122   def test_display_name_user_id_rename
 
 123     existing_user = create(:user)
 
 126     user.display_name = "user_#{existing_user.id}"
 
 127     assert_not_predicate user, :valid?, "user_<id> name is valid for existing user id when it shouldn't be"
 
 129     user.display_name = "user_#{user.id}"
 
 130     assert_predicate user, :valid?, "user_<id> name is invalid for own id, when it should be"
 
 133   def test_display_name_user_id_unchanged_is_valid
 
 134     user = build(:user, :display_name => "user_0")
 
 135     user.save(:validate => false)
 
 138     assert_predicate user, :valid?, "user_0 display_name is invalid but it hasn't been changed"
 
 141   def test_description_length
 
 143     user.description = "x" * 65536
 
 144     assert_predicate user, :valid?, "should allow 65536 char description"
 
 145     user.description = "x" * 65537
 
 146     assert_not_predicate user, :valid?, "should not allow 65537 char description"
 
 147     user.description = ""
 
 148     assert_predicate user, :valid?, "should allow blank/0 char description"
 
 149     user.description = nil
 
 150     assert_predicate user, :valid?, "should allow nil value"
 
 154     alice = create(:user, :active)
 
 155     bob = create(:user, :active)
 
 156     charlie = create(:user, :active)
 
 157     create(:follow, :follower => alice, :following => bob)
 
 159     assert alice.follows?(bob)
 
 160     assert_not alice.follows?(charlie)
 
 161     assert_not bob.follows?(alice)
 
 162     assert_not bob.follows?(charlie)
 
 163     assert_not charlie.follows?(bob)
 
 164     assert_not charlie.follows?(alice)
 
 167   def test_users_nearby
 
 168     alice = create(:user, :active, :home_lat => 51.0, :home_lon => 1.0, :data_public => false)
 
 169     bob = create(:user, :active, :home_lat => 51.1, :home_lon => 1.0, :data_public => true)
 
 170     charlie = create(:user, :active, :home_lat => 51.1, :home_lon => 1.1, :data_public => true)
 
 171     david = create(:user, :active, :home_lat => 10.0, :home_lon => -123.0, :data_public => true)
 
 172     _edward = create(:user, :suspended, :home_lat => 10.0, :home_lon => -123.0, :data_public => true)
 
 173     south_pole_user = create(:user, :active, :home_lat => -90.0, :home_lon => 0.0, :data_public => true)
 
 174     vagrant_user = create(:user, :active, :home_lat => nil, :home_lon => nil, :data_public => true)
 
 176     # bob and charlie are both near alice
 
 177     assert_equal [bob, charlie], alice.nearby
 
 178     # charlie and alice are both near bob, but alice has their data private
 
 179     assert_equal [charlie], bob.nearby
 
 180     # david has no user nearby, since edward is not active
 
 181     assert_empty david.nearby
 
 182     # south_pole_user has no user nearby, and doesn't throw exception
 
 183     assert_empty south_pole_user.nearby
 
 184     # vagrant_user has no home location
 
 185     assert_empty vagrant_user.nearby
 
 189     norm = create(:user, :active)
 
 190     sec = create(:user, :active)
 
 191     create(:follow, :follower => norm, :following => sec)
 
 193     assert_equal [sec], norm.followings
 
 194     assert_equal 1, norm.followings.size
 
 196     assert_empty sec.followings
 
 197     assert_equal 0, sec.followings.size
 
 200   def test_user_preferred_editor
 
 202     assert_nil user.preferred_editor
 
 203     user.preferred_editor = "id"
 
 204     assert_equal "id", user.preferred_editor
 
 207     user.preferred_editor = "invalid_editor"
 
 208     assert_raise(ActiveRecord::RecordInvalid) { user.save! }
 
 212     pending = create(:user, :pending)
 
 213     active = create(:user, :active)
 
 214     confirmed = create(:user, :confirmed)
 
 215     suspended = create(:user, :suspended)
 
 216     deleted = create(:user, :deleted)
 
 218     assert User.visible.find(pending.id)
 
 219     assert User.visible.find(active.id)
 
 220     assert User.visible.find(confirmed.id)
 
 221     assert_raise ActiveRecord::RecordNotFound do
 
 222       User.visible.find(suspended.id)
 
 224     assert_raise ActiveRecord::RecordNotFound do
 
 225       User.visible.find(deleted.id)
 
 230     pending = create(:user, :pending)
 
 231     active = create(:user, :active)
 
 232     confirmed = create(:user, :confirmed)
 
 233     suspended = create(:user, :suspended)
 
 234     deleted = create(:user, :deleted)
 
 236     assert User.active.find(active.id)
 
 237     assert User.active.find(confirmed.id)
 
 238     assert_raise ActiveRecord::RecordNotFound do
 
 239       User.active.find(pending.id)
 
 241     assert_raise ActiveRecord::RecordNotFound do
 
 242       User.active.find(suspended.id)
 
 244     assert_raise ActiveRecord::RecordNotFound do
 
 245       User.active.find(deleted.id)
 
 249   def test_identifiable
 
 250     public_user = create(:user, :data_public => true)
 
 251     private_user = create(:user, :data_public => false)
 
 253     assert User.identifiable.find(public_user.id)
 
 254     assert_raise ActiveRecord::RecordNotFound do
 
 255       User.identifiable.find(private_user.id)
 
 260     user = create(:user, :languages => ["en"])
 
 261     assert_equal ["en"], user.languages
 
 262     user.languages = %w[de fr en]
 
 263     assert_equal %w[de fr en], user.languages
 
 264     user.languages = %w[fr de sl]
 
 265     assert_equal %w[fr de sl], user.preferred_languages.map(&:to_s)
 
 266     user = create(:user, :languages => %w[en de])
 
 267     assert_equal %w[en de], user.languages
 
 270   def test_default_diary_language_undefined
 
 271     create(:language, :code => "en")
 
 272     user = create(:user, :languages => [])
 
 273     assert_nil user.default_diary_language
 
 276   def test_default_diary_language_known
 
 277     create(:language, :code => "en")
 
 278     user = create(:user, :languages => ["en"])
 
 279     assert_equal "en", user.default_diary_language
 
 282   def test_default_diary_language_known_with_fallback
 
 283     create(:language, :code => "en")
 
 284     create(:language, :code => "fr")
 
 285     user = create(:user, :languages => ["fr en"])
 
 286     assert_equal "fr", user.default_diary_language
 
 289   def test_default_diary_language_unknown
 
 290     create(:language, :code => "en")
 
 291     user = create(:user, :languages => ["unknown"])
 
 292     assert_nil user.default_diary_language
 
 295   def test_default_diary_language_unknown_with_known_fallback
 
 296     create(:language, :code => "en")
 
 297     user = create(:user, :languages => ["unknown en"])
 
 298     assert_equal "en", user.default_diary_language
 
 301   def test_default_diary_language_set
 
 302     create(:language, :code => "en")
 
 303     user = create(:user, :languages => [])
 
 305     assert_difference "user.preferences.count", 1 do
 
 306       assert_equal "en", (user.default_diary_language = "en")
 
 310     assert_equal "en", user.default_diary_language
 
 311     preference = user.preferences.find_by(:k => "diary.default_language")
 
 312     assert_equal "en", preference.v
 
 315   def test_default_diary_language_set_twice
 
 316     create(:language, :code => "en")
 
 317     create(:language, :code => "fr")
 
 318     user = create(:user, :languages => [])
 
 320     assert_difference "user.preferences.count", 1 do
 
 321       assert_equal "en", (user.default_diary_language = "en")
 
 323     assert_difference "user.preferences.count", 0 do
 
 324       assert_equal "fr", (user.default_diary_language = "fr")
 
 328     assert_equal "fr", user.default_diary_language
 
 329     preference = user.preferences.find_by(:k => "diary.default_language")
 
 330     assert_equal "fr", preference.v
 
 334     assert_predicate build(:user, :pending), :visible?
 
 335     assert_predicate build(:user, :active), :visible?
 
 336     assert_predicate build(:user, :confirmed), :visible?
 
 337     assert_not_predicate build(:user, :suspended), :visible?
 
 338     assert_not_predicate build(:user, :deleted), :visible?
 
 342     assert_not_predicate build(:user, :pending), :active?
 
 343     assert_predicate build(:user, :active), :active?
 
 344     assert_predicate build(:user, :confirmed), :active?
 
 345     assert_not_predicate build(:user, :suspended), :active?
 
 346     assert_not_predicate build(:user, :deleted), :active?
 
 350     assert_not_predicate create(:user), :moderator?
 
 351     assert_predicate create(:moderator_user), :moderator?
 
 354   def test_administrator?
 
 355     assert_not_predicate create(:user), :administrator?
 
 356     assert_predicate create(:administrator_user), :administrator?
 
 360     assert_not create(:user).role?("administrator")
 
 361     assert_not create(:user).role?("moderator")
 
 362     assert create(:administrator_user).role?("administrator")
 
 363     assert create(:moderator_user).role?("moderator")
 
 366   def test_soft_destroy
 
 367     user = create(:user, :with_home_location, :description => "foo")
 
 369     assert_equal "user_#{user.id}", user.display_name
 
 370     assert_predicate user.description, :blank?
 
 371     assert_nil user.home_lat
 
 372     assert_nil user.home_lon
 
 373     assert_not_predicate user.avatar, :attached?
 
 374     assert_equal "deleted", user.status
 
 375     assert_not_predicate user, :visible?
 
 376     assert_not_predicate user, :active?
 
 379   def test_soft_destroy_revokes_oauth2_tokens
 
 381     oauth_access_token = create(:oauth_access_token, :user => user)
 
 382     assert_equal 1, user.access_tokens.not_expired.count
 
 386     assert_equal 0, user.access_tokens.not_expired.count
 
 387     oauth_access_token.reload
 
 388     assert_predicate oauth_access_token, :revoked?
 
 391   def test_deletion_allowed_when_no_changesets
 
 392     with_user_account_deletion_delay(10000) do
 
 394       assert_predicate user, :deletion_allowed?
 
 398   def test_deletion_allowed_without_delay
 
 399     with_user_account_deletion_delay(nil) do
 
 401       create(:changeset, :user => user)
 
 403       assert_predicate user, :deletion_allowed?
 
 407   def test_deletion_allowed_past_delay
 
 408     with_user_account_deletion_delay(10) do
 
 410       create(:changeset, :user => user, :created_at => Time.now.utc - 12.hours, :closed_at => Time.now.utc - 10.hours)
 
 412       assert_predicate user, :deletion_allowed?
 
 416   def test_deletion_allowed_during_delay
 
 417     with_user_account_deletion_delay(10) do
 
 419       create(:changeset, :user => user, :created_at => Time.now.utc - 11.hours, :closed_at => Time.now.utc - 9.hours)
 
 421       assert_not_predicate user, :deletion_allowed?
 
 422       assert_equal Time.now.utc + 1.hour, user.deletion_allowed_at
 
 426   def test_deletion_allowed_past_zero_delay
 
 427     with_user_account_deletion_delay(0) do
 
 429       create(:changeset, :user => user, :created_at => Time.now.utc, :closed_at => Time.now.utc + 1.hour)
 
 432         assert_predicate user, :deletion_allowed?
 
 437   def test_deletion_allowed_during_zero_delay
 
 438     with_user_account_deletion_delay(0) do
 
 440       create(:changeset, :user => user, :created_at => Time.now.utc, :closed_at => Time.now.utc + 1.hour)
 
 443         assert_not_predicate user, :deletion_allowed?
 
 444         assert_equal Time.now.utc + 30.minutes, user.deletion_allowed_at