File: readstringarrayidx.cf

package info (click to toggle)
cfengine3 3.24.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 37,552 kB
  • sloc: ansic: 163,161; sh: 10,296; python: 2,950; makefile: 1,744; lex: 784; yacc: 633; perl: 211; pascal: 157; xml: 21; sed: 13
file content (59 lines) | stat: -rw-r--r-- 1,476 bytes parent folder | download | duplicates (7)
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
# Redmine#2926: test long lines with readstringarrayidx()

body common control
{
      inputs => { "../../default.cf.sub" };
      bundlesequence => { default("$(this.promise_filename)") };
      version => "1.0";
}

bundle agent init
{
}

bundle agent test
{
  vars:
      "dim" int => readstringarrayidx("parms",
                                      "$(this.promise_filename).txt",
                                      "\s*#[^\n]*",
                                      ";",
                                      9999,
                                      99999);
      "pk" slist   => getindices("parms");

  reports:
    DEBUG::
      "$(parms[$(pk)]): $(parms[$(pk)][0]) $(parms[$(pk)][16])";
}

bundle agent check
{
  vars:
      "length" int => length("test.pk");
      "last" string => nth("test.value", 599);
  classes:
      "ok1" expression => strcmp("$(test.dim)", "3");
      "ok2" expression => strcmp("$(test.dim)", "$(length)");
      "ok3" expression => strcmp("$(test.parms[2][0])", "not_working_app_config");
      "ok" and => { "ok1", "ok2", "ok3" };

  reports:
    DEBUG.ok1::
      "passed1";
    DEBUG.ok2::
      "passed2";
    DEBUG.ok3::
      "passed3";
    DEBUG.!ok1::
      "failed1 $(test.dim) != 3";
    DEBUG.!ok2::
      "failed2 $(test.dim) != $(length)";
    DEBUG.!ok3::
      "failed3 $(test.parms[2][0]) != not_working_app_config";

    ok::
      "$(this.promise_filename) Pass";
    !ok::
      "$(this.promise_filename) FAIL";
}