124
124
init_gnutls_session(),
126
#if GNUTLS_VERSION_NUMBER < 0x030600
127
126
#include <gnutls/openpgp.h>
128
127
/* gnutls_certificate_set_openpgp_key_file(),
129
128
GNUTLS_OPENPGP_FMT_BASE64 */
130
#elif GNUTLS_VERSION_NUMBER >= 0x030606
131
#include <gnutls/x509.h> /* gnutls_pkcs_encrypt_flags_t,
133
GNUTLS_PKCS_NULL_PASSWORD */
137
131
#include <gpgme.h> /* All GPGME types, constants and
145
139
#define PATHDIR "/conf/conf.d/mandos"
146
140
#define SECKEY "seckey.txt"
147
141
#define PUBKEY "pubkey.txt"
148
#define TLS_PRIVKEY "tls-privkey.pem"
149
#define TLS_PUBKEY "tls-pubkey.pem"
150
142
#define HOOKDIR "/lib/mandos/network-hooks.d"
152
144
bool debug = false;
732
fprintf_plus(stderr, "Attempting to use public key %s and"
733
" private key %s as GnuTLS credentials\n",
725
fprintf_plus(stderr, "Attempting to use OpenPGP public key %s and"
726
" secret key %s as GnuTLS credentials\n",
738
#if GNUTLS_VERSION_NUMBER >= 0x030606
739
ret = gnutls_certificate_set_rawpk_key_file
740
(mc->cred, pubkeyfilename, seckeyfilename,
741
GNUTLS_X509_FMT_PEM, /* format */
744
GNUTLS_KEY_DIGITAL_SIGNATURE | GNUTLS_KEY_KEY_ENCIPHERMENT,
746
0, /* names_length */
748
GNUTLS_PKCS_PLAIN | GNUTLS_PKCS_NULL_PASSWORD,
749
0); /* pkcs11_flags */
750
#elif GNUTLS_VERSION_NUMBER < 0x030600
751
731
ret = gnutls_certificate_set_openpgp_key_file
752
732
(mc->cred, pubkeyfilename, seckeyfilename,
753
733
GNUTLS_OPENPGP_FMT_BASE64);
755
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
757
734
if(ret != GNUTLS_E_SUCCESS){
758
735
fprintf_plus(stderr,
759
"Error[%d] while reading the key pair ('%s',"
736
"Error[%d] while reading the OpenPGP key pair ('%s',"
760
737
" '%s')\n", ret, pubkeyfilename, seckeyfilename);
761
738
fprintf_plus(stderr, "The GnuTLS error is: %s\n",
762
739
safer_gnutls_strerror(ret));
834
811
if(dhparamsfilename == NULL){
835
812
if(mc->dh_bits == 0){
836
#if GNUTLS_VERSION_NUMBER < 0x030600
837
813
/* Find out the optimal number of DH bits */
838
814
/* Try to read the private key file */
839
815
gnutls_datum_t buffer = { .data = NULL, .size = 0 };
937
913
safer_gnutls_strerror(ret));
941
} else { /* dh_bits != 0 */
943
fprintf_plus(stderr, "DH bits explicitly set to %u\n",
946
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
947
if(ret != GNUTLS_E_SUCCESS){
948
fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
949
" bits): %s\n", mc->dh_bits,
950
safer_gnutls_strerror(ret));
953
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
917
fprintf_plus(stderr, "DH bits explicitly set to %u\n",
920
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
921
if(ret != GNUTLS_E_SUCCESS){
922
fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
923
" bits): %s\n", mc->dh_bits,
924
safer_gnutls_strerror(ret));
928
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
970
943
/* GnuTLS session creation */
972
ret = gnutls_init(session, (GNUTLS_SERVER
973
#if GNUTLS_VERSION_NUMBER >= 0x030506
976
#if GNUTLS_VERSION_NUMBER >= 0x030606
977
| GNUTLS_ENABLE_RAWPK
945
ret = gnutls_init(session, GNUTLS_SERVER);
2462
2428
int main(int argc, char *argv[]){
2463
2429
mandos_context mc = { .server = NULL, .dh_bits = 0,
2464
#if GNUTLS_VERSION_NUMBER >= 0x030606
2465
.priority = "SECURE128:!CTYPE-X.509"
2466
":+CTYPE-RAWPK:!RSA:!VERS-ALL:+VERS-TLS1.3"
2468
#elif GNUTLS_VERSION_NUMBER < 0x030600
2469
2430
.priority = "SECURE256:!CTYPE-X.509"
2470
2431
":+CTYPE-OPENPGP:!RSA:+SIGN-DSA-SHA256",
2472
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
2474
2432
.current_server = NULL, .interfaces = NULL,
2475
2433
.interfaces_size = 0 };
2476
2434
AvahiSServiceBrowser *sb = NULL;
2487
2445
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
2488
2446
const char *seckey = PATHDIR "/" SECKEY;
2489
2447
const char *pubkey = PATHDIR "/" PUBKEY;
2490
#if GNUTLS_VERSION_NUMBER >= 0x030606
2491
const char *tls_privkey = PATHDIR "/" TLS_PRIVKEY;
2492
const char *tls_pubkey = PATHDIR "/" TLS_PUBKEY;
2494
2448
const char *dh_params_file = NULL;
2495
2449
char *interfaces_hooks = NULL;
2544
2498
{ .name = "pubkey", .key = 'p',
2546
2500
.doc = "OpenPGP public key file base name",
2548
{ .name = "tls-privkey", .key = 't',
2550
#if GNUTLS_VERSION_NUMBER >= 0x030606
2551
.doc = "TLS private key file base name",
2553
.doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
2556
{ .name = "tls-pubkey", .key = 'T',
2558
#if GNUTLS_VERSION_NUMBER >= 0x030606
2559
.doc = "TLS public key file base name",
2561
.doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
2564
2502
{ .name = "dh-bits", .key = 129,
2566
2504
.doc = "Bit length of the prime number used in the"
2622
2560
case 'p': /* --pubkey */
2625
case 't': /* --tls-privkey */
2626
#if GNUTLS_VERSION_NUMBER >= 0x030606
2630
case 'T': /* --tls-pubkey */
2631
#if GNUTLS_VERSION_NUMBER >= 0x030606
2635
2563
case 129: /* --dh-bits */
2637
2565
tmpmax = strtoimax(arg, &tmp, 10);
2994
#if GNUTLS_VERSION_NUMBER >= 0x030606
2995
ret = init_gnutls_global(tls_pubkey, tls_privkey, dh_params_file, &mc);
2996
#elif GNUTLS_VERSION_NUMBER < 0x030600
2997
2922
ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
2999
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
3002
2924
fprintf_plus(stderr, "init_gnutls_global failed\n");
3003
2925
exitcode = EX_UNAVAILABLE;