#include <sys_defs.h>
#ifdef USE_TLS
#include <stdio.h>
#include <msg.h>
#include <mail_params.h>
#define TLS_INTERNAL
#include <tls.h>
static unsigned char dh512_p[] = {
0x88, 0x3F, 0x00, 0xAF, 0xFC, 0x0C, 0x8A, 0xB8, 0x35, 0xCD, 0xE5, 0xC2,
0x0F, 0x55, 0xDF, 0x06, 0x3F, 0x16, 0x07, 0xBF, 0xCE, 0x13, 0x35, 0xE4,
0x1C, 0x1E, 0x03, 0xF3, 0xAB, 0x17, 0xF6, 0x63, 0x50, 0x63, 0x67, 0x3E,
0x10, 0xD7, 0x3E, 0xB4, 0xEB, 0x46, 0x8C, 0x40, 0x50, 0xE6, 0x91, 0xA5,
0x6E, 0x01, 0x45, 0xDE, 0xC9, 0xB1, 0x1F, 0x64, 0x54, 0xFA, 0xD9, 0xAB,
0x4F, 0x70, 0xBA, 0x5B,
};
static unsigned char dh1024_p[] = {
0xB0, 0xFE, 0xB4, 0xCF, 0xD4, 0x55, 0x07, 0xE7, 0xCC, 0x88, 0x59, 0x0D,
0x17, 0x26, 0xC5, 0x0C, 0xA5, 0x4A, 0x92, 0x23, 0x81, 0x78, 0xDA, 0x88,
0xAA, 0x4C, 0x13, 0x06, 0xBF, 0x5D, 0x2F, 0x9E, 0xBC, 0x96, 0xB8, 0x51,
0x00, 0x9D, 0x0C, 0x0D, 0x75, 0xAD, 0xFD, 0x3B, 0xB1, 0x7E, 0x71, 0x4F,
0x3F, 0x91, 0x54, 0x14, 0x44, 0xB8, 0x30, 0x25, 0x1C, 0xEB, 0xDF, 0x72,
0x9C, 0x4C, 0xF1, 0x89, 0x0D, 0x68, 0x3F, 0x94, 0x8E, 0xA4, 0xFB, 0x76,
0x89, 0x18, 0xB2, 0x91, 0x16, 0x90, 0x01, 0x99, 0x66, 0x8C, 0x53, 0x81,
0x4E, 0x27, 0x3D, 0x99, 0xE7, 0x5A, 0x7A, 0xAF, 0xD5, 0xEC, 0xE2, 0x7E,
0xFA, 0xED, 0x01, 0x18, 0xC2, 0x78, 0x25, 0x59, 0x06, 0x5C, 0x39, 0xF6,
0xCD, 0x49, 0x54, 0xAF, 0xC1, 0xB1, 0xEA, 0x4A, 0xF9, 0x53, 0xD0, 0xDF,
0x6D, 0xAF, 0xD4, 0x93, 0xE7, 0xBA, 0xAE, 0x9B,
};
static DH *dh_1024 = 0;
static DH *dh_512 = 0;
void tls_set_dh_from_file(const char *path, int bits)
{
FILE *paramfile;
DH **dhPtr;
switch (bits) {
case 512:
dhPtr = &dh_512;
break;
case 1024:
dhPtr = &dh_1024;
break;
default:
msg_panic("Invalid DH parameters size %d, file %s", bits, path);
}
if ((paramfile = fopen(path, "r")) != 0) {
if ((*dhPtr = PEM_read_DHparams(paramfile, 0, 0, 0)) == 0) {
msg_warn("cannot load %d-bit DH parameters from file %s"
" -- using compiled-in defaults", bits, path);
tls_print_errors();
}
(void) fclose(paramfile);
} else {
msg_warn("cannot load %d-bit DH parameters from file %s: %m"
" -- using compiled-in defaults", bits, path);
}
}
static DH *tls_get_dh(const unsigned char *p, int plen)
{
DH *dh;
static unsigned char g[] = {0x02,};
if ((dh = DH_new()) == 0) {
msg_warn("cannot create DH parameter set: %m");
return (0);
}
dh->p = BN_bin2bn(p, plen, (BIGNUM *) 0);
dh->g = BN_bin2bn(g, 1, (BIGNUM *) 0);
if ((dh->p == 0) || (dh->g == 0)) {
msg_warn("cannot load compiled-in DH parameters");
DH_free(dh);
return (0);
}
return (dh);
}
DH *tls_tmp_dh_cb(SSL *unused_ssl, int export, int keylength)
{
DH *dh_tmp;
if (export && keylength == 512) {
if (dh_512 == 0)
dh_512 = tls_get_dh(dh512_p, (int) sizeof(dh512_p));
dh_tmp = dh_512;
} else {
if (dh_1024 == 0)
dh_1024 = tls_get_dh(dh1024_p, (int) sizeof(dh1024_p));
dh_tmp = dh_1024;
}
return (dh_tmp);
}
int tls_set_eecdh_curve(SSL_CTX *server_ctx, const char *grade)
{
#if OPENSSL_VERSION_NUMBER >= 0x1000000fL && !defined(OPENSSL_NO_ECDH)
int nid;
EC_KEY *ecdh;
const char *curve;
int g;
#define TLS_EECDH_INVALID 0
#define TLS_EECDH_NONE 1
#define TLS_EECDH_STRONG 2
#define TLS_EECDH_ULTRA 3
static NAME_CODE eecdh_table[] = {
"none", TLS_EECDH_NONE,
"strong", TLS_EECDH_STRONG,
"ultra", TLS_EECDH_ULTRA,
0, TLS_EECDH_INVALID,
};
switch (g = name_code(eecdh_table, NAME_CODE_FLAG_NONE, grade)) {
default:
msg_panic("Invalid eecdh grade code: %d", g);
case TLS_EECDH_INVALID:
msg_warn("Invalid TLS eecdh grade \"%s\": EECDH disabled", grade);
return (0);
case TLS_EECDH_NONE:
return (1);
case TLS_EECDH_STRONG:
curve = var_tls_eecdh_strong;
break;
case TLS_EECDH_ULTRA:
curve = var_tls_eecdh_ultra;
break;
}
if ((nid = OBJ_sn2nid(curve)) == NID_undef) {
msg_warn("unknown curve \"%s\": disabling EECDH support", curve);
return (0);
}
ERR_clear_error();
if ((ecdh = EC_KEY_new_by_curve_name(nid)) == 0
|| SSL_CTX_set_tmp_ecdh(server_ctx, ecdh) == 0) {
msg_warn("unable to use curve \"%s\": disabling EECDH support", curve);
tls_print_errors();
return (0);
}
#endif
return (1);
}
#ifdef TEST
int main(int unused_argc, char **unused_argv)
{
tls_tmp_dh_cb(0, 1, 512);
tls_tmp_dh_cb(0, 1, 1024);
tls_tmp_dh_cb(0, 1, 2048);
tls_tmp_dh_cb(0, 0, 512);
return (0);
}
#endif
#endif