| Image::ExifTool::AES(3pm) | User Contributed Perl Documentation | Image::ExifTool::AES(3pm) |
Image::ExifTool::AES - AES encryption with cipher-block chaining
use Image::ExifTool::AES qw(Crypt); $err = Crypt(\$plaintext, $key, 1); # encryption $err = Crypt(\$ciphertext, $key); # decryption
This module contains an implementation of the AES encryption/decryption algorithms with cipher-block chaining (CBC) and RFC 2898 PKCS #5 padding. This is the AESV2 and AESV3 encryption mode used in PDF documents.
Exports nothing by default, but "Crypt" may be exported.
Implement AES encryption/decryption with cipher-block chaining.
1) Encryption key string (must have length 16, 24 or 32).
2) [optional] Encrypt flag (false to decrypt).
3) [optional] Flag to avoid removing padding after decrypting, or to avoid adding 16 bytes of padding before encrypting when data length is already a multiple of 16 bytes.
When encrypting, the input data may be any length and will be padded to an even 16-byte block size using the specified padding technique. If the encrypt flag has length 16, it is used as the initialization vector for the cipher-block chaining, otherwise a random IV is generated. Upon successful return the data will be encrypted, with the first 16 bytes of the data being the CBC IV.
When decrypting, the input data begins with the 16-byte CBC initialization vector.
This code is blindingly slow. But in truth, slowing down processing is the main purpose of encryption, so this really can't be considered a bug.
Copyright 2003-2018, Phil Harvey (phil at owl.phy.queensu.ca)
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| 2021-04-26 | perl v5.28.1 |