Awesome

NAME

Crypt::OpenSSL::X509 - Perl extension to OpenSSL's X509 API.

SYNOPSIS

use Crypt::OpenSSL::X509;

my $x509 = Crypt::OpenSSL::X509->new_from_file('cert.pem');

print $x509->pubkey() . "\n";
print $x509->subject() . "\n";
print $x509->hash() . "\n";
print $x509->email() . "\n";
print $x509->issuer() . "\n";
print $x509->issuer_hash() . "\n";
print $x509->notBefore() . "\n";
print $x509->notAfter() . "\n";
print $x509->modulus() . "\n";
print $x509->exponent() . "\n";
print $x509->fingerprint_md5() . "\n";
print $x509->fingerprint_sha256() . "\n";
print $x509->as_string() . "\n";

my $x509 = Crypt::OpenSSL::X509->new_from_string(
  $der_encoded_data, Crypt::OpenSSL::X509::FORMAT_ASN1
);

# given a time offset of $seconds, will the certificate be valid?
if ($x509->checkend($seconds)) {
  # cert is expired at $seconds offset
} else {
  # cert is ok at $seconds offset
}

my $exts = $x509->extensions_by_oid();

foreach my $oid (keys %$exts) {
  my $ext = $$exts{$oid};
  print $oid, " ", $ext->object()->name(), ": ", $ext->value(), "\n";
}

ABSTRACT

Crypt::OpenSSL::X509 - Perl extension to OpenSSL's X509 API.

DESCRIPTION

This implement a large majority of OpenSSL's useful X509 API.

The email() method supports both certificates where the
subject is of the form:
"... CN=Firstname lastname/emailAddress=user@domain", and also
certificates where there is a X509v3 Extension of the form
"X509v3 Subject Alternative Name: email=user@domain".

EXPORT

None by default.

On request:

    FORMAT_UNDEF FORMAT_ASN1 FORMAT_TEXT FORMAT_PEM
    FORMAT_PKCS12 FORMAT_SMIME FORMAT_ENGINE FORMAT_IISSGC

FUNCTIONS

X509 CONSTRUCTORS

new ( )

Create a new X509 object.
new_from_string ( STRING [ FORMAT ] )
new_from_file ( FILENAME [ FORMAT ] )

Create a new X509 object from a string or file. FORMAT should be FORMAT_ASN1 or FORMAT_PEM.

X509 ACCESSORS

subject

Subject name as a string.
issuer

Issuer name as a string.
issuer_hash

Issuer name hash as a string.
serial

Serial number as a string.
hash

Alias for subject_hash
subject_hash

Subject name hash as a string.
notBefore

notBefore time as a string.
notAfter

notAfter time as a string.
email

Email addresses as string, if multiple addresses found, they are separated by a space (' ').
version

Certificate version as a string.
sig_alg_name

Signature algorithm name as a string.
key_alg_name

Public key algorithm name as a string.
curve

Name of the EC curve used in the public key.

X509 METHODS

subject_name ( )
issuer_name ( )

Return a Name object for the subject or issuer name. Methods for handling Name objects are given below.
is_selfsigned ( )

Return Boolean value if subject and issuer name are the same.
as_string ( [ FORMAT ] )

Return the certificate as a string in the specified format. FORMAT can be one of FORMAT_PEM (the default) or FORMAT_ASN1.
modulus ( )

Return the modulus for an RSA public key as a string of hex digits. For DSA and EC return the public key. Other algorithms are not supported.
bit_length ( )

Return the length of the modulus as a number of bits.
fingerprint_md5 ( )
fingerprint_sha1 ( )
fingerprint_sha224 ( )
fingerprint_sha256 ( )
fingerprint_sha384 ( )
fingerprint_sha512 ( )

Return the specified message digest for the certificate.
checkend( OFFSET )

Given an offset in seconds, will the certificate be expired? Returns True if the certificate will be expired. False otherwise.
pubkey ( )

Return the RSA, DSA, or EC public key.
num_extensions ( )

Return the number of extensions in the certificate.
extension ( INDEX )

Return the Extension specified by the integer INDEX. Methods for handling Extension objects are given below.
extensions_by_oid ( )
extensions_by_name ( )
extensions_by_long_name ( )

Return a hash of Extensions indexed by OID or name.
has_extension_oid ( OID )

Return true if the certificate has the extension specified by OID.
subjectaltname ( )

Uses Convert::ASN1 to extract the Subject Alternative Names from the X509 object. subjectaltname ( ) returns an array of "rfc822Name"s
```
  [
      {
          'rfc822Name' => 'altuser@mpi-sws.org'
      },
      {
          'rfc822Name' => 'user@mpi-sws.org'
      },
  ]
```

X509::Extension METHODS

critical ( )

Return a value indicating if the extension is critical or not. FIXME: the value is an ASN.1 BOOLEAN value.
object ( )

Return the ObjectID of the extension. Methods for handling ObjectID objects are given below.
value ( )

Return the value of the extension as an asn1parse(1) style hex dump.
as_string ( )

Return a human-readable version of the extension as formatted by X509V3_EXT_print. Note that this will return an empty string for OIDs with unknown ASN.1 encodings.

X509::ObjectID METHODS

name ( )

Return the long name of the object as a string.
oid ( )

Return the numeric dot-separated form of the object identifier as a string.

X509::Name METHODS

as_string ( )

Return a string representation of the Name
entries ( )

Return an array of Name_Entry objects. Methods for handling Name_Entry objects are given below.
has_entry ( TYPE [ LASTPOS ] )
has_long_entry ( TYPE [ LASTPOS ] )
has_oid_entry ( TYPE [ LASTPOS ] )

Return true if a name has an entry of the specified TYPE. Depending on the function the TYPE may be in the short form (e.g. CN), long form (commonName) or OID (2.5.4.3). If LASTPOS is specified then the search is made from that index rather than from the start.
get_index_by_type ( TYPE [ LASTPOS ] )
get_index_by_long_type ( TYPE [ LASTPOS ] )
get_index_by_oid_type ( TYPE [ LASTPOS ] )

Return the index of an entry of the specified TYPE in a name. Depending on the function the TYPE may be in the short form (e.g. CN), long form (commonName) or OID (2.5.4.3). If LASTPOS is specified then the search is made from that index rather than from the start.
get_entry_by_type ( TYPE [ LASTPOS ] )
get_entry_by_long_type ( TYPE [ LASTPOS ] )

These methods work similarly to get_index_by_* but return the Name_Entry rather than the index.

X509::Name_Entry METHODS

as_string ( [ LONG ] )

Return a string representation of the Name_Entry of the form typeName=Value. If LONG is 1, the long form of the type is used.
type ( [ LONG ] )

Return a string representation of the type of the Name_Entry. If LONG is 1, the long form of the type is used.
value ( )

Return a string representation of the value of the Name_Entry.
is_printableString ( )
is_ia5string ( )
is_utf8string ( )
is_asn1_type ( [ASN1_TYPE] )

Return true if the Name_Entry value is of the specified type. The value of ASN1_TYPE should be as listed in OpenSSL's asn1.h.

ISSUE REPORTING

Please report any bugs or feature requests using GitHub.

GitHub Issues

AUTHOR

Dan Sully, original author
Jonas Brømsø, current maintainer
Please see the "ACKNOWLEDGEMENTS" section for a list of contributors.

ACKNOWLEDGEMENTS

In alphabetical order.

@eserte
@kmx
@stphnlyd
Ashley Hindmarsh @bestscarper
Bernhard M. Wiedemann @bmwiedemann
Brad Davidson @brandond
Daniel Kahn Gillmor
Daniel Risacher
David O'Callaghan
David Steinbrunner @dsteinbrunner
dsteinwand
Florian Schlichting @fschlich
IKEDA Soji @ikedas
James Hunt @jhunt
James Rouzier @jrouzierinverse
Johanna @0xxon
Jonas Brømsø @jonasbn
Louise Doran
Michael McClimon @mmcclimon
Michal Josef Špaček @michal-josef-spacek
Neil Bowers @neilb
Nicholas Harteau
Otmar Lendl
Patrick C. @errror
Patrick Cernko
Petr Pisar @ppisar
pi-rho
Salvador Fandiño @salva
Sebastian Andrzej Siewior
Sho Nakatani @laysakura
Shoichi Kaji @skaji
Timothy Legge @timlegge
Todd Rinaldo @toddr
Uli Scholler

COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.