3rdparty/modules/stdlib/spec/acceptance/is_integer_spec.rb

   1 require 'spec_helper_acceptance'
   2
   3 describe 'is_integer function' do
   4   describe 'success' do
   5     pp1 = <<-DOC
   6       $a = ['aaa.com','bbb','ccc']
   7       $b = false
   8       $o = is_integer($a)
   9       if $o == $b {
  10         notify { 'output correct': }
  11       }
  12     DOC
  13     it 'is_integers arrays' do
  14       apply_manifest(pp1, :catch_failures => true) do |r|
  15         expect(r.stdout).to match(%r{Notice: output correct})
  16       end
  17     end
  18
  19     pp2 = <<-DOC
  20       $a = true
  21       $b = false
  22       $o = is_integer($a)
  23       if $o == $b {
  24         notify { 'output correct': }
  25       }
  26     DOC
  27     it 'is_integers true' do
  28       apply_manifest(pp2, :catch_failures => true) do |r|
  29         expect(r.stdout).to match(%r{Notice: output correct})
  30       end
  31     end
  32
  33     pp3 = <<-DOC
  34       $a = "3"
  35       $b = true
  36       $o = is_integer($a)
  37       if $o == $b {
  38         notify { 'output correct': }
  39       }
  40     DOC
  41     it 'is_integers strings' do
  42       apply_manifest(pp3, :catch_failures => true) do |r|
  43         expect(r.stdout).to match(%r{Notice: output correct})
  44       end
  45     end
  46
  47     pp4 = <<-DOC
  48       $a = 3.5
  49       $b = false
  50       $o = is_integer($a)
  51       if $o == $b {
  52         notify { 'output correct': }
  53       }
  54     DOC
  55     it 'is_integers floats' do
  56       apply_manifest(pp4, :catch_failures => true) do |r|
  57         expect(r.stdout).to match(%r{Notice: output correct})
  58       end
  59     end
  60
  61     pp5 = <<-DOC
  62       $a = 3
  63       $b = true
  64       $o = is_integer($a)
  65       if $o == $b {
  66         notify { 'output correct': }
  67       }
  68     DOC
  69     it 'is_integers integers' do
  70       apply_manifest(pp5, :catch_failures => true) do |r|
  71         expect(r.stdout).to match(%r{Notice: output correct})
  72       end
  73     end
  74
  75     pp6 = <<-DOC
  76       $a = {'aaa'=>'www.com'}
  77       $b = false
  78       $o = is_integer($a)
  79       if $o == $b {
  80         notify { 'output correct': }
  81       }
  82     DOC
  83     it 'is_integers hashes' do
  84       apply_manifest(pp6, :catch_failures => true) do |r|
  85         expect(r.stdout).to match(%r{Notice: output correct})
  86       end
  87     end
  88   end
  89   describe 'failure' do
  90     it 'handles improper argument counts'
  91     it 'handles non-arrays'
  92   end
  93 end