Branch Coverage

blib/lib/EMDIS/ECS/Config.pm
Criterion Covered Total %
branch 92 118 77.9


line true false branch
61 6 133 unless $attr =~ /[^A-Z]/
65 0 133 unless $EMDIS::ECS::Config::ok_attr{$attr}
78 7 0 unless defined $skip_val
81 0 7 unless defined $cfg_file
85 0 7 if $cfg_file eq ''
87 2 5 if $err
88 0 5 if $skip_val
90 0 5 if $err
92 3 2 if $err
106 0 0 if $attr =~ /PASSWORD|PASSPHRASE/i
120 1 6 unless (open CONFIG, "< $this->{'CFG_FILE'}")
129 6 145 unless length $_
130 28 117 if /^#/
135 0 351 if ($#fields >= 0 and $fields[$#fields] =~ /\\$/) { }
149 116 1 if ($EMDIS::ECS::Config::ok_attr{$attr}) { }
161 1 5 if ($err)
180 5 0 unless file_name_is_absolute($script_dir)
183 5 0 unless file_name_is_absolute($config_dir)
189 286 145 if (exists $this->{$attr})
205 20 9 if exists $this->{$attr} and not $this->{$attr} eq '' and not file_name_is_absolute($this->{$attr})
213 10 0 if exists $this->{$attr} and not file_name_is_absolute($this->{$attr})
218 4 1 if (not defined $this->{'ECS_TO_DIR'} or $this->{'ECS_TO_DIR'} eq '') { }
244 331 109 if (exists $this->{$attr})
253 4 1 unless (defined $this->{'SMTP_PORT'})
255 1 3 if is_yes($this->{'SMTP_USE_SSL'})
256 1 3 if is_yes($this->{'SMTP_USE_STARTTLS'})
260 4 1 unless (defined $this->{'INBOX_PORT'})
263 2 2 if (/POP3/)
265 0 2 if is_yes($this->{'INBOX_USE_SSL'})
267 1 3 if (/IMAP/)
269 1 0 if is_yes($this->{'INBOX_USE_SSL'})
369 4 141 unless exists $this->{$attr}
375 5 0 unless ($this->{'INBOX_PROTOCOL'} =~ /DIRECTORY/i)
380 2 8 unless exists $this->{$attr}
384 2 3 if ($this->{'INBOX_PROTOCOL'} =~ /IMAP/i) { }
2 1 elsif ($this->{'INBOX_PROTOCOL'} =~ /POP3/i) { }
0 1 elsif ($this->{'INBOX_PROTOCOL'} =~ /DIRECTORY/i) { }
0 1 elsif ($this->{'INBOX_PROTOCOL'} =~ /NONE/i) { }
389 0 2 unless defined $this->{'INBOX_FOLDER'}
400 0 0 unless defined $this->{'INBOX_DIRECTORY'}
412 0 5 if (is_yes($this->{'ENABLE_AMQP'}))
422 0 0 unless exists $this->{$attr}
427 1 0 unless (exists $this->{'GPG_HOMEDIR'} or exists $this->{'PGP_HOMEDIR'})
434 4 1 if (exists $this->{'GPG_HOMEDIR'})
442 2 18 unless exists $this->{$attr}
447 3 2 if (exists $this->{'PGP_HOMEDIR'})
455 2 13 unless exists $this->{$attr}
460 1 4 if ($this->{'T_CHK'} <= 0)
467 1 4 if ($this->{'T_SCN'} <= 0)
474 1 4 if ($this->{'T_ADM_REMIND'} <= 0)
482 1 4 if ($this->{'T_MSG_PROC'} <= 0)
492 5 20 if (exists $this->{$name} and not is_yes($this->{$name}) and not is_no($this->{$name}))
500 1 4 if (is_yes($this->{'INBOX_USE_SSL'}) and is_yes($this->{'INBOX_USE_STARTTLS'}))
507 1 4 if (is_yes($this->{'SMTP_USE_SSL'}) and is_yes($this->{'SMTP_USE_STARTTLS'}))
519 0 5 if $this->{'BCK_DIR'} ne 'NONE'
522 4 1 if not defined $this->{'ECS_TO_DIR'} or $this->{'ECS_TO_DIR'} eq ''
523 0 5 if is_yes($this->{'ENABLE_AMQP'})
526 8 51 if (exists $this->{$dir} and not -d $this->{$dir})
534 3 2 if ($#errors >= 0)