588 lines
19 KiB
Ruby
588 lines
19 KiB
Ruby
describe User, type: :model do
|
||
describe '#after_confirmation' do
|
||
let(:email) { 'mail@beta.gouv.fr' }
|
||
let!(:invite) { create(:invite, email: email) }
|
||
let!(:invite2) { create(:invite, email: email) }
|
||
let(:user) do
|
||
create(:user,
|
||
email: email,
|
||
password: SECURE_PASSWORD,
|
||
confirmation_token: '123',
|
||
confirmed_at: nil)
|
||
end
|
||
|
||
it 'when confirming a user, it links the pending invitations to this user' do
|
||
expect(user.invites.size).to eq(0)
|
||
user.confirm
|
||
expect(user.reload.invites.size).to eq(2)
|
||
end
|
||
end
|
||
|
||
describe '#owns?' do
|
||
let(:owner) { create(:user) }
|
||
let(:dossier) { create(:dossier, user: owner) }
|
||
let(:invite_user) { create(:user) }
|
||
let(:invite_instructeur) { create(:user) }
|
||
|
||
subject { user.owns?(dossier) }
|
||
|
||
context 'when user is owner' do
|
||
let(:user) { owner }
|
||
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when user was invited by user' do
|
||
before do
|
||
create(:invite, dossier: dossier, user: invite_user)
|
||
end
|
||
|
||
let(:user) { invite_user }
|
||
|
||
it { is_expected.to be_falsy }
|
||
end
|
||
|
||
context 'when user is quidam' do
|
||
let(:user) { create(:user) }
|
||
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
end
|
||
|
||
describe '#invite?' do
|
||
let(:dossier) { create :dossier }
|
||
let(:user) { dossier.user }
|
||
|
||
subject { user.invite? dossier }
|
||
|
||
context 'when user is invite at the dossier' do
|
||
before do
|
||
create :invite, dossier_id: dossier.id, user: user
|
||
end
|
||
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when user is not invite at the dossier' do
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
end
|
||
|
||
describe '#owns_or_invite?' do
|
||
let(:owner) { create(:user) }
|
||
let(:dossier) { create(:dossier, user: owner) }
|
||
let(:invite_user) { create(:user) }
|
||
let(:invite_instructeur) { create(:user) }
|
||
|
||
subject { user.owns_or_invite?(dossier) }
|
||
|
||
context 'when user is owner' do
|
||
let(:user) { owner }
|
||
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when user was invited by user' do
|
||
before do
|
||
create(:invite, dossier: dossier, user: invite_user)
|
||
end
|
||
|
||
let(:user) { invite_user }
|
||
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when user is quidam' do
|
||
let(:user) { create(:user) }
|
||
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
end
|
||
|
||
describe '.create_or_promote_to_instructeur' do
|
||
let(:email) { 'inst1@gmail.com' }
|
||
let(:password) { 'un super password !' }
|
||
let(:admins) { [] }
|
||
|
||
subject { User.create_or_promote_to_instructeur(email, password, administrateurs: admins) }
|
||
|
||
context 'without an existing user' do
|
||
it do
|
||
user = subject
|
||
expect(user.valid_password?(password)).to be true
|
||
expect(user.confirmed_at).to be_present
|
||
expect(user.instructeur).to be_present
|
||
end
|
||
|
||
context 'with an administrateur' do
|
||
let(:admins) { [create(:administrateur)] }
|
||
|
||
it do
|
||
user = subject
|
||
expect(user.instructeur.administrateurs).to eq(admins)
|
||
end
|
||
end
|
||
end
|
||
|
||
context 'with an existing user' do
|
||
before { create(:user, email: email, password: SECURE_PASSWORD) }
|
||
|
||
it 'keeps the previous password' do
|
||
user = subject
|
||
expect(user.valid_password?(SECURE_PASSWORD)).to be true
|
||
expect(user.instructeur).to be_present
|
||
end
|
||
|
||
context 'with an existing instructeur' do
|
||
let(:old_admins) { [create(:administrateur)] }
|
||
let(:admins) { [create(:administrateur)] }
|
||
let!(:instructeur) { create(:instructeur, email: 'i@mail.com', administrateurs: old_admins) }
|
||
|
||
before do
|
||
User
|
||
.find_by(email: email)
|
||
.update!(instructeur: instructeur)
|
||
end
|
||
|
||
it 'keeps the existing instructeurs and adds administrateur' do
|
||
user = subject
|
||
expect(user.instructeur).to eq(instructeur)
|
||
expect(user.instructeur.administrateurs).to match_array(old_admins + admins)
|
||
end
|
||
end
|
||
end
|
||
|
||
context 'with an invalid email' do
|
||
let(:email) { 'invalid' }
|
||
|
||
it 'does not build an instructeur' do
|
||
user = subject
|
||
expect(user.valid?).to be false
|
||
expect(user.instructeur).to be_nil
|
||
end
|
||
end
|
||
end
|
||
|
||
describe '.create_or_promote_to_expert' do
|
||
let(:email) { 'exp1@gmail.com' }
|
||
let(:password) { 'un super expert !' }
|
||
|
||
subject { User.create_or_promote_to_expert(email, password) }
|
||
|
||
context 'with an invalid email' do
|
||
let(:email) { 'invalid' }
|
||
|
||
it 'does not build an expert' do
|
||
user = subject
|
||
expect(user.valid?).to be false
|
||
expect(user.expert).to be_nil
|
||
end
|
||
end
|
||
|
||
context 'without an existing user' do
|
||
it do
|
||
user = subject
|
||
expect(user.valid_password?(password)).to be true
|
||
expect(user.confirmed_at).to be_present
|
||
expect(user.expert).to be_present
|
||
end
|
||
end
|
||
|
||
context 'with an existing user' do
|
||
before { create(:user, email: email, password: SECURE_PASSWORD) }
|
||
|
||
it 'keeps the previous password' do
|
||
user = subject
|
||
expect(user.valid_password?(SECURE_PASSWORD)).to be true
|
||
expect(user.expert).to be_present
|
||
end
|
||
|
||
context 'with an existing expert' do
|
||
let!(:expert) { Expert.create }
|
||
|
||
before do
|
||
User
|
||
.find_by(email: email)
|
||
.update!(expert: expert)
|
||
end
|
||
|
||
it 'keeps the existing experts' do
|
||
user = subject
|
||
expect(user.expert).to eq(expert)
|
||
end
|
||
end
|
||
end
|
||
end
|
||
|
||
describe 'invite_administrateur!' do
|
||
let(:super_admin) { create(:super_admin) }
|
||
let(:administrateur) { create(:administrateur) }
|
||
let(:user) { administrateur.user }
|
||
|
||
let(:mailer_double) { double('mailer', deliver_later: true) }
|
||
|
||
before { allow(AdministrationMailer).to receive(:invite_admin).and_return(mailer_double) }
|
||
|
||
subject { user.invite_administrateur! }
|
||
|
||
context 'when the user is inactif' do
|
||
before { subject }
|
||
|
||
it { expect(AdministrationMailer).to have_received(:invite_admin).with(user, kind_of(String)) }
|
||
end
|
||
|
||
context 'when the user is actif' do
|
||
before do
|
||
user.update(last_sign_in_at: Time.zone.now)
|
||
subject
|
||
end
|
||
|
||
it 'receives an invitation to update its password' do
|
||
expect(AdministrationMailer).to have_received(:invite_admin).with(user, kind_of(String))
|
||
end
|
||
end
|
||
end
|
||
|
||
describe '#active?' do
|
||
let!(:user) { create(:user) }
|
||
|
||
subject { user.active? }
|
||
|
||
context 'when the user has never signed in' do
|
||
before { user.update(last_sign_in_at: nil) }
|
||
|
||
it { is_expected.to be false }
|
||
end
|
||
|
||
context 'when the user has already signed in' do
|
||
before { user.update(last_sign_in_at: Time.zone.now) }
|
||
|
||
it { is_expected.to be true }
|
||
end
|
||
end
|
||
|
||
describe '#can_be_deleted?' do
|
||
let(:user) { create(:user) }
|
||
let(:administrateur) { create(:administrateur) }
|
||
let(:instructeur) { create(:instructeur) }
|
||
let(:expert) { create(:expert) }
|
||
|
||
subject { user.can_be_deleted? }
|
||
|
||
context 'when the user has a dossier in instruction' do
|
||
let!(:dossier) { create(:dossier, :en_instruction, user: user) }
|
||
|
||
it { is_expected.to be true }
|
||
end
|
||
|
||
context 'when the user has no dossier in instruction' do
|
||
it { is_expected.to be true }
|
||
end
|
||
|
||
context 'when the user is an administrateur' do
|
||
it 'cannot be deleted' do
|
||
expect(administrateur.user.can_be_deleted?).to be_falsy
|
||
end
|
||
end
|
||
|
||
context 'when the user is an instructeur' do
|
||
it 'cannot be deleted' do
|
||
expect(instructeur.user.can_be_deleted?).to be_falsy
|
||
end
|
||
end
|
||
|
||
context 'when the user is an expert' do
|
||
it 'cannot be deleted' do
|
||
expect(expert.user.can_be_deleted?).to be_falsy
|
||
end
|
||
end
|
||
end
|
||
|
||
describe '#delete_and_keep_track_dossiers_also_delete_user' do
|
||
let(:super_admin) { create(:super_admin) }
|
||
let(:user) { create(:user) }
|
||
let(:reason) { :user_rmoved }
|
||
context 'without a dossier with processing strted' do
|
||
let!(:dossier_en_construction) { create(:dossier, :en_construction, user: user) }
|
||
let!(:dossier_brouillon) { create(:dossier, user: user) }
|
||
|
||
context 'without a discarded dossier' do
|
||
it "keep track of dossiers and delete user" do
|
||
user.delete_and_keep_track_dossiers_also_delete_user(super_admin, reason:)
|
||
|
||
expect(DeletedDossier.find_by(dossier_id: dossier_en_construction)).to be_present
|
||
expect(DeletedDossier.find_by(dossier_id: dossier_brouillon)).to be_nil
|
||
expect(User.find_by(id: user.id)).to be_nil
|
||
end
|
||
end
|
||
|
||
context 'with a deleted dossier' do
|
||
let(:dossier_to_delete) { create(:dossier, :en_construction, user: user) }
|
||
let!(:dossier_from_another_user) { create(:dossier, :en_construction, user: create(:user)) }
|
||
|
||
it "keep track of dossiers and delete user" do
|
||
dossier_to_delete.hide_and_keep_track!(user, :user_request)
|
||
user.delete_and_keep_track_dossiers_also_delete_user(super_admin, reason:)
|
||
|
||
expect(DeletedDossier.find_by(dossier_id: dossier_en_construction)).to be_present
|
||
expect(DeletedDossier.find_by(dossier_id: dossier_brouillon)).to be_nil
|
||
expect(Dossier.find_by(id: dossier_from_another_user.id)).to be_present
|
||
expect(User.find_by(id: user.id)).to be_nil
|
||
end
|
||
end
|
||
end
|
||
|
||
context 'with dossiers with processing started' do
|
||
let!(:dossier_en_instruction) { create(:dossier, :en_instruction, user: user) }
|
||
let!(:dossier_termine) { create(:dossier, :accepte, user: user) }
|
||
|
||
it "keep track of dossiers and delete user" do
|
||
user.delete_and_keep_track_dossiers_also_delete_user(super_admin, reason:)
|
||
|
||
expect(dossier_en_instruction.reload).to be_present
|
||
expect(dossier_en_instruction.user).to be_nil
|
||
expect(dossier_en_instruction.user_email_for(:display)).to eq(user.email)
|
||
expect { dossier_en_instruction.user_email_for(:notification) }.to raise_error(RuntimeError)
|
||
|
||
expect(dossier_termine.reload).to be_present
|
||
expect(dossier_termine.user).to be_nil
|
||
expect(dossier_termine.user_email_for(:display)).to eq(user.email)
|
||
expect(dossier_termine.valid?).to be_truthy
|
||
expect { dossier_termine.user_email_for(:notification) }.to raise_error(RuntimeError)
|
||
|
||
expect(User.find_by(id: user.id)).to be_nil
|
||
expect(FranceConnectInformation.where(user_id: user.id)).to be_empty
|
||
end
|
||
end
|
||
|
||
context 'with fci' do
|
||
let!(:user) { create(:user, france_connect_informations: [build(:france_connect_information), build(:france_connect_information)]) }
|
||
let(:reason) { :user_expired }
|
||
subject { user.delete_and_keep_track_dossiers_also_delete_user(super_admin, reason:) }
|
||
|
||
it { expect { subject }.not_to raise_error }
|
||
it { expect { subject }.to change { FranceConnectInformation.count }.from(2).to(0) }
|
||
it { expect { subject }.to change { User.count }.from(1).to(0) }
|
||
end
|
||
end
|
||
|
||
describe '#password_complexity' do
|
||
# This password list is sorted by password complexity, according to zxcvbn (used for complexity evaluation)
|
||
# 0 - too guessable: risky password. (guesses < 10^3)
|
||
# 1 - very guessable: protection from throttled online attacks. (guesses < 10^6)
|
||
# 2 - somewhat guessable: protection from unthrottled online attacks. (guesses < 10^8)
|
||
# 3 - safely unguessable: moderate protection from offline slow-hash scenario. (guesses < 10^10)
|
||
# 4 - very unguessable: strong protection from offline slow-hash scenario. (guesses >= 10^10)
|
||
passwords = ['password', '12pass23', 'démarches ', 'démarches-simple', '{My-$3cure-p4ssWord}']
|
||
min_complexity = PASSWORD_COMPLEXITY_FOR_ADMIN
|
||
|
||
subject do
|
||
user.valid?
|
||
user.errors.full_messages
|
||
end
|
||
|
||
context 'for administrateurs' do
|
||
let(:user) { build(:user, email: 'admin@exemple.fr', password: password, administrateur: build(:administrateur, user: nil)) }
|
||
|
||
context 'when the password is too short' do
|
||
let(:password) { 's' * (PASSWORD_MIN_LENGTH - 1) }
|
||
|
||
it 'reports an error about password length (but not about complexity)' do
|
||
expect(subject).to eq(["Le champ « Mot de passe » est trop court. Saisir un mot de passe avec au moins 8 caractères"])
|
||
end
|
||
end
|
||
|
||
passwords[0..(min_complexity - 1)].each do |simple_password|
|
||
context 'when the password is long enough, but too simple' do
|
||
let(:password) { simple_password }
|
||
|
||
it { expect(subject).to eq(["Le champ « Mot de passe » n’est pas assez complexe. Saisir un mot de passe plus complexe"]) }
|
||
end
|
||
end
|
||
|
||
context 'when the password is long and complex' do
|
||
let(:password) { passwords[min_complexity] }
|
||
|
||
it { expect(subject).to be_empty }
|
||
end
|
||
end
|
||
|
||
context 'for simple users' do
|
||
let(:user) { build(:user, email: 'user@exemple.fr', password: password) }
|
||
|
||
context 'when the password is too short' do
|
||
let(:password) { 's' * (PASSWORD_MIN_LENGTH - 1) }
|
||
|
||
it 'reports an error about password length (but not about complexity)' do
|
||
expect(subject).to eq(["Le champ « Mot de passe » est trop court. Saisir un mot de passe avec au moins 8 caractères"])
|
||
end
|
||
end
|
||
|
||
context 'when the password is long enough, but simple' do
|
||
let(:password) { 'simple-password' }
|
||
|
||
it 'doesn’t enforce the password complexity' do
|
||
expect(subject).to be_empty
|
||
end
|
||
end
|
||
end
|
||
end
|
||
|
||
describe '#merge' do
|
||
let(:old_user) { create(:user) }
|
||
let(:targeted_user) { create(:user) }
|
||
|
||
subject { targeted_user.merge(old_user) }
|
||
context 'merge myself' do
|
||
it 'fails' do
|
||
expect { old_user.merge(old_user) }.to raise_error 'Merging same user, no way'
|
||
end
|
||
end
|
||
context 'and the old account has some stuff' do
|
||
let!(:dossier) { create(:dossier, user: old_user) }
|
||
let!(:hidden_dossier) { create(:dossier, user: old_user, hidden_by_user_at: 1.hour.ago) }
|
||
let!(:invite) { create(:invite, user: old_user) }
|
||
let!(:merge_log) { MergeLog.create(user: old_user, from_user_id: 1, from_user_email: 'a') }
|
||
|
||
it 'transfers the dossier' do
|
||
subject
|
||
|
||
expect(targeted_user.dossiers).to contain_exactly(dossier, hidden_dossier)
|
||
expect(targeted_user.invites).to match([invite])
|
||
expect(targeted_user.merge_logs.first).to eq(merge_log)
|
||
|
||
added_merge_log = targeted_user.merge_logs.last
|
||
expect(added_merge_log.from_user_id).to eq(old_user.id)
|
||
expect(added_merge_log.from_user_email).to eq(old_user.email)
|
||
end
|
||
end
|
||
|
||
context 'and the old account belongs to an instructeur, expert and administrateur' do
|
||
let!(:expert) { create(:expert, user: old_user) }
|
||
let!(:administrateur) { create(:administrateur, user: old_user) }
|
||
let!(:instructeur) { old_user.instructeur }
|
||
|
||
it 'transfers instructeur account' do
|
||
subject
|
||
targeted_user.reload
|
||
|
||
expect(targeted_user.instructeur).to match(instructeur)
|
||
expect(targeted_user.administrateur).to match(administrateur)
|
||
expect(targeted_user.expert).to match(expert)
|
||
end
|
||
|
||
context 'and the targeted account owns an instructeur and expert as well' do
|
||
let!(:targeted_administrateur) { create(:administrateur, user: targeted_user) }
|
||
let!(:targeted_instructeur) { targeted_user.instructeur }
|
||
let!(:targeted_expert) { create(:expert, user: targeted_user) }
|
||
|
||
it 'merge the account' do
|
||
expect(targeted_instructeur).to receive(:merge).with(instructeur)
|
||
expect(targeted_expert).to receive(:merge).with(expert)
|
||
expect(targeted_administrateur).to receive(:merge).with(administrateur)
|
||
|
||
subject
|
||
|
||
expect { instructeur.reload }.to raise_error(ActiveRecord::RecordNotFound)
|
||
expect { expert.reload }.to raise_error(ActiveRecord::RecordNotFound)
|
||
expect { administrateur.reload }.to raise_error(ActiveRecord::RecordNotFound)
|
||
expect { old_user.reload }.to raise_error(ActiveRecord::RecordNotFound)
|
||
end
|
||
end
|
||
end
|
||
|
||
context 'and the old account had targeted_user_links' do
|
||
let(:expert) { create(:expert, user: old_user) }
|
||
let(:expert_procedure) { create(:experts_procedure, expert: expert) }
|
||
let!(:targeted_user_link) { create(:targeted_user_link, user: old_user, target_model: create(:avis, experts_procedure: expert_procedure)) }
|
||
|
||
it 'transfers the targeted_user_link' do
|
||
subject
|
||
targeted_user.reload
|
||
expect(targeted_user.targeted_user_links).to include(targeted_user_link)
|
||
end
|
||
end
|
||
end
|
||
|
||
describe 'discard default devise validation when needed' do
|
||
let(:now) { Time.zone.now }
|
||
let(:before) { now - 1.day }
|
||
let(:after) { now + 1.day }
|
||
subject { user.valid? }
|
||
|
||
shared_examples_for "validation of users.email was flacky" do
|
||
context 'when value is username' do
|
||
let(:email) { 'username' }
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
|
||
context 'when value does not contain extension' do
|
||
let(:email) { 'username@mailserver' }
|
||
# what we allowed but was a mistake
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when value include an alias' do
|
||
let(:email) { 'username+alias@mailserver.fr' }
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when value includes accents' do
|
||
let(:email) { 'tech@démarches.gouv.fr' }
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
|
||
context 'when value is the classic standard user@domain.ext' do
|
||
let(:email) { 'username@mailserver.domain' }
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
end
|
||
|
||
context 'when env var is not present' do
|
||
let(:user) { build(:user, email: email) }
|
||
before { allow(StrictEmailValidator).to receive(:strict_validation_enabled?).and_return(false).at_least(1) }
|
||
it_behaves_like "validation of users.email was flacky"
|
||
end
|
||
|
||
context "record.created_at < ENV['STRICT_EMAIL_VALIDATION_STARTS_ON']" do
|
||
let(:user) { build(:user, email: email, created_at: before) }
|
||
before do
|
||
allow(StrictEmailValidator).to receive(:strict_validation_enabled?).and_return(true).at_least(1)
|
||
stub_const("StrictEmailValidator::DATE_SINCE_STRICT_EMAIL_VALIDATION", now)
|
||
end
|
||
it_behaves_like "validation of users.email was flacky"
|
||
end
|
||
|
||
context "record.created_at > ENV['STRICT_EMAIL_VALIDATION_STARTS_ON']" do
|
||
let(:user) { build(:user, email: email, created_at: after) }
|
||
before do
|
||
allow(StrictEmailValidator).to receive(:strict_validation_enabled?).and_return(true).at_least(1)
|
||
stub_const("StrictEmailValidator::DATE_SINCE_STRICT_EMAIL_VALIDATION", now)
|
||
end
|
||
context 'when value is username' do
|
||
let(:email) { 'username' }
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
|
||
context 'when value does not contain extension' do
|
||
let(:email) { 'username@mailserver' }
|
||
it { is_expected.to be_falsey }
|
||
end
|
||
|
||
context 'when value include an alias' do
|
||
let(:email) { 'username+alias@mailserver.fr' }
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when value includes accents' do
|
||
let(:email) { 'tech@démarches.gouv.fr' }
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
|
||
context 'when value is the classic standard user@domain.ext' do
|
||
let(:email) { 'username@mailserver.domain' }
|
||
it { is_expected.to be_truthy }
|
||
end
|
||
end
|
||
end
|
||
end
|