Tidying a few things up.
[libdcp.git] / src / certificate_chain.cc
index d30e6567f2ee24e366752f70b89dcada304fa67e..4f86ba0db6275a3db0e0b38b03c06dc0d0dde9fa 100644 (file)
@@ -1,5 +1,5 @@
 /*
-    Copyright (C) 2013-2016 Carl Hetherington <cth@carlh.net>
+    Copyright (C) 2013-2021 Carl Hetherington <cth@carlh.net>
 
     This file is part of libdcp.
 
     files in the program, then also delete it here.
 */
 
-/** @file  src/signer_chain.cc
- *  @brief Functions to make signer chains.
+
+/** @file  src/certificate_chain.cc
+ *  @brief CertificateChain class
  */
 
+
 #include "certificate_chain.h"
 #include "exceptions.h"
 #include "util.h"
 #include <openssl/rsa.h>
 #include <boost/filesystem.hpp>
 #include <boost/algorithm/string.hpp>
-#include <boost/foreach.hpp>
 #include <fstream>
 #include <iostream>
 
+
 using std::string;
 using std::ofstream;
 using std::ifstream;
 using std::runtime_error;
 using namespace dcp;
 
+
 /** Run a shell command.
  *  @param cmd Command to run (UTF8-encoded).
  */
@@ -75,7 +78,7 @@ command (string cmd)
           is handled correctly.
        */
        int const wn = MultiByteToWideChar (CP_UTF8, 0, cmd.c_str(), -1, 0, 0);
-       wchar_t* buffer = new wchar_t[wn];
+       auto buffer = new wchar_t[wn];
        if (MultiByteToWideChar (CP_UTF8, 0, cmd.c_str(), -1, buffer, wn) == 0) {
                delete[] buffer;
                return;
@@ -112,6 +115,7 @@ command (string cmd)
        }
 }
 
+
 /** Extract a public key from a private key and create a SHA1 digest of it.
  *  @param private_key Private key
  *  @param openssl openssl binary name (or full path if openssl is not on the system path).
@@ -123,12 +127,12 @@ public_key_digest (boost::filesystem::path private_key, boost::filesystem::path
        boost::filesystem::path public_name = private_key.string() + ".public";
 
        /* Create the public key from the private key */
-       command (String::compose("\"%1\" rsa -outform PEM -pubout -in %2 -out %3", openssl.string(), private_key.string(), public_name.string ()));
+       command (String::compose("\"%1\" rsa -outform PEM -pubout -in %2 -out %3", openssl.string(), private_key.string(), public_name.string()));
 
        /* Read in the public key from the file */
 
        string pub;
-       ifstream f (public_name.string().c_str ());
+       ifstream f (public_name.string().c_str());
        if (!f.good ()) {
                throw dcp::MiscError ("public key not found");
        }
@@ -177,6 +181,7 @@ public_key_digest (boost::filesystem::path private_key, boost::filesystem::path
        return dig;
 }
 
+
 CertificateChain::CertificateChain (
        boost::filesystem::path openssl,
        string organisation,
@@ -186,10 +191,13 @@ CertificateChain::CertificateChain (
        string leaf_common_name
        )
 {
-       boost::filesystem::path directory = boost::filesystem::temp_directory_path() / boost::filesystem::unique_path ();
+       /* Valid for 40 years */
+       int const days = 365 * 40;
+
+       auto directory = boost::filesystem::temp_directory_path() / boost::filesystem::unique_path ();
        boost::filesystem::create_directories (directory);
 
-       boost::filesystem::path const cwd = boost::filesystem::current_path ();
+       auto const cwd = boost::filesystem::current_path ();
        boost::filesystem::current_path (directory);
 
        string quoted_openssl = "\"" + openssl.string() + "\"";
@@ -221,9 +229,9 @@ CertificateChain::CertificateChain (
        {
                command (
                        String::compose (
-                               "%1 req -new -x509 -sha256 -config ca.cnf -days 3650 -set_serial 5"
-                               " -subj \"%2\" -key ca.key -outform PEM -out ca.self-signed.pem",
-                               quoted_openssl, ca_subject
+                               "%1 req -new -x509 -sha256 -config ca.cnf -days %2 -set_serial 5"
+                               " -subj \"%3\" -key ca.key -outform PEM -out ca.self-signed.pem",
+                               quoted_openssl, days, ca_subject
                                )
                        );
        }
@@ -255,16 +263,18 @@ CertificateChain::CertificateChain (
        {
                command (
                        String::compose (
-                               "%1 req -new -config intermediate.cnf -days 3649 -subj \"%2\" -key intermediate.key -out intermediate.csr",
-                               quoted_openssl, inter_subject
+                               "%1 req -new -config intermediate.cnf -days %2 -subj \"%3\" -key intermediate.key -out intermediate.csr",
+                               quoted_openssl, days - 1, inter_subject
                                )
                        );
        }
 
        command (
-               quoted_openssl +
-               " x509 -req -sha256 -days 3649 -CA ca.self-signed.pem -CAkey ca.key -set_serial 6"
-               " -in intermediate.csr -extfile intermediate.cnf -extensions v3_ca -out intermediate.signed.pem"
+               String::compose (
+                       "%1 x509 -req -sha256 -days %2 -CA ca.self-signed.pem -CAkey ca.key -set_serial 6"
+                       " -in intermediate.csr -extfile intermediate.cnf -extensions v3_ca -out intermediate.signed.pem",
+                       quoted_openssl, days - 1
+                       )
                );
 
        command (quoted_openssl + " genrsa -out leaf.key 2048");
@@ -294,29 +304,32 @@ CertificateChain::CertificateChain (
        {
                command (
                        String::compose (
-                               "%1 req -new -config leaf.cnf -days 3648 -subj \"%2\" -key leaf.key -outform PEM -out leaf.csr",
-                               quoted_openssl, leaf_subject
+                               "%1 req -new -config leaf.cnf -days %2 -subj \"%3\" -key leaf.key -outform PEM -out leaf.csr",
+                               quoted_openssl, days - 2, leaf_subject
                                )
                        );
        }
 
        command (
-               quoted_openssl +
-               " x509 -req -sha256 -days 3648 -CA intermediate.signed.pem -CAkey intermediate.key"
-               " -set_serial 7 -in leaf.csr -extfile leaf.cnf -extensions v3_ca -out leaf.signed.pem"
+               String::compose (
+                       "%1 x509 -req -sha256 -days %2 -CA intermediate.signed.pem -CAkey intermediate.key"
+                       " -set_serial 7 -in leaf.csr -extfile leaf.cnf -extensions v3_ca -out leaf.signed.pem",
+                       quoted_openssl, days - 2
+                       )
                );
 
        boost::filesystem::current_path (cwd);
 
-       _certificates.push_back (dcp::Certificate (dcp::file_to_string (directory / "ca.self-signed.pem")));
-       _certificates.push_back (dcp::Certificate (dcp::file_to_string (directory / "intermediate.signed.pem")));
-       _certificates.push_back (dcp::Certificate (dcp::file_to_string (directory / "leaf.signed.pem")));
+       _certificates.push_back (dcp::Certificate(dcp::file_to_string(directory / "ca.self-signed.pem")));
+       _certificates.push_back (dcp::Certificate(dcp::file_to_string(directory / "intermediate.signed.pem")));
+       _certificates.push_back (dcp::Certificate(dcp::file_to_string(directory / "leaf.signed.pem")));
 
        _key = dcp::file_to_string (directory / "leaf.key");
 
        boost::filesystem::remove_all (directory);
 }
 
+
 CertificateChain::CertificateChain (string s)
 {
        while (true) {
@@ -334,62 +347,60 @@ CertificateChain::CertificateChain (string s)
        leaf_to_root ();
 }
 
-/** @return Root certificate */
+
 Certificate
 CertificateChain::root () const
 {
        DCP_ASSERT (!_certificates.empty());
-       return root_to_leaf().front ();
+       return root_to_leaf().front();
 }
 
-/** @return Leaf certificate */
+
 Certificate
 CertificateChain::leaf () const
 {
        DCP_ASSERT (!_certificates.empty());
-       return root_to_leaf().back ();
+       return root_to_leaf().back();
 }
 
-/** @return Certificates in order from leaf to root */
+
 CertificateChain::List
 CertificateChain::leaf_to_root () const
 {
-       List l = root_to_leaf ();
-       l.reverse ();
+       auto l = root_to_leaf ();
+       std::reverse (l.begin(), l.end());
        return l;
 }
 
+
 CertificateChain::List
 CertificateChain::unordered () const
 {
        return _certificates;
 }
 
-/** Add a certificate to the chain.
- *  @param c Certificate to add.
- */
+
 void
 CertificateChain::add (Certificate c)
 {
        _certificates.push_back (c);
 }
 
-/** Remove a certificate from the chain.
- *  @param c Certificate to remove.
- */
+
 void
 CertificateChain::remove (Certificate c)
 {
-       _certificates.remove (c);
+       auto i = std::find(_certificates.begin(), _certificates.end(), c);
+       if (i != _certificates.end()) {
+               _certificates.erase (i);
+       }
 }
 
-/** Remove the i'th certificate in the list, as listed
- *  from root to leaf.
- */
+
 void
 CertificateChain::remove (int i)
 {
-       List::iterator j = _certificates.begin ();
+       auto j = _certificates.begin ();
         while (j != _certificates.end () && i > 0) {
                --i;
                ++j;
@@ -400,17 +411,14 @@ CertificateChain::remove (int i)
        }
 }
 
+
 bool
 CertificateChain::chain_valid () const
 {
        return chain_valid (_certificates);
 }
 
-/** Check to see if a chain is valid (i.e. root signs the intermediate, intermediate
- *  signs the leaf and so on) and that the private key (if there is one) matches the
- *  leaf certificate.
- *  @return true if it's ok, false if not.
- */
+
 bool
 CertificateChain::chain_valid (List const & chain) const
 {
@@ -421,29 +429,29 @@ CertificateChain::chain_valid (List const & chain) const
           any time soon.
        */
 
-       X509_STORE* store = X509_STORE_new ();
+       auto store = X509_STORE_new ();
        if (!store) {
                throw MiscError ("could not create X509 store");
        }
 
        /* Put all the certificates into the store */
-       for (List::const_iterator i = chain.begin(); i != chain.end(); ++i) {
-               if (!X509_STORE_add_cert (store, i->x509 ())) {
-                       X509_STORE_free (store);
+       for (auto const& i: chain) {
+               if (!X509_STORE_add_cert(store, i.x509())) {
+                       X509_STORE_free(store);
                        return false;
                }
        }
 
        /* Verify each one */
-       for (List::const_iterator i = chain.begin(); i != chain.end(); ++i) {
+       for (auto i = chain.begin(); i != chain.end(); ++i) {
 
-               List::const_iterator j = i;
+               auto j = i;
                ++j;
                if (j == chain.end ()) {
                        break;
                }
 
-               X509_STORE_CTX* ctx = X509_STORE_CTX_new ();
+               auto ctx = X509_STORE_CTX_new ();
                if (!ctx) {
                        X509_STORE_free (store);
                        throw MiscError ("could not create X509 store context");
@@ -464,10 +472,11 @@ CertificateChain::chain_valid (List const & chain) const
                        return false;
                }
 
-               /* I don't know why OpenSSL doesn't check this in verify_cert, but without this check
-                  the certificates_validation8 test fails.
+               /* I don't know why OpenSSL doesn't check this stuff
+                  in verify_cert, but without these checks the
+                  certificates_validation8 test fails.
                */
-               if (j->issuer() != i->subject()) {
+               if (j->issuer() != i->subject() || j->subject() == i->subject()) {
                        X509_STORE_free (store);
                        return false;
                }
@@ -479,9 +488,7 @@ CertificateChain::chain_valid (List const & chain) const
        return true;
 }
 
-/** Check that there is a valid private key for the leaf certificate.
- *  Will return true if there are no certificates.
- */
+
 bool
 CertificateChain::private_key_valid () const
 {
@@ -493,20 +500,26 @@ CertificateChain::private_key_valid () const
                return false;
        }
 
-       BIO* bio = BIO_new_mem_buf (const_cast<char *> (_key->c_str ()), -1);
+       auto bio = BIO_new_mem_buf (const_cast<char *> (_key->c_str ()), -1);
        if (!bio) {
                throw MiscError ("could not create memory BIO");
        }
 
-       RSA* private_key = PEM_read_bio_RSAPrivateKey (bio, 0, 0, 0);
-       RSA* public_key = leaf().public_key ();
+       auto private_key = PEM_read_bio_RSAPrivateKey (bio, 0, 0, 0);
+       if (!private_key) {
+               return false;
+       }
+
+       auto public_key = leaf().public_key ();
 
 #if OPENSSL_VERSION_NUMBER > 0x10100000L
-#warning "Using new OpenSSL API"
        BIGNUM const * private_key_n;
        RSA_get0_key(private_key, &private_key_n, 0, 0);
        BIGNUM const * public_key_n;
        RSA_get0_key(public_key, &public_key_n, 0, 0);
+       if (!private_key_n || !public_key_n) {
+               return false;
+       }
        bool const valid = !BN_cmp (private_key_n, public_key_n);
 #else
        bool const valid = !BN_cmp (private_key->n, public_key->n);
@@ -516,6 +529,7 @@ CertificateChain::private_key_valid () const
        return valid;
 }
 
+
 bool
 CertificateChain::valid (string* reason) const
 {
@@ -538,12 +552,12 @@ CertificateChain::valid (string* reason) const
        return true;
 }
 
-/** @return Certificates in order from root to leaf */
+
 CertificateChain::List
 CertificateChain::root_to_leaf () const
 {
-       List rtl = _certificates;
-       rtl.sort ();
+       auto rtl = _certificates;
+       std::sort (rtl.begin(), rtl.end());
        do {
                if (chain_valid (rtl)) {
                        return rtl;
@@ -553,42 +567,44 @@ CertificateChain::root_to_leaf () const
        throw CertificateChainError ("certificate chain is not consistent");
 }
 
-/** Add a &lt;Signer&gt; and &lt;ds:Signature&gt; nodes to an XML node.
- *  @param parent XML node to add to.
- *  @param standard INTEROP or SMPTE.
- */
+
 void
 CertificateChain::sign (xmlpp::Element* parent, Standard standard) const
 {
        /* <Signer> */
 
-       xmlpp::Element* signer = parent->add_child("Signer");
+       parent->add_child_text("  ");
+       auto signer = parent->add_child("Signer");
        signer->set_namespace_declaration ("http://www.w3.org/2000/09/xmldsig#", "dsig");
-       xmlpp::Element* data = signer->add_child("X509Data", "dsig");
-       xmlpp::Element* serial_element = data->add_child("X509IssuerSerial", "dsig");
+       auto data = signer->add_child("X509Data", "dsig");
+       auto serial_element = data->add_child("X509IssuerSerial", "dsig");
        serial_element->add_child("X509IssuerName", "dsig")->add_child_text (leaf().issuer());
        serial_element->add_child("X509SerialNumber", "dsig")->add_child_text (leaf().serial());
        data->add_child("X509SubjectName", "dsig")->add_child_text (leaf().subject());
 
+       indent (signer, 2);
+
        /* <Signature> */
 
-       xmlpp::Element* signature = parent->add_child("Signature");
+       parent->add_child_text("\n  ");
+       auto signature = parent->add_child("Signature");
        signature->set_namespace_declaration ("http://www.w3.org/2000/09/xmldsig#", "dsig");
        signature->set_namespace ("dsig");
+       parent->add_child_text("\n");
 
-       xmlpp::Element* signed_info = signature->add_child ("SignedInfo", "dsig");
+       auto signed_info = signature->add_child ("SignedInfo", "dsig");
        signed_info->add_child("CanonicalizationMethod", "dsig")->set_attribute ("Algorithm", "http://www.w3.org/TR/2001/REC-xml-c14n-20010315");
 
-       if (standard == INTEROP) {
+       if (standard == Standard::INTEROP) {
                signed_info->add_child("SignatureMethod", "dsig")->set_attribute("Algorithm", "http://www.w3.org/2000/09/xmldsig#rsa-sha1");
        } else {
                signed_info->add_child("SignatureMethod", "dsig")->set_attribute("Algorithm", "http://www.w3.org/2001/04/xmldsig-more#rsa-sha256");
        }
 
-       xmlpp::Element* reference = signed_info->add_child("Reference", "dsig");
+       auto reference = signed_info->add_child("Reference", "dsig");
        reference->set_attribute ("URI", "");
 
-       xmlpp::Element* transforms = reference->add_child("Transforms", "dsig");
+       auto transforms = reference->add_child("Transforms", "dsig");
        transforms->add_child("Transform", "dsig")->set_attribute (
                "Algorithm", "http://www.w3.org/2000/09/xmldsig#enveloped-signature"
                );
@@ -599,27 +615,22 @@ CertificateChain::sign (xmlpp::Element* parent, Standard standard) const
 
        signature->add_child("SignatureValue", "dsig");
        signature->add_child("KeyInfo", "dsig");
-       add_signature_value (signature, "dsig");
+       add_signature_value (signature, "dsig", true);
 }
 
 
-/** Sign an XML node.
- *
- *  @param parent Node to sign.
- *  @param ns Namespace to use for the signature XML nodes.
- */
 void
-CertificateChain::add_signature_value (xmlpp::Node* parent, string ns) const
+CertificateChain::add_signature_value (xmlpp::Element* parent, string ns, bool add_indentation) const
 {
        cxml::Node cp (parent);
-       xmlpp::Node* key_info = cp.node_child("KeyInfo")->node ();
+       auto key_info = cp.node_child("KeyInfo")->node();
 
        /* Add the certificate chain to the KeyInfo child node of parent */
-       BOOST_FOREACH (Certificate const & i, leaf_to_root ()) {
-               xmlpp::Element* data = key_info->add_child("X509Data", ns);
+       for (auto const& i: leaf_to_root()) {
+               auto data = key_info->add_child("X509Data", ns);
 
                {
-                       xmlpp::Element* serial = data->add_child("X509IssuerSerial", ns);
+                       auto serial = data->add_child("X509IssuerSerial", ns);
                        serial->add_child("X509IssuerName", ns)->add_child_text (i.issuer ());
                        serial->add_child("X509SerialNumber", ns)->add_child_text (i.serial ());
                }
@@ -627,7 +638,7 @@ CertificateChain::add_signature_value (xmlpp::Node* parent, string ns) const
                data->add_child("X509Certificate", ns)->add_child_text (i.certificate());
        }
 
-       xmlSecDSigCtxPtr signature_context = xmlSecDSigCtxCreate (0);
+       auto signature_context = xmlSecDSigCtxCreate (0);
        if (signature_context == 0) {
                throw MiscError ("could not create signature context");
        }
@@ -640,11 +651,9 @@ CertificateChain::add_signature_value (xmlpp::Node* parent, string ns) const
                throw runtime_error ("could not read private key");
        }
 
-       /* XXX: set key name to the PEM string: this can't be right! */
-       if (xmlSecKeySetName (signature_context->signKey, reinterpret_cast<const xmlChar *> (_key->c_str())) < 0) {
-               throw MiscError ("could not set key name");
+       if (add_indentation) {
+               indent (parent, 2);
        }
-
        int const r = xmlSecDSigCtxSign (signature_context, parent->cobj ());
        if (r < 0) {
                throw MiscError (String::compose ("could not sign (%1)", r));
@@ -653,11 +662,12 @@ CertificateChain::add_signature_value (xmlpp::Node* parent, string ns) const
        xmlSecDSigCtxDestroy (signature_context);
 }
 
+
 string
 CertificateChain::chain () const
 {
        string o;
-       BOOST_FOREACH (Certificate const &i, root_to_leaf ()) {
+       for (auto const& i: root_to_leaf()) {
                o += i.certificate(true);
        }