64
62
#include <string.h> /* memset */
65
63
#include <arpa/inet.h> /* inet_pton() */
66
64
#include <iso646.h> /* not */
67
#include <net/if.h> /* IF_NAMESIZE */
68
#include <argp.h> /* struct argp_option,
69
struct argp_state, struct argp,
72
67
#include <errno.h> /* perror() */
75
73
#define BUFFER_SIZE 256
75
static const char *keydir = "/conf/conf.d/mandos";
76
static const char *pubkeyfile = "pubkey.txt";
77
static const char *seckeyfile = "seckey.txt";
77
79
bool debug = false;
78
static const char *keydir = "/conf/conf.d/mandos";
79
static const char mandos_protocol_version[] = "1";
80
const char *argp_program_version = "mandosclient 0.9";
81
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
83
/* Used for passing in values through the Avahi callback functions */
81
/* Used for passing in values through all the callback functions */
85
83
AvahiSimplePoll *simple_poll;
86
84
AvahiServer *server;
87
85
gnutls_certificate_credentials_t cred;
88
86
unsigned int dh_bits;
89
gnutls_dh_params_t dh_params;
90
87
const char *priority;
94
* Make room in "buffer" for at least BUFFER_SIZE additional bytes.
95
* "buffer_capacity" is how much is currently allocated,
96
* "buffer_length" is how much is already used.
98
size_t adjustbuffer(char **buffer, size_t buffer_length,
99
size_t buffer_capacity){
100
if (buffer_length + BUFFER_SIZE > buffer_capacity){
101
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
105
buffer_capacity += BUFFER_SIZE;
107
return buffer_capacity;
111
91
* Decrypt OpenPGP data using keyrings in HOMEDIR.
112
92
* Returns -1 on error
302
284
if ((ret = gnutls_global_init ())
303
285
!= GNUTLS_E_SUCCESS) {
304
fprintf (stderr, "GnuTLS global_init: %s\n",
305
safer_gnutls_strerror(ret));
286
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
310
/* "Use a log level over 10 to enable all debugging options."
313
291
gnutls_global_set_log_level(11);
314
292
gnutls_global_set_log_function(debuggnutls);
317
/* OpenPGP credentials */
295
/* openpgp credentials */
318
296
if ((ret = gnutls_certificate_allocate_credentials (&mc->cred))
319
297
!= GNUTLS_E_SUCCESS) {
320
fprintf (stderr, "GnuTLS memory error: %s\n",
298
fprintf (stderr, "memory error: %s\n",
321
299
safer_gnutls_strerror(ret));
331
309
ret = gnutls_certificate_set_openpgp_key_file
332
310
(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);
333
311
if (ret != GNUTLS_E_SUCCESS) {
335
"Error[%d] while reading the OpenPGP key pair ('%s',"
336
" '%s')\n", ret, pubkeyfile, seckeyfile);
337
fprintf(stdout, "The GnuTLS error is: %s\n",
313
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
315
ret, pubkeyfile, seckeyfile);
316
fprintf(stdout, "The Error is: %s\n",
338
317
safer_gnutls_strerror(ret));
342
/* GnuTLS server initialization */
343
ret = gnutls_dh_params_init(&mc->dh_params);
344
if (ret != GNUTLS_E_SUCCESS) {
345
fprintf (stderr, "Error in GnuTLS DH parameter initialization:"
346
" %s\n", safer_gnutls_strerror(ret));
349
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
350
if (ret != GNUTLS_E_SUCCESS) {
351
fprintf (stderr, "Error in GnuTLS prime generation: %s\n",
352
safer_gnutls_strerror(ret));
356
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
361
static int init_gnutls_session(mandos_context *mc,
362
gnutls_session_t *session){
364
/* GnuTLS session creation */
365
ret = gnutls_init(session, GNUTLS_SERVER);
366
if (ret != GNUTLS_E_SUCCESS){
321
//GnuTLS server initialization
322
if ((ret = gnutls_dh_params_init(dh_params))
323
!= GNUTLS_E_SUCCESS) {
324
fprintf (stderr, "Error in dh parameter initialization: %s\n",
325
safer_gnutls_strerror(ret));
329
if ((ret = gnutls_dh_params_generate2(*dh_params, mc->dh_bits))
330
!= GNUTLS_E_SUCCESS) {
331
fprintf (stderr, "Error in prime generation: %s\n",
332
safer_gnutls_strerror(ret));
336
gnutls_certificate_set_dh_params(mc->cred, *dh_params);
338
// GnuTLS session creation
339
if ((ret = gnutls_init(session, GNUTLS_SERVER))
340
!= GNUTLS_E_SUCCESS){
367
341
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
368
342
safer_gnutls_strerror(ret));
373
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
374
if (ret != GNUTLS_E_SUCCESS) {
375
fprintf(stderr, "Syntax error at: %s\n", err);
376
fprintf(stderr, "GnuTLS error: %s\n",
377
safer_gnutls_strerror(ret));
345
if ((ret = gnutls_priority_set_direct(*session, mc->priority, &err))
346
!= GNUTLS_E_SUCCESS) {
347
fprintf(stderr, "Syntax error at: %s\n", err);
348
fprintf(stderr, "GnuTLS error: %s\n",
349
safer_gnutls_strerror(ret));
382
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
384
if (ret != GNUTLS_E_SUCCESS) {
385
fprintf(stderr, "Error setting GnuTLS credentials: %s\n",
353
if ((ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
355
!= GNUTLS_E_SUCCESS) {
356
fprintf(stderr, "Error setting a credentials set: %s\n",
386
357
safer_gnutls_strerror(ret));
399
/* Avahi log function callback */
400
370
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
401
371
__attribute__((unused)) const char *txt){}
403
/* Called when a Mandos server is found */
404
373
static int start_mandos_communication(const char *ip, uint16_t port,
405
374
AvahiIfIndex if_index,
406
375
mandos_context *mc){
408
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
377
struct sockaddr_in6 to;
409
378
char *buffer = NULL;
410
379
char *decrypted_buffer;
411
380
size_t buffer_length = 0;
412
381
size_t buffer_capacity = 0;
413
382
ssize_t decrypted_buffer_size;
416
385
char interface[IF_NAMESIZE];
417
386
gnutls_session_t session;
419
ret = init_gnutls_session (mc, &session);
387
gnutls_dh_params_t dh_params;
425
390
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
473
ret = connect(tcp_sd, &to.in, sizeof(to));
436
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
475
438
perror("connect");
479
const char *out = mandos_protocol_version;
482
size_t out_size = strlen(out);
483
ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
484
out_size - written));
490
written += (size_t)ret;
491
if(written < out_size){
494
if (out == mandos_protocol_version){
442
ret = initgnutls (mc, &session, &dh_params);
448
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
504
451
fprintf(stderr, "Establishing TLS session with %s\n", ip);
507
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
509
454
ret = gnutls_handshake (session);
511
456
if (ret != GNUTLS_E_SUCCESS){
513
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
458
fprintf(stderr, "\n*** Handshake failed ***\n");
514
459
gnutls_perror (ret);
520
/* Read OpenPGP packet that contains the wanted password */
465
//Retrieve OpenPGP packet that contains the wanted password
523
468
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
546
492
case GNUTLS_E_REHANDSHAKE:
547
493
ret = gnutls_handshake (session);
549
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
495
fprintf(stderr, "\n*** Handshake failed ***\n");
550
496
gnutls_perror (ret);
556
502
fprintf(stderr, "Unknown error while reading data from"
557
" encrypted session with Mandos server\n");
503
" encrypted session with mandos server\n");
559
505
gnutls_bye (session, GNUTLS_SHUT_RDWR);
563
509
buffer_length += (size_t) ret;
568
fprintf(stderr, "Closing TLS session\n");
571
gnutls_bye (session, GNUTLS_SHUT_RDWR);
573
513
if (buffer_length > 0){
574
514
decrypted_buffer_size = pgp_packet_decrypt(buffer,
576
516
&decrypted_buffer,
578
518
if (decrypted_buffer_size >= 0){
580
519
while(written < (size_t) decrypted_buffer_size){
581
520
ret = (int)fwrite (decrypted_buffer + written, 1,
582
521
(size_t)decrypted_buffer_size - written,
674
618
case AVAHI_BROWSER_FAILURE:
676
fprintf(stderr, "(Avahi browser) %s\n",
620
fprintf(stderr, "(Browser) %s\n",
677
621
avahi_strerror(avahi_server_errno(mc->server)));
678
622
avahi_simple_poll_quit(mc->simple_poll);
681
625
case AVAHI_BROWSER_NEW:
682
/* We ignore the returned Avahi resolver object. In the callback
683
function we free it. If the Avahi server is terminated before
684
the callback function is called the Avahi server will free the
626
/* We ignore the returned resolver object. In the callback
627
function we free it. If the server is terminated before
628
the callback function is called the server will free
629
the resolver for us. */
687
631
if (!(avahi_s_service_resolver_new(mc->server, interface,
688
632
protocol, name, type, domain,
689
633
AVAHI_PROTO_INET6, 0,
690
634
resolve_callback, mc)))
691
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
692
name, avahi_strerror(avahi_server_errno(mc->server)));
635
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
636
avahi_strerror(avahi_server_errno(mc->server)));
695
639
case AVAHI_BROWSER_REMOVE:
728
int main(int argc, char *argv[]){
669
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
670
AvahiServerConfig config;
729
671
AvahiSServiceBrowser *sb = NULL;
732
int exitcode = EXIT_SUCCESS;
675
int returncode = EXIT_SUCCESS;
733
676
const char *interface = "eth0";
734
677
struct ifreq network;
738
679
char *connect_to = NULL;
739
680
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
740
const char *pubkeyfile = "pubkey.txt";
741
const char *seckeyfile = "seckey.txt";
742
681
mandos_context mc = { .simple_poll = NULL, .server = NULL,
743
682
.dh_bits = 1024, .priority = "SECURE256"};
746
struct argp_option options[] = {
747
{ .name = "debug", .key = 128,
748
.doc = "Debug mode", .group = 3 },
749
{ .name = "connect", .key = 'c',
751
.doc = "Connect directly to a sepcified mandos server",
753
{ .name = "interface", .key = 'i',
755
.doc = "Interface that Avahi will conntect through",
757
{ .name = "keydir", .key = 'd',
759
.doc = "Directory where the openpgp keyring is",
761
{ .name = "seckey", .key = 's',
763
.doc = "Secret openpgp key for gnutls authentication",
765
{ .name = "pubkey", .key = 'p',
767
.doc = "Public openpgp key for gnutls authentication",
769
{ .name = "dh-bits", .key = 129,
771
.doc = "dh-bits to use in gnutls communication",
773
{ .name = "priority", .key = 130,
775
.doc = "GNUTLS priority", .group = 1 },
780
error_t parse_opt (int key, char *arg,
781
struct argp_state *state) {
782
/* Get the INPUT argument from `argp_parse', which we know is
783
a pointer to our plugin list pointer. */
805
mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
820
return ARGP_ERR_UNKNOWN;
684
debug_int = debug ? 1 : 0;
686
struct option long_options[] = {
687
{"debug", no_argument, &debug_int, 1},
688
{"connect", required_argument, NULL, 'c'},
689
{"interface", required_argument, NULL, 'i'},
690
{"keydir", required_argument, NULL, 'd'},
691
{"seckey", required_argument, NULL, 's'},
692
{"pubkey", required_argument, NULL, 'p'},
693
{"dh-bits", required_argument, NULL, 'D'},
694
{"priority", required_argument, NULL, 'P'},
697
int option_index = 0;
698
ret = getopt_long (argc, argv, "i:", long_options,
725
mc.dh_bits = (unsigned int) strtol(optarg, NULL, 10);
732
mc.priority = optarg;
825
struct argp argp = { .options = options, .parser = parse_opt,
827
.doc = "Mandos client -- Get and decrypt"
828
" passwords from mandos server" };
829
argp_parse (&argp, argc, argv, 0, 0, NULL);
739
debug = debug_int ? true : false;
832
741
pubkeyfile = combinepath(keydir, pubkeyfile);
833
742
if (pubkeyfile == NULL){
834
743
perror("combinepath");
835
exitcode = EXIT_FAILURE;
744
returncode = EXIT_FAILURE;
839
748
seckeyfile = combinepath(keydir, seckeyfile);
840
749
if (seckeyfile == NULL){
841
750
perror("combinepath");
845
ret = init_gnutls_global(&mc, pubkeyfile, seckeyfile);
847
fprintf(stderr, "init_gnutls_global\n");
864
754
if_index = (AvahiIfIndex) if_nametoindex(interface);
873
763
char *address = strrchr(connect_to, ':');
874
764
if(address == NULL){
875
765
fprintf(stderr, "No colon in address\n");
876
exitcode = EXIT_FAILURE;
880
769
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
882
771
perror("Bad port number");
883
exitcode = EXIT_FAILURE;
887
775
address = connect_to;
888
776
ret = start_mandos_communication(address, port, if_index, &mc);
890
exitcode = EXIT_FAILURE;
892
exitcode = EXIT_SUCCESS;
897
/* If the interface is down, bring it up */
899
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
902
exitcode = EXIT_FAILURE;
905
strcpy(network.ifr_name, interface); /* Spurious warning */
906
ret = ioctl(sd, SIOCGIFFLAGS, &network);
784
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
787
returncode = EXIT_FAILURE;
790
strcpy(network.ifr_name, interface); /* Spurious warning */
791
ret = ioctl(sd, SIOCGIFFLAGS, &network);
794
perror("ioctl SIOCGIFFLAGS");
795
returncode = EXIT_FAILURE;
798
if((network.ifr_flags & IFF_UP) == 0){
799
network.ifr_flags |= IFF_UP;
800
ret = ioctl(sd, SIOCSIFFLAGS, &network);
908
perror("ioctl SIOCGIFFLAGS");
909
exitcode = EXIT_FAILURE;
912
if((network.ifr_flags & IFF_UP) == 0){
913
network.ifr_flags |= IFF_UP;
914
ret = ioctl(sd, SIOCSIFFLAGS, &network);
916
perror("ioctl SIOCSIFFLAGS");
917
exitcode = EXIT_FAILURE;
802
perror("ioctl SIOCSIFFLAGS");
803
returncode = EXIT_FAILURE;
925
810
avahi_set_log_function(empty_log);
928
/* Initialize the pseudo-RNG for Avahi */
813
/* Initialize the psuedo-RNG */
929
814
srand((unsigned int) time(NULL));
931
/* Allocate main Avahi loop object */
932
mc.simple_poll = avahi_simple_poll_new();
933
if (mc.simple_poll == NULL) {
934
fprintf(stderr, "Avahi: Failed to create simple poll"
936
exitcode = EXIT_FAILURE;
941
AvahiServerConfig config;
942
/* Do not publish any local Zeroconf records */
943
avahi_server_config_init(&config);
944
config.publish_hinfo = 0;
945
config.publish_addresses = 0;
946
config.publish_workstation = 0;
947
config.publish_domain = 0;
949
/* Allocate a new server */
950
mc.server = avahi_server_new(avahi_simple_poll_get
951
(mc.simple_poll), &config, NULL,
954
/* Free the Avahi configuration data */
955
avahi_server_config_free(&config);
958
/* Check if creating the Avahi server object succeeded */
959
if (mc.server == NULL) {
960
fprintf(stderr, "Failed to create Avahi server: %s\n",
816
/* Allocate main loop object */
817
if (!(mc.simple_poll = avahi_simple_poll_new())) {
818
fprintf(stderr, "Failed to create simple poll object.\n");
819
returncode = EXIT_FAILURE;
823
/* Do not publish any local records */
824
avahi_server_config_init(&config);
825
config.publish_hinfo = 0;
826
config.publish_addresses = 0;
827
config.publish_workstation = 0;
828
config.publish_domain = 0;
830
/* Allocate a new server */
831
mc.server=avahi_server_new(avahi_simple_poll_get(mc.simple_poll),
832
&config, NULL, NULL, &error);
834
/* Free the configuration data */
835
avahi_server_config_free(&config);
837
/* Check if creating the server object succeeded */
839
fprintf(stderr, "Failed to create server: %s\n",
961
840
avahi_strerror(error));
962
exitcode = EXIT_FAILURE;
841
returncode = EXIT_FAILURE;
966
/* Create the Avahi service browser */
845
/* Create the service browser */
967
846
sb = avahi_s_service_browser_new(mc.server, if_index,
968
847
AVAHI_PROTO_INET6,
969
848
"_mandos._tcp", NULL, 0,
970
849
browse_callback, &mc);
972
851
fprintf(stderr, "Failed to create service browser: %s\n",
973
852
avahi_strerror(avahi_server_errno(mc.server)));
974
exitcode = EXIT_FAILURE;
853
returncode = EXIT_FAILURE;
978
857
/* Run the main loop */
981
fprintf(stderr, "Starting Avahi loop search\n");
860
fprintf(stderr, "Starting avahi loop search\n");
984
863
avahi_simple_poll_loop(mc.simple_poll);
989
868
fprintf(stderr, "%s exiting\n", argv[0]);
992
871
/* Cleanup things */
994
873
avahi_s_service_browser_free(sb);
996
if (mc.server != NULL)
997
876
avahi_server_free(mc.server);
999
if (mc.simple_poll != NULL)
1000
879
avahi_simple_poll_free(mc.simple_poll);
1001
880
free(pubkeyfile);
1002
881
free(seckeyfile);