File Coverage

blib/lib/Crypt/Mac/PMAC.pm

Criterion	Covered	Total	%
statement	9	9	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	12	12	100.0

package Crypt::Mac::PMAC;

### BEWARE - GENERATED FILE, DO NOT EDIT MANUALLY!

use strict;
use warnings;
our $VERSION = '0.089';

use base qw(Crypt::Mac Exporter);
our %EXPORT_TAGS = ( all => [qw( pmac pmac_hex pmac_b64 pmac_b64u )] );
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our @EXPORT = qw();

1;

=pod

=head1 NAME

Crypt::Mac::PMAC - Message authentication code PMAC

=head1 SYNOPSIS

   ### Functional interface:
   use Crypt::Mac::PMAC qw( pmac pmac_hex pmac_b64 pmac_b64u );

   # calculate MAC from string/buffer
   my $pmac_raw  = pmac($cipher_name, $key, 'data buffer');
   my $pmac_hex  = pmac_hex($cipher_name, $key, 'data buffer');
   my $pmac_b64  = pmac_b64($cipher_name, $key, 'data buffer');
   my $pmac_b64u = pmac_b64u($cipher_name, $key, 'data buffer');

   ### OO interface:
   use Crypt::Mac::PMAC;

   my $d = Crypt::Mac::PMAC->new($cipher_name, $key);
   $d->add('any data');
   my $result_hex = $d->hexmac;   # finalizes the object

   # for another output encoding use a fresh object (or clone before finalizing)
   my $result_b64u = Crypt::Mac::PMAC->new($cipher_name, $key)->add('any data')->b64umac;

   # or MAC a file instead
   my $file_result_raw = Crypt::Mac::PMAC->new($cipher_name, $key)->addfile('filename.dat')->mac;

=head1 DESCRIPTION

Provides an interface to the PMAC message authentication code (MAC) algorithm.

=head1 EXPORT

Nothing is exported by default.

You can export selected functions:

  use Crypt::Mac::PMAC qw( pmac pmac_hex pmac_b64 pmac_b64u );

Or all of them at once:

  use Crypt::Mac::PMAC ':all';

=head1 FUNCTIONS

=head2 pmac

Joins all arguments into a single string and returns its PMAC message authentication code encoded as a binary string.

Data arguments for the functional helpers are converted to byte strings using
Perl's usual scalar stringification. Defined scalars, including numbers and
string-overloaded objects, are accepted. C is treated as an empty
string and may emit Perl's usual "uninitialized value" warning. The same
rules apply to C, C, and
C.

 my $pmac_raw = pmac($cipher_name, $key, 'data buffer');
 #or
 my $pmac_raw = pmac($cipher_name, $key, 'any data', 'more data', 'even more data');

=head2 pmac_hex

Joins all arguments into a single string and returns its PMAC message authentication code encoded as a hexadecimal string.

 my $pmac_hex = pmac_hex($cipher_name, $key, 'data buffer');
 #or
 my $pmac_hex = pmac_hex($cipher_name, $key, 'any data', 'more data', 'even more data');

=head2 pmac_b64

Joins all arguments into a single string and returns its PMAC message authentication code encoded as a Base64 string.

 my $pmac_b64 = pmac_b64($cipher_name, $key, 'data buffer');
 #or
 my $pmac_b64 = pmac_b64($cipher_name, $key, 'any data', 'more data', 'even more data');

=head2 pmac_b64u

Joins all arguments into a single string and returns its PMAC message authentication code encoded as a Base64 URL-safe string (see RFC 4648 section 5).

 my $pmac_b64url = pmac_b64u($cipher_name, $key, 'data buffer');
 #or
 my $pmac_b64url = pmac_b64u($cipher_name, $key, 'any data', 'more data', 'even more data');

=head1 METHODS

Unless noted otherwise, assume C<$d> is an existing MAC object created via
C, for example:

 my $d = Crypt::Mac::PMAC->new($cipher_name, $key);

=head2 new

 my $d = Crypt::Mac::PMAC->new($cipher_name, $key);

 # $cipher_name .. [string] one of 'AES', 'Camellia', 'Twofish', 'Serpent', etc.
 #                 any  for which there is a Crypt::Cipher:: module
 # $key .......... [binary string] key of valid length for the chosen cipher (e.g. 16/24/32 bytes for AES)

=head2 clone

 $d->clone();

=head2 add

Appends data to the message. Returns the object itself (for chaining).
Croaks if the object has already been finalized by C, C,
C, or C.

Each argument is converted to bytes using Perl's usual scalar stringification.
Defined scalars, including numbers and string-overloaded objects, are
accepted. C is treated as an empty string and may emit Perl's usual
"uninitialized value" warning.

 $d->add('any data');
 #or
 $d->add('any data', 'more data', 'even more data');

=head2 addfile

Reads the file content and appends it to the message. Returns the object itself
(for chaining). Croaks if the object has already been finalized by C,
C, C, or C.

 $d->addfile('filename.dat');
 #or
 my $filehandle = ...; # existing binary-mode filehandle
 $d->addfile($filehandle);

=head2 mac

Returns the binary MAC (raw bytes) and finalizes the object. After the first
call to C, C, C, or C, later calls to C,
C, or any MAC getter croak.

 my $result_raw = $d->mac();

=head2 hexmac

Returns the MAC encoded as a lowercase hexadecimal string and finalizes the
object. After the first call to C, C, C, or C,
later calls to C, C, or any MAC getter croak.

 my $result_hex = $d->hexmac();

=head2 b64mac

Returns the MAC encoded as a Base64 string with trailing C<=> padding and
finalizes the object. After the first call to C, C, C, or
C, later calls to C, C, or any MAC getter croak.

 my $result_b64 = $d->b64mac();

=head2 b64umac

Returns the MAC encoded as a Base64 URL-safe string (no trailing C<=>) and
finalizes the object. After the first call to C, C, C, or
C, later calls to C, C, or any MAC getter croak.

 my $result_b64url = $d->b64umac();

=head1 SEE ALSO

=over

=item * L

=item * L

=back

=cut