File Coverage

blib/lib/OpenTracing/Implementation/NoOp/Tracer.pm
Criterion Covered Total %
statement 13 20 65.0
branch 1 2 50.0
condition n/a
subroutine 5 12 41.6
pod 0 7 0.0
total 19 41 46.3


line stmt bran cond sub pod time code
1             package OpenTracing::Implementation::NoOp::Tracer;
2              
3             =head1 NAME
4              
5             OpenTracing::Implementation::NoOp::Tracer - NoOp, so code won't break!
6              
7             =head1 DESCRIPTION
8              
9             Objects of this class implement the required methods of the
10             L<OpenTracing::Interface::Tracer>, to be compliant during testing and allow
11             applications to continue working without having to catch exceptions all the
12             time.
13              
14             None of the methods will do anything useful.
15              
16             =cut
17              
18             our $VERSION = 'v0.72.1';
19              
20              
21              
22 2     2   344841 use OpenTracing::Implementation::NoOp::Scope;
  2         6  
  2         64  
23 2     2   927 use OpenTracing::Implementation::NoOp::ScopeManager;
  2         5  
  2         62  
24 2     2   14 use OpenTracing::Implementation::NoOp::Span;
  2         6  
  2         292  
25              
26              
27 0     0 0   sub new { bless {} }
28              
29              
30             sub get_scope_manager {
31 0     0 0   OpenTracing::Implementation::NoOp::ScopeManager->new( )
32             }
33              
34             sub get_active_span {
35 0     0 0   OpenTracing::Implementation::NoOp::Span->new( )
36             }
37              
38             sub start_active_span {
39 0     0 0   OpenTracing::Implementation::NoOp::Scope->new( )
40             }
41              
42             sub start_span {
43 0     0 0   OpenTracing::Implementation::NoOp::Span->new( )
44             }
45              
46 0     0 0   sub inject_context { $_[1] } # carrier
47              
48 0     0 0   sub extract_context { undef }
49              
50              
51              
52             BEGIN {
53 2     2   14 use Role::Tiny::With;
  2         5  
  2         113  
54             with 'OpenTracing::Interface::Tracer'
55 2 50   2   72 if $ENV{OPENTRACING_INTERFACE};
56             } # check at compile time, perl -c will work
57              
58              
59              
60             1;