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;
396
388
fprintf_plus(stderr,
397
389
"Setting system clock to key file mtime");
399
if(clock_settime(CLOCK_REALTIME, &keystat.st_mtim) != 0){
400
perror_plus("clock_settime");
391
time_t keytime = keystat.st_mtim.tv_sec;
392
if(stime(&keytime) != 0){
393
perror_plus("stime");
402
395
ret = lower_privileges();
731
fprintf_plus(stderr, "Attempting to use public key %s and"
732
" 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",
737
#if GNUTLS_VERSION_NUMBER >= 0x030606
738
ret = gnutls_certificate_set_rawpk_key_file
739
(mc->cred, pubkeyfilename, seckeyfilename,
740
GNUTLS_X509_FMT_PEM, /* format */
743
GNUTLS_KEY_DIGITAL_SIGNATURE | GNUTLS_KEY_KEY_ENCIPHERMENT,
745
0, /* names_length */
747
GNUTLS_PKCS_PLAIN | GNUTLS_PKCS_NULL_PASSWORD,
748
0); /* pkcs11_flags */
749
#elif GNUTLS_VERSION_NUMBER < 0x030600
750
731
ret = gnutls_certificate_set_openpgp_key_file
751
732
(mc->cred, pubkeyfilename, seckeyfilename,
752
733
GNUTLS_OPENPGP_FMT_BASE64);
754
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
756
734
if(ret != GNUTLS_E_SUCCESS){
757
735
fprintf_plus(stderr,
758
"Error[%d] while reading the key pair ('%s',"
736
"Error[%d] while reading the OpenPGP key pair ('%s',"
759
737
" '%s')\n", ret, pubkeyfilename, seckeyfilename);
760
738
fprintf_plus(stderr, "The GnuTLS error is: %s\n",
761
739
safer_gnutls_strerror(ret));
833
811
if(dhparamsfilename == NULL){
834
812
if(mc->dh_bits == 0){
835
#if GNUTLS_VERSION_NUMBER < 0x030600
836
813
/* Find out the optimal number of DH bits */
837
814
/* Try to read the private key file */
838
815
gnutls_datum_t buffer = { .data = NULL, .size = 0 };
936
913
safer_gnutls_strerror(ret));
940
} else { /* dh_bits != 0 */
942
fprintf_plus(stderr, "DH bits explicitly set to %u\n",
945
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
946
if(ret != GNUTLS_E_SUCCESS){
947
fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
948
" bits): %s\n", mc->dh_bits,
949
safer_gnutls_strerror(ret));
952
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);
969
943
/* GnuTLS session creation */
971
ret = gnutls_init(session, (GNUTLS_SERVER
972
#if GNUTLS_VERSION_NUMBER >= 0x030506
975
#if GNUTLS_VERSION_NUMBER >= 0x030606
976
| GNUTLS_ENABLE_RAWPK
945
ret = gnutls_init(session, GNUTLS_SERVER);
1081
1047
ret = setgroups(0, NULL);
1083
1049
perror_plus("setgroups");
1085
1050
_exit(EX_NOPERM);
1088
1053
ret = dup2(devnull, STDIN_FILENO);
1090
1055
perror_plus("dup2(devnull, STDIN_FILENO)");
1092
1056
_exit(EX_OSERR);
1094
1058
ret = close(devnull);
1096
1060
perror_plus("close");
1098
1063
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
2468
2428
int main(int argc, char *argv[]){
2469
2429
mandos_context mc = { .server = NULL, .dh_bits = 0,
2470
#if GNUTLS_VERSION_NUMBER >= 0x030606
2471
.priority = "SECURE128:!CTYPE-X.509"
2472
":+CTYPE-RAWPK:!RSA:!VERS-ALL:+VERS-TLS1.3"
2474
#elif GNUTLS_VERSION_NUMBER < 0x030600
2475
2430
.priority = "SECURE256:!CTYPE-X.509"
2476
2431
":+CTYPE-OPENPGP:!RSA:+SIGN-DSA-SHA256",
2478
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
2480
2432
.current_server = NULL, .interfaces = NULL,
2481
2433
.interfaces_size = 0 };
2482
2434
AvahiSServiceBrowser *sb = NULL;
2493
2445
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
2494
2446
const char *seckey = PATHDIR "/" SECKEY;
2495
2447
const char *pubkey = PATHDIR "/" PUBKEY;
2496
#if GNUTLS_VERSION_NUMBER >= 0x030606
2497
const char *tls_privkey = PATHDIR "/" TLS_PRIVKEY;
2498
const char *tls_pubkey = PATHDIR "/" TLS_PUBKEY;
2500
2448
const char *dh_params_file = NULL;
2501
2449
char *interfaces_hooks = NULL;
2550
2498
{ .name = "pubkey", .key = 'p',
2552
2500
.doc = "OpenPGP public key file base name",
2554
{ .name = "tls-privkey", .key = 't',
2556
#if GNUTLS_VERSION_NUMBER >= 0x030606
2557
.doc = "TLS private key file base name",
2559
.doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
2562
{ .name = "tls-pubkey", .key = 'T',
2564
#if GNUTLS_VERSION_NUMBER >= 0x030606
2565
.doc = "TLS public key file base name",
2567
.doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
2570
2502
{ .name = "dh-bits", .key = 129,
2572
2504
.doc = "Bit length of the prime number used in the"
2628
2560
case 'p': /* --pubkey */
2631
case 't': /* --tls-privkey */
2632
#if GNUTLS_VERSION_NUMBER >= 0x030606
2636
case 'T': /* --tls-pubkey */
2637
#if GNUTLS_VERSION_NUMBER >= 0x030606
2641
2563
case 129: /* --dh-bits */
2643
2565
tmpmax = strtoimax(arg, &tmp, 10);
2678
2600
argp_state_help(state, state->out_stream,
2679
2601
(ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
2680
2602
& ~(unsigned int)ARGP_HELP_EXIT_OK);
2681
__builtin_unreachable();
2682
2603
case -3: /* --usage */
2683
2604
argp_state_help(state, state->out_stream,
2684
2605
ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
2685
__builtin_unreachable();
2686
2606
case 'V': /* --version */
2687
2607
fprintf_plus(state->out_stream, "%s\n", argp_program_version);
2688
2608
exit(argp_err_exit_status);
3002
#if GNUTLS_VERSION_NUMBER >= 0x030606
3003
ret = init_gnutls_global(tls_pubkey, tls_privkey, dh_params_file, &mc);
3004
#elif GNUTLS_VERSION_NUMBER < 0x030600
3005
2922
ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
3007
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
3010
2924
fprintf_plus(stderr, "init_gnutls_global failed\n");
3011
2925
exitcode = EX_UNAVAILABLE;