/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/mandosclient.c

  • Committer: Teddy Hogeborn
  • Date: 2008-07-21 15:34:44 UTC
  • Revision ID: teddy@fukt.bsnet.se-20080721153444-lugbjkj1oq65ugq3
* Makefile (CFLAGS): Changed to use $(WARN), $(DEBUG), $(COVERAGE) and
                     $(LANGUAGE).
  (WARN, DEBUG, COVERAGE, LANGUAGE): New.
  (LDFLAGS): New; use $(COVERAGE)

* plugbasedclient.c: Added copyright header.
  (process.buffer_size, process.buffer_length): Changed to "size_t".
  (main): Cast arguments to malloc and realloc.  Detect read errors
          from processes.

* mandosclient.c: Added copyright header.
  (interface): Moved to inside "main".
  (gpg_packet_decrypt): Renamed to "pgp_packet_decrypt"; all callers
                        changed.  Changed "new_packet_capacity" and
                        "new_packet_length" to be ssize_t.  Cast
                        arguments to realloc.
  (debuggnutls): Attribute "level" argument as unused.
  (empty_log): Attribute "level" and "txt" arguments as unused.
  (start_mandos_communication): New argument "if_index".  Bug fix:
                                check ret, no tcp_sd, for errors from
                                setsockopt.  Use "if_index" directly
                                instead of looking up the index.  Loop
                                around fwrite until all data is written.
  (resolve_callback): Attribute "txt", and "flags" as usused.  Added
                      default case to switch.  Also show server host
                      name.  Call start_mandos_communication with
                      "interface".
  (browse_callback): Added default case to switch.
  (main): Variable "interface" moved here.  Cast "srand" argument.
          Bug fix: Call avahi_s_service_browser_new with index of
          "interface", not "eth0".

* passprompt.c: Added copyright header.
  (termination_handler): Attribute "signum" argument as unused.

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugins.d/mandosclient.c
8
8
 * includes the following functions: "resolve_callback",
9
9
 * "browse_callback", and parts of "main".
10
10
 * 
11
 
 * Everything else is
12
 
 * Copyright © 2007-2008 Teddy Hogeborn & Björn Påhlsson
 
11
 * Everything else is Copyright © 2007-2008 Teddy Hogeborn and Björn
 
12
 * Påhlsson.
13
13
 * 
14
14
 * This program is free software: you can redistribute it and/or
15
15
 * modify it under the terms of the GNU General Public License as
25
25
 * along with this program.  If not, see
26
26
 * <http://www.gnu.org/licenses/>.
27
27
 * 
28
 
 * Contact the authors at <mandos@fukt.bsnet.se>.
 
28
 * Contact the authors at <https://www.fukt.bsnet.se/~belorn/> and
 
29
 * <https://www.fukt.bsnet.se/~teddy/>.
29
30
 */
30
31
 
31
 
/* Needed by GPGME, specifically gpgme_data_seek() */
 
32
#define _FORTIFY_SOURCE 2
 
33
 
32
34
#define _LARGEFILE_SOURCE
33
35
#define _FILE_OFFSET_BITS 64
34
36
 
46
48
#include <avahi-common/error.h>
47
49
 
48
50
//mandos client part
49
 
#include <sys/types.h>          /* socket(), inet_pton() */
50
 
#include <sys/socket.h>         /* socket(), struct sockaddr_in6,
 
51
#include <sys/types.h>          /* socket(), setsockopt(),
 
52
                                   inet_pton() */
 
53
#include <sys/socket.h>         /* socket(), setsockopt(),
 
54
                                   struct sockaddr_in6,
51
55
                                   struct in6_addr, inet_pton() */
52
56
#include <gnutls/gnutls.h>      /* All GnuTLS stuff */
53
57
#include <gnutls/openpgp.h>     /* GnuTLS with openpgp stuff */
66
70
// getopt long
67
71
#include <getopt.h>
68
72
 
 
73
#ifndef CERT_ROOT
 
74
#define CERT_ROOT "/conf/conf.d/cryptkeyreq/"
 
75
#endif
 
76
#define CERTFILE CERT_ROOT "openpgp-client.txt"
 
77
#define KEYFILE CERT_ROOT "openpgp-client-key.txt"
69
78
#define BUFFER_SIZE 256
70
79
#define DH_BITS 1024
71
80
 
72
 
const char *certdir = "/conf/conf.d/cryptkeyreq/";
73
 
const char *certfile = "openpgp-client.txt";
74
 
const char *certkey = "openpgp-client-key.txt";
75
 
 
76
81
bool debug = false;
77
82
 
78
83
typedef struct {
98
103
  
99
104
  /* Init GPGME */
100
105
  gpgme_check_version(NULL);
101
 
  rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
102
 
  if (rc != GPG_ERR_NO_ERROR){
103
 
    fprintf(stderr, "bad gpgme_engine_check_version: %s: %s\n",
104
 
            gpgme_strsource(rc), gpgme_strerror(rc));
105
 
    return -1;
106
 
  }
 
106
  gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
107
107
  
108
108
  /* Set GPGME home directory */
109
109
  rc = gpgme_get_engine_info (&engine_info);
195
195
  gpgme_data_release(dh_crypto);
196
196
  
197
197
  /* Seek back to the beginning of the GPGME plaintext data buffer */
198
 
  if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){
199
 
    perror("pgpme_data_seek");
200
 
  }
201
 
  
 
198
  gpgme_data_seek(dh_plain, 0, SEEK_SET);
 
199
 
202
200
  *new_packet = 0;
203
201
  while(true){
204
202
    if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
257
255
  if(debug){
258
256
    fprintf(stderr, "Initializing GnuTLS\n");
259
257
  }
260
 
 
 
258
  
261
259
  if ((ret = gnutls_global_init ())
262
260
      != GNUTLS_E_SUCCESS) {
263
261
    fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
279
277
  
280
278
  if(debug){
281
279
    fprintf(stderr, "Attempting to use OpenPGP certificate %s"
282
 
            " and keyfile %s as GnuTLS credentials\n", certfile,
283
 
            certkey);
 
280
            " and keyfile %s as GnuTLS credentials\n", CERTFILE,
 
281
            KEYFILE);
284
282
  }
285
283
  
286
284
  ret = gnutls_certificate_set_openpgp_key_file
287
 
    (es->cred, certfile, certkey, GNUTLS_OPENPGP_FMT_BASE64);
 
285
    (es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
288
286
  if (ret != GNUTLS_E_SUCCESS) {
289
287
    fprintf
290
288
      (stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
291
289
       " '%s')\n",
292
 
       ret, certfile, certkey);
 
290
       ret, CERTFILE, KEYFILE);
293
291
    fprintf(stdout, "The Error is: %s\n",
294
292
            safer_gnutls_strerror(ret));
295
293
    return -1;
347
345
void empty_log(__attribute__((unused)) AvahiLogLevel level,
348
346
               __attribute__((unused)) const char *txt){}
349
347
 
350
 
int start_mandos_communication(const char *ip, uint16_t port,
351
 
                               AvahiIfIndex if_index){
 
348
int start_mandos_communication(char *ip, uint16_t port,
 
349
                               unsigned int if_index){
352
350
  int ret, tcp_sd;
353
351
  struct sockaddr_in6 to;
354
352
  encrypted_session es;
357
355
  size_t buffer_length = 0;
358
356
  size_t buffer_capacity = 0;
359
357
  ssize_t decrypted_buffer_size;
360
 
  size_t written = 0;
361
358
  int retval = 0;
362
359
  char interface[IF_NAMESIZE];
363
360
  
364
361
  if(debug){
365
 
    fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
366
 
            ip, port);
 
362
    fprintf(stderr, "Setting up a tcp connection to %s\n", ip);
367
363
  }
368
364
  
369
365
  tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
372
368
    return -1;
373
369
  }
374
370
  
375
 
  if(if_indextoname((unsigned int)if_index, interface) == NULL){
 
371
  if(if_indextoname(if_index, interface) == NULL){
376
372
    if(debug){
377
373
      perror("if_indextoname");
378
374
    }
383
379
    fprintf(stderr, "Binding to interface %s\n", interface);
384
380
  }
385
381
  
386
 
  memset(&to,0,sizeof(to));     /* Spurious warning */
 
382
  ret = setsockopt(tcp_sd, SOL_SOCKET, SO_BINDTODEVICE, interface, 5);
 
383
  if(ret < 0) {
 
384
    perror("setsockopt bindtodevice");
 
385
    return -1;
 
386
  }
 
387
  
 
388
  memset(&to,0,sizeof(to));
387
389
  to.sin6_family = AF_INET6;
388
390
  ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
389
391
  if (ret < 0 ){
394
396
    fprintf(stderr, "Bad address: %s\n", ip);
395
397
    return -1;
396
398
  }
397
 
  to.sin6_port = htons(port);   /* Spurious warning */
 
399
  /* Spurious warnings for the next line, see for instance
 
400
     <http://bugs.debian.org/488884> */
 
401
  to.sin6_port = htons(port);
398
402
  
399
403
  to.sin6_scope_id = (uint32_t)if_index;
400
404
  
401
405
  if(debug){
402
 
    fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
403
 
/*     char addrstr[INET6_ADDRSTRLEN]; */
404
 
/*     if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr, */
405
 
/*               sizeof(addrstr)) == NULL){ */
406
 
/*       perror("inet_ntop"); */
407
 
/*     } else { */
408
 
/*       fprintf(stderr, "Really connecting to: %s, port %d\n", */
409
 
/*            addrstr, ntohs(to.sin6_port)); */
410
 
/*     } */
 
406
    fprintf(stderr, "Connection to: %s\n", ip);
411
407
  }
412
408
  
413
409
  ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
432
428
  ret = gnutls_handshake (es.session);
433
429
  
434
430
  if (ret != GNUTLS_E_SUCCESS){
435
 
    if(debug){
436
 
      fprintf(stderr, "\n*** Handshake failed ***\n");
437
 
      gnutls_perror (ret);
438
 
    }
 
431
    fprintf(stderr, "\n*** Handshake failed ***\n");
 
432
    gnutls_perror (ret);
439
433
    retval = -1;
440
434
    goto exit;
441
435
  }
492
486
    decrypted_buffer_size = pgp_packet_decrypt(buffer,
493
487
                                               buffer_length,
494
488
                                               &decrypted_buffer,
495
 
                                               certdir);
 
489
                                               CERT_ROOT);
496
490
    if (decrypted_buffer_size >= 0){
497
 
      while(written < (size_t) decrypted_buffer_size){
498
 
        ret = (int)fwrite (decrypted_buffer + written, 1,
499
 
                           (size_t)decrypted_buffer_size - written,
500
 
                           stdout);
 
491
      while(decrypted_buffer_size > 0){
 
492
        ret = fwrite (decrypted_buffer, 1, (size_t)decrypted_buffer_size,
 
493
                      stdout);
501
494
        if(ret == 0 and ferror(stdout)){
502
495
          if(debug){
503
496
            fprintf(stderr, "Error writing encrypted data: %s\n",
506
499
          retval = -1;
507
500
          break;
508
501
        }
509
 
        written += (size_t)ret;
 
502
        decrypted_buffer += ret;
 
503
        decrypted_buffer_size -= ret;
510
504
      }
511
505
      free(decrypted_buffer);
512
506
    } else {
535
529
 
536
530
static void resolve_callback(
537
531
    AvahiSServiceResolver *r,
538
 
    AvahiIfIndex interface,
 
532
    AVAHI_GCC_UNUSED AvahiIfIndex interface,
539
533
    AVAHI_GCC_UNUSED AvahiProtocol protocol,
540
534
    AvahiResolverEvent event,
541
535
    const char *name,
548
542
    AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
549
543
    AVAHI_GCC_UNUSED void* userdata) {
550
544
    
551
 
  assert(r);                    /* Spurious warning */
552
 
  
 
545
  assert(r);
 
546
 
553
547
  /* Called whenever a service has been resolved successfully or
554
548
     timed out */
555
 
  
 
549
 
556
550
  switch (event) {
557
551
  default:
558
552
  case AVAHI_RESOLVER_FAILURE:
560
554
            " type '%s' in domain '%s': %s\n", name, type, domain,
561
555
            avahi_strerror(avahi_server_errno(server)));
562
556
    break;
563
 
    
 
557
      
564
558
  case AVAHI_RESOLVER_FOUND:
565
559
    {
566
560
      char ip[AVAHI_ADDRESS_STR_MAX];
567
561
      avahi_address_snprint(ip, sizeof(ip), address);
568
562
      if(debug){
569
 
        fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
570
 
                " port %d\n", name, host_name, ip, port);
 
563
        fprintf(stderr, "Mandos server found on %s (%s) on port %d\n",
 
564
                host_name, ip, port);
571
565
      }
572
 
      int ret = start_mandos_communication(ip, port, interface);
 
566
      int ret = start_mandos_communication(ip, port,
 
567
                                           (unsigned int)
 
568
                                           interface);
573
569
      if (ret == 0){
574
570
        exit(EXIT_SUCCESS);
 
571
      } else {
 
572
        exit(EXIT_FAILURE);
575
573
      }
576
574
    }
577
575
  }
590
588
    void* userdata) {
591
589
    
592
590
    AvahiServer *s = userdata;
593
 
    assert(b);                  /* Spurious warning */
594
 
    
 
591
    assert(b);
 
592
 
595
593
    /* Called whenever a new services becomes available on the LAN or
596
594
       is removed from the LAN */
597
 
    
 
595
 
598
596
    switch (event) {
599
597
    default:
600
598
    case AVAHI_BROWSER_FAILURE:
627
625
    }
628
626
}
629
627
 
630
 
/* combinds file name and path and returns the malloced new string. som sane checks could/should be added */
631
 
const char *combinepath(const char *first, const char *second){
632
 
  char *tmp;
633
 
  tmp = malloc(strlen(first) + strlen(second) + 2);
634
 
  if (tmp == NULL){
635
 
    perror("malloc");
636
 
    return NULL;
637
 
  }
638
 
  strcpy(tmp, first);
639
 
  if (first[0] != '\0' and first[strlen(first) - 1] != '/'){
640
 
    strcat(tmp, "/");
641
 
  }
642
 
  strcat(tmp, second);
643
 
  return tmp;
644
 
}
645
 
 
646
 
 
647
628
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
648
629
    AvahiServerConfig config;
649
630
    AvahiSServiceBrowser *sb = NULL;
650
631
    int error;
651
632
    int ret;
652
633
    int returncode = EXIT_SUCCESS;
653
 
    const char *interface = NULL;
654
 
    AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
655
 
    char *connect_to = NULL;
 
634
    const char *interface = "eth0";
656
635
    
657
636
    while (true){
658
637
      static struct option long_options[] = {
659
638
        {"debug", no_argument, (int *)&debug, 1},
660
 
        {"connect", required_argument, 0, 'C'},
661
639
        {"interface", required_argument, 0, 'i'},
662
 
        {"certdir", required_argument, 0, 'd'},
663
 
        {"certkey", required_argument, 0, 'c'},
664
 
        {"certfile", required_argument, 0, 'k'},
665
640
        {0, 0, 0, 0} };
666
 
      
 
641
 
667
642
      int option_index = 0;
668
643
      ret = getopt_long (argc, argv, "i:", long_options,
669
644
                         &option_index);
670
 
      
 
645
 
671
646
      if (ret == -1){
672
647
        break;
673
648
      }
678
653
      case 'i':
679
654
        interface = optarg;
680
655
        break;
681
 
      case 'C':
682
 
        connect_to = optarg;
683
 
        break;
684
 
      case 'd':
685
 
        certdir = optarg;
686
 
        break;
687
 
      case 'c':
688
 
        certfile = optarg;
689
 
        break;
690
 
      case 'k':
691
 
        certkey = optarg;
692
 
        break;
693
656
      default:
694
657
        exit(EXIT_FAILURE);
695
658
      }
696
659
    }
697
 
 
698
 
    certfile = combinepath(certdir, certfile);
699
 
    if (certfile == NULL){
700
 
      goto exit;
701
 
    }
702
 
    
703
 
    if(interface != NULL){
704
 
      if_index = (AvahiIfIndex) if_nametoindex(interface);
705
 
      if(if_index == 0){
706
 
        fprintf(stderr, "No such interface: \"%s\"\n", interface);
707
 
        exit(EXIT_FAILURE);
708
 
      }
709
 
    }
710
 
    
711
 
    if(connect_to != NULL){
712
 
      /* Connect directly, do not use Zeroconf */
713
 
      /* (Mainly meant for debugging) */
714
 
      char *address = strrchr(connect_to, ':');
715
 
      if(address == NULL){
716
 
        fprintf(stderr, "No colon in address\n");
717
 
        exit(EXIT_FAILURE);
718
 
      }
719
 
      errno = 0;
720
 
      uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
721
 
      if(errno){
722
 
        perror("Bad port number");
723
 
        exit(EXIT_FAILURE);
724
 
      }
725
 
      *address = '\0';
726
 
      address = connect_to;
727
 
      ret = start_mandos_communication(address, port, if_index);
728
 
      if(ret < 0){
729
 
        exit(EXIT_FAILURE);
730
 
      } else {
731
 
        exit(EXIT_SUCCESS);
732
 
      }
733
 
    }
734
 
    
735
 
    certkey = combinepath(certdir, certkey);
736
 
    if (certkey == NULL){
737
 
      goto exit;
738
 
    }
739
660
    
740
661
    if (not debug){
741
662
      avahi_set_log_function(empty_log);
774
695
    }
775
696
    
776
697
    /* Create the service browser */
777
 
    sb = avahi_s_service_browser_new(server, if_index,
 
698
    sb = avahi_s_service_browser_new(server,
 
699
                                     (AvahiIfIndex)
 
700
                                     if_nametoindex(interface),
778
701
                                     AVAHI_PROTO_INET6,
779
702
                                     "_mandos._tcp", NULL, 0,
780
703
                                     browse_callback, server);
808
731
 
809
732
    if (simple_poll)
810
733
        avahi_simple_poll_free(simple_poll);
811
 
    free(certfile);
812
 
    free(certkey);
813
 
    
 
734
 
814
735
    return returncode;
815
736
}