32
32
/* Needed by GPGME, specifically gpgme_data_seek() */
 
33
 
#ifndef _LARGEFILE_SOURCE
 
34
33
#define _LARGEFILE_SOURCE
 
36
 
#ifndef _FILE_OFFSET_BITS
 
37
34
#define _FILE_OFFSET_BITS 64
 
40
36
#define _GNU_SOURCE             /* TEMP_FAILURE_RETRY(), asprintf() */
 
42
38
#include <stdio.h>              /* fprintf(), stderr, fwrite(),
 
43
 
                                   stdout, ferror(), remove() */
 
 
39
                                   stdout, ferror(), sscanf(),
 
44
41
#include <stdint.h>             /* uint16_t, uint32_t */
 
45
42
#include <stddef.h>             /* NULL, size_t, ssize_t */
 
46
43
#include <stdlib.h>             /* free(), EXIT_SUCCESS, EXIT_FAILURE,
 
48
 
#include <stdbool.h>            /* bool, false, true */
 
 
45
#include <stdbool.h>            /* bool, true */
 
49
46
#include <string.h>             /* memset(), strcmp(), strlen(),
 
50
47
                                   strerror(), asprintf(), strcpy() */
 
51
 
#include <sys/ioctl.h>          /* ioctl */
 
 
48
#include <sys/ioctl.h>          /* ioctl */
 
52
49
#include <sys/types.h>          /* socket(), inet_pton(), sockaddr,
 
53
50
                                   sockaddr_in6, PF_INET6,
 
54
 
                                   SOCK_STREAM, uid_t, gid_t, open(),
 
 
51
                                   SOCK_STREAM, INET6_ADDRSTRLEN,
 
 
52
                                   uid_t, gid_t, open(), opendir(),
 
56
54
#include <sys/stat.h>           /* open() */
 
57
55
#include <sys/socket.h>         /* socket(), struct sockaddr_in6,
 
58
 
                                   inet_pton(), connect() */
 
 
56
                                   struct in6_addr, inet_pton(),
 
59
58
#include <fcntl.h>              /* open() */
 
60
59
#include <dirent.h>             /* opendir(), struct dirent, readdir()
 
62
 
#include <inttypes.h>           /* PRIu16, PRIdMAX, intmax_t,
 
 
61
#include <inttypes.h>           /* PRIu16, intmax_t, SCNdMAX */
 
64
62
#include <assert.h>             /* assert() */
 
65
63
#include <errno.h>              /* perror(), errno */
 
66
64
#include <time.h>               /* nanosleep(), time() */
 
67
65
#include <net/if.h>             /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
 
68
66
                                   SIOCSIFFLAGS, if_indextoname(),
 
69
67
                                   if_nametoindex(), IF_NAMESIZE */
 
70
 
#include <netinet/in.h>         /* IN6_IS_ADDR_LINKLOCAL,
 
71
 
                                   INET_ADDRSTRLEN, INET6_ADDRSTRLEN
 
 
68
#include <netinet/in.h>
 
73
69
#include <unistd.h>             /* close(), SEEK_SET, off_t, write(),
 
74
70
                                   getuid(), getgid(), setuid(),
 
76
72
#include <arpa/inet.h>          /* inet_pton(), htons */
 
77
 
#include <iso646.h>             /* not, or, and */
 
 
73
#include <iso646.h>             /* not, and, or */
 
78
74
#include <argp.h>               /* struct argp_option, error_t, struct
 
79
75
                                   argp_state, struct argp,
 
80
76
                                   argp_parse(), ARGP_KEY_ARG,
 
81
77
                                   ARGP_KEY_END, ARGP_ERR_UNKNOWN */
 
82
 
#include <signal.h>             /* sigemptyset(), sigaddset(),
 
83
 
                                   sigaction(), SIGTERM, sigaction,
 
87
79
#include <sys/klog.h>           /* klogctl() */
 
88
 
#endif  /* __linux__ */
 
91
83
/* All Avahi types, constants and functions
 
 
138
130
} mandos_context;
 
140
 
/* global context so signal handler can reach it*/
 
141
 
mandos_context mc = { .simple_poll = NULL, .server = NULL,
 
142
 
                      .dh_bits = 1024, .priority = "SECURE256"
 
143
 
                      ":!CTYPE-X.509:+CTYPE-OPENPGP" };
 
146
 
 * Make additional room in "buffer" for at least BUFFER_SIZE more
 
147
 
 * bytes. "buffer_capacity" is how much is currently allocated,
 
 
133
 * Make room in "buffer" for at least BUFFER_SIZE additional bytes.
 
 
134
 * "buffer_capacity" is how much is currently allocated,
 
148
135
 * "buffer_length" is how much is already used.
 
150
 
size_t incbuffer(char **buffer, size_t buffer_length,
 
 
137
size_t adjustbuffer(char **buffer, size_t buffer_length,
 
151
138
                  size_t buffer_capacity){
 
152
139
  if(buffer_length + BUFFER_SIZE > buffer_capacity){
 
153
140
    *buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
 
 
450
439
  /* GnuTLS server initialization */
 
451
 
  ret = gnutls_dh_params_init(&mc.dh_params);
 
 
440
  ret = gnutls_dh_params_init(&mc->dh_params);
 
452
441
  if(ret != GNUTLS_E_SUCCESS){
 
453
442
    fprintf(stderr, "Error in GnuTLS DH parameter initialization:"
 
454
443
            " %s\n", safer_gnutls_strerror(ret));
 
457
 
  ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
 
 
446
  ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
 
458
447
  if(ret != GNUTLS_E_SUCCESS){
 
459
448
    fprintf(stderr, "Error in GnuTLS prime generation: %s\n",
 
460
449
            safer_gnutls_strerror(ret));
 
464
 
  gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
 
 
453
  gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
 
470
 
  gnutls_certificate_free_credentials(mc.cred);
 
 
459
  gnutls_certificate_free_credentials(mc->cred);
 
471
460
  gnutls_global_deinit();
 
472
 
  gnutls_dh_params_deinit(mc.dh_params);
 
 
461
  gnutls_dh_params_deinit(mc->dh_params);
 
476
 
static int init_gnutls_session(gnutls_session_t *session){
 
 
465
static int init_gnutls_session(mandos_context *mc,
 
 
466
                               gnutls_session_t *session){
 
478
468
  /* GnuTLS session creation */
 
479
469
  ret = gnutls_init(session, GNUTLS_SERVER);
 
 
533
520
  ssize_t decrypted_buffer_size;
 
 
523
  char interface[IF_NAMESIZE];
 
536
524
  gnutls_session_t session;
 
537
 
  int pf;                       /* Protocol family */
 
547
 
    fprintf(stderr, "Bad address family: %d\n", af);
 
551
 
  ret = init_gnutls_session(&session);
 
 
526
  ret = init_gnutls_session(mc, &session);
 
557
 
    fprintf(stderr, "Setting up a TCP connection to %s, port %" PRIu16
 
 
532
    fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
 
561
 
  tcp_sd = socket(pf, SOCK_STREAM, 0);
 
 
536
  tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
 
563
538
    perror("socket");
 
 
543
    if(if_indextoname((unsigned int)if_index, interface) == NULL){
 
 
544
      perror("if_indextoname");
 
 
547
    fprintf(stderr, "Binding to interface %s\n", interface);
 
567
550
  memset(&to, 0, sizeof(to));
 
569
 
    to.in6.sin6_family = (sa_family_t)af;
 
570
 
    ret = inet_pton(af, ip, &to.in6.sin6_addr);
 
572
 
    to.in.sin_family = (sa_family_t)af;
 
573
 
    ret = inet_pton(af, ip, &to.in.sin_addr);
 
 
551
  to.in6.sin6_family = AF_INET6;
 
 
552
  /* It would be nice to have a way to detect if we were passed an
 
 
553
     IPv4 address here.   Now we assume an IPv6 address. */
 
 
554
  ret = inet_pton(AF_INET6, ip, &to.in6.sin6_addr);
 
576
556
    perror("inet_pton");
 
 
580
560
    fprintf(stderr, "Bad address: %s\n", ip);
 
584
 
    to.in6.sin6_port = htons(port); /* Spurious warnings from
 
586
 
                                       -Wunreachable-code */
 
588
 
    if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
 
589
 
       (&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
 
591
 
      if(if_index == AVAHI_IF_UNSPEC){
 
592
 
        fprintf(stderr, "An IPv6 link-local address is incomplete"
 
593
 
                " without a network interface\n");
 
596
 
      /* Set the network interface number as scope */
 
597
 
      to.in6.sin6_scope_id = (uint32_t)if_index;
 
600
 
    to.in.sin_port = htons(port); /* Spurious warnings from
 
 
563
  to.in6.sin6_port = htons(port); /* Spurious warnings from
 
602
565
                                     -Wunreachable-code */
 
 
567
  to.in6.sin6_scope_id = (uint32_t)if_index;
 
606
 
    if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){
 
607
 
      char interface[IF_NAMESIZE];
 
608
 
      if(if_indextoname((unsigned int)if_index, interface) == NULL){
 
609
 
        perror("if_indextoname");
 
611
 
        fprintf(stderr, "Connection to: %s%%%s, port %" PRIu16 "\n",
 
612
 
                ip, interface, port);
 
615
 
      fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
 
618
 
    char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
 
619
 
                 INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
 
622
 
      pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
 
625
 
      pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
 
 
570
    fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
 
 
572
    char addrstr[INET6_ADDRSTRLEN] = "";
 
 
573
    if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
 
 
574
                 sizeof(addrstr)) == NULL){
 
629
575
      perror("inet_ntop");
 
631
577
      if(strcmp(addrstr, ip) != 0){
 
 
858
801
       the callback function is called the Avahi server will free the
 
859
802
       resolver for us. */
 
861
 
    if(avahi_s_service_resolver_new(mc.server, interface, protocol,
 
862
 
                                    name, type, domain, protocol, 0,
 
863
 
                                    resolve_callback, NULL) == NULL)
 
 
804
    if(!(avahi_s_service_resolver_new(mc->server, interface,
 
 
805
                                       protocol, name, type, domain,
 
 
806
                                       AVAHI_PROTO_INET6, 0,
 
 
807
                                       resolve_callback, mc)))
 
864
808
      fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
 
865
 
              name, avahi_strerror(avahi_server_errno(mc.server)));
 
 
809
              name, avahi_strerror(avahi_server_errno(mc->server)));
 
868
812
  case AVAHI_BROWSER_REMOVE:
 
 
1020
 
    avahi_set_log_function(empty_log);
 
1023
 
  /* Initialize Avahi early so avahi_simple_poll_quit() can be called
 
1024
 
     from the signal handler */
 
1025
 
  /* Initialize the pseudo-RNG for Avahi */
 
1026
 
  srand((unsigned int) time(NULL));
 
1027
 
  mc.simple_poll = avahi_simple_poll_new();
 
1028
 
  if(mc.simple_poll == NULL){
 
1029
 
    fprintf(stderr, "Avahi: Failed to create simple poll object.\n");
 
1030
 
    exitcode = EXIT_FAILURE;
 
1034
 
  sigemptyset(&sigterm_action.sa_mask);
 
1035
 
  ret = sigaddset(&sigterm_action.sa_mask, SIGINT);
 
1037
 
    perror("sigaddset");
 
1038
 
    exitcode = EXIT_FAILURE;
 
1041
 
  ret = sigaddset(&sigterm_action.sa_mask, SIGHUP);
 
1043
 
    perror("sigaddset");
 
1044
 
    exitcode = EXIT_FAILURE;
 
1047
 
  ret = sigaddset(&sigterm_action.sa_mask, SIGTERM);
 
1049
 
    perror("sigaddset");
 
1050
 
    exitcode = EXIT_FAILURE;
 
1053
 
  ret = sigaction(SIGTERM, &sigterm_action, &old_sigterm_action);
 
1055
 
    perror("sigaction");
 
1056
 
    exitcode = EXIT_FAILURE;
 
1060
946
  /* If the interface is down, bring it up */
 
1061
 
  if(interface[0] != '\0'){
 
1062
948
#ifdef __linux__
 
1063
949
    /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
 
1064
950
       messages to mess up the prompt */
 
1065
951
    ret = klogctl(8, NULL, 5);
 
1066
 
    bool restore_loglevel = true;
 
1068
 
      restore_loglevel = false;
 
1069
953
      perror("klogctl");
 
1071
 
#endif  /* __linux__ */
 
1073
957
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
1075
959
      perror("socket");
 
1076
960
      exitcode = EXIT_FAILURE;
 
1077
961
#ifdef __linux__
 
1078
 
      if(restore_loglevel){
 
1079
 
        ret = klogctl(7, NULL, 0);
 
 
962
      ret = klogctl(7, NULL, 0);
 
1084
 
#endif  /* __linux__ */
 
1087
969
    strcpy(network.ifr_name, interface);
 
 
1257
1137
  /* Create the Avahi service browser */
 
1258
1138
  sb = avahi_s_service_browser_new(mc.server, if_index,
 
1259
 
                                   AVAHI_PROTO_UNSPEC, "_mandos._tcp",
 
1260
 
                                   NULL, 0, browse_callback, NULL);
 
 
1139
                                   AVAHI_PROTO_INET6, "_mandos._tcp",
 
 
1140
                                   NULL, 0, browse_callback, &mc);
 
1261
1141
  if(sb == NULL){
 
1262
1142
    fprintf(stderr, "Failed to create service browser: %s\n",
 
1263
1143
            avahi_strerror(avahi_server_errno(mc.server)));