scripts/puppet4ccb/neals_playground/modules/stdlib/spec/acceptance/fqdn_rotate_spec.rb

require 'spec_helper_acceptance'

describe 'fqdn_rotate function' do
  describe 'success' do
    include_context 'with faked facts'
    context "when the FQDN is 'fakehost.localdomain'" do
      before :each do
        fake_fact('fqdn', 'fakehost.localdomain')
      end

      pp1 = <<-DOC
        $a = ['a','b','c','d']
        $o = fqdn_rotate($a)
        notice(inline_template('fqdn_rotate is <%= @o.inspect %>'))
      DOC
      it 'rotates arrays' do
        apply_manifest(pp1, :catch_failures => true) do |r|
          expect(r.stdout).to match(%r{fqdn_rotate is \["d", "a", "b", "c"\]})
        end
      end

      pp2 = <<-DOC
        $a = ['a','b','c','d']
        $s = 'seed'
        $o = fqdn_rotate($a, $s)
        notice(inline_template('fqdn_rotate is <%= @o.inspect %>'))
      DOC
      it 'rotates arrays with custom seeds' do
        apply_manifest(pp2, :catch_failures => true) do |r|
          expect(r.stdout).to match(%r{fqdn_rotate is \["c", "d", "a", "b"\]})
        end
      end

      pp3 = <<-DOC
        $a = 'abcd'
        $o = fqdn_rotate($a)
        notice(inline_template('fqdn_rotate is <%= @o.inspect %>'))
      DOC
      it 'rotates strings' do
        apply_manifest(pp3, :catch_failures => true) do |r|
          expect(r.stdout).to match(%r{fqdn_rotate is "dabc"})
        end
      end

      pp4 = <<-DOC
        $a = 'abcd'
        $s = 'seed'
        $o = fqdn_rotate($a, $s)
        notice(inline_template('fqdn_rotate is <%= @o.inspect %>'))
      DOC
      it 'rotates strings with custom seeds' do
        apply_manifest(pp4, :catch_failures => true) do |r|
          expect(r.stdout).to match(%r{fqdn_rotate is "cdab"})
        end
      end
    end
  end
  describe 'failure' do
    it 'handles improper argument counts'
    it 'handles invalid arguments'
  end
end