File Coverage

blib/lib/CatalystX/OAuth2/Schema/Result/RefreshTokenToAccessToken.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package CatalystX::OAuth2::Schema::Result::RefreshTokenToAccessToken;
2 8     8   4825 use parent 'DBIx::Class';
  8         25  
  8         67  
3              
4             # ABSTRACT: A table for registering refresh tokens
5              
6             __PACKAGE__->load_components(qw(Core));
7             __PACKAGE__->table('refresh_token_to_access_token');
8             __PACKAGE__->add_columns(
9             access_token_id => { data_type => 'int', is_nullable => 0 },
10             code_id => { data_type => 'int', is_nullable => 0 },
11             refresh_token_id => { data_type => 'int', is_nullable => 0 },
12             );
13             __PACKAGE__->set_primary_key(qw(access_token_id code_id refresh_token_id));
14              
15             __PACKAGE__->belongs_to( code => 'CatalystX::OAuth2::Schema::Result::Code' =>
16             { 'foreign.id' => 'self.code_id' } );
17             __PACKAGE__->belongs_to(
18             access_token => 'CatalystX::OAuth2::Schema::Result::Token' => {
19             'foreign.id' => 'self.access_token_id',
20             'foreign.code_id' => 'self.code_id'
21             }
22             );
23             __PACKAGE__->belongs_to(
24             refresh_token => 'CatalystX::OAuth2::Schema::Result::RefreshToken' => {
25             'foreign.id' => 'self.refresh_token_id',
26             'foreign.code_id' => 'self.code_id'
27             }
28             );
29              
30             __PACKAGE__->add_unique_constraint( [qw(access_token_id code_id)] );
31             __PACKAGE__->add_unique_constraint( [qw(refresh_token_id code_id)] );
32              
33             1;
34              
35             __END__
36              
37             =pod
38              
39             =head1 NAME
40              
41             CatalystX::OAuth2::Schema::Result::RefreshTokenToAccessToken - A table for registering refresh tokens
42              
43             =head1 VERSION
44              
45             version 0.001007
46              
47             =head1 AUTHOR
48              
49             Eden Cardim <edencardim@gmail.com>
50              
51             =head1 COPYRIGHT AND LICENSE
52              
53             This software is copyright (c) 2017 by Suretec Systems Ltd.
54              
55             This is free software; you can redistribute it and/or modify it under
56             the same terms as the Perl 5 programming language system itself.
57              
58             =cut