/mandos/release

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

« back to all changes in this revision

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

  • Committer: Teddy Hogeborn
  • Date: 2019-02-09 23:23:26 UTC
  • mto: (237.7.594 trunk)
  • mto: This revision was merged to the branch mainline in revision 370.
  • Revision ID: teddy@recompile.se-20190209232326-z1z2kzpgfixz7iaj
Add support for using raw public keys in TLS (RFC 7250)

Since GnuTLS removed support for OpenPGP keys in TLS (RFC 6091), and
no other library supports it, we have to change the protocol to use
something else.  We choose to use "raw public keys" (RFC 7250).  Since
we still use OpenPGP keys to decrypt the secret password, this means
that each client will have two keys: One OpenPGP key and one TLS
public/private key, and the key ID of the latter key is used to
identify clients instead of the fingerprint of the OpenPGP key.

Note that this code is still compatible with GnuTLS before version
3.6.0 (when OpenPGP key support was removed).  This commit merely adds
support for using raw pulic keys instead with GnuTLS 3.6.6. or later.

* DBUS-API (Signals/ClientNotFound): Change name of first parameter
                                     from "Fingerprint" to "KeyID".
  (Mandos Client Interface/Properties/KeyID): New.
* INSTALL: Document conflict with GnuTLS 3.6.0 (which removed OpenPGP
           key support) up until 3.6.6, when support for raw public
           keys was added.  Also document new dependency of client on
           "gnutls-bin" package (for certtool).
* Makefile (run-client): Depend on TLS key files, and also pass them
                         as arguments to client.
  (keydir/tls-privkey.pem, keydir/tls-pubkey.pem): New.
  (confdir/clients.conf): Add dependency on TLS public key.
  (purge-client): Add removal of TLS key files.
* clients.conf ([foo]/key_id, [bar]/key_id): New.
* debian/control (Source: mandos/Build-Depends): Also allow
                                                 libgnutls30 (>= 3.6.6)
  (Package: mandos/Depends): - '' -
  (Package: mandos/Description): Alter description to match new
                                 design.
  (Package: mandos-client/Description): - '' -
  (Package: mandos-client/Depends): Move "gnutls-bin | openssl" to
                                    here from "Recommends".
* debian/mandos-client.README.Debian: Add --tls-privkey and
                                      --tls-pubkey options to test
                                      command.
* debian/mandos-client.postinst (create_key): Renamed to "create_keys"
                                             (all callers changed),
                                             and also create TLS key.
* debian/mandos-client.postrm (purge): Also remove TLS key files.
* intro.xml (DESCRIPTION): Describe new dual-key design.
* mandos (GnuTLS): Define different functions depending on whether
                   support for raw public keys is detected.
  (Client.key_id): New attribute.
  (ClientDBus.KeyID_dbus_property): New method.
  (ProxyClient.__init__): Take new "key_id" parameter.
  (ClientHandler.handle): Use key IDs when using raw public keys and
                          use fingerprints when using OpenPGP keys.
  (ClientHandler.peer_certificate): Also handle raw public keys.
  (ClientHandler.key_id): New.
  (MandosServer.handle_ipc): Pass key ID over the pipe IPC.  Also
                             check for key ID matches when looking up
                             clients.
  (main): Default GnuTLS priority string depends on whether we are
          using raw public keys or not.  When unpickling clients, set
          key_id if not set in the pickle.
  (main/MandosDBusService.ClientNotFound): Change name of first
                                           parameter from
                                           "Fingerprint" to "KeyID".
* mandos-clients.conf.xml (OPTIONS): Document new "key_id" option.
  (OPTIONS/secret): Mention new key ID matchning.
  (EXPANSION/RUNTIME EXPANSION): Add new "key_id" option.
  (EXAMPLE): - '' -
* mandos-ctl (tablewords, main/keywords): Add new "KeyID" property.
* mandos-keygen: Create TLS key files.  New "--tls-keytype" (-T)
                 option.  Alter help text to be more clear about key
                 types.  When in password mode, also output "key_id"
                 option.
* mandos-keygen.xml (SYNOPSIS): Add new "--tls-keytype" (-T) option.
  (DESCRIPTION): Alter to match new dual-key design.
  (OVERVIEW): - '' -
  (FILES): Add TLS key files.
* mandos-options.xml (priority): Document new default priority string
                                 when using raw public keys.
* mandos.xml (NETWORK PROTOCOL): Describe new protocol using key ID.
  (BUGS): Remove issue about checking expire times of OpenPGP keys,
          since TLS public keys do not have expiration times.
  (SECURITY/CLIENT): Alter description to match new design.
  (SEE ALSO/GnuTLS): - '' -
  (SEE ALSO): Add reference to RFC 7250, and alter description of when
              RFC 6091 is used.
* overview.xml: Alter text to match new design.
* plugin-runner.xml (EXAMPLE): Add --tls-pubkey and --tls-privkey
                               options to mandos-client options.
* plugins.d/mandos-client.c: Use raw public keys when compiling with
                             supporting GnuTLS versions. Add new
                             "--tls-pubkey" and "--tls-privkey"
                             options (which do nothing if GnuTLS
                             library does not support raw public
                             keys).  Alter text throughout to reflect
                             new design.  Only generate new DH
                             parameters (based on size of OpenPGP key)
                             when using OpenPGP in TLS.  Default
                             GnuTLS priority string depends on whether
                             we are using raw public keys or not.
* plugins.d/mandos-client.xml (SYNOPSIS): Add new "--tls-privkey" (-t)
                                          and "--tls-pubkey" (-T)
                                          options.
  (DESCRIPTION): Describe new dual-key design.
  (OPTIONS): Document new "--tls-privkey" (-t) and "--tls-pubkey" (-T)
             options.
  (OPTIONS/--dh-bits): No longer necessarily depends on OpenPGP key
                       size.
  (FILES): Add default locations for TLS public and private key files.
  (EXAMPLE): Use new --tls-pubkey and --tls-privkey options.
  (SECURITY): Alter wording slightly to reflect new dual-key design.
  (SEE ALSO/GnuTLS): Alter description to match new design.
  (SEE ALSO): Add reference to RFC 7250, and alter description of when
              RFC 6091 is used.

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-2018 Teddy Hogeborn
 
13
 * Copyright © 2008-2018 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
 
154
173
 
155
174
/* Used for passing in values through the Avahi callback functions */
156
175
typedef struct {
157
 
  AvahiSimplePoll *simple_poll;
158
176
  AvahiServer *server;
159
177
  gnutls_certificate_credentials_t cred;
160
178
  unsigned int dh_bits;
162
180
  const char *priority;
163
181
  gpgme_ctx_t ctx;
164
182
  server *current_server;
 
183
  char *interfaces;
 
184
  size_t interfaces_size;
165
185
} mandos_context;
166
186
 
167
 
/* global context so signal handler can reach it*/
168
 
mandos_context mc = { .simple_poll = NULL, .server = NULL,
169
 
                      .dh_bits = 1024, .priority = "SECURE256"
170
 
                      ":!CTYPE-X.509:+CTYPE-OPENPGP",
171
 
                      .current_server = NULL };
 
187
/* global so signal handler can reach it*/
 
188
AvahiSimplePoll *simple_poll;
172
189
 
173
190
sig_atomic_t quit_now = 0;
174
191
int signal_received = 0;
182
199
  perror(print_text);
183
200
}
184
201
 
185
 
__attribute__((format (gnu_printf, 2, 3)))
 
202
__attribute__((format (gnu_printf, 2, 3), nonnull))
186
203
int fprintf_plus(FILE *stream, const char *format, ...){
187
204
  va_list ap;
188
205
  va_start (ap, format);
189
206
  
190
207
  TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
191
208
                             program_invocation_short_name));
192
 
  return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
 
209
  return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
193
210
}
194
211
 
195
212
/*
197
214
 * bytes. "buffer_capacity" is how much is currently allocated,
198
215
 * "buffer_length" is how much is already used.
199
216
 */
 
217
__attribute__((nonnull, warn_unused_result))
200
218
size_t incbuffer(char **buffer, size_t buffer_length,
201
219
                 size_t buffer_capacity){
202
220
  if(buffer_length + BUFFER_SIZE > buffer_capacity){
203
 
    *buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
204
 
    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;
205
227
      return 0;
206
228
    }
 
229
    *buffer = new_buf;
207
230
    buffer_capacity += BUFFER_SIZE;
208
231
  }
209
232
  return buffer_capacity;
210
233
}
211
234
 
212
235
/* Add server to set of servers to retry periodically */
 
236
__attribute__((nonnull, warn_unused_result))
213
237
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
214
 
                int af){
 
238
                int af, server **current_server){
215
239
  int ret;
216
240
  server *new_server = malloc(sizeof(server));
217
241
  if(new_server == NULL){
224
248
                          .af = af };
225
249
  if(new_server->ip == NULL){
226
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);
227
266
    return false;
228
267
  }
229
268
  /* Special case of first server */
230
 
  if (mc.current_server == NULL){
 
269
  if(*current_server == NULL){
231
270
    new_server->next = new_server;
232
271
    new_server->prev = new_server;
233
 
    mc.current_server = new_server;
234
 
  /* Place the new server last in the list */
 
272
    *current_server = new_server;
235
273
  } else {
236
 
    new_server->next = mc.current_server;
237
 
    new_server->prev = mc.current_server->prev;
 
274
    /* Place the new server last in the list */
 
275
    new_server->next = *current_server;
 
276
    new_server->prev = (*current_server)->prev;
238
277
    new_server->prev->next = new_server;
239
 
    mc.current_server->prev = new_server;
240
 
  }
241
 
  ret = clock_gettime(CLOCK_MONOTONIC, &mc.current_server->last_seen);
242
 
  if(ret == -1){
243
 
    perror_plus("clock_gettime");
244
 
    return false;
 
278
    (*current_server)->prev = new_server;
245
279
  }
246
280
  return true;
247
281
}
248
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
 
249
335
/* 
250
336
 * Initialize GPGME.
251
337
 */
252
 
static bool init_gpgme(const char *seckey, const char *pubkey,
253
 
                       const char *tempdir){
 
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){
254
343
  gpgme_error_t rc;
255
344
  gpgme_engine_info_t engine_info;
256
345
  
257
 
  
258
346
  /*
259
347
   * Helper function to insert pub and seckey to the engine keyring.
260
348
   */
261
 
  bool import_key(const char *filename){
 
349
  bool import_key(const char * const filename){
262
350
    int ret;
263
351
    int fd;
264
352
    gpgme_data_t pgp_data;
269
357
      return false;
270
358
    }
271
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
 
272
410
    rc = gpgme_data_new_from_fd(&pgp_data, fd);
273
411
    if(rc != GPG_ERR_NO_ERROR){
274
412
      fprintf_plus(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
276
414
      return false;
277
415
    }
278
416
    
279
 
    rc = gpgme_op_import(mc.ctx, pgp_data);
 
417
    rc = gpgme_op_import(mc->ctx, pgp_data);
280
418
    if(rc != GPG_ERR_NO_ERROR){
281
419
      fprintf_plus(stderr, "bad gpgme_op_import: %s: %s\n",
282
420
                   gpgme_strsource(rc), gpgme_strerror(rc));
283
421
      return false;
284
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
    }
285
498
    
286
 
    ret = (int)TEMP_FAILURE_RETRY(close(fd));
 
499
    ret = close(fd);
287
500
    if(ret == -1){
288
501
      perror_plus("close");
289
502
    }
326
539
  }
327
540
  
328
541
  /* Create new GPGME "context" */
329
 
  rc = gpgme_new(&(mc.ctx));
 
542
  rc = gpgme_new(&(mc->ctx));
330
543
  if(rc != GPG_ERR_NO_ERROR){
331
 
    fprintf_plus(stderr, "Mandos plugin mandos-client: "
332
 
                 "bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
333
 
                 gpgme_strerror(rc));
 
544
    fprintf_plus(stderr, "bad gpgme_new: %s: %s\n",
 
545
                 gpgme_strsource(rc), gpgme_strerror(rc));
334
546
    return false;
335
547
  }
336
548
  
345
557
 * Decrypt OpenPGP data.
346
558
 * Returns -1 on error
347
559
 */
 
560
__attribute__((nonnull, warn_unused_result))
348
561
static ssize_t pgp_packet_decrypt(const char *cryptotext,
349
562
                                  size_t crypto_size,
350
 
                                  char **plaintext){
 
563
                                  char **plaintext,
 
564
                                  mandos_context *mc){
351
565
  gpgme_data_t dh_crypto, dh_plain;
352
566
  gpgme_error_t rc;
353
567
  ssize_t ret;
370
584
  /* Create new empty GPGME data buffer for the plaintext */
371
585
  rc = gpgme_data_new(&dh_plain);
372
586
  if(rc != GPG_ERR_NO_ERROR){
373
 
    fprintf_plus(stderr, "Mandos plugin mandos-client: "
374
 
                 "bad gpgme_data_new: %s: %s\n",
 
587
    fprintf_plus(stderr, "bad gpgme_data_new: %s: %s\n",
375
588
                 gpgme_strsource(rc), gpgme_strerror(rc));
376
589
    gpgme_data_release(dh_crypto);
377
590
    return -1;
379
592
  
380
593
  /* Decrypt data from the cryptotext data buffer to the plaintext
381
594
     data buffer */
382
 
  rc = gpgme_op_decrypt(mc.ctx, dh_crypto, dh_plain);
 
595
  rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
383
596
  if(rc != GPG_ERR_NO_ERROR){
384
597
    fprintf_plus(stderr, "bad gpgme_op_decrypt: %s: %s\n",
385
598
                 gpgme_strsource(rc), gpgme_strerror(rc));
386
599
    plaintext_length = -1;
387
600
    if(debug){
388
601
      gpgme_decrypt_result_t result;
389
 
      result = gpgme_op_decrypt_result(mc.ctx);
 
602
      result = gpgme_op_decrypt_result(mc->ctx);
390
603
      if(result == NULL){
391
604
        fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
392
605
      } else {
393
 
        fprintf_plus(stderr, "Unsupported algorithm: %s\n",
394
 
                     result->unsupported_algorithm);
395
 
        fprintf_plus(stderr, "Wrong key usage: %u\n",
396
 
                     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");
397
612
        if(result->file_name != NULL){
398
613
          fprintf_plus(stderr, "File name: %s\n", result->file_name);
399
614
        }
400
 
        gpgme_recipient_t recipient;
401
 
        recipient = result->recipients;
402
 
        while(recipient != NULL){
 
615
 
 
616
        for(gpgme_recipient_t r = result->recipients; r != NULL;
 
617
            r = r->next){
403
618
          fprintf_plus(stderr, "Public key algorithm: %s\n",
404
 
                       gpgme_pubkey_algo_name
405
 
                       (recipient->pubkey_algo));
406
 
          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);
407
621
          fprintf_plus(stderr, "Secret key available: %s\n",
408
 
                       recipient->status == GPG_ERR_NO_SECKEY
409
 
                       ? "No" : "Yes");
410
 
          recipient = recipient->next;
 
622
                       r->status == GPG_ERR_NO_SECKEY ? "No" : "Yes");
411
623
        }
412
624
      }
413
625
    }
469
681
  return plaintext_length;
470
682
}
471
683
 
472
 
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){
473
693
  const char *ret = gnutls_strerror(value);
474
 
  if(ret == NULL)
475
 
    ret = "(unknown)";
476
 
  return ret;
 
694
  return safe_string(ret);
477
695
}
478
696
 
479
697
/* GnuTLS log function callback */
 
698
__attribute__((nonnull))
480
699
static void debuggnutls(__attribute__((unused)) int level,
481
700
                        const char* string){
482
701
  fprintf_plus(stderr, "GnuTLS: %s", string);
483
702
}
484
703
 
 
704
__attribute__((nonnull(1, 2, 4), warn_unused_result))
485
705
static int init_gnutls_global(const char *pubkeyfilename,
486
 
                              const char *seckeyfilename){
 
706
                              const char *seckeyfilename,
 
707
                              const char *dhparamsfilename,
 
708
                              mandos_context *mc){
487
709
  int ret;
488
710
  
489
711
  if(debug){
490
712
    fprintf_plus(stderr, "Initializing GnuTLS\n");
491
713
  }
492
714
  
493
 
  ret = gnutls_global_init();
494
 
  if(ret != GNUTLS_E_SUCCESS){
495
 
    fprintf_plus(stderr, "GnuTLS global_init: %s\n",
496
 
                 safer_gnutls_strerror(ret));
497
 
    return -1;
498
 
  }
499
 
  
500
715
  if(debug){
501
716
    /* "Use a log level over 10 to enable all debugging options."
502
717
     * - GnuTLS manual
506
721
  }
507
722
  
508
723
  /* OpenPGP credentials */
509
 
  ret = gnutls_certificate_allocate_credentials(&mc.cred);
 
724
  ret = gnutls_certificate_allocate_credentials(&mc->cred);
510
725
  if(ret != GNUTLS_E_SUCCESS){
511
726
    fprintf_plus(stderr, "GnuTLS memory error: %s\n",
512
727
                 safer_gnutls_strerror(ret));
513
 
    gnutls_global_deinit();
514
728
    return -1;
515
729
  }
516
730
  
517
731
  if(debug){
518
 
    fprintf_plus(stderr, "Attempting to use OpenPGP public key %s and"
519
 
                 " 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",
520
734
                 pubkeyfilename,
521
735
                 seckeyfilename);
522
736
  }
523
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
524
751
  ret = gnutls_certificate_set_openpgp_key_file
525
 
    (mc.cred, pubkeyfilename, seckeyfilename,
 
752
    (mc->cred, pubkeyfilename, seckeyfilename,
526
753
     GNUTLS_OPENPGP_FMT_BASE64);
 
754
#else
 
755
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
756
#endif
527
757
  if(ret != GNUTLS_E_SUCCESS){
528
758
    fprintf_plus(stderr,
529
 
                 "Error[%d] while reading the OpenPGP key pair ('%s',"
 
759
                 "Error[%d] while reading the key pair ('%s',"
530
760
                 " '%s')\n", ret, pubkeyfilename, seckeyfilename);
531
761
    fprintf_plus(stderr, "The GnuTLS error is: %s\n",
532
762
                 safer_gnutls_strerror(ret));
534
764
  }
535
765
  
536
766
  /* GnuTLS server initialization */
537
 
  ret = gnutls_dh_params_init(&mc.dh_params);
 
767
  ret = gnutls_dh_params_init(&mc->dh_params);
538
768
  if(ret != GNUTLS_E_SUCCESS){
539
769
    fprintf_plus(stderr, "Error in GnuTLS DH parameter"
540
770
                 " initialization: %s\n",
541
771
                 safer_gnutls_strerror(ret));
542
772
    goto globalfail;
543
773
  }
544
 
  ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
545
 
  if(ret != GNUTLS_E_SUCCESS){
546
 
    fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
547
 
                 safer_gnutls_strerror(ret));
548
 
    goto globalfail;
549
 
  }
550
 
  
551
 
  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
  }
552
956
  
553
957
  return 0;
554
958
  
555
959
 globalfail:
556
960
  
557
 
  gnutls_certificate_free_credentials(mc.cred);
558
 
  gnutls_global_deinit();
559
 
  gnutls_dh_params_deinit(mc.dh_params);
 
961
  gnutls_certificate_free_credentials(mc->cred);
 
962
  gnutls_dh_params_deinit(mc->dh_params);
560
963
  return -1;
561
964
}
562
965
 
563
 
static int init_gnutls_session(gnutls_session_t *session){
 
966
__attribute__((nonnull, warn_unused_result))
 
967
static int init_gnutls_session(gnutls_session_t *session,
 
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
    }
578
990
  {
579
991
    const char *err;
580
992
    do {
581
 
      ret = gnutls_priority_set_direct(*session, mc.priority, &err);
 
993
      ret = gnutls_priority_set_direct(*session, mc->priority, &err);
582
994
      if(quit_now){
583
995
        gnutls_deinit(*session);
584
996
        return -1;
595
1007
  
596
1008
  do {
597
1009
    ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
598
 
                                 mc.cred);
 
1010
                                 mc->cred);
599
1011
    if(quit_now){
600
1012
      gnutls_deinit(*session);
601
1013
      return -1;
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
        _exit(EX_NOPERM);
 
1078
      }
 
1079
      /* Reset supplementary groups */
 
1080
      errno = 0;
 
1081
      ret = setgroups(0, NULL);
 
1082
      if(ret == -1){
 
1083
        perror_plus("setgroups");
 
1084
        _exit(EX_NOPERM);
 
1085
      }
 
1086
    }
 
1087
    ret = dup2(devnull, STDIN_FILENO);
 
1088
    if(ret == -1){
 
1089
      perror_plus("dup2(devnull, STDIN_FILENO)");
 
1090
      _exit(EX_OSERR);
 
1091
    }
 
1092
    ret = close(devnull);
 
1093
    if(ret == -1){
 
1094
      perror_plus("close");
 
1095
      _exit(EX_OSERR);
 
1096
    }
 
1097
    ret = dup2(STDERR_FILENO, STDOUT_FILENO);
 
1098
    if(ret == -1){
 
1099
      perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
 
1100
      _exit(EX_OSERR);
 
1101
    }
 
1102
    int helperdir_fd = (int)TEMP_FAILURE_RETRY(open(pluginhelperdir,
 
1103
                                                    O_RDONLY
 
1104
                                                    | O_DIRECTORY
 
1105
                                                    | O_PATH
 
1106
                                                    | O_CLOEXEC));
 
1107
    if(helperdir_fd == -1){
 
1108
      perror_plus("open");
 
1109
      _exit(EX_UNAVAILABLE);
 
1110
    }
 
1111
    int helper_fd = (int)TEMP_FAILURE_RETRY(openat(helperdir_fd,
 
1112
                                                   helper, O_RDONLY));
 
1113
    if(helper_fd == -1){
 
1114
      perror_plus("openat");
 
1115
      close(helperdir_fd);
 
1116
      _exit(EX_UNAVAILABLE);
 
1117
    }
 
1118
    close(helperdir_fd);
 
1119
#ifdef __GNUC__
 
1120
#pragma GCC diagnostic push
 
1121
#pragma GCC diagnostic ignored "-Wcast-qual"
 
1122
#endif
 
1123
    if(fexecve(helper_fd, (char *const [])
 
1124
               { helper, add ? add_arg : delete_arg, (char *)address,
 
1125
                   interface, debug ? debug_flag : NULL, NULL },
 
1126
               environ) == -1){
 
1127
#ifdef __GNUC__
 
1128
#pragma GCC diagnostic pop
 
1129
#endif
 
1130
      perror_plus("fexecve");
 
1131
      _exit(EXIT_FAILURE);
 
1132
    }
 
1133
  }
 
1134
  if(pid == -1){
 
1135
    perror_plus("fork");
 
1136
    return false;
 
1137
  }
 
1138
  int status;
 
1139
  pid_t pret = -1;
 
1140
  errno = 0;
 
1141
  do {
 
1142
    pret = waitpid(pid, &status, 0);
 
1143
    if(pret == -1 and errno == EINTR and quit_now){
 
1144
      int errno_raising = 0;
 
1145
      if((errno = raise_privileges()) != 0){
 
1146
        errno_raising = errno;
 
1147
        perror_plus("Failed to raise privileges in order to"
 
1148
                    " kill helper program");
 
1149
      }
 
1150
      if(kill(pid, SIGTERM) == -1){
 
1151
        perror_plus("kill");
 
1152
      }
 
1153
      if((errno_raising == 0) and (errno = lower_privileges()) != 0){
 
1154
        perror_plus("Failed to lower privileges after killing"
 
1155
                    " helper program");
 
1156
      }
 
1157
      return false;
 
1158
    }
 
1159
  } while(pret == -1 and errno == EINTR);
 
1160
  if(pret == -1){
 
1161
    perror_plus("waitpid");
 
1162
    return false;
 
1163
  }
 
1164
  if(WIFEXITED(status)){
 
1165
    if(WEXITSTATUS(status) != 0){
 
1166
      fprintf_plus(stderr, "Error: iprouteadddel exited"
 
1167
                   " with status %d\n", WEXITSTATUS(status));
 
1168
      return false;
 
1169
    }
 
1170
    return true;
 
1171
  }
 
1172
  if(WIFSIGNALED(status)){
 
1173
    fprintf_plus(stderr, "Error: iprouteadddel died by"
 
1174
                 " signal %d\n", WTERMSIG(status));
 
1175
    return false;
 
1176
  }
 
1177
  fprintf_plus(stderr, "Error: iprouteadddel crashed\n");
 
1178
  return false;
 
1179
}
 
1180
 
 
1181
__attribute__((nonnull, warn_unused_result))
 
1182
static bool add_local_route(const char *address,
 
1183
                            AvahiIfIndex if_index){
 
1184
  if(debug){
 
1185
    fprintf_plus(stderr, "Adding route to %s\n", address);
 
1186
  }
 
1187
  return add_delete_local_route(true, address, if_index);
 
1188
}
 
1189
 
 
1190
__attribute__((nonnull, warn_unused_result))
 
1191
static bool delete_local_route(const char *address,
 
1192
                               AvahiIfIndex if_index){
 
1193
  if(debug){
 
1194
    fprintf_plus(stderr, "Removing route to %s\n", address);
 
1195
  }
 
1196
  return add_delete_local_route(false, address, if_index);
 
1197
}
 
1198
 
623
1199
/* Called when a Mandos server is found */
 
1200
__attribute__((nonnull, warn_unused_result))
624
1201
static int start_mandos_communication(const char *ip, in_port_t port,
625
1202
                                      AvahiIfIndex if_index,
626
 
                                      int af){
 
1203
                                      int af, mandos_context *mc){
627
1204
  int ret, tcp_sd = -1;
628
1205
  ssize_t sret;
629
 
  union {
630
 
    struct sockaddr_in in;
631
 
    struct sockaddr_in6 in6;
632
 
  } to;
 
1206
  struct sockaddr_storage to;
633
1207
  char *buffer = NULL;
634
1208
  char *decrypted_buffer = NULL;
635
1209
  size_t buffer_length = 0;
638
1212
  int retval = -1;
639
1213
  gnutls_session_t session;
640
1214
  int pf;                       /* Protocol family */
 
1215
  bool route_added = false;
641
1216
  
642
1217
  errno = 0;
643
1218
  
659
1234
    return -1;
660
1235
  }
661
1236
  
662
 
  ret = init_gnutls_session(&session);
 
1237
  /* If the interface is specified and we have a list of interfaces */
 
1238
  if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
 
1239
    /* Check if the interface is one of the interfaces we are using */
 
1240
    bool match = false;
 
1241
    {
 
1242
      char *interface = NULL;
 
1243
      while((interface = argz_next(mc->interfaces,
 
1244
                                   mc->interfaces_size,
 
1245
                                   interface))){
 
1246
        if(if_nametoindex(interface) == (unsigned int)if_index){
 
1247
          match = true;
 
1248
          break;
 
1249
        }
 
1250
      }
 
1251
    }
 
1252
    if(not match){
 
1253
      /* This interface does not match any in the list, so we don't
 
1254
         connect to the server */
 
1255
      if(debug){
 
1256
        char interface[IF_NAMESIZE];
 
1257
        if(if_indextoname((unsigned int)if_index, interface) == NULL){
 
1258
          perror_plus("if_indextoname");
 
1259
        } else {
 
1260
          fprintf_plus(stderr, "Skipping server on non-used interface"
 
1261
                       " \"%s\"\n",
 
1262
                       if_indextoname((unsigned int)if_index,
 
1263
                                      interface));
 
1264
        }
 
1265
      }
 
1266
      return -1;
 
1267
    }
 
1268
  }
 
1269
  
 
1270
  ret = init_gnutls_session(&session, mc);
663
1271
  if(ret != 0){
664
1272
    return -1;
665
1273
  }
669
1277
                 PRIuMAX "\n", ip, (uintmax_t)port);
670
1278
  }
671
1279
  
672
 
  tcp_sd = socket(pf, SOCK_STREAM, 0);
 
1280
  tcp_sd = socket(pf, SOCK_STREAM | SOCK_CLOEXEC, 0);
673
1281
  if(tcp_sd < 0){
674
1282
    int e = errno;
675
1283
    perror_plus("socket");
682
1290
    goto mandos_end;
683
1291
  }
684
1292
  
685
 
  memset(&to, 0, sizeof(to));
686
1293
  if(af == AF_INET6){
687
 
    to.in6.sin6_family = (sa_family_t)af;
688
 
    ret = inet_pton(af, ip, &to.in6.sin6_addr);
 
1294
    struct sockaddr_in6 *to6 = (struct sockaddr_in6 *)&to;
 
1295
    *to6 = (struct sockaddr_in6){ .sin6_family = (sa_family_t)af };
 
1296
    ret = inet_pton(af, ip, &to6->sin6_addr);
689
1297
  } else {                      /* IPv4 */
690
 
    to.in.sin_family = (sa_family_t)af;
691
 
    ret = inet_pton(af, ip, &to.in.sin_addr);
 
1298
    struct sockaddr_in *to4 = (struct sockaddr_in *)&to;
 
1299
    *to4 = (struct sockaddr_in){ .sin_family = (sa_family_t)af };
 
1300
    ret = inet_pton(af, ip, &to4->sin_addr);
692
1301
  }
693
1302
  if(ret < 0 ){
694
1303
    int e = errno;
703
1312
    goto mandos_end;
704
1313
  }
705
1314
  if(af == AF_INET6){
706
 
    to.in6.sin6_port = htons(port);    
707
 
    if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
708
 
       (&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
709
 
                                -Wunreachable-code*/
 
1315
    ((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
 
1316
    if(IN6_IS_ADDR_LINKLOCAL
 
1317
       (&((struct sockaddr_in6 *)&to)->sin6_addr)){
710
1318
      if(if_index == AVAHI_IF_UNSPEC){
711
1319
        fprintf_plus(stderr, "An IPv6 link-local address is"
712
1320
                     " incomplete without a network interface\n");
714
1322
        goto mandos_end;
715
1323
      }
716
1324
      /* Set the network interface number as scope */
717
 
      to.in6.sin6_scope_id = (uint32_t)if_index;
 
1325
      ((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
718
1326
    }
719
1327
  } else {
720
 
    to.in.sin_port = htons(port); /* Spurious warnings from
721
 
                                     -Wconversion and
722
 
                                     -Wunreachable-code */
 
1328
    ((struct sockaddr_in *)&to)->sin_port = htons(port);
723
1329
  }
724
1330
  
725
1331
  if(quit_now){
742
1348
    }
743
1349
    char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
744
1350
                 INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
745
 
    const char *pcret;
746
 
    if(af == AF_INET6){
747
 
      pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
748
 
                        sizeof(addrstr));
749
 
    } else {
750
 
      pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
751
 
                        sizeof(addrstr));
752
 
    }
753
 
    if(pcret == NULL){
754
 
      perror_plus("inet_ntop");
755
 
    } else {
756
 
      if(strcmp(addrstr, ip) != 0){
757
 
        fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
758
 
      }
759
 
    }
760
 
  }
761
 
  
762
 
  if(quit_now){
763
 
    errno = EINTR;
764
 
    goto mandos_end;
765
 
  }
766
 
  
767
 
  if(af == AF_INET6){
768
 
    ret = connect(tcp_sd, &to.in6, sizeof(to));
769
 
  } else {
770
 
    ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
771
 
  }
772
 
  if(ret < 0){
773
 
    if ((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
774
 
      int e = errno;
775
 
      perror_plus("connect");
776
 
      errno = e;
777
 
    }
778
 
    goto mandos_end;
779
 
  }
780
 
  
781
 
  if(quit_now){
782
 
    errno = EINTR;
783
 
    goto mandos_end;
 
1351
    if(af == AF_INET6){
 
1352
      ret = getnameinfo((struct sockaddr *)&to,
 
1353
                        sizeof(struct sockaddr_in6),
 
1354
                        addrstr, sizeof(addrstr), NULL, 0,
 
1355
                        NI_NUMERICHOST);
 
1356
    } else {
 
1357
      ret = getnameinfo((struct sockaddr *)&to,
 
1358
                        sizeof(struct sockaddr_in),
 
1359
                        addrstr, sizeof(addrstr), NULL, 0,
 
1360
                        NI_NUMERICHOST);
 
1361
    }
 
1362
    if(ret == EAI_SYSTEM){
 
1363
      perror_plus("getnameinfo");
 
1364
    } else if(ret != 0) {
 
1365
      fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
 
1366
    } else if(strcmp(addrstr, ip) != 0){
 
1367
      fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
 
1368
    }
 
1369
  }
 
1370
  
 
1371
  if(quit_now){
 
1372
    errno = EINTR;
 
1373
    goto mandos_end;
 
1374
  }
 
1375
  
 
1376
  while(true){
 
1377
    if(af == AF_INET6){
 
1378
      ret = connect(tcp_sd, (struct sockaddr *)&to,
 
1379
                    sizeof(struct sockaddr_in6));
 
1380
    } else {
 
1381
      ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
 
1382
                    sizeof(struct sockaddr_in));
 
1383
    }
 
1384
    if(ret < 0){
 
1385
      if(((errno == ENETUNREACH) or (errno == EHOSTUNREACH))
 
1386
         and if_index != AVAHI_IF_UNSPEC
 
1387
         and connect_to == NULL
 
1388
         and not route_added and
 
1389
         ((af == AF_INET6 and not
 
1390
           IN6_IS_ADDR_LINKLOCAL(&(((struct sockaddr_in6 *)
 
1391
                                    &to)->sin6_addr)))
 
1392
          or (af == AF_INET and
 
1393
              /* Not a a IPv4LL address */
 
1394
              (ntohl(((struct sockaddr_in *)&to)->sin_addr.s_addr)
 
1395
               & 0xFFFF0000L) != 0xA9FE0000L))){
 
1396
        /* Work around Avahi bug - Avahi does not announce link-local
 
1397
           addresses if it has a global address, so local hosts with
 
1398
           *only* a link-local address (e.g. Mandos clients) cannot
 
1399
           connect to a Mandos server announced by Avahi on a server
 
1400
           host with a global address.  Work around this by retrying
 
1401
           with an explicit route added with the server's address.
 
1402
           
 
1403
           Avahi bug reference:
 
1404
           https://lists.freedesktop.org/archives/avahi/2010-February/001833.html
 
1405
           https://bugs.debian.org/587961
 
1406
        */
 
1407
        if(debug){
 
1408
          fprintf_plus(stderr, "Mandos server unreachable, trying"
 
1409
                       " direct route\n");
 
1410
        }
 
1411
        int e = errno;
 
1412
        route_added = add_local_route(ip, if_index);
 
1413
        if(route_added){
 
1414
          continue;
 
1415
        }
 
1416
        errno = e;
 
1417
      }
 
1418
      if(errno != ECONNREFUSED or debug){
 
1419
        int e = errno;
 
1420
        perror_plus("connect");
 
1421
        errno = e;
 
1422
      }
 
1423
      goto mandos_end;
 
1424
    }
 
1425
    
 
1426
    if(quit_now){
 
1427
      errno = EINTR;
 
1428
      goto mandos_end;
 
1429
    }
 
1430
    break;
784
1431
  }
785
1432
  
786
1433
  const char *out = mandos_protocol_version;
937
1584
  if(buffer_length > 0){
938
1585
    ssize_t decrypted_buffer_size;
939
1586
    decrypted_buffer_size = pgp_packet_decrypt(buffer, buffer_length,
940
 
                                               &decrypted_buffer);
 
1587
                                               &decrypted_buffer, mc);
941
1588
    if(decrypted_buffer_size >= 0){
942
1589
      
 
1590
      clearerr(stdout);
943
1591
      written = 0;
944
1592
      while(written < (size_t) decrypted_buffer_size){
945
1593
        if(quit_now){
961
1609
        }
962
1610
        written += (size_t)ret;
963
1611
      }
 
1612
      ret = fflush(stdout);
 
1613
      if(ret != 0){
 
1614
        int e = errno;
 
1615
        if(debug){
 
1616
          fprintf_plus(stderr, "Error writing encrypted data: %s\n",
 
1617
                       strerror(errno));
 
1618
        }
 
1619
        errno = e;
 
1620
        goto mandos_end;
 
1621
      }
964
1622
      retval = 0;
965
1623
    }
966
1624
  }
969
1627
  
970
1628
 mandos_end:
971
1629
  {
 
1630
    if(route_added){
 
1631
      if(not delete_local_route(ip, if_index)){
 
1632
        fprintf_plus(stderr, "Failed to delete local route to %s on"
 
1633
                     " interface %d", ip, if_index);
 
1634
      }
 
1635
    }
972
1636
    int e = errno;
973
1637
    free(decrypted_buffer);
974
1638
    free(buffer);
975
1639
    if(tcp_sd >= 0){
976
 
      ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
 
1640
      ret = close(tcp_sd);
977
1641
    }
978
1642
    if(ret == -1){
979
1643
      if(e == 0){
1004
1668
                             AVAHI_GCC_UNUSED AvahiStringList *txt,
1005
1669
                             AVAHI_GCC_UNUSED AvahiLookupResultFlags
1006
1670
                             flags,
1007
 
                             AVAHI_GCC_UNUSED void* userdata){
 
1671
                             void *mc){
1008
1672
  if(r == NULL){
1009
1673
    return;
1010
1674
  }
1013
1677
     timed out */
1014
1678
  
1015
1679
  if(quit_now){
 
1680
    avahi_s_service_resolver_free(r);
1016
1681
    return;
1017
1682
  }
1018
1683
  
1022
1687
    fprintf_plus(stderr, "(Avahi Resolver) Failed to resolve service "
1023
1688
                 "'%s' of type '%s' in domain '%s': %s\n", name, type,
1024
1689
                 domain,
1025
 
                 avahi_strerror(avahi_server_errno(mc.server)));
 
1690
                 avahi_strerror(avahi_server_errno
 
1691
                                (((mandos_context*)mc)->server)));
1026
1692
    break;
1027
1693
    
1028
1694
  case AVAHI_RESOLVER_FOUND:
1036
1702
      }
1037
1703
      int ret = start_mandos_communication(ip, (in_port_t)port,
1038
1704
                                           interface,
1039
 
                                           avahi_proto_to_af(proto));
 
1705
                                           avahi_proto_to_af(proto),
 
1706
                                           mc);
1040
1707
      if(ret == 0){
1041
 
        avahi_simple_poll_quit(mc.simple_poll);
 
1708
        avahi_simple_poll_quit(simple_poll);
1042
1709
      } else {
1043
1710
        if(not add_server(ip, (in_port_t)port, interface,
1044
 
                          avahi_proto_to_af(proto))){
 
1711
                          avahi_proto_to_af(proto),
 
1712
                          &((mandos_context*)mc)->current_server)){
1045
1713
          fprintf_plus(stderr, "Failed to add server \"%s\" to server"
1046
1714
                       " list\n", name);
1047
1715
        }
1060
1728
                            const char *domain,
1061
1729
                            AVAHI_GCC_UNUSED AvahiLookupResultFlags
1062
1730
                            flags,
1063
 
                            AVAHI_GCC_UNUSED void* userdata){
 
1731
                            void *mc){
1064
1732
  if(b == NULL){
1065
1733
    return;
1066
1734
  }
1077
1745
  case AVAHI_BROWSER_FAILURE:
1078
1746
    
1079
1747
    fprintf_plus(stderr, "(Avahi browser) %s\n",
1080
 
                 avahi_strerror(avahi_server_errno(mc.server)));
1081
 
    avahi_simple_poll_quit(mc.simple_poll);
 
1748
                 avahi_strerror(avahi_server_errno
 
1749
                                (((mandos_context*)mc)->server)));
 
1750
    avahi_simple_poll_quit(simple_poll);
1082
1751
    return;
1083
1752
    
1084
1753
  case AVAHI_BROWSER_NEW:
1087
1756
       the callback function is called the Avahi server will free the
1088
1757
       resolver for us. */
1089
1758
    
1090
 
    if(avahi_s_service_resolver_new(mc.server, interface, protocol,
1091
 
                                    name, type, domain, protocol, 0,
1092
 
                                    resolve_callback, NULL) == NULL)
 
1759
    if(avahi_s_service_resolver_new(((mandos_context*)mc)->server,
 
1760
                                    interface, protocol, name, type,
 
1761
                                    domain, protocol, 0,
 
1762
                                    resolve_callback, mc) == NULL)
1093
1763
      fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1094
1764
                   " %s\n", name,
1095
 
                   avahi_strerror(avahi_server_errno(mc.server)));
 
1765
                   avahi_strerror(avahi_server_errno
 
1766
                                  (((mandos_context*)mc)->server)));
1096
1767
    break;
1097
1768
    
1098
1769
  case AVAHI_BROWSER_REMOVE:
1117
1788
  signal_received = sig;
1118
1789
  int old_errno = errno;
1119
1790
  /* set main loop to exit */
1120
 
  if(mc.simple_poll != NULL){
1121
 
    avahi_simple_poll_quit(mc.simple_poll);
 
1791
  if(simple_poll != NULL){
 
1792
    avahi_simple_poll_quit(simple_poll);
1122
1793
  }
1123
1794
  errno = old_errno;
1124
1795
}
1125
1796
 
 
1797
__attribute__((nonnull, warn_unused_result))
1126
1798
bool get_flags(const char *ifname, struct ifreq *ifr){
1127
1799
  int ret;
1128
 
  error_t ret_errno;
 
1800
  int old_errno;
1129
1801
  
1130
1802
  int s = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1131
1803
  if(s < 0){
1132
 
    ret_errno = errno;
 
1804
    old_errno = errno;
1133
1805
    perror_plus("socket");
1134
 
    errno = ret_errno;
 
1806
    errno = old_errno;
1135
1807
    return false;
1136
1808
  }
1137
 
  strcpy(ifr->ifr_name, ifname);
 
1809
  strncpy(ifr->ifr_name, ifname, IF_NAMESIZE);
 
1810
  ifr->ifr_name[IF_NAMESIZE-1] = '\0'; /* NUL terminate */
1138
1811
  ret = ioctl(s, SIOCGIFFLAGS, ifr);
1139
1812
  if(ret == -1){
1140
1813
    if(debug){
1141
 
      ret_errno = errno;
 
1814
      old_errno = errno;
1142
1815
      perror_plus("ioctl SIOCGIFFLAGS");
1143
 
      errno = ret_errno;
 
1816
      errno = old_errno;
 
1817
    }
 
1818
    if((close(s) == -1) and debug){
 
1819
      old_errno = errno;
 
1820
      perror_plus("close");
 
1821
      errno = old_errno;
1144
1822
    }
1145
1823
    return false;
1146
1824
  }
 
1825
  if((close(s) == -1) and debug){
 
1826
    old_errno = errno;
 
1827
    perror_plus("close");
 
1828
    errno = old_errno;
 
1829
  }
1147
1830
  return true;
1148
1831
}
1149
1832
 
 
1833
__attribute__((nonnull, warn_unused_result))
1150
1834
bool good_flags(const char *ifname, const struct ifreq *ifr){
1151
1835
  
1152
1836
  /* Reject the loopback device */
1194
1878
 * corresponds to an acceptable network device.
1195
1879
 * (This function is passed to scandir(3) as a filter function.)
1196
1880
 */
 
1881
__attribute__((nonnull, warn_unused_result))
1197
1882
int good_interface(const struct dirent *if_entry){
1198
1883
  if(if_entry->d_name[0] == '.'){
1199
1884
    return 0;
1217
1902
/* 
1218
1903
 * This function determines if a network interface is up.
1219
1904
 */
 
1905
__attribute__((nonnull, warn_unused_result))
1220
1906
bool interface_is_up(const char *interface){
1221
1907
  struct ifreq ifr;
1222
1908
  if(not get_flags(interface, &ifr)){
1233
1919
/* 
1234
1920
 * This function determines if a network interface is running
1235
1921
 */
 
1922
__attribute__((nonnull, warn_unused_result))
1236
1923
bool interface_is_running(const char *interface){
1237
1924
  struct ifreq ifr;
1238
1925
  if(not get_flags(interface, &ifr)){
1246
1933
  return (bool)(ifr.ifr_flags & IFF_RUNNING);
1247
1934
}
1248
1935
 
 
1936
__attribute__((nonnull, pure, warn_unused_result))
1249
1937
int notdotentries(const struct dirent *direntry){
1250
1938
  /* Skip "." and ".." */
1251
1939
  if(direntry->d_name[0] == '.'
1258
1946
}
1259
1947
 
1260
1948
/* Is this directory entry a runnable program? */
 
1949
__attribute__((nonnull, warn_unused_result))
1261
1950
int runnable_hook(const struct dirent *direntry){
1262
1951
  int ret;
1263
1952
  size_t sret;
1271
1960
  sret = strspn(direntry->d_name, "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
1272
1961
                "abcdefghijklmnopqrstuvwxyz"
1273
1962
                "0123456789"
1274
 
                "_-");
 
1963
                "_.-");
1275
1964
  if((direntry->d_name)[sret] != '\0'){
1276
1965
    /* Contains non-allowed characters */
1277
1966
    if(debug){
1281
1970
    return 0;
1282
1971
  }
1283
1972
  
1284
 
  char *fullname = NULL;
1285
 
  ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
1286
 
  if(ret < 0){
1287
 
    perror_plus("asprintf");
1288
 
    return 0;
1289
 
  }
1290
 
  
1291
 
  ret = stat(fullname, &st);
 
1973
  ret = fstatat(hookdir_fd, direntry->d_name, &st, 0);
1292
1974
  if(ret == -1){
1293
1975
    if(debug){
1294
1976
      perror_plus("Could not stat hook");
1318
2000
  return 1;
1319
2001
}
1320
2002
 
1321
 
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval){
 
2003
__attribute__((nonnull, warn_unused_result))
 
2004
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
 
2005
                            mandos_context *mc){
1322
2006
  int ret;
1323
2007
  struct timespec now;
1324
2008
  struct timespec waited_time;
1325
2009
  intmax_t block_time;
1326
2010
  
1327
2011
  while(true){
1328
 
    if(mc.current_server == NULL){
1329
 
      if (debug){
 
2012
    if(mc->current_server == NULL){
 
2013
      if(debug){
1330
2014
        fprintf_plus(stderr, "Wait until first server is found."
1331
2015
                     " No timeout!\n");
1332
2016
      }
1333
2017
      ret = avahi_simple_poll_iterate(s, -1);
1334
2018
    } else {
1335
 
      if (debug){
 
2019
      if(debug){
1336
2020
        fprintf_plus(stderr, "Check current_server if we should run"
1337
2021
                     " it, or wait\n");
1338
2022
      }
1345
2029
      /* Calculating in ms how long time between now and server
1346
2030
         who we visted longest time ago. Now - last seen.  */
1347
2031
      waited_time.tv_sec = (now.tv_sec
1348
 
                            - mc.current_server->last_seen.tv_sec);
 
2032
                            - mc->current_server->last_seen.tv_sec);
1349
2033
      waited_time.tv_nsec = (now.tv_nsec
1350
 
                             - mc.current_server->last_seen.tv_nsec);
 
2034
                             - mc->current_server->last_seen.tv_nsec);
1351
2035
      /* total time is 10s/10,000ms.
1352
2036
         Converting to s from ms by dividing by 1,000,
1353
2037
         and ns to ms by dividing by 1,000,000. */
1355
2039
                     - ((intmax_t)waited_time.tv_sec * 1000))
1356
2040
                    - ((intmax_t)waited_time.tv_nsec / 1000000));
1357
2041
      
1358
 
      if (debug){
 
2042
      if(debug){
1359
2043
        fprintf_plus(stderr, "Blocking for %" PRIdMAX " ms\n",
1360
2044
                     block_time);
1361
2045
      }
1362
2046
      
1363
2047
      if(block_time <= 0){
1364
 
        ret = start_mandos_communication(mc.current_server->ip,
1365
 
                                         mc.current_server->port,
1366
 
                                         mc.current_server->if_index,
1367
 
                                         mc.current_server->af);
 
2048
        ret = start_mandos_communication(mc->current_server->ip,
 
2049
                                         mc->current_server->port,
 
2050
                                         mc->current_server->if_index,
 
2051
                                         mc->current_server->af, mc);
1368
2052
        if(ret == 0){
1369
 
          avahi_simple_poll_quit(mc.simple_poll);
 
2053
          avahi_simple_poll_quit(s);
1370
2054
          return 0;
1371
2055
        }
1372
2056
        ret = clock_gettime(CLOCK_MONOTONIC,
1373
 
                            &mc.current_server->last_seen);
 
2057
                            &mc->current_server->last_seen);
1374
2058
        if(ret == -1){
1375
2059
          perror_plus("clock_gettime");
1376
2060
          return -1;
1377
2061
        }
1378
 
        mc.current_server = mc.current_server->next;
 
2062
        mc->current_server = mc->current_server->next;
1379
2063
        block_time = 0;         /* Call avahi to find new Mandos
1380
2064
                                   servers, but don't block */
1381
2065
      }
1383
2067
      ret = avahi_simple_poll_iterate(s, (int)block_time);
1384
2068
    }
1385
2069
    if(ret != 0){
1386
 
      if (ret > 0 or errno != EINTR){
 
2070
      if(ret > 0 or errno != EINTR){
1387
2071
        return (ret != 1) ? ret : 0;
1388
2072
      }
1389
2073
    }
1390
2074
  }
1391
2075
}
1392
2076
 
1393
 
/* Set effective uid to 0, return errno */
1394
 
error_t raise_privileges(void){
1395
 
  error_t old_errno = errno;
1396
 
  error_t ret_errno = 0;
1397
 
  if(seteuid(0) == -1){
1398
 
    ret_errno = errno;
1399
 
    perror_plus("seteuid");
1400
 
  }
1401
 
  errno = old_errno;
1402
 
  return ret_errno;
1403
 
}
1404
 
 
1405
 
/* Set effective and real user ID to 0.  Return errno. */
1406
 
error_t raise_privileges_permanently(void){
1407
 
  error_t old_errno = errno;
1408
 
  error_t ret_errno = raise_privileges();
1409
 
  if(ret_errno != 0){
1410
 
    errno = old_errno;
1411
 
    return ret_errno;
1412
 
  }
1413
 
  if(setuid(0) == -1){
1414
 
    ret_errno = errno;
1415
 
    perror_plus("seteuid");
1416
 
  }
1417
 
  errno = old_errno;
1418
 
  return ret_errno;
1419
 
}
1420
 
 
1421
 
/* Set effective user ID to unprivileged saved user ID */
1422
 
error_t lower_privileges(void){
1423
 
  error_t old_errno = errno;
1424
 
  error_t ret_errno = 0;
1425
 
  if(seteuid(uid) == -1){
1426
 
    ret_errno = errno;
1427
 
    perror_plus("seteuid");
1428
 
  }
1429
 
  errno = old_errno;
1430
 
  return ret_errno;
1431
 
}
1432
 
 
1433
 
/* Lower privileges permanently */
1434
 
error_t lower_privileges_permanently(void){
1435
 
  error_t old_errno = errno;
1436
 
  error_t ret_errno = 0;
1437
 
  if(setuid(uid) == -1){
1438
 
    ret_errno = errno;
1439
 
    perror_plus("setuid");
1440
 
  }
1441
 
  errno = old_errno;
1442
 
  return ret_errno;
1443
 
}
1444
 
 
1445
 
bool run_network_hooks(const char *mode, const char *interface,
 
2077
__attribute__((nonnull))
 
2078
void run_network_hooks(const char *mode, const char *interface,
1446
2079
                       const float delay){
1447
 
  struct dirent **direntries;
 
2080
  struct dirent **direntries = NULL;
 
2081
  if(hookdir_fd == -1){
 
2082
    hookdir_fd = open(hookdir, O_RDONLY | O_DIRECTORY | O_PATH
 
2083
                      | O_CLOEXEC);
 
2084
    if(hookdir_fd == -1){
 
2085
      if(errno == ENOENT){
 
2086
        if(debug){
 
2087
          fprintf_plus(stderr, "Network hook directory \"%s\" not"
 
2088
                       " found\n", hookdir);
 
2089
        }
 
2090
      } else {
 
2091
        perror_plus("open");
 
2092
      }
 
2093
      return;
 
2094
    }
 
2095
  }
 
2096
  int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
 
2097
  if(devnull == -1){
 
2098
    perror_plus("open(\"/dev/null\", O_RDONLY)");
 
2099
    return;
 
2100
  }
 
2101
  int numhooks = scandirat(hookdir_fd, ".", &direntries,
 
2102
                           runnable_hook, alphasort);
 
2103
  if(numhooks == -1){
 
2104
    perror_plus("scandir");
 
2105
    close(devnull);
 
2106
    return;
 
2107
  }
1448
2108
  struct dirent *direntry;
1449
2109
  int ret;
1450
 
  int numhooks = scandir(hookdir, &direntries, runnable_hook,
1451
 
                         alphasort);
1452
 
  if(numhooks == -1){
1453
 
    if(errno == ENOENT){
1454
 
      if(debug){
1455
 
        fprintf_plus(stderr, "Network hook directory \"%s\" not"
1456
 
                     " found\n", hookdir);
1457
 
      }
1458
 
    } else {
1459
 
      perror_plus("scandir");
 
2110
  for(int i = 0; i < numhooks; i++){
 
2111
    direntry = direntries[i];
 
2112
    if(debug){
 
2113
      fprintf_plus(stderr, "Running network hook \"%s\"\n",
 
2114
                   direntry->d_name);
1460
2115
    }
1461
 
  } else {
1462
 
    int devnull = open("/dev/null", O_RDONLY);
1463
 
    for(int i = 0; i < numhooks; i++){
1464
 
      direntry = direntries[i];
1465
 
      char *fullname = NULL;
1466
 
      ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
1467
 
      if(ret < 0){
 
2116
    pid_t hook_pid = fork();
 
2117
    if(hook_pid == 0){
 
2118
      /* Child */
 
2119
      /* Raise privileges */
 
2120
      errno = raise_privileges_permanently();
 
2121
      if(errno != 0){
 
2122
        perror_plus("Failed to raise privileges");
 
2123
        _exit(EX_NOPERM);
 
2124
      }
 
2125
      /* Set group */
 
2126
      errno = 0;
 
2127
      ret = setgid(0);
 
2128
      if(ret == -1){
 
2129
        perror_plus("setgid");
 
2130
        _exit(EX_NOPERM);
 
2131
      }
 
2132
      /* Reset supplementary groups */
 
2133
      errno = 0;
 
2134
      ret = setgroups(0, NULL);
 
2135
      if(ret == -1){
 
2136
        perror_plus("setgroups");
 
2137
        _exit(EX_NOPERM);
 
2138
      }
 
2139
      ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
 
2140
      if(ret == -1){
 
2141
        perror_plus("setenv");
 
2142
        _exit(EX_OSERR);
 
2143
      }
 
2144
      ret = setenv("DEVICE", interface, 1);
 
2145
      if(ret == -1){
 
2146
        perror_plus("setenv");
 
2147
        _exit(EX_OSERR);
 
2148
      }
 
2149
      ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
 
2150
      if(ret == -1){
 
2151
        perror_plus("setenv");
 
2152
        _exit(EX_OSERR);
 
2153
      }
 
2154
      ret = setenv("MODE", mode, 1);
 
2155
      if(ret == -1){
 
2156
        perror_plus("setenv");
 
2157
        _exit(EX_OSERR);
 
2158
      }
 
2159
      char *delaystring;
 
2160
      ret = asprintf(&delaystring, "%f", (double)delay);
 
2161
      if(ret == -1){
1468
2162
        perror_plus("asprintf");
1469
 
        continue;
1470
 
      }
1471
 
      if(debug){
1472
 
        fprintf_plus(stderr, "Running network hook \"%s\"\n",
1473
 
                     direntry->d_name);
1474
 
      }
1475
 
      pid_t hook_pid = fork();
1476
 
      if(hook_pid == 0){
1477
 
        /* Child */
1478
 
        /* Raise privileges */
1479
 
        raise_privileges_permanently();
1480
 
        /* Set group */
1481
 
        errno = 0;
1482
 
        ret = setgid(0);
1483
 
        if(ret == -1){
1484
 
          perror_plus("setgid");
1485
 
        }
1486
 
        /* Reset supplementary groups */
1487
 
        errno = 0;
1488
 
        ret = setgroups(0, NULL);
1489
 
        if(ret == -1){
1490
 
          perror_plus("setgroups");
1491
 
        }
1492
 
        dup2(devnull, STDIN_FILENO);
1493
 
        close(devnull);
1494
 
        dup2(STDERR_FILENO, STDOUT_FILENO);
1495
 
        ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1496
 
        if(ret == -1){
1497
 
          perror_plus("setenv");
1498
 
          _exit(EX_OSERR);
1499
 
        }
1500
 
        ret = setenv("DEVICE", interface, 1);
1501
 
        if(ret == -1){
1502
 
          perror_plus("setenv");
1503
 
          _exit(EX_OSERR);
1504
 
        }
1505
 
        ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1506
 
        if(ret == -1){
1507
 
          perror_plus("setenv");
1508
 
          _exit(EX_OSERR);
1509
 
        }
1510
 
        ret = setenv("MODE", mode, 1);
1511
 
        if(ret == -1){
1512
 
          perror_plus("setenv");
1513
 
          _exit(EX_OSERR);
1514
 
        }
1515
 
        char *delaystring;
1516
 
        ret = asprintf(&delaystring, "%f", delay);
1517
 
        if(ret == -1){
1518
 
          perror_plus("asprintf");
1519
 
          _exit(EX_OSERR);
1520
 
        }
1521
 
        ret = setenv("DELAY", delaystring, 1);
1522
 
        if(ret == -1){
1523
 
          free(delaystring);
1524
 
          perror_plus("setenv");
1525
 
          _exit(EX_OSERR);
1526
 
        }
 
2163
        _exit(EX_OSERR);
 
2164
      }
 
2165
      ret = setenv("DELAY", delaystring, 1);
 
2166
      if(ret == -1){
1527
2167
        free(delaystring);
1528
 
        if(connect_to != NULL){
1529
 
          ret = setenv("CONNECT", connect_to, 1);
1530
 
          if(ret == -1){
1531
 
            perror_plus("setenv");
1532
 
            _exit(EX_OSERR);
1533
 
          }
1534
 
        }
1535
 
        if(execl(fullname, direntry->d_name, mode, NULL) == -1){
1536
 
          perror_plus("execl");
1537
 
          _exit(EXIT_FAILURE);
1538
 
        }
 
2168
        perror_plus("setenv");
 
2169
        _exit(EX_OSERR);
 
2170
      }
 
2171
      free(delaystring);
 
2172
      if(connect_to != NULL){
 
2173
        ret = setenv("CONNECT", connect_to, 1);
 
2174
        if(ret == -1){
 
2175
          perror_plus("setenv");
 
2176
          _exit(EX_OSERR);
 
2177
        }
 
2178
      }
 
2179
      int hook_fd = (int)TEMP_FAILURE_RETRY(openat(hookdir_fd,
 
2180
                                                   direntry->d_name,
 
2181
                                                   O_RDONLY));
 
2182
      if(hook_fd == -1){
 
2183
        perror_plus("openat");
 
2184
        _exit(EXIT_FAILURE);
 
2185
      }
 
2186
      if(close(hookdir_fd) == -1){
 
2187
        perror_plus("close");
 
2188
        _exit(EXIT_FAILURE);
 
2189
      }
 
2190
      ret = dup2(devnull, STDIN_FILENO);
 
2191
      if(ret == -1){
 
2192
        perror_plus("dup2(devnull, STDIN_FILENO)");
 
2193
        _exit(EX_OSERR);
 
2194
      }
 
2195
      ret = close(devnull);
 
2196
      if(ret == -1){
 
2197
        perror_plus("close");
 
2198
        _exit(EX_OSERR);
 
2199
      }
 
2200
      ret = dup2(STDERR_FILENO, STDOUT_FILENO);
 
2201
      if(ret == -1){
 
2202
        perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
 
2203
        _exit(EX_OSERR);
 
2204
      }
 
2205
      if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
 
2206
                 environ) == -1){
 
2207
        perror_plus("fexecve");
 
2208
        _exit(EXIT_FAILURE);
 
2209
      }
 
2210
    } else {
 
2211
      if(hook_pid == -1){
 
2212
        perror_plus("fork");
 
2213
        free(direntry);
 
2214
        continue;
 
2215
      }
 
2216
      int status;
 
2217
      if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
 
2218
        perror_plus("waitpid");
 
2219
        free(direntry);
 
2220
        continue;
 
2221
      }
 
2222
      if(WIFEXITED(status)){
 
2223
        if(WEXITSTATUS(status) != 0){
 
2224
          fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
 
2225
                       " with status %d\n", direntry->d_name,
 
2226
                       WEXITSTATUS(status));
 
2227
          free(direntry);
 
2228
          continue;
 
2229
        }
 
2230
      } else if(WIFSIGNALED(status)){
 
2231
        fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
 
2232
                     " signal %d\n", direntry->d_name,
 
2233
                     WTERMSIG(status));
 
2234
        free(direntry);
 
2235
        continue;
1539
2236
      } else {
1540
 
        int status;
1541
 
        if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1542
 
          perror_plus("waitpid");
1543
 
          free(fullname);
1544
 
          continue;
1545
 
        }
1546
 
        if(WIFEXITED(status)){
1547
 
          if(WEXITSTATUS(status) != 0){
1548
 
            fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1549
 
                         " with status %d\n", direntry->d_name,
1550
 
                         WEXITSTATUS(status));
1551
 
            free(fullname);
1552
 
            continue;
1553
 
          }
1554
 
        } else if(WIFSIGNALED(status)){
1555
 
          fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1556
 
                       " signal %d\n", direntry->d_name,
1557
 
                       WTERMSIG(status));
1558
 
          free(fullname);
1559
 
          continue;
1560
 
        } else {
1561
 
          fprintf_plus(stderr, "Warning: network hook \"%s\""
1562
 
                       " crashed\n", direntry->d_name);
1563
 
          free(fullname);
1564
 
          continue;
1565
 
        }
1566
 
      }
1567
 
      free(fullname);
1568
 
      if(debug){
1569
 
        fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1570
 
                     direntry->d_name);
1571
 
      }
1572
 
    }
1573
 
    close(devnull);
1574
 
  }
1575
 
  return true;
 
2237
        fprintf_plus(stderr, "Warning: network hook \"%s\""
 
2238
                     " crashed\n", direntry->d_name);
 
2239
        free(direntry);
 
2240
        continue;
 
2241
      }
 
2242
    }
 
2243
    if(debug){
 
2244
      fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
 
2245
                   direntry->d_name);
 
2246
    }
 
2247
    free(direntry);
 
2248
  }
 
2249
  free(direntries);
 
2250
  if(close(hookdir_fd) == -1){
 
2251
    perror_plus("close");
 
2252
  } else {
 
2253
    hookdir_fd = -1;
 
2254
  }
 
2255
  close(devnull);
1576
2256
}
1577
2257
 
1578
 
error_t bring_up_interface(const char *const interface,
1579
 
                           const float delay){
1580
 
  int sd = -1;
1581
 
  error_t old_errno = errno;
1582
 
  error_t ret_errno = 0;
1583
 
  int ret, ret_setflags;
 
2258
__attribute__((nonnull, warn_unused_result))
 
2259
int bring_up_interface(const char *const interface,
 
2260
                       const float delay){
 
2261
  int old_errno = errno;
 
2262
  int ret;
1584
2263
  struct ifreq network;
1585
2264
  unsigned int if_index = if_nametoindex(interface);
1586
2265
  if(if_index == 0){
1595
2274
  }
1596
2275
  
1597
2276
  if(not interface_is_up(interface)){
1598
 
    if(not get_flags(interface, &network) and debug){
 
2277
    int ret_errno = 0;
 
2278
    int ioctl_errno = 0;
 
2279
    if(not get_flags(interface, &network)){
1599
2280
      ret_errno = errno;
1600
2281
      fprintf_plus(stderr, "Failed to get flags for interface "
1601
2282
                   "\"%s\"\n", interface);
 
2283
      errno = old_errno;
1602
2284
      return ret_errno;
1603
2285
    }
1604
 
    network.ifr_flags |= IFF_UP;
 
2286
    network.ifr_flags |= IFF_UP; /* set flag */
1605
2287
    
1606
 
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1607
 
    if(sd < 0){
 
2288
    int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
2289
    if(sd == -1){
1608
2290
      ret_errno = errno;
1609
2291
      perror_plus("socket");
1610
2292
      errno = old_errno;
1611
2293
      return ret_errno;
1612
2294
    }
1613
 
  
 
2295
    
1614
2296
    if(quit_now){
1615
 
      close(sd);
 
2297
      ret = close(sd);
 
2298
      if(ret == -1){
 
2299
        perror_plus("close");
 
2300
      }
1616
2301
      errno = old_errno;
1617
2302
      return EINTR;
1618
2303
    }
1622
2307
                   interface);
1623
2308
    }
1624
2309
    
1625
 
    /* Raise priviliges */
1626
 
    raise_privileges();
 
2310
    /* Raise privileges */
 
2311
    ret_errno = raise_privileges();
 
2312
    if(ret_errno != 0){
 
2313
      errno = ret_errno;
 
2314
      perror_plus("Failed to raise privileges");
 
2315
    }
1627
2316
    
1628
2317
#ifdef __linux__
1629
 
    /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1630
 
       messages about the network interface to mess up the prompt */
1631
 
    int ret_linux = klogctl(8, NULL, 5);
1632
 
    bool restore_loglevel = true;
1633
 
    if(ret_linux == -1){
1634
 
      restore_loglevel = false;
1635
 
      perror_plus("klogctl");
 
2318
    int ret_linux;
 
2319
    bool restore_loglevel = false;
 
2320
    if(ret_errno == 0){
 
2321
      /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
 
2322
         messages about the network interface to mess up the prompt */
 
2323
      ret_linux = klogctl(8, NULL, 5);
 
2324
      if(ret_linux == -1){
 
2325
        perror_plus("klogctl");
 
2326
      } else {
 
2327
        restore_loglevel = true;
 
2328
      }
1636
2329
    }
1637
2330
#endif  /* __linux__ */
1638
 
    ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1639
 
    ret_errno = errno;
 
2331
    int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
2332
    ioctl_errno = errno;
1640
2333
#ifdef __linux__
1641
2334
    if(restore_loglevel){
1642
2335
      ret_linux = klogctl(7, NULL, 0);
1646
2339
    }
1647
2340
#endif  /* __linux__ */
1648
2341
    
1649
 
    /* Lower privileges */
1650
 
    lower_privileges();
 
2342
    /* If raise_privileges() succeeded above */
 
2343
    if(ret_errno == 0){
 
2344
      /* Lower privileges */
 
2345
      ret_errno = lower_privileges();
 
2346
      if(ret_errno != 0){
 
2347
        errno = ret_errno;
 
2348
        perror_plus("Failed to lower privileges");
 
2349
      }
 
2350
    }
1651
2351
    
1652
2352
    /* Close the socket */
1653
 
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2353
    ret = close(sd);
1654
2354
    if(ret == -1){
1655
2355
      perror_plus("close");
1656
2356
    }
1657
2357
    
1658
2358
    if(ret_setflags == -1){
1659
 
      errno = ret_errno;
 
2359
      errno = ioctl_errno;
1660
2360
      perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1661
2361
      errno = old_errno;
1662
 
      return ret_errno;
 
2362
      return ioctl_errno;
1663
2363
    }
1664
2364
  } else if(debug){
1665
2365
    fprintf_plus(stderr, "Interface \"%s\" is already up; good\n",
1668
2368
  
1669
2369
  /* Sleep checking until interface is running.
1670
2370
     Check every 0.25s, up to total time of delay */
1671
 
  for(int i=0; i < delay * 4; i++){
 
2371
  for(int i = 0; i < delay * 4; i++){
1672
2372
    if(interface_is_running(interface)){
1673
2373
      break;
1674
2374
    }
1683
2383
  return 0;
1684
2384
}
1685
2385
 
1686
 
error_t take_down_interface(const char *const interface){
1687
 
  int sd = -1;
1688
 
  error_t old_errno = errno;
1689
 
  error_t ret_errno = 0;
1690
 
  int ret, ret_setflags;
 
2386
__attribute__((nonnull, warn_unused_result))
 
2387
int take_down_interface(const char *const interface){
 
2388
  int old_errno = errno;
1691
2389
  struct ifreq network;
1692
2390
  unsigned int if_index = if_nametoindex(interface);
1693
2391
  if(if_index == 0){
1696
2394
    return ENXIO;
1697
2395
  }
1698
2396
  if(interface_is_up(interface)){
 
2397
    int ret_errno = 0;
 
2398
    int ioctl_errno = 0;
1699
2399
    if(not get_flags(interface, &network) and debug){
1700
2400
      ret_errno = errno;
1701
2401
      fprintf_plus(stderr, "Failed to get flags for interface "
1702
2402
                   "\"%s\"\n", interface);
 
2403
      errno = old_errno;
1703
2404
      return ret_errno;
1704
2405
    }
1705
2406
    network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1706
2407
    
1707
 
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1708
 
    if(sd < 0){
 
2408
    int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
2409
    if(sd == -1){
1709
2410
      ret_errno = errno;
1710
2411
      perror_plus("socket");
1711
2412
      errno = old_errno;
1717
2418
                   interface);
1718
2419
    }
1719
2420
    
1720
 
    /* Raise priviliges */
1721
 
    raise_privileges();
1722
 
    
1723
 
    ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1724
 
    ret_errno = errno;
1725
 
    
1726
 
    /* Lower privileges */
1727
 
    lower_privileges();
 
2421
    /* Raise privileges */
 
2422
    ret_errno = raise_privileges();
 
2423
    if(ret_errno != 0){
 
2424
      errno = ret_errno;
 
2425
      perror_plus("Failed to raise privileges");
 
2426
    }
 
2427
    
 
2428
    int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
2429
    ioctl_errno = errno;
 
2430
    
 
2431
    /* If raise_privileges() succeeded above */
 
2432
    if(ret_errno == 0){
 
2433
      /* Lower privileges */
 
2434
      ret_errno = lower_privileges();
 
2435
      if(ret_errno != 0){
 
2436
        errno = ret_errno;
 
2437
        perror_plus("Failed to lower privileges");
 
2438
      }
 
2439
    }
1728
2440
    
1729
2441
    /* Close the socket */
1730
 
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2442
    int ret = close(sd);
1731
2443
    if(ret == -1){
1732
2444
      perror_plus("close");
1733
2445
    }
1734
2446
    
1735
2447
    if(ret_setflags == -1){
1736
 
      errno = ret_errno;
 
2448
      errno = ioctl_errno;
1737
2449
      perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
1738
2450
      errno = old_errno;
1739
 
      return ret_errno;
 
2451
      return ioctl_errno;
1740
2452
    }
1741
2453
  } else if(debug){
1742
2454
    fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
1748
2460
}
1749
2461
 
1750
2462
int main(int argc, char *argv[]){
 
2463
  mandos_context mc = { .server = NULL, .dh_bits = 0,
 
2464
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2465
                        .priority = "SECURE128:!CTYPE-X.509"
 
2466
                        ":+CTYPE-RAWPK:!RSA:!VERS-ALL:+VERS-TLS1.3"
 
2467
                        ":%PROFILE_ULTRA",
 
2468
#elif GNUTLS_VERSION_NUMBER < 0x030600
 
2469
                        .priority = "SECURE256:!CTYPE-X.509"
 
2470
                        ":+CTYPE-OPENPGP:!RSA:+SIGN-DSA-SHA256",
 
2471
#else
 
2472
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
2473
#endif
 
2474
                        .current_server = NULL, .interfaces = NULL,
 
2475
                        .interfaces_size = 0 };
1751
2476
  AvahiSServiceBrowser *sb = NULL;
1752
2477
  error_t ret_errno;
1753
2478
  int ret;
1754
2479
  intmax_t tmpmax;
1755
2480
  char *tmp;
1756
2481
  int exitcode = EXIT_SUCCESS;
1757
 
  char *interfaces = NULL;
1758
 
  size_t interfaces_size = 0;
1759
2482
  char *interfaces_to_take_down = NULL;
1760
2483
  size_t interfaces_to_take_down_size = 0;
1761
 
  char tempdir[] = "/tmp/mandosXXXXXX";
1762
 
  bool tempdir_created = false;
 
2484
  char run_tempdir[] = "/run/tmp/mandosXXXXXX";
 
2485
  char old_tempdir[] = "/tmp/mandosXXXXXX";
 
2486
  char *tempdir = NULL;
1763
2487
  AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
1764
2488
  const char *seckey = PATHDIR "/" SECKEY;
1765
2489
  const char *pubkey = PATHDIR "/" PUBKEY;
 
2490
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2491
  const char *tls_privkey = PATHDIR "/" TLS_PRIVKEY;
 
2492
  const char *tls_pubkey = PATHDIR "/" TLS_PUBKEY;
 
2493
#endif
 
2494
  const char *dh_params_file = NULL;
1766
2495
  char *interfaces_hooks = NULL;
1767
 
  size_t interfaces_hooks_size = 0;
1768
2496
  
1769
2497
  bool gnutls_initialized = false;
1770
2498
  bool gpgme_initialized = false;
1816
2544
      { .name = "pubkey", .key = 'p',
1817
2545
        .arg = "FILE",
1818
2546
        .doc = "OpenPGP public key file base name",
1819
 
        .group = 2 },
 
2547
        .group = 1 },
 
2548
      { .name = "tls-privkey", .key = 't',
 
2549
        .arg = "FILE",
 
2550
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2551
        .doc = "TLS private key file base name",
 
2552
#else
 
2553
        .doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
 
2554
#endif
 
2555
        .group = 1 },
 
2556
      { .name = "tls-pubkey", .key = 'T',
 
2557
        .arg = "FILE",
 
2558
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2559
        .doc = "TLS public key file base name",
 
2560
#else
 
2561
        .doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
 
2562
#endif
 
2563
        .group = 1 },
1820
2564
      { .name = "dh-bits", .key = 129,
1821
2565
        .arg = "BITS",
1822
2566
        .doc = "Bit length of the prime number used in the"
1823
2567
        " Diffie-Hellman key exchange",
1824
2568
        .group = 2 },
 
2569
      { .name = "dh-params", .key = 134,
 
2570
        .arg = "FILE",
 
2571
        .doc = "PEM-encoded PKCS#3 file with pre-generated parameters"
 
2572
        " for the Diffie-Hellman key exchange",
 
2573
        .group = 2 },
1825
2574
      { .name = "priority", .key = 130,
1826
2575
        .arg = "STRING",
1827
2576
        .doc = "GnuTLS priority string for the TLS handshake",
1861
2610
        connect_to = arg;
1862
2611
        break;
1863
2612
      case 'i':                 /* --interface */
1864
 
        ret_errno = argz_add_sep(&interfaces, &interfaces_size, arg,
1865
 
                                 (int)',');
 
2613
        ret_errno = argz_add_sep(&mc.interfaces, &mc.interfaces_size,
 
2614
                                 arg, (int)',');
1866
2615
        if(ret_errno != 0){
1867
2616
          argp_error(state, "%s", strerror(ret_errno));
1868
2617
        }
1873
2622
      case 'p':                 /* --pubkey */
1874
2623
        pubkey = arg;
1875
2624
        break;
 
2625
      case 't':                 /* --tls-privkey */
 
2626
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2627
        tls_privkey = arg;
 
2628
#endif
 
2629
        break;
 
2630
      case 'T':                 /* --tls-pubkey */
 
2631
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2632
        tls_pubkey = arg;
 
2633
#endif
 
2634
        break;
1876
2635
      case 129:                 /* --dh-bits */
1877
2636
        errno = 0;
1878
2637
        tmpmax = strtoimax(arg, &tmp, 10);
1882
2641
        }
1883
2642
        mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
1884
2643
        break;
 
2644
      case 134:                 /* --dh-params */
 
2645
        dh_params_file = arg;
 
2646
        break;
1885
2647
      case 130:                 /* --priority */
1886
2648
        mc.priority = arg;
1887
2649
        break;
1927
2689
                         .args_doc = "",
1928
2690
                         .doc = "Mandos client -- Get and decrypt"
1929
2691
                         " passwords from a Mandos server" };
1930
 
    ret = argp_parse(&argp, argc, argv,
1931
 
                     ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
1932
 
    switch(ret){
 
2692
    ret_errno = argp_parse(&argp, argc, argv,
 
2693
                           ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
 
2694
    switch(ret_errno){
1933
2695
    case 0:
1934
2696
      break;
1935
2697
    case ENOMEM:
1936
2698
    default:
1937
 
      errno = ret;
 
2699
      errno = ret_errno;
1938
2700
      perror_plus("argp_parse");
1939
2701
      exitcode = EX_OSERR;
1940
2702
      goto end;
1943
2705
      goto end;
1944
2706
    }
1945
2707
  }
1946
 
    
 
2708
  
1947
2709
  {
1948
2710
    /* Work around Debian bug #633582:
1949
 
       <http://bugs.debian.org/633582> */
 
2711
       <https://bugs.debian.org/633582> */
1950
2712
    
1951
 
    /* Re-raise priviliges */
1952
 
    if(raise_privileges() == 0){
 
2713
    /* Re-raise privileges */
 
2714
    ret = raise_privileges();
 
2715
    if(ret != 0){
 
2716
      errno = ret;
 
2717
      perror_plus("Failed to raise privileges");
 
2718
    } else {
1953
2719
      struct stat st;
1954
2720
      
1955
2721
      if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
1969
2735
              }
1970
2736
            }
1971
2737
          }
1972
 
          TEMP_FAILURE_RETRY(close(seckey_fd));
 
2738
          close(seckey_fd);
1973
2739
        }
1974
2740
      }
1975
 
    
 
2741
      
1976
2742
      if(strcmp(pubkey, PATHDIR "/" PUBKEY) == 0){
1977
2743
        int pubkey_fd = open(pubkey, O_RDONLY);
1978
2744
        if(pubkey_fd == -1){
1990
2756
              }
1991
2757
            }
1992
2758
          }
1993
 
          TEMP_FAILURE_RETRY(close(pubkey_fd));
1994
 
        }
1995
 
      }
1996
 
    
 
2759
          close(pubkey_fd);
 
2760
        }
 
2761
      }
 
2762
      
 
2763
      if(dh_params_file != NULL
 
2764
         and strcmp(dh_params_file, PATHDIR "/dhparams.pem" ) == 0){
 
2765
        int dhparams_fd = open(dh_params_file, O_RDONLY);
 
2766
        if(dhparams_fd == -1){
 
2767
          perror_plus("open");
 
2768
        } else {
 
2769
          ret = (int)TEMP_FAILURE_RETRY(fstat(dhparams_fd, &st));
 
2770
          if(ret == -1){
 
2771
            perror_plus("fstat");
 
2772
          } else {
 
2773
            if(S_ISREG(st.st_mode)
 
2774
               and st.st_uid == 0 and st.st_gid == 0){
 
2775
              ret = fchown(dhparams_fd, uid, gid);
 
2776
              if(ret == -1){
 
2777
                perror_plus("fchown");
 
2778
              }
 
2779
            }
 
2780
          }
 
2781
          close(dhparams_fd);
 
2782
        }
 
2783
      }
 
2784
      
1997
2785
      /* Lower privileges */
1998
 
      errno = 0;
1999
 
      ret = seteuid(uid);
2000
 
      if(ret == -1){
2001
 
        perror_plus("seteuid");
 
2786
      ret = lower_privileges();
 
2787
      if(ret != 0){
 
2788
        errno = ret;
 
2789
        perror_plus("Failed to lower privileges");
2002
2790
      }
2003
2791
    }
2004
2792
  }
2005
2793
  
2006
 
  /* Remove empty interface names */
 
2794
  /* Remove invalid interface names (except "none") */
2007
2795
  {
2008
2796
    char *interface = NULL;
2009
 
    while((interface = argz_next(interfaces, interfaces_size,
 
2797
    while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2010
2798
                                 interface))){
2011
 
      if(if_nametoindex(interface) == 0){
2012
 
        if(interface[0] != '\0' and strcmp(interface, "none") != 0){
 
2799
      if(strcmp(interface, "none") != 0
 
2800
         and if_nametoindex(interface) == 0){
 
2801
        if(interface[0] != '\0'){
2013
2802
          fprintf_plus(stderr, "Not using nonexisting interface"
2014
2803
                       " \"%s\"\n", interface);
2015
2804
        }
2016
 
        argz_delete(&interfaces, &interfaces_size, interface);
 
2805
        argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
2017
2806
        interface = NULL;
2018
2807
      }
2019
2808
    }
2021
2810
  
2022
2811
  /* Run network hooks */
2023
2812
  {
2024
 
    
2025
 
    if(interfaces != NULL){
2026
 
      interfaces_hooks = malloc(interfaces_size);
 
2813
    if(mc.interfaces != NULL){
 
2814
      interfaces_hooks = malloc(mc.interfaces_size);
2027
2815
      if(interfaces_hooks == NULL){
2028
2816
        perror_plus("malloc");
2029
2817
        goto end;
2030
2818
      }
2031
 
      memcpy(interfaces_hooks, interfaces, interfaces_size);
2032
 
      interfaces_hooks_size = interfaces_size;
2033
 
      argz_stringify(interfaces_hooks, interfaces_hooks_size,
2034
 
                     (int)',');
2035
 
    }
2036
 
    if(not run_network_hooks("start", interfaces_hooks != NULL ?
2037
 
                             interfaces_hooks : "", delay)){
2038
 
      goto end;
2039
 
    }
 
2819
      memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
 
2820
      argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
 
2821
    }
 
2822
    run_network_hooks("start", interfaces_hooks != NULL ?
 
2823
                      interfaces_hooks : "", delay);
2040
2824
  }
2041
2825
  
2042
2826
  if(not debug){
2047
2831
     from the signal handler */
2048
2832
  /* Initialize the pseudo-RNG for Avahi */
2049
2833
  srand((unsigned int) time(NULL));
2050
 
  mc.simple_poll = avahi_simple_poll_new();
2051
 
  if(mc.simple_poll == NULL){
 
2834
  simple_poll = avahi_simple_poll_new();
 
2835
  if(simple_poll == NULL){
2052
2836
    fprintf_plus(stderr,
2053
2837
                 "Avahi: Failed to create simple poll object.\n");
2054
2838
    exitcode = EX_UNAVAILABLE;
2119
2903
  }
2120
2904
  
2121
2905
  /* If no interfaces were specified, make a list */
2122
 
  if(interfaces == NULL){
2123
 
    struct dirent **direntries;
 
2906
  if(mc.interfaces == NULL){
 
2907
    struct dirent **direntries = NULL;
2124
2908
    /* Look for any good interfaces */
2125
2909
    ret = scandir(sys_class_net, &direntries, good_interface,
2126
2910
                  alphasort);
2127
2911
    if(ret >= 1){
2128
2912
      /* Add all found interfaces to interfaces list */
2129
2913
      for(int i = 0; i < ret; ++i){
2130
 
        ret_errno = argz_add(&interfaces, &interfaces_size,
 
2914
        ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2131
2915
                             direntries[i]->d_name);
2132
2916
        if(ret_errno != 0){
 
2917
          errno = ret_errno;
2133
2918
          perror_plus("argz_add");
 
2919
          free(direntries[i]);
2134
2920
          continue;
2135
2921
        }
2136
2922
        if(debug){
2137
2923
          fprintf_plus(stderr, "Will use interface \"%s\"\n",
2138
2924
                       direntries[i]->d_name);
2139
2925
        }
 
2926
        free(direntries[i]);
2140
2927
      }
2141
2928
      free(direntries);
2142
2929
    } else {
2143
 
      free(direntries);
 
2930
      if(ret == 0){
 
2931
        free(direntries);
 
2932
      }
2144
2933
      fprintf_plus(stderr, "Could not find a network interface\n");
2145
2934
      exitcode = EXIT_FAILURE;
2146
2935
      goto end;
2147
2936
    }
2148
2937
  }
2149
2938
  
2150
 
  /* If we only got one interface, explicitly use only that one */
2151
 
  if(argz_count(interfaces, interfaces_size) == 1){
2152
 
    if(debug){
2153
 
      fprintf_plus(stderr, "Using only interface \"%s\"\n",
2154
 
                   interfaces);
2155
 
    }
2156
 
    if_index = (AvahiIfIndex)if_nametoindex(interfaces);
2157
 
  }
2158
 
  
2159
 
  /* Bring up interfaces which are down */
2160
 
  if(not (argz_count(interfaces, interfaces_size) == 1
2161
 
          and strcmp(interfaces, "none") == 0)){
 
2939
  /* Bring up interfaces which are down, and remove any "none"s */
 
2940
  {
2162
2941
    char *interface = NULL;
2163
 
    while((interface = argz_next(interfaces, interfaces_size,
 
2942
    while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2164
2943
                                 interface))){
 
2944
      /* If interface name is "none", stop bringing up interfaces.
 
2945
         Also remove all instances of "none" from the list */
 
2946
      if(strcmp(interface, "none") == 0){
 
2947
        argz_delete(&mc.interfaces, &mc.interfaces_size,
 
2948
                    interface);
 
2949
        interface = NULL;
 
2950
        while((interface = argz_next(mc.interfaces,
 
2951
                                     mc.interfaces_size, interface))){
 
2952
          if(strcmp(interface, "none") == 0){
 
2953
            argz_delete(&mc.interfaces, &mc.interfaces_size,
 
2954
                        interface);
 
2955
            interface = NULL;
 
2956
          }
 
2957
        }
 
2958
        break;
 
2959
      }
2165
2960
      bool interface_was_up = interface_is_up(interface);
2166
 
      ret = bring_up_interface(interface, delay);
 
2961
      errno = bring_up_interface(interface, delay);
2167
2962
      if(not interface_was_up){
2168
 
        if(ret != 0){
2169
 
          errno = ret;
2170
 
          perror_plus("Failed to bring up interface");
 
2963
        if(errno != 0){
 
2964
          fprintf_plus(stderr, "Failed to bring up interface \"%s\":"
 
2965
                       " %s\n", interface, strerror(errno));
2171
2966
        } else {
2172
 
          ret_errno = argz_add(&interfaces_to_take_down,
2173
 
                               &interfaces_to_take_down_size,
2174
 
                               interface);
 
2967
          errno = argz_add(&interfaces_to_take_down,
 
2968
                           &interfaces_to_take_down_size,
 
2969
                           interface);
 
2970
          if(errno != 0){
 
2971
            perror_plus("argz_add");
 
2972
          }
2175
2973
        }
2176
2974
      }
2177
2975
    }
2178
 
    free(interfaces);
2179
 
    interfaces = NULL;
2180
 
    interfaces_size = 0;
2181
2976
    if(debug and (interfaces_to_take_down == NULL)){
2182
2977
      fprintf_plus(stderr, "No interfaces were brought up\n");
2183
2978
    }
2184
2979
  }
2185
2980
  
 
2981
  /* If we only got one interface, explicitly use only that one */
 
2982
  if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
 
2983
    if(debug){
 
2984
      fprintf_plus(stderr, "Using only interface \"%s\"\n",
 
2985
                   mc.interfaces);
 
2986
    }
 
2987
    if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
 
2988
  }
 
2989
  
2186
2990
  if(quit_now){
2187
2991
    goto end;
2188
2992
  }
2189
2993
  
2190
 
  ret = init_gnutls_global(pubkey, seckey);
 
2994
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2995
  ret = init_gnutls_global(tls_pubkey, tls_privkey, dh_params_file, &mc);
 
2996
#elif GNUTLS_VERSION_NUMBER < 0x030600
 
2997
  ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
 
2998
#else
 
2999
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
3000
#endif
2191
3001
  if(ret == -1){
2192
3002
    fprintf_plus(stderr, "init_gnutls_global failed\n");
2193
3003
    exitcode = EX_UNAVAILABLE;
2200
3010
    goto end;
2201
3011
  }
2202
3012
  
2203
 
  if(mkdtemp(tempdir) == NULL){
 
3013
  /* Try /run/tmp before /tmp */
 
3014
  tempdir = mkdtemp(run_tempdir);
 
3015
  if(tempdir == NULL and errno == ENOENT){
 
3016
      if(debug){
 
3017
        fprintf_plus(stderr, "Tempdir %s did not work, trying %s\n",
 
3018
                     run_tempdir, old_tempdir);
 
3019
      }
 
3020
      tempdir = mkdtemp(old_tempdir);
 
3021
  }
 
3022
  if(tempdir == NULL){
2204
3023
    perror_plus("mkdtemp");
2205
3024
    goto end;
2206
3025
  }
2207
 
  tempdir_created = true;
2208
3026
  
2209
3027
  if(quit_now){
2210
3028
    goto end;
2211
3029
  }
2212
3030
  
2213
 
  if(not init_gpgme(pubkey, seckey, tempdir)){
 
3031
  if(not init_gpgme(pubkey, seckey, tempdir, &mc)){
2214
3032
    fprintf_plus(stderr, "init_gpgme failed\n");
2215
3033
    exitcode = EX_UNAVAILABLE;
2216
3034
    goto end;
2246
3064
      exitcode = EX_USAGE;
2247
3065
      goto end;
2248
3066
    }
2249
 
  
 
3067
    
2250
3068
    if(quit_now){
2251
3069
      goto end;
2252
3070
    }
2273
3091
    }
2274
3092
    
2275
3093
    while(not quit_now){
2276
 
      ret = start_mandos_communication(address, port, if_index, af);
 
3094
      ret = start_mandos_communication(address, port, if_index, af,
 
3095
                                       &mc);
2277
3096
      if(quit_now or ret == 0){
2278
3097
        break;
2279
3098
      }
2281
3100
        fprintf_plus(stderr, "Retrying in %d seconds\n",
2282
3101
                     (int)retry_interval);
2283
3102
      }
2284
 
      sleep((int)retry_interval);
 
3103
      sleep((unsigned int)retry_interval);
2285
3104
    }
2286
3105
    
2287
 
    if (not quit_now){
 
3106
    if(not quit_now){
2288
3107
      exitcode = EXIT_SUCCESS;
2289
3108
    }
2290
3109
    
2305
3124
    config.publish_domain = 0;
2306
3125
    
2307
3126
    /* Allocate a new server */
2308
 
    mc.server = avahi_server_new(avahi_simple_poll_get
2309
 
                                 (mc.simple_poll), &config, NULL,
2310
 
                                 NULL, &ret_errno);
 
3127
    mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
 
3128
                                 &config, NULL, NULL, &ret);
2311
3129
    
2312
3130
    /* Free the Avahi configuration data */
2313
3131
    avahi_server_config_free(&config);
2316
3134
  /* Check if creating the Avahi server object succeeded */
2317
3135
  if(mc.server == NULL){
2318
3136
    fprintf_plus(stderr, "Failed to create Avahi server: %s\n",
2319
 
                 avahi_strerror(ret_errno));
 
3137
                 avahi_strerror(ret));
2320
3138
    exitcode = EX_UNAVAILABLE;
2321
3139
    goto end;
2322
3140
  }
2328
3146
  /* Create the Avahi service browser */
2329
3147
  sb = avahi_s_service_browser_new(mc.server, if_index,
2330
3148
                                   AVAHI_PROTO_UNSPEC, "_mandos._tcp",
2331
 
                                   NULL, 0, browse_callback, NULL);
 
3149
                                   NULL, 0, browse_callback,
 
3150
                                   (void *)&mc);
2332
3151
  if(sb == NULL){
2333
3152
    fprintf_plus(stderr, "Failed to create service browser: %s\n",
2334
3153
                 avahi_strerror(avahi_server_errno(mc.server)));
2345
3164
  if(debug){
2346
3165
    fprintf_plus(stderr, "Starting Avahi loop search\n");
2347
3166
  }
2348
 
 
2349
 
  ret = avahi_loop_with_timeout(mc.simple_poll,
2350
 
                                (int)(retry_interval * 1000));
 
3167
  
 
3168
  ret = avahi_loop_with_timeout(simple_poll,
 
3169
                                (int)(retry_interval * 1000), &mc);
2351
3170
  if(debug){
2352
3171
    fprintf_plus(stderr, "avahi_loop_with_timeout exited %s\n",
2353
3172
                 (ret == 0) ? "successfully" : "with error");
2356
3175
 end:
2357
3176
  
2358
3177
  if(debug){
2359
 
    fprintf_plus(stderr, "%s exiting\n", argv[0]);
 
3178
    if(signal_received){
 
3179
      fprintf_plus(stderr, "%s exiting due to signal %d: %s\n",
 
3180
                   argv[0], signal_received,
 
3181
                   strsignal(signal_received));
 
3182
    } else {
 
3183
      fprintf_plus(stderr, "%s exiting\n", argv[0]);
 
3184
    }
2360
3185
  }
2361
3186
  
2362
3187
  /* Cleanup things */
 
3188
  free(mc.interfaces);
 
3189
  
2363
3190
  if(sb != NULL)
2364
3191
    avahi_s_service_browser_free(sb);
2365
3192
  
2366
3193
  if(mc.server != NULL)
2367
3194
    avahi_server_free(mc.server);
2368
3195
  
2369
 
  if(mc.simple_poll != NULL)
2370
 
    avahi_simple_poll_free(mc.simple_poll);
 
3196
  if(simple_poll != NULL)
 
3197
    avahi_simple_poll_free(simple_poll);
2371
3198
  
2372
3199
  if(gnutls_initialized){
2373
3200
    gnutls_certificate_free_credentials(mc.cred);
2374
 
    gnutls_global_deinit();
2375
3201
    gnutls_dh_params_deinit(mc.dh_params);
2376
3202
  }
2377
3203
  
2385
3211
    mc.current_server->prev->next = NULL;
2386
3212
    while(mc.current_server != NULL){
2387
3213
      server *next = mc.current_server->next;
 
3214
#ifdef __GNUC__
 
3215
#pragma GCC diagnostic push
 
3216
#pragma GCC diagnostic ignored "-Wcast-qual"
 
3217
#endif
 
3218
      free((char *)(mc.current_server->ip));
 
3219
#ifdef __GNUC__
 
3220
#pragma GCC diagnostic pop
 
3221
#endif
2388
3222
      free(mc.current_server);
2389
3223
      mc.current_server = next;
2390
3224
    }
2391
3225
  }
2392
3226
  
2393
 
  /* Re-raise priviliges */
 
3227
  /* Re-raise privileges */
2394
3228
  {
2395
 
    raise_privileges();
2396
 
    
2397
 
    /* Run network hooks */
2398
 
    run_network_hooks("stop", interfaces_hooks != NULL ?
2399
 
                      interfaces_hooks : "", delay);
2400
 
    
2401
 
    /* Take down the network interfaces which were brought up */
2402
 
    {
2403
 
      char *interface = NULL;
2404
 
      while((interface=argz_next(interfaces_to_take_down,
2405
 
                                 interfaces_to_take_down_size,
2406
 
                                 interface))){
2407
 
        ret_errno = take_down_interface(interface);
2408
 
        if(ret_errno != 0){
2409
 
          errno = ret_errno;
2410
 
          perror_plus("Failed to take down interface");
2411
 
        }
2412
 
      }
2413
 
      if(debug and (interfaces_to_take_down == NULL)){
2414
 
        fprintf_plus(stderr, "No interfaces needed to be taken"
2415
 
                     " down\n");
2416
 
      }
2417
 
    }
2418
 
    
2419
 
    lower_privileges_permanently();
 
3229
    ret = raise_privileges();
 
3230
    if(ret != 0){
 
3231
      errno = ret;
 
3232
      perror_plus("Failed to raise privileges");
 
3233
    } else {
 
3234
      
 
3235
      /* Run network hooks */
 
3236
      run_network_hooks("stop", interfaces_hooks != NULL ?
 
3237
                        interfaces_hooks : "", delay);
 
3238
      
 
3239
      /* Take down the network interfaces which were brought up */
 
3240
      {
 
3241
        char *interface = NULL;
 
3242
        while((interface = argz_next(interfaces_to_take_down,
 
3243
                                     interfaces_to_take_down_size,
 
3244
                                     interface))){
 
3245
          ret = take_down_interface(interface);
 
3246
          if(ret != 0){
 
3247
            errno = ret;
 
3248
            perror_plus("Failed to take down interface");
 
3249
          }
 
3250
        }
 
3251
        if(debug and (interfaces_to_take_down == NULL)){
 
3252
          fprintf_plus(stderr, "No interfaces needed to be taken"
 
3253
                       " down\n");
 
3254
        }
 
3255
      }
 
3256
    }
 
3257
    
 
3258
    ret = lower_privileges_permanently();
 
3259
    if(ret != 0){
 
3260
      errno = ret;
 
3261
      perror_plus("Failed to lower privileges permanently");
 
3262
    }
2420
3263
  }
2421
3264
  
2422
3265
  free(interfaces_to_take_down);
2423
3266
  free(interfaces_hooks);
2424
3267
  
 
3268
  void clean_dir_at(int base, const char * const dirname,
 
3269
                    uintmax_t level){
 
3270
    struct dirent **direntries = NULL;
 
3271
    int dret;
 
3272
    int dir_fd = (int)TEMP_FAILURE_RETRY(openat(base, dirname,
 
3273
                                                O_RDONLY
 
3274
                                                | O_NOFOLLOW
 
3275
                                                | O_DIRECTORY
 
3276
                                                | O_PATH));
 
3277
    if(dir_fd == -1){
 
3278
      perror_plus("open");
 
3279
      return;
 
3280
    }
 
3281
    int numentries = scandirat(dir_fd, ".", &direntries,
 
3282
                               notdotentries, alphasort);
 
3283
    if(numentries >= 0){
 
3284
      for(int i = 0; i < numentries; i++){
 
3285
        if(debug){
 
3286
          fprintf_plus(stderr, "Unlinking \"%s/%s\"\n",
 
3287
                       dirname, direntries[i]->d_name);
 
3288
        }
 
3289
        dret = unlinkat(dir_fd, direntries[i]->d_name, 0);
 
3290
        if(dret == -1){
 
3291
          if(errno == EISDIR){
 
3292
              dret = unlinkat(dir_fd, direntries[i]->d_name,
 
3293
                              AT_REMOVEDIR);
 
3294
          }         
 
3295
          if((dret == -1) and (errno == ENOTEMPTY)
 
3296
             and (strcmp(direntries[i]->d_name, "private-keys-v1.d")
 
3297
                  == 0) and (level == 0)){
 
3298
            /* Recurse only in this special case */
 
3299
            clean_dir_at(dir_fd, direntries[i]->d_name, level+1);
 
3300
            dret = 0;
 
3301
          }
 
3302
          if((dret == -1) and (errno != ENOENT)){
 
3303
            fprintf_plus(stderr, "unlink(\"%s/%s\"): %s\n", dirname,
 
3304
                         direntries[i]->d_name, strerror(errno));
 
3305
          }
 
3306
        }
 
3307
        free(direntries[i]);
 
3308
      }
 
3309
      
 
3310
      /* need to clean even if 0 because man page doesn't specify */
 
3311
      free(direntries);
 
3312
      dret = unlinkat(base, dirname, AT_REMOVEDIR);
 
3313
      if(dret == -1 and errno != ENOENT){
 
3314
        perror_plus("rmdir");
 
3315
      }
 
3316
    } else {
 
3317
      perror_plus("scandirat");
 
3318
    }
 
3319
    close(dir_fd);
 
3320
  }
 
3321
  
2425
3322
  /* Removes the GPGME temp directory and all files inside */
2426
 
  if(tempdir_created){
2427
 
    struct dirent **direntries = NULL;
2428
 
    struct dirent *direntry = NULL;
2429
 
    int numentries = scandir(tempdir, &direntries, notdotentries,
2430
 
                             alphasort);
2431
 
    if (numentries > 0){
2432
 
      for(int i = 0; i < numentries; i++){
2433
 
        direntry = direntries[i];
2434
 
        char *fullname = NULL;
2435
 
        ret = asprintf(&fullname, "%s/%s", tempdir,
2436
 
                       direntry->d_name);
2437
 
        if(ret < 0){
2438
 
          perror_plus("asprintf");
2439
 
          continue;
2440
 
        }
2441
 
        ret = remove(fullname);
2442
 
        if(ret == -1){
2443
 
          fprintf_plus(stderr, "remove(\"%s\"): %s\n", fullname,
2444
 
                       strerror(errno));
2445
 
        }
2446
 
        free(fullname);
2447
 
      }
2448
 
    }
2449
 
 
2450
 
    /* need to clean even if 0 because man page doesn't specify */
2451
 
    free(direntries);
2452
 
    if (numentries == -1){
2453
 
      perror_plus("scandir");
2454
 
    }
2455
 
    ret = rmdir(tempdir);
2456
 
    if(ret == -1 and errno != ENOENT){
2457
 
      perror_plus("rmdir");
2458
 
    }
 
3323
  if(tempdir != NULL){
 
3324
    clean_dir_at(-1, tempdir, 0);
2459
3325
  }
2460
3326
  
2461
3327
  if(quit_now){