X-Git-Url: https://git.carlh.net/gitweb/?a=blobdiff_plain;f=src%2Fcertificate_chain.cc;h=df68cb9ffb0fa64926002c64a22e44c7c69dc02d;hb=8ba922f93370862e0947e4d59cb7ae11fd0ace80;hp=5d01790b0ac381aa9c43e7fb3b37d259135ba451;hpb=e7d7fad999cba0bff770f6d4ea0775a56af388a9;p=libdcp.git diff --git a/src/certificate_chain.cc b/src/certificate_chain.cc index 5d01790b..df68cb9f 100644 --- a/src/certificate_chain.cc +++ b/src/certificate_chain.cc @@ -1,20 +1,34 @@ /* - Copyright (C) 2013-2014 Carl Hetherington + Copyright (C) 2013-2016 Carl Hetherington - This program is free software; you can redistribute it and/or modify + This file is part of libdcp. + + libdcp is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. - This program is distributed in the hope that it will be useful, + libdcp is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. - + along with libdcp. If not, see . + + In addition, as a special exception, the copyright holders give + permission to link the code of portions of this program with the + OpenSSL library under certain conditions as described in each + individual source file, and distribute linked combinations + including the two. + + You must obey the GNU General Public License in all respects + for all of the code used other than OpenSSL. If you modify + file(s) with this exception, you may extend this exception to your + version of the file(s), but you are not obligated to do so. If you + do not wish to do so, delete this exception statement from your + version. If you delete this exception statement from all source + files in the program, then also delete it here. */ /** @file src/signer_chain.cc @@ -24,20 +38,29 @@ #include "certificate_chain.h" #include "exceptions.h" #include "util.h" -#include "KM_util.h" +#include "dcp_assert.h" +#include "compose.hpp" +#include +#include +#include +#include +#include +#include +#include #include #include #include +#include #include #include +#include #include -#include using std::string; using std::ofstream; using std::ifstream; -using std::stringstream; -using std::cout; +using std::runtime_error; +using namespace dcp; /** Run a shell command. * @param cmd Command to run (UTF8-encoded). @@ -83,9 +106,7 @@ command (string cmd) int const code = WEXITSTATUS (r); #endif if (code) { - stringstream s; - s << "error " << code << " in " << cmd << " within " << boost::filesystem::current_path(); - throw dcp::MiscError (s.str()); + throw dcp::MiscError (String::compose ("error %1 in %2 within %3", code, cmd, boost::filesystem::current_path().string())); } } @@ -100,9 +121,7 @@ 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 */ - stringstream s; - s << "\"" << openssl.string() << "\" rsa -outform PEM -pubout -in " << private_key.string() << " -out " << public_name.string (); - command (s.str().c_str ()); + 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 */ @@ -126,7 +145,7 @@ public_key_digest (boost::filesystem::path private_key, boost::filesystem::path } /* Decode the base64 of the public key */ - + unsigned char buffer[512]; int const N = dcp::base64_decode (pub, buffer, 1024); @@ -150,18 +169,24 @@ public_key_digest (boost::filesystem::path private_key, boost::filesystem::path string dig = Kumu::base64encode (digest, SHA_DIGEST_LENGTH, digest_base64, 64); #ifdef LIBDCP_WINDOWS boost::replace_all (dig, "/", "\\/"); -#else +#else boost::replace_all (dig, "/", "\\\\/"); -#endif +#endif return dig; } -boost::filesystem::path -dcp::make_certificate_chain (boost::filesystem::path openssl) +CertificateChain::CertificateChain ( + boost::filesystem::path openssl, + string organisation, + string organisational_unit, + string root_common_name, + string intermediate_common_name, + string leaf_common_name + ) { boost::filesystem::path directory = boost::filesystem::temp_directory_path() / boost::filesystem::unique_path (); boost::filesystem::create_directories (directory); - + boost::filesystem::path const cwd = boost::filesystem::current_path (); boost::filesystem::current_path (directory); @@ -185,14 +210,19 @@ dcp::make_certificate_chain (boost::filesystem::path openssl) << "CN = Entity and dnQualifier\n"; } - string const ca_subject = "/O=example.org/OU=example.org/CN=.smpte-430-2.ROOT.NOT_FOR_PRODUCTION/dnQualifier=" + public_key_digest ("ca.key", openssl); + string const ca_subject = "/O=" + organisation + + "/OU=" + organisational_unit + + "/CN=" + root_common_name + + "/dnQualifier=" + public_key_digest ("ca.key", openssl); { - stringstream c; - c << quoted_openssl - << " req -new -x509 -sha256 -config ca.cnf -days 3650 -set_serial 5" - << " -subj " << ca_subject << " -key ca.key -outform PEM -out ca.self-signed.pem"; - command (c.str().c_str()); + 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 + ) + ); } command (quoted_openssl + " genrsa -out intermediate.key 2048"); @@ -212,18 +242,21 @@ dcp::make_certificate_chain (boost::filesystem::path openssl) << "OU = Organization unit\n" << "CN = Entity and dnQualifier\n"; } - - string const inter_subject = "/O=example.org/OU=example.org/CN=.smpte-430-2.INTERMEDIATE.NOT_FOR_PRODUCTION/dnQualifier=" - + public_key_digest ("intermediate.key", openssl); + + string const inter_subject = "/O=" + organisation + + "/OU=" + organisational_unit + + "/CN=" + intermediate_common_name + + "/dnQualifier=" + public_key_digest ("intermediate.key", openssl); { - stringstream s; - s << quoted_openssl - << " req -new -config intermediate.cnf -days 3649 -subj " << inter_subject << " -key intermediate.key -out intermediate.csr"; - command (s.str().c_str()); + command ( + String::compose ( + "%1 req -new -config intermediate.cnf -days 3649 -subj \"%2\" -key intermediate.key -out intermediate.csr", + quoted_openssl, inter_subject + ) + ); } - command ( quoted_openssl + " x509 -req -sha256 -days 3649 -CA ca.self-signed.pem -CAkey ca.key -set_serial 6" @@ -248,13 +281,18 @@ dcp::make_certificate_chain (boost::filesystem::path openssl) << "CN = Entity and dnQualifier\n"; } - string const leaf_subject = "/O=example.org/OU=example.org/CN=CS.smpte-430-2.LEAF.NOT_FOR_PRODUCTION/dnQualifier=" - + public_key_digest ("leaf.key", openssl); + string const leaf_subject = "/O=" + organisation + + "/OU=" + organisational_unit + + "/CN=" + leaf_common_name + + "/dnQualifier=" + public_key_digest ("leaf.key", openssl); { - stringstream s; - s << quoted_openssl << " req -new -config leaf.cnf -days 3648 -subj " << leaf_subject << " -key leaf.key -outform PEM -out leaf.csr"; - command (s.str().c_str()); + 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 + ) + ); } command ( @@ -265,5 +303,275 @@ dcp::make_certificate_chain (boost::filesystem::path openssl) boost::filesystem::current_path (cwd); - return directory; + _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); +} + +/** @return Root certificate */ +Certificate +CertificateChain::root () const +{ + DCP_ASSERT (!_certificates.empty()); + return _certificates.front (); +} + +/** @return Leaf certificate */ +Certificate +CertificateChain::leaf () const +{ + DCP_ASSERT (_certificates.size() >= 2); + return _certificates.back (); +} + +/** @return Certificates in order from root to leaf */ +CertificateChain::List +CertificateChain::root_to_leaf () const +{ + return _certificates; +} + +/** @return Certificates in order from leaf to root */ +CertificateChain::List +CertificateChain::leaf_to_root () const +{ + List c = _certificates; + c.reverse (); + return c; +} + +/** Add a certificate to the end of 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); +} + +/** Remove the i'th certificate in the list, as listed + * from root to leaf. + */ +void +CertificateChain::remove (int i) +{ + List::iterator j = _certificates.begin (); + while (j != _certificates.end () && i > 0) { + --i; + ++j; + } + + if (j != _certificates.end ()) { + _certificates.erase (j); + } +} + +/** Check to see if the 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::valid () const +{ + /* Check the certificate chain */ + + X509_STORE* store = X509_STORE_new (); + if (!store) { + return false; + } + + for (List::const_iterator i = _certificates.begin(); i != _certificates.end(); ++i) { + + List::const_iterator j = i; + ++j; + if (j == _certificates.end ()) { + break; + } + + if (!X509_STORE_add_cert (store, i->x509 ())) { + X509_STORE_free (store); + return false; + } + + X509_STORE_CTX* ctx = X509_STORE_CTX_new (); + if (!ctx) { + X509_STORE_free (store); + return false; + } + + X509_STORE_set_flags (store, 0); + if (!X509_STORE_CTX_init (ctx, store, j->x509 (), 0)) { + X509_STORE_CTX_free (ctx); + X509_STORE_free (store); + return false; + } + + int v = X509_verify_cert (ctx); + X509_STORE_CTX_free (ctx); + + if (v == 0) { + X509_STORE_free (store); + return false; + } + } + + X509_STORE_free (store); + + /* Check that the leaf certificate matches the private key, if there is one */ + + if (!_key) { + return true; + } + + BIO* bio = BIO_new_mem_buf (const_cast (_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 (); + bool const valid = !BN_cmp (private_key->n, public_key->n); + BIO_free (bio); + + return valid; +} + +/** @return true if the chain is now in order from root to leaf, + * false if no correct order was found. + */ +bool +CertificateChain::attempt_reorder () +{ + List original = _certificates; + _certificates.sort (); + do { + if (valid ()) { + return true; + } + } while (std::next_permutation (_certificates.begin(), _certificates.end ())); + + _certificates = original; + return false; +} + +/** Add a <Signer> and <ds:Signature> 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 +{ + /* */ + + xmlpp::Element* signer = parent->add_child("Signer"); + xmlpp::Element* data = signer->add_child("X509Data", "dsig"); + xmlpp::Element* 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()); + + /* */ + + xmlpp::Element* signature = parent->add_child("Signature", "dsig"); + + xmlpp::Element* 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) { + 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"); + reference->set_attribute ("URI", ""); + + xmlpp::Element* transforms = reference->add_child("Transforms", "dsig"); + transforms->add_child("Transform", "dsig")->set_attribute ( + "Algorithm", "http://www.w3.org/2000/09/xmldsig#enveloped-signature" + ); + + reference->add_child("DigestMethod", "dsig")->set_attribute("Algorithm", "http://www.w3.org/2000/09/xmldsig#sha1"); + /* This will be filled in by the signing later */ + reference->add_child("DigestValue", "dsig"); + + signature->add_child("SignatureValue", "dsig"); + signature->add_child("KeyInfo", "dsig"); + add_signature_value (signature, "dsig"); +} + + +/** 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 +{ + cxml::Node cp (parent); + xmlpp::Node* 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); + + { + xmlpp::Element* 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 ()); + } + + data->add_child("X509Certificate", ns)->add_child_text (i.certificate()); + } + + xmlSecDSigCtxPtr signature_context = xmlSecDSigCtxCreate (0); + if (signature_context == 0) { + throw MiscError ("could not create signature context"); + } + + signature_context->signKey = xmlSecCryptoAppKeyLoadMemory ( + reinterpret_cast (_key->c_str()), _key->size(), xmlSecKeyDataFormatPem, 0, 0, 0 + ); + + if (signature_context->signKey == 0) { + 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 (_key->c_str())) < 0) { + throw MiscError ("could not set key name"); + } + + int const r = xmlSecDSigCtxSign (signature_context, parent->cobj ()); + if (r < 0) { + throw MiscError (String::compose ("could not sign (%1)", r)); + } + + xmlSecDSigCtxDestroy (signature_context); +} + +string +CertificateChain::chain () const +{ + string o; + BOOST_FOREACH (Certificate const &i, root_to_leaf ()) { + o += i.certificate(true); + } + + return o; }