line |
true |
false |
branch |
63
|
0 |
0 |
if (defined $_[1]) |
100
|
0 |
0 |
unless (defined $$self{'args'}{'file'}) |
105
|
0 |
0 |
unless (-f $$self{'args'}{'file'}) |
106
|
0 |
0 |
if (open *CREATECONFIG, '>', $$self{'args'}{'file'}) { } |
118
|
0 |
0 |
if (open *READZCONFZML, $$self{'args'}{'file'}) { } |
130
|
0 |
0 |
if ($$zml{'error'}) |
142
|
0 |
0 |
if (defined $$self{'zconf'}{'defaultChooser'}) { } |
145
|
0 |
0 |
if ($success) { } |
148
|
0 |
0 |
if (setNameLegit($choosen)) { } |
157
|
0 |
0 |
if (defined $$self{'zconf'}{'default'}) { } |
166
|
0 |
0 |
if (not defined $$self{'zconf'}{'fileonly'}) { } |
172
|
0 |
0 |
if ($$self{'args'}{'fileonly'} eq '0') { } |
176
|
0 |
0 |
if (defined $$self{'zconf'}{'backendChooser'}) { } |
178
|
0 |
0 |
if ($success) { } |
181
|
0 |
0 |
if (defined {$$self{'zconf'}{'backend'}}) { } |
188
|
0 |
0 |
if (defined $$self{'zconf'}{'backend'}) { } |
205
|
0 |
0 |
if ($beTest eq $$self{'args'}{'backend'}) |
212
|
0 |
0 |
unless ($backendLegit) |
225
|
0 |
0 |
if ($self->error or not defined $backend) { } |
226
|
0 |
0 |
if ($self->error) { } |
234
|
0 |
0 |
if ($backend->error) { } |
243
|
0 |
0 |
if ($$self{'args'}{'backend'} ne 'file') |
245
|
0 |
0 |
if ($self->error or $backend->error) |
254
|
0 |
0 |
if (defined $$self{'be'}) { } |
292
|
0 |
0 |
if (defined $error) |
302
|
0 |
0 |
if ($chooserstring eq '') |
306
|
0 |
0 |
if ($chooserstring eq "\n") |
312
|
0 |
0 |
unless (defined $choosen) |
316
|
0 |
0 |
unless ($self->setNameLegit($choosen)) |
349
|
0 |
0 |
if (defined $error) |
359
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
361
|
0 |
0 |
if ($$self{'fbe'}->error) |
398
|
0 |
0 |
unless (defined $name) |
403
|
0 |
0 |
if ($name =~ /,/) |
408
|
0 |
0 |
if ($name =~ m[/\.]) |
413
|
0 |
0 |
if ($name =~ m[//]) |
418
|
0 |
0 |
if ($name =~ m[\.\./]) |
423
|
0 |
0 |
if ($name =~ m[/\.\.]) |
428
|
0 |
0 |
if ($name =~ m[^\./]) |
433
|
0 |
0 |
if ($name =~ m[/$]) |
438
|
0 |
0 |
if ($name =~ m[^/]) |
443
|
0 |
0 |
if ($name =~ /\n/) |
472
|
0 |
0 |
if (defined $error) |
483
|
0 |
0 |
if ($$self{'be'}->error) |
492
|
0 |
0 |
if (defined $$self{'fbe'}) |
494
|
0 |
0 |
unless ($$self{'fbe'}->configExists($config)) |
496
|
0 |
0 |
if ($$self{'fbe'}->error) |
528
|
0 |
0 |
if (defined $error) |
536
|
0 |
0 |
unless ($self->configExists($config)) |
545
|
0 |
0 |
if (defined $$self{'error'}) |
551
|
0 |
0 |
if ($self->error) |
559
|
0 |
0 |
if ($set eq $sets[$int]) |
588
|
0 |
0 |
unless (defined $config) |
598
|
0 |
0 |
if (defined $$self{'error'}) |
601
|
0 |
0 |
if (defined $subs[0]) |
610
|
0 |
0 |
if ($$self{'be'}->error) |
618
|
0 |
0 |
if (defined $$self{'fbe'}) |
620
|
0 |
0 |
if ($$self{'fbe'}->configExists($config)) |
622
|
0 |
0 |
if ($$self{'fbe'}->error) |
653
|
0 |
0 |
unless (defined $set) |
661
|
0 |
0 |
unless (defined $config) |
671
|
0 |
0 |
if (defined $$self{'error'}) |
680
|
0 |
0 |
if ($$self{'be'}->error) |
688
|
0 |
0 |
if (defined $$self{'fbe'}) |
690
|
0 |
0 |
if ($$self{'fbe'}->setExists) |
692
|
0 |
0 |
if ($$self{'fbe'}->error) |
722
|
0 |
0 |
unless (defined $config) |
729
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
749
|
0 |
0 |
if (defined $$zml{'error'}) |
824
|
0 |
0 |
unless (defined $config) |
828
|
0 |
0 |
if (defined $$self{'autoupdate'}{$config}) |
856
|
0 |
0 |
if (defined $error) |
864
|
0 |
0 |
unless ($self->configExists($config)) |
874
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'} and defined $$self{'fbe'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
879
|
0 |
0 |
if ($$self{'fbe'}->error) |
930
|
0 |
0 |
unless (defined $$self{'comment'}{$config}) |
960
|
0 |
0 |
unless (defined $config) |
968
|
0 |
0 |
unless ($self->configExists($config)) |
978
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'} and defined $$self{'fbe'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
983
|
0 |
0 |
if ($$self{'fbe'}->error) |
1031
|
0 |
0 |
unless (defined $config) |
1039
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1047
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}) |
1051
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}{'ctime'}) |
1079
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1110
|
0 |
0 |
unless (defined $config) |
1118
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1171
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1217
|
0 |
0 |
unless (defined $config) |
1225
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1233
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}) |
1237
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}{'mtime'}) |
1269
|
0 |
0 |
unless (defined $config) |
1276
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1285
|
0 |
0 |
if (defined $$self{'meta'}{$config}{'zconf'} and defined $$self{'meta'}{$config}{'zconf'}{'override/chooser'}) |
1309
|
0 |
0 |
unless (defined $config) |
1316
|
0 |
0 |
unless (defined $$self{'set'}{$config}) |
1350
|
0 |
0 |
if (defined $error) |
1360
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'} and defined $$self{'fbe'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
1365
|
0 |
0 |
if ($$self{'fbe'}->error) |
1412
|
0 |
0 |
unless (defined $config) |
1420
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1428
|
0 |
0 |
unless (defined $var) |
1436
|
0 |
0 |
unless (defined $comment) |
1444
|
0 |
0 |
unless (defined $$self{'comment'}{$config}{$var}) |
1447
|
0 |
0 |
unless (defined $$self{'comment'}{$config}{$var}{$comment}) |
1486
|
0 |
0 |
unless (defined $config) |
1494
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1502
|
0 |
0 |
unless (defined $var) |
1510
|
0 |
0 |
unless (defined $meta) |
1518
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}) |
1521
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}{$meta}) |
1558
|
0 |
0 |
unless (defined $config) |
1566
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1574
|
0 |
0 |
unless (defined $var) |
1582
|
0 |
0 |
unless (defined $$self{'conf'}{$config}{$var}) |
1612
|
0 |
0 |
unless (defined $backend) |
1625
|
0 |
0 |
unless (defined $be) |
1655
|
0 |
0 |
unless (defined $config) |
1663
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
1670
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
1696
|
0 |
0 |
unless (defined $config) |
1703
|
0 |
0 |
if (defined $$self{'conf'}{$config}) |
1735
|
0 |
0 |
unless (defined $config) |
1744
|
0 |
0 |
if ($$self{'error'}) |
1748
|
0 |
0 |
unless ($exists) |
1758
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'} and defined $$self{'fbe'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
1763
|
0 |
0 |
if ($$self{'fbe'}->error) |
1794
|
0 |
0 |
if (ref $$self{'be'} eq 'ZConf::backends::ldap') { } |
1796
|
0 |
0 |
if ($$self{'be'}->error) |
1846
|
0 |
0 |
if (defined $_[1]) |
1858
|
0 |
0 |
unless (defined $args{'config'}) |
1866
|
0 |
0 |
if (defined $$self{'locked'}{$args{'config'}}) |
1874
|
0 |
0 |
unless (defined $$self{'conf'}{$args{'config'}}) |
1882
|
0 |
0 |
unless (defined $args{'profile'}) |
1883
|
0 |
0 |
if (defined $$self{'meta'}{$args{'config'}}{'zconf'} and defined $$self{'meta'}{$args{'config'}}{'zconf'}{'override/chooser'}) { } |
1889
|
0 |
0 |
if ($chooser ne '') { } |
1893
|
0 |
0 |
if ($success) { } |
1908
|
0 |
0 |
unless ($self->setNameLegit($args{'profile'})) |
1979
|
0 |
0 |
unless (defined $args{'config'}) |
1988
|
0 |
0 |
if (defined $error) |
1996
|
0 |
0 |
unless ($self->configExists($args{'config'})) |
2004
|
0 |
0 |
unless (defined $args{'set'}) |
2006
|
0 |
0 |
if (defined $$self{'error'}) |
2017
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'} and defined $$self{'fbe'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
2022
|
0 |
0 |
if ($$self{'fbe'}->error) |
2033
|
0 |
0 |
if (defined $$self{'fbe'} and not $$self{'be'}->error) |
2038
|
0 |
0 |
if ($$self{'fbe'}->error) |
2067
|
0 |
0 |
unless (defined $config) |
2076
|
0 |
0 |
if (defined $error) |
2084
|
0 |
0 |
unless ($self->configExists($config)) |
2094
|
0 |
0 |
if ($$self{'be'}->error and $$self{'args'}{'readfallthrough'} and defined $$self{'fbe'}) { } |
|
0 |
0 |
elsif ($$self{'be'}->error) { } |
2099
|
0 |
0 |
if ($$self{'fbe'}->error) |
2110
|
0 |
0 |
if (defined $$self{'fbe'} and not $$self{'be'}->error) |
2115
|
0 |
0 |
if ($$self{'fbe'}->error) |
2161
|
0 |
0 |
if (defined $_[1]) |
2171
|
0 |
0 |
unless (defined $args{'config'}) |
2179
|
0 |
0 |
unless ($self->isConfigLoaded($args{'config'})) |
2188
|
0 |
0 |
unless (defined $args{'varRegex'}) |
2196
|
0 |
0 |
if (defined $$self{'locked'}{$args{'config'}}) |
2211
|
0 |
0 |
if ($vars[$varsInt] =~ /$args{'varRegex'}/) |
2217
|
0 |
0 |
if ($$self{'comment'}{$args{'config'}}{$vars[$varsInt]}{$comments[$commentsInt]} =~ /$args{'commentRegex'}/) |
2219
|
0 |
0 |
unless (defined $returned{$vars[$varsInt]}) |
2275
|
0 |
0 |
if (defined $_[1]) |
2285
|
0 |
0 |
unless (defined $args{'config'}) |
2293
|
0 |
0 |
unless ($self->isConfigLoaded($args{'config'})) |
2301
|
0 |
0 |
unless (defined $args{'varRegex'}) |
2316
|
0 |
0 |
if ($vars[$varsInt] =~ /$args{'varRegex'}/) |
2322
|
0 |
0 |
if ($$self{'comment'}{$args{'config'}}{$vars[$varsInt]}{$comments[$commentsInt]} =~ /$args{'commentRegex'}/) |
2324
|
0 |
0 |
unless (defined $returned{$vars[$varsInt]}) |
2379
|
0 |
0 |
if (defined $_[1]) |
2389
|
0 |
0 |
unless (defined $args{'config'}) |
2397
|
0 |
0 |
unless ($self->isConfigLoaded($args{'config'})) |
2405
|
0 |
0 |
unless (defined $args{'varRegex'}) |
2413
|
0 |
0 |
if (defined $$self{'locked'}{$args{'config'}}) |
2428
|
0 |
0 |
if ($vars[$varsInt] =~ /$args{'varRegex'}/) |
2434
|
0 |
0 |
if ($$self{'meta'}{$args{'config'}}{$vars[$varsInt]}{$metas[$metasInt]} =~ /$args{'metaRegex'}/) |
2436
|
0 |
0 |
unless (defined $returned{$vars[$varsInt]}) |
2492
|
0 |
0 |
if (defined $_[1]) |
2502
|
0 |
0 |
unless (defined $args{'config'}) |
2510
|
0 |
0 |
unless ($self->isConfigLoaded($args{'config'})) |
2518
|
0 |
0 |
unless (defined $args{'varRegex'}) |
2533
|
0 |
0 |
if ($vars[$varsInt] =~ /$args{'varRegex'}/) |
2539
|
0 |
0 |
if ($$self{'meta'}{$args{'config'}}{$vars[$varsInt]}{$metas[$metasInt]} =~ /$args{'metaRegex'}/) |
2541
|
0 |
0 |
unless (defined $returned{$vars[$varsInt]}) |
2584
|
0 |
0 |
unless (defined $config) |
2592
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
2600
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
2613
|
0 |
0 |
if ($keys[$int] =~ /$regex/) |
2651
|
0 |
0 |
unless (defined $config) |
2659
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
2672
|
0 |
0 |
if ($keys[$int] =~ /$regex/) |
2708
|
0 |
0 |
unless (defined $config) |
2716
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
2729
|
0 |
0 |
if ($keys[$int] =~ /$regex/) |
2758
|
0 |
0 |
unless (defined $config) |
2766
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
2775
|
0 |
0 |
if ($$self{'error'}) |
2782
|
0 |
0 |
if ($$self{'error'}) |
2814
|
0 |
0 |
unless (defined $config) |
2850
|
0 |
0 |
unless (defined $config) |
2858
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
2866
|
0 |
0 |
unless (defined $comment) |
2875
|
0 |
0 |
if (defined $error) |
2884
|
0 |
0 |
if (defined $error) |
2893
|
0 |
0 |
if (defined $error) |
2901
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
2908
|
0 |
0 |
unless (defined $$self{'comment'}{$config}{$var}) |
2935
|
0 |
0 |
if ($self->setNameLegit($set)) { } |
2973
|
0 |
0 |
unless (defined $set) |
2975
|
0 |
0 |
if ($$self{'error'}) |
2985
|
0 |
0 |
if (defined $$self{'error'}) |
2994
|
0 |
0 |
if ($sets[$setsInt] eq $set) |
3041
|
0 |
0 |
unless (defined $config) |
3050
|
0 |
0 |
if ($self->error) |
3054
|
0 |
0 |
unless ($exists) |
3064
|
0 |
0 |
if ($$self{'be'}->error) |
3071
|
0 |
0 |
if (defined $$self{'fbe'}) |
3073
|
0 |
0 |
if ($$self{'fbe'}->error) |
3108
|
0 |
0 |
unless (defined $config) |
3116
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
3124
|
0 |
0 |
unless (defined $meta) |
3133
|
0 |
0 |
if (defined $error) |
3142
|
0 |
0 |
if (defined $error) |
3150
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
3157
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}) |
3188
|
0 |
0 |
unless (defined $set) |
3193
|
0 |
0 |
if ($set =~ m[/]) |
3198
|
0 |
0 |
if ($set =~ /^\./) |
3203
|
0 |
0 |
if ($set =~ /^ /) |
3208
|
0 |
0 |
if ($set =~ / $/) |
3213
|
0 |
0 |
if ($set =~ /\.\./) |
3247
|
0 |
0 |
unless (defined $config) |
3255
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
3263
|
0 |
0 |
unless (defined $chooser) |
3271
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
3279
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
3286
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{'zconf'}) |
3321
|
0 |
0 |
unless (defined $config) |
3329
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
3338
|
0 |
0 |
if (defined $error) |
3346
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
3353
|
0 |
0 |
unless (defined $var) |
3363
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}) |
3369
|
0 |
0 |
unless (defined $$self{'meta'}{$config}{$var}{'ctime'}) |
3396
|
0 |
0 |
unless (defined $config) |
3403
|
0 |
0 |
if (not defined $$self{'conf'}{$config}) { } |
3408
|
0 |
0 |
if (defined $$self{'set'}{$config}) |
3417
|
0 |
0 |
if (defined $$self{'set'}{$config}) |
3422
|
0 |
0 |
if (defined $$self{'locked'}{$config}) |
3427
|
0 |
0 |
if (defined $$self{'meta'}{$config}) |
3432
|
0 |
0 |
if (defined $$self{'comment'}{$config}) |
3437
|
0 |
0 |
if (defined $$self{'revision'}{$config}) |
3466
|
0 |
0 |
unless (defined $config) |
3474
|
0 |
0 |
unless ($self->isConfigLoaded($config)) |
3482
|
0 |
0 |
if ($$self{'error'}) |
3490
|
0 |
0 |
unless (defined $backendRev) |
3497
|
0 |
0 |
unless (defined $loadedRev) |
3502
|
0 |
0 |
if ($backendRev ne $loadedRev) |
3549
|
0 |
0 |
if (defined $_[1]) |
3556
|
0 |
0 |
unless (defined $args{'config'}) |
3564
|
0 |
0 |
unless ($self->isConfigLoaded($args{'config'})) |
3572
|
0 |
0 |
if ($args{'autocheck'}) |
3574
|
0 |
0 |
unless ($autoupdate) |
3581
|
0 |
0 |
if ($self->error) |
3587
|
0 |
0 |
unless ($updatable) |
3593
|
0 |
0 |
if ($self->error) |
3596
|
0 |
0 |
if ($args{'clearerror'}) |
3623
|
0 |
0 |
unless (defined $name) |
3628
|
0 |
0 |
if ($name =~ /,/) |
3633
|
0 |
0 |
if ($name =~ m[/\.]) |
3638
|
0 |
0 |
if ($name =~ m[//]) |
3643
|
0 |
0 |
if ($name =~ m[\.\./]) |
3648
|
0 |
0 |
if ($name =~ m[/\.\.]) |
3653
|
0 |
0 |
if ($name =~ m[^\./]) |
3658
|
0 |
0 |
if ($name =~ m[/$]) |
3663
|
0 |
0 |
if ($name =~ m[^/]) |
3668
|
0 |
0 |
if ($name =~ /\n/) |
3673
|
0 |
0 |
if ($name =~ /=/) |
3706
|
0 |
0 |
unless (defined $config) |
3714
|
0 |
0 |
unless (defined $chooserstring) |
3723
|
0 |
0 |
if (defined $error) |
3731
|
0 |
0 |
unless ($self->configExists($config)) |
3740
|
0 |
0 |
if ($$self{'error'}) |
3744
|
0 |
0 |
if ($locked) |
3754
|
0 |
0 |
if ($$self{'be'}->error) |
3761
|
0 |
0 |
if (defined $$self{'fbe'}) |
3763
|
0 |
0 |
if ($$self{'fbe'}->error) |
3818
|
0 |
0 |
unless (defined $args{'config'}) |
3827
|
0 |
0 |
if (defined $error) |
3835
|
0 |
0 |
unless ($self->configExists($args{'config'})) |
3844
|
0 |
0 |
if ($$self{'error'}) |
3848
|
0 |
0 |
if ($locked) |
3856
|
0 |
0 |
unless (defined $args{'set'}) |
3861
|
0 |
0 |
unless (defined $args{'revision'}) |
3868
|
0 |
0 |
if ($$self{'be'}->error) |
3875
|
0 |
0 |
if (defined $$self{'fbe'}) |
3877
|
0 |
0 |
if ($$self{'fbe'}->error) |
3928
|
0 |
0 |
unless (defined $args{'config'}) |
3935
|
0 |
0 |
unless ($self->isConfigLoaded($args{'config'})) |
3944
|
0 |
0 |
if ($$self{'error'}) |
3948
|
0 |
0 |
if ($locked) |
3956
|
0 |
0 |
if (not defined $args{'set'}) { } |
3959
|
0 |
0 |
if ($self->setNameLegit($args{'set'})) { } |
3970
|
0 |
0 |
unless (defined $args{'revision'}) |
3977
|
0 |
0 |
if ($$self{'be'}->error) |
3984
|
0 |
0 |
if (defined $$self{'fbe'}) |
3986
|
0 |
0 |
if ($$self{'fbe'}->error) |
4041
|
0 |
0 |
unless (defined $args{'config'}) |
4049
|
0 |
0 |
unless (defined $args{'zml'}) |
4055
|
0 |
0 |
if (ref $args{'zml'} ne 'ZML') |
4064
|
0 |
0 |
if ($$self{'error'}) |
4068
|
0 |
0 |
if ($locked) |
4076
|
0 |
0 |
if (not defined $args{'set'}) { } |
4079
|
0 |
0 |
if ($self->setNameLegit($args{'set'})) { } |
4090
|
0 |
0 |
unless (defined $args{'revision'}) |
4097
|
0 |
0 |
if ($$self{'be'}->error) |
4104
|
0 |
0 |
if (defined $$self{'fbe'}) |
4106
|
0 |
0 |
if ($$self{'fbe'}->error) |