File Coverage

blib/lib/OpenTracing/SpanContext.pm

Criterion	Covered	Total	%
statement	15	21	71.4
branch			n/a
condition			n/a
subroutine	5	8	62.5
pod	3	3	100.0
total	23	32	71.8

package OpenTracing::SpanContext;

use strict;
use warnings;

our $VERSION = '1.006'; # VERSION
our $AUTHORITY = 'cpan:TEAM'; # AUTHORITY

use parent qw(OpenTracing::Common);

no indirect;
use utf8;

=encoding utf8

=head1 NAME

OpenTracing::SpanContext - tracks IDs and baggage for spans

=head1 DESCRIPTION

=cut

=head2 span

Returns the L instance that this wraps.

=cut

sub span { shift->{span} }

=head2 log

Writes a log entry to the L.

=cut

sub log { shift->span->log(@_) }

=head2 new_span

Creates a new sub-span under this L instance.

=cut

sub new_span {
    my ($self, $name, %args) = @_;
    my $parent = $self->span;
    @args{qw(trace_id parent_id)} = (
        $parent->trace_id,
        $parent->id,
    );
    $parent->tracer->span(operation_name => $name, %args);
}

=head2 DESTROY

Called on destruction, will mark completion on the span by calling
L.

=cut

1;

__END__