src/crypto/sslUtil.cpp

   1 #include "sslUtil.h"
   2
   3 #include <sys/types.h>
   4 #include <termios.h>
   5 #include <unistd.h>
   6
   7 #include <iostream>
   8
   9 #include "crypto/CRL.h"
  10
  11 std::shared_ptr<int> ssl_lib_ref(
  12     new int( SSL_library_init() ),
  13     []( int* ref ) {
  14         delete ref;
  15
  16         EVP_cleanup();
  17         CRYPTO_cleanup_all_ex_data();
  18     } );
  19
  20 std::shared_ptr<X509> loadX509FromFile( const std::string& filename ) {
  21     std::shared_ptr<FILE> f( fopen( filename.c_str(), "r" ), fclose );
  22
  23     if( !f ) {
  24         return std::shared_ptr<X509>();
  25     }
  26
  27     X509* key = PEM_read_X509( f.get(), NULL, NULL, 0 );
  28
  29     if( !key ) {
  30         return std::shared_ptr<X509>();
  31     }
  32
  33     return std::shared_ptr<X509>(
  34         key,
  35         []( X509 * ref ) {
  36             X509_free( ref );
  37         } );
  38 }
  39
  40 std::shared_ptr<EVP_PKEY> loadPkeyFromFile( const std::string& filename ) {
  41     std::shared_ptr<FILE> f( fopen( filename.c_str(), "r" ), []( FILE * ptr ) {
  42         if( ptr ) {
  43             fclose( ptr );
  44         }
  45     } );
  46
  47     if( !f ) {
  48         return std::shared_ptr<EVP_PKEY>();
  49     }
  50
  51     EVP_PKEY* key = PEM_read_PrivateKey( f.get(), NULL, NULL, 0 );
  52
  53     if( !key ) {
  54         return std::shared_ptr<EVP_PKEY>();
  55     }
  56
  57     return std::shared_ptr<EVP_PKEY>(
  58         key,
  59         []( EVP_PKEY * ref ) {
  60             EVP_PKEY_free( ref );
  61         } );
  62 }
  63
  64 int gencb( int a, int b, BN_GENCB* g ) {
  65     ( void ) a;
  66     ( void ) b;
  67     ( void ) g;
  68     std::cout << ( a == 0 ? "." : "+" ) << std::flush;
  69     return 1;
  70 }
  71
  72 static int verify_callback( int preverify_ok, X509_STORE_CTX* ctx ) {
  73     if( !preverify_ok ) {
  74         //auto cert = X509_STORE_CTX_get_current_cert(ctx);
  75         //BIO *o = BIO_new_fp(stdout,BIO_NOCLOSE);
  76         //X509_print_ex(o, cert, XN_FLAG_COMPAT, X509_FLAG_COMPAT);
  77         //BIO_free(o);
  78
  79         std::cout << "Verification failed: " << preverify_ok << " because " << X509_STORE_CTX_get_error( ctx ) << std::endl;
  80     }
  81
  82     return preverify_ok;
  83 }
  84
  85 static std::shared_ptr<DH> dh_param;
  86
  87 std::shared_ptr<SSL_CTX> generateSSLContext( bool server ) {
  88     std::shared_ptr<SSL_CTX> ctx = std::shared_ptr<SSL_CTX>( SSL_CTX_new( TLSv1_2_method() ), []( SSL_CTX * p ) {
  89         SSL_CTX_free( p );
  90     } );
  91
  92     if( !SSL_CTX_set_cipher_list( ctx.get(), "HIGH:+CAMELLIA256:!eNull:!aNULL:!ADH:!MD5:-RSA+AES+SHA1:!RC4:!DES:!3DES:!SEED:!EXP:!AES128:!CAMELLIA128" ) ) {
  93         throw "Cannot set cipher list. Your source is broken.";
  94     }
  95
  96     SSL_CTX_set_verify( ctx.get(), SSL_VERIFY_PEER | SSL_VERIFY_FAIL_IF_NO_PEER_CERT, verify_callback );
  97     SSL_CTX_use_certificate_file( ctx.get(), server ? "keys/signer_server.crt" : "keys/signer_client.crt", SSL_FILETYPE_PEM );
  98     SSL_CTX_use_PrivateKey_file( ctx.get(), server ? "keys/signer_server.key" : "keys/signer_client.key", SSL_FILETYPE_PEM );
  99
 100     if( 1 != SSL_CTX_load_verify_locations( ctx.get(), "keys/ca.crt", 0 ) ) {
 101         throw "Cannot load CA store for certificate validation.";
 102     }
 103
 104     if( server ) {
 105         STACK_OF( X509_NAME ) *names = SSL_load_client_CA_file( "keys/env.crt" );
 106
 107         if( names ) {
 108             SSL_CTX_set_client_CA_list( ctx.get(), names );
 109         } else {
 110             // error
 111         }
 112
 113         if( !dh_param ) {
 114             std::shared_ptr<FILE> paramfile( fopen( "dh_param.pem", "r" ), fclose );
 115
 116             if( paramfile ) {
 117                 dh_param = std::shared_ptr<DH>( PEM_read_DHparams( paramfile.get(), NULL, NULL, NULL ), DH_free );
 118             } else {
 119                 dh_param = std::shared_ptr<DH>( DH_new(), DH_free );
 120                 std::cout << "Generating DH params" << std::endl;
 121                 BN_GENCB cb;
 122                 cb.ver = 2;
 123                 cb.arg = 0;
 124                 cb.cb.cb_2 = gencb;
 125
 126                 if( !DH_generate_parameters_ex( dh_param.get(), 2048, 5, &cb ) ) {
 127                     throw "DH generation failed";
 128                 }
 129
 130                 std::cout << std::endl;
 131                 paramfile = std::shared_ptr<FILE>( fopen( "dh_param.pem", "w" ), fclose );
 132
 133                 if( paramfile ) {
 134                     PEM_write_DHparams( paramfile.get(), dh_param.get() );
 135                 }
 136             }
 137         }
 138
 139         if( !SSL_CTX_set_tmp_dh( ctx.get(), dh_param.get() ) ) {
 140             throw "Cannot set tmp dh.";
 141         }
 142     }
 143
 144     return ctx;
 145 }
 146
 147 void setupSerial( std::shared_ptr<FILE> f ) {
 148     struct termios attr;
 149
 150     if( tcgetattr( fileno( f.get() ), &attr ) ) {
 151         throw "failed to get attrs";
 152     }
 153
 154     attr.c_iflag &= ~( IGNBRK | BRKINT | PARMRK | ISTRIP | INLCR | IGNCR | ICRNL | IXON );
 155     attr.c_oflag &= ~OPOST;
 156     attr.c_lflag &= ~( ECHO | ECHONL | ICANON | ISIG | IEXTEN );
 157     attr.c_cflag &= ~( CSIZE | PARENB );
 158     attr.c_cflag |= CS8;
 159
 160     cfsetispeed( &attr, B115200 );
 161     cfsetospeed( &attr, B115200 );
 162
 163     if( tcsetattr( fileno( f.get() ), TCSANOW, &attr ) ) {
 164         throw "failed to get attrs";
 165     }
 166 }
 167
 168 std::shared_ptr<BIO> openSerial( const std::string& name ) {
 169     std::shared_ptr<FILE> f( fopen( name.c_str(), "r+" ), fclose );
 170
 171     if( !f ) {
 172         std::cout << "Opening serial device failed" << std::endl;
 173         return std::shared_ptr<BIO>();
 174     }
 175
 176     setupSerial( f );
 177     return std::shared_ptr<BIO>(
 178         BIO_new_fd( fileno( f.get() ), 0 ),
 179         [f]( BIO* b ) {
 180             BIO_free(b);
 181         } );
 182 }
 183
 184 CAConfig::CAConfig( const std::string& name ) : path( "ca/" + name ), name( name ) {
 185     ca = loadX509FromFile( path + "/ca.crt" );
 186     caKey = loadPkeyFromFile( path + "/ca.key" );
 187     ASN1_TIME* tm = X509_get_notBefore( ca );
 188     notBefore = std::shared_ptr<ASN1_TIME>( tm, ASN1_TIME_free );
 189 }
 190
 191 std::string timeToString( std::shared_ptr<ASN1_TIME> time ) {
 192     std::shared_ptr<ASN1_GENERALIZEDTIME> gtime( ASN1_TIME_to_generalizedtime( time.get(), 0 ) );
 193     std::string strdate( ( char* ) ASN1_STRING_data( gtime.get() ), ASN1_STRING_length( gtime.get() ) );
 194
 195     if( strdate[strdate.size() - 1] != 'Z' ) {
 196         throw "Got invalid date?";
 197     }
 198
 199     return strdate.substr( 0, strdate.size() - 1 );
 200 }
 201
 202 void extractTimes( std::shared_ptr<X509> target,  std::shared_ptr<SignedCertificate> cert ) {
 203     cert->before = timeToString( std::shared_ptr<ASN1_TIME>( X509_get_notBefore( target.get() ), ASN1_TIME_free ) );
 204     cert->after = timeToString( std::shared_ptr<ASN1_TIME>( X509_get_notAfter( target.get() ), ASN1_TIME_free ) );
 205 }
 206
 207 bool CAConfig::crlNeedsResign() {
 208     std::shared_ptr<CRL> crl( new CRL( path + "/ca.crl" ) );
 209     return crl->needsResign();
 210 }