File Coverage

blib/lib/Crypt/Digest/Tiger192.pm
Criterion Covered Total %
statement 23 24 95.8
branch n/a
condition n/a
subroutine 13 14 92.8
pod 9 9 100.0
total 45 47 95.7


line stmt bran cond sub pod time code
1             package Crypt::Digest::Tiger192;
2              
3             ### BEWARE - GENERATED FILE, DO NOT EDIT MANUALLY!
4              
5 2     2   760 use strict;
  2         4  
  2         45  
6 2     2   9 use warnings;
  2         3  
  2         64  
7             our $VERSION = '0.080';
8              
9 2     2   9 use base qw(Crypt::Digest Exporter);
  2         3  
  2         334  
10             our %EXPORT_TAGS = ( all => [qw( tiger192 tiger192_hex tiger192_b64 tiger192_b64u tiger192_file tiger192_file_hex tiger192_file_b64 tiger192_file_b64u )] );
11             our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
12             our @EXPORT = qw();
13              
14 2     2   12 use Carp;
  2         4  
  2         110  
15             $Carp::Internal{(__PACKAGE__)}++;
16 2     2   12 use Crypt::Digest;
  2         3  
  2         447  
17              
18 2     2 1 1212 sub hashsize { Crypt::Digest::hashsize('Tiger192') }
19 4     4 1 34 sub tiger192 { Crypt::Digest::digest_data('Tiger192', @_) }
20 4     4 1 31 sub tiger192_hex { Crypt::Digest::digest_data_hex('Tiger192', @_) }
21 4     4 1 31 sub tiger192_b64 { Crypt::Digest::digest_data_b64('Tiger192', @_) }
22 1     1 1 9 sub tiger192_b64u { Crypt::Digest::digest_data_b64u('Tiger192', @_) }
23 4     4 1 17 sub tiger192_file { Crypt::Digest::digest_file('Tiger192', @_) }
24 4     4 1 16 sub tiger192_file_hex { Crypt::Digest::digest_file_hex('Tiger192', @_) }
25 4     4 1 14 sub tiger192_file_b64 { Crypt::Digest::digest_file_b64('Tiger192', @_) }
26 0     0 1   sub tiger192_file_b64u { Crypt::Digest::digest_file_b64u('Tiger192', @_) }
27              
28             1;
29              
30             =pod
31              
32             =head1 NAME
33              
34             Crypt::Digest::Tiger192 - Hash function Tiger-192 [size: 192 bits]
35              
36             =head1 SYNOPSIS
37              
38             ### Functional interface:
39             use Crypt::Digest::Tiger192 qw( tiger192 tiger192_hex tiger192_b64 tiger192_b64u
40             tiger192_file tiger192_file_hex tiger192_file_b64 tiger192_file_b64u );
41              
42             # calculate digest from string/buffer
43             $tiger192_raw = tiger192('data string');
44             $tiger192_hex = tiger192_hex('data string');
45             $tiger192_b64 = tiger192_b64('data string');
46             $tiger192_b64u = tiger192_b64u('data string');
47             # calculate digest from file
48             $tiger192_raw = tiger192_file('filename.dat');
49             $tiger192_hex = tiger192_file_hex('filename.dat');
50             $tiger192_b64 = tiger192_file_b64('filename.dat');
51             $tiger192_b64u = tiger192_file_b64u('filename.dat');
52             # calculate digest from filehandle
53             $tiger192_raw = tiger192_file(*FILEHANDLE);
54             $tiger192_hex = tiger192_file_hex(*FILEHANDLE);
55             $tiger192_b64 = tiger192_file_b64(*FILEHANDLE);
56             $tiger192_b64u = tiger192_file_b64u(*FILEHANDLE);
57              
58             ### OO interface:
59             use Crypt::Digest::Tiger192;
60              
61             $d = Crypt::Digest::Tiger192->new;
62             $d->add('any data');
63             $d->addfile('filename.dat');
64             $d->addfile(*FILEHANDLE);
65             $result_raw = $d->digest; # raw bytes
66             $result_hex = $d->hexdigest; # hexadecimal form
67             $result_b64 = $d->b64digest; # Base64 form
68             $result_b64u = $d->b64udigest; # Base64 URL Safe form
69              
70             =head1 DESCRIPTION
71              
72             Provides an interface to the Tiger192 digest algorithm.
73              
74             =head1 EXPORT
75              
76             Nothing is exported by default.
77              
78             You can export selected functions:
79              
80             use Crypt::Digest::Tiger192 qw(tiger192 tiger192_hex tiger192_b64 tiger192_b64u
81             tiger192_file tiger192_file_hex tiger192_file_b64 tiger192_file_b64u);
82              
83             Or all of them at once:
84              
85             use Crypt::Digest::Tiger192 ':all';
86              
87             =head1 FUNCTIONS
88              
89             =head2 tiger192
90              
91             Logically joins all arguments into a single string, and returns its Tiger192 digest encoded as a binary string.
92              
93             $tiger192_raw = tiger192('data string');
94             #or
95             $tiger192_raw = tiger192('any data', 'more data', 'even more data');
96              
97             =head2 tiger192_hex
98              
99             Logically joins all arguments into a single string, and returns its Tiger192 digest encoded as a hexadecimal string.
100              
101             $tiger192_hex = tiger192_hex('data string');
102             #or
103             $tiger192_hex = tiger192_hex('any data', 'more data', 'even more data');
104              
105             =head2 tiger192_b64
106              
107             Logically joins all arguments into a single string, and returns its Tiger192 digest encoded as a Base64 string, B trailing '=' padding.
108              
109             $tiger192_b64 = tiger192_b64('data string');
110             #or
111             $tiger192_b64 = tiger192_b64('any data', 'more data', 'even more data');
112              
113             =head2 tiger192_b64u
114              
115             Logically joins all arguments into a single string, and returns its Tiger192 digest encoded as a Base64 URL Safe string (see RFC 4648 section 5).
116              
117             $tiger192_b64url = tiger192_b64u('data string');
118             #or
119             $tiger192_b64url = tiger192_b64u('any data', 'more data', 'even more data');
120              
121             =head2 tiger192_file
122              
123             Reads file (defined by filename or filehandle) content, and returns its Tiger192 digest encoded as a binary string.
124              
125             $tiger192_raw = tiger192_file('filename.dat');
126             #or
127             $tiger192_raw = tiger192_file(*FILEHANDLE);
128              
129             =head2 tiger192_file_hex
130              
131             Reads file (defined by filename or filehandle) content, and returns its Tiger192 digest encoded as a hexadecimal string.
132              
133             $tiger192_hex = tiger192_file_hex('filename.dat');
134             #or
135             $tiger192_hex = tiger192_file_hex(*FILEHANDLE);
136              
137             B You have to make sure that the filehandle is in binary mode before you pass it as argument to the addfile() method.
138              
139             =head2 tiger192_file_b64
140              
141             Reads file (defined by filename or filehandle) content, and returns its Tiger192 digest encoded as a Base64 string, B trailing '=' padding.
142              
143             $tiger192_b64 = tiger192_file_b64('filename.dat');
144             #or
145             $tiger192_b64 = tiger192_file_b64(*FILEHANDLE);
146              
147             =head2 tiger192_file_b64u
148              
149             Reads file (defined by filename or filehandle) content, and returns its Tiger192 digest encoded as a Base64 URL Safe string (see RFC 4648 section 5).
150              
151             $tiger192_b64url = tiger192_file_b64u('filename.dat');
152             #or
153             $tiger192_b64url = tiger192_file_b64u(*FILEHANDLE);
154              
155             =head1 METHODS
156              
157             The OO interface provides the same set of functions as L.
158              
159             =head2 new
160              
161             $d = Crypt::Digest::Tiger192->new();
162              
163             =head2 clone
164              
165             $d->clone();
166              
167             =head2 reset
168              
169             $d->reset();
170              
171             =head2 add
172              
173             $d->add('any data');
174             #or
175             $d->add('any data', 'more data', 'even more data');
176              
177             =head2 addfile
178              
179             $d->addfile('filename.dat');
180             #or
181             $d->addfile(*FILEHANDLE);
182              
183             =head2 add_bits
184              
185             $d->add_bits($bit_string); # e.g. $d->add_bits("111100001010");
186             #or
187             $d->add_bits($data, $nbits); # e.g. $d->add_bits("\xF0\xA0", 16);
188              
189             =head2 hashsize
190              
191             $d->hashsize;
192             #or
193             Crypt::Digest::Tiger192->hashsize();
194             #or
195             Crypt::Digest::Tiger192::hashsize();
196              
197             =head2 digest
198              
199             $result_raw = $d->digest();
200              
201             =head2 hexdigest
202              
203             $result_hex = $d->hexdigest();
204              
205             =head2 b64digest
206              
207             $result_b64 = $d->b64digest();
208              
209             =head2 b64udigest
210              
211             $result_b64url = $d->b64udigest();
212              
213             =head1 SEE ALSO
214              
215             =over
216              
217             =item * L, L
218              
219             =item * L
220              
221             =back
222              
223             =cut