/mandos/trunk

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

« back to all changes in this revision

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

  • Committer: Teddy Hogeborn
  • Date: 2009-02-09 05:48:04 UTC
  • mfrom: (24.1.134 mandos)
  • Revision ID: teddy@fukt.bsnet.se-20090209054804-6phrjjrzjlpvuz7u
Merge from Björn:

* plugin-runner.c (main): Bug fix: For the "--options-for" option, do
                          not mangle arguments with colon characters.
                          Also support adding empty arguments.

* plugins.d/mandos-client.c: (mc): New global variable; moved from
                                   "main".
  (init_gpgme, pgp_packet_decrypt, init_gnutls_global,
  init_gnutls_session, start_mandos_communication): Removed "mc"
                                                    argument.  All
                                                    callers changed.

  (resolve_callback, browse_callback): Ignore "userdata" argument.
                                       All callers changed.
  (handle_sigterm): New function.
  (main): Add "handle_sigterm" as signal handler for SIGTERM before
          starting the main loop.

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugins.d/mandos-client.c
30
30
 */
31
31
 
32
32
/* Needed by GPGME, specifically gpgme_data_seek() */
33
 
#ifndef _LARGEFILE_SOURCE
34
33
#define _LARGEFILE_SOURCE
35
 
#endif
36
 
#ifndef _FILE_OFFSET_BITS
37
34
#define _FILE_OFFSET_BITS 64
38
 
#endif
39
35
 
40
36
#define _GNU_SOURCE             /* TEMP_FAILURE_RETRY(), asprintf() */
41
37
 
42
38
#include <stdio.h>              /* fprintf(), stderr, fwrite(),
43
 
                                   stdout, ferror(), remove() */
 
39
                                   stdout, ferror(), sscanf(),
 
40
                                   remove() */
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,
47
 
                                   srand(), strtof(), abort() */
 
44
                                   srand() */
48
45
#include <stdbool.h>            /* bool, false, true */
49
46
#include <string.h>             /* memset(), strcmp(), strlen(),
50
47
                                   strerror(), asprintf(), strcpy() */
59
56
#include <fcntl.h>              /* open() */
60
57
#include <dirent.h>             /* opendir(), struct dirent, readdir()
61
58
                                 */
62
 
#include <inttypes.h>           /* PRIu16, PRIdMAX, intmax_t,
63
 
                                   strtoimax() */
 
59
#include <inttypes.h>           /* PRIu16, intmax_t, SCNdMAX */
64
60
#include <assert.h>             /* assert() */
65
61
#include <errno.h>              /* perror(), errno */
66
62
#include <time.h>               /* nanosleep(), time() */
71
67
                                   INET_ADDRSTRLEN, INET6_ADDRSTRLEN
72
68
                                */
73
69
#include <unistd.h>             /* close(), SEEK_SET, off_t, write(),
74
 
                                   getuid(), getgid(), seteuid(),
75
 
                                   setgid(), pause() */
 
70
                                   getuid(), getgid(), setuid(),
 
71
                                   setgid() */
76
72
#include <arpa/inet.h>          /* inet_pton(), htons */
77
73
#include <iso646.h>             /* not, or, and */
78
74
#include <argp.h>               /* struct argp_option, error_t, struct
80
76
                                   argp_parse(), ARGP_KEY_ARG,
81
77
                                   ARGP_KEY_END, ARGP_ERR_UNKNOWN */
82
78
#include <signal.h>             /* sigemptyset(), sigaddset(),
83
 
                                   sigaction(), SIGTERM, sig_atomic_t,
84
 
                                   raise() */
85
 
#include <sysexits.h>           /* EX_OSERR, EX_USAGE */
 
79
                                   sigaction(), SIGTERM, sigaction */
86
80
 
87
81
#ifdef __linux__
88
82
#include <sys/klog.h>           /* klogctl() */
89
 
#endif  /* __linux__ */
 
83
#endif
90
84
 
91
85
/* Avahi */
92
86
/* All Avahi types, constants and functions
139
133
} mandos_context;
140
134
 
141
135
/* global context so signal handler can reach it*/
142
 
mandos_context mc = { .simple_poll = NULL, .server = NULL,
143
 
                      .dh_bits = 1024, .priority = "SECURE256"
144
 
                      ":!CTYPE-X.509:+CTYPE-OPENPGP" };
145
 
 
146
 
sig_atomic_t quit_now = 0;
147
 
int signal_received = 0;
 
136
mandos_context mc;
148
137
 
149
138
/*
150
 
 * Make additional room in "buffer" for at least BUFFER_SIZE more
151
 
 * bytes. "buffer_capacity" is how much is currently allocated,
152
 
 * "buffer_length" is how much is already used.
 
139
 * Make additional room in "buffer" for at least BUFFER_SIZE
 
140
 * additional bytes. "buffer_capacity" is how much is currently
 
141
 * allocated, "buffer_length" is how much is already used.
153
142
 */
154
143
size_t incbuffer(char **buffer, size_t buffer_length,
155
144
                  size_t buffer_capacity){
168
157
 */
169
158
static bool init_gpgme(const char *seckey,
170
159
                       const char *pubkey, const char *tempdir){
 
160
  int ret;
171
161
  gpgme_error_t rc;
172
162
  gpgme_engine_info_t engine_info;
173
163
  
176
166
   * Helper function to insert pub and seckey to the engine keyring.
177
167
   */
178
168
  bool import_key(const char *filename){
179
 
    int ret;
180
169
    int fd;
181
170
    gpgme_data_t pgp_data;
182
171
    
253
242
    return false;
254
243
  }
255
244
  
256
 
  return true;
 
245
  return true; 
257
246
}
258
247
 
259
248
/* 
313
302
        }
314
303
        gpgme_recipient_t recipient;
315
304
        recipient = result->recipients;
316
 
        while(recipient != NULL){
317
 
          fprintf(stderr, "Public key algorithm: %s\n",
318
 
                  gpgme_pubkey_algo_name(recipient->pubkey_algo));
319
 
          fprintf(stderr, "Key ID: %s\n", recipient->keyid);
320
 
          fprintf(stderr, "Secret key available: %s\n",
321
 
                  recipient->status == GPG_ERR_NO_SECKEY
322
 
                  ? "No" : "Yes");
323
 
          recipient = recipient->next;
 
305
        if(recipient){
 
306
          while(recipient != NULL){
 
307
            fprintf(stderr, "Public key algorithm: %s\n",
 
308
                    gpgme_pubkey_algo_name(recipient->pubkey_algo));
 
309
            fprintf(stderr, "Key ID: %s\n", recipient->keyid);
 
310
            fprintf(stderr, "Secret key available: %s\n",
 
311
                    recipient->status == GPG_ERR_NO_SECKEY
 
312
                    ? "No" : "Yes");
 
313
            recipient = recipient->next;
 
314
          }
324
315
        }
325
316
      }
326
317
    }
478
469
static int init_gnutls_session(gnutls_session_t *session){
479
470
  int ret;
480
471
  /* GnuTLS session creation */
481
 
  do {
482
 
    ret = gnutls_init(session, GNUTLS_SERVER);
483
 
    if(quit_now){
484
 
      return -1;
485
 
    }
486
 
  } while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
 
472
  ret = gnutls_init(session, GNUTLS_SERVER);
487
473
  if(ret != GNUTLS_E_SUCCESS){
488
474
    fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
489
475
            safer_gnutls_strerror(ret));
491
477
  
492
478
  {
493
479
    const char *err;
494
 
    do {
495
 
      ret = gnutls_priority_set_direct(*session, mc.priority, &err);
496
 
      if(quit_now){
497
 
        gnutls_deinit(*session);
498
 
        return -1;
499
 
      }
500
 
    } while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
 
480
    ret = gnutls_priority_set_direct(*session, mc.priority, &err);
501
481
    if(ret != GNUTLS_E_SUCCESS){
502
482
      fprintf(stderr, "Syntax error at: %s\n", err);
503
483
      fprintf(stderr, "GnuTLS error: %s\n",
507
487
    }
508
488
  }
509
489
  
510
 
  do {
511
 
    ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
512
 
                                 mc.cred);
513
 
    if(quit_now){
514
 
      gnutls_deinit(*session);
515
 
      return -1;
516
 
    }
517
 
  } while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
 
490
  ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
 
491
                               mc.cred);
518
492
  if(ret != GNUTLS_E_SUCCESS){
519
493
    fprintf(stderr, "Error setting GnuTLS credentials: %s\n",
520
494
            safer_gnutls_strerror(ret));
523
497
  }
524
498
  
525
499
  /* ignore client certificate if any. */
526
 
  gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
 
500
  gnutls_certificate_server_set_request(*session,
 
501
                                        GNUTLS_CERT_IGNORE);
527
502
  
528
503
  gnutls_dh_set_prime_bits(*session, mc.dh_bits);
529
504
  
538
513
static int start_mandos_communication(const char *ip, uint16_t port,
539
514
                                      AvahiIfIndex if_index,
540
515
                                      int af){
541
 
  int ret, tcp_sd = -1;
 
516
  int ret, tcp_sd;
542
517
  ssize_t sret;
543
518
  union {
544
519
    struct sockaddr_in in;
545
520
    struct sockaddr_in6 in6;
546
521
  } to;
547
522
  char *buffer = NULL;
548
 
  char *decrypted_buffer = NULL;
 
523
  char *decrypted_buffer;
549
524
  size_t buffer_length = 0;
550
525
  size_t buffer_capacity = 0;
 
526
  ssize_t decrypted_buffer_size;
551
527
  size_t written;
552
 
  int retval = -1;
 
528
  int retval = 0;
553
529
  gnutls_session_t session;
554
530
  int pf;                       /* Protocol family */
555
531
  
556
 
  if(quit_now){
557
 
    return -1;
558
 
  }
559
 
  
560
532
  switch(af){
561
533
  case AF_INET6:
562
534
    pf = PF_INET6;
582
554
  tcp_sd = socket(pf, SOCK_STREAM, 0);
583
555
  if(tcp_sd < 0){
584
556
    perror("socket");
585
 
    goto mandos_end;
586
 
  }
587
 
  
588
 
  if(quit_now){
589
 
    goto mandos_end;
 
557
    return -1;
590
558
  }
591
559
  
592
560
  memset(&to, 0, sizeof(to));
593
561
  if(af == AF_INET6){
594
 
    to.in6.sin6_family = (sa_family_t)af;
 
562
    to.in6.sin6_family = (uint16_t)af;
595
563
    ret = inet_pton(af, ip, &to.in6.sin6_addr);
596
564
  } else {                      /* IPv4 */
597
565
    to.in.sin_family = (sa_family_t)af;
599
567
  }
600
568
  if(ret < 0 ){
601
569
    perror("inet_pton");
602
 
    goto mandos_end;
 
570
    return -1;
603
571
  }
604
572
  if(ret == 0){
605
573
    fprintf(stderr, "Bad address: %s\n", ip);
606
 
    goto mandos_end;
 
574
    return -1;
607
575
  }
608
576
  if(af == AF_INET6){
609
577
    to.in6.sin6_port = htons(port); /* Spurious warnings from
616
584
      if(if_index == AVAHI_IF_UNSPEC){
617
585
        fprintf(stderr, "An IPv6 link-local address is incomplete"
618
586
                " without a network interface\n");
619
 
        goto mandos_end;
 
587
        return -1;
620
588
      }
621
589
      /* Set the network interface number as scope */
622
590
      to.in6.sin6_scope_id = (uint32_t)if_index;
627
595
                                     -Wunreachable-code */
628
596
  }
629
597
  
630
 
  if(quit_now){
631
 
    goto mandos_end;
632
 
  }
633
 
  
634
598
  if(debug){
635
599
    if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){
636
600
      char interface[IF_NAMESIZE];
663
627
    }
664
628
  }
665
629
  
666
 
  if(quit_now){
667
 
    goto mandos_end;
668
 
  }
669
 
  
670
630
  if(af == AF_INET6){
671
631
    ret = connect(tcp_sd, &to.in6, sizeof(to));
672
632
  } else {
674
634
  }
675
635
  if(ret < 0){
676
636
    perror("connect");
677
 
    goto mandos_end;
678
 
  }
679
 
  
680
 
  if(quit_now){
681
 
    goto mandos_end;
 
637
    return -1;
682
638
  }
683
639
  
684
640
  const char *out = mandos_protocol_version;
689
645
                                   out_size - written));
690
646
    if(ret == -1){
691
647
      perror("write");
 
648
      retval = -1;
692
649
      goto mandos_end;
693
650
    }
694
651
    written += (size_t)ret;
702
659
        break;
703
660
      }
704
661
    }
705
 
  
706
 
    if(quit_now){
707
 
      goto mandos_end;
708
 
    }
709
662
  }
710
663
  
711
664
  if(debug){
712
665
    fprintf(stderr, "Establishing TLS session with %s\n", ip);
713
666
  }
714
667
  
715
 
  if(quit_now){
716
 
    goto mandos_end;
717
 
  }
718
 
  
719
668
  gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);
720
669
  
721
 
  if(quit_now){
722
 
    goto mandos_end;
723
 
  }
724
 
  
725
 
  do {
 
670
  do{
726
671
    ret = gnutls_handshake(session);
727
 
    if(quit_now){
728
 
      goto mandos_end;
729
 
    }
730
672
  } while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
731
673
  
732
674
  if(ret != GNUTLS_E_SUCCESS){
734
676
      fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
735
677
      gnutls_perror(ret);
736
678
    }
 
679
    retval = -1;
737
680
    goto mandos_end;
738
681
  }
739
682
  
745
688
  }
746
689
  
747
690
  while(true){
748
 
    
749
 
    if(quit_now){
750
 
      goto mandos_end;
751
 
    }
752
 
    
753
691
    buffer_capacity = incbuffer(&buffer, buffer_length,
754
692
                                   buffer_capacity);
755
693
    if(buffer_capacity == 0){
756
694
      perror("incbuffer");
757
 
      goto mandos_end;
758
 
    }
759
 
    
760
 
    if(quit_now){
 
695
      retval = -1;
761
696
      goto mandos_end;
762
697
    }
763
698
    
772
707
      case GNUTLS_E_AGAIN:
773
708
        break;
774
709
      case GNUTLS_E_REHANDSHAKE:
775
 
        do {
 
710
        do{
776
711
          ret = gnutls_handshake(session);
777
 
          
778
 
          if(quit_now){
779
 
            goto mandos_end;
780
 
          }
781
712
        } while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
782
713
        if(ret < 0){
783
714
          fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
784
715
          gnutls_perror(ret);
 
716
          retval = -1;
785
717
          goto mandos_end;
786
718
        }
787
719
        break;
788
720
      default:
789
721
        fprintf(stderr, "Unknown error while reading data from"
790
722
                " encrypted session with Mandos server\n");
 
723
        retval = -1;
791
724
        gnutls_bye(session, GNUTLS_SHUT_RDWR);
792
725
        goto mandos_end;
793
726
      }
800
733
    fprintf(stderr, "Closing TLS session\n");
801
734
  }
802
735
  
803
 
  if(quit_now){
804
 
    goto mandos_end;
805
 
  }
806
 
  
807
 
  do {
808
 
    ret = gnutls_bye(session, GNUTLS_SHUT_RDWR);
809
 
    if(quit_now){
810
 
      goto mandos_end;
811
 
    }
812
 
  } while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
 
736
  gnutls_bye(session, GNUTLS_SHUT_RDWR);
813
737
  
814
738
  if(buffer_length > 0){
815
 
    ssize_t decrypted_buffer_size;
816
739
    decrypted_buffer_size = pgp_packet_decrypt(buffer,
817
740
                                               buffer_length,
818
741
                                               &decrypted_buffer);
819
742
    if(decrypted_buffer_size >= 0){
820
 
      
821
743
      written = 0;
822
744
      while(written < (size_t) decrypted_buffer_size){
823
 
        if(quit_now){
824
 
          goto mandos_end;
825
 
        }
826
 
        
827
745
        ret = (int)fwrite(decrypted_buffer + written, 1,
828
746
                          (size_t)decrypted_buffer_size - written,
829
747
                          stdout);
832
750
            fprintf(stderr, "Error writing encrypted data: %s\n",
833
751
                    strerror(errno));
834
752
          }
835
 
          goto mandos_end;
 
753
          retval = -1;
 
754
          break;
836
755
        }
837
756
        written += (size_t)ret;
838
757
      }
839
 
      retval = 0;
 
758
      free(decrypted_buffer);
 
759
    } else {
 
760
      retval = -1;
840
761
    }
 
762
  } else {
 
763
    retval = -1;
841
764
  }
842
765
  
843
766
  /* Shutdown procedure */
844
767
  
845
768
 mandos_end:
846
 
  free(decrypted_buffer);
847
769
  free(buffer);
848
 
  if(tcp_sd >= 0){
849
 
    ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
850
 
  }
 
770
  ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
851
771
  if(ret == -1){
852
772
    perror("close");
853
773
  }
854
774
  gnutls_deinit(session);
855
 
  if(quit_now){
856
 
    retval = -1;
857
 
  }
858
775
  return retval;
859
776
}
860
777
 
877
794
  /* Called whenever a service has been resolved successfully or
878
795
     timed out */
879
796
  
880
 
  if(quit_now){
881
 
    return;
882
 
  }
883
 
  
884
797
  switch(event){
885
798
  default:
886
799
  case AVAHI_RESOLVER_FAILURE:
923
836
  /* Called whenever a new services becomes available on the LAN or
924
837
     is removed from the LAN */
925
838
  
926
 
  if(quit_now){
927
 
    return;
928
 
  }
929
 
  
930
839
  switch(event){
931
840
  default:
932
841
  case AVAHI_BROWSER_FAILURE:
942
851
       the callback function is called the Avahi server will free the
943
852
       resolver for us. */
944
853
    
945
 
    if(avahi_s_service_resolver_new(mc.server, interface, protocol,
946
 
                                    name, type, domain, protocol, 0,
947
 
                                    resolve_callback, NULL) == NULL)
 
854
    if(!(avahi_s_service_resolver_new(mc.server, interface,
 
855
                                       protocol, name, type, domain,
 
856
                                       AVAHI_PROTO_INET6, 0,
 
857
                                       resolve_callback, NULL)))
948
858
      fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
949
859
              name, avahi_strerror(avahi_server_errno(mc.server)));
950
860
    break;
961
871
  }
962
872
}
963
873
 
964
 
/* stop main loop after sigterm has been called */
965
 
static void handle_sigterm(int sig){
966
 
  if(quit_now){
967
 
    return;
968
 
  }
969
 
  quit_now = 1;
970
 
  signal_received = sig;
 
874
static void handle_sigterm(__attribute__((unused)) int sig){
971
875
  int old_errno = errno;
972
 
  if(mc.simple_poll != NULL){
973
 
    avahi_simple_poll_quit(mc.simple_poll);
974
 
  }
 
876
  avahi_simple_poll_quit(mc.simple_poll);
975
877
  errno = old_errno;
976
878
}
977
879
 
980
882
  int error;
981
883
  int ret;
982
884
  intmax_t tmpmax;
983
 
  char *tmp;
 
885
  int numchars;
984
886
  int exitcode = EXIT_SUCCESS;
985
887
  const char *interface = "eth0";
986
888
  struct ifreq network;
987
 
  int sd = -1;
988
 
  bool take_down_interface = false;
 
889
  int sd;
989
890
  uid_t uid;
990
891
  gid_t gid;
991
892
  char *connect_to = NULL;
995
896
  const char *seckey = PATHDIR "/" SECKEY;
996
897
  const char *pubkey = PATHDIR "/" PUBKEY;
997
898
  
 
899
  /* Initialize Mandos context */
 
900
  mc = (mandos_context){ .simple_poll = NULL, .server = NULL,
 
901
                         .dh_bits = 1024, .priority = "SECURE256"
 
902
                         ":!CTYPE-X.509:+CTYPE-OPENPGP" };
998
903
  bool gnutls_initialized = false;
999
904
  bool gpgme_initialized = false;
1000
 
  float delay = 2.5f;
1001
 
  
1002
 
  struct sigaction old_sigterm_action = { .sa_handler = SIG_DFL };
 
905
  double delay = 2.5;
 
906
 
 
907
  struct sigaction old_sigterm_action;
1003
908
  struct sigaction sigterm_action = { .sa_handler = handle_sigterm };
1004
909
  
1005
 
  uid = getuid();
1006
 
  gid = getgid();
1007
 
  
1008
 
  /* Lower any group privileges we might have, just to be safe */
1009
 
  errno = 0;
1010
 
  ret = setgid(gid);
1011
 
  if(ret == -1){
1012
 
    perror("setgid");
1013
 
  }
1014
 
  
1015
 
  /* Lower user privileges (temporarily) */
1016
 
  errno = 0;
1017
 
  ret = seteuid(uid);
1018
 
  if(ret == -1){
1019
 
    perror("seteuid");
1020
 
  }
1021
 
  
1022
 
  if(quit_now){
1023
 
    goto end;
1024
 
  }
1025
 
  
1026
910
  {
1027
911
    struct argp_option options[] = {
1028
912
      { .name = "debug", .key = 128,
1057
941
        .arg = "SECONDS",
1058
942
        .doc = "Maximum delay to wait for interface startup",
1059
943
        .group = 2 },
1060
 
      /*
1061
 
       * These reproduce what we would get without ARGP_NO_HELP
1062
 
       */
1063
 
      { .name = "help", .key = '?',
1064
 
        .doc = "Give this help list", .group = -1 },
1065
 
      { .name = "usage", .key = -3,
1066
 
        .doc = "Give a short usage message", .group = -1 },
1067
 
      { .name = "version", .key = 'V',
1068
 
        .doc = "Print program version", .group = -1 },
1069
944
      { .name = NULL }
1070
945
    };
1071
946
    
1072
947
    error_t parse_opt(int key, char *arg,
1073
948
                      struct argp_state *state){
1074
 
      errno = 0;
1075
949
      switch(key){
1076
950
      case 128:                 /* --debug */
1077
951
        debug = true;
1089
963
        pubkey = arg;
1090
964
        break;
1091
965
      case 129:                 /* --dh-bits */
1092
 
        errno = 0;
1093
 
        tmpmax = strtoimax(arg, &tmp, 10);
1094
 
        if(errno != 0 or tmp == arg or *tmp != '\0'
1095
 
           or tmpmax != (typeof(mc.dh_bits))tmpmax){
1096
 
          argp_error(state, "Bad number of DH bits");
 
966
        ret = sscanf(arg, "%" SCNdMAX "%n", &tmpmax, &numchars);
 
967
        if(ret < 1 or tmpmax != (typeof(mc.dh_bits))tmpmax
 
968
           or arg[numchars] != '\0'){
 
969
          fprintf(stderr, "Bad number of DH bits\n");
 
970
          exit(EXIT_FAILURE);
1097
971
        }
1098
972
        mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
1099
973
        break;
1101
975
        mc.priority = arg;
1102
976
        break;
1103
977
      case 131:                 /* --delay */
1104
 
        errno = 0;
1105
 
        delay = strtof(arg, &tmp);
1106
 
        if(errno != 0 or tmp == arg or *tmp != '\0'){
1107
 
          argp_error(state, "Bad delay");
 
978
        ret = sscanf(arg, "%lf%n", &delay, &numchars);
 
979
        if(ret < 1 or arg[numchars] != '\0'){
 
980
          fprintf(stderr, "Bad delay\n");
 
981
          exit(EXIT_FAILURE);
1108
982
        }
1109
983
        break;
1110
 
        /*
1111
 
         * These reproduce what we would get without ARGP_NO_HELP
1112
 
         */
1113
 
      case '?':                 /* --help */
1114
 
        argp_state_help(state, state->out_stream,
1115
 
                        (ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
1116
 
                        & ~(unsigned int)ARGP_HELP_EXIT_OK);
1117
 
      case -3:                  /* --usage */
1118
 
        argp_state_help(state, state->out_stream,
1119
 
                        ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
1120
 
      case 'V':                 /* --version */
1121
 
        fprintf(state->out_stream, "%s\n", argp_program_version);
1122
 
        exit(argp_err_exit_status);
 
984
      case ARGP_KEY_ARG:
 
985
        argp_usage(state);
 
986
      case ARGP_KEY_END:
1123
987
        break;
1124
988
      default:
1125
989
        return ARGP_ERR_UNKNOWN;
1126
990
      }
1127
 
      return errno;
 
991
      return 0;
1128
992
    }
1129
993
    
1130
994
    struct argp argp = { .options = options, .parser = parse_opt,
1131
995
                         .args_doc = "",
1132
996
                         .doc = "Mandos client -- Get and decrypt"
1133
997
                         " passwords from a Mandos server" };
1134
 
    ret = argp_parse(&argp, argc, argv,
1135
 
                     ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
1136
 
    switch(ret){
1137
 
    case 0:
1138
 
      break;
1139
 
    case ENOMEM:
1140
 
    default:
1141
 
      errno = ret;
1142
 
      perror("argp_parse");
1143
 
      exitcode = EX_OSERR;
1144
 
      goto end;
1145
 
    case EINVAL:
1146
 
      exitcode = EX_USAGE;
1147
 
      goto end;
1148
 
    }
1149
 
  }
1150
 
  
1151
 
  if(not debug){
1152
 
    avahi_set_log_function(empty_log);
1153
 
  }
1154
 
  
1155
 
  /* Initialize Avahi early so avahi_simple_poll_quit() can be called
1156
 
     from the signal handler */
1157
 
  /* Initialize the pseudo-RNG for Avahi */
1158
 
  srand((unsigned int) time(NULL));
1159
 
  mc.simple_poll = avahi_simple_poll_new();
1160
 
  if(mc.simple_poll == NULL){
1161
 
    fprintf(stderr, "Avahi: Failed to create simple poll object.\n");
1162
 
    exitcode = EXIT_FAILURE;
1163
 
    goto end;
1164
 
  }
1165
 
  
1166
 
  sigemptyset(&sigterm_action.sa_mask);
1167
 
  ret = sigaddset(&sigterm_action.sa_mask, SIGINT);
1168
 
  if(ret == -1){
1169
 
    perror("sigaddset");
1170
 
    exitcode = EXIT_FAILURE;
1171
 
    goto end;
1172
 
  }
1173
 
  ret = sigaddset(&sigterm_action.sa_mask, SIGHUP);
1174
 
  if(ret == -1){
1175
 
    perror("sigaddset");
1176
 
    exitcode = EXIT_FAILURE;
1177
 
    goto end;
1178
 
  }
1179
 
  ret = sigaddset(&sigterm_action.sa_mask, SIGTERM);
1180
 
  if(ret == -1){
1181
 
    perror("sigaddset");
1182
 
    exitcode = EXIT_FAILURE;
1183
 
    goto end;
1184
 
  }
1185
 
  /* Need to check if the handler is SIG_IGN before handling:
1186
 
     | [[info:libc:Initial Signal Actions]] |
1187
 
     | [[info:libc:Basic Signal Handling]]  |
1188
 
  */
1189
 
  ret = sigaction(SIGINT, NULL, &old_sigterm_action);
1190
 
  if(ret == -1){
1191
 
    perror("sigaction");
1192
 
    return EXIT_FAILURE;
1193
 
  }
1194
 
  if(old_sigterm_action.sa_handler != SIG_IGN){
1195
 
    ret = sigaction(SIGINT, &sigterm_action, NULL);
1196
 
    if(ret == -1){
1197
 
      perror("sigaction");
1198
 
      exitcode = EXIT_FAILURE;
1199
 
      goto end;
1200
 
    }
1201
 
  }
1202
 
  ret = sigaction(SIGHUP, NULL, &old_sigterm_action);
1203
 
  if(ret == -1){
1204
 
    perror("sigaction");
1205
 
    return EXIT_FAILURE;
1206
 
  }
1207
 
  if(old_sigterm_action.sa_handler != SIG_IGN){
1208
 
    ret = sigaction(SIGHUP, &sigterm_action, NULL);
1209
 
    if(ret == -1){
1210
 
      perror("sigaction");
1211
 
      exitcode = EXIT_FAILURE;
1212
 
      goto end;
1213
 
    }
1214
 
  }
1215
 
  ret = sigaction(SIGTERM, NULL, &old_sigterm_action);
1216
 
  if(ret == -1){
1217
 
    perror("sigaction");
1218
 
    return EXIT_FAILURE;
1219
 
  }
1220
 
  if(old_sigterm_action.sa_handler != SIG_IGN){
1221
 
    ret = sigaction(SIGTERM, &sigterm_action, NULL);
1222
 
    if(ret == -1){
1223
 
      perror("sigaction");
 
998
    ret = argp_parse(&argp, argc, argv, 0, 0, NULL);
 
999
    if(ret == ARGP_ERR_UNKNOWN){
 
1000
      fprintf(stderr, "Unknown error while parsing arguments\n");
1224
1001
      exitcode = EXIT_FAILURE;
1225
1002
      goto end;
1226
1003
    }
1228
1005
  
1229
1006
  /* If the interface is down, bring it up */
1230
1007
  if(interface[0] != '\0'){
1231
 
    if_index = (AvahiIfIndex) if_nametoindex(interface);
1232
 
    if(if_index == 0){
1233
 
      fprintf(stderr, "No such interface: \"%s\"\n", interface);
1234
 
      exitcode = EXIT_FAILURE;
1235
 
      goto end;
1236
 
    }
1237
 
    
1238
 
    if(quit_now){
1239
 
      goto end;
1240
 
    }
1241
 
    
1242
 
    /* Re-raise priviliges */
1243
 
    errno = 0;
1244
 
    ret = seteuid(0);
1245
 
    if(ret == -1){
1246
 
      perror("seteuid");
1247
 
    }
1248
 
    
1249
1008
#ifdef __linux__
1250
1009
    /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1251
 
       messages about the network interface to mess up the prompt */
 
1010
       messages to mess up the prompt */
1252
1011
    ret = klogctl(8, NULL, 5);
1253
1012
    bool restore_loglevel = true;
1254
1013
    if(ret == -1){
1255
1014
      restore_loglevel = false;
1256
1015
      perror("klogctl");
1257
1016
    }
1258
 
#endif  /* __linux__ */
 
1017
#endif
1259
1018
    
1260
1019
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1261
1020
    if(sd < 0){
1268
1027
          perror("klogctl");
1269
1028
        }
1270
1029
      }
1271
 
#endif  /* __linux__ */
1272
 
      /* Lower privileges */
1273
 
      errno = 0;
1274
 
      ret = seteuid(uid);
1275
 
      if(ret == -1){
1276
 
        perror("seteuid");
1277
 
      }
 
1030
#endif
1278
1031
      goto end;
1279
1032
    }
1280
1033
    strcpy(network.ifr_name, interface);
1288
1041
          perror("klogctl");
1289
1042
        }
1290
1043
      }
1291
 
#endif  /* __linux__ */
 
1044
#endif
1292
1045
      exitcode = EXIT_FAILURE;
1293
 
      /* Lower privileges */
1294
 
      errno = 0;
1295
 
      ret = seteuid(uid);
1296
 
      if(ret == -1){
1297
 
        perror("seteuid");
1298
 
      }
1299
1046
      goto end;
1300
1047
    }
1301
1048
    if((network.ifr_flags & IFF_UP) == 0){
1302
1049
      network.ifr_flags |= IFF_UP;
1303
 
      take_down_interface = true;
1304
1050
      ret = ioctl(sd, SIOCSIFFLAGS, &network);
1305
1051
      if(ret == -1){
1306
 
        take_down_interface = false;
1307
1052
        perror("ioctl SIOCSIFFLAGS");
1308
1053
        exitcode = EXIT_FAILURE;
1309
1054
#ifdef __linux__
1313
1058
            perror("klogctl");
1314
1059
          }
1315
1060
        }
1316
 
#endif  /* __linux__ */
1317
 
        /* Lower privileges */
1318
 
        errno = 0;
1319
 
        ret = seteuid(uid);
1320
 
        if(ret == -1){
1321
 
          perror("seteuid");
1322
 
        }
 
1061
#endif
1323
1062
        goto end;
1324
1063
      }
1325
1064
    }
1337
1076
        perror("nanosleep");
1338
1077
      }
1339
1078
    }
1340
 
    if(not take_down_interface){
1341
 
      /* We won't need the socket anymore */
1342
 
      ret = (int)TEMP_FAILURE_RETRY(close(sd));
1343
 
      if(ret == -1){
1344
 
        perror("close");
1345
 
      }
 
1079
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
1080
    if(ret == -1){
 
1081
      perror("close");
1346
1082
    }
1347
1083
#ifdef __linux__
1348
1084
    if(restore_loglevel){
1352
1088
        perror("klogctl");
1353
1089
      }
1354
1090
    }
1355
 
#endif  /* __linux__ */
1356
 
    /* Lower privileges */
1357
 
    errno = 0;
1358
 
    if(take_down_interface){
1359
 
      /* Lower privileges */
1360
 
      ret = seteuid(uid);
1361
 
      if(ret == -1){
1362
 
        perror("seteuid");
1363
 
      }
1364
 
    } else {
1365
 
      /* Lower privileges permanently */
1366
 
      ret = setuid(uid);
1367
 
      if(ret == -1){
1368
 
        perror("setuid");
1369
 
      }
1370
 
    }
1371
 
  }
1372
 
  
1373
 
  if(quit_now){
1374
 
    goto end;
 
1091
#endif
 
1092
  }
 
1093
  
 
1094
  uid = getuid();
 
1095
  gid = getgid();
 
1096
  
 
1097
  errno = 0;
 
1098
  setgid(gid);
 
1099
  if(ret == -1){
 
1100
    perror("setgid");
 
1101
  }
 
1102
  
 
1103
  ret = setuid(uid);
 
1104
  if(ret == -1){
 
1105
    perror("setuid");
1375
1106
  }
1376
1107
  
1377
1108
  ret = init_gnutls_global(pubkey, seckey);
1383
1114
    gnutls_initialized = true;
1384
1115
  }
1385
1116
  
1386
 
  if(quit_now){
1387
 
    goto end;
1388
 
  }
1389
 
  
1390
 
  tempdir_created = true;
1391
1117
  if(mkdtemp(tempdir) == NULL){
1392
 
    tempdir_created = false;
1393
1118
    perror("mkdtemp");
1394
1119
    goto end;
1395
1120
  }
1396
 
  
1397
 
  if(quit_now){
1398
 
    goto end;
1399
 
  }
 
1121
  tempdir_created = true;
1400
1122
  
1401
1123
  if(not init_gpgme(pubkey, seckey, tempdir)){
1402
1124
    fprintf(stderr, "init_gpgme failed\n");
1406
1128
    gpgme_initialized = true;
1407
1129
  }
1408
1130
  
1409
 
  if(quit_now){
1410
 
    goto end;
 
1131
  if(interface[0] != '\0'){
 
1132
    if_index = (AvahiIfIndex) if_nametoindex(interface);
 
1133
    if(if_index == 0){
 
1134
      fprintf(stderr, "No such interface: \"%s\"\n", interface);
 
1135
      exitcode = EXIT_FAILURE;
 
1136
      goto end;
 
1137
    }
1411
1138
  }
1412
1139
  
1413
1140
  if(connect_to != NULL){
1419
1146
      exitcode = EXIT_FAILURE;
1420
1147
      goto end;
1421
1148
    }
1422
 
    
1423
 
    if(quit_now){
1424
 
      goto end;
1425
 
    }
1426
 
    
1427
1149
    uint16_t port;
1428
 
    errno = 0;
1429
 
    tmpmax = strtoimax(address+1, &tmp, 10);
1430
 
    if(errno != 0 or tmp == address+1 or *tmp != '\0'
1431
 
       or tmpmax != (uint16_t)tmpmax){
 
1150
    ret = sscanf(address+1, "%" SCNdMAX "%n", &tmpmax, &numchars);
 
1151
    if(ret < 1 or tmpmax != (uint16_t)tmpmax
 
1152
       or address[numchars+1] != '\0'){
1432
1153
      fprintf(stderr, "Bad port number\n");
1433
1154
      exitcode = EXIT_FAILURE;
1434
1155
      goto end;
1435
1156
    }
1436
 
  
1437
 
    if(quit_now){
1438
 
      goto end;
1439
 
    }
1440
 
    
1441
1157
    port = (uint16_t)tmpmax;
1442
1158
    *address = '\0';
1443
1159
    address = connect_to;
1448
1164
    } else {
1449
1165
      af = AF_INET;
1450
1166
    }
1451
 
    
1452
 
    if(quit_now){
1453
 
      goto end;
1454
 
    }
1455
 
    
1456
1167
    ret = start_mandos_communication(address, port, if_index, af);
1457
1168
    if(ret < 0){
1458
1169
      exitcode = EXIT_FAILURE;
1462
1173
    goto end;
1463
1174
  }
1464
1175
  
1465
 
  if(quit_now){
 
1176
  if(not debug){
 
1177
    avahi_set_log_function(empty_log);
 
1178
  }
 
1179
  
 
1180
  /* Initialize the pseudo-RNG for Avahi */
 
1181
  srand((unsigned int) time(NULL));
 
1182
  
 
1183
  /* Allocate main Avahi loop object */
 
1184
  mc.simple_poll = avahi_simple_poll_new();
 
1185
  if(mc.simple_poll == NULL){
 
1186
    fprintf(stderr, "Avahi: Failed to create simple poll object.\n");
 
1187
    exitcode = EXIT_FAILURE;
1466
1188
    goto end;
1467
1189
  }
1468
1190
  
1492
1214
    goto end;
1493
1215
  }
1494
1216
  
1495
 
  if(quit_now){
1496
 
    goto end;
1497
 
  }
1498
 
  
1499
1217
  /* Create the Avahi service browser */
1500
1218
  sb = avahi_s_service_browser_new(mc.server, if_index,
1501
 
                                   AVAHI_PROTO_UNSPEC, "_mandos._tcp",
 
1219
                                   AVAHI_PROTO_INET6, "_mandos._tcp",
1502
1220
                                   NULL, 0, browse_callback, NULL);
1503
1221
  if(sb == NULL){
1504
1222
    fprintf(stderr, "Failed to create service browser: %s\n",
1507
1225
    goto end;
1508
1226
  }
1509
1227
  
1510
 
  if(quit_now){
 
1228
  sigemptyset(&sigterm_action.sa_mask);
 
1229
  ret = sigaddset(&sigterm_action.sa_mask, SIGTERM);
 
1230
  if(ret == -1){
 
1231
    perror("sigaddset");
 
1232
    exitcode = EXIT_FAILURE;
1511
1233
    goto end;
1512
1234
  }
 
1235
  ret = sigaction(SIGTERM, &sigterm_action, &old_sigterm_action);
 
1236
  if(ret == -1){
 
1237
    perror("sigaction");
 
1238
    exitcode = EXIT_FAILURE;
 
1239
    goto end;
 
1240
  }  
1513
1241
  
1514
1242
  /* Run the main loop */
1515
1243
  
1545
1273
    gpgme_release(mc.ctx);
1546
1274
  }
1547
1275
  
1548
 
  /* Take down the network interface */
1549
 
  if(take_down_interface){
1550
 
    /* Re-raise priviliges */
1551
 
    errno = 0;
1552
 
    ret = seteuid(0);
1553
 
    if(ret == -1){
1554
 
      perror("seteuid");
1555
 
    }
1556
 
    if(geteuid() == 0){
1557
 
      ret = ioctl(sd, SIOCGIFFLAGS, &network);
1558
 
      if(ret == -1){
1559
 
        perror("ioctl SIOCGIFFLAGS");
1560
 
      } else if(network.ifr_flags & IFF_UP) {
1561
 
        network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1562
 
        ret = ioctl(sd, SIOCSIFFLAGS, &network);
1563
 
        if(ret == -1){
1564
 
          perror("ioctl SIOCSIFFLAGS");
1565
 
        }
1566
 
      }
1567
 
      ret = (int)TEMP_FAILURE_RETRY(close(sd));
1568
 
      if(ret == -1){
1569
 
        perror("close");
1570
 
      }
1571
 
      /* Lower privileges permanently */
1572
 
      errno = 0;
1573
 
      ret = setuid(uid);
1574
 
      if(ret == -1){
1575
 
        perror("setuid");
1576
 
      }
1577
 
    }
1578
 
  }
1579
 
  
1580
1276
  /* Removes the temp directory used by GPGME */
1581
1277
  if(tempdir_created){
1582
1278
    DIR *d;
1621
1317
    }
1622
1318
  }
1623
1319
  
1624
 
  if(quit_now){
1625
 
    sigemptyset(&old_sigterm_action.sa_mask);
1626
 
    old_sigterm_action.sa_handler = SIG_DFL;
1627
 
    ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
1628
 
                                            &old_sigterm_action,
1629
 
                                            NULL));
1630
 
    if(ret == -1){
1631
 
      perror("sigaction");
1632
 
    }
1633
 
    do {
1634
 
      ret = raise(signal_received);
1635
 
    } while(ret != 0 and errno == EINTR);
1636
 
    if(ret != 0){
1637
 
      perror("raise");
1638
 
      abort();
1639
 
    }
1640
 
    TEMP_FAILURE_RETRY(pause());
1641
 
  }
1642
 
  
1643
1320
  return exitcode;
1644
1321
}