111
46
#include <avahi-common/malloc.h>
112
47
#include <avahi-common/error.h>
115
#include <gnutls/gnutls.h> /* All GnuTLS types, constants and
118
init_gnutls_session(),
120
#include <gnutls/openpgp.h>
121
/* gnutls_certificate_set_openpgp_key_file(),
122
GNUTLS_OPENPGP_FMT_BASE64 */
125
#include <gpgme.h> /* All GPGME types, constants and
128
GPGME_PROTOCOL_OpenPGP,
50
#include <sys/types.h> /* socket(), inet_pton() */
51
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
52
struct in6_addr, inet_pton() */
53
#include <gnutls/gnutls.h> /* All GnuTLS stuff */
54
#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */
56
#include <unistd.h> /* close() */
57
#include <netinet/in.h>
58
#include <stdbool.h> /* true */
59
#include <string.h> /* memset */
60
#include <arpa/inet.h> /* inet_pton() */
61
#include <iso646.h> /* not */
64
#include <errno.h> /* perror() */
71
#define CERT_ROOT "/conf/conf.d/cryptkeyreq/"
73
#define CERTFILE CERT_ROOT "openpgp-client.txt"
74
#define KEYFILE CERT_ROOT "openpgp-client-key.txt"
131
75
#define BUFFER_SIZE 256
133
#define PATHDIR "/conf/conf.d/mandos"
134
#define SECKEY "seckey.txt"
135
#define PUBKEY "pubkey.txt"
136
#define HOOKDIR "/lib/mandos/network-hooks.d"
138
78
bool debug = false;
139
static const char mandos_protocol_version[] = "1";
140
const char *argp_program_version = "mandos-client " VERSION;
141
const char *argp_program_bug_address = "<mandos@recompile.se>";
142
static const char sys_class_net[] = "/sys/class/net";
143
char *connect_to = NULL;
144
const char *hookdir = HOOKDIR;
149
/* Doubly linked list that need to be circularly linked when used */
150
typedef struct server{
153
AvahiIfIndex if_index;
155
struct timespec last_seen;
160
/* Used for passing in values through the Avahi callback functions */
81
gnutls_session_t session;
163
82
gnutls_certificate_credentials_t cred;
164
unsigned int dh_bits;
165
83
gnutls_dh_params_t dh_params;
166
const char *priority;
87
ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
88
char **new_packet, const char *homedir){
89
gpgme_data_t dh_crypto, dh_plain;
168
server *current_server;
170
size_t interfaces_size;
173
/* global so signal handler can reach it*/
174
AvahiSimplePoll *simple_poll;
176
sig_atomic_t quit_now = 0;
177
int signal_received = 0;
179
/* Function to use when printing errors */
180
void perror_plus(const char *print_text){
182
fprintf(stderr, "Mandos plugin %s: ",
183
program_invocation_short_name);
188
__attribute__((format (gnu_printf, 2, 3), nonnull))
189
int fprintf_plus(FILE *stream, const char *format, ...){
191
va_start (ap, format);
193
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
194
program_invocation_short_name));
195
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
199
* Make additional room in "buffer" for at least BUFFER_SIZE more
200
* bytes. "buffer_capacity" is how much is currently allocated,
201
* "buffer_length" is how much is already used.
203
__attribute__((nonnull, warn_unused_result))
204
size_t incbuffer(char **buffer, size_t buffer_length,
205
size_t buffer_capacity){
206
if(buffer_length + BUFFER_SIZE > buffer_capacity){
207
char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
209
int old_errno = errno;
216
buffer_capacity += BUFFER_SIZE;
218
return buffer_capacity;
221
/* Add server to set of servers to retry periodically */
222
__attribute__((nonnull, warn_unused_result))
223
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
224
int af, server **current_server){
226
server *new_server = malloc(sizeof(server));
227
if(new_server == NULL){
228
perror_plus("malloc");
231
*new_server = (server){ .ip = strdup(ip),
233
.if_index = if_index,
235
if(new_server->ip == NULL){
236
perror_plus("strdup");
240
ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
242
perror_plus("clock_gettime");
244
#pragma GCC diagnostic push
245
#pragma GCC diagnostic ignored "-Wcast-qual"
247
free((char *)(new_server->ip));
249
#pragma GCC diagnostic pop
254
/* Special case of first server */
255
if(*current_server == NULL){
256
new_server->next = new_server;
257
new_server->prev = new_server;
258
*current_server = new_server;
260
/* Place the new server last in the list */
261
new_server->next = *current_server;
262
new_server->prev = (*current_server)->prev;
263
new_server->prev->next = new_server;
264
(*current_server)->prev = new_server;
272
__attribute__((nonnull, warn_unused_result))
273
static bool init_gpgme(const char * const seckey,
274
const char * const pubkey,
275
const char * const tempdir,
93
ssize_t new_packet_capacity = 0;
94
ssize_t new_packet_length = 0;
278
95
gpgme_engine_info_t engine_info;
281
* Helper function to insert pub and seckey to the engine keyring.
283
bool import_key(const char * const filename){
286
gpgme_data_t pgp_data;
288
fd = (int)TEMP_FAILURE_RETRY(open(filename, O_RDONLY));
294
rc = gpgme_data_new_from_fd(&pgp_data, fd);
295
if(rc != GPG_ERR_NO_ERROR){
296
fprintf_plus(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
297
gpgme_strsource(rc), gpgme_strerror(rc));
301
rc = gpgme_op_import(mc->ctx, pgp_data);
302
if(rc != GPG_ERR_NO_ERROR){
303
fprintf_plus(stderr, "bad gpgme_op_import: %s: %s\n",
304
gpgme_strsource(rc), gpgme_strerror(rc));
308
ret = (int)TEMP_FAILURE_RETRY(close(fd));
310
perror_plus("close");
312
gpgme_data_release(pgp_data);
317
fprintf_plus(stderr, "Initializing GPGME\n");
98
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
321
102
gpgme_check_version(NULL);
322
rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
323
if(rc != GPG_ERR_NO_ERROR){
324
fprintf_plus(stderr, "bad gpgme_engine_check_version: %s: %s\n",
325
gpgme_strsource(rc), gpgme_strerror(rc));
103
gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
329
/* Set GPGME home directory for the OpenPGP engine only */
330
rc = gpgme_get_engine_info(&engine_info);
331
if(rc != GPG_ERR_NO_ERROR){
332
fprintf_plus(stderr, "bad gpgme_get_engine_info: %s: %s\n",
333
gpgme_strsource(rc), gpgme_strerror(rc));
105
/* Set GPGME home directory */
106
rc = gpgme_get_engine_info (&engine_info);
107
if (rc != GPG_ERR_NO_ERROR){
108
fprintf(stderr, "bad gpgme_get_engine_info: %s: %s\n",
109
gpgme_strsource(rc), gpgme_strerror(rc));
336
112
while(engine_info != NULL){
337
113
if(engine_info->protocol == GPGME_PROTOCOL_OpenPGP){
338
114
gpgme_set_engine_info(GPGME_PROTOCOL_OpenPGP,
339
engine_info->file_name, tempdir);
115
engine_info->file_name, homedir);
342
118
engine_info = engine_info->next;
344
120
if(engine_info == NULL){
345
fprintf_plus(stderr, "Could not set GPGME home dir to %s\n",
350
/* Create new GPGME "context" */
351
rc = gpgme_new(&(mc->ctx));
352
if(rc != GPG_ERR_NO_ERROR){
353
fprintf_plus(stderr, "Mandos plugin mandos-client: "
354
"bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
359
if(not import_key(pubkey) or not import_key(seckey)){
367
* Decrypt OpenPGP data.
368
* Returns -1 on error
370
__attribute__((nonnull, warn_unused_result))
371
static ssize_t pgp_packet_decrypt(const char *cryptotext,
375
gpgme_data_t dh_crypto, dh_plain;
378
size_t plaintext_capacity = 0;
379
ssize_t plaintext_length = 0;
382
fprintf_plus(stderr, "Trying to decrypt OpenPGP data\n");
385
/* Create new GPGME data buffer from memory cryptotext */
386
rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,
388
if(rc != GPG_ERR_NO_ERROR){
389
fprintf_plus(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
390
gpgme_strsource(rc), gpgme_strerror(rc));
121
fprintf(stderr, "Could not set home dir to %s\n", homedir);
125
/* Create new GPGME data buffer from packet buffer */
126
rc = gpgme_data_new_from_mem(&dh_crypto, packet, packet_size, 0);
127
if (rc != GPG_ERR_NO_ERROR){
128
fprintf(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
129
gpgme_strsource(rc), gpgme_strerror(rc));
394
133
/* Create new empty GPGME data buffer for the plaintext */
395
134
rc = gpgme_data_new(&dh_plain);
396
if(rc != GPG_ERR_NO_ERROR){
397
fprintf_plus(stderr, "Mandos plugin mandos-client: "
398
"bad gpgme_data_new: %s: %s\n",
399
gpgme_strsource(rc), gpgme_strerror(rc));
400
gpgme_data_release(dh_crypto);
404
/* Decrypt data from the cryptotext data buffer to the plaintext
406
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
407
if(rc != GPG_ERR_NO_ERROR){
408
fprintf_plus(stderr, "bad gpgme_op_decrypt: %s: %s\n",
409
gpgme_strsource(rc), gpgme_strerror(rc));
410
plaintext_length = -1;
412
gpgme_decrypt_result_t result;
413
result = gpgme_op_decrypt_result(mc->ctx);
415
fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
417
fprintf_plus(stderr, "Unsupported algorithm: %s\n",
418
result->unsupported_algorithm);
419
fprintf_plus(stderr, "Wrong key usage: %u\n",
420
result->wrong_key_usage);
421
if(result->file_name != NULL){
422
fprintf_plus(stderr, "File name: %s\n", result->file_name);
424
gpgme_recipient_t recipient;
425
recipient = result->recipients;
135
if (rc != GPG_ERR_NO_ERROR){
136
fprintf(stderr, "bad gpgme_data_new: %s: %s\n",
137
gpgme_strsource(rc), gpgme_strerror(rc));
141
/* Create new GPGME "context" */
142
rc = gpgme_new(&ctx);
143
if (rc != GPG_ERR_NO_ERROR){
144
fprintf(stderr, "bad gpgme_new: %s: %s\n",
145
gpgme_strsource(rc), gpgme_strerror(rc));
149
/* Decrypt data from the FILE pointer to the plaintext data
151
rc = gpgme_op_decrypt(ctx, dh_crypto, dh_plain);
152
if (rc != GPG_ERR_NO_ERROR){
153
fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
154
gpgme_strsource(rc), gpgme_strerror(rc));
159
fprintf(stderr, "Decryption of OpenPGP packet succeeded\n");
163
gpgme_decrypt_result_t result;
164
result = gpgme_op_decrypt_result(ctx);
166
fprintf(stderr, "gpgme_op_decrypt_result failed\n");
168
fprintf(stderr, "Unsupported algorithm: %s\n",
169
result->unsupported_algorithm);
170
fprintf(stderr, "Wrong key usage: %d\n",
171
result->wrong_key_usage);
172
if(result->file_name != NULL){
173
fprintf(stderr, "File name: %s\n", result->file_name);
175
gpgme_recipient_t recipient;
176
recipient = result->recipients;
426
178
while(recipient != NULL){
427
fprintf_plus(stderr, "Public key algorithm: %s\n",
428
gpgme_pubkey_algo_name
429
(recipient->pubkey_algo));
430
fprintf_plus(stderr, "Key ID: %s\n", recipient->keyid);
431
fprintf_plus(stderr, "Secret key available: %s\n",
432
recipient->status == GPG_ERR_NO_SECKEY
179
fprintf(stderr, "Public key algorithm: %s\n",
180
gpgme_pubkey_algo_name(recipient->pubkey_algo));
181
fprintf(stderr, "Key ID: %s\n", recipient->keyid);
182
fprintf(stderr, "Secret key available: %s\n",
183
recipient->status == GPG_ERR_NO_SECKEY
434
185
recipient = recipient->next;
442
fprintf_plus(stderr, "Decryption of OpenPGP data succeeded\n");
191
/* Delete the GPGME FILE pointer cryptotext data buffer */
192
gpgme_data_release(dh_crypto);
445
194
/* Seek back to the beginning of the GPGME plaintext data buffer */
446
if(gpgme_data_seek(dh_plain, (off_t)0, SEEK_SET) == -1){
447
perror_plus("gpgme_data_seek");
448
plaintext_length = -1;
195
gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET);
454
plaintext_capacity = incbuffer(plaintext,
455
(size_t)plaintext_length,
457
if(plaintext_capacity == 0){
458
perror_plus("incbuffer");
459
plaintext_length = -1;
199
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
200
*new_packet = realloc(*new_packet,
201
(unsigned int)new_packet_capacity
203
if (*new_packet == NULL){
207
new_packet_capacity += BUFFER_SIZE;
463
ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
210
ret = gpgme_data_read(dh_plain, *new_packet + new_packet_length,
465
212
/* Print the data, if any */
471
perror_plus("gpgme_data_read");
472
plaintext_length = -1;
475
plaintext_length += ret;
479
fprintf_plus(stderr, "Decrypted password is: ");
480
for(ssize_t i = 0; i < plaintext_length; i++){
481
fprintf(stderr, "%02hhX ", (*plaintext)[i]);
483
fprintf(stderr, "\n");
488
/* Delete the GPGME cryptotext data buffer */
489
gpgme_data_release(dh_crypto);
217
perror("gpgme_data_read");
220
new_packet_length += ret;
223
/* FIXME: check characters before printing to screen so to not print
224
terminal control characters */
226
/* fprintf(stderr, "decrypted password is: "); */
227
/* fwrite(*new_packet, 1, new_packet_length, stderr); */
228
/* fprintf(stderr, "\n"); */
491
231
/* Delete the GPGME plaintext data buffer */
492
232
gpgme_data_release(dh_plain);
493
return plaintext_length;
496
__attribute__((warn_unused_result, const))
497
static const char *safe_string(const char *str){
503
__attribute__((warn_unused_result))
504
static const char *safer_gnutls_strerror(int value){
505
const char *ret = gnutls_strerror(value);
506
return safe_string(ret);
509
/* GnuTLS log function callback */
510
__attribute__((nonnull))
511
static void debuggnutls(__attribute__((unused)) int level,
513
fprintf_plus(stderr, "GnuTLS: %s", string);
516
__attribute__((nonnull, warn_unused_result))
517
static int init_gnutls_global(const char *pubkeyfilename,
518
const char *seckeyfilename,
233
return new_packet_length;
236
static const char * safer_gnutls_strerror (int value) {
237
const char *ret = gnutls_strerror (value);
243
void debuggnutls(__attribute__((unused)) int level,
245
fprintf(stderr, "%s", string);
248
int initgnutls(encrypted_session *es){
524
fprintf_plus(stderr, "Initializing GnuTLS\n");
253
fprintf(stderr, "Initializing GnuTLS\n");
527
ret = gnutls_global_init();
528
if(ret != GNUTLS_E_SUCCESS){
529
fprintf_plus(stderr, "GnuTLS global_init: %s\n",
530
safer_gnutls_strerror(ret));
256
if ((ret = gnutls_global_init ())
257
!= GNUTLS_E_SUCCESS) {
258
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
535
/* "Use a log level over 10 to enable all debugging options."
538
263
gnutls_global_set_log_level(11);
539
264
gnutls_global_set_log_function(debuggnutls);
542
/* OpenPGP credentials */
543
ret = gnutls_certificate_allocate_credentials(&mc->cred);
544
if(ret != GNUTLS_E_SUCCESS){
545
fprintf_plus(stderr, "GnuTLS memory error: %s\n",
546
safer_gnutls_strerror(ret));
547
gnutls_global_deinit();
267
/* openpgp credentials */
268
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
269
!= GNUTLS_E_SUCCESS) {
270
fprintf (stderr, "memory error: %s\n",
271
safer_gnutls_strerror(ret));
552
fprintf_plus(stderr, "Attempting to use OpenPGP public key %s and"
553
" secret key %s as GnuTLS credentials\n",
276
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
277
" and keyfile %s as GnuTLS credentials\n", CERTFILE,
558
281
ret = gnutls_certificate_set_openpgp_key_file
559
(mc->cred, pubkeyfilename, seckeyfilename,
560
GNUTLS_OPENPGP_FMT_BASE64);
561
if(ret != GNUTLS_E_SUCCESS){
563
"Error[%d] while reading the OpenPGP key pair ('%s',"
564
" '%s')\n", ret, pubkeyfilename, seckeyfilename);
565
fprintf_plus(stderr, "The GnuTLS error is: %s\n",
566
safer_gnutls_strerror(ret));
570
/* GnuTLS server initialization */
571
ret = gnutls_dh_params_init(&mc->dh_params);
572
if(ret != GNUTLS_E_SUCCESS){
573
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
574
" initialization: %s\n",
575
safer_gnutls_strerror(ret));
578
if(mc->dh_bits == 0){
579
/* Find out the optimal number of DH bits */
580
/* Try to read the private key file */
581
gnutls_datum_t buffer = { .data = NULL, .size = 0 };
583
int secfile = open(seckeyfilename, O_RDONLY);
584
size_t buffer_capacity = 0;
586
buffer_capacity = incbuffer((char **)&buffer.data,
588
(size_t)buffer_capacity);
589
if(buffer_capacity == 0){
590
perror_plus("incbuffer");
595
ssize_t bytes_read = read(secfile, buffer.data + buffer.size,
601
/* check bytes_read for failure */
608
buffer.size += (unsigned int)bytes_read;
612
/* If successful, use buffer to parse private key */
613
gnutls_sec_param_t sec_param = GNUTLS_SEC_PARAM_ULTRA;
614
if(buffer.data != NULL){
616
gnutls_openpgp_privkey_t privkey = NULL;
617
ret = gnutls_openpgp_privkey_init(&privkey);
618
if(ret != GNUTLS_E_SUCCESS){
619
fprintf_plus(stderr, "Error initializing OpenPGP key"
620
" structure: %s", safer_gnutls_strerror(ret));
624
ret = gnutls_openpgp_privkey_import(privkey, &buffer,
625
GNUTLS_OPENPGP_FMT_BASE64,
627
if(ret != GNUTLS_E_SUCCESS){
628
fprintf_plus(stderr, "Error importing OpenPGP key : %s",
629
safer_gnutls_strerror(ret));
635
/* Use private key to suggest an appropriate sec_param */
636
sec_param = gnutls_openpgp_privkey_sec_param(privkey);
637
gnutls_openpgp_privkey_deinit(privkey);
639
fprintf_plus(stderr, "This OpenPGP key implies using a"
640
" GnuTLS security parameter \"%s\".\n",
641
safe_string(gnutls_sec_param_get_name
647
if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
648
/* Err on the side of caution */
649
sec_param = GNUTLS_SEC_PARAM_ULTRA;
651
fprintf_plus(stderr, "Falling back to security parameter"
653
safe_string(gnutls_sec_param_get_name
658
uret = gnutls_sec_param_to_pk_bits(GNUTLS_PK_DH, sec_param);
662
fprintf_plus(stderr, "A \"%s\" GnuTLS security parameter"
663
" implies %u DH bits; using that.\n",
664
safe_string(gnutls_sec_param_get_name
669
fprintf_plus(stderr, "Failed to get implied number of DH"
670
" bits for security parameter \"%s\"): %s\n",
671
safe_string(gnutls_sec_param_get_name(sec_param)),
672
safer_gnutls_strerror(ret));
676
fprintf_plus(stderr, "DH bits explicitly set to %u\n",
679
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
680
if(ret != GNUTLS_E_SUCCESS){
681
fprintf_plus(stderr, "Error in GnuTLS prime generation (%u bits):"
682
" %s\n", mc->dh_bits, safer_gnutls_strerror(ret));
686
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
692
gnutls_certificate_free_credentials(mc->cred);
693
gnutls_global_deinit();
694
gnutls_dh_params_deinit(mc->dh_params);
698
__attribute__((nonnull, warn_unused_result))
699
static int init_gnutls_session(gnutls_session_t *session,
702
/* GnuTLS session creation */
704
ret = gnutls_init(session, GNUTLS_SERVER);
708
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
709
if(ret != GNUTLS_E_SUCCESS){
711
"Error in GnuTLS session initialization: %s\n",
712
safer_gnutls_strerror(ret));
718
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
720
gnutls_deinit(*session);
723
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
724
if(ret != GNUTLS_E_SUCCESS){
725
fprintf_plus(stderr, "Syntax error at: %s\n", err);
726
fprintf_plus(stderr, "GnuTLS error: %s\n",
727
safer_gnutls_strerror(ret));
728
gnutls_deinit(*session);
734
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
737
gnutls_deinit(*session);
740
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
741
if(ret != GNUTLS_E_SUCCESS){
742
fprintf_plus(stderr, "Error setting GnuTLS credentials: %s\n",
743
safer_gnutls_strerror(ret));
744
gnutls_deinit(*session);
282
(es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
283
if (ret != GNUTLS_E_SUCCESS) {
285
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
287
ret, CERTFILE, KEYFILE);
288
fprintf(stdout, "The Error is: %s\n",
289
safer_gnutls_strerror(ret));
293
//GnuTLS server initialization
294
if ((ret = gnutls_dh_params_init (&es->dh_params))
295
!= GNUTLS_E_SUCCESS) {
296
fprintf (stderr, "Error in dh parameter initialization: %s\n",
297
safer_gnutls_strerror(ret));
301
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
302
!= GNUTLS_E_SUCCESS) {
303
fprintf (stderr, "Error in prime generation: %s\n",
304
safer_gnutls_strerror(ret));
308
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
310
// GnuTLS session creation
311
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
312
!= GNUTLS_E_SUCCESS){
313
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
314
safer_gnutls_strerror(ret));
317
if ((ret = gnutls_priority_set_direct (es->session, "NORMAL", &err))
318
!= GNUTLS_E_SUCCESS) {
319
fprintf(stderr, "Syntax error at: %s\n", err);
320
fprintf(stderr, "GnuTLS error: %s\n",
321
safer_gnutls_strerror(ret));
325
if ((ret = gnutls_credentials_set
326
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
327
!= GNUTLS_E_SUCCESS) {
328
fprintf(stderr, "Error setting a credentials set: %s\n",
329
safer_gnutls_strerror(ret));
748
333
/* ignore client certificate if any. */
749
gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
334
gnutls_certificate_server_set_request (es->session,
751
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
337
gnutls_dh_set_prime_bits (es->session, DH_BITS);
756
/* Avahi log function callback */
757
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
758
__attribute__((unused)) const char *txt){}
342
void empty_log(__attribute__((unused)) AvahiLogLevel level,
343
__attribute__((unused)) const char *txt){}
760
/* Called when a Mandos server is found */
761
__attribute__((nonnull, warn_unused_result))
762
static int start_mandos_communication(const char *ip, in_port_t port,
763
AvahiIfIndex if_index,
764
int af, mandos_context *mc){
765
int ret, tcp_sd = -1;
767
struct sockaddr_storage to;
345
int start_mandos_communication(const char *ip, uint16_t port,
346
unsigned int if_index){
348
struct sockaddr_in6 to;
349
encrypted_session es;
768
350
char *buffer = NULL;
769
char *decrypted_buffer = NULL;
351
char *decrypted_buffer;
770
352
size_t buffer_length = 0;
771
353
size_t buffer_capacity = 0;
774
gnutls_session_t session;
775
int pf; /* Protocol family */
792
fprintf_plus(stderr, "Bad address family: %d\n", af);
797
/* If the interface is specified and we have a list of interfaces */
798
if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
799
/* Check if the interface is one of the interfaces we are using */
802
char *interface = NULL;
803
while((interface=argz_next(mc->interfaces, mc->interfaces_size,
805
if(if_nametoindex(interface) == (unsigned int)if_index){
812
/* This interface does not match any in the list, so we don't
813
connect to the server */
815
char interface[IF_NAMESIZE];
816
if(if_indextoname((unsigned int)if_index, interface) == NULL){
817
perror_plus("if_indextoname");
819
fprintf_plus(stderr, "Skipping server on non-used interface"
821
if_indextoname((unsigned int)if_index,
829
ret = init_gnutls_session(&session, mc);
835
fprintf_plus(stderr, "Setting up a TCP connection to %s, port %"
836
PRIuMAX "\n", ip, (uintmax_t)port);
839
tcp_sd = socket(pf, SOCK_STREAM, 0);
842
perror_plus("socket");
852
memset(&to, 0, sizeof(to));
854
((struct sockaddr_in6 *)&to)->sin6_family = (sa_family_t)af;
855
ret = inet_pton(af, ip, &((struct sockaddr_in6 *)&to)->sin6_addr);
857
((struct sockaddr_in *)&to)->sin_family = (sa_family_t)af;
858
ret = inet_pton(af, ip, &((struct sockaddr_in *)&to)->sin_addr);
862
perror_plus("inet_pton");
354
ssize_t decrypted_buffer_size;
357
char interface[IF_NAMESIZE];
360
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
364
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
370
if(if_indextoname(if_index, interface) == NULL){
372
perror("if_indextoname");
378
fprintf(stderr, "Binding to interface %s\n", interface);
381
memset(&to,0,sizeof(to)); /* Spurious warning */
382
to.sin6_family = AF_INET6;
383
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
868
fprintf_plus(stderr, "Bad address: %s\n", ip);
873
((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
874
if(IN6_IS_ADDR_LINKLOCAL
875
(&((struct sockaddr_in6 *)&to)->sin6_addr)){
876
if(if_index == AVAHI_IF_UNSPEC){
877
fprintf_plus(stderr, "An IPv6 link-local address is"
878
" incomplete without a network interface\n");
882
/* Set the network interface number as scope */
883
((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
886
((struct sockaddr_in *)&to)->sin_port = htons(port);
895
if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){
896
char interface[IF_NAMESIZE];
897
if(if_indextoname((unsigned int)if_index, interface) == NULL){
898
perror_plus("if_indextoname");
900
fprintf_plus(stderr, "Connection to: %s%%%s, port %" PRIuMAX
901
"\n", ip, interface, (uintmax_t)port);
904
fprintf_plus(stderr, "Connection to: %s, port %" PRIuMAX "\n",
905
ip, (uintmax_t)port);
907
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
908
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
910
ret = getnameinfo((struct sockaddr *)&to,
911
sizeof(struct sockaddr_in6),
912
addrstr, sizeof(addrstr), NULL, 0,
915
ret = getnameinfo((struct sockaddr *)&to,
916
sizeof(struct sockaddr_in),
917
addrstr, sizeof(addrstr), NULL, 0,
920
if(ret == EAI_SYSTEM){
921
perror_plus("getnameinfo");
922
} else if(ret != 0) {
923
fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
924
} else if(strcmp(addrstr, ip) != 0){
925
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
935
ret = connect(tcp_sd, (struct sockaddr *)&to,
936
sizeof(struct sockaddr_in6));
938
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
939
sizeof(struct sockaddr_in));
942
if((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
944
perror_plus("connect");
955
const char *out = mandos_protocol_version;
958
size_t out_size = strlen(out);
959
ret = (int)TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
960
out_size - written));
963
perror_plus("write");
967
written += (size_t)ret;
968
if(written < out_size){
971
if(out == mandos_protocol_version){
986
fprintf_plus(stderr, "Establishing TLS session with %s\n", ip);
994
/* This casting via intptr_t is to eliminate warning about casting
995
an int to a pointer type. This is exactly how the GnuTLS Guile
996
function "set-session-transport-fd!" does it. */
997
gnutls_transport_set_ptr(session,
998
(gnutls_transport_ptr_t)(intptr_t)tcp_sd);
1006
ret = gnutls_handshake(session);
1011
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
1013
if(ret != GNUTLS_E_SUCCESS){
389
fprintf(stderr, "Bad address: %s\n", ip);
392
to.sin6_port = htons(port); /* Spurious warning */
394
to.sin6_scope_id = (uint32_t)if_index;
397
fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
398
/* char addrstr[INET6_ADDRSTRLEN]; */
399
/* if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr, */
400
/* sizeof(addrstr)) == NULL){ */
401
/* perror("inet_ntop"); */
403
/* fprintf(stderr, "Really connecting to: %s, port %d\n", */
404
/* addrstr, ntohs(to.sin6_port)); */
408
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
414
ret = initgnutls (&es);
420
gnutls_transport_set_ptr (es.session,
421
(gnutls_transport_ptr_t) tcp_sd);
424
fprintf(stderr, "Establishing TLS session with %s\n", ip);
427
ret = gnutls_handshake (es.session);
429
if (ret != GNUTLS_E_SUCCESS){
1015
fprintf_plus(stderr, "*** GnuTLS Handshake failed ***\n");
431
fprintf(stderr, "\n*** Handshake failed ***\n");
1022
/* Read OpenPGP packet that contains the wanted password */
438
//Retrieve OpenPGP packet that contains the wanted password
1025
fprintf_plus(stderr, "Retrieving OpenPGP encrypted password from"
441
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
1036
buffer_capacity = incbuffer(&buffer, buffer_length,
1038
if(buffer_capacity == 0){
1040
perror_plus("incbuffer");
1050
sret = gnutls_record_recv(session, buffer+buffer_length,
446
if (buffer_length + BUFFER_SIZE > buffer_capacity){
447
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
452
buffer_capacity += BUFFER_SIZE;
455
ret = gnutls_record_recv
456
(es.session, buffer+buffer_length, BUFFER_SIZE);
1057
462
case GNUTLS_E_INTERRUPTED:
1058
463
case GNUTLS_E_AGAIN:
1060
465
case GNUTLS_E_REHANDSHAKE:
1062
ret = gnutls_handshake(session);
1068
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
1070
fprintf_plus(stderr, "*** GnuTLS Re-handshake failed "
466
ret = gnutls_handshake (es.session);
468
fprintf(stderr, "\n*** Handshake failed ***\n");
1078
fprintf_plus(stderr, "Unknown error while reading data from"
1079
" encrypted session with Mandos server\n");
1080
gnutls_bye(session, GNUTLS_SHUT_RDWR);
475
fprintf(stderr, "Unknown error while reading data from"
476
" encrypted session with mandos server\n");
478
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
1085
buffer_length += (size_t) sret;
1090
fprintf_plus(stderr, "Closing TLS session\n");
1099
ret = gnutls_bye(session, GNUTLS_SHUT_RDWR);
1104
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
1106
if(buffer_length > 0){
1107
ssize_t decrypted_buffer_size;
1108
decrypted_buffer_size = pgp_packet_decrypt(buffer, buffer_length,
1109
&decrypted_buffer, mc);
1110
if(decrypted_buffer_size >= 0){
482
buffer_length += (size_t) ret;
486
if (buffer_length > 0){
487
decrypted_buffer_size = pgp_packet_decrypt(buffer,
491
if (decrypted_buffer_size >= 0){
1113
492
while(written < (size_t) decrypted_buffer_size){
1119
ret = (int)fwrite(decrypted_buffer + written, 1,
1120
(size_t)decrypted_buffer_size - written,
493
ret = (int)fwrite (decrypted_buffer + written, 1,
494
(size_t)decrypted_buffer_size - written,
1122
496
if(ret == 0 and ferror(stdout)){
1125
fprintf_plus(stderr, "Error writing encrypted data: %s\n",
498
fprintf(stderr, "Error writing encrypted data: %s\n",
1131
504
written += (size_t)ret;
1137
/* Shutdown procedure */
1142
free(decrypted_buffer);
1145
ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
1151
perror_plus("close");
1153
gnutls_deinit(session);
506
free(decrypted_buffer);
515
fprintf(stderr, "Closing TLS session\n");
519
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
522
gnutls_deinit (es.session);
523
gnutls_certificate_free_credentials (es.cred);
524
gnutls_global_deinit ();
1163
__attribute__((nonnull))
1164
static void resolve_callback(AvahiSServiceResolver *r,
1165
AvahiIfIndex interface,
1166
AvahiProtocol proto,
1167
AvahiResolverEvent event,
1171
const char *host_name,
1172
const AvahiAddress *address,
1174
AVAHI_GCC_UNUSED AvahiStringList *txt,
1175
AVAHI_GCC_UNUSED AvahiLookupResultFlags
528
static AvahiSimplePoll *simple_poll = NULL;
529
static AvahiServer *server = NULL;
531
static void resolve_callback(
532
AvahiSServiceResolver *r,
533
AvahiIfIndex interface,
534
AVAHI_GCC_UNUSED AvahiProtocol protocol,
535
AvahiResolverEvent event,
539
const char *host_name,
540
const AvahiAddress *address,
542
AVAHI_GCC_UNUSED AvahiStringList *txt,
543
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
544
AVAHI_GCC_UNUSED void* userdata) {
546
assert(r); /* Spurious warning */
1182
548
/* Called whenever a service has been resolved successfully or
1186
avahi_s_service_resolver_free(r);
1192
553
case AVAHI_RESOLVER_FAILURE:
1193
fprintf_plus(stderr, "(Avahi Resolver) Failed to resolve service "
1194
"'%s' of type '%s' in domain '%s': %s\n", name, type,
1196
avahi_strerror(avahi_server_errno
1197
(((mandos_context*)mc)->server)));
554
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
555
" type '%s' in domain '%s': %s\n", name, type, domain,
556
avahi_strerror(avahi_server_errno(server)));
1200
559
case AVAHI_RESOLVER_FOUND:
1202
561
char ip[AVAHI_ADDRESS_STR_MAX];
1203
562
avahi_address_snprint(ip, sizeof(ip), address);
1205
fprintf_plus(stderr, "Mandos server \"%s\" found on %s (%s, %"
1206
PRIdMAX ") on port %" PRIu16 "\n", name,
1207
host_name, ip, (intmax_t)interface, port);
564
fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
565
" port %d\n", name, host_name, ip, port);
1209
int ret = start_mandos_communication(ip, (in_port_t)port,
1211
avahi_proto_to_af(proto),
1214
avahi_simple_poll_quit(simple_poll);
1216
if(not add_server(ip, (in_port_t)port, interface,
1217
avahi_proto_to_af(proto),
1218
&((mandos_context*)mc)->current_server)){
1219
fprintf_plus(stderr, "Failed to add server \"%s\" to server"
567
int ret = start_mandos_communication(ip, port,
568
(unsigned int) interface);
1225
574
avahi_s_service_resolver_free(r);
1228
static void browse_callback(AvahiSServiceBrowser *b,
1229
AvahiIfIndex interface,
1230
AvahiProtocol protocol,
1231
AvahiBrowserEvent event,
1235
AVAHI_GCC_UNUSED AvahiLookupResultFlags
1242
/* Called whenever a new services becomes available on the LAN or
1243
is removed from the LAN */
1251
case AVAHI_BROWSER_FAILURE:
1253
fprintf_plus(stderr, "(Avahi browser) %s\n",
1254
avahi_strerror(avahi_server_errno
1255
(((mandos_context*)mc)->server)));
1256
avahi_simple_poll_quit(simple_poll);
1259
case AVAHI_BROWSER_NEW:
1260
/* We ignore the returned Avahi resolver object. In the callback
1261
function we free it. If the Avahi server is terminated before
1262
the callback function is called the Avahi server will free the
1265
if(avahi_s_service_resolver_new(((mandos_context*)mc)->server,
1266
interface, protocol, name, type,
1267
domain, protocol, 0,
1268
resolve_callback, mc) == NULL)
1269
fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1271
avahi_strerror(avahi_server_errno
1272
(((mandos_context*)mc)->server)));
1275
case AVAHI_BROWSER_REMOVE:
1278
case AVAHI_BROWSER_ALL_FOR_NOW:
1279
case AVAHI_BROWSER_CACHE_EXHAUSTED:
1281
fprintf_plus(stderr, "No Mandos server found, still"
1288
/* Signal handler that stops main loop after SIGTERM */
1289
static void handle_sigterm(int sig){
1294
signal_received = sig;
1295
int old_errno = errno;
1296
/* set main loop to exit */
1297
if(simple_poll != NULL){
1298
avahi_simple_poll_quit(simple_poll);
1303
__attribute__((nonnull, warn_unused_result))
1304
bool get_flags(const char *ifname, struct ifreq *ifr){
1308
int s = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1311
perror_plus("socket");
1315
strcpy(ifr->ifr_name, ifname);
1316
ret = ioctl(s, SIOCGIFFLAGS, ifr);
1320
perror_plus("ioctl SIOCGIFFLAGS");
1328
__attribute__((nonnull, warn_unused_result))
1329
bool good_flags(const char *ifname, const struct ifreq *ifr){
1331
/* Reject the loopback device */
1332
if(ifr->ifr_flags & IFF_LOOPBACK){
1334
fprintf_plus(stderr, "Rejecting loopback interface \"%s\"\n",
1339
/* Accept point-to-point devices only if connect_to is specified */
1340
if(connect_to != NULL and (ifr->ifr_flags & IFF_POINTOPOINT)){
1342
fprintf_plus(stderr, "Accepting point-to-point interface"
1343
" \"%s\"\n", ifname);
1347
/* Otherwise, reject non-broadcast-capable devices */
1348
if(not (ifr->ifr_flags & IFF_BROADCAST)){
1350
fprintf_plus(stderr, "Rejecting non-broadcast interface"
1351
" \"%s\"\n", ifname);
1355
/* Reject non-ARP interfaces (including dummy interfaces) */
1356
if(ifr->ifr_flags & IFF_NOARP){
1358
fprintf_plus(stderr, "Rejecting non-ARP interface \"%s\"\n",
1364
/* Accept this device */
1366
fprintf_plus(stderr, "Interface \"%s\" is good\n", ifname);
1372
* This function determines if a directory entry in /sys/class/net
1373
* corresponds to an acceptable network device.
1374
* (This function is passed to scandir(3) as a filter function.)
1376
__attribute__((nonnull, warn_unused_result))
1377
int good_interface(const struct dirent *if_entry){
1378
if(if_entry->d_name[0] == '.'){
1383
if(not get_flags(if_entry->d_name, &ifr)){
1385
fprintf_plus(stderr, "Failed to get flags for interface "
1386
"\"%s\"\n", if_entry->d_name);
1391
if(not good_flags(if_entry->d_name, &ifr)){
1398
* This function determines if a network interface is up.
1400
__attribute__((nonnull, warn_unused_result))
1401
bool interface_is_up(const char *interface){
1403
if(not get_flags(interface, &ifr)){
1405
fprintf_plus(stderr, "Failed to get flags for interface "
1406
"\"%s\"\n", interface);
1411
return (bool)(ifr.ifr_flags & IFF_UP);
1415
* This function determines if a network interface is running
1417
__attribute__((nonnull, warn_unused_result))
1418
bool interface_is_running(const char *interface){
1420
if(not get_flags(interface, &ifr)){
1422
fprintf_plus(stderr, "Failed to get flags for interface "
1423
"\"%s\"\n", interface);
1428
return (bool)(ifr.ifr_flags & IFF_RUNNING);
1431
__attribute__((nonnull, pure, warn_unused_result))
1432
int notdotentries(const struct dirent *direntry){
1433
/* Skip "." and ".." */
1434
if(direntry->d_name[0] == '.'
1435
and (direntry->d_name[1] == '\0'
1436
or (direntry->d_name[1] == '.'
1437
and direntry->d_name[2] == '\0'))){
1443
/* Is this directory entry a runnable program? */
1444
__attribute__((nonnull, warn_unused_result))
1445
int runnable_hook(const struct dirent *direntry){
1450
if((direntry->d_name)[0] == '\0'){
1455
sret = strspn(direntry->d_name, "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
1456
"abcdefghijklmnopqrstuvwxyz"
1459
if((direntry->d_name)[sret] != '\0'){
1460
/* Contains non-allowed characters */
1462
fprintf_plus(stderr, "Ignoring hook \"%s\" with bad name\n",
1468
ret = fstatat(hookdir_fd, direntry->d_name, &st, 0);
1471
perror_plus("Could not stat hook");
1475
if(not (S_ISREG(st.st_mode))){
1476
/* Not a regular file */
1478
fprintf_plus(stderr, "Ignoring hook \"%s\" - not a file\n",
1483
if(not (st.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH))){
1484
/* Not executable */
1486
fprintf_plus(stderr, "Ignoring hook \"%s\" - not executable\n",
1492
fprintf_plus(stderr, "Hook \"%s\" is acceptable\n",
1498
__attribute__((nonnull, warn_unused_result))
1499
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
1500
mandos_context *mc){
1502
struct timespec now;
1503
struct timespec waited_time;
1504
intmax_t block_time;
1507
if(mc->current_server == NULL){
1509
fprintf_plus(stderr, "Wait until first server is found."
1512
ret = avahi_simple_poll_iterate(s, -1);
1515
fprintf_plus(stderr, "Check current_server if we should run"
1518
/* the current time */
1519
ret = clock_gettime(CLOCK_MONOTONIC, &now);
1521
perror_plus("clock_gettime");
1524
/* Calculating in ms how long time between now and server
1525
who we visted longest time ago. Now - last seen. */
1526
waited_time.tv_sec = (now.tv_sec
1527
- mc->current_server->last_seen.tv_sec);
1528
waited_time.tv_nsec = (now.tv_nsec
1529
- mc->current_server->last_seen.tv_nsec);
1530
/* total time is 10s/10,000ms.
1531
Converting to s from ms by dividing by 1,000,
1532
and ns to ms by dividing by 1,000,000. */
1533
block_time = ((retry_interval
1534
- ((intmax_t)waited_time.tv_sec * 1000))
1535
- ((intmax_t)waited_time.tv_nsec / 1000000));
1538
fprintf_plus(stderr, "Blocking for %" PRIdMAX " ms\n",
1542
if(block_time <= 0){
1543
ret = start_mandos_communication(mc->current_server->ip,
1544
mc->current_server->port,
1545
mc->current_server->if_index,
1546
mc->current_server->af, mc);
1548
avahi_simple_poll_quit(s);
1551
ret = clock_gettime(CLOCK_MONOTONIC,
1552
&mc->current_server->last_seen);
1554
perror_plus("clock_gettime");
1557
mc->current_server = mc->current_server->next;
1558
block_time = 0; /* Call avahi to find new Mandos
1559
servers, but don't block */
1562
ret = avahi_simple_poll_iterate(s, (int)block_time);
1565
if(ret > 0 or errno != EINTR){
1566
return (ret != 1) ? ret : 0;
1572
/* Set effective uid to 0, return errno */
1573
__attribute__((warn_unused_result))
1574
error_t raise_privileges(void){
1575
error_t old_errno = errno;
1576
error_t ret_errno = 0;
1577
if(seteuid(0) == -1){
1584
/* Set effective and real user ID to 0. Return errno. */
1585
__attribute__((warn_unused_result))
1586
error_t raise_privileges_permanently(void){
1587
error_t old_errno = errno;
1588
error_t ret_errno = raise_privileges();
1593
if(setuid(0) == -1){
1600
/* Set effective user ID to unprivileged saved user ID */
1601
__attribute__((warn_unused_result))
1602
error_t lower_privileges(void){
1603
error_t old_errno = errno;
1604
error_t ret_errno = 0;
1605
if(seteuid(uid) == -1){
1612
/* Lower privileges permanently */
1613
__attribute__((warn_unused_result))
1614
error_t lower_privileges_permanently(void){
1615
error_t old_errno = errno;
1616
error_t ret_errno = 0;
1617
if(setuid(uid) == -1){
1624
__attribute__((nonnull))
1625
void run_network_hooks(const char *mode, const char *interface,
1627
struct dirent **direntries = NULL;
1628
if(hookdir_fd == -1){
1629
hookdir_fd = open(hookdir, O_RDONLY);
1630
if(hookdir_fd == -1){
1631
if(errno == ENOENT){
1633
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1634
" found\n", hookdir);
1637
perror_plus("open");
577
static void browse_callback(
578
AvahiSServiceBrowser *b,
579
AvahiIfIndex interface,
580
AvahiProtocol protocol,
581
AvahiBrowserEvent event,
585
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
588
AvahiServer *s = userdata;
589
assert(b); /* Spurious warning */
591
/* Called whenever a new services becomes available on the LAN or
592
is removed from the LAN */
596
case AVAHI_BROWSER_FAILURE:
598
fprintf(stderr, "(Browser) %s\n",
599
avahi_strerror(avahi_server_errno(server)));
600
avahi_simple_poll_quit(simple_poll);
1643
#if __GLIBC_PREREQ(2, 15)
1644
int numhooks = scandirat(hookdir_fd, ".", &direntries,
1645
runnable_hook, alphasort);
1646
#else /* not __GLIBC_PREREQ(2, 15) */
1647
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1649
#endif /* not __GLIBC_PREREQ(2, 15) */
1650
#else /* not __GLIBC__ */
1651
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1653
#endif /* not __GLIBC__ */
1655
perror_plus("scandir");
1658
struct dirent *direntry;
1660
int devnull = open("/dev/null", O_RDONLY);
1661
for(int i = 0; i < numhooks; i++){
1662
direntry = direntries[i];
1664
fprintf_plus(stderr, "Running network hook \"%s\"\n",
1667
pid_t hook_pid = fork();
1670
/* Raise privileges */
1671
errno = raise_privileges_permanently();
1673
perror_plus("Failed to raise privileges");
1680
perror_plus("setgid");
1683
/* Reset supplementary groups */
1685
ret = setgroups(0, NULL);
1687
perror_plus("setgroups");
1690
ret = dup2(devnull, STDIN_FILENO);
1692
perror_plus("dup2(devnull, STDIN_FILENO)");
1695
ret = close(devnull);
1697
perror_plus("close");
1700
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
1702
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
1705
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1707
perror_plus("setenv");
1710
ret = setenv("DEVICE", interface, 1);
1712
perror_plus("setenv");
1715
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1717
perror_plus("setenv");
1720
ret = setenv("MODE", mode, 1);
1722
perror_plus("setenv");
1726
ret = asprintf(&delaystring, "%f", (double)delay);
1728
perror_plus("asprintf");
1731
ret = setenv("DELAY", delaystring, 1);
1734
perror_plus("setenv");
1738
if(connect_to != NULL){
1739
ret = setenv("CONNECT", connect_to, 1);
1741
perror_plus("setenv");
1745
int hook_fd = openat(hookdir_fd, direntry->d_name, O_RDONLY);
1747
perror_plus("openat");
1748
_exit(EXIT_FAILURE);
1750
if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1751
perror_plus("close");
1752
_exit(EXIT_FAILURE);
1754
if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
1756
perror_plus("fexecve");
1757
_exit(EXIT_FAILURE);
1761
perror_plus("fork");
1766
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1767
perror_plus("waitpid");
1771
if(WIFEXITED(status)){
1772
if(WEXITSTATUS(status) != 0){
1773
fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1774
" with status %d\n", direntry->d_name,
1775
WEXITSTATUS(status));
1779
} else if(WIFSIGNALED(status)){
1780
fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1781
" signal %d\n", direntry->d_name,
1786
fprintf_plus(stderr, "Warning: network hook \"%s\""
1787
" crashed\n", direntry->d_name);
1793
fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1799
if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1800
perror_plus("close");
1807
__attribute__((nonnull, warn_unused_result))
1808
error_t bring_up_interface(const char *const interface,
1810
error_t old_errno = errno;
1812
struct ifreq network;
1813
unsigned int if_index = if_nametoindex(interface);
1815
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1825
if(not interface_is_up(interface)){
1826
error_t ret_errno = 0, ioctl_errno = 0;
1827
if(not get_flags(interface, &network)){
1829
fprintf_plus(stderr, "Failed to get flags for interface "
1830
"\"%s\"\n", interface);
1834
network.ifr_flags |= IFF_UP; /* set flag */
1836
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1839
perror_plus("socket");
1845
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1847
perror_plus("close");
1854
fprintf_plus(stderr, "Bringing up interface \"%s\"\n",
1858
/* Raise privileges */
1859
ret_errno = raise_privileges();
1862
perror_plus("Failed to raise privileges");
1867
bool restore_loglevel = false;
1869
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1870
messages about the network interface to mess up the prompt */
1871
ret_linux = klogctl(8, NULL, 5);
1872
if(ret_linux == -1){
1873
perror_plus("klogctl");
1875
restore_loglevel = true;
1878
#endif /* __linux__ */
1879
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1880
ioctl_errno = errno;
1882
if(restore_loglevel){
1883
ret_linux = klogctl(7, NULL, 0);
1884
if(ret_linux == -1){
1885
perror_plus("klogctl");
1888
#endif /* __linux__ */
1890
/* If raise_privileges() succeeded above */
1892
/* Lower privileges */
1893
ret_errno = lower_privileges();
1896
perror_plus("Failed to lower privileges");
1900
/* Close the socket */
1901
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1903
perror_plus("close");
1906
if(ret_setflags == -1){
1907
errno = ioctl_errno;
1908
perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1913
fprintf_plus(stderr, "Interface \"%s\" is already up; good\n",
1917
/* Sleep checking until interface is running.
1918
Check every 0.25s, up to total time of delay */
1919
for(int i=0; i < delay * 4; i++){
1920
if(interface_is_running(interface)){
1923
struct timespec sleeptime = { .tv_nsec = 250000000 };
1924
ret = nanosleep(&sleeptime, NULL);
1925
if(ret == -1 and errno != EINTR){
1926
perror_plus("nanosleep");
1934
__attribute__((nonnull, warn_unused_result))
1935
error_t take_down_interface(const char *const interface){
1936
error_t old_errno = errno;
1937
struct ifreq network;
1938
unsigned int if_index = if_nametoindex(interface);
1940
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1944
if(interface_is_up(interface)){
1945
error_t ret_errno = 0, ioctl_errno = 0;
1946
if(not get_flags(interface, &network) and debug){
1948
fprintf_plus(stderr, "Failed to get flags for interface "
1949
"\"%s\"\n", interface);
1953
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1955
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1958
perror_plus("socket");
1964
fprintf_plus(stderr, "Taking down interface \"%s\"\n",
1968
/* Raise privileges */
1969
ret_errno = raise_privileges();
1972
perror_plus("Failed to raise privileges");
1975
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1976
ioctl_errno = errno;
1978
/* If raise_privileges() succeeded above */
1980
/* Lower privileges */
1981
ret_errno = lower_privileges();
1984
perror_plus("Failed to lower privileges");
1988
/* Close the socket */
1989
int ret = (int)TEMP_FAILURE_RETRY(close(sd));
1991
perror_plus("close");
1994
if(ret_setflags == -1){
1995
errno = ioctl_errno;
1996
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
2001
fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
2009
int main(int argc, char *argv[]){
2010
mandos_context mc = { .server = NULL, .dh_bits = 0,
2011
.priority = "SECURE256:!CTYPE-X.509:"
2012
"+CTYPE-OPENPGP:!RSA", .current_server = NULL,
2013
.interfaces = NULL, .interfaces_size = 0 };
2014
AvahiSServiceBrowser *sb = NULL;
2019
int exitcode = EXIT_SUCCESS;
2020
char *interfaces_to_take_down = NULL;
2021
size_t interfaces_to_take_down_size = 0;
2022
char run_tempdir[] = "/run/tmp/mandosXXXXXX";
2023
char old_tempdir[] = "/tmp/mandosXXXXXX";
2024
char *tempdir = NULL;
2025
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
2026
const char *seckey = PATHDIR "/" SECKEY;
2027
const char *pubkey = PATHDIR "/" PUBKEY;
2028
char *interfaces_hooks = NULL;
2030
bool gnutls_initialized = false;
2031
bool gpgme_initialized = false;
2033
double retry_interval = 10; /* 10s between trying a server and
2034
retrying the same server again */
2036
struct sigaction old_sigterm_action = { .sa_handler = SIG_DFL };
2037
struct sigaction sigterm_action = { .sa_handler = handle_sigterm };
2042
/* Lower any group privileges we might have, just to be safe */
2046
perror_plus("setgid");
2049
/* Lower user privileges (temporarily) */
2053
perror_plus("seteuid");
2061
struct argp_option options[] = {
2062
{ .name = "debug", .key = 128,
2063
.doc = "Debug mode", .group = 3 },
2064
{ .name = "connect", .key = 'c',
2065
.arg = "ADDRESS:PORT",
2066
.doc = "Connect directly to a specific Mandos server",
2068
{ .name = "interface", .key = 'i',
2070
.doc = "Network interface that will be used to search for"
2073
{ .name = "seckey", .key = 's',
2075
.doc = "OpenPGP secret key file base name",
2077
{ .name = "pubkey", .key = 'p',
2079
.doc = "OpenPGP public key file base name",
2081
{ .name = "dh-bits", .key = 129,
2083
.doc = "Bit length of the prime number used in the"
2084
" Diffie-Hellman key exchange",
2086
{ .name = "priority", .key = 130,
2088
.doc = "GnuTLS priority string for the TLS handshake",
2090
{ .name = "delay", .key = 131,
2092
.doc = "Maximum delay to wait for interface startup",
2094
{ .name = "retry", .key = 132,
2096
.doc = "Retry interval used when denied by the Mandos server",
2098
{ .name = "network-hook-dir", .key = 133,
2100
.doc = "Directory where network hooks are located",
2103
* These reproduce what we would get without ARGP_NO_HELP
2105
{ .name = "help", .key = '?',
2106
.doc = "Give this help list", .group = -1 },
2107
{ .name = "usage", .key = -3,
2108
.doc = "Give a short usage message", .group = -1 },
2109
{ .name = "version", .key = 'V',
2110
.doc = "Print program version", .group = -1 },
2114
error_t parse_opt(int key, char *arg,
2115
struct argp_state *state){
2118
case 128: /* --debug */
2121
case 'c': /* --connect */
2124
case 'i': /* --interface */
2125
ret_errno = argz_add_sep(&mc.interfaces, &mc.interfaces_size,
2128
argp_error(state, "%s", strerror(ret_errno));
2131
case 's': /* --seckey */
2134
case 'p': /* --pubkey */
2137
case 129: /* --dh-bits */
2139
tmpmax = strtoimax(arg, &tmp, 10);
2140
if(errno != 0 or tmp == arg or *tmp != '\0'
2141
or tmpmax != (typeof(mc.dh_bits))tmpmax){
2142
argp_error(state, "Bad number of DH bits");
2144
mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
2146
case 130: /* --priority */
2149
case 131: /* --delay */
2151
delay = strtof(arg, &tmp);
2152
if(errno != 0 or tmp == arg or *tmp != '\0'){
2153
argp_error(state, "Bad delay");
2155
case 132: /* --retry */
2157
retry_interval = strtod(arg, &tmp);
2158
if(errno != 0 or tmp == arg or *tmp != '\0'
2159
or (retry_interval * 1000) > INT_MAX
2160
or retry_interval < 0){
2161
argp_error(state, "Bad retry interval");
2164
case 133: /* --network-hook-dir */
2168
* These reproduce what we would get without ARGP_NO_HELP
2170
case '?': /* --help */
2171
argp_state_help(state, state->out_stream,
2172
(ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
2173
& ~(unsigned int)ARGP_HELP_EXIT_OK);
2174
case -3: /* --usage */
2175
argp_state_help(state, state->out_stream,
2176
ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
2177
case 'V': /* --version */
2178
fprintf_plus(state->out_stream, "%s\n", argp_program_version);
2179
exit(argp_err_exit_status);
2182
return ARGP_ERR_UNKNOWN;
2187
struct argp argp = { .options = options, .parser = parse_opt,
2189
.doc = "Mandos client -- Get and decrypt"
2190
" passwords from a Mandos server" };
2191
ret = argp_parse(&argp, argc, argv,
2192
ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
2199
perror_plus("argp_parse");
2200
exitcode = EX_OSERR;
2203
exitcode = EX_USAGE;
2209
/* Work around Debian bug #633582:
2210
<http://bugs.debian.org/633582> */
2212
/* Re-raise privileges */
2213
ret_errno = raise_privileges();
2216
perror_plus("Failed to raise privileges");
2220
if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
2221
int seckey_fd = open(seckey, O_RDONLY);
2222
if(seckey_fd == -1){
2223
perror_plus("open");
2225
ret = (int)TEMP_FAILURE_RETRY(fstat(seckey_fd, &st));
2227
perror_plus("fstat");
2229
if(S_ISREG(st.st_mode)
2230
and st.st_uid == 0 and st.st_gid == 0){
2231
ret = fchown(seckey_fd, uid, gid);
2233
perror_plus("fchown");
2237
TEMP_FAILURE_RETRY(close(seckey_fd));
2241
if(strcmp(pubkey, PATHDIR "/" PUBKEY) == 0){
2242
int pubkey_fd = open(pubkey, O_RDONLY);
2243
if(pubkey_fd == -1){
2244
perror_plus("open");
2246
ret = (int)TEMP_FAILURE_RETRY(fstat(pubkey_fd, &st));
2248
perror_plus("fstat");
2250
if(S_ISREG(st.st_mode)
2251
and st.st_uid == 0 and st.st_gid == 0){
2252
ret = fchown(pubkey_fd, uid, gid);
2254
perror_plus("fchown");
2258
TEMP_FAILURE_RETRY(close(pubkey_fd));
2262
/* Lower privileges */
2263
ret_errno = lower_privileges();
2266
perror_plus("Failed to lower privileges");
2271
/* Remove invalid interface names (except "none") */
2273
char *interface = NULL;
2274
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2276
if(strcmp(interface, "none") != 0
2277
and if_nametoindex(interface) == 0){
2278
if(interface[0] != '\0'){
2279
fprintf_plus(stderr, "Not using nonexisting interface"
2280
" \"%s\"\n", interface);
2282
argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
2288
/* Run network hooks */
2290
if(mc.interfaces != NULL){
2291
interfaces_hooks = malloc(mc.interfaces_size);
2292
if(interfaces_hooks == NULL){
2293
perror_plus("malloc");
2296
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2297
argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
2299
run_network_hooks("start", interfaces_hooks != NULL ?
2300
interfaces_hooks : "", delay);
2304
avahi_set_log_function(empty_log);
2307
/* Initialize Avahi early so avahi_simple_poll_quit() can be called
2308
from the signal handler */
2309
/* Initialize the pseudo-RNG for Avahi */
2310
srand((unsigned int) time(NULL));
2311
simple_poll = avahi_simple_poll_new();
2312
if(simple_poll == NULL){
2313
fprintf_plus(stderr,
2314
"Avahi: Failed to create simple poll object.\n");
2315
exitcode = EX_UNAVAILABLE;
2319
sigemptyset(&sigterm_action.sa_mask);
2320
ret = sigaddset(&sigterm_action.sa_mask, SIGINT);
2322
perror_plus("sigaddset");
2323
exitcode = EX_OSERR;
2326
ret = sigaddset(&sigterm_action.sa_mask, SIGHUP);
2328
perror_plus("sigaddset");
2329
exitcode = EX_OSERR;
2332
ret = sigaddset(&sigterm_action.sa_mask, SIGTERM);
2334
perror_plus("sigaddset");
2335
exitcode = EX_OSERR;
2338
/* Need to check if the handler is SIG_IGN before handling:
2339
| [[info:libc:Initial Signal Actions]] |
2340
| [[info:libc:Basic Signal Handling]] |
2342
ret = sigaction(SIGINT, NULL, &old_sigterm_action);
2344
perror_plus("sigaction");
2347
if(old_sigterm_action.sa_handler != SIG_IGN){
2348
ret = sigaction(SIGINT, &sigterm_action, NULL);
2350
perror_plus("sigaction");
2351
exitcode = EX_OSERR;
2355
ret = sigaction(SIGHUP, NULL, &old_sigterm_action);
2357
perror_plus("sigaction");
2360
if(old_sigterm_action.sa_handler != SIG_IGN){
2361
ret = sigaction(SIGHUP, &sigterm_action, NULL);
2363
perror_plus("sigaction");
2364
exitcode = EX_OSERR;
2368
ret = sigaction(SIGTERM, NULL, &old_sigterm_action);
2370
perror_plus("sigaction");
2373
if(old_sigterm_action.sa_handler != SIG_IGN){
2374
ret = sigaction(SIGTERM, &sigterm_action, NULL);
2376
perror_plus("sigaction");
2377
exitcode = EX_OSERR;
2382
/* If no interfaces were specified, make a list */
2383
if(mc.interfaces == NULL){
2384
struct dirent **direntries = NULL;
2385
/* Look for any good interfaces */
2386
ret = scandir(sys_class_net, &direntries, good_interface,
2389
/* Add all found interfaces to interfaces list */
2390
for(int i = 0; i < ret; ++i){
2391
ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2392
direntries[i]->d_name);
2395
perror_plus("argz_add");
2396
free(direntries[i]);
2400
fprintf_plus(stderr, "Will use interface \"%s\"\n",
2401
direntries[i]->d_name);
2403
free(direntries[i]);
2410
fprintf_plus(stderr, "Could not find a network interface\n");
2411
exitcode = EXIT_FAILURE;
2416
/* Bring up interfaces which are down, and remove any "none"s */
2418
char *interface = NULL;
2419
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2421
/* If interface name is "none", stop bringing up interfaces.
2422
Also remove all instances of "none" from the list */
2423
if(strcmp(interface, "none") == 0){
2424
argz_delete(&mc.interfaces, &mc.interfaces_size,
2427
while((interface = argz_next(mc.interfaces,
2428
mc.interfaces_size, interface))){
2429
if(strcmp(interface, "none") == 0){
2430
argz_delete(&mc.interfaces, &mc.interfaces_size,
2437
bool interface_was_up = interface_is_up(interface);
2438
errno = bring_up_interface(interface, delay);
2439
if(not interface_was_up){
2441
perror_plus("Failed to bring up interface");
2443
errno = argz_add(&interfaces_to_take_down,
2444
&interfaces_to_take_down_size,
2447
perror_plus("argz_add");
2452
if(debug and (interfaces_to_take_down == NULL)){
2453
fprintf_plus(stderr, "No interfaces were brought up\n");
2457
/* If we only got one interface, explicitly use only that one */
2458
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2460
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2463
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
2470
ret = init_gnutls_global(pubkey, seckey, &mc);
2472
fprintf_plus(stderr, "init_gnutls_global failed\n");
2473
exitcode = EX_UNAVAILABLE;
2476
gnutls_initialized = true;
2483
/* Try /run/tmp before /tmp */
2484
tempdir = mkdtemp(run_tempdir);
2485
if(tempdir == NULL and errno == ENOENT){
2487
fprintf_plus(stderr, "Tempdir %s did not work, trying %s\n",
2488
run_tempdir, old_tempdir);
2490
tempdir = mkdtemp(old_tempdir);
2492
if(tempdir == NULL){
2493
perror_plus("mkdtemp");
2501
if(not init_gpgme(pubkey, seckey, tempdir, &mc)){
2502
fprintf_plus(stderr, "init_gpgme failed\n");
2503
exitcode = EX_UNAVAILABLE;
2506
gpgme_initialized = true;
2513
if(connect_to != NULL){
2514
/* Connect directly, do not use Zeroconf */
2515
/* (Mainly meant for debugging) */
2516
char *address = strrchr(connect_to, ':');
2518
if(address == NULL){
2519
fprintf_plus(stderr, "No colon in address\n");
2520
exitcode = EX_USAGE;
2530
tmpmax = strtoimax(address+1, &tmp, 10);
2531
if(errno != 0 or tmp == address+1 or *tmp != '\0'
2532
or tmpmax != (in_port_t)tmpmax){
2533
fprintf_plus(stderr, "Bad port number\n");
2534
exitcode = EX_USAGE;
2542
port = (in_port_t)tmpmax;
2544
/* Colon in address indicates IPv6 */
2546
if(strchr(connect_to, ':') != NULL){
2548
/* Accept [] around IPv6 address - see RFC 5952 */
2549
if(connect_to[0] == '[' and address[-1] == ']')
2557
address = connect_to;
2563
while(not quit_now){
2564
ret = start_mandos_communication(address, port, if_index, af,
2566
if(quit_now or ret == 0){
2570
fprintf_plus(stderr, "Retrying in %d seconds\n",
2571
(int)retry_interval);
2573
sleep((unsigned int)retry_interval);
2577
exitcode = EXIT_SUCCESS;
603
case AVAHI_BROWSER_NEW:
604
/* We ignore the returned resolver object. In the callback
605
function we free it. If the server is terminated before
606
the callback function is called the server will free
607
the resolver for us. */
609
if (!(avahi_s_service_resolver_new(s, interface, protocol, name,
611
AVAHI_PROTO_INET6, 0,
612
resolve_callback, s)))
613
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
614
avahi_strerror(avahi_server_errno(s)));
617
case AVAHI_BROWSER_REMOVE:
620
case AVAHI_BROWSER_ALL_FOR_NOW:
621
case AVAHI_BROWSER_CACHE_EXHAUSTED:
626
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
2588
627
AvahiServerConfig config;
2589
/* Do not publish any local Zeroconf records */
628
AvahiSServiceBrowser *sb = NULL;
631
int returncode = EXIT_SUCCESS;
632
const char *interface = "eth0";
633
unsigned int if_index;
634
char *connect_to = NULL;
637
static struct option long_options[] = {
638
{"debug", no_argument, (int *)&debug, 1},
639
{"connect", required_argument, 0, 'c'},
640
{"interface", required_argument, 0, 'i'},
643
int option_index = 0;
644
ret = getopt_long (argc, argv, "i:", long_options,
665
if_index = if_nametoindex(interface);
667
fprintf(stderr, "No such interface: \"%s\"\n", interface);
671
if(connect_to != NULL){
672
/* Connect directly, do not use Zeroconf */
673
/* (Mainly meant for debugging) */
674
char *address = strrchr(connect_to, ':');
676
fprintf(stderr, "No colon in address\n");
680
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
682
perror("Bad port number");
686
address = connect_to;
687
ret = start_mandos_communication(address, port, if_index);
696
avahi_set_log_function(empty_log);
699
/* Initialize the psuedo-RNG */
700
srand((unsigned int) time(NULL));
702
/* Allocate main loop object */
703
if (!(simple_poll = avahi_simple_poll_new())) {
704
fprintf(stderr, "Failed to create simple poll object.\n");
709
/* Do not publish any local records */
2590
710
avahi_server_config_init(&config);
2591
711
config.publish_hinfo = 0;
2592
712
config.publish_addresses = 0;
2593
713
config.publish_workstation = 0;
2594
714
config.publish_domain = 0;
2596
716
/* Allocate a new server */
2597
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
2598
&config, NULL, NULL, &ret_errno);
2600
/* Free the Avahi configuration data */
717
server = avahi_server_new(avahi_simple_poll_get(simple_poll),
718
&config, NULL, NULL, &error);
720
/* Free the configuration data */
2601
721
avahi_server_config_free(&config);
2604
/* Check if creating the Avahi server object succeeded */
2605
if(mc.server == NULL){
2606
fprintf_plus(stderr, "Failed to create Avahi server: %s\n",
2607
avahi_strerror(ret_errno));
2608
exitcode = EX_UNAVAILABLE;
2616
/* Create the Avahi service browser */
2617
sb = avahi_s_service_browser_new(mc.server, if_index,
2618
AVAHI_PROTO_UNSPEC, "_mandos._tcp",
2619
NULL, 0, browse_callback,
2622
fprintf_plus(stderr, "Failed to create service browser: %s\n",
2623
avahi_strerror(avahi_server_errno(mc.server)));
2624
exitcode = EX_UNAVAILABLE;
2632
/* Run the main loop */
2635
fprintf_plus(stderr, "Starting Avahi loop search\n");
2638
ret = avahi_loop_with_timeout(simple_poll,
2639
(int)(retry_interval * 1000), &mc);
2641
fprintf_plus(stderr, "avahi_loop_with_timeout exited %s\n",
2642
(ret == 0) ? "successfully" : "with error");
2648
fprintf_plus(stderr, "%s exiting\n", argv[0]);
2651
/* Cleanup things */
2652
free(mc.interfaces);
2655
avahi_s_service_browser_free(sb);
2657
if(mc.server != NULL)
2658
avahi_server_free(mc.server);
2660
if(simple_poll != NULL)
2661
avahi_simple_poll_free(simple_poll);
2663
if(gnutls_initialized){
2664
gnutls_certificate_free_credentials(mc.cred);
2665
gnutls_global_deinit();
2666
gnutls_dh_params_deinit(mc.dh_params);
2669
if(gpgme_initialized){
2670
gpgme_release(mc.ctx);
2673
/* Cleans up the circular linked list of Mandos servers the client
2675
if(mc.current_server != NULL){
2676
mc.current_server->prev->next = NULL;
2677
while(mc.current_server != NULL){
2678
server *next = mc.current_server->next;
2680
#pragma GCC diagnostic push
2681
#pragma GCC diagnostic ignored "-Wcast-qual"
2683
free((char *)(mc.current_server->ip));
2685
#pragma GCC diagnostic pop
2687
free(mc.current_server);
2688
mc.current_server = next;
2692
/* Re-raise privileges */
2694
ret_errno = raise_privileges();
2697
perror_plus("Failed to raise privileges");
2700
/* Run network hooks */
2701
run_network_hooks("stop", interfaces_hooks != NULL ?
2702
interfaces_hooks : "", delay);
2704
/* Take down the network interfaces which were brought up */
2706
char *interface = NULL;
2707
while((interface=argz_next(interfaces_to_take_down,
2708
interfaces_to_take_down_size,
2710
ret_errno = take_down_interface(interface);
2713
perror_plus("Failed to take down interface");
2716
if(debug and (interfaces_to_take_down == NULL)){
2717
fprintf_plus(stderr, "No interfaces needed to be taken"
2723
ret_errno = lower_privileges_permanently();
2726
perror_plus("Failed to lower privileges permanently");
2730
free(interfaces_to_take_down);
2731
free(interfaces_hooks);
2733
/* Removes the GPGME temp directory and all files inside */
2734
if(tempdir != NULL){
2735
struct dirent **direntries = NULL;
2736
int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY |
2738
if(tempdir_fd == -1){
2739
perror_plus("open");
2742
#if __GLIBC_PREREQ(2, 15)
2743
int numentries = scandirat(tempdir_fd, ".", &direntries,
2744
notdotentries, alphasort);
2745
#else /* not __GLIBC_PREREQ(2, 15) */
2746
int numentries = scandir(tempdir, &direntries, notdotentries,
2748
#endif /* not __GLIBC_PREREQ(2, 15) */
2749
#else /* not __GLIBC__ */
2750
int numentries = scandir(tempdir, &direntries, notdotentries,
2752
#endif /* not __GLIBC__ */
2753
if(numentries >= 0){
2754
for(int i = 0; i < numentries; i++){
2755
ret = unlinkat(tempdir_fd, direntries[i]->d_name, 0);
2757
fprintf_plus(stderr, "unlinkat(open(\"%s\", O_RDONLY),"
2758
" \"%s\", 0): %s\n", tempdir,
2759
direntries[i]->d_name, strerror(errno));
2761
free(direntries[i]);
2764
/* need to clean even if 0 because man page doesn't specify */
2766
if(numentries == -1){
2767
perror_plus("scandir");
2769
ret = rmdir(tempdir);
2770
if(ret == -1 and errno != ENOENT){
2771
perror_plus("rmdir");
2774
TEMP_FAILURE_RETRY(close(tempdir_fd));
2779
sigemptyset(&old_sigterm_action.sa_mask);
2780
old_sigterm_action.sa_handler = SIG_DFL;
2781
ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
2782
&old_sigterm_action,
2785
perror_plus("sigaction");
2788
ret = raise(signal_received);
2789
} while(ret != 0 and errno == EINTR);
2791
perror_plus("raise");
2794
TEMP_FAILURE_RETRY(pause());
723
/* Check if creating the server object succeeded */
725
fprintf(stderr, "Failed to create server: %s\n",
726
avahi_strerror(error));
727
returncode = EXIT_FAILURE;
731
/* Create the service browser */
732
sb = avahi_s_service_browser_new(server, (AvahiIfIndex)if_index,
734
"_mandos._tcp", NULL, 0,
735
browse_callback, server);
737
fprintf(stderr, "Failed to create service browser: %s\n",
738
avahi_strerror(avahi_server_errno(server)));
739
returncode = EXIT_FAILURE;
743
/* Run the main loop */
746
fprintf(stderr, "Starting avahi loop search\n");
749
avahi_simple_poll_loop(simple_poll);
754
fprintf(stderr, "%s exiting\n", argv[0]);
759
avahi_s_service_browser_free(sb);
762
avahi_server_free(server);
765
avahi_simple_poll_free(simple_poll);