File Coverage

blib/lib/SBOM/CycloneDX/Enum/CryptoPadding.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 0 1 0.0
total 27 28 96.4


line stmt bran cond sub pod time code
1             package SBOM::CycloneDX::Enum::CryptoPadding;
2              
3 16     16   308 use 5.010001;
  16         60  
4 16     16   93 use strict;
  16         34  
  16         489  
5 16     16   78 use warnings;
  16         30  
  16         763  
6 16     16   88 use utf8;
  16         37  
  16         171  
7              
8 16     16   840 use Exporter 'import';
  16         31  
  16         3236  
9             our (@EXPORT_OK, %EXPORT_TAGS, %ENUM);
10              
11             BEGIN {
12              
13 16     16   159 %ENUM = (
14             PKCS5 => 'pkcs5',
15             PKCS7 => 'pkcs7',
16             PKCS1V15 => 'pkcs1v15',
17             OAEP => 'oaep',
18             RAW => 'raw',
19             OTHER => 'other',
20             UNKNOWN => 'unknown',
21             );
22              
23 16         89 require constant;
24 16         1458 constant->import(\%ENUM);
25              
26 16         129 @EXPORT_OK = sort keys %ENUM;
27 16         1678 %EXPORT_TAGS = (all => \@EXPORT_OK);
28              
29             }
30              
31 2     2 0 18 sub values { sort values %ENUM }
32              
33              
34             1;
35              
36             =encoding utf-8
37              
38             =head1 NAME
39              
40             SBOM::CycloneDX::Enum::CryptoPadding - Crypto Padding
41              
42             =head1 SYNOPSIS
43              
44             use SBOM::CycloneDX::Enum qw(CRYPTO_PADDING);
45              
46             say XYZ->PKCS5;
47              
48              
49             use SBOM::CycloneDX::Enum::CryptoPadding;
50              
51             say SBOM::CycloneDX::Enum::CryptoPadding->PKCS7;
52              
53              
54             use SBOM::CycloneDX::Enum::CryptoPadding qw(:all);
55              
56             say OAEP;
57              
58              
59             =head1 DESCRIPTION
60              
61             L is ENUM package used by L.
62              
63             The padding scheme that is used for the cryptographic algorithm.
64              
65              
66             =head1 CONSTANTS
67              
68             =over
69              
70             =item * C, Public Key Cryptography Standard: Password-Based
71             Cryptography
72              
73             =item * C, Public Key Cryptography Standard: Cryptographic Message
74             Syntax
75              
76             =item * C, Public Key Cryptography Standard: RSA Cryptography
77             v1.5
78              
79             =item * C, Optimal asymmetric encryption padding
80              
81             =item * C, Raw
82              
83             =item * C, Another padding scheme
84              
85             =item * C, The padding scheme is not known
86              
87             =back
88              
89             =head1 SUPPORT
90              
91             =head2 Bugs / Feature Requests
92              
93             Please report any bugs or feature requests through the issue tracker
94             at L.
95             You will be notified automatically of any progress on your issue.
96              
97             =head2 Source Code
98              
99             This is open source software. The code repository is available for
100             public review and contribution under the terms of the license.
101              
102             L
103              
104             git clone https://github.com/giterlizzi/perl-SBOM-CycloneDX.git
105              
106              
107             =head1 AUTHOR
108              
109             =over 4
110              
111             =item * Giuseppe Di Terlizzi
112              
113             =back
114              
115              
116             =head1 LICENSE AND COPYRIGHT
117              
118             This software is copyright (c) 2025-2026 by Giuseppe Di Terlizzi.
119              
120             This is free software; you can redistribute it and/or modify it under
121             the same terms as the Perl 5 programming language system itself.
122              
123             =cut