Branch Coverage

blib/lib/Travel/Status/DE/HAFAS.pm
Criterion Covered Total %
branch 41 144 28.4


line true false branch
43 5 0 unless ($ua)
49 0 0 unless ($conf{'station'} or $conf{'journey'} or $conf{'journeyMatch'} or $conf{'geoSearch'} or $conf{'locationSearch'})
62 0 5 unless (defined $service)
66 0 5 if (defined $service and not exists $hafas_instance->{$service})
91 3 2 if ($conf{'journey'}) { }
1 1 elsif ($conf{'journeyMatch'}) { }
0 1 elsif ($conf{'geoSearch'}) { }
0 1 elsif ($conf{'locationSearch'}) { }
103 0 3 $conf{'with_polyline'} ? :
184 0 1 if ($self->{'station'} =~ / ^ [0-9]+ $ /ux) { }
216 0 1 $conf{'arrivals'} ? :
220 0 5 if ($conf{'language'})
233 0 5 if ($self->{'cache'})
242 5 0 if (my $salt = $hafas_instance->{$service}{'salt'})
243 0 5 if ($hafas_instance->{$service}{'micmac'}) { }
253 0 5 if ($conf{'async'})
258 5 0 if ($conf{'json'}) { }
262 0 0 if ($self->{'developer_mode'})
268 0 0 if ($error)
273 0 0 if ($self->{'developer_mode'})
282 3 2 if ($conf{'journey'}) { }
1 1 elsif ($conf{'journeyMatch'}) { }
0 1 elsif ($conf{'geoSearch'} or $conf{'locationSearch'}) { }
302 0 0 unless ($conf{'station'} or $conf{'journey'} or $conf{'journeyMatch'} or $conf{'geoSearch'} or $conf{'locationSearch'})
323 0 0 if ($conf{'journey'}) { }
0 0 elsif ($conf{'journeyMatch'}) { }
0 0 elsif ($conf{'geoSearch'} or $conf{'locationSearch'}) { }
335 0 0 if ($self->errstr) { }
365 20 0 if (ref $hafas_instance->{$service}{'productbits'}[$i] eq 'ARRAY') { }
373 0 2 if (my(@mots) = @{$self->{'exclusive_mots'} // [];})
376 0 0 if (exists $mot_pos{$mot}) { }
0 0 elsif ($mot =~ / ^ \d+ $ /ux) { }
385 0 2 if (my(@mots) = @{$self->{'excluded_mots'} // [];})
387 0 0 if (exists $mot_pos{$mot}) { }
0 0 elsif ($mot =~ / ^ \d+ $ /ux) { }
403 0 0 if ($self->{'developer_mode'})
407 0 0 if ($cache)
409 0 0 if ($content and not $content =~ / CGI_NO_SERVER | CGI_READ_FAILED /ux)
412 0 0 if ($self->{'developer_mode'})
419 0 0 if ($self->{'developer_mode'})
429 0 0 if ($reply->is_error)
434 0 0 if ($cache)
445 0 0 if ($self->{'developer_mode'})
451 0 0 if ($cache)
453 0 0 if ($content)
454 0 0 if ($self->{'developer_mode'})
461 0 0 if ($self->{'developer_mode'})
468 0 0 if (my $err = $tx->error)
474 0 0 if ($cache)
494 0 5 if ($self->{'raw_json'}{'err'} and $self->{'raw_json'}{'err'} ne 'OK') { }
0 5 elsif (defined $self->{'raw_json'}{'cInfo'}{'code'} and $self->{'raw_json'}{'cInfo'}{'code'} ne 'OK' and $self->{'raw_json'}{'cInfo'}{'code'} ne 'VH') { }
0 5 elsif (@{$self->{'raw_json'}{'svcResL'} // [];} == 0) { }
0 5 elsif ($self->{'raw_json'}{'svcResL'}[0]{'err'} ne 'OK') { }
524 0 32 if ($is_him)
530 0 32 if ($code eq "OPERATOR")
535 1 147 if ($code eq $message->{'code'} and $text eq $message->{'text'})
569 0 0 if ($self->{'errstr'})
575 0 0 if ($self->{'raw_json'}{'svcResL'}[0]{'res'}{'match'})
588 0 3 if ($self->{'errstr'})
602 0 3 if ($journey->{'polyG'} and @{$journey->{'polyG'}{'polyXL'} // [];})
607 0 3 if ($poly)
635 0 1 if ($self->{'errstr'})
666 0 1 if ($self->{'errstr'})
689 0 30 if ($@)
690 0 0 if ($@ =~ /Invalid local time for date in time zone/u) { }
725 0 0 if ($service and exists $hafas_instance->{$service}{'stopfinder'})
733 0 0 if (my $err = $sf->errstr)
747 0 0 if ($service and exists $hafas_instance->{$service}{'stopfinder'})
765 0 0 if ($self->{'station_info'})
788 0 0 unless (@shortest_names)
834 0 0 if (defined $service and exists $hafas_instance->{$service})
843 39 0 if (defined $self->{'active_service'})