require 'spec_helper'
require 'fixtures/name_fixtures'
include NameFixtures

def mods_display_name_link(mods_record)
  config = ModsDisplay::Configuration::Base.new do
    link :link_method, '%value%'
  end
  ModsDisplay::Name.new(mods_record, config, TestController.new)
end

def mods_display_name(mods_record)
  ModsDisplay::Name.new(mods_record, ModsDisplay::Configuration::Base.new, double('controller'))
end

describe ModsDisplay::Language do
  include NameFixtures
  before(:all) do
    @name = Stanford::Mods::Record.new.from_str(simple_name_fixture, false).plain_name
    @blank_name = Stanford::Mods::Record.new.from_str(blank_name_fixture, false).plain_name
    @primary_name = Stanford::Mods::Record.new.from_str(primary_name_fixture, false).plain_name
    @contributor = Stanford::Mods::Record.new.from_str(contributor_fixture, false).plain_name
    @encoded_role = Stanford::Mods::Record.new.from_str(encoded_role_fixture, false).plain_name
    @mixed_role = Stanford::Mods::Record.new.from_str(mixed_role_fixture, false).plain_name
    @numeral_toa = Stanford::Mods::Record.new.from_str(numural_toa_fixture, false).plain_name
    @simple_toa = Stanford::Mods::Record.new.from_str(simple_toa_fixture, false).plain_name
    @display_form = Stanford::Mods::Record.new.from_str(display_form_name_fixture, false).plain_name
    @collapse_label = Stanford::Mods::Record.new.from_str(collapse_label_name_fixture, false).plain_name
    @complex_labels = Stanford::Mods::Record.new.from_str(complex_name_label_fixture, false).plain_name
    @complex_roles = Stanford::Mods::Record.new.from_str(complex_role_name_fixture, false).plain_name
    @name_with_role = Stanford::Mods::Record.new.from_str(name_with_role_fixture, false).plain_name
    @multiple_roles = Stanford::Mods::Record.new.from_str(multiple_roles_fixture, false).plain_name
  end
  describe 'label' do
    it 'should default Author/Creator when no role is available' do
      expect(mods_display_name(@name).fields.first.label).to eq('Author/Creator:')
    end
    it "should label 'Author/Creator' for primary authors" do
      expect(mods_display_name(@primary_name).fields.first.label).to eq('Author/Creator:')
    end
    it 'should apply contributor labeling to all non blank/author/creator roles' do
      expect(mods_display_name(@contributor).fields.first.label).to eq('Contributor:')
    end
  end

  describe 'fields' do
    it 'should use the display form when available' do
      fields = mods_display_name(@display_form).fields
      expect(fields.length).to eq(1)
      expect(fields.first.values.length).to eq(1)
      expect(fields.first.values.first).to be_a(ModsDisplay::Name::Person)
      expect(fields.first.values.first.name).to eq('Mr. John Doe')
    end
    it 'should not add blank names' do
      expect(mods_display_name(@blank_name).fields).to eq([])
    end
    it 'should not delimit given name and termsOfAddress (that begin w/ roman numerals) with a comma' do
      fields = mods_display_name(@numeral_toa).fields
      expect(fields.length).to eq(1)
      expect(fields.first.values.length).to eq(1)
      expect(fields.first.values.first.to_s).not_to match(/Given Name, XVII/)
      expect(fields.first.values.first.to_s).to match(/Given Name XVII/)
    end
    it 'should delimit given name and termsOfAddress (that DO NOT begin w/ roman numerals) with a comma' do
      fields = mods_display_name(@simple_toa).fields
      expect(fields.length).to eq(1)
      expect(fields.first.values.length).to eq(1)
      expect(fields.first.values.first.to_s).to match(/Given Name, Ier, empereur/)
      expect(fields.first.values.first.to_s).not_to match(/Given Name Ier, empereur/)
    end
    it 'should collapse adjacent matching labels' do
      fields = mods_display_name(@collapse_label).fields
      expect(fields.length).to eq(1)
      expect(fields.first.label).to eq('Author/Creator:')
      fields.first.values.each do |val|
        expect(['John Doe', 'Jane Doe']).to include val.to_s
      end
    end
    it 'should perseve order and separation of non-adjesent matching labels' do
      fields = mods_display_name(@complex_labels).fields

      expect(fields.length).to eq(3)
      expect(fields.first.label).to eq('Author/Creator:')
      expect(fields.first.values.length).to eq(1)
      expect(fields.first.values.first.to_s).to eq('John Doe')

      expect(fields[1].label).to eq('Contributor:')
      expect(fields[1].values.length).to eq(1)
      expect(fields[1].values.first.name).to eq('Jane Doe')
      expect(fields[1].values.first.roles).to eq(['lithographer'])

      expect(fields.last.label).to eq('Author/Creator:')
      expect(fields.last.values.length).to eq(2)
      fields.last.values.each do |val|
        expect(['Jane Dough', 'John Dough']).to include val.to_s
      end
    end
    describe 'roles' do
      it 'should get the role when present' do
        fields = mods_display_name(@name_with_role).fields
        expect(fields.length).to eq(1)
        expect(fields.first.values.length).to eq(1)
        expect(fields.first.values.first).to be_a(ModsDisplay::Name::Person)
        expect(fields.first.values.first.roles).to eq(['Depicted'])
      end
      it 'should decode encoded roleTerms when no text (or non-typed) roleTerm is available' do
        fields = mods_display_name(@encoded_role).fields
        expect(fields.length).to eq(1)
        expect(fields.first.values.length).to eq(1)
        expect(fields.first.values.first.to_s).to eq('John Doe (Lithographer)')
      end
      it "should get the type='text' role before an untyped role" do
        fields = mods_display_name(@mixed_role).fields
        expect(fields.length).to eq(1)
        expect(fields.first.values.length).to eq(1)
        expect(fields.first.values.first.roles).to eq(['engraver'])
      end
      it 'should be handled correctly when there are more than one' do
        fields = mods_display_name(@multiple_roles).fields
        expect(fields.length).to eq(1)
        expect(fields.first.values.length).to eq(1)
        expect(fields.first.values.first.roles).to eq(%w(Depicted Artist))
      end
      it 'should handle code and text roleTerms together correctly' do
        fields = mods_display_name(@complex_roles).fields
        expect(fields.length).to eq(1)
        expect(fields.first.values.length).to eq(1)
        expect(fields.first.values.first.roles).to eq(['Depicted'])
      end
      it 'should comma seperate multiple roles' do
        fields = mods_display_name(@multiple_roles).fields
        expect(fields.length).to eq(1)
        expect(fields.first.values.length).to eq(1)
        expect(fields.first.values.first.to_s).to eq('John Doe (Depicted, Artist)')
      end
    end
  end

  describe 'to_html' do
    it 'should add the role to the name in parens' do
      html = mods_display_name(@name_with_role).to_html
      expect(html).to match(%r{<dd>John Doe \(Depicted\)</dd>})
    end
    it 'should linke the name and not the role if requested' do
      html = mods_display_name_link(@name_with_role).to_html
      expect(html).to match(%r{<dd><a href='.*\?John Doe'>John Doe</a> \(Depicted\)</dd>})
    end
  end
end