/mandos/trunk

To get this branch, use:
bzr branch http://bzr.recompile.se/loggerhead/mandos/trunk

« back to all changes in this revision

Viewing changes to plugins.d/mandos-client.c

  • Committer: teddy at recompile
  • Date: 2020-04-05 21:30:59 UTC
  • Revision ID: teddy@recompile.se-20200405213059-fb2a61ckqynrmatk
Fix file descriptor leak in mandos-client

When the local network has Mandos servers announcing themselves using
real, globally reachable, IPv6 addresses (i.e. not link-local
addresses), but there is no router on the local network providing IPv6
RA (Router Advertisement) packets, the client cannot reach the server
by normal means, since the client only has a link-local IPv6 address,
and has no usable route to reach the server's global IPv6 address.
(This is not a common situation, and usually only happens when the
router itself reboots and runs a Mandos client, since it cannot then
give RA packets to itself.)  The client code has a solution for
this, which consists of adding a temporary local route to reach the
address of the server during communication, and removing this
temporary route afterwards.

This solution with a temporary route works, but has a file descriptor
leak; it leaks one file descriptor for each addition and for each
removal of a route.  If one server requiring an added route is present
on the network, but no servers gives a password, making the client
retry after the default ten seconds, and we furthermore assume a
default 1024 open files limit, the client runs out of file descriptors
after about 90 minutes, after which time the client process will be
useless and fail to retrieve any passwords, necessitating manual
password entry via the keyboard.

Fix this by eliminating the file descriptor leak in the client.

* plugins.d/mandos-client.c (add_delete_local_route): Do
  close(devnull) also in parent process, also if fork() fails, and on
  any failure in child process.

Show diffs side-by-side

added added

removed removed

Lines of Context:
9
9
 * "browse_callback", and parts of "main".
10
10
 * 
11
11
 * Everything else is
12
 
 * Copyright © 2008-2012 Teddy Hogeborn
13
 
 * Copyright © 2008-2012 Björn Påhlsson
14
 
 * 
15
 
 * This program is free software: you can redistribute it and/or
16
 
 * modify it under the terms of the GNU General Public License as
17
 
 * published by the Free Software Foundation, either version 3 of the
18
 
 * License, or (at your option) any later version.
19
 
 * 
20
 
 * This program is distributed in the hope that it will be useful, but
 
12
 * Copyright © 2008-2019 Teddy Hogeborn
 
13
 * Copyright © 2008-2019 Björn Påhlsson
 
14
 * 
 
15
 * This file is part of Mandos.
 
16
 * 
 
17
 * Mandos is free software: you can redistribute it and/or modify it
 
18
 * under the terms of the GNU General Public License as published by
 
19
 * the Free Software Foundation, either version 3 of the License, or
 
20
 * (at your option) any later version.
 
21
 * 
 
22
 * Mandos is distributed in the hope that it will be useful, but
21
23
 * WITHOUT ANY WARRANTY; without even the implied warranty of
22
24
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
23
25
 * General Public License for more details.
24
26
 * 
25
27
 * You should have received a copy of the GNU General Public License
26
 
 * along with this program.  If not, see
27
 
 * <http://www.gnu.org/licenses/>.
 
28
 * along with Mandos.  If not, see <http://www.gnu.org/licenses/>.
28
29
 * 
29
30
 * Contact the authors at <mandos@recompile.se>.
30
31
 */
32
33
/* Needed by GPGME, specifically gpgme_data_seek() */
33
34
#ifndef _LARGEFILE_SOURCE
34
35
#define _LARGEFILE_SOURCE
35
 
#endif
 
36
#endif  /* not _LARGEFILE_SOURCE */
36
37
#ifndef _FILE_OFFSET_BITS
37
38
#define _FILE_OFFSET_BITS 64
38
 
#endif
 
39
#endif  /* not _FILE_OFFSET_BITS */
39
40
 
40
41
#define _GNU_SOURCE             /* TEMP_FAILURE_RETRY(), asprintf() */
41
42
 
42
43
#include <stdio.h>              /* fprintf(), stderr, fwrite(),
43
 
                                   stdout, ferror(), remove() */
 
44
                                   stdout, ferror() */
44
45
#include <stdint.h>             /* uint16_t, uint32_t, intptr_t */
45
46
#include <stddef.h>             /* NULL, size_t, ssize_t */
46
47
#include <stdlib.h>             /* free(), EXIT_SUCCESS, srand(),
47
48
                                   strtof(), abort() */
48
49
#include <stdbool.h>            /* bool, false, true */
49
 
#include <string.h>             /* memset(), strcmp(), strlen(),
50
 
                                   strerror(), asprintf(), strcpy() */
 
50
#include <string.h>             /* strcmp(), strlen(), strerror(),
 
51
                                   asprintf(), strncpy(), strsignal()
 
52
                                */
51
53
#include <sys/ioctl.h>          /* ioctl */
52
54
#include <sys/types.h>          /* socket(), inet_pton(), sockaddr,
53
55
                                   sockaddr_in6, PF_INET6,
55
57
                                   opendir(), DIR */
56
58
#include <sys/stat.h>           /* open(), S_ISREG */
57
59
#include <sys/socket.h>         /* socket(), struct sockaddr_in6,
58
 
                                   inet_pton(), connect() */
59
 
#include <fcntl.h>              /* open() */
 
60
                                   inet_pton(), connect(),
 
61
                                   getnameinfo() */
 
62
#include <fcntl.h>              /* open(), unlinkat(), AT_REMOVEDIR */
60
63
#include <dirent.h>             /* opendir(), struct dirent, readdir()
61
64
                                 */
62
65
#include <inttypes.h>           /* PRIu16, PRIdMAX, intmax_t,
63
66
                                   strtoimax() */
64
 
#include <errno.h>              /* perror(), errno,
 
67
#include <errno.h>              /* perror(), errno, EINTR, EINVAL,
 
68
                                   EAI_SYSTEM, ENETUNREACH,
 
69
                                   EHOSTUNREACH, ECONNREFUSED, EPROTO,
 
70
                                   EIO, ENOENT, ENXIO, ENOMEM, EISDIR,
 
71
                                   ENOTEMPTY,
65
72
                                   program_invocation_short_name */
66
73
#include <time.h>               /* nanosleep(), time(), sleep() */
67
74
#include <net/if.h>             /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
72
79
                                */
73
80
#include <unistd.h>             /* close(), SEEK_SET, off_t, write(),
74
81
                                   getuid(), getgid(), seteuid(),
75
 
                                   setgid(), pause(), _exit() */
76
 
#include <arpa/inet.h>          /* inet_pton(), htons, inet_ntop() */
 
82
                                   setgid(), pause(), _exit(),
 
83
                                   unlinkat() */
 
84
#include <arpa/inet.h>          /* inet_pton(), htons() */
77
85
#include <iso646.h>             /* not, or, and */
78
86
#include <argp.h>               /* struct argp_option, error_t, struct
79
87
                                   argp_state, struct argp,
91
99
                                   argz_delete(), argz_append(),
92
100
                                   argz_stringify(), argz_add(),
93
101
                                   argz_count() */
 
102
#include <netdb.h>              /* getnameinfo(), NI_NUMERICHOST,
 
103
                                   EAI_SYSTEM, gai_strerror() */
94
104
 
95
105
#ifdef __linux__
96
106
#include <sys/klog.h>           /* klogctl() */
113
123
                                   gnutls_*
114
124
                                   init_gnutls_session(),
115
125
                                   GNUTLS_* */
 
126
#if GNUTLS_VERSION_NUMBER < 0x030600
116
127
#include <gnutls/openpgp.h>
117
128
                         /* gnutls_certificate_set_openpgp_key_file(),
118
129
                            GNUTLS_OPENPGP_FMT_BASE64 */
 
130
#elif GNUTLS_VERSION_NUMBER >= 0x030606
 
131
#include <gnutls/x509.h>        /* gnutls_pkcs_encrypt_flags_t,
 
132
                                 GNUTLS_PKCS_PLAIN,
 
133
                                 GNUTLS_PKCS_NULL_PASSWORD */
 
134
#endif
119
135
 
120
136
/* GPGME */
121
137
#include <gpgme.h>              /* All GPGME types, constants and
129
145
#define PATHDIR "/conf/conf.d/mandos"
130
146
#define SECKEY "seckey.txt"
131
147
#define PUBKEY "pubkey.txt"
 
148
#define TLS_PRIVKEY "tls-privkey.pem"
 
149
#define TLS_PUBKEY "tls-pubkey.pem"
132
150
#define HOOKDIR "/lib/mandos/network-hooks.d"
133
151
 
134
152
bool debug = false;
138
156
static const char sys_class_net[] = "/sys/class/net";
139
157
char *connect_to = NULL;
140
158
const char *hookdir = HOOKDIR;
 
159
int hookdir_fd = -1;
141
160
uid_t uid = 65534;
142
161
gid_t gid = 65534;
143
162
 
180
199
  perror(print_text);
181
200
}
182
201
 
183
 
__attribute__((format (gnu_printf, 2, 3)))
 
202
__attribute__((format (gnu_printf, 2, 3), nonnull))
184
203
int fprintf_plus(FILE *stream, const char *format, ...){
185
204
  va_list ap;
186
205
  va_start (ap, format);
187
206
  
188
207
  TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
189
208
                             program_invocation_short_name));
190
 
  return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
 
209
  return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
191
210
}
192
211
 
193
212
/*
195
214
 * bytes. "buffer_capacity" is how much is currently allocated,
196
215
 * "buffer_length" is how much is already used.
197
216
 */
 
217
__attribute__((nonnull, warn_unused_result))
198
218
size_t incbuffer(char **buffer, size_t buffer_length,
199
219
                 size_t buffer_capacity){
200
220
  if(buffer_length + BUFFER_SIZE > buffer_capacity){
201
 
    *buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
202
 
    if(buffer == NULL){
 
221
    char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
 
222
    if(new_buf == NULL){
 
223
      int old_errno = errno;
 
224
      free(*buffer);
 
225
      errno = old_errno;
 
226
      *buffer = NULL;
203
227
      return 0;
204
228
    }
 
229
    *buffer = new_buf;
205
230
    buffer_capacity += BUFFER_SIZE;
206
231
  }
207
232
  return buffer_capacity;
208
233
}
209
234
 
210
235
/* Add server to set of servers to retry periodically */
 
236
__attribute__((nonnull, warn_unused_result))
211
237
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
212
238
                int af, server **current_server){
213
239
  int ret;
222
248
                          .af = af };
223
249
  if(new_server->ip == NULL){
224
250
    perror_plus("strdup");
 
251
    free(new_server);
 
252
    return false;
 
253
  }
 
254
  ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
 
255
  if(ret == -1){
 
256
    perror_plus("clock_gettime");
 
257
#ifdef __GNUC__
 
258
#pragma GCC diagnostic push
 
259
#pragma GCC diagnostic ignored "-Wcast-qual"
 
260
#endif
 
261
    free((char *)(new_server->ip));
 
262
#ifdef __GNUC__
 
263
#pragma GCC diagnostic pop
 
264
#endif
 
265
    free(new_server);
225
266
    return false;
226
267
  }
227
268
  /* Special case of first server */
229
270
    new_server->next = new_server;
230
271
    new_server->prev = new_server;
231
272
    *current_server = new_server;
232
 
  /* Place the new server last in the list */
233
273
  } else {
 
274
    /* Place the new server last in the list */
234
275
    new_server->next = *current_server;
235
276
    new_server->prev = (*current_server)->prev;
236
277
    new_server->prev->next = new_server;
237
278
    (*current_server)->prev = new_server;
238
279
  }
239
 
  ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
240
 
  if(ret == -1){
241
 
    perror_plus("clock_gettime");
242
 
    return false;
243
 
  }
244
280
  return true;
245
281
}
246
282
 
 
283
/* Set effective uid to 0, return errno */
 
284
__attribute__((warn_unused_result))
 
285
int raise_privileges(void){
 
286
  int old_errno = errno;
 
287
  int ret = 0;
 
288
  if(seteuid(0) == -1){
 
289
    ret = errno;
 
290
  }
 
291
  errno = old_errno;
 
292
  return ret;
 
293
}
 
294
 
 
295
/* Set effective and real user ID to 0.  Return errno. */
 
296
__attribute__((warn_unused_result))
 
297
int raise_privileges_permanently(void){
 
298
  int old_errno = errno;
 
299
  int ret = raise_privileges();
 
300
  if(ret != 0){
 
301
    errno = old_errno;
 
302
    return ret;
 
303
  }
 
304
  if(setuid(0) == -1){
 
305
    ret = errno;
 
306
  }
 
307
  errno = old_errno;
 
308
  return ret;
 
309
}
 
310
 
 
311
/* Set effective user ID to unprivileged saved user ID */
 
312
__attribute__((warn_unused_result))
 
313
int lower_privileges(void){
 
314
  int old_errno = errno;
 
315
  int ret = 0;
 
316
  if(seteuid(uid) == -1){
 
317
    ret = errno;
 
318
  }
 
319
  errno = old_errno;
 
320
  return ret;
 
321
}
 
322
 
 
323
/* Lower privileges permanently */
 
324
__attribute__((warn_unused_result))
 
325
int lower_privileges_permanently(void){
 
326
  int old_errno = errno;
 
327
  int ret = 0;
 
328
  if(setuid(uid) == -1){
 
329
    ret = errno;
 
330
  }
 
331
  errno = old_errno;
 
332
  return ret;
 
333
}
 
334
 
247
335
/* 
248
336
 * Initialize GPGME.
249
337
 */
250
 
static bool init_gpgme(const char *seckey, const char *pubkey,
251
 
                       const char *tempdir, mandos_context *mc){
 
338
__attribute__((nonnull, warn_unused_result))
 
339
static bool init_gpgme(const char * const seckey,
 
340
                       const char * const pubkey,
 
341
                       const char * const tempdir,
 
342
                       mandos_context *mc){
252
343
  gpgme_error_t rc;
253
344
  gpgme_engine_info_t engine_info;
254
345
  
255
346
  /*
256
347
   * Helper function to insert pub and seckey to the engine keyring.
257
348
   */
258
 
  bool import_key(const char *filename){
 
349
  bool import_key(const char * const filename){
259
350
    int ret;
260
351
    int fd;
261
352
    gpgme_data_t pgp_data;
266
357
      return false;
267
358
    }
268
359
    
 
360
    /* Workaround for systems without a real-time clock; see also
 
361
       Debian bug #894495: <https://bugs.debian.org/894495> */
 
362
    do {
 
363
      {
 
364
        time_t currtime = time(NULL);
 
365
        if(currtime != (time_t)-1){
 
366
          struct tm tm;
 
367
          if(gmtime_r(&currtime, &tm) == NULL) {
 
368
            perror_plus("gmtime_r");
 
369
            break;
 
370
          }
 
371
          if(tm.tm_year != 70 or tm.tm_mon != 0){
 
372
            break;
 
373
          }
 
374
          if(debug){
 
375
            fprintf_plus(stderr, "System clock is January 1970");
 
376
          }
 
377
        } else {
 
378
          if(debug){
 
379
            fprintf_plus(stderr, "System clock is invalid");
 
380
          }
 
381
        }
 
382
      }
 
383
      struct stat keystat;
 
384
      ret = fstat(fd, &keystat);
 
385
      if(ret != 0){
 
386
        perror_plus("fstat");
 
387
        break;
 
388
      }
 
389
      ret = raise_privileges();
 
390
      if(ret != 0){
 
391
        errno = ret;
 
392
        perror_plus("Failed to raise privileges");
 
393
        break;
 
394
      }
 
395
      if(debug){
 
396
        fprintf_plus(stderr,
 
397
                     "Setting system clock to key file mtime");
 
398
      }
 
399
      time_t keytime = keystat.st_mtim.tv_sec;
 
400
      if(stime(&keytime) != 0){
 
401
        perror_plus("stime");
 
402
      }
 
403
      ret = lower_privileges();
 
404
      if(ret != 0){
 
405
        errno = ret;
 
406
        perror_plus("Failed to lower privileges");
 
407
      }
 
408
    } while(false);
 
409
 
269
410
    rc = gpgme_data_new_from_fd(&pgp_data, fd);
270
411
    if(rc != GPG_ERR_NO_ERROR){
271
412
      fprintf_plus(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
279
420
                   gpgme_strsource(rc), gpgme_strerror(rc));
280
421
      return false;
281
422
    }
 
423
    {
 
424
      gpgme_import_result_t import_result
 
425
        = gpgme_op_import_result(mc->ctx);
 
426
      if((import_result->imported < 1
 
427
          or import_result->not_imported > 0)
 
428
         and import_result->unchanged == 0){
 
429
        fprintf_plus(stderr, "bad gpgme_op_import_results:\n");
 
430
        fprintf_plus(stderr,
 
431
                     "The total number of considered keys: %d\n",
 
432
                     import_result->considered);
 
433
        fprintf_plus(stderr,
 
434
                     "The number of keys without user ID: %d\n",
 
435
                     import_result->no_user_id);
 
436
        fprintf_plus(stderr,
 
437
                     "The total number of imported keys: %d\n",
 
438
                     import_result->imported);
 
439
        fprintf_plus(stderr, "The number of imported RSA keys: %d\n",
 
440
                     import_result->imported_rsa);
 
441
        fprintf_plus(stderr, "The number of unchanged keys: %d\n",
 
442
                     import_result->unchanged);
 
443
        fprintf_plus(stderr, "The number of new user IDs: %d\n",
 
444
                     import_result->new_user_ids);
 
445
        fprintf_plus(stderr, "The number of new sub keys: %d\n",
 
446
                     import_result->new_sub_keys);
 
447
        fprintf_plus(stderr, "The number of new signatures: %d\n",
 
448
                     import_result->new_signatures);
 
449
        fprintf_plus(stderr, "The number of new revocations: %d\n",
 
450
                     import_result->new_revocations);
 
451
        fprintf_plus(stderr,
 
452
                     "The total number of secret keys read: %d\n",
 
453
                     import_result->secret_read);
 
454
        fprintf_plus(stderr,
 
455
                     "The number of imported secret keys: %d\n",
 
456
                     import_result->secret_imported);
 
457
        fprintf_plus(stderr,
 
458
                     "The number of unchanged secret keys: %d\n",
 
459
                     import_result->secret_unchanged);
 
460
        fprintf_plus(stderr, "The number of keys not imported: %d\n",
 
461
                     import_result->not_imported);
 
462
        for(gpgme_import_status_t import_status
 
463
              = import_result->imports;
 
464
            import_status != NULL;
 
465
            import_status = import_status->next){
 
466
          fprintf_plus(stderr, "Import status for key: %s\n",
 
467
                       import_status->fpr);
 
468
          if(import_status->result != GPG_ERR_NO_ERROR){
 
469
            fprintf_plus(stderr, "Import result: %s: %s\n",
 
470
                         gpgme_strsource(import_status->result),
 
471
                         gpgme_strerror(import_status->result));
 
472
          }
 
473
          fprintf_plus(stderr, "Key status:\n");
 
474
          fprintf_plus(stderr,
 
475
                       import_status->status & GPGME_IMPORT_NEW
 
476
                       ? "The key was new.\n"
 
477
                       : "The key was not new.\n");
 
478
          fprintf_plus(stderr,
 
479
                       import_status->status & GPGME_IMPORT_UID
 
480
                       ? "The key contained new user IDs.\n"
 
481
                       : "The key did not contain new user IDs.\n");
 
482
          fprintf_plus(stderr,
 
483
                       import_status->status & GPGME_IMPORT_SIG
 
484
                       ? "The key contained new signatures.\n"
 
485
                       : "The key did not contain new signatures.\n");
 
486
          fprintf_plus(stderr,
 
487
                       import_status->status & GPGME_IMPORT_SUBKEY
 
488
                       ? "The key contained new sub keys.\n"
 
489
                       : "The key did not contain new sub keys.\n");
 
490
          fprintf_plus(stderr,
 
491
                       import_status->status & GPGME_IMPORT_SECRET
 
492
                       ? "The key contained a secret key.\n"
 
493
                       : "The key did not contain a secret key.\n");
 
494
        }
 
495
        return false;
 
496
      }
 
497
    }
282
498
    
283
 
    ret = (int)TEMP_FAILURE_RETRY(close(fd));
 
499
    ret = close(fd);
284
500
    if(ret == -1){
285
501
      perror_plus("close");
286
502
    }
325
541
  /* Create new GPGME "context" */
326
542
  rc = gpgme_new(&(mc->ctx));
327
543
  if(rc != GPG_ERR_NO_ERROR){
328
 
    fprintf_plus(stderr, "Mandos plugin mandos-client: "
329
 
                 "bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
330
 
                 gpgme_strerror(rc));
 
544
    fprintf_plus(stderr, "bad gpgme_new: %s: %s\n",
 
545
                 gpgme_strsource(rc), gpgme_strerror(rc));
331
546
    return false;
332
547
  }
333
548
  
342
557
 * Decrypt OpenPGP data.
343
558
 * Returns -1 on error
344
559
 */
 
560
__attribute__((nonnull, warn_unused_result))
345
561
static ssize_t pgp_packet_decrypt(const char *cryptotext,
346
562
                                  size_t crypto_size,
347
563
                                  char **plaintext,
368
584
  /* Create new empty GPGME data buffer for the plaintext */
369
585
  rc = gpgme_data_new(&dh_plain);
370
586
  if(rc != GPG_ERR_NO_ERROR){
371
 
    fprintf_plus(stderr, "Mandos plugin mandos-client: "
372
 
                 "bad gpgme_data_new: %s: %s\n",
 
587
    fprintf_plus(stderr, "bad gpgme_data_new: %s: %s\n",
373
588
                 gpgme_strsource(rc), gpgme_strerror(rc));
374
589
    gpgme_data_release(dh_crypto);
375
590
    return -1;
388
603
      if(result == NULL){
389
604
        fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
390
605
      } else {
391
 
        fprintf_plus(stderr, "Unsupported algorithm: %s\n",
392
 
                     result->unsupported_algorithm);
393
 
        fprintf_plus(stderr, "Wrong key usage: %u\n",
394
 
                     result->wrong_key_usage);
 
606
        if(result->unsupported_algorithm != NULL) {
 
607
          fprintf_plus(stderr, "Unsupported algorithm: %s\n",
 
608
                       result->unsupported_algorithm);
 
609
        }
 
610
        fprintf_plus(stderr, "Wrong key usage: %s\n",
 
611
                     result->wrong_key_usage ? "Yes" : "No");
395
612
        if(result->file_name != NULL){
396
613
          fprintf_plus(stderr, "File name: %s\n", result->file_name);
397
614
        }
398
 
        gpgme_recipient_t recipient;
399
 
        recipient = result->recipients;
400
 
        while(recipient != NULL){
 
615
 
 
616
        for(gpgme_recipient_t r = result->recipients; r != NULL;
 
617
            r = r->next){
401
618
          fprintf_plus(stderr, "Public key algorithm: %s\n",
402
 
                       gpgme_pubkey_algo_name
403
 
                       (recipient->pubkey_algo));
404
 
          fprintf_plus(stderr, "Key ID: %s\n", recipient->keyid);
 
619
                       gpgme_pubkey_algo_name(r->pubkey_algo));
 
620
          fprintf_plus(stderr, "Key ID: %s\n", r->keyid);
405
621
          fprintf_plus(stderr, "Secret key available: %s\n",
406
 
                       recipient->status == GPG_ERR_NO_SECKEY
407
 
                       ? "No" : "Yes");
408
 
          recipient = recipient->next;
 
622
                       r->status == GPG_ERR_NO_SECKEY ? "No" : "Yes");
409
623
        }
410
624
      }
411
625
    }
467
681
  return plaintext_length;
468
682
}
469
683
 
470
 
static const char * safer_gnutls_strerror(int value){
 
684
__attribute__((warn_unused_result, const))
 
685
static const char *safe_string(const char *str){
 
686
  if(str == NULL)
 
687
    return "(unknown)";
 
688
  return str;
 
689
}
 
690
 
 
691
__attribute__((warn_unused_result))
 
692
static const char *safer_gnutls_strerror(int value){
471
693
  const char *ret = gnutls_strerror(value);
472
 
  if(ret == NULL)
473
 
    ret = "(unknown)";
474
 
  return ret;
 
694
  return safe_string(ret);
475
695
}
476
696
 
477
697
/* GnuTLS log function callback */
 
698
__attribute__((nonnull))
478
699
static void debuggnutls(__attribute__((unused)) int level,
479
700
                        const char* string){
480
701
  fprintf_plus(stderr, "GnuTLS: %s", string);
481
702
}
482
703
 
 
704
__attribute__((nonnull(1, 2, 4), warn_unused_result))
483
705
static int init_gnutls_global(const char *pubkeyfilename,
484
706
                              const char *seckeyfilename,
 
707
                              const char *dhparamsfilename,
485
708
                              mandos_context *mc){
486
709
  int ret;
487
710
  
489
712
    fprintf_plus(stderr, "Initializing GnuTLS\n");
490
713
  }
491
714
  
492
 
  ret = gnutls_global_init();
493
 
  if(ret != GNUTLS_E_SUCCESS){
494
 
    fprintf_plus(stderr, "GnuTLS global_init: %s\n",
495
 
                 safer_gnutls_strerror(ret));
496
 
    return -1;
497
 
  }
498
 
  
499
715
  if(debug){
500
716
    /* "Use a log level over 10 to enable all debugging options."
501
717
     * - GnuTLS manual
509
725
  if(ret != GNUTLS_E_SUCCESS){
510
726
    fprintf_plus(stderr, "GnuTLS memory error: %s\n",
511
727
                 safer_gnutls_strerror(ret));
512
 
    gnutls_global_deinit();
513
728
    return -1;
514
729
  }
515
730
  
516
731
  if(debug){
517
 
    fprintf_plus(stderr, "Attempting to use OpenPGP public key %s and"
518
 
                 " secret key %s as GnuTLS credentials\n",
 
732
    fprintf_plus(stderr, "Attempting to use public key %s and"
 
733
                 " private key %s as GnuTLS credentials\n",
519
734
                 pubkeyfilename,
520
735
                 seckeyfilename);
521
736
  }
522
737
  
 
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 */
 
742
     NULL,                      /* pass */
 
743
     /* key_usage */
 
744
     GNUTLS_KEY_DIGITAL_SIGNATURE | GNUTLS_KEY_KEY_ENCIPHERMENT,
 
745
     NULL,                      /* names */
 
746
     0,                         /* names_length */
 
747
     /* privkey_flags */
 
748
     GNUTLS_PKCS_PLAIN | GNUTLS_PKCS_NULL_PASSWORD,
 
749
     0);                        /* pkcs11_flags */
 
750
#elif GNUTLS_VERSION_NUMBER < 0x030600
523
751
  ret = gnutls_certificate_set_openpgp_key_file
524
752
    (mc->cred, pubkeyfilename, seckeyfilename,
525
753
     GNUTLS_OPENPGP_FMT_BASE64);
 
754
#else
 
755
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
756
#endif
526
757
  if(ret != GNUTLS_E_SUCCESS){
527
758
    fprintf_plus(stderr,
528
 
                 "Error[%d] while reading the OpenPGP key pair ('%s',"
 
759
                 "Error[%d] while reading the key pair ('%s',"
529
760
                 " '%s')\n", ret, pubkeyfilename, seckeyfilename);
530
761
    fprintf_plus(stderr, "The GnuTLS error is: %s\n",
531
762
                 safer_gnutls_strerror(ret));
540
771
                 safer_gnutls_strerror(ret));
541
772
    goto globalfail;
542
773
  }
543
 
  ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
544
 
  if(ret != GNUTLS_E_SUCCESS){
545
 
    fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
546
 
                 safer_gnutls_strerror(ret));
547
 
    goto globalfail;
548
 
  }
549
 
  
550
 
  gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
 
774
  /* If a Diffie-Hellman parameters file was given, try to use it */
 
775
  if(dhparamsfilename != NULL){
 
776
    gnutls_datum_t params = { .data = NULL, .size = 0 };
 
777
    do {
 
778
      int dhpfile = open(dhparamsfilename, O_RDONLY);
 
779
      if(dhpfile == -1){
 
780
        perror_plus("open");
 
781
        dhparamsfilename = NULL;
 
782
        break;
 
783
      }
 
784
      size_t params_capacity = 0;
 
785
      while(true){
 
786
        params_capacity = incbuffer((char **)&params.data,
 
787
                                    (size_t)params.size,
 
788
                                    (size_t)params_capacity);
 
789
        if(params_capacity == 0){
 
790
          perror_plus("incbuffer");
 
791
          free(params.data);
 
792
          params.data = NULL;
 
793
          dhparamsfilename = NULL;
 
794
          break;
 
795
        }
 
796
        ssize_t bytes_read = read(dhpfile,
 
797
                                  params.data + params.size,
 
798
                                  BUFFER_SIZE);
 
799
        /* EOF */
 
800
        if(bytes_read == 0){
 
801
          break;
 
802
        }
 
803
        /* check bytes_read for failure */
 
804
        if(bytes_read < 0){
 
805
          perror_plus("read");
 
806
          free(params.data);
 
807
          params.data = NULL;
 
808
          dhparamsfilename = NULL;
 
809
          break;
 
810
        }
 
811
        params.size += (unsigned int)bytes_read;
 
812
      }
 
813
      ret = close(dhpfile);
 
814
      if(ret == -1){
 
815
        perror_plus("close");
 
816
      }
 
817
      if(params.data == NULL){
 
818
        dhparamsfilename = NULL;
 
819
      }
 
820
      if(dhparamsfilename == NULL){
 
821
        break;
 
822
      }
 
823
      ret = gnutls_dh_params_import_pkcs3(mc->dh_params, &params,
 
824
                                          GNUTLS_X509_FMT_PEM);
 
825
      if(ret != GNUTLS_E_SUCCESS){
 
826
        fprintf_plus(stderr, "Failed to parse DH parameters in file"
 
827
                     " \"%s\": %s\n", dhparamsfilename,
 
828
                     safer_gnutls_strerror(ret));
 
829
        dhparamsfilename = NULL;
 
830
      }
 
831
      free(params.data);
 
832
    } while(false);
 
833
  }
 
834
  if(dhparamsfilename == NULL){
 
835
    if(mc->dh_bits == 0){
 
836
#if GNUTLS_VERSION_NUMBER < 0x030600
 
837
      /* Find out the optimal number of DH bits */
 
838
      /* Try to read the private key file */
 
839
      gnutls_datum_t buffer = { .data = NULL, .size = 0 };
 
840
      do {
 
841
        int secfile = open(seckeyfilename, O_RDONLY);
 
842
        if(secfile == -1){
 
843
          perror_plus("open");
 
844
          break;
 
845
        }
 
846
        size_t buffer_capacity = 0;
 
847
        while(true){
 
848
          buffer_capacity = incbuffer((char **)&buffer.data,
 
849
                                      (size_t)buffer.size,
 
850
                                      (size_t)buffer_capacity);
 
851
          if(buffer_capacity == 0){
 
852
            perror_plus("incbuffer");
 
853
            free(buffer.data);
 
854
            buffer.data = NULL;
 
855
            break;
 
856
          }
 
857
          ssize_t bytes_read = read(secfile,
 
858
                                    buffer.data + buffer.size,
 
859
                                    BUFFER_SIZE);
 
860
          /* EOF */
 
861
          if(bytes_read == 0){
 
862
            break;
 
863
          }
 
864
          /* check bytes_read for failure */
 
865
          if(bytes_read < 0){
 
866
            perror_plus("read");
 
867
            free(buffer.data);
 
868
            buffer.data = NULL;
 
869
            break;
 
870
          }
 
871
          buffer.size += (unsigned int)bytes_read;
 
872
        }
 
873
        close(secfile);
 
874
      } while(false);
 
875
      /* If successful, use buffer to parse private key */
 
876
      gnutls_sec_param_t sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
877
      if(buffer.data != NULL){
 
878
        {
 
879
          gnutls_openpgp_privkey_t privkey = NULL;
 
880
          ret = gnutls_openpgp_privkey_init(&privkey);
 
881
          if(ret != GNUTLS_E_SUCCESS){
 
882
            fprintf_plus(stderr, "Error initializing OpenPGP key"
 
883
                         " structure: %s",
 
884
                         safer_gnutls_strerror(ret));
 
885
            free(buffer.data);
 
886
            buffer.data = NULL;
 
887
          } else {
 
888
            ret = gnutls_openpgp_privkey_import
 
889
              (privkey, &buffer, GNUTLS_OPENPGP_FMT_BASE64, "", 0);
 
890
            if(ret != GNUTLS_E_SUCCESS){
 
891
              fprintf_plus(stderr, "Error importing OpenPGP key : %s",
 
892
                           safer_gnutls_strerror(ret));
 
893
              privkey = NULL;
 
894
            }
 
895
            free(buffer.data);
 
896
            buffer.data = NULL;
 
897
            if(privkey != NULL){
 
898
              /* Use private key to suggest an appropriate
 
899
                 sec_param */
 
900
              sec_param = gnutls_openpgp_privkey_sec_param(privkey);
 
901
              gnutls_openpgp_privkey_deinit(privkey);
 
902
              if(debug){
 
903
                fprintf_plus(stderr, "This OpenPGP key implies using"
 
904
                             " a GnuTLS security parameter \"%s\".\n",
 
905
                             safe_string(gnutls_sec_param_get_name
 
906
                                         (sec_param)));
 
907
              }
 
908
            }
 
909
          }
 
910
        }
 
911
        if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
 
912
          /* Err on the side of caution */
 
913
          sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
914
          if(debug){
 
915
            fprintf_plus(stderr, "Falling back to security parameter"
 
916
                         " \"%s\"\n",
 
917
                         safe_string(gnutls_sec_param_get_name
 
918
                                     (sec_param)));
 
919
          }
 
920
        }
 
921
      }
 
922
      unsigned int uret = gnutls_sec_param_to_pk_bits(GNUTLS_PK_DH, sec_param);
 
923
      if(uret != 0){
 
924
        mc->dh_bits = uret;
 
925
        if(debug){
 
926
          fprintf_plus(stderr, "A \"%s\" GnuTLS security parameter"
 
927
                       " implies %u DH bits; using that.\n",
 
928
                       safe_string(gnutls_sec_param_get_name
 
929
                                   (sec_param)),
 
930
                       mc->dh_bits);
 
931
        }
 
932
      } else {
 
933
        fprintf_plus(stderr, "Failed to get implied number of DH"
 
934
                     " bits for security parameter \"%s\"): %s\n",
 
935
                     safe_string(gnutls_sec_param_get_name
 
936
                                 (sec_param)),
 
937
                     safer_gnutls_strerror(ret));
 
938
        goto globalfail;
 
939
      }
 
940
#endif
 
941
    } else {                    /* dh_bits != 0 */
 
942
      if(debug){
 
943
        fprintf_plus(stderr, "DH bits explicitly set to %u\n",
 
944
                     mc->dh_bits);
 
945
      }
 
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));
 
951
        goto globalfail;
 
952
      }
 
953
      gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
 
954
    }
 
955
  }
551
956
  
552
957
  return 0;
553
958
  
554
959
 globalfail:
555
960
  
556
961
  gnutls_certificate_free_credentials(mc->cred);
557
 
  gnutls_global_deinit();
558
962
  gnutls_dh_params_deinit(mc->dh_params);
559
963
  return -1;
560
964
}
561
965
 
 
966
__attribute__((nonnull, warn_unused_result))
562
967
static int init_gnutls_session(gnutls_session_t *session,
563
968
                               mandos_context *mc){
564
969
  int ret;
565
970
  /* GnuTLS session creation */
566
971
  do {
567
 
    ret = gnutls_init(session, GNUTLS_SERVER);
 
972
    ret = gnutls_init(session, (GNUTLS_SERVER
 
973
#if GNUTLS_VERSION_NUMBER >= 0x030506
 
974
                                | GNUTLS_NO_TICKETS
 
975
#endif
 
976
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
977
                                | GNUTLS_ENABLE_RAWPK
 
978
#endif
 
979
                                ));
568
980
    if(quit_now){
569
981
      return -1;
570
982
    }
611
1023
  /* ignore client certificate if any. */
612
1024
  gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
613
1025
  
614
 
  gnutls_dh_set_prime_bits(*session, mc->dh_bits);
615
 
  
616
1026
  return 0;
617
1027
}
618
1028
 
620
1030
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
621
1031
                      __attribute__((unused)) const char *txt){}
622
1032
 
 
1033
/* Helper function to add_local_route() and delete_local_route() */
 
1034
__attribute__((nonnull, warn_unused_result))
 
1035
static bool add_delete_local_route(const bool add,
 
1036
                                   const char *address,
 
1037
                                   AvahiIfIndex if_index){
 
1038
  int ret;
 
1039
  char helper[] = "mandos-client-iprouteadddel";
 
1040
  char add_arg[] = "add";
 
1041
  char delete_arg[] = "delete";
 
1042
  char debug_flag[] = "--debug";
 
1043
  char *pluginhelperdir = getenv("MANDOSPLUGINHELPERDIR");
 
1044
  if(pluginhelperdir == NULL){
 
1045
    if(debug){
 
1046
      fprintf_plus(stderr, "MANDOSPLUGINHELPERDIR environment"
 
1047
                   " variable not set; cannot run helper\n");
 
1048
    }
 
1049
    return false;
 
1050
  }
 
1051
  
 
1052
  char interface[IF_NAMESIZE];
 
1053
  if(if_indextoname((unsigned int)if_index, interface) == NULL){
 
1054
    perror_plus("if_indextoname");
 
1055
    return false;
 
1056
  }
 
1057
  
 
1058
  int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
 
1059
  if(devnull == -1){
 
1060
    perror_plus("open(\"/dev/null\", O_RDONLY)");
 
1061
    return false;
 
1062
  }
 
1063
  pid_t pid = fork();
 
1064
  if(pid == 0){
 
1065
    /* Child */
 
1066
    /* Raise privileges */
 
1067
    errno = raise_privileges_permanently();
 
1068
    if(errno != 0){
 
1069
      perror_plus("Failed to raise privileges");
 
1070
      /* _exit(EX_NOPERM); */
 
1071
    } else {
 
1072
      /* Set group */
 
1073
      errno = 0;
 
1074
      ret = setgid(0);
 
1075
      if(ret == -1){
 
1076
        perror_plus("setgid");
 
1077
        close(devnull);
 
1078
        _exit(EX_NOPERM);
 
1079
      }
 
1080
      /* Reset supplementary groups */
 
1081
      errno = 0;
 
1082
      ret = setgroups(0, NULL);
 
1083
      if(ret == -1){
 
1084
        perror_plus("setgroups");
 
1085
        close(devnull);
 
1086
        _exit(EX_NOPERM);
 
1087
      }
 
1088
    }
 
1089
    ret = dup2(devnull, STDIN_FILENO);
 
1090
    if(ret == -1){
 
1091
      perror_plus("dup2(devnull, STDIN_FILENO)");
 
1092
      close(devnull);
 
1093
      _exit(EX_OSERR);
 
1094
    }
 
1095
    ret = close(devnull);
 
1096
    if(ret == -1){
 
1097
      perror_plus("close");
 
1098
    }
 
1099
    ret = dup2(STDERR_FILENO, STDOUT_FILENO);
 
1100
    if(ret == -1){
 
1101
      perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
 
1102
      _exit(EX_OSERR);
 
1103
    }
 
1104
    int helperdir_fd = (int)TEMP_FAILURE_RETRY(open(pluginhelperdir,
 
1105
                                                    O_RDONLY
 
1106
                                                    | O_DIRECTORY
 
1107
                                                    | O_PATH
 
1108
                                                    | O_CLOEXEC));
 
1109
    if(helperdir_fd == -1){
 
1110
      perror_plus("open");
 
1111
      _exit(EX_UNAVAILABLE);
 
1112
    }
 
1113
    int helper_fd = (int)TEMP_FAILURE_RETRY(openat(helperdir_fd,
 
1114
                                                   helper, O_RDONLY));
 
1115
    if(helper_fd == -1){
 
1116
      perror_plus("openat");
 
1117
      close(helperdir_fd);
 
1118
      _exit(EX_UNAVAILABLE);
 
1119
    }
 
1120
    close(helperdir_fd);
 
1121
#ifdef __GNUC__
 
1122
#pragma GCC diagnostic push
 
1123
#pragma GCC diagnostic ignored "-Wcast-qual"
 
1124
#endif
 
1125
    if(fexecve(helper_fd, (char *const [])
 
1126
               { helper, add ? add_arg : delete_arg, (char *)address,
 
1127
                   interface, debug ? debug_flag : NULL, NULL },
 
1128
               environ) == -1){
 
1129
#ifdef __GNUC__
 
1130
#pragma GCC diagnostic pop
 
1131
#endif
 
1132
      perror_plus("fexecve");
 
1133
      _exit(EXIT_FAILURE);
 
1134
    }
 
1135
  }
 
1136
  if(pid == -1){
 
1137
    perror_plus("fork");
 
1138
    close(devnull);
 
1139
    return false;
 
1140
  }
 
1141
  ret = close(devnull);
 
1142
  if(ret == -1){
 
1143
    perror_plus("close");
 
1144
  }
 
1145
  int status;
 
1146
  pid_t pret = -1;
 
1147
  errno = 0;
 
1148
  do {
 
1149
    pret = waitpid(pid, &status, 0);
 
1150
    if(pret == -1 and errno == EINTR and quit_now){
 
1151
      int errno_raising = 0;
 
1152
      if((errno = raise_privileges()) != 0){
 
1153
        errno_raising = errno;
 
1154
        perror_plus("Failed to raise privileges in order to"
 
1155
                    " kill helper program");
 
1156
      }
 
1157
      if(kill(pid, SIGTERM) == -1){
 
1158
        perror_plus("kill");
 
1159
      }
 
1160
      if((errno_raising == 0) and (errno = lower_privileges()) != 0){
 
1161
        perror_plus("Failed to lower privileges after killing"
 
1162
                    " helper program");
 
1163
      }
 
1164
      return false;
 
1165
    }
 
1166
  } while(pret == -1 and errno == EINTR);
 
1167
  if(pret == -1){
 
1168
    perror_plus("waitpid");
 
1169
    return false;
 
1170
  }
 
1171
  if(WIFEXITED(status)){
 
1172
    if(WEXITSTATUS(status) != 0){
 
1173
      fprintf_plus(stderr, "Error: iprouteadddel exited"
 
1174
                   " with status %d\n", WEXITSTATUS(status));
 
1175
      return false;
 
1176
    }
 
1177
    return true;
 
1178
  }
 
1179
  if(WIFSIGNALED(status)){
 
1180
    fprintf_plus(stderr, "Error: iprouteadddel died by"
 
1181
                 " signal %d\n", WTERMSIG(status));
 
1182
    return false;
 
1183
  }
 
1184
  fprintf_plus(stderr, "Error: iprouteadddel crashed\n");
 
1185
  return false;
 
1186
}
 
1187
 
 
1188
__attribute__((nonnull, warn_unused_result))
 
1189
static bool add_local_route(const char *address,
 
1190
                            AvahiIfIndex if_index){
 
1191
  if(debug){
 
1192
    fprintf_plus(stderr, "Adding route to %s\n", address);
 
1193
  }
 
1194
  return add_delete_local_route(true, address, if_index);
 
1195
}
 
1196
 
 
1197
__attribute__((nonnull, warn_unused_result))
 
1198
static bool delete_local_route(const char *address,
 
1199
                               AvahiIfIndex if_index){
 
1200
  if(debug){
 
1201
    fprintf_plus(stderr, "Removing route to %s\n", address);
 
1202
  }
 
1203
  return add_delete_local_route(false, address, if_index);
 
1204
}
 
1205
 
623
1206
/* Called when a Mandos server is found */
 
1207
__attribute__((nonnull, warn_unused_result))
624
1208
static int start_mandos_communication(const char *ip, in_port_t port,
625
1209
                                      AvahiIfIndex if_index,
626
1210
                                      int af, mandos_context *mc){
627
1211
  int ret, tcp_sd = -1;
628
1212
  ssize_t sret;
629
 
  union {
630
 
    struct sockaddr_in in;
631
 
    struct sockaddr_in6 in6;
632
 
  } to;
 
1213
  struct sockaddr_storage to;
633
1214
  char *buffer = NULL;
634
1215
  char *decrypted_buffer = NULL;
635
1216
  size_t buffer_length = 0;
638
1219
  int retval = -1;
639
1220
  gnutls_session_t session;
640
1221
  int pf;                       /* Protocol family */
 
1222
  bool route_added = false;
641
1223
  
642
1224
  errno = 0;
643
1225
  
659
1241
    return -1;
660
1242
  }
661
1243
  
 
1244
  /* If the interface is specified and we have a list of interfaces */
662
1245
  if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
663
1246
    /* Check if the interface is one of the interfaces we are using */
664
1247
    bool match = false;
665
1248
    {
666
1249
      char *interface = NULL;
667
 
      while((interface=argz_next(mc->interfaces, mc->interfaces_size,
668
 
                                 interface))){
 
1250
      while((interface = argz_next(mc->interfaces,
 
1251
                                   mc->interfaces_size,
 
1252
                                   interface))){
669
1253
        if(if_nametoindex(interface) == (unsigned int)if_index){
670
1254
          match = true;
671
1255
          break;
673
1257
      }
674
1258
    }
675
1259
    if(not match){
 
1260
      /* This interface does not match any in the list, so we don't
 
1261
         connect to the server */
676
1262
      if(debug){
677
1263
        char interface[IF_NAMESIZE];
678
1264
        if(if_indextoname((unsigned int)if_index, interface) == NULL){
698
1284
                 PRIuMAX "\n", ip, (uintmax_t)port);
699
1285
  }
700
1286
  
701
 
  tcp_sd = socket(pf, SOCK_STREAM, 0);
 
1287
  tcp_sd = socket(pf, SOCK_STREAM | SOCK_CLOEXEC, 0);
702
1288
  if(tcp_sd < 0){
703
1289
    int e = errno;
704
1290
    perror_plus("socket");
711
1297
    goto mandos_end;
712
1298
  }
713
1299
  
714
 
  memset(&to, 0, sizeof(to));
715
1300
  if(af == AF_INET6){
716
 
    to.in6.sin6_family = (sa_family_t)af;
717
 
    ret = inet_pton(af, ip, &to.in6.sin6_addr);
 
1301
    struct sockaddr_in6 *to6 = (struct sockaddr_in6 *)&to;
 
1302
    *to6 = (struct sockaddr_in6){ .sin6_family = (sa_family_t)af };
 
1303
    ret = inet_pton(af, ip, &to6->sin6_addr);
718
1304
  } else {                      /* IPv4 */
719
 
    to.in.sin_family = (sa_family_t)af;
720
 
    ret = inet_pton(af, ip, &to.in.sin_addr);
 
1305
    struct sockaddr_in *to4 = (struct sockaddr_in *)&to;
 
1306
    *to4 = (struct sockaddr_in){ .sin_family = (sa_family_t)af };
 
1307
    ret = inet_pton(af, ip, &to4->sin_addr);
721
1308
  }
722
1309
  if(ret < 0 ){
723
1310
    int e = errno;
732
1319
    goto mandos_end;
733
1320
  }
734
1321
  if(af == AF_INET6){
735
 
    to.in6.sin6_port = htons(port);    
736
 
    if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
737
 
       (&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
738
 
                                -Wunreachable-code*/
 
1322
    ((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
 
1323
    if(IN6_IS_ADDR_LINKLOCAL
 
1324
       (&((struct sockaddr_in6 *)&to)->sin6_addr)){
739
1325
      if(if_index == AVAHI_IF_UNSPEC){
740
1326
        fprintf_plus(stderr, "An IPv6 link-local address is"
741
1327
                     " incomplete without a network interface\n");
743
1329
        goto mandos_end;
744
1330
      }
745
1331
      /* Set the network interface number as scope */
746
 
      to.in6.sin6_scope_id = (uint32_t)if_index;
 
1332
      ((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
747
1333
    }
748
1334
  } else {
749
 
    to.in.sin_port = htons(port); /* Spurious warnings from
750
 
                                     -Wconversion and
751
 
                                     -Wunreachable-code */
 
1335
    ((struct sockaddr_in *)&to)->sin_port = htons(port);
752
1336
  }
753
1337
  
754
1338
  if(quit_now){
771
1355
    }
772
1356
    char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
773
1357
                 INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
774
 
    const char *pcret;
775
 
    if(af == AF_INET6){
776
 
      pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
777
 
                        sizeof(addrstr));
778
 
    } else {
779
 
      pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
780
 
                        sizeof(addrstr));
781
 
    }
782
 
    if(pcret == NULL){
783
 
      perror_plus("inet_ntop");
784
 
    } else {
785
 
      if(strcmp(addrstr, ip) != 0){
786
 
        fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
787
 
      }
788
 
    }
789
 
  }
790
 
  
791
 
  if(quit_now){
792
 
    errno = EINTR;
793
 
    goto mandos_end;
794
 
  }
795
 
  
796
 
  if(af == AF_INET6){
797
 
    ret = connect(tcp_sd, &to.in6, sizeof(to));
798
 
  } else {
799
 
    ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
800
 
  }
801
 
  if(ret < 0){
802
 
    if ((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
803
 
      int e = errno;
804
 
      perror_plus("connect");
805
 
      errno = e;
806
 
    }
807
 
    goto mandos_end;
808
 
  }
809
 
  
810
 
  if(quit_now){
811
 
    errno = EINTR;
812
 
    goto mandos_end;
 
1358
    if(af == AF_INET6){
 
1359
      ret = getnameinfo((struct sockaddr *)&to,
 
1360
                        sizeof(struct sockaddr_in6),
 
1361
                        addrstr, sizeof(addrstr), NULL, 0,
 
1362
                        NI_NUMERICHOST);
 
1363
    } else {
 
1364
      ret = getnameinfo((struct sockaddr *)&to,
 
1365
                        sizeof(struct sockaddr_in),
 
1366
                        addrstr, sizeof(addrstr), NULL, 0,
 
1367
                        NI_NUMERICHOST);
 
1368
    }
 
1369
    if(ret == EAI_SYSTEM){
 
1370
      perror_plus("getnameinfo");
 
1371
    } else if(ret != 0) {
 
1372
      fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
 
1373
    } else if(strcmp(addrstr, ip) != 0){
 
1374
      fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
 
1375
    }
 
1376
  }
 
1377
  
 
1378
  if(quit_now){
 
1379
    errno = EINTR;
 
1380
    goto mandos_end;
 
1381
  }
 
1382
  
 
1383
  while(true){
 
1384
    if(af == AF_INET6){
 
1385
      ret = connect(tcp_sd, (struct sockaddr *)&to,
 
1386
                    sizeof(struct sockaddr_in6));
 
1387
    } else {
 
1388
      ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
 
1389
                    sizeof(struct sockaddr_in));
 
1390
    }
 
1391
    if(ret < 0){
 
1392
      if(((errno == ENETUNREACH) or (errno == EHOSTUNREACH))
 
1393
         and if_index != AVAHI_IF_UNSPEC
 
1394
         and connect_to == NULL
 
1395
         and not route_added and
 
1396
         ((af == AF_INET6 and not
 
1397
           IN6_IS_ADDR_LINKLOCAL(&(((struct sockaddr_in6 *)
 
1398
                                    &to)->sin6_addr)))
 
1399
          or (af == AF_INET and
 
1400
              /* Not a a IPv4LL address */
 
1401
              (ntohl(((struct sockaddr_in *)&to)->sin_addr.s_addr)
 
1402
               & 0xFFFF0000L) != 0xA9FE0000L))){
 
1403
        /* Work around Avahi bug - Avahi does not announce link-local
 
1404
           addresses if it has a global address, so local hosts with
 
1405
           *only* a link-local address (e.g. Mandos clients) cannot
 
1406
           connect to a Mandos server announced by Avahi on a server
 
1407
           host with a global address.  Work around this by retrying
 
1408
           with an explicit route added with the server's address.
 
1409
           
 
1410
           Avahi bug reference:
 
1411
           https://lists.freedesktop.org/archives/avahi/2010-February/001833.html
 
1412
           https://bugs.debian.org/587961
 
1413
        */
 
1414
        if(debug){
 
1415
          fprintf_plus(stderr, "Mandos server unreachable, trying"
 
1416
                       " direct route\n");
 
1417
        }
 
1418
        int e = errno;
 
1419
        route_added = add_local_route(ip, if_index);
 
1420
        if(route_added){
 
1421
          continue;
 
1422
        }
 
1423
        errno = e;
 
1424
      }
 
1425
      if(errno != ECONNREFUSED or debug){
 
1426
        int e = errno;
 
1427
        perror_plus("connect");
 
1428
        errno = e;
 
1429
      }
 
1430
      goto mandos_end;
 
1431
    }
 
1432
    
 
1433
    if(quit_now){
 
1434
      errno = EINTR;
 
1435
      goto mandos_end;
 
1436
    }
 
1437
    break;
813
1438
  }
814
1439
  
815
1440
  const char *out = mandos_protocol_version;
969
1594
                                               &decrypted_buffer, mc);
970
1595
    if(decrypted_buffer_size >= 0){
971
1596
      
 
1597
      clearerr(stdout);
972
1598
      written = 0;
973
1599
      while(written < (size_t) decrypted_buffer_size){
974
1600
        if(quit_now){
990
1616
        }
991
1617
        written += (size_t)ret;
992
1618
      }
 
1619
      ret = fflush(stdout);
 
1620
      if(ret != 0){
 
1621
        int e = errno;
 
1622
        if(debug){
 
1623
          fprintf_plus(stderr, "Error writing encrypted data: %s\n",
 
1624
                       strerror(errno));
 
1625
        }
 
1626
        errno = e;
 
1627
        goto mandos_end;
 
1628
      }
993
1629
      retval = 0;
994
1630
    }
995
1631
  }
998
1634
  
999
1635
 mandos_end:
1000
1636
  {
 
1637
    if(route_added){
 
1638
      if(not delete_local_route(ip, if_index)){
 
1639
        fprintf_plus(stderr, "Failed to delete local route to %s on"
 
1640
                     " interface %d", ip, if_index);
 
1641
      }
 
1642
    }
1001
1643
    int e = errno;
1002
1644
    free(decrypted_buffer);
1003
1645
    free(buffer);
1004
1646
    if(tcp_sd >= 0){
1005
 
      ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
 
1647
      ret = close(tcp_sd);
1006
1648
    }
1007
1649
    if(ret == -1){
1008
1650
      if(e == 0){
1033
1675
                             AVAHI_GCC_UNUSED AvahiStringList *txt,
1034
1676
                             AVAHI_GCC_UNUSED AvahiLookupResultFlags
1035
1677
                             flags,
1036
 
                             void* mc){
 
1678
                             void *mc){
1037
1679
  if(r == NULL){
1038
1680
    return;
1039
1681
  }
1042
1684
     timed out */
1043
1685
  
1044
1686
  if(quit_now){
 
1687
    avahi_s_service_resolver_free(r);
1045
1688
    return;
1046
1689
  }
1047
1690
  
1092
1735
                            const char *domain,
1093
1736
                            AVAHI_GCC_UNUSED AvahiLookupResultFlags
1094
1737
                            flags,
1095
 
                            void* mc){
 
1738
                            void *mc){
1096
1739
  if(b == NULL){
1097
1740
    return;
1098
1741
  }
1158
1801
  errno = old_errno;
1159
1802
}
1160
1803
 
 
1804
__attribute__((nonnull, warn_unused_result))
1161
1805
bool get_flags(const char *ifname, struct ifreq *ifr){
1162
1806
  int ret;
1163
 
  error_t ret_errno;
 
1807
  int old_errno;
1164
1808
  
1165
1809
  int s = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1166
1810
  if(s < 0){
1167
 
    ret_errno = errno;
 
1811
    old_errno = errno;
1168
1812
    perror_plus("socket");
1169
 
    errno = ret_errno;
 
1813
    errno = old_errno;
1170
1814
    return false;
1171
1815
  }
1172
 
  strcpy(ifr->ifr_name, ifname);
 
1816
  strncpy(ifr->ifr_name, ifname, IF_NAMESIZE);
 
1817
  ifr->ifr_name[IF_NAMESIZE-1] = '\0'; /* NUL terminate */
1173
1818
  ret = ioctl(s, SIOCGIFFLAGS, ifr);
1174
1819
  if(ret == -1){
1175
1820
    if(debug){
1176
 
      ret_errno = errno;
 
1821
      old_errno = errno;
1177
1822
      perror_plus("ioctl SIOCGIFFLAGS");
1178
 
      errno = ret_errno;
 
1823
      errno = old_errno;
 
1824
    }
 
1825
    if((close(s) == -1) and debug){
 
1826
      old_errno = errno;
 
1827
      perror_plus("close");
 
1828
      errno = old_errno;
1179
1829
    }
1180
1830
    return false;
1181
1831
  }
 
1832
  if((close(s) == -1) and debug){
 
1833
    old_errno = errno;
 
1834
    perror_plus("close");
 
1835
    errno = old_errno;
 
1836
  }
1182
1837
  return true;
1183
1838
}
1184
1839
 
 
1840
__attribute__((nonnull, warn_unused_result))
1185
1841
bool good_flags(const char *ifname, const struct ifreq *ifr){
1186
1842
  
1187
1843
  /* Reject the loopback device */
1229
1885
 * corresponds to an acceptable network device.
1230
1886
 * (This function is passed to scandir(3) as a filter function.)
1231
1887
 */
 
1888
__attribute__((nonnull, warn_unused_result))
1232
1889
int good_interface(const struct dirent *if_entry){
1233
1890
  if(if_entry->d_name[0] == '.'){
1234
1891
    return 0;
1252
1909
/* 
1253
1910
 * This function determines if a network interface is up.
1254
1911
 */
 
1912
__attribute__((nonnull, warn_unused_result))
1255
1913
bool interface_is_up(const char *interface){
1256
1914
  struct ifreq ifr;
1257
1915
  if(not get_flags(interface, &ifr)){
1268
1926
/* 
1269
1927
 * This function determines if a network interface is running
1270
1928
 */
 
1929
__attribute__((nonnull, warn_unused_result))
1271
1930
bool interface_is_running(const char *interface){
1272
1931
  struct ifreq ifr;
1273
1932
  if(not get_flags(interface, &ifr)){
1281
1940
  return (bool)(ifr.ifr_flags & IFF_RUNNING);
1282
1941
}
1283
1942
 
 
1943
__attribute__((nonnull, pure, warn_unused_result))
1284
1944
int notdotentries(const struct dirent *direntry){
1285
1945
  /* Skip "." and ".." */
1286
1946
  if(direntry->d_name[0] == '.'
1293
1953
}
1294
1954
 
1295
1955
/* Is this directory entry a runnable program? */
 
1956
__attribute__((nonnull, warn_unused_result))
1296
1957
int runnable_hook(const struct dirent *direntry){
1297
1958
  int ret;
1298
1959
  size_t sret;
1306
1967
  sret = strspn(direntry->d_name, "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
1307
1968
                "abcdefghijklmnopqrstuvwxyz"
1308
1969
                "0123456789"
1309
 
                "_-");
 
1970
                "_.-");
1310
1971
  if((direntry->d_name)[sret] != '\0'){
1311
1972
    /* Contains non-allowed characters */
1312
1973
    if(debug){
1316
1977
    return 0;
1317
1978
  }
1318
1979
  
1319
 
  char *fullname = NULL;
1320
 
  ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
1321
 
  if(ret < 0){
1322
 
    perror_plus("asprintf");
1323
 
    return 0;
1324
 
  }
1325
 
  
1326
 
  ret = stat(fullname, &st);
 
1980
  ret = fstatat(hookdir_fd, direntry->d_name, &st, 0);
1327
1981
  if(ret == -1){
1328
1982
    if(debug){
1329
1983
      perror_plus("Could not stat hook");
1353
2007
  return 1;
1354
2008
}
1355
2009
 
 
2010
__attribute__((nonnull, warn_unused_result))
1356
2011
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
1357
2012
                            mandos_context *mc){
1358
2013
  int ret;
1362
2017
  
1363
2018
  while(true){
1364
2019
    if(mc->current_server == NULL){
1365
 
      if (debug){
 
2020
      if(debug){
1366
2021
        fprintf_plus(stderr, "Wait until first server is found."
1367
2022
                     " No timeout!\n");
1368
2023
      }
1369
2024
      ret = avahi_simple_poll_iterate(s, -1);
1370
2025
    } else {
1371
 
      if (debug){
 
2026
      if(debug){
1372
2027
        fprintf_plus(stderr, "Check current_server if we should run"
1373
2028
                     " it, or wait\n");
1374
2029
      }
1391
2046
                     - ((intmax_t)waited_time.tv_sec * 1000))
1392
2047
                    - ((intmax_t)waited_time.tv_nsec / 1000000));
1393
2048
      
1394
 
      if (debug){
 
2049
      if(debug){
1395
2050
        fprintf_plus(stderr, "Blocking for %" PRIdMAX " ms\n",
1396
2051
                     block_time);
1397
2052
      }
1419
2074
      ret = avahi_simple_poll_iterate(s, (int)block_time);
1420
2075
    }
1421
2076
    if(ret != 0){
1422
 
      if (ret > 0 or errno != EINTR){
 
2077
      if(ret > 0 or errno != EINTR){
1423
2078
        return (ret != 1) ? ret : 0;
1424
2079
      }
1425
2080
    }
1426
2081
  }
1427
2082
}
1428
2083
 
1429
 
/* Set effective uid to 0, return errno */
1430
 
error_t raise_privileges(void){
1431
 
  error_t old_errno = errno;
1432
 
  error_t ret_errno = 0;
1433
 
  if(seteuid(0) == -1){
1434
 
    ret_errno = errno;
1435
 
    perror_plus("seteuid");
1436
 
  }
1437
 
  errno = old_errno;
1438
 
  return ret_errno;
1439
 
}
1440
 
 
1441
 
/* Set effective and real user ID to 0.  Return errno. */
1442
 
error_t raise_privileges_permanently(void){
1443
 
  error_t old_errno = errno;
1444
 
  error_t ret_errno = raise_privileges();
1445
 
  if(ret_errno != 0){
1446
 
    errno = old_errno;
1447
 
    return ret_errno;
1448
 
  }
1449
 
  if(setuid(0) == -1){
1450
 
    ret_errno = errno;
1451
 
    perror_plus("seteuid");
1452
 
  }
1453
 
  errno = old_errno;
1454
 
  return ret_errno;
1455
 
}
1456
 
 
1457
 
/* Set effective user ID to unprivileged saved user ID */
1458
 
error_t lower_privileges(void){
1459
 
  error_t old_errno = errno;
1460
 
  error_t ret_errno = 0;
1461
 
  if(seteuid(uid) == -1){
1462
 
    ret_errno = errno;
1463
 
    perror_plus("seteuid");
1464
 
  }
1465
 
  errno = old_errno;
1466
 
  return ret_errno;
1467
 
}
1468
 
 
1469
 
/* Lower privileges permanently */
1470
 
error_t lower_privileges_permanently(void){
1471
 
  error_t old_errno = errno;
1472
 
  error_t ret_errno = 0;
1473
 
  if(setuid(uid) == -1){
1474
 
    ret_errno = errno;
1475
 
    perror_plus("setuid");
1476
 
  }
1477
 
  errno = old_errno;
1478
 
  return ret_errno;
1479
 
}
1480
 
 
1481
 
bool run_network_hooks(const char *mode, const char *interface,
 
2084
__attribute__((nonnull))
 
2085
void run_network_hooks(const char *mode, const char *interface,
1482
2086
                       const float delay){
1483
 
  struct dirent **direntries;
 
2087
  struct dirent **direntries = NULL;
 
2088
  if(hookdir_fd == -1){
 
2089
    hookdir_fd = open(hookdir, O_RDONLY | O_DIRECTORY | O_PATH
 
2090
                      | O_CLOEXEC);
 
2091
    if(hookdir_fd == -1){
 
2092
      if(errno == ENOENT){
 
2093
        if(debug){
 
2094
          fprintf_plus(stderr, "Network hook directory \"%s\" not"
 
2095
                       " found\n", hookdir);
 
2096
        }
 
2097
      } else {
 
2098
        perror_plus("open");
 
2099
      }
 
2100
      return;
 
2101
    }
 
2102
  }
 
2103
  int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
 
2104
  if(devnull == -1){
 
2105
    perror_plus("open(\"/dev/null\", O_RDONLY)");
 
2106
    return;
 
2107
  }
 
2108
  int numhooks = scandirat(hookdir_fd, ".", &direntries,
 
2109
                           runnable_hook, alphasort);
 
2110
  if(numhooks == -1){
 
2111
    perror_plus("scandir");
 
2112
    close(devnull);
 
2113
    return;
 
2114
  }
1484
2115
  struct dirent *direntry;
1485
2116
  int ret;
1486
 
  int numhooks = scandir(hookdir, &direntries, runnable_hook,
1487
 
                         alphasort);
1488
 
  if(numhooks == -1){
1489
 
    if(errno == ENOENT){
1490
 
      if(debug){
1491
 
        fprintf_plus(stderr, "Network hook directory \"%s\" not"
1492
 
                     " found\n", hookdir);
1493
 
      }
1494
 
    } else {
1495
 
      perror_plus("scandir");
 
2117
  for(int i = 0; i < numhooks; i++){
 
2118
    direntry = direntries[i];
 
2119
    if(debug){
 
2120
      fprintf_plus(stderr, "Running network hook \"%s\"\n",
 
2121
                   direntry->d_name);
1496
2122
    }
1497
 
  } else {
1498
 
    int devnull = open("/dev/null", O_RDONLY);
1499
 
    for(int i = 0; i < numhooks; i++){
1500
 
      direntry = direntries[i];
1501
 
      char *fullname = NULL;
1502
 
      ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
1503
 
      if(ret < 0){
 
2123
    pid_t hook_pid = fork();
 
2124
    if(hook_pid == 0){
 
2125
      /* Child */
 
2126
      /* Raise privileges */
 
2127
      errno = raise_privileges_permanently();
 
2128
      if(errno != 0){
 
2129
        perror_plus("Failed to raise privileges");
 
2130
        _exit(EX_NOPERM);
 
2131
      }
 
2132
      /* Set group */
 
2133
      errno = 0;
 
2134
      ret = setgid(0);
 
2135
      if(ret == -1){
 
2136
        perror_plus("setgid");
 
2137
        _exit(EX_NOPERM);
 
2138
      }
 
2139
      /* Reset supplementary groups */
 
2140
      errno = 0;
 
2141
      ret = setgroups(0, NULL);
 
2142
      if(ret == -1){
 
2143
        perror_plus("setgroups");
 
2144
        _exit(EX_NOPERM);
 
2145
      }
 
2146
      ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
 
2147
      if(ret == -1){
 
2148
        perror_plus("setenv");
 
2149
        _exit(EX_OSERR);
 
2150
      }
 
2151
      ret = setenv("DEVICE", interface, 1);
 
2152
      if(ret == -1){
 
2153
        perror_plus("setenv");
 
2154
        _exit(EX_OSERR);
 
2155
      }
 
2156
      ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
 
2157
      if(ret == -1){
 
2158
        perror_plus("setenv");
 
2159
        _exit(EX_OSERR);
 
2160
      }
 
2161
      ret = setenv("MODE", mode, 1);
 
2162
      if(ret == -1){
 
2163
        perror_plus("setenv");
 
2164
        _exit(EX_OSERR);
 
2165
      }
 
2166
      char *delaystring;
 
2167
      ret = asprintf(&delaystring, "%f", (double)delay);
 
2168
      if(ret == -1){
1504
2169
        perror_plus("asprintf");
1505
 
        continue;
1506
 
      }
1507
 
      if(debug){
1508
 
        fprintf_plus(stderr, "Running network hook \"%s\"\n",
1509
 
                     direntry->d_name);
1510
 
      }
1511
 
      pid_t hook_pid = fork();
1512
 
      if(hook_pid == 0){
1513
 
        /* Child */
1514
 
        /* Raise privileges */
1515
 
        raise_privileges_permanently();
1516
 
        /* Set group */
1517
 
        errno = 0;
1518
 
        ret = setgid(0);
1519
 
        if(ret == -1){
1520
 
          perror_plus("setgid");
1521
 
        }
1522
 
        /* Reset supplementary groups */
1523
 
        errno = 0;
1524
 
        ret = setgroups(0, NULL);
1525
 
        if(ret == -1){
1526
 
          perror_plus("setgroups");
1527
 
        }
1528
 
        dup2(devnull, STDIN_FILENO);
1529
 
        close(devnull);
1530
 
        dup2(STDERR_FILENO, STDOUT_FILENO);
1531
 
        ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1532
 
        if(ret == -1){
1533
 
          perror_plus("setenv");
1534
 
          _exit(EX_OSERR);
1535
 
        }
1536
 
        ret = setenv("DEVICE", interface, 1);
1537
 
        if(ret == -1){
1538
 
          perror_plus("setenv");
1539
 
          _exit(EX_OSERR);
1540
 
        }
1541
 
        ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1542
 
        if(ret == -1){
1543
 
          perror_plus("setenv");
1544
 
          _exit(EX_OSERR);
1545
 
        }
1546
 
        ret = setenv("MODE", mode, 1);
1547
 
        if(ret == -1){
1548
 
          perror_plus("setenv");
1549
 
          _exit(EX_OSERR);
1550
 
        }
1551
 
        char *delaystring;
1552
 
        ret = asprintf(&delaystring, "%f", delay);
1553
 
        if(ret == -1){
1554
 
          perror_plus("asprintf");
1555
 
          _exit(EX_OSERR);
1556
 
        }
1557
 
        ret = setenv("DELAY", delaystring, 1);
1558
 
        if(ret == -1){
1559
 
          free(delaystring);
1560
 
          perror_plus("setenv");
1561
 
          _exit(EX_OSERR);
1562
 
        }
 
2170
        _exit(EX_OSERR);
 
2171
      }
 
2172
      ret = setenv("DELAY", delaystring, 1);
 
2173
      if(ret == -1){
1563
2174
        free(delaystring);
1564
 
        if(connect_to != NULL){
1565
 
          ret = setenv("CONNECT", connect_to, 1);
1566
 
          if(ret == -1){
1567
 
            perror_plus("setenv");
1568
 
            _exit(EX_OSERR);
1569
 
          }
1570
 
        }
1571
 
        if(execl(fullname, direntry->d_name, mode, NULL) == -1){
1572
 
          perror_plus("execl");
1573
 
          _exit(EXIT_FAILURE);
1574
 
        }
 
2175
        perror_plus("setenv");
 
2176
        _exit(EX_OSERR);
 
2177
      }
 
2178
      free(delaystring);
 
2179
      if(connect_to != NULL){
 
2180
        ret = setenv("CONNECT", connect_to, 1);
 
2181
        if(ret == -1){
 
2182
          perror_plus("setenv");
 
2183
          _exit(EX_OSERR);
 
2184
        }
 
2185
      }
 
2186
      int hook_fd = (int)TEMP_FAILURE_RETRY(openat(hookdir_fd,
 
2187
                                                   direntry->d_name,
 
2188
                                                   O_RDONLY));
 
2189
      if(hook_fd == -1){
 
2190
        perror_plus("openat");
 
2191
        _exit(EXIT_FAILURE);
 
2192
      }
 
2193
      if(close(hookdir_fd) == -1){
 
2194
        perror_plus("close");
 
2195
        _exit(EXIT_FAILURE);
 
2196
      }
 
2197
      ret = dup2(devnull, STDIN_FILENO);
 
2198
      if(ret == -1){
 
2199
        perror_plus("dup2(devnull, STDIN_FILENO)");
 
2200
        _exit(EX_OSERR);
 
2201
      }
 
2202
      ret = close(devnull);
 
2203
      if(ret == -1){
 
2204
        perror_plus("close");
 
2205
        _exit(EX_OSERR);
 
2206
      }
 
2207
      ret = dup2(STDERR_FILENO, STDOUT_FILENO);
 
2208
      if(ret == -1){
 
2209
        perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
 
2210
        _exit(EX_OSERR);
 
2211
      }
 
2212
      if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
 
2213
                 environ) == -1){
 
2214
        perror_plus("fexecve");
 
2215
        _exit(EXIT_FAILURE);
 
2216
      }
 
2217
    } else {
 
2218
      if(hook_pid == -1){
 
2219
        perror_plus("fork");
 
2220
        free(direntry);
 
2221
        continue;
 
2222
      }
 
2223
      int status;
 
2224
      if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
 
2225
        perror_plus("waitpid");
 
2226
        free(direntry);
 
2227
        continue;
 
2228
      }
 
2229
      if(WIFEXITED(status)){
 
2230
        if(WEXITSTATUS(status) != 0){
 
2231
          fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
 
2232
                       " with status %d\n", direntry->d_name,
 
2233
                       WEXITSTATUS(status));
 
2234
          free(direntry);
 
2235
          continue;
 
2236
        }
 
2237
      } else if(WIFSIGNALED(status)){
 
2238
        fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
 
2239
                     " signal %d\n", direntry->d_name,
 
2240
                     WTERMSIG(status));
 
2241
        free(direntry);
 
2242
        continue;
1575
2243
      } else {
1576
 
        int status;
1577
 
        if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1578
 
          perror_plus("waitpid");
1579
 
          free(fullname);
1580
 
          continue;
1581
 
        }
1582
 
        if(WIFEXITED(status)){
1583
 
          if(WEXITSTATUS(status) != 0){
1584
 
            fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1585
 
                         " with status %d\n", direntry->d_name,
1586
 
                         WEXITSTATUS(status));
1587
 
            free(fullname);
1588
 
            continue;
1589
 
          }
1590
 
        } else if(WIFSIGNALED(status)){
1591
 
          fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1592
 
                       " signal %d\n", direntry->d_name,
1593
 
                       WTERMSIG(status));
1594
 
          free(fullname);
1595
 
          continue;
1596
 
        } else {
1597
 
          fprintf_plus(stderr, "Warning: network hook \"%s\""
1598
 
                       " crashed\n", direntry->d_name);
1599
 
          free(fullname);
1600
 
          continue;
1601
 
        }
1602
 
      }
1603
 
      free(fullname);
1604
 
      if(debug){
1605
 
        fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1606
 
                     direntry->d_name);
1607
 
      }
1608
 
    }
1609
 
    close(devnull);
1610
 
  }
1611
 
  return true;
 
2244
        fprintf_plus(stderr, "Warning: network hook \"%s\""
 
2245
                     " crashed\n", direntry->d_name);
 
2246
        free(direntry);
 
2247
        continue;
 
2248
      }
 
2249
    }
 
2250
    if(debug){
 
2251
      fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
 
2252
                   direntry->d_name);
 
2253
    }
 
2254
    free(direntry);
 
2255
  }
 
2256
  free(direntries);
 
2257
  if(close(hookdir_fd) == -1){
 
2258
    perror_plus("close");
 
2259
  } else {
 
2260
    hookdir_fd = -1;
 
2261
  }
 
2262
  close(devnull);
1612
2263
}
1613
2264
 
1614
 
error_t bring_up_interface(const char *const interface,
1615
 
                           const float delay){
1616
 
  int sd = -1;
1617
 
  error_t old_errno = errno;
1618
 
  error_t ret_errno = 0;
1619
 
  int ret, ret_setflags;
 
2265
__attribute__((nonnull, warn_unused_result))
 
2266
int bring_up_interface(const char *const interface,
 
2267
                       const float delay){
 
2268
  int old_errno = errno;
 
2269
  int ret;
1620
2270
  struct ifreq network;
1621
2271
  unsigned int if_index = if_nametoindex(interface);
1622
2272
  if(if_index == 0){
1631
2281
  }
1632
2282
  
1633
2283
  if(not interface_is_up(interface)){
1634
 
    if(not get_flags(interface, &network) and debug){
 
2284
    int ret_errno = 0;
 
2285
    int ioctl_errno = 0;
 
2286
    if(not get_flags(interface, &network)){
1635
2287
      ret_errno = errno;
1636
2288
      fprintf_plus(stderr, "Failed to get flags for interface "
1637
2289
                   "\"%s\"\n", interface);
 
2290
      errno = old_errno;
1638
2291
      return ret_errno;
1639
2292
    }
1640
 
    network.ifr_flags |= IFF_UP;
 
2293
    network.ifr_flags |= IFF_UP; /* set flag */
1641
2294
    
1642
 
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1643
 
    if(sd < 0){
 
2295
    int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
2296
    if(sd == -1){
1644
2297
      ret_errno = errno;
1645
2298
      perror_plus("socket");
1646
2299
      errno = old_errno;
1647
2300
      return ret_errno;
1648
2301
    }
1649
 
  
 
2302
    
1650
2303
    if(quit_now){
1651
 
      close(sd);
 
2304
      ret = close(sd);
 
2305
      if(ret == -1){
 
2306
        perror_plus("close");
 
2307
      }
1652
2308
      errno = old_errno;
1653
2309
      return EINTR;
1654
2310
    }
1658
2314
                   interface);
1659
2315
    }
1660
2316
    
1661
 
    /* Raise priviliges */
1662
 
    raise_privileges();
 
2317
    /* Raise privileges */
 
2318
    ret_errno = raise_privileges();
 
2319
    if(ret_errno != 0){
 
2320
      errno = ret_errno;
 
2321
      perror_plus("Failed to raise privileges");
 
2322
    }
1663
2323
    
1664
2324
#ifdef __linux__
1665
 
    /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1666
 
       messages about the network interface to mess up the prompt */
1667
 
    int ret_linux = klogctl(8, NULL, 5);
1668
 
    bool restore_loglevel = true;
1669
 
    if(ret_linux == -1){
1670
 
      restore_loglevel = false;
1671
 
      perror_plus("klogctl");
 
2325
    int ret_linux;
 
2326
    bool restore_loglevel = false;
 
2327
    if(ret_errno == 0){
 
2328
      /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
 
2329
         messages about the network interface to mess up the prompt */
 
2330
      ret_linux = klogctl(8, NULL, 5);
 
2331
      if(ret_linux == -1){
 
2332
        perror_plus("klogctl");
 
2333
      } else {
 
2334
        restore_loglevel = true;
 
2335
      }
1672
2336
    }
1673
2337
#endif  /* __linux__ */
1674
 
    ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1675
 
    ret_errno = errno;
 
2338
    int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
2339
    ioctl_errno = errno;
1676
2340
#ifdef __linux__
1677
2341
    if(restore_loglevel){
1678
2342
      ret_linux = klogctl(7, NULL, 0);
1682
2346
    }
1683
2347
#endif  /* __linux__ */
1684
2348
    
1685
 
    /* Lower privileges */
1686
 
    lower_privileges();
 
2349
    /* If raise_privileges() succeeded above */
 
2350
    if(ret_errno == 0){
 
2351
      /* Lower privileges */
 
2352
      ret_errno = lower_privileges();
 
2353
      if(ret_errno != 0){
 
2354
        errno = ret_errno;
 
2355
        perror_plus("Failed to lower privileges");
 
2356
      }
 
2357
    }
1687
2358
    
1688
2359
    /* Close the socket */
1689
 
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2360
    ret = close(sd);
1690
2361
    if(ret == -1){
1691
2362
      perror_plus("close");
1692
2363
    }
1693
2364
    
1694
2365
    if(ret_setflags == -1){
1695
 
      errno = ret_errno;
 
2366
      errno = ioctl_errno;
1696
2367
      perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1697
2368
      errno = old_errno;
1698
 
      return ret_errno;
 
2369
      return ioctl_errno;
1699
2370
    }
1700
2371
  } else if(debug){
1701
2372
    fprintf_plus(stderr, "Interface \"%s\" is already up; good\n",
1704
2375
  
1705
2376
  /* Sleep checking until interface is running.
1706
2377
     Check every 0.25s, up to total time of delay */
1707
 
  for(int i=0; i < delay * 4; i++){
 
2378
  for(int i = 0; i < delay * 4; i++){
1708
2379
    if(interface_is_running(interface)){
1709
2380
      break;
1710
2381
    }
1719
2390
  return 0;
1720
2391
}
1721
2392
 
1722
 
error_t take_down_interface(const char *const interface){
1723
 
  int sd = -1;
1724
 
  error_t old_errno = errno;
1725
 
  error_t ret_errno = 0;
1726
 
  int ret, ret_setflags;
 
2393
__attribute__((nonnull, warn_unused_result))
 
2394
int take_down_interface(const char *const interface){
 
2395
  int old_errno = errno;
1727
2396
  struct ifreq network;
1728
2397
  unsigned int if_index = if_nametoindex(interface);
1729
2398
  if(if_index == 0){
1732
2401
    return ENXIO;
1733
2402
  }
1734
2403
  if(interface_is_up(interface)){
 
2404
    int ret_errno = 0;
 
2405
    int ioctl_errno = 0;
1735
2406
    if(not get_flags(interface, &network) and debug){
1736
2407
      ret_errno = errno;
1737
2408
      fprintf_plus(stderr, "Failed to get flags for interface "
1738
2409
                   "\"%s\"\n", interface);
 
2410
      errno = old_errno;
1739
2411
      return ret_errno;
1740
2412
    }
1741
2413
    network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1742
2414
    
1743
 
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1744
 
    if(sd < 0){
 
2415
    int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
2416
    if(sd == -1){
1745
2417
      ret_errno = errno;
1746
2418
      perror_plus("socket");
1747
2419
      errno = old_errno;
1753
2425
                   interface);
1754
2426
    }
1755
2427
    
1756
 
    /* Raise priviliges */
1757
 
    raise_privileges();
1758
 
    
1759
 
    ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1760
 
    ret_errno = errno;
1761
 
    
1762
 
    /* Lower privileges */
1763
 
    lower_privileges();
 
2428
    /* Raise privileges */
 
2429
    ret_errno = raise_privileges();
 
2430
    if(ret_errno != 0){
 
2431
      errno = ret_errno;
 
2432
      perror_plus("Failed to raise privileges");
 
2433
    }
 
2434
    
 
2435
    int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
2436
    ioctl_errno = errno;
 
2437
    
 
2438
    /* If raise_privileges() succeeded above */
 
2439
    if(ret_errno == 0){
 
2440
      /* Lower privileges */
 
2441
      ret_errno = lower_privileges();
 
2442
      if(ret_errno != 0){
 
2443
        errno = ret_errno;
 
2444
        perror_plus("Failed to lower privileges");
 
2445
      }
 
2446
    }
1764
2447
    
1765
2448
    /* Close the socket */
1766
 
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2449
    int ret = close(sd);
1767
2450
    if(ret == -1){
1768
2451
      perror_plus("close");
1769
2452
    }
1770
2453
    
1771
2454
    if(ret_setflags == -1){
1772
 
      errno = ret_errno;
 
2455
      errno = ioctl_errno;
1773
2456
      perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
1774
2457
      errno = old_errno;
1775
 
      return ret_errno;
 
2458
      return ioctl_errno;
1776
2459
    }
1777
2460
  } else if(debug){
1778
2461
    fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
1784
2467
}
1785
2468
 
1786
2469
int main(int argc, char *argv[]){
1787
 
  mandos_context mc = { .server = NULL, .dh_bits = 1024,
1788
 
                        .priority = "SECURE256:!CTYPE-X.509:"
1789
 
                        "+CTYPE-OPENPGP", .current_server = NULL, 
1790
 
                        .interfaces = NULL, .interfaces_size = 0 };
 
2470
  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"
 
2474
                        ":%PROFILE_ULTRA",
 
2475
#elif GNUTLS_VERSION_NUMBER < 0x030600
 
2476
                        .priority = "SECURE256:!CTYPE-X.509"
 
2477
                        ":+CTYPE-OPENPGP:!RSA:+SIGN-DSA-SHA256",
 
2478
#else
 
2479
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
2480
#endif
 
2481
                        .current_server = NULL, .interfaces = NULL,
 
2482
                        .interfaces_size = 0 };
1791
2483
  AvahiSServiceBrowser *sb = NULL;
1792
2484
  error_t ret_errno;
1793
2485
  int ret;
1796
2488
  int exitcode = EXIT_SUCCESS;
1797
2489
  char *interfaces_to_take_down = NULL;
1798
2490
  size_t interfaces_to_take_down_size = 0;
1799
 
  char tempdir[] = "/tmp/mandosXXXXXX";
1800
 
  bool tempdir_created = false;
 
2491
  char run_tempdir[] = "/run/tmp/mandosXXXXXX";
 
2492
  char old_tempdir[] = "/tmp/mandosXXXXXX";
 
2493
  char *tempdir = NULL;
1801
2494
  AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
1802
2495
  const char *seckey = PATHDIR "/" SECKEY;
1803
2496
  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;
 
2500
#endif
 
2501
  const char *dh_params_file = NULL;
1804
2502
  char *interfaces_hooks = NULL;
1805
 
  size_t interfaces_hooks_size = 0;
1806
2503
  
1807
2504
  bool gnutls_initialized = false;
1808
2505
  bool gpgme_initialized = false;
1854
2551
      { .name = "pubkey", .key = 'p',
1855
2552
        .arg = "FILE",
1856
2553
        .doc = "OpenPGP public key file base name",
1857
 
        .group = 2 },
 
2554
        .group = 1 },
 
2555
      { .name = "tls-privkey", .key = 't',
 
2556
        .arg = "FILE",
 
2557
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2558
        .doc = "TLS private key file base name",
 
2559
#else
 
2560
        .doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
 
2561
#endif
 
2562
        .group = 1 },
 
2563
      { .name = "tls-pubkey", .key = 'T',
 
2564
        .arg = "FILE",
 
2565
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2566
        .doc = "TLS public key file base name",
 
2567
#else
 
2568
        .doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
 
2569
#endif
 
2570
        .group = 1 },
1858
2571
      { .name = "dh-bits", .key = 129,
1859
2572
        .arg = "BITS",
1860
2573
        .doc = "Bit length of the prime number used in the"
1861
2574
        " Diffie-Hellman key exchange",
1862
2575
        .group = 2 },
 
2576
      { .name = "dh-params", .key = 134,
 
2577
        .arg = "FILE",
 
2578
        .doc = "PEM-encoded PKCS#3 file with pre-generated parameters"
 
2579
        " for the Diffie-Hellman key exchange",
 
2580
        .group = 2 },
1863
2581
      { .name = "priority", .key = 130,
1864
2582
        .arg = "STRING",
1865
2583
        .doc = "GnuTLS priority string for the TLS handshake",
1911
2629
      case 'p':                 /* --pubkey */
1912
2630
        pubkey = arg;
1913
2631
        break;
 
2632
      case 't':                 /* --tls-privkey */
 
2633
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2634
        tls_privkey = arg;
 
2635
#endif
 
2636
        break;
 
2637
      case 'T':                 /* --tls-pubkey */
 
2638
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2639
        tls_pubkey = arg;
 
2640
#endif
 
2641
        break;
1914
2642
      case 129:                 /* --dh-bits */
1915
2643
        errno = 0;
1916
2644
        tmpmax = strtoimax(arg, &tmp, 10);
1920
2648
        }
1921
2649
        mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
1922
2650
        break;
 
2651
      case 134:                 /* --dh-params */
 
2652
        dh_params_file = arg;
 
2653
        break;
1923
2654
      case 130:                 /* --priority */
1924
2655
        mc.priority = arg;
1925
2656
        break;
1948
2679
        argp_state_help(state, state->out_stream,
1949
2680
                        (ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
1950
2681
                        & ~(unsigned int)ARGP_HELP_EXIT_OK);
 
2682
        __builtin_unreachable();
1951
2683
      case -3:                  /* --usage */
1952
2684
        argp_state_help(state, state->out_stream,
1953
2685
                        ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
 
2686
        __builtin_unreachable();
1954
2687
      case 'V':                 /* --version */
1955
2688
        fprintf_plus(state->out_stream, "%s\n", argp_program_version);
1956
2689
        exit(argp_err_exit_status);
1965
2698
                         .args_doc = "",
1966
2699
                         .doc = "Mandos client -- Get and decrypt"
1967
2700
                         " passwords from a Mandos server" };
1968
 
    ret = argp_parse(&argp, argc, argv,
1969
 
                     ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
1970
 
    switch(ret){
 
2701
    ret_errno = argp_parse(&argp, argc, argv,
 
2702
                           ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
 
2703
    switch(ret_errno){
1971
2704
    case 0:
1972
2705
      break;
1973
2706
    case ENOMEM:
1974
2707
    default:
1975
 
      errno = ret;
 
2708
      errno = ret_errno;
1976
2709
      perror_plus("argp_parse");
1977
2710
      exitcode = EX_OSERR;
1978
2711
      goto end;
1981
2714
      goto end;
1982
2715
    }
1983
2716
  }
1984
 
    
 
2717
  
1985
2718
  {
1986
2719
    /* Work around Debian bug #633582:
1987
 
       <http://bugs.debian.org/633582> */
 
2720
       <https://bugs.debian.org/633582> */
1988
2721
    
1989
 
    /* Re-raise priviliges */
1990
 
    if(raise_privileges() == 0){
 
2722
    /* Re-raise privileges */
 
2723
    ret = raise_privileges();
 
2724
    if(ret != 0){
 
2725
      errno = ret;
 
2726
      perror_plus("Failed to raise privileges");
 
2727
    } else {
1991
2728
      struct stat st;
1992
2729
      
1993
2730
      if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
2007
2744
              }
2008
2745
            }
2009
2746
          }
2010
 
          TEMP_FAILURE_RETRY(close(seckey_fd));
 
2747
          close(seckey_fd);
2011
2748
        }
2012
2749
      }
2013
 
    
 
2750
      
2014
2751
      if(strcmp(pubkey, PATHDIR "/" PUBKEY) == 0){
2015
2752
        int pubkey_fd = open(pubkey, O_RDONLY);
2016
2753
        if(pubkey_fd == -1){
2028
2765
              }
2029
2766
            }
2030
2767
          }
2031
 
          TEMP_FAILURE_RETRY(close(pubkey_fd));
2032
 
        }
2033
 
      }
2034
 
    
 
2768
          close(pubkey_fd);
 
2769
        }
 
2770
      }
 
2771
      
 
2772
      if(dh_params_file != NULL
 
2773
         and strcmp(dh_params_file, PATHDIR "/dhparams.pem" ) == 0){
 
2774
        int dhparams_fd = open(dh_params_file, O_RDONLY);
 
2775
        if(dhparams_fd == -1){
 
2776
          perror_plus("open");
 
2777
        } else {
 
2778
          ret = (int)TEMP_FAILURE_RETRY(fstat(dhparams_fd, &st));
 
2779
          if(ret == -1){
 
2780
            perror_plus("fstat");
 
2781
          } else {
 
2782
            if(S_ISREG(st.st_mode)
 
2783
               and st.st_uid == 0 and st.st_gid == 0){
 
2784
              ret = fchown(dhparams_fd, uid, gid);
 
2785
              if(ret == -1){
 
2786
                perror_plus("fchown");
 
2787
              }
 
2788
            }
 
2789
          }
 
2790
          close(dhparams_fd);
 
2791
        }
 
2792
      }
 
2793
      
2035
2794
      /* Lower privileges */
2036
 
      lower_privileges();
 
2795
      ret = lower_privileges();
 
2796
      if(ret != 0){
 
2797
        errno = ret;
 
2798
        perror_plus("Failed to lower privileges");
 
2799
      }
2037
2800
    }
2038
2801
  }
2039
2802
  
2063
2826
        goto end;
2064
2827
      }
2065
2828
      memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2066
 
      interfaces_hooks_size = mc.interfaces_size;
2067
 
      argz_stringify(interfaces_hooks, interfaces_hooks_size,
2068
 
                     (int)',');
2069
 
    }
2070
 
    if(not run_network_hooks("start", interfaces_hooks != NULL ?
2071
 
                             interfaces_hooks : "", delay)){
2072
 
      goto end;
2073
 
    }
 
2829
      argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
 
2830
    }
 
2831
    run_network_hooks("start", interfaces_hooks != NULL ?
 
2832
                      interfaces_hooks : "", delay);
2074
2833
  }
2075
2834
  
2076
2835
  if(not debug){
2154
2913
  
2155
2914
  /* If no interfaces were specified, make a list */
2156
2915
  if(mc.interfaces == NULL){
2157
 
    struct dirent **direntries;
 
2916
    struct dirent **direntries = NULL;
2158
2917
    /* Look for any good interfaces */
2159
2918
    ret = scandir(sys_class_net, &direntries, good_interface,
2160
2919
                  alphasort);
2164
2923
        ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2165
2924
                             direntries[i]->d_name);
2166
2925
        if(ret_errno != 0){
 
2926
          errno = ret_errno;
2167
2927
          perror_plus("argz_add");
 
2928
          free(direntries[i]);
2168
2929
          continue;
2169
2930
        }
2170
2931
        if(debug){
2171
2932
          fprintf_plus(stderr, "Will use interface \"%s\"\n",
2172
2933
                       direntries[i]->d_name);
2173
2934
        }
 
2935
        free(direntries[i]);
2174
2936
      }
2175
2937
      free(direntries);
2176
2938
    } else {
2177
 
      free(direntries);
 
2939
      if(ret == 0){
 
2940
        free(direntries);
 
2941
      }
2178
2942
      fprintf_plus(stderr, "Could not find a network interface\n");
2179
2943
      exitcode = EXIT_FAILURE;
2180
2944
      goto end;
2181
2945
    }
2182
2946
  }
2183
2947
  
2184
 
  /* Bring up interfaces which are down */
 
2948
  /* Bring up interfaces which are down, and remove any "none"s */
2185
2949
  {
2186
2950
    char *interface = NULL;
2187
2951
    while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2203
2967
        break;
2204
2968
      }
2205
2969
      bool interface_was_up = interface_is_up(interface);
2206
 
      ret = bring_up_interface(interface, delay);
 
2970
      errno = bring_up_interface(interface, delay);
2207
2971
      if(not interface_was_up){
2208
 
        if(ret != 0){
2209
 
          errno = ret;
2210
 
          perror_plus("Failed to bring up interface");
 
2972
        if(errno != 0){
 
2973
          fprintf_plus(stderr, "Failed to bring up interface \"%s\":"
 
2974
                       " %s\n", interface, strerror(errno));
2211
2975
        } else {
2212
 
          ret_errno = argz_add(&interfaces_to_take_down,
2213
 
                               &interfaces_to_take_down_size,
2214
 
                               interface);
 
2976
          errno = argz_add(&interfaces_to_take_down,
 
2977
                           &interfaces_to_take_down_size,
 
2978
                           interface);
 
2979
          if(errno != 0){
 
2980
            perror_plus("argz_add");
 
2981
          }
2215
2982
        }
2216
2983
      }
2217
2984
    }
2233
3000
    goto end;
2234
3001
  }
2235
3002
  
2236
 
  ret = init_gnutls_global(pubkey, seckey, &mc);
 
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
  ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
 
3007
#else
 
3008
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
3009
#endif
2237
3010
  if(ret == -1){
2238
3011
    fprintf_plus(stderr, "init_gnutls_global failed\n");
2239
3012
    exitcode = EX_UNAVAILABLE;
2246
3019
    goto end;
2247
3020
  }
2248
3021
  
2249
 
  if(mkdtemp(tempdir) == NULL){
 
3022
  /* Try /run/tmp before /tmp */
 
3023
  tempdir = mkdtemp(run_tempdir);
 
3024
  if(tempdir == NULL and errno == ENOENT){
 
3025
      if(debug){
 
3026
        fprintf_plus(stderr, "Tempdir %s did not work, trying %s\n",
 
3027
                     run_tempdir, old_tempdir);
 
3028
      }
 
3029
      tempdir = mkdtemp(old_tempdir);
 
3030
  }
 
3031
  if(tempdir == NULL){
2250
3032
    perror_plus("mkdtemp");
2251
3033
    goto end;
2252
3034
  }
2253
 
  tempdir_created = true;
2254
3035
  
2255
3036
  if(quit_now){
2256
3037
    goto end;
2328
3109
        fprintf_plus(stderr, "Retrying in %d seconds\n",
2329
3110
                     (int)retry_interval);
2330
3111
      }
2331
 
      sleep((int)retry_interval);
 
3112
      sleep((unsigned int)retry_interval);
2332
3113
    }
2333
3114
    
2334
 
    if (not quit_now){
 
3115
    if(not quit_now){
2335
3116
      exitcode = EXIT_SUCCESS;
2336
3117
    }
2337
3118
    
2353
3134
    
2354
3135
    /* Allocate a new server */
2355
3136
    mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
2356
 
                                 &config, NULL, NULL, &ret_errno);
 
3137
                                 &config, NULL, NULL, &ret);
2357
3138
    
2358
3139
    /* Free the Avahi configuration data */
2359
3140
    avahi_server_config_free(&config);
2362
3143
  /* Check if creating the Avahi server object succeeded */
2363
3144
  if(mc.server == NULL){
2364
3145
    fprintf_plus(stderr, "Failed to create Avahi server: %s\n",
2365
 
                 avahi_strerror(ret_errno));
 
3146
                 avahi_strerror(ret));
2366
3147
    exitcode = EX_UNAVAILABLE;
2367
3148
    goto end;
2368
3149
  }
2392
3173
  if(debug){
2393
3174
    fprintf_plus(stderr, "Starting Avahi loop search\n");
2394
3175
  }
2395
 
 
 
3176
  
2396
3177
  ret = avahi_loop_with_timeout(simple_poll,
2397
3178
                                (int)(retry_interval * 1000), &mc);
2398
3179
  if(debug){
2403
3184
 end:
2404
3185
  
2405
3186
  if(debug){
2406
 
    fprintf_plus(stderr, "%s exiting\n", argv[0]);
 
3187
    if(signal_received){
 
3188
      fprintf_plus(stderr, "%s exiting due to signal %d: %s\n",
 
3189
                   argv[0], signal_received,
 
3190
                   strsignal(signal_received));
 
3191
    } else {
 
3192
      fprintf_plus(stderr, "%s exiting\n", argv[0]);
 
3193
    }
2407
3194
  }
2408
3195
  
2409
3196
  /* Cleanup things */
2420
3207
  
2421
3208
  if(gnutls_initialized){
2422
3209
    gnutls_certificate_free_credentials(mc.cred);
2423
 
    gnutls_global_deinit();
2424
3210
    gnutls_dh_params_deinit(mc.dh_params);
2425
3211
  }
2426
3212
  
2434
3220
    mc.current_server->prev->next = NULL;
2435
3221
    while(mc.current_server != NULL){
2436
3222
      server *next = mc.current_server->next;
 
3223
#ifdef __GNUC__
 
3224
#pragma GCC diagnostic push
 
3225
#pragma GCC diagnostic ignored "-Wcast-qual"
 
3226
#endif
 
3227
      free((char *)(mc.current_server->ip));
 
3228
#ifdef __GNUC__
 
3229
#pragma GCC diagnostic pop
 
3230
#endif
2437
3231
      free(mc.current_server);
2438
3232
      mc.current_server = next;
2439
3233
    }
2440
3234
  }
2441
3235
  
2442
 
  /* Re-raise priviliges */
 
3236
  /* Re-raise privileges */
2443
3237
  {
2444
 
    raise_privileges();
2445
 
    
2446
 
    /* Run network hooks */
2447
 
    run_network_hooks("stop", interfaces_hooks != NULL ?
2448
 
                      interfaces_hooks : "", delay);
2449
 
    
2450
 
    /* Take down the network interfaces which were brought up */
2451
 
    {
2452
 
      char *interface = NULL;
2453
 
      while((interface=argz_next(interfaces_to_take_down,
2454
 
                                 interfaces_to_take_down_size,
2455
 
                                 interface))){
2456
 
        ret_errno = take_down_interface(interface);
2457
 
        if(ret_errno != 0){
2458
 
          errno = ret_errno;
2459
 
          perror_plus("Failed to take down interface");
2460
 
        }
2461
 
      }
2462
 
      if(debug and (interfaces_to_take_down == NULL)){
2463
 
        fprintf_plus(stderr, "No interfaces needed to be taken"
2464
 
                     " down\n");
2465
 
      }
2466
 
    }
2467
 
    
2468
 
    lower_privileges_permanently();
 
3238
    ret = raise_privileges();
 
3239
    if(ret != 0){
 
3240
      errno = ret;
 
3241
      perror_plus("Failed to raise privileges");
 
3242
    } else {
 
3243
      
 
3244
      /* Run network hooks */
 
3245
      run_network_hooks("stop", interfaces_hooks != NULL ?
 
3246
                        interfaces_hooks : "", delay);
 
3247
      
 
3248
      /* Take down the network interfaces which were brought up */
 
3249
      {
 
3250
        char *interface = NULL;
 
3251
        while((interface = argz_next(interfaces_to_take_down,
 
3252
                                     interfaces_to_take_down_size,
 
3253
                                     interface))){
 
3254
          ret = take_down_interface(interface);
 
3255
          if(ret != 0){
 
3256
            errno = ret;
 
3257
            perror_plus("Failed to take down interface");
 
3258
          }
 
3259
        }
 
3260
        if(debug and (interfaces_to_take_down == NULL)){
 
3261
          fprintf_plus(stderr, "No interfaces needed to be taken"
 
3262
                       " down\n");
 
3263
        }
 
3264
      }
 
3265
    }
 
3266
    
 
3267
    ret = lower_privileges_permanently();
 
3268
    if(ret != 0){
 
3269
      errno = ret;
 
3270
      perror_plus("Failed to lower privileges permanently");
 
3271
    }
2469
3272
  }
2470
3273
  
2471
3274
  free(interfaces_to_take_down);
2472
3275
  free(interfaces_hooks);
2473
3276
  
 
3277
  void clean_dir_at(int base, const char * const dirname,
 
3278
                    uintmax_t level){
 
3279
    struct dirent **direntries = NULL;
 
3280
    int dret;
 
3281
    int dir_fd = (int)TEMP_FAILURE_RETRY(openat(base, dirname,
 
3282
                                                O_RDONLY
 
3283
                                                | O_NOFOLLOW
 
3284
                                                | O_DIRECTORY
 
3285
                                                | O_PATH));
 
3286
    if(dir_fd == -1){
 
3287
      perror_plus("open");
 
3288
      return;
 
3289
    }
 
3290
    int numentries = scandirat(dir_fd, ".", &direntries,
 
3291
                               notdotentries, alphasort);
 
3292
    if(numentries >= 0){
 
3293
      for(int i = 0; i < numentries; i++){
 
3294
        if(debug){
 
3295
          fprintf_plus(stderr, "Unlinking \"%s/%s\"\n",
 
3296
                       dirname, direntries[i]->d_name);
 
3297
        }
 
3298
        dret = unlinkat(dir_fd, direntries[i]->d_name, 0);
 
3299
        if(dret == -1){
 
3300
          if(errno == EISDIR){
 
3301
              dret = unlinkat(dir_fd, direntries[i]->d_name,
 
3302
                              AT_REMOVEDIR);
 
3303
          }         
 
3304
          if((dret == -1) and (errno == ENOTEMPTY)
 
3305
             and (strcmp(direntries[i]->d_name, "private-keys-v1.d")
 
3306
                  == 0) and (level == 0)){
 
3307
            /* Recurse only in this special case */
 
3308
            clean_dir_at(dir_fd, direntries[i]->d_name, level+1);
 
3309
            dret = 0;
 
3310
          }
 
3311
          if((dret == -1) and (errno != ENOENT)){
 
3312
            fprintf_plus(stderr, "unlink(\"%s/%s\"): %s\n", dirname,
 
3313
                         direntries[i]->d_name, strerror(errno));
 
3314
          }
 
3315
        }
 
3316
        free(direntries[i]);
 
3317
      }
 
3318
      
 
3319
      /* need to clean even if 0 because man page doesn't specify */
 
3320
      free(direntries);
 
3321
      dret = unlinkat(base, dirname, AT_REMOVEDIR);
 
3322
      if(dret == -1 and errno != ENOENT){
 
3323
        perror_plus("rmdir");
 
3324
      }
 
3325
    } else {
 
3326
      perror_plus("scandirat");
 
3327
    }
 
3328
    close(dir_fd);
 
3329
  }
 
3330
  
2474
3331
  /* Removes the GPGME temp directory and all files inside */
2475
 
  if(tempdir_created){
2476
 
    struct dirent **direntries = NULL;
2477
 
    struct dirent *direntry = NULL;
2478
 
    int numentries = scandir(tempdir, &direntries, notdotentries,
2479
 
                             alphasort);
2480
 
    if (numentries > 0){
2481
 
      for(int i = 0; i < numentries; i++){
2482
 
        direntry = direntries[i];
2483
 
        char *fullname = NULL;
2484
 
        ret = asprintf(&fullname, "%s/%s", tempdir,
2485
 
                       direntry->d_name);
2486
 
        if(ret < 0){
2487
 
          perror_plus("asprintf");
2488
 
          continue;
2489
 
        }
2490
 
        ret = remove(fullname);
2491
 
        if(ret == -1){
2492
 
          fprintf_plus(stderr, "remove(\"%s\"): %s\n", fullname,
2493
 
                       strerror(errno));
2494
 
        }
2495
 
        free(fullname);
2496
 
      }
2497
 
    }
2498
 
 
2499
 
    /* need to clean even if 0 because man page doesn't specify */
2500
 
    free(direntries);
2501
 
    if (numentries == -1){
2502
 
      perror_plus("scandir");
2503
 
    }
2504
 
    ret = rmdir(tempdir);
2505
 
    if(ret == -1 and errno != ENOENT){
2506
 
      perror_plus("rmdir");
2507
 
    }
 
3332
  if(tempdir != NULL){
 
3333
    clean_dir_at(-1, tempdir, 0);
2508
3334
  }
2509
3335
  
2510
3336
  if(quit_now){