require 'spec_helper'
require 'xml_examples'
require 'sslyze/protocol'

describe SSLyze::Protocol do
  include_examples "XML specs"

  subject { described_class.new(xml.at('/document/results/target/tlsv1_2')) }

  describe "#name" do
    it "should return the protocol name" do
      expect(subject.name).to be == :tlsv1_2
    end
  end

  describe "#title" do
    it "must parse the title attribute" do
      expect(subject.title).to be == 'TLSV1_2 Cipher Suites'
    end
  end

  describe "#each_error" do
    pending "need data"
  end

  describe "#each_rejected_cipher_suite" do
    it "should yield CipherSuite objects" do
      expect { |b|
        subject.each_rejected_cipher_suite(&b)
      }
    end

    context "when given no block" do
      specify do
        expect(subject.each_rejected_cipher_suite).to be_an(Enumerator)
      end
    end
  end

  describe "#rejected_cipher_suites" do
    specify do
      expect(subject.rejected_cipher_suites).to be_an(Array).and(
        all(be_a(CipherSuite))
      )
    end
  end

  describe "#each_accepted_cipher_suite" do
    it "should yield CipherSuite objects" do
      expect { |b|
        subject.each_accepted_cipher_suite(&b)
      }
    end

    context "when given no block" do
      specify do
        expect(subject.each_accepted_cipher_suite).to be_an(Enumerator)
      end
    end
  end

  describe "#accepted_cipher_suites" do
    specify do
      expect(subject.accepted_cipher_suites).to be_an(Array).and(
        all(be_a(CipherSuite))
      )
    end
  end

  describe "#each_preferred_cipher_suite" do
    it "should yield CipherSuite objects" do
      expect { |b|
        subject.each_preferred_cipher_suite(&b)
      }
    end

    context "when given no block" do
      specify do
        expect(subject.each_preferred_cipher_suite).to be_an(Enumerator)
      end
    end
  end

  describe "#preferred_cipher_suites" do
    specify do
      expect(subject.preferred_cipher_suites).to be_an(Array).and(
        all(be_a(CipherSuite))
      )
    end
  end

  describe "#supported?" do
    context "when there are preferred cipher suites" do
      it "should return true" do
        expect(subject.supported?).to be(true)
      end
    end
  end
end