|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
19
 | 
 0  | 
 0  | 
 if ($self->{'trans'}{'_sasl_client'} and not $self->{'trans'}{'_sasl_encode'})  | 
 
| 
37
 | 
 0  | 
 0  | 
 $principal ? :  | 
 
| 
49
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
58
 | 
 0  | 
 0  | 
 unless defined $data  | 
 
| 
60
 | 
 0  | 
 0  | 
 if ($length) { }  | 
 
| 
67
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
73
 | 
 0  | 
 0  | 
 unless $self->{'_transport'} and $self->isOpen  | 
 
| 
74
 | 
 0  | 
 0  | 
 unless $self->isOpen  | 
 
| 
80
 | 
 0  | 
 0  | 
 if $self->{'_transport'} and $self->isOpen  | 
 
| 
88
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
94
 | 
 0  | 
 0  | 
 if ($self->{'_sasl'}->mechanism eq 'GSSAPI') { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($self->{'_sasl'}->mechanism eq 'DIGEST-MD5') { }  | 
 
| 
95
 | 
 0  | 
 0  | 
 unless ($self->{'_principal'})  | 
 
| 
99
 | 
 0  | 
 0  | 
 if (scalar @kerberos_name_split != 3)  | 
 
| 
115
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
121
 | 
 0  | 
 0  | 
 if ($code == 5)  | 
 
| 
123
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
131
 | 
 0  | 
 0  | 
 if ($code == 3 or $code == 4)  | 
 
| 
132
 | 
 0  | 
 0  | 
 $extra_msg ? :  | 
 
| 
140
 | 
 0  | 
 0  | 
 unless (defined $data)  | 
 
| 
141
 | 
 0  | 
 0  | 
 $extra_msg ? :  | 
 
| 
157
 | 
 0  | 
 0  | 
 unless $client->isa('Authen::SASL::XS') or $client->isa('Authen::SASL::Cyrus')  | 
 
| 
161
 | 
 0  | 
 0  | 
 if exists $ENV{'USER'} or exists $ENV{'USERNAME'}  | 
 
| 
177
 | 
 0  | 
 0  | 
 if $self->{'_debug'} > 1  | 
 
| 
186
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
188
 | 
 0  | 
 0  | 
 if &bytes::length($buf) > 0  | 
 
| 
206
 | 
 0  | 
 0  | 
 if ($self->{'_sasl_encode'}) { }  | 
 
| 
208
 | 
 0  | 
 0  | 
 unless my $decoded = $self->{'_sasl_client'}->decode($encoded)  | 
 
| 
226
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
228
 | 
 0  | 
 0  | 
 if ($self->{'_sasl_encode_check'})  | 
 
| 
230
 | 
 0  | 
 0  | 
 if (&bytes::length($encoded) and &bytes::length($encoded) != &bytes::length($self->{'_out_buffer'})) { }  | 
 
| 
234
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
238
 | 
 0  | 
 0  | 
 if $self->{'_debug'}  | 
 
| 
242
 | 
 0  | 
 0  | 
 if ($self->{'_sasl_encode'}) { }  | 
 
| 
263
 | 
 0  | 
 0  | 
 if $self->{'_debug'} > 1  |