9
9
* "browse_callback", and parts of "main".
11
11
* Everything else is
12
* Copyright © 2008-2019 Teddy Hogeborn
13
* Copyright © 2008-2019 Björn Påhlsson
12
* Copyright © 2008-2018 Teddy Hogeborn
13
* Copyright © 2008-2018 Björn Påhlsson
15
15
* This file is part of Mandos.
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);
1082
1047
ret = setgroups(0, NULL);
1084
1049
perror_plus("setgroups");
1086
1050
_exit(EX_NOPERM);
1089
1053
ret = dup2(devnull, STDIN_FILENO);
1091
1055
perror_plus("dup2(devnull, STDIN_FILENO)");
1093
1056
_exit(EX_OSERR);
1095
1058
ret = close(devnull);
1097
1060
perror_plus("close");
1099
1063
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
2469
2428
int main(int argc, char *argv[]){
2470
2429
mandos_context mc = { .server = NULL, .dh_bits = 0,
2471
#if GNUTLS_VERSION_NUMBER >= 0x030606
2472
.priority = "SECURE128:!CTYPE-X.509"
2473
":+CTYPE-RAWPK:!RSA:!VERS-ALL:+VERS-TLS1.3"
2475
#elif GNUTLS_VERSION_NUMBER < 0x030600
2476
2430
.priority = "SECURE256:!CTYPE-X.509"
2477
2431
":+CTYPE-OPENPGP:!RSA:+SIGN-DSA-SHA256",
2479
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
2481
2432
.current_server = NULL, .interfaces = NULL,
2482
2433
.interfaces_size = 0 };
2483
2434
AvahiSServiceBrowser *sb = NULL;
2494
2445
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
2495
2446
const char *seckey = PATHDIR "/" SECKEY;
2496
2447
const char *pubkey = PATHDIR "/" PUBKEY;
2497
#if GNUTLS_VERSION_NUMBER >= 0x030606
2498
const char *tls_privkey = PATHDIR "/" TLS_PRIVKEY;
2499
const char *tls_pubkey = PATHDIR "/" TLS_PUBKEY;
2501
2448
const char *dh_params_file = NULL;
2502
2449
char *interfaces_hooks = NULL;
2551
2498
{ .name = "pubkey", .key = 'p',
2553
2500
.doc = "OpenPGP public key file base name",
2555
{ .name = "tls-privkey", .key = 't',
2557
#if GNUTLS_VERSION_NUMBER >= 0x030606
2558
.doc = "TLS private key file base name",
2560
.doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
2563
{ .name = "tls-pubkey", .key = 'T',
2565
#if GNUTLS_VERSION_NUMBER >= 0x030606
2566
.doc = "TLS public key file base name",
2568
.doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
2571
2502
{ .name = "dh-bits", .key = 129,
2573
2504
.doc = "Bit length of the prime number used in the"
2629
2560
case 'p': /* --pubkey */
2632
case 't': /* --tls-privkey */
2633
#if GNUTLS_VERSION_NUMBER >= 0x030606
2637
case 'T': /* --tls-pubkey */
2638
#if GNUTLS_VERSION_NUMBER >= 0x030606
2642
2563
case 129: /* --dh-bits */
2644
2565
tmpmax = strtoimax(arg, &tmp, 10);
2679
2600
argp_state_help(state, state->out_stream,
2680
2601
(ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
2681
2602
& ~(unsigned int)ARGP_HELP_EXIT_OK);
2682
__builtin_unreachable();
2683
2603
case -3: /* --usage */
2684
2604
argp_state_help(state, state->out_stream,
2685
2605
ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
2686
__builtin_unreachable();
2687
2606
case 'V': /* --version */
2688
2607
fprintf_plus(state->out_stream, "%s\n", argp_program_version);
2689
2608
exit(argp_err_exit_status);
3003
#if GNUTLS_VERSION_NUMBER >= 0x030606
3004
ret = init_gnutls_global(tls_pubkey, tls_privkey, dh_params_file, &mc);
3005
#elif GNUTLS_VERSION_NUMBER < 0x030600
3006
2922
ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
3008
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
3011
2924
fprintf_plus(stderr, "init_gnutls_global failed\n");
3012
2925
exitcode = EX_UNAVAILABLE;