File: then.rb

package info (click to toggle)
puppet-agent 8.10.0-6
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 27,404 kB
  • sloc: ruby: 286,820; sh: 492; xml: 116; makefile: 88; cs: 68
file content (75 lines) | stat: -rw-r--r-- 2,680 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
# frozen_string_literal: true

Puppet::Parser::Functions.newfunction(
  :then,
  :type => :rvalue,
  :arity => -2,
  :doc => <<~DOC
    Call a [lambda](https://puppet.com/docs/puppet/latest/lang_lambdas.html)
    with the given argument unless the argument is undef. Return `undef` if argument is
    `undef`, and otherwise the result of giving the argument to the lambda.

    This is useful to process a sequence of operations where an intermediate
    result may be `undef` (which makes the entire sequence `undef`).
    The `then` function is especially useful with the function `dig` which
    performs in a similar way "digging out" a value in a complex structure.

    **Example:** Using `dig` and `then`

    ```puppet
    $data = {a => { b => [{x => 10, y => 20}, {x => 100, y => 200}]}}
    notice $data.dig(a, b, 1, x).then |$x| { $x * 2 }
    ```

    Would notice the value 200

    Contrast this with:

    ```puppet
    $data = {a => { b => [{x => 10, y => 20}, {ex => 100, why => 200}]}}
    notice $data.dig(a, b, 1, x).then |$x| { $x * 2 }
    ```

    Which would notice `undef` since the last lookup of 'x' results in `undef` which
    is returned (without calling the lambda given to the `then` function).

    As a result there is no need for conditional logic or a temporary (non local)
    variable as the result is now either the wanted value (`x`) multiplied
    by 2 or `undef`.

    Calls to `then` can be chained. In the next example, a structure is using an offset based on
    using 1 as the index to the first element (instead of 0 which is used in the language).
    We are not sure if user input actually contains an index at all, or if it is
    outside the range of available names.args.

    **Example:** Chaining calls to the `then` function

    ```puppet
    # Names to choose from
    $names = ['Ringo', 'Paul', 'George', 'John']

    # Structure where 'beatle 2' is wanted (but where the number refers
    # to 'Paul' because input comes from a source using 1 for the first
    # element).

    $data = ['singer', { beatle => 2 }]
    $picked = assert_type(String,
      # the data we are interested in is the second in the array,
      # a hash, where we want the value of the key 'beatle'
      $data.dig(1, 'beatle')
        # and we want the index in $names before the given index
        .then |$x| { $names[$x-1] }
        # so we can construct a string with that beatle's name
        .then |$x| { "Picked Beatle '${x}'" }
    )
    ```

    Would notice "Picked Beatle 'Paul'", and would raise an error if the result
    was not a String.

    * Since 4.5.0

  DOC
) do |_args|
  Puppet::Parser::Functions::Error.is4x('then')
end