internetee-registry/spec/models/domain_spec.rb

require 'rails_helper'

RSpec.describe Domain do
  before :example do
    Setting.ds_algorithm = 2
    Setting.ds_data_allowed = true
    Setting.ds_data_with_key_allowed = true
    Setting.key_data_allowed = true

    Setting.dnskeys_min_count = 0
    Setting.dnskeys_max_count = 9
    Setting.ns_min_count = 2
    Setting.ns_max_count = 11

    Setting.transfer_wait_time = 0

    Setting.admin_contacts_min_count = 1
    Setting.admin_contacts_max_count = 10
    Setting.tech_contacts_min_count = 0
    Setting.tech_contacts_max_count = 10

    Setting.client_side_status_editing_enabled = true

    Fabricate(:zonefile_setting, origin: 'ee')
    Fabricate(:zonefile_setting, origin: 'pri.ee')
    Fabricate(:zonefile_setting, origin: 'med.ee')
    Fabricate(:zonefile_setting, origin: 'fie.ee')
    Fabricate(:zonefile_setting, origin: 'com.ee')
  end

  context 'with invalid attribute' do
    before :example do
      @domain = Domain.new
    end

    it 'should not be valid' do
      @domain.valid?
      @domain.errors.full_messages.should match_array([
        "Admin domain contacts Admin contacts count must be between 1-10",
        "Nameservers Nameservers count must be between 2-11",
        "Period Period is not a number",
        "Registrant Registrant is missing",
        "Registrar Registrar is missing"
      ])
    end

    it 'should not have any versions' do
      @domain.versions.should == []
    end

    it 'should not have whois body' do
      @domain.whois_record.should == nil
    end

    it 'should not be registrant update confirm ready' do
      @domain.registrant_update_confirmable?('123').should == false
    end

    it 'should not have pending update' do
      @domain.pending_update?.should == false
    end

    it 'should allow pending update' do
      @domain.pending_update_prohibited?.should == false
    end

    it 'should not have pending delete' do
      @domain.pending_delete?.should == false
    end

    it 'should allow pending delete' do
      @domain.pending_delete_prohibited?.should == false
    end
  end

  context 'with valid attributes' do
    before :example do
      @domain = Fabricate(:domain)
    end

    it 'should be valid' do
      @domain.valid?
      @domain.errors.full_messages.should match_array([])
    end

    it 'should be valid twice' do
      @domain = Fabricate(:domain)
      @domain.valid?
      @domain.errors.full_messages.should match_array([])
    end

    it 'should have correct validity dates' do
      @domain.outzone_at.should be_nil
      @domain.delete_at.should be_nil
    end

    it 'should validate uniqueness of tech contacts' do
      same_contact = Fabricate(:contact, code: 'same_contact')
      domain = Fabricate(:domain)
      domain.tech_contacts << same_contact
      domain.tech_contacts << same_contact
      domain.valid?
      domain.errors.full_messages.should match_array(["Tech domain contacts is invalid"])
    end

    it 'should validate uniqueness of tech contacts' do
      same_contact = Fabricate(:contact, code: 'same_contact')
      domain = Fabricate(:domain)
      domain.admin_contacts << same_contact
      domain.admin_contacts << same_contact
      domain.valid?
      domain.errors.full_messages.should match_array(["Admin domain contacts is invalid"])
    end

    it 'should have whois body by default' do
      @domain.whois_record.present?.should == true
    end

    it 'should have whois json by default' do
      @domain.whois_record.json.present?.should == true
    end

    it 'should not be registrant update confirm ready' do
      @domain.registrant_update_confirmable?('123').should == false
    end

    it 'should not find any domain pendings to clean' do
      Domain.clean_expired_pendings.should == 0
    end

    it 'should not find any domains with wrong pendings' do
      domain = Fabricate(:domain)
      domain.registrant_verification_asked!('frame-str', '1')
      domain.registrant_verification_asked_at = 30.days.ago
      domain.save

      Domain.clean_expired_pendings.should == 0
    end

    it 'should clean domain pendings' do
      domain = Fabricate(:domain)
      domain.registrant_verification_asked!('frame-str', '1')
      domain.registrant_verification_asked_at = 30.days.ago
      domain.pending_delete!

      DomainCron.clean_expired_pendings.should == 1
      domain.reload.pending_delete?.should == false
      domain.pending_json.should == {}
    end

    it 'should start redemption grace period' do
      DomainCron.start_redemption_grace_period
      @domain.reload
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should == false

      @domain.outzone_at = Time.zone.now
      @domain.statuses << DomainStatus::SERVER_MANUAL_INZONE # this prohibits server_hold
      @domain.save

      DomainCron.start_redemption_grace_period
      @domain.reload
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should == false

      @domain.statuses = []
      @domain.save

      DomainCron.start_redemption_grace_period
      @domain.reload
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should == true
    end

    it 'should set force delete time' do
      @domain.statuses = ['ok']
      @domain.set_force_delete

      @domain.statuses.should match_array([
        "serverForceDelete",
        "pendingDelete",
        "serverManualInzone",
        "serverRenewProhibited",
        "serverTransferProhibited",
        "serverUpdateProhibited"
      ])

      fda = Time.zone.now + Setting.redemption_grace_period.days

      @domain.registrar.messages.count.should == 1
      m = @domain.registrar.messages.first
      m.body.should == "Force delete set on domain #{@domain.name}"

      @domain.unset_force_delete

      @domain.statuses.should == ['ok']

      @domain.statuses = [
        DomainStatus::CLIENT_DELETE_PROHIBITED,
        DomainStatus::SERVER_DELETE_PROHIBITED,
        DomainStatus::PENDING_UPDATE,
        DomainStatus::PENDING_TRANSFER,
        DomainStatus::PENDING_RENEW,
        DomainStatus::PENDING_CREATE,
        DomainStatus::CLIENT_HOLD,
        DomainStatus::EXPIRED,
        DomainStatus::SERVER_HOLD,
        DomainStatus::DELETE_CANDIDATE
      ]

      @domain.save

      @domain.set_force_delete

      @domain.statuses.should match_array([
        "clientHold",
        "deleteCandidate",
        "expired",
        "serverForceDelete",
        "pendingDelete",
        "serverHold",
        "serverRenewProhibited",
        "serverTransferProhibited",
        "serverUpdateProhibited"
      ])

      @domain.unset_force_delete

      @domain.statuses.should match_array([
        "clientDeleteProhibited",
        "clientHold",
        "deleteCandidate",
        "expired",
        "pendingCreate",
        "pendingRenew",
        "pendingTransfer",
        "pendingUpdate",
        "serverDeleteProhibited",
        "serverHold"
      ])
    end

    it 'should should be manual in zone and held after force delete' do
      Setting.redemption_grace_period = 1

      @domain.valid?
      @domain.outzone_at = Time.zone.now + 1.day # before redemption grace period
      # what should this be?
      # @domain.server_holdable?.should be true
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should be false
      @domain.statuses.include?(DomainStatus::SERVER_MANUAL_INZONE).should be false
      @domain.set_force_delete
      @domain.server_holdable?.should be false
      @domain.statuses.include?(DomainStatus::SERVER_MANUAL_INZONE).should be true
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should be false
    end

    it 'should not allow update after force delete' do
      @domain.valid?
      @domain.pending_update_prohibited?.should be false
      @domain.update_prohibited?.should be false
      @domain.set_force_delete
      @domain.pending_update_prohibited?.should be true
      @domain.update_prohibited?.should be true
    end

    context 'with time period settings' do
      before :example do
        @save_days_to_renew = Setting.days_to_renew_domain_before_expire
        @save_warning_period = Setting.expire_warning_period
        @save_grace_period = Setting.redemption_grace_period
      end

      after :all do
        Setting.days_to_renew_domain_before_expire = @save_days_to_renew
        Setting.expire_warning_period = @save_warning_period
        Setting.redemption_grace_period = @save_grace_period
      end

      before :example do
        @domain.valid?
      end

      context 'with no renewal limit, renew anytime' do
        before do
          Setting.days_to_renew_domain_before_expire = 0
        end

        it 'should always renew with no policy' do
          @domain.renewable?.should be true
        end

        it 'should not allow to renew after force delete' do
          Setting.redemption_grace_period = 1
          @domain.set_force_delete
          @domain.renewable?.should be false
        end
      end

      context 'with renew policy' do
        before :example do
          @policy = 30
          Setting.days_to_renew_domain_before_expire = @policy
        end

        it 'should not allow renew before policy' do
          @domain.valid_to = Time.zone.now.beginning_of_day + @policy.days * 2
          @domain.renewable?.should be false
        end

        context 'ready to renew' do
          before { @domain.valid_to = Time.zone.now + (@policy - 2).days }

          it 'should allow renew' do
            @domain.renewable?.should be true
          end

          it 'should not allow to renew after force delete' do
            Setting.redemption_grace_period = 1
            @domain.set_force_delete
            @domain.renewable?.should be false
          end
        end
      end
    end

    it 'should start redemption grace period' do
      DomainCron.start_redemption_grace_period
      @domain.reload
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should == false

      @domain.outzone_at = Time.zone.now
      @domain.statuses << DomainStatus::SERVER_MANUAL_INZONE # this prohibits server_hold
      @domain.save

      DomainCron.start_redemption_grace_period
      @domain.reload
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should == false

      @domain.statuses = []
      @domain.save

      DomainCron.start_redemption_grace_period
      @domain.reload
      @domain.statuses.include?(DomainStatus::SERVER_HOLD).should == true
    end


    it 'should set expired status and update outzone_at and delete_at' do
      domain = Fabricate(:domain)
      domain.statuses.should == ['ok']
      domain.set_expired
      domain.changes.keys.should == ['statuses', 'outzone_at', 'delete_at']
      domain.save

      domain.statuses.should == ['expired']
    end

    it 'should set pending update' do
      @domain.statuses = DomainStatus::OK # restore
      @domain.save
      @domain.pending_update?.should == false

      @domain.set_pending_update
      @domain.pending_update?.should == true
      @domain.statuses = DomainStatus::OK # restore
    end

    it 'should not set pending update' do
      @domain.statuses = DomainStatus::OK # restore
      @domain.statuses << DomainStatus::CLIENT_UPDATE_PROHIBITED
      @domain.save

      @domain.set_pending_update.should == nil # not updated
      @domain.pending_update?.should == false
      @domain.statuses = DomainStatus::OK # restore
    end

    it 'should set pending delete' do
      @domain.statuses = DomainStatus::OK # restore
      @domain.save
      @domain.pending_delete?.should == false

      @domain.set_pending_delete
      @domain.save
      @domain.statuses.should == ['pendingDelete', 'serverHold']
      @domain.pending_delete?.should == true
      @domain.statuses = ['serverManualInzone']
      @domain.save
      @domain.set_pending_delete
      @domain.statuses.sort.should == ['pendingDelete', 'serverManualInzone'].sort
      @domain.statuses = DomainStatus::OK # restore
    end

    it 'should not set pending delele' do
      @domain.statuses = DomainStatus::OK # restore
      @domain.pending_delete?.should == false
      @domain.statuses << DomainStatus::CLIENT_DELETE_PROHIBITED
      @domain.save

      @domain.set_pending_delete.should == nil

      @domain.pending_delete?.should == false
      @domain.statuses = DomainStatus::OK # restore
    end

    it 'should add poll message to registrar' do
      domain = Fabricate(:domain, name: 'testpollmessage123.ee')
      domain.poll_message!(:poll_pending_update_confirmed_by_registrant)
      domain.registrar.messages.first.body.should == 'Registrant confirmed domain update: testpollmessage123.ee'
    end

    context 'about registrant update confirm' do
      before :example do
        @domain.registrant_verification_token = 123
        @domain.registrant_verification_asked_at = Time.zone.now
        @domain.statuses << DomainStatus::PENDING_UPDATE
      end

      it 'should be registrant update confirm ready' do
        @domain.registrant_update_confirmable?('123').should == true
      end

      it 'should not be registrant update confirm ready when token does not match' do
        @domain.registrant_update_confirmable?('wrong-token').should == false
      end

      it 'should not be registrant update confirm ready when no correct status' do
        @domain.statuses = []
        @domain.registrant_update_confirmable?('123').should == false
      end
    end

    context 'about registrant update confirm when domain is invalid' do
      before :example do
        @domain.registrant_verification_token = 123
        @domain.registrant_verification_asked_at = Time.zone.now
        @domain.statuses << DomainStatus::PENDING_UPDATE
      end

      it 'should be registrant update confirm ready' do
        @domain.registrant_update_confirmable?('123').should == true
      end

      it 'should not be registrant update confirm ready when token does not match' do
        @domain.registrant_update_confirmable?('wrong-token').should == false
      end

      it 'should not be registrant update confirm ready when no correct status' do
        @domain.statuses = []
        @domain.registrant_update_confirmable?('123').should == false
      end
    end

    context 'with versioning' do
      it 'should not have one version' do
        with_versioning do
          @domain.versions.size.should == 0
          @domain.name = 'new-test-name.ee'
          @domain.save
          @domain.errors.full_messages.should match_array([])
          @domain.versions.size.should == 1
        end
      end

      it 'should return api_creator when created by api user' do
        with_versioning do
          @user = Fabricate(:admin_user)
          @api_user = Fabricate(:api_user)
          @user.id.should == 1
          @api_user.id.should == 2
          ::PaperTrail.whodunnit = '2-ApiUser: testuser'

          @domain = Fabricate(:domain)
          @domain.creator_str.should == '2-ApiUser: testuser'

          @domain.creator.should == @api_user
          @domain.creator.should_not == @user
        end
      end

      it 'should return api_creator when created by api user' do
        with_versioning do
          @user = Fabricate(:admin_user, id: 1000)
          @api_user = Fabricate(:api_user, id: 2000)
          @user.id.should == 1000
          @api_user.id.should == 2000
          ::PaperTrail.whodunnit = '1000-AdminUser: testuser'

          @domain = Fabricate(:domain)
          @domain.creator_str.should == '1000-AdminUser: testuser'

          @domain.creator.should == @user
          @domain.creator.should_not == @api_user
        end
      end
    end
  end

  it 'validates domain name' do
    d = Fabricate(:domain)
    expect(d.name).to_not be_nil

    invalid = [
      'a.ee', "#{'a' * 64}.ee", 'ab.eu', 'test.ab.ee', '-test.ee', '-test-.ee',
      'test-.ee', 'te--st.ee', 'õ.pri.ee', 'test.com', 'www.ab.ee', 'test.eu', '  .ee', 'a b.ee',
      'Ž .ee', 'test.edu.ee'
    ]

    invalid.each do |x|
      expect(Fabricate.build(:domain, name: x).valid?).to be false
    end

    valid = [
      'ab.ee', "#{'a' * 63}.ee", 'te-s-t.ee', 'jäääär.ee', 'päike.pri.ee',
      'õigus.com.ee', 'õäöü.fie.ee', 'test.med.ee', 'žä.ee', '  ŽŠ.ee  '
    ]

    valid.each do |x|
      expect(Fabricate.build(:domain, name: x).valid?).to be true
    end

    invalid_punycode = ['xn--geaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa-4we.pri.ee']

    invalid_punycode.each do |x|
      expect(Fabricate.build(:domain, name: x).valid?).to be false
    end

    valid_punycode = ['xn--ge-uia.pri.ee', 'xn--geaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa-9te.pri.ee']

    valid_punycode.each do |x|
      expect(Fabricate.build(:domain, name: x).valid?).to be true
    end
  end

  it 'should not create zone origin domain' do
    d = Fabricate.build(:domain, name: 'ee')
    d.save.should == false
    expect(d.errors.full_messages).to include('Data management policy violation: Domain name is blocked [name]')

    d = Fabricate.build(:domain, name: 'bla')
    d.save.should == false
    expect(d.errors.full_messages).to include('Domain name Domain name is invalid')
  end

  it 'downcases domain' do
    d = Domain.new(name: 'TesT.Ee')
    expect(d.name).to eq('test.ee')
    expect(d.name_puny).to eq('test.ee')
    expect(d.name_dirty).to eq('test.ee')
  end

  it 'should be valid when name length is exatly 63 in characters' do
    d = Fabricate(:domain, name: "#{'a' * 63}.ee")
    d.valid?
    d.errors.full_messages.should == []
  end

  it 'should not be valid when name length is longer than 63 characters' do
    d = Fabricate.build(:domain, name: "#{'a' * 64}.ee")
    d.valid?
    d.errors.full_messages.should match_array([
      "Domain name Domain name is invalid",
      "Puny label Domain name is too long (maximum is 63 characters)"
    ])
  end

  it 'should not be valid when name length is longer than 63 characters' do
    d = Fabricate.build(:domain,
      name: "xn--4caaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa.ee")
    d.valid?
    d.errors.full_messages.should match_array([
      "Domain name Domain name is invalid",
      "Puny label Domain name is too long (maximum is 63 characters)"
    ])
  end

  it 'should be valid when name length is 63 characters' do
    d = Fabricate.build(:domain,
                        name: "õäöüšžõäöüšžõäöüšžõäöüšžõäöüšžõäöüšžõäöüšžab123.pri.ee")
    d.valid?
    d.errors.full_messages.should match_array([
    ])
  end

  it 'should not be valid when name length is longer than 63 punycode characters' do
    d = Fabricate.build(:domain, name: "#{'ä' * 63}.ee")
    d.valid?
    d.errors.full_messages.should == [
      "Puny label Domain name is too long (maximum is 63 characters)"
    ]
  end

  it 'should not be valid when name length is longer than 63 punycode characters' do
    d = Fabricate.build(:domain, name: "#{'ä' * 64}.ee")
    d.valid?
    d.errors.full_messages.should match_array([
      "Domain name Domain name is invalid",
      "Puny label Domain name is too long (maximum is 63 characters)"
    ])
  end

  it 'should not be valid when name length is longer than 63 punycode characters' do
    d = Fabricate.build(:domain, name: "#{'ä' * 63}.pri.ee")
    d.valid?
    d.errors.full_messages.should match_array([
      "Puny label Domain name is too long (maximum is 63 characters)"
    ])
  end

  it 'should be valid when punycode name length is not longer than 63' do
    d = Fabricate.build(:domain, name: "#{'ä' * 53}.pri.ee")
    d.valid?
    d.errors.full_messages.should == []
  end

  it 'should be valid when punycode name length is not longer than 63' do
    d = Fabricate.build(:domain, name: "#{'ä' * 57}.ee")
    d.valid?
    d.errors.full_messages.should == []
  end

  it 'should not be valid when name length is one pynicode' do
    d = Fabricate.build(:domain, name: "xn--4ca.ee")
    d.valid?
    d.errors.full_messages.should == ["Domain name Domain name is invalid"]
  end

  it 'should not be valid with at character' do
    d = Fabricate.build(:domain, name: 'dass@sf.ee')
    d.valid?
    d.errors.full_messages.should == ["Domain name Domain name is invalid"]
  end

  it 'should not be valid with invalid characters' do
    d = Fabricate.build(:domain, name: '@ba)s(?ä_:-df.ee')
    d.valid?
    d.errors.full_messages.should == ["Domain name Domain name is invalid"]
  end

  it 'should be valid when name length is two pynicodes' do
    d = Fabricate.build(:domain, name: "xn--4caa.ee")
    d.valid?
    d.errors.full_messages.should == []
  end

  it 'should be valid when name length is two pynicodes' do
    d = Fabricate.build(:domain, name: "xn--4ca0b.ee")
    d.valid?
    d.errors.full_messages.should == []
  end

  it 'does not create a reserved domain' do
    Fabricate.create(:reserved_domain, name: 'test.ee')

    domain = Fabricate.build(:domain, name: 'test.ee')
    domain.validate

    expect(domain.errors[:base]).to include('Required parameter missing; reserved>pw element required for reserved domains')
  end

  it 'validates period' do
    expect(Fabricate.build(:domain, period: 0).valid?).to be false
    expect(Fabricate.build(:domain, period: 4).valid?).to be false
    expect(Fabricate.build(:domain, period: 3).valid?).to be true
  end

  it 'generates auth info' do
    d = Fabricate(:domain)
    expect(d.auth_info).to_not be_empty
  end

  it 'manages statuses automatically' do
    d = Fabricate(:domain)
    expect(d.statuses.count).to eq(1)
    expect(d.statuses.first).to eq(DomainStatus::OK)

    d.period = 2
    d.save

    d.reload
    expect(d.statuses.count).to eq(1)
    expect(d.statuses.first).to eq(DomainStatus::OK)

    d.statuses << DomainStatus::CLIENT_DELETE_PROHIBITED
    d.save

    d.reload

    expect(d.statuses.count).to eq(1)
    expect(d.statuses.first).to eq(DomainStatus::CLIENT_DELETE_PROHIBITED)
  end

  with_versioning do
    context 'when not saved' do
      it 'does not create domain version' do
        Fabricate.build(:domain)
        expect(DomainVersion.count).to eq(0)
      end

      it 'does not create child versions' do
        Fabricate.build(:domain)
        expect(ContactVersion.count).to eq(0)
        expect(NameserverVersion.count).to eq(0)
      end
    end

    context 'when saved' do
      before(:each) do
        Fabricate(:domain)
      end

      it 'creates domain version' do
        expect(DomainVersion.count).to eq(1)
        expect(ContactVersion.count).to eq(3)
        expect(NameserverVersion.count).to eq(3)
      end
    end
  end
end

RSpec.describe Domain, db: false do
  it { is_expected.to alias_attribute(:on_hold_time, :outzone_at) }
  it { is_expected.to alias_attribute(:delete_time, :delete_at) }
  it { is_expected.to alias_attribute(:force_delete_time, :force_delete_at) }

  describe '#set_server_hold' do
    let(:domain) { described_class.new }

    before :example do
      travel_to Time.zone.parse('05.07.2010')
      domain.set_server_hold
    end

    it 'sets corresponding status' do
      expect(domain.statuses).to include(DomainStatus::SERVER_HOLD)
    end

    it 'sets :outzone_at to now' do
      expect(domain.outzone_at).to eq(Time.zone.parse('05.07.2010'))
    end
  end

  describe '#admin_contact_names' do
    let(:domain) { described_class.new }

    before :example do
      expect(Contact).to receive(:names).and_return('names')
    end

    it 'returns admin contact names' do
      expect(domain.admin_contact_names).to eq('names')
    end
  end

  describe '#admin_contact_emails' do
    let(:domain) { described_class.new }

    before :example do
      expect(Contact).to receive(:emails).and_return('emails')
    end

    it 'returns admin contact emails' do
      expect(domain.admin_contact_emails).to eq('emails')
    end
  end

  describe '#tech_contact_names' do
    let(:domain) { described_class.new }

    before :example do
      expect(Contact).to receive(:names).and_return('names')
    end

    it 'returns technical contact names' do
      expect(domain.tech_contact_names).to eq('names')
    end
  end

  describe '#nameserver_hostnames' do
    let(:domain) { described_class.new }

    before :example do
      expect(Nameserver).to receive(:hostnames).and_return('hostnames')
    end

    it 'returns name server hostnames' do
      expect(domain.nameserver_hostnames).to eq('hostnames')
    end
  end

  describe '#primary_contact_emails' do
    let(:domain) { described_class.new }

    before :example do
      expect(domain).to receive(:registrant_email).and_return('registrant@test.com')
      expect(domain).to receive(:admin_contact_emails).and_return(['admin.contact.email@test.com'])
    end

    it 'returns registrant and administrative contact emails' do
      expect(domain.primary_contact_emails).to match_array(%w(
                                                   registrant@test.com
                                                   admin.contact.email@test.com
                                                 ))
    end
  end
end