32
32
#define _LARGEFILE_SOURCE
33
33
#define _FILE_OFFSET_BITS 64
39
#include <net/if.h> /* if_nametoindex */
40
#include <sys/ioctl.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
35
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY() */
37
#include <stdio.h> /* fprintf(), stderr, fwrite(), stdout,
39
#include <stdint.h> /* uint16_t, uint32_t */
40
#include <stddef.h> /* NULL, size_t, ssize_t */
41
#include <stdlib.h> /* free(), EXIT_SUCCESS, EXIT_FAILURE,
43
#include <stdbool.h> /* bool, true */
44
#include <string.h> /* memset(), strcmp(), strlen(),
45
strerror(), memcpy(), strcpy() */
46
#include <sys/ioctl.h> /* ioctl */
47
#include <sys/types.h> /* socket(), inet_pton(), sockaddr,
48
sockaddr_in6, PF_INET6,
49
SOCK_STREAM, INET6_ADDRSTRLEN,
51
#include <inttypes.h> /* PRIu16 */
52
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
53
struct in6_addr, inet_pton(),
55
#include <assert.h> /* assert() */
56
#include <errno.h> /* perror(), errno */
57
#include <time.h> /* time() */
42
58
#include <net/if.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
59
SIOCSIFFLAGS, if_indextoname(),
60
if_nametoindex(), IF_NAMESIZE */
61
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
62
getuid(), getgid(), setuid(),
64
#include <netinet/in.h>
65
#include <arpa/inet.h> /* inet_pton(), htons */
66
#include <iso646.h> /* not, and */
67
#include <argp.h> /* struct argp_option, error_t, struct
68
argp_state, struct argp,
69
argp_parse(), ARGP_KEY_ARG,
70
ARGP_KEY_END, ARGP_ERR_UNKNOWN */
73
/* All Avahi types, constants and functions
45
76
#include <avahi-core/core.h>
46
77
#include <avahi-core/lookup.h>
47
78
#include <avahi-core/log.h>
49
80
#include <avahi-common/malloc.h>
50
81
#include <avahi-common/error.h>
52
/* Mandos client part */
53
#include <sys/types.h> /* socket(), inet_pton() */
54
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
55
struct in6_addr, inet_pton() */
56
#include <gnutls/gnutls.h> /* All GnuTLS stuff */
57
#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */
59
#include <unistd.h> /* close() */
60
#include <netinet/in.h>
61
#include <stdbool.h> /* true */
62
#include <string.h> /* memset */
63
#include <arpa/inet.h> /* inet_pton() */
64
#include <iso646.h> /* not */
65
#include <net/if.h> /* IF_NAMESIZE */
84
#include <gnutls/gnutls.h> /* All GnuTLS types, constants and functions
86
init_gnutls_session(),
88
#include <gnutls/openpgp.h> /* gnutls_certificate_set_openpgp_key_file(),
89
GNUTLS_OPENPGP_FMT_BASE64 */
68
#include <errno.h> /* perror() */
92
#include <gpgme.h> /* All GPGME types, constants and functions
94
GPGME_PROTOCOL_OpenPGP,
74
97
#define BUFFER_SIZE 256
76
100
static const char *keydir = "/conf/conf.d/mandos";
77
static const char *pubkeyfile = "pubkey.txt";
78
static const char *seckeyfile = "seckey.txt";
82
/* Used for passing in values through all the callback functions */
101
static const char mandos_protocol_version[] = "1";
102
const char *argp_program_version = "password-request 1.0";
103
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
105
/* Used for passing in values through the Avahi callback functions */
84
107
AvahiSimplePoll *simple_poll;
85
108
AvahiServer *server;
86
109
gnutls_certificate_credentials_t cred;
87
110
unsigned int dh_bits;
111
gnutls_dh_params_t dh_params;
88
112
const char *priority;
116
* Make room in "buffer" for at least BUFFER_SIZE additional bytes.
117
* "buffer_capacity" is how much is currently allocated,
118
* "buffer_length" is how much is already used.
120
size_t adjustbuffer(char **buffer, size_t buffer_length,
121
size_t buffer_capacity){
122
if (buffer_length + BUFFER_SIZE > buffer_capacity){
123
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
127
buffer_capacity += BUFFER_SIZE;
129
return buffer_capacity;
92
133
* Decrypt OpenPGP data using keyrings in HOMEDIR.
93
134
* Returns -1 on error
319
359
" '%s')\n", ret, pubkeyfile, seckeyfile);
320
360
fprintf(stdout, "The GnuTLS error is: %s\n",
321
361
safer_gnutls_strerror(ret));
325
365
/* GnuTLS server initialization */
326
ret = gnutls_dh_params_init(dh_params);
366
ret = gnutls_dh_params_init(&mc->dh_params);
327
367
if (ret != GNUTLS_E_SUCCESS) {
328
368
fprintf (stderr, "Error in GnuTLS DH parameter initialization:"
329
369
" %s\n", safer_gnutls_strerror(ret));
332
ret = gnutls_dh_params_generate2(*dh_params, mc->dh_bits);
372
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
333
373
if (ret != GNUTLS_E_SUCCESS) {
334
374
fprintf (stderr, "Error in GnuTLS prime generation: %s\n",
335
375
safer_gnutls_strerror(ret));
339
gnutls_certificate_set_dh_params(mc->cred, *dh_params);
379
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
385
gnutls_certificate_free_credentials(mc->cred);
386
gnutls_global_deinit();
391
static int init_gnutls_session(mandos_context *mc,
392
gnutls_session_t *session){
341
394
/* GnuTLS session creation */
342
395
ret = gnutls_init(session, GNUTLS_SERVER);
343
396
if (ret != GNUTLS_E_SUCCESS){
382
437
AvahiIfIndex if_index,
383
438
mandos_context *mc){
385
struct sockaddr_in6 to;
440
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
386
441
char *buffer = NULL;
387
442
char *decrypted_buffer;
388
443
size_t buffer_length = 0;
389
444
size_t buffer_capacity = 0;
390
445
ssize_t decrypted_buffer_size;
393
448
char interface[IF_NAMESIZE];
394
449
gnutls_session_t session;
395
gnutls_dh_params_t dh_params;
397
ret = initgnutls (mc, &session, &dh_params);
451
ret = init_gnutls_session (mc, &session);
403
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
457
fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
407
461
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
431
485
fprintf(stderr, "Bad address: %s\n", ip);
434
to.sin6_port = htons(port); /* Spurious warning */
488
to.in6.sin6_port = htons(port); /* Spurious warning */
436
to.sin6_scope_id = (uint32_t)if_index;
490
to.in6.sin6_scope_id = (uint32_t)if_index;
439
fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
493
fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
440
495
char addrstr[INET6_ADDRSTRLEN] = "";
441
if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr,
496
if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
442
497
sizeof(addrstr)) == NULL){
443
498
perror("inet_ntop");
451
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
506
ret = connect(tcp_sd, &to.in, sizeof(to));
453
508
perror("connect");
512
const char *out = mandos_protocol_version;
515
size_t out_size = strlen(out);
516
ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
517
out_size - written));
523
written += (size_t)ret;
524
if(written < out_size){
527
if (out == mandos_protocol_version){
458
537
fprintf(stderr, "Establishing TLS session with %s\n", ip);
461
540
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
463
ret = gnutls_handshake (session);
543
ret = gnutls_handshake (session);
544
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
465
546
if (ret != GNUTLS_E_SUCCESS){
596
676
char ip[AVAHI_ADDRESS_STR_MAX];
597
677
avahi_address_snprint(ip, sizeof(ip), address);
599
fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %d) on"
600
" port %d\n", name, host_name, ip, interface, port);
679
fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %"
680
PRIu16 ") on port %d\n", name, host_name, ip,
602
683
int ret = start_mandos_communication(ip, port, interface, mc);
685
avahi_simple_poll_quit(mc->simple_poll);
688
769
const char *interface = "eth0";
689
770
struct ifreq network;
691
774
char *connect_to = NULL;
692
775
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
776
const char *pubkeyfile = "pubkey.txt";
777
const char *seckeyfile = "seckey.txt";
693
778
mandos_context mc = { .simple_poll = NULL, .server = NULL,
694
779
.dh_bits = 1024, .priority = "SECURE256"};
780
bool gnutls_initalized = false;
697
/* Temporary int to get the address of for getopt_long */
698
int debug_int = debug ? 1 : 0;
700
struct option long_options[] = {
701
{"debug", no_argument, &debug_int, 1},
702
{"connect", required_argument, NULL, 'c'},
703
{"interface", required_argument, NULL, 'i'},
704
{"keydir", required_argument, NULL, 'd'},
705
{"seckey", required_argument, NULL, 's'},
706
{"pubkey", required_argument, NULL, 'p'},
707
{"dh-bits", required_argument, NULL, 'D'},
708
{"priority", required_argument, NULL, 'P'},
711
int option_index = 0;
712
ret = getopt_long (argc, argv, "i:", long_options,
783
struct argp_option options[] = {
784
{ .name = "debug", .key = 128,
785
.doc = "Debug mode", .group = 3 },
786
{ .name = "connect", .key = 'c',
788
.doc = "Connect directly to a sepcified mandos server",
790
{ .name = "interface", .key = 'i',
792
.doc = "Interface that Avahi will conntect through",
794
{ .name = "keydir", .key = 'd',
796
.doc = "Directory where the openpgp keyring is",
798
{ .name = "seckey", .key = 's',
800
.doc = "Secret openpgp key for gnutls authentication",
802
{ .name = "pubkey", .key = 'p',
804
.doc = "Public openpgp key for gnutls authentication",
806
{ .name = "dh-bits", .key = 129,
808
.doc = "dh-bits to use in gnutls communication",
810
{ .name = "priority", .key = 130,
812
.doc = "GNUTLS priority", .group = 1 },
817
error_t parse_opt (int key, char *arg,
818
struct argp_state *state) {
819
/* Get the INPUT argument from `argp_parse', which we know is
820
a pointer to our plugin list pointer. */
739
mc.dh_bits = (unsigned int) strtol(optarg, NULL, 10);
842
mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
741
844
perror("strtol");
742
845
exit(EXIT_FAILURE);
746
mc.priority = optarg;
750
/* getopt_long() has already printed a message about the
751
unrcognized option, so just exit. */
856
return ARGP_ERR_UNKNOWN;
755
/* Set the global debug flag from the temporary int */
756
debug = debug_int ? true : false;
861
struct argp argp = { .options = options, .parser = parse_opt,
863
.doc = "Mandos client -- Get and decrypt"
864
" passwords from mandos server" };
865
ret = argp_parse (&argp, argc, argv, 0, 0, NULL);
866
if (ret == ARGP_ERR_UNKNOWN){
867
fprintf(stderr, "Unknown error while parsing arguments\n");
868
exitcode = EXIT_FAILURE;
759
873
pubkeyfile = combinepath(keydir, pubkeyfile);
760
874
if (pubkeyfile == NULL){
761
875
perror("combinepath");
766
880
seckeyfile = combinepath(keydir, seckeyfile);
767
881
if (seckeyfile == NULL){
768
882
perror("combinepath");
883
exitcode = EXIT_FAILURE;
887
ret = init_gnutls_global(&mc, pubkeyfile, seckeyfile);
889
fprintf(stderr, "init_gnutls_global failed\n");
890
exitcode = EXIT_FAILURE;
893
gnutls_initalized = true;
896
/* If the interface is down, bring it up */
898
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
901
exitcode = EXIT_FAILURE;
904
strcpy(network.ifr_name, interface); /* Spurious warning */
905
ret = ioctl(sd, SIOCGIFFLAGS, &network);
907
perror("ioctl SIOCGIFFLAGS");
908
exitcode = EXIT_FAILURE;
911
if((network.ifr_flags & IFF_UP) == 0){
912
network.ifr_flags |= IFF_UP;
913
ret = ioctl(sd, SIOCSIFFLAGS, &network);
915
perror("ioctl SIOCSIFFLAGS");
916
exitcode = EXIT_FAILURE;
772
936
if_index = (AvahiIfIndex) if_nametoindex(interface);
781
945
char *address = strrchr(connect_to, ':');
782
946
if(address == NULL){
783
947
fprintf(stderr, "No colon in address\n");
948
exitcode = EXIT_FAILURE;
787
952
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
789
954
perror("Bad port number");
955
exitcode = EXIT_FAILURE;
793
959
address = connect_to;
794
960
ret = start_mandos_communication(address, port, if_index, &mc);
962
exitcode = EXIT_FAILURE;
802
/* If the interface is down, bring it up */
804
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
807
exitcode = EXIT_FAILURE;
810
strcpy(network.ifr_name, interface); /* Spurious warning */
811
ret = ioctl(sd, SIOCGIFFLAGS, &network);
813
perror("ioctl SIOCGIFFLAGS");
814
exitcode = EXIT_FAILURE;
817
if((network.ifr_flags & IFF_UP) == 0){
818
network.ifr_flags |= IFF_UP;
819
ret = ioctl(sd, SIOCSIFFLAGS, &network);
821
perror("ioctl SIOCSIFFLAGS");
822
exitcode = EXIT_FAILURE;
964
exitcode = EXIT_SUCCESS;