File Coverage

blib/lib/WWW/BigDoor/Profile.pm

Criterion	Covered	Total	%
statement	43	48	89.5
branch	4	6	66.6
condition			n/a
subroutine	12	14	85.7
pod	6	6	100.0
total	65	74	87.8

package WWW::BigDoor::Profile;

use strict;
use warnings;

use Data::Dumper;
use Carp;
#use Smart::Comments -ENV;

use WWW::BigDoor::EndUser;
use base qw(WWW::BigDoor::Resource Class::Accessor);

__PACKAGE__->follow_best_practice;
__PACKAGE__->mk_accessors(
    qw(id provider email first_name last_name display_name profile_photo end_user_obj is_saved ) );

sub new {
    my ( $class, $end_user_obj, $args ) = @_;

    my $self = $class->SUPER::new( $args );

    $self->set_is_saved( 0 );
    $self->set_end_user_obj( $end_user_obj );
    return $self;
}

sub get_id {
    my ( $self ) = @_;

    return $self->get_provider() if $self->get_is_saved;

    return;
}

sub end_point {
    my ( $self, $end_user_obj ) = @_;
    my $ep = $self->_end_point;

    unless ( defined $end_user_obj ) {
        croak "Need EndUser object as parameter" unless ref $self;
        $end_user_obj = $self->get_end_user_obj;
    }
    ### end_user_obj: Dumper($end_user_obj)

    my $end_user_login = $end_user_obj->get_end_user_login();
    ### end_user_login: $end_user_login
    ### _end_point: $self->_end_point()
    ### _parent_end_point: $self->_parent_end_point()

    $ep = sprintf '%s/%s/%s', $self->_parent_end_point(), $end_user_login, $self->_end_point();
    ###  ep with parent: $ep
    return $ep;
}

sub save {
    my ( $self, @args ) = @_;
    $self->SUPER::save( @args );
    $self->set_is_saved( 1 );
    return $self;
}

sub load {
    my ( $self, @args ) = @_;
    $self->SUPER::load( @args );
    $self->set_is_saved( 1 );
    return $self;
}

sub remove {
    my $self = shift;
    $self->SUPER::remove( @_ );
    $self->set_is_saved( 0 );
    return $self;
}

sub _parent_end_point { ## no critic (ProhibitUnusedPrivateSubroutines)
    return 'end_user';
}

sub _parent_id_attr { ## no critic (ProhibitUnusedPrivateSubroutines)
    return 'end_user_login';
}

1;
__END__