Branch Coverage

lib/Mail/Toaster/Setup/Test.pm
Criterion Covered Total %
branch 0 106 0.0


line true false branch
32 0 0 unless (-x $ibin)
37 0 0 unless open my $INJECT, '|', qq[$ibin -a -f "" $email]
217 0 0 if defined $p{'test_ok'}
228 0 0 unless ($r)
234 0 0 if ($Mail::Toaster::Setup::Test::EVAL_ERROR)
245 0 0 unless (defined $imap)
253 0 0 unless my(@features) = $imap->capability
264 0 0 unless ($imap = 'Mail::IMAPClient'->new('Server', 'localhost', 'User', 'no_such_user', 'Pass', 'hi_there_log_watcher'))
282 0 0 unless ($r)
295 0 0 unless $socket
300 0 0 $r ? :
330 0 0 if ($Mail::Toaster::Setup::Test::EVAL_ERROR)
361 0 0 if $host =~ /system|qmail|all/i
366 0 0 $v->{'ssl'} ? :
369 0 0 if ($v->{'ssl'})
375 0 0 unless (my $socket = 'IO::Socket::SSL'->new('PeerAddr', $host, 'PeerPort', 995, 'SSL_verify_mode', 'SSL_VERIFY_NONE', 'Proto', 'tcp'))
382 0 0 unless $pop->Connect >= 0
398 0 0 if $@
407 0 0 if $host =~ /system|qmail|all/i
411 0 0 unless defined $smtp
424 0 0 unless my $auths = shift()
435 0 0 unless $r
453 0 0 unless my $auths = shift()
498 0 0 unless ($self->util->yes_or_no('skip the mail scanner tests?', 'timeout', 10))
505 0 0 unless ($self->util->yes_or_no('skip the authentication tests?', 'timeout', 10))
528 0 0 unless $self->auth_setup
552 0 0 unless (-e $assign and grep {/:$domain:/;} `cat $assign`)
554 0 0 unless $self->util->yes_or_no('may I add it for you?', 'timeout', 30)
561 0 0 unless open my $ASSIGN, '<', $assign
562 0 0 unless grep {/:$domain:/;} <$ASSIGN>
565 0 0 if ($Mail::Toaster::Setup::Test::OSNAME eq 'freebsd')
566 0 0 unless $self->freebsd->install_port('p5-Mail-POP3Client')
567 0 0 unless $self->freebsd->install_port('p5-Mail-IMAPClient')
568 0 0 unless $self->freebsd->install_port('p5-Net-SMTP_auth')
569 0 0 unless $self->freebsd->install_port('p5-IO-Socket-SSL')
584 0 0 if $self->conf->{'install_sqwebmail'} and -x $sqcache
589 0 0 system($_) ? :
595 0 0 unless my $mess = shift()
599 0 0 if defined $p{'test_ok'}
602 0 0 unless (defined $result)
604 0 0 $result ? :
760 0 0 if $self->conf->{'pop3_daemon'} eq 'qpop3d'
769 0 0 if $self->util->yes_or_no('skip the network listener tests?', 'timeout', 10)
774 0 0 unless $netstat and -x $netstat
776 0 0 if ($Mail::Toaster::Setup::Test::OSNAME eq 'freebsd')
777 0 0 if ($Mail::Toaster::Setup::Test::OSNAME eq 'darwin')
778 0 0 if ($Mail::Toaster::Setup::Test::OSNAME eq 'linux') { }
789 0 0 if $self->conf->{'install_snmp'}
806 0 0 if $Mail::Toaster::Setup::Test::OSNAME eq 'freebsd'
864 0 0 if $self->conf->{'pop3_daemon'} eq 'qpop3d'
867 0 0 if $self->conf->{'submit_enable'}
876 0 0 system("$svok $_") ? :
888 0 0 if ($self->conf->{'install_mysql'} and $self->conf->{'vpopmail_mysql'})