require 'i18n_flow/validator/symmetry'
require 'i18n_flow/validator/errors'

describe I18nFlow::Validator::Symmetry do
  let(:validator) { I18nFlow::Validator::Symmetry.new(nil, nil) }

  describe '#validate' do
    it 'should pass if the given trees are completely the same' do
      ast_1 = parse_yaml(<<-YAML)['en']
      en:
        key_1: text_1
        foo:
          key_2: text_2
      YAML
      ast_2 = parse_yaml(<<-YAML)['ja']
      ja:
        key_1: text_1
        foo:
          key_2: text_2
      YAML

      allow(validator).to receive(:ast_1).and_return(ast_1)
      allow(validator).to receive(:ast_2).and_return(ast_2)
      validator.validate!

      expect(validator.errors).to eq([])
    end

    context 'asymmetric key' do
      it 'should detect' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_3: text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::MissingKeyError.new('ja.key_2'),
          I18nFlow::Validator::ExtraKeyError.new('ja.key_3'),
        ])
      end

      it 'should detect on nested node' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          foo:
            key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          foo:
            key_3: text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::MissingKeyError.new('ja.foo.key_2'),
          I18nFlow::Validator::ExtraKeyError.new('ja.foo.key_3'),
        ])
      end

      it 'should suppress an error on the ignored node (value)' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_3: !ignore:key text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::MissingKeyError.new('ja.key_2'),
        ])
      end

      it 'should suppress an error on the ignored node (map)' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          foo:
            key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          foo: !ignore:key
            key_3: text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end
    end

    context 'type mismatch' do
      it 'should detect' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2:
            one: text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::InvalidTypeError.new('ja.key_2'),
        ])
      end

      it 'should detect on nested node' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          foo:
            key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          foo:
            key_2:
              one: text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::InvalidTypeError.new('ja.foo.key_2'),
        ])
      end

      it 'suppress an error on the ignored node' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: !ignore:key
            one: text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'suppress an error on the ignored node (outer map)' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          foo:
            key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          foo: !ignore:key
            key_2:
              one: text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end
    end

    context '!only tag' do
      it 'should pass if the asymmetric node is tagged with its locale (value)' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: text_2
          key_3: !only:ja text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should pass if the asymmetric node is tagged with its locale (map)' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: text_2
          key_3: !only:ja
            one: text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should pass if the symmetric node is tagged with both locales' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: !only:en,ja text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: !only:en,ja text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should fail if the symmetric node is tagged with an one-side locale' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: !only:ja text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::InvalidLocaleError.new('en.key_2', expect: ['ja'], actual: 'en'),
        ])
      end

      it 'should fail if the asymmetric node is tagged with a different locale' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: text_2
          key_3: !only:en
            one: text_3
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::InvalidLocaleError.new('ja.key_3', expect: ['en'], actual: 'ja'),
        ])
      end

      it 'should fail if the symmetric node is tagged with a different locale' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: !only:en text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::InvalidLocaleError.new('ja.key_2', expect: ['en'], actual: 'ja'),
        ])
      end
    end

    context '!todo tag' do
      it 'should pass if the value is marked as todo' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: !todo text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should fail if the tag is on a non-value node' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          foo: !todo
            key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          foo: !todo
            key_2: text_2
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          # en.foo is ignored,
          I18nFlow::Validator::InvalidTodoError.new('ja.foo'),
        ])
      end

      it 'should fail if texts are different' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: text_1
          key_2: text_2
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: text_1
          key_2: !todo text_9
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::TodoContentError.new('ja.key_2', expect: 'text_2', actual: 'text_9'),
        ])
      end
    end

    context 'args' do
      it 'should pass if the arguments are exclusive and exhaustive' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: '%{arg_1} %{arg_2}'
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: '%{arg_1} %{arg_2}'
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should be insensitive of the order of arguments' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: '%{arg_1} %{arg_2}'
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: '%{arg_2} %{arg_1}'
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should be insensitive of the duplicate of arguments' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: '%{arg_1} %{arg_1}'
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: '%{arg_1}'
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should ignore confusing args' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: 'foo %%{arg_1}'
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: 'foo'
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end

      it 'should detect unbalanced arguments' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: 'foo %{arg_1}'
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: 'foo %{arg_2}'
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([
          I18nFlow::Validator::AsymmetricArgsError.new('ja.key_1',
            expect: ['arg_1'],
            actual: ['arg_2'],
          )
        ])
      end

      it 'should suppress an error on the ignored node' do
        ast_1 = parse_yaml(<<-YAML)['en']
        en:
          key_1: 'foo %{arg_1}'
        YAML
        ast_2 = parse_yaml(<<-YAML)['ja']
        ja:
          key_1: !ignore:args 'foo %{arg_2}'
        YAML

        allow(validator).to receive(:ast_1).and_return(ast_1)
        allow(validator).to receive(:ast_2).and_return(ast_2)
        validator.validate!

        expect(validator.errors).to eq([])
      end
    end
  end
end