Branch Coverage

blib/lib/Unix/Conf/Bind8/Conf/Zone.pm

Criterion	Covered	Total	%
branch	0	230	0.0

line	true	false	branch
96	0	0	if ($zone->type eq 'master')
97	0	0	unless $zone->file
99	0	0	if $zone->masters
102	0	0	if ($zone->type eq 'slave')
103	0	0	unless $zone->masters
106	0	0	if ($zone->type eq 'forward')
107	0	0	if $zone->masters
109	0	0	unless $zone->forward
111	0	0	unless $zone->forwarders
115	0	0	if $errmsg
127	0	0	if ($self->__defined_class) { }
134	0	0	if $tmp = $self->file
136	0	0	if ($tmp = $self->masters)
138	0	0	defined $$tmp[0] ? :
142	0	0	if $tmp = $self->forward
145	0	0	if ($tmp = $self->forwarders)
149	0	0	if @$tmp
153	0	0	if $tmp = $self->check_names
156	0	0	if $tmp = $self->notify
159	0	0	if ($tmp = $self->also_notify)
162	0	0	if @$tmp
169	0	0	if $tmp = $self->allow_update
171	0	0	if $tmp = $self->allow_query
173	0	0	if $tmp = $self->allow_transfer
177	0	0	if $tmp = $self->pubkey
254	0	0	unless $args{'NAME'}
255	0	0	unless $args{'PARENT'}
256	0	0	$args{'WHERE'} ? :
258	0	0	unless $ret = $new->_parent($args{'PARENT'})
259	0	0	unless $ret = $new->name($args{'NAME'})
266	0	0	unless defined $ZoneDirectives{$meth}
269	0	0	if ($_ eq 'MASTERS')
270	0	0	unless $ret = $new->$meth(%{$args{$_};})
273	0	0	unless $ret = $new->$meth($args{$_})
275	0	0	unless $ret = Unix::Conf::Bind8::Conf::_insert_in_list($new, $where, $warg)
297	0	0	if (defined $name)
302	0	0	if ($$self{'name'})
303	0	0	unless $ret = Unix::Conf::Bind8::Conf::_del_zone($self)
306	0	0	unless $ret = Unix::Conf::Bind8::Conf::_add_zone($self)
330	0	0	if (defined $class)
331	0	0	unless $class =~ /^(in|hs|hesoid|chaos)$/i
336	0	0	defined $$self{'class'} ? :
358	0	0	if (defined $file)
366	0	0	defined $$self{'file'} ? :
387	0	0	if (defined $type)
388	0	0	unless $type =~ /^(hint|master|slave|stub|forward)$/
601	0	0	if (@_)
602	0	0	if (ref $_[0]) { }
604	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
615	0	0	unless __valid_ipaddress $_
626	0	0	defined $$self{$dir} ? :
635	0	0	if (@_)
636	0	0	if (ref $_[0]) { }
638	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
649	0	0	unless __valid_ipaddress $_
652	0	0	if $$self{$dir}{$_}
666	0	0	if (@_)
667	0	0	if (ref $_[0]) { }
669	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
680	0	0	unless __valid_ipaddress $_
683	0	0	unless $$self{$dir}{$_}
689	0	0	unless keys %{$$self{$dir};}
704	0	0	if (@_)
705	0	0	if (ref $_[0]) { }
706	0	0	if (UNIVERSAL::isa($_[0], 'Unix::Conf::Bind8::Conf::Acl')) { }
	0	0	elsif (UNIVERSAL::isa($_[0], 'ARRAY')) { }
715	0	0	unless @{$_[0];}
733	0	0	unless $acl = 'Unix::Conf::Bind8::Conf::Acl'->new('PARENT', $self->_parent, 'ELEMENTS', $elements)
741	0	0	defined $$self{$dir} ? :
752	0	0	unless @_
755	0	0	if (ref $_[0]) { }
757	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
762	0	0	unless @{$_[0];}
768	0	0	unless defined $$self{$dir}
771	0	0	unless $ret = $$self{$dir}->add_elements($elements)
781	0	0	unless @_
784	0	0	if (ref $_[0]) { }
786	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
791	0	0	unless @{$_[0];}
798	0	0	unless defined $$self{$dir}
800	0	0	unless $ret = $$self{$dir}->delete_elements($elements)
803	0	0	unless @{$$self{$dir}->elements;}
810	0	0	defined $_[0]{$dir} ? :
821	0	0	if (defined $arg)
823	0	0	unless &{$ZoneDirectives{$dir};}($arg)
829	0	0	defined $$self{$dir} ? :
840	0	0	unless defined $_[0]{$dir}
869	0	0	if (@_)
873	0	0	if (defined $args{'PORT'})
874	0	0	unless __valid_port($args{'PORT'})
879	0	0	unless __valid_ipaddress $_
887	0	0	unless $$self{'masters'}
897	0	0	if (@_)
898	0	0	if (ref $_[0]) { }
900	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
911	0	0	unless __valid_ipaddress $_
914	0	0	if $$self{'masters'}[1]{$_}
929	0	0	if (@_)
930	0	0	if (ref $_[0]) { }
932	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
943	0	0	unless __valid_ipaddress $_
946	0	0	unless $$self{'masters'}[1]{$_}
952	0	0	unless keys %{$$self{'masters'}[1];}
976	0	0	if (defined $port)
977	0	0	unless __valid_port $port
984	0	0	defined $$self{'masters'}[0] ? :
1004	0	0	defined $$self{'pubkey'} ? :
	0	0	unless @_
1008	0	0	if (ref $_[0]) { }
	0	0	elsif (@_ == 4) { }
1009	0	0	unless UNIVERSAL::isa($_[0], 'ARRAY')
1045	0	0	unless $dir
1048	0	0	unless $dir =~ /^(type|file|masters|check-names|allow-update|allow-query|allow-transfer|forward|forwarders|transfer-source|max-transfer-time-in|notify|also-notify)$/
1050	0	0	if $dir =~ /^(name|type)$/
1073	0	0	unless defined $secure_open