summaryrefslogtreecommitdiff
path: root/spec/unit/parser/methods
diff options
context:
space:
mode:
authorStig Sandbeck Mathisen <ssm@debian.org>2014-09-07 10:14:36 +0200
committerStig Sandbeck Mathisen <ssm@debian.org>2014-09-07 10:14:36 +0200
commitd4b83be375ac1dead058e091191ee7c7b7c24c8a (patch)
treedc825687392ae3068de5b764be60c53122d9e02a /spec/unit/parser/methods
parent229cbb976fe0f70f5f30548b83517b415840f9bb (diff)
parent1681684857c6e39d60d87b0b3520d8783977ceff (diff)
downloadpuppet-upstream/3.7.0.tar.gz
Imported Upstream version 3.7.0upstream/3.7.0
Diffstat (limited to 'spec/unit/parser/methods')
-rw-r--r--spec/unit/parser/methods/each_spec.rb91
-rw-r--r--spec/unit/parser/methods/filter_spec.rb135
-rw-r--r--spec/unit/parser/methods/map_spec.rb184
-rw-r--r--spec/unit/parser/methods/reduce_spec.rb78
-rw-r--r--spec/unit/parser/methods/shared.rb45
-rw-r--r--spec/unit/parser/methods/slice_spec.rb135
6 files changed, 0 insertions, 668 deletions
diff --git a/spec/unit/parser/methods/each_spec.rb b/spec/unit/parser/methods/each_spec.rb
deleted file mode 100644
index 5e9ce4e0c..000000000
--- a/spec/unit/parser/methods/each_spec.rb
+++ /dev/null
@@ -1,91 +0,0 @@
-require 'puppet'
-require 'spec_helper'
-require 'puppet_spec/compiler'
-require 'rubygems'
-
-describe 'the each method' do
- include PuppetSpec::Compiler
-
- before :each do
- Puppet[:parser] = 'future'
- end
-
- context "should be callable as" do
- it 'each on an array selecting each value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1,2,3]
- $a.each |$v| {
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
- it 'each on an array selecting each value - function call style' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1,2,3]
- each ($a) |$index, $v| {
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- it 'each on an array with index' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [present, absent, present]
- $a.each |$k,$v| {
- file { "/file_${$k+1}": ensure => $v }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'absent'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- it 'each on a hash selecting entries' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'a'=>'present','b'=>'absent','c'=>'present'}
- $a.each |$e| {
- file { "/file_${e[0]}": ensure => $e[1] }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_a")['ensure'].should == 'present'
- catalog.resource(:file, "/file_b")['ensure'].should == 'absent'
- catalog.resource(:file, "/file_c")['ensure'].should == 'present'
- end
- it 'each on a hash selecting key and value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'a'=>present,'b'=>absent,'c'=>present}
- $a.each |$k, $v| {
- file { "/file_$k": ensure => $v }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_a")['ensure'].should == 'present'
- catalog.resource(:file, "/file_b")['ensure'].should == 'absent'
- catalog.resource(:file, "/file_c")['ensure'].should == 'present'
- end
- end
- context "should produce receiver" do
- it 'each checking produced value using single expression' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1, 3, 2]
- $b = $a.each |$x| { "unwanted" }
- file { "/file_${b[1]}":
- ensure => present
- }
- MANIFEST
-
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- end
-end
diff --git a/spec/unit/parser/methods/filter_spec.rb b/spec/unit/parser/methods/filter_spec.rb
deleted file mode 100644
index c9fed31d2..000000000
--- a/spec/unit/parser/methods/filter_spec.rb
+++ /dev/null
@@ -1,135 +0,0 @@
-require 'puppet'
-require 'spec_helper'
-require 'puppet_spec/compiler'
-
-require 'unit/parser/methods/shared'
-
-describe 'the filter method' do
- include PuppetSpec::Compiler
-
- before :each do
- Puppet[:parser] = 'future'
- end
-
- it 'should filter on an array (all berries)' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = ['strawberry','blueberry','orange']
- $a.filter |$x|{ $x =~ /berry$/}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_strawberry")['ensure'].should == 'present'
- catalog.resource(:file, "/file_blueberry")['ensure'].should == 'present'
- end
-
- it 'should filter on enumerable type (Integer)' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = Integer[1,10]
- $a.filter |$x|{ $x % 3 == 0}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- catalog.resource(:file, "/file_6")['ensure'].should == 'present'
- catalog.resource(:file, "/file_9")['ensure'].should == 'present'
- end
-
- it 'should filter on enumerable type (Integer) using two args index/value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = Integer[10,18]
- $a.filter |$i, $x|{ $i % 3 == 0}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_10")['ensure'].should == 'present'
- catalog.resource(:file, "/file_13")['ensure'].should == 'present'
- catalog.resource(:file, "/file_16")['ensure'].should == 'present'
- end
-
- it 'should produce an array when acting on an array' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = ['strawberry','blueberry','orange']
- $b = $a.filter |$x|{ $x =~ /berry$/}
- file { "/file_${b[0]}": ensure => present }
- file { "/file_${b[1]}": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_strawberry")['ensure'].should == 'present'
- catalog.resource(:file, "/file_blueberry")['ensure'].should == 'present'
- end
-
- it 'can filter array using index and value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = ['strawberry','blueberry','orange']
- $b = $a.filter |$index, $x|{ $index == 0 or $index ==2}
- file { "/file_${b[0]}": ensure => present }
- file { "/file_${b[1]}": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_strawberry")['ensure'].should == 'present'
- catalog.resource(:file, "/file_orange")['ensure'].should == 'present'
- end
-
- it 'filters on a hash (all berries) by key' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'strawberry'=>'red','blueberry'=>'blue','orange'=>'orange'}
- $a.filter |$x|{ $x[0] =~ /berry$/}.each |$v|{
- file { "/file_${v[0]}": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_strawberry")['ensure'].should == 'present'
- catalog.resource(:file, "/file_blueberry")['ensure'].should == 'present'
- end
-
- it 'should produce a hash when acting on a hash' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'strawberry'=>'red','blueberry'=>'blue','orange'=>'orange'}
- $b = $a.filter |$x|{ $x[0] =~ /berry$/}
- file { "/file_${b['strawberry']}": ensure => present }
- file { "/file_${b['blueberry']}": ensure => present }
- file { "/file_${b['orange']}": ensure => present }
-
- MANIFEST
-
- catalog.resource(:file, "/file_red")['ensure'].should == 'present'
- catalog.resource(:file, "/file_blue")['ensure'].should == 'present'
- catalog.resource(:file, "/file_")['ensure'].should == 'present'
- end
-
- it 'filters on a hash (all berries) by value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'strawb'=>'red berry','blueb'=>'blue berry','orange'=>'orange fruit'}
- $a.filter |$x|{ $x[1] =~ /berry$/}.each |$v|{
- file { "/file_${v[0]}": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_strawb")['ensure'].should == 'present'
- catalog.resource(:file, "/file_blueb")['ensure'].should == 'present'
- end
-
- context 'filter checks arguments and' do
- it 'raises an error when block has more than 2 argument' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].filter |$indexm, $x, $yikes|{ }
- MANIFEST
- end.to raise_error(Puppet::Error, /block must define at most two parameters/)
- end
-
- it 'raises an error when block has fewer than 1 argument' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].filter || { }
- MANIFEST
- end.to raise_error(Puppet::Error, /block must define at least one parameter/)
- end
- end
-
- it_should_behave_like 'all iterative functions argument checks', 'filter'
- it_should_behave_like 'all iterative functions hash handling', 'filter'
-end
diff --git a/spec/unit/parser/methods/map_spec.rb b/spec/unit/parser/methods/map_spec.rb
deleted file mode 100644
index 7f8e79789..000000000
--- a/spec/unit/parser/methods/map_spec.rb
+++ /dev/null
@@ -1,184 +0,0 @@
-require 'puppet'
-require 'spec_helper'
-require 'puppet_spec/compiler'
-
-require 'unit/parser/methods/shared'
-
-describe 'the map method' do
- include PuppetSpec::Compiler
-
- before :each do
- Puppet[:parser] = "future"
- end
-
- context "using future parser" do
- it 'map on an array (multiplying each value by 2)' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1,2,3]
- $a.map |$x|{ $x*2}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_4")['ensure'].should == 'present'
- catalog.resource(:file, "/file_6")['ensure'].should == 'present'
- end
-
- it 'map on an enumerable type (multiplying each value by 2)' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = Integer[1,3]
- $a.map |$x|{ $x*2}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_4")['ensure'].should == 'present'
- catalog.resource(:file, "/file_6")['ensure'].should == 'present'
- end
-
- it 'map on an integer (multiply each by 3)' do
- catalog = compile_to_catalog(<<-MANIFEST)
- 3.map |$x|{ $x*3}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_0")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- catalog.resource(:file, "/file_6")['ensure'].should == 'present'
- end
-
- it 'map on a string' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {a=>x, b=>y}
- "ab".map |$x|{$a[$x]}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_x")['ensure'].should == 'present'
- catalog.resource(:file, "/file_y")['ensure'].should == 'present'
- end
-
- it 'map on an array (multiplying value by 10 in even index position)' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1,2,3]
- $a.map |$i, $x|{ if $i % 2 == 0 {$x} else {$x*10}}.each |$v|{
- file { "/file_$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_20")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- it 'map on a hash selecting keys' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'a'=>1,'b'=>2,'c'=>3}
- $a.map |$x|{ $x[0]}.each |$k|{
- file { "/file_$k": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_a")['ensure'].should == 'present'
- catalog.resource(:file, "/file_b")['ensure'].should == 'present'
- catalog.resource(:file, "/file_c")['ensure'].should == 'present'
- end
-
- it 'map on a hash selecting keys - using two block parameters' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'a'=>1,'b'=>2,'c'=>3}
- $a.map |$k,$v|{ file { "/file_$k": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_a")['ensure'].should == 'present'
- catalog.resource(:file, "/file_b")['ensure'].should == 'present'
- catalog.resource(:file, "/file_c")['ensure'].should == 'present'
- end
-
- it 'each on a hash selecting value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'a'=>1,'b'=>2,'c'=>3}
- $a.map |$x|{ $x[1]}.each |$k|{ file { "/file_$k": ensure => present } }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- it 'each on a hash selecting value - using two bloc parameters' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {'a'=>1,'b'=>2,'c'=>3}
- $a.map |$k,$v|{ file { "/file_$v": ensure => present } }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- context "handles data type corner cases" do
- it "map gets values that are false" do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [false,false]
- $a.map |$x| { $x }.each |$i, $v| {
- file { "/file_$i.$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_0.false")['ensure'].should == 'present'
- catalog.resource(:file, "/file_1.false")['ensure'].should == 'present'
- end
-
- it "map gets values that are nil" do
- Puppet::Parser::Functions.newfunction(:nil_array, :type => :rvalue) do |args|
- [nil]
- end
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = nil_array()
- $a.map |$x| { $x }.each |$i, $v| {
- file { "/file_$i.$v": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_0.")['ensure'].should == 'present'
- end
-
- it "map gets values that are undef" do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [$does_not_exist]
- $a.map |$x = "something"| { $x }.each |$i, $v| {
- file { "/file_$i.$v": ensure => present }
- }
- MANIFEST
- catalog.resource(:file, "/file_0.something")['ensure'].should == 'present'
- end
- end
-
- context 'map checks arguments and' do
- it 'raises an error when block has more than 2 argument' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].map |$index, $x, $yikes|{ }
- MANIFEST
- end.to raise_error(Puppet::Error, /block must define at most two parameters/)
- end
-
- it 'raises an error when block has fewer than 1 argument' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].map || { }
- MANIFEST
- end.to raise_error(Puppet::Error, /block must define at least one parameter/)
- end
- end
-
- it_should_behave_like 'all iterative functions argument checks', 'map'
- it_should_behave_like 'all iterative functions hash handling', 'map'
- end
-end
diff --git a/spec/unit/parser/methods/reduce_spec.rb b/spec/unit/parser/methods/reduce_spec.rb
deleted file mode 100644
index 4f0c14e5e..000000000
--- a/spec/unit/parser/methods/reduce_spec.rb
+++ /dev/null
@@ -1,78 +0,0 @@
-require 'puppet'
-require 'spec_helper'
-require 'puppet_spec/compiler'
-
-describe 'the reduce method' do
- include PuppetSpec::Compiler
-
- before :all do
- # enable switching back
- @saved_parser = Puppet[:parser]
- # These tests only work with future parser
- end
- after :all do
- # switch back to original
- Puppet[:parser] = @saved_parser
- end
-
- before :each do
- node = Puppet::Node.new("floppy", :environment => 'production')
- @compiler = Puppet::Parser::Compiler.new(node)
- @scope = Puppet::Parser::Scope.new(@compiler)
- @topscope = @scope.compiler.topscope
- @scope.parent = @topscope
- Puppet[:parser] = 'future'
- end
-
- context "should be callable as" do
- it 'reduce on an array' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1,2,3]
- $b = $a.reduce |$memo, $x| { $memo + $x }
- file { "/file_$b": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_6")['ensure'].should == 'present'
- end
-
- it 'reduce on enumerable type' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = Integer[1,3]
- $b = $a.reduce |$memo, $x| { $memo + $x }
- file { "/file_$b": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_6")['ensure'].should == 'present'
- end
-
- it 'reduce on an array with start value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1,2,3]
- $b = $a.reduce(4) |$memo, $x| { $memo + $x }
- file { "/file_$b": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_10")['ensure'].should == 'present'
- end
- it 'reduce on a hash' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {a=>1, b=>2, c=>3}
- $start = [ignored, 4]
- $b = $a.reduce |$memo, $x| {['sum', $memo[1] + $x[1]] }
- file { "/file_${$b[0]}_${$b[1]}": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_sum_6")['ensure'].should == 'present'
- end
- it 'reduce on a hash with start value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {a=>1, b=>2, c=>3}
- $start = ['ignored', 4]
- $b = $a.reduce($start) |$memo, $x| { ['sum', $memo[1] + $x[1]] }
- file { "/file_${$b[0]}_${$b[1]}": ensure => present }
- MANIFEST
-
- catalog.resource(:file, "/file_sum_10")['ensure'].should == 'present'
- end
- end
-end
diff --git a/spec/unit/parser/methods/shared.rb b/spec/unit/parser/methods/shared.rb
deleted file mode 100644
index 42cfd2359..000000000
--- a/spec/unit/parser/methods/shared.rb
+++ /dev/null
@@ -1,45 +0,0 @@
-
-shared_examples_for 'all iterative functions hash handling' do |func|
- it 'passes a hash entry as an array of the key and value' do
- catalog = compile_to_catalog(<<-MANIFEST)
- {a=>1}.#{func} |$v| { notify { "${v[0]} ${v[1]}": } }
- MANIFEST
-
- catalog.resource(:notify, "a 1").should_not be_nil
- end
-end
-
-shared_examples_for 'all iterative functions argument checks' do |func|
-
- it 'raises an error when used against an unsupported type' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- 3.14.#{func} |$v| { }
- MANIFEST
- end.to raise_error(Puppet::Error, /must be something enumerable/)
- end
-
- it 'raises an error when called with any parameters besides a block' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].#{func}(1) |$v| { }
- MANIFEST
- end.to raise_error(Puppet::Error, /Wrong number of arguments/)
- end
-
- it 'raises an error when called without a block' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].#{func}()
- MANIFEST
- end.to raise_error(Puppet::Error, /Wrong number of arguments/)
- end
-
- it 'raises an error when called without a block' do
- expect do
- compile_to_catalog(<<-MANIFEST)
- [1].#{func}(1)
- MANIFEST
- end.to raise_error(Puppet::Error, /must be a parameterized block/)
- end
-end
diff --git a/spec/unit/parser/methods/slice_spec.rb b/spec/unit/parser/methods/slice_spec.rb
deleted file mode 100644
index 1de1dd0f1..000000000
--- a/spec/unit/parser/methods/slice_spec.rb
+++ /dev/null
@@ -1,135 +0,0 @@
-require 'puppet'
-require 'spec_helper'
-require 'puppet_spec/compiler'
-require 'rubygems'
-
-describe 'methods' do
- include PuppetSpec::Compiler
-
- before :all do
- # enable switching back
- @saved_parser = Puppet[:parser]
- # These tests only work with future parser
- Puppet[:parser] = 'future'
- end
- after :all do
- # switch back to original
- Puppet[:parser] = @saved_parser
- end
-
- before :each do
- node = Puppet::Node.new("floppy", :environment => 'production')
- @compiler = Puppet::Parser::Compiler.new(node)
- @scope = Puppet::Parser::Scope.new(@compiler)
- @topscope = @scope.compiler.topscope
- @scope.parent = @topscope
- Puppet[:parser] = 'future'
- end
-
- context "should be callable on array as" do
-
- it 'slice with explicit parameters' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1, present, 2, absent, 3, present]
- $a.slice(2) |$k,$v| {
- file { "/file_${$k}": ensure => $v }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'absent'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- it 'slice with one parameter' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1, present, 2, absent, 3, present]
- $a.slice(2) |$k| {
- file { "/file_${$k[0]}": ensure => $k[1] }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'absent'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
- end
-
- it 'slice with shorter last slice' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1, present, 2, present, 3, absent]
- $a.slice(4) |$a, $b, $c, $d| {
- file { "/file_$a.$c": ensure => $b }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1.2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3.")['ensure'].should == 'absent'
- end
- end
-
- context "should be callable on hash as" do
- it 'slice with explicit parameters, missing are empty' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = {1=>present, 2=>present, 3=>absent}
- $a.slice(2) |$a,$b| {
- file { "/file_${a[0]}.${b[0]}": ensure => $a[1] }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1.2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3.")['ensure'].should == 'absent'
- end
- end
-
- context "should be callable on enumerable types as" do
- it 'slice with integer range' do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = Integer[1,4]
- $a.slice(2) |$a,$b| {
- file { "/file_${a}.${b}": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1.2")['ensure'].should == 'present'
- catalog.resource(:file, "/file_3.4")['ensure'].should == 'present'
- end
-
- it 'slice with integer' do
- catalog = compile_to_catalog(<<-MANIFEST)
- 4.slice(2) |$a,$b| {
- file { "/file_${a}.${b}": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_0.1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2.3")['ensure'].should == 'present'
- end
-
- it 'slice with string' do
- catalog = compile_to_catalog(<<-MANIFEST)
- 'abcd'.slice(2) |$a,$b| {
- file { "/file_${a}.${b}": ensure => present }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_a.b")['ensure'].should == 'present'
- catalog.resource(:file, "/file_c.d")['ensure'].should == 'present'
- end
- end
-
- context "when called without a block" do
- it "should produce an array with the result" do
- catalog = compile_to_catalog(<<-MANIFEST)
- $a = [1, present, 2, absent, 3, present]
- $a.slice(2).each |$k| {
- file { "/file_${$k[0]}": ensure => $k[1] }
- }
- MANIFEST
-
- catalog.resource(:file, "/file_1")['ensure'].should == 'present'
- catalog.resource(:file, "/file_2")['ensure'].should == 'absent'
- catalog.resource(:file, "/file_3")['ensure'].should == 'present'
-
- end
- end
-end