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));
322
gnutls_global_deinit ();
332
309
ret = gnutls_certificate_set_openpgp_key_file
333
310
(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);
334
311
if (ret != GNUTLS_E_SUCCESS) {
336
"Error[%d] while reading the OpenPGP key pair ('%s',"
337
" '%s')\n", ret, pubkeyfile, seckeyfile);
338
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",
339
317
safer_gnutls_strerror(ret));
343
/* GnuTLS server initialization */
344
ret = gnutls_dh_params_init(&mc->dh_params);
345
if (ret != GNUTLS_E_SUCCESS) {
346
fprintf (stderr, "Error in GnuTLS DH parameter initialization:"
347
" %s\n", safer_gnutls_strerror(ret));
350
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
351
if (ret != GNUTLS_E_SUCCESS) {
352
fprintf (stderr, "Error in GnuTLS prime generation: %s\n",
353
safer_gnutls_strerror(ret));
357
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
363
gnutls_certificate_free_credentials (mc->cred);
364
gnutls_global_deinit ();
369
static int init_gnutls_session(mandos_context *mc,
370
gnutls_session_t *session){
372
/* GnuTLS session creation */
373
ret = gnutls_init(session, GNUTLS_SERVER);
374
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){
375
341
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
376
342
safer_gnutls_strerror(ret));
381
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
382
if (ret != GNUTLS_E_SUCCESS) {
383
fprintf(stderr, "Syntax error at: %s\n", err);
384
fprintf(stderr, "GnuTLS error: %s\n",
385
safer_gnutls_strerror(ret));
386
gnutls_deinit (*session);
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));
391
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
393
if (ret != GNUTLS_E_SUCCESS) {
394
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",
395
357
safer_gnutls_strerror(ret));
396
gnutls_deinit (*session);
409
/* Avahi log function callback */
410
370
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
411
371
__attribute__((unused)) const char *txt){}
413
/* Called when a Mandos server is found */
414
373
static int start_mandos_communication(const char *ip, uint16_t port,
415
374
AvahiIfIndex if_index,
416
375
mandos_context *mc){
418
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
377
struct sockaddr_in6 to;
419
378
char *buffer = NULL;
420
379
char *decrypted_buffer;
421
380
size_t buffer_length = 0;
422
381
size_t buffer_capacity = 0;
423
382
ssize_t decrypted_buffer_size;
426
385
char interface[IF_NAMESIZE];
427
386
gnutls_session_t session;
429
ret = init_gnutls_session (mc, &session);
387
gnutls_dh_params_t dh_params;
435
390
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
483
ret = connect(tcp_sd, &to.in, sizeof(to));
436
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
485
438
perror("connect");
489
const char *out = mandos_protocol_version;
492
size_t out_size = strlen(out);
493
ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
494
out_size - written));
500
written += (size_t)ret;
501
if(written < out_size){
504
if (out == mandos_protocol_version){
442
ret = initgnutls (mc, &session, &dh_params);
448
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
514
451
fprintf(stderr, "Establishing TLS session with %s\n", ip);
517
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
519
454
ret = gnutls_handshake (session);
521
456
if (ret != GNUTLS_E_SUCCESS){
523
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
458
fprintf(stderr, "\n*** Handshake failed ***\n");
524
459
gnutls_perror (ret);
530
/* Read OpenPGP packet that contains the wanted password */
465
//Retrieve OpenPGP packet that contains the wanted password
533
468
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
556
492
case GNUTLS_E_REHANDSHAKE:
557
493
ret = gnutls_handshake (session);
559
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
495
fprintf(stderr, "\n*** Handshake failed ***\n");
560
496
gnutls_perror (ret);
566
502
fprintf(stderr, "Unknown error while reading data from"
567
" encrypted session with Mandos server\n");
503
" encrypted session with mandos server\n");
569
505
gnutls_bye (session, GNUTLS_SHUT_RDWR);
573
509
buffer_length += (size_t) ret;
578
fprintf(stderr, "Closing TLS session\n");
581
gnutls_bye (session, GNUTLS_SHUT_RDWR);
583
513
if (buffer_length > 0){
584
514
decrypted_buffer_size = pgp_packet_decrypt(buffer,
586
516
&decrypted_buffer,
588
518
if (decrypted_buffer_size >= 0){
590
519
while(written < (size_t) decrypted_buffer_size){
591
520
ret = (int)fwrite (decrypted_buffer + written, 1,
592
521
(size_t)decrypted_buffer_size - written,
682
618
case AVAHI_BROWSER_FAILURE:
684
fprintf(stderr, "(Avahi browser) %s\n",
620
fprintf(stderr, "(Browser) %s\n",
685
621
avahi_strerror(avahi_server_errno(mc->server)));
686
622
avahi_simple_poll_quit(mc->simple_poll);
689
625
case AVAHI_BROWSER_NEW:
690
/* We ignore the returned Avahi resolver object. In the callback
691
function we free it. If the Avahi server is terminated before
692
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. */
695
631
if (!(avahi_s_service_resolver_new(mc->server, interface,
696
632
protocol, name, type, domain,
697
633
AVAHI_PROTO_INET6, 0,
698
634
resolve_callback, mc)))
699
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
700
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)));
703
639
case AVAHI_BROWSER_REMOVE:
736
int main(int argc, char *argv[]){
669
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
670
AvahiServerConfig config;
737
671
AvahiSServiceBrowser *sb = NULL;
740
int exitcode = EXIT_SUCCESS;
675
int returncode = EXIT_SUCCESS;
741
676
const char *interface = "eth0";
742
677
struct ifreq network;
746
679
char *connect_to = NULL;
747
680
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
748
const char *pubkeyfile = "pubkey.txt";
749
const char *seckeyfile = "seckey.txt";
750
681
mandos_context mc = { .simple_poll = NULL, .server = NULL,
751
682
.dh_bits = 1024, .priority = "SECURE256"};
752
bool gnutls_initalized = false;
755
struct argp_option options[] = {
756
{ .name = "debug", .key = 128,
757
.doc = "Debug mode", .group = 3 },
758
{ .name = "connect", .key = 'c',
760
.doc = "Connect directly to a sepcified mandos server",
762
{ .name = "interface", .key = 'i',
764
.doc = "Interface that Avahi will conntect through",
766
{ .name = "keydir", .key = 'd',
768
.doc = "Directory where the openpgp keyring is",
770
{ .name = "seckey", .key = 's',
772
.doc = "Secret openpgp key for gnutls authentication",
774
{ .name = "pubkey", .key = 'p',
776
.doc = "Public openpgp key for gnutls authentication",
778
{ .name = "dh-bits", .key = 129,
780
.doc = "dh-bits to use in gnutls communication",
782
{ .name = "priority", .key = 130,
784
.doc = "GNUTLS priority", .group = 1 },
789
error_t parse_opt (int key, char *arg,
790
struct argp_state *state) {
791
/* Get the INPUT argument from `argp_parse', which we know is
792
a pointer to our plugin list pointer. */
814
mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
829
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;
834
struct argp argp = { .options = options, .parser = parse_opt,
836
.doc = "Mandos client -- Get and decrypt"
837
" passwords from mandos server" };
838
argp_parse (&argp, argc, argv, 0, 0, NULL);
739
debug = debug_int ? true : false;
841
741
pubkeyfile = combinepath(keydir, pubkeyfile);
842
742
if (pubkeyfile == NULL){
843
743
perror("combinepath");
844
exitcode = EXIT_FAILURE;
744
returncode = EXIT_FAILURE;
848
748
seckeyfile = combinepath(keydir, seckeyfile);
849
749
if (seckeyfile == NULL){
850
750
perror("combinepath");
854
ret = init_gnutls_global(&mc, pubkeyfile, seckeyfile);
856
fprintf(stderr, "init_gnutls_global\n");
859
gnutls_initalized = true;
875
754
if_index = (AvahiIfIndex) if_nametoindex(interface);
884
763
char *address = strrchr(connect_to, ':');
885
764
if(address == NULL){
886
765
fprintf(stderr, "No colon in address\n");
887
exitcode = EXIT_FAILURE;
891
769
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
893
771
perror("Bad port number");
894
exitcode = EXIT_FAILURE;
898
775
address = connect_to;
899
776
ret = start_mandos_communication(address, port, if_index, &mc);
901
exitcode = EXIT_FAILURE;
903
exitcode = EXIT_SUCCESS;
908
/* If the interface is down, bring it up */
910
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
913
exitcode = EXIT_FAILURE;
916
strcpy(network.ifr_name, interface); /* Spurious warning */
917
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);
919
perror("ioctl SIOCGIFFLAGS");
920
exitcode = EXIT_FAILURE;
923
if((network.ifr_flags & IFF_UP) == 0){
924
network.ifr_flags |= IFF_UP;
925
ret = ioctl(sd, SIOCSIFFLAGS, &network);
927
perror("ioctl SIOCSIFFLAGS");
928
exitcode = EXIT_FAILURE;
802
perror("ioctl SIOCSIFFLAGS");
803
returncode = EXIT_FAILURE;
936
810
avahi_set_log_function(empty_log);
939
/* Initialize the pseudo-RNG for Avahi */
813
/* Initialize the psuedo-RNG */
940
814
srand((unsigned int) time(NULL));
942
/* Allocate main Avahi loop object */
943
mc.simple_poll = avahi_simple_poll_new();
944
if (mc.simple_poll == NULL) {
945
fprintf(stderr, "Avahi: Failed to create simple poll"
947
exitcode = EXIT_FAILURE;
952
AvahiServerConfig config;
953
/* Do not publish any local Zeroconf records */
954
avahi_server_config_init(&config);
955
config.publish_hinfo = 0;
956
config.publish_addresses = 0;
957
config.publish_workstation = 0;
958
config.publish_domain = 0;
960
/* Allocate a new server */
961
mc.server = avahi_server_new(avahi_simple_poll_get
962
(mc.simple_poll), &config, NULL,
965
/* Free the Avahi configuration data */
966
avahi_server_config_free(&config);
969
/* Check if creating the Avahi server object succeeded */
970
if (mc.server == NULL) {
971
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",
972
840
avahi_strerror(error));
973
exitcode = EXIT_FAILURE;
841
returncode = EXIT_FAILURE;
977
/* Create the Avahi service browser */
845
/* Create the service browser */
978
846
sb = avahi_s_service_browser_new(mc.server, if_index,
979
847
AVAHI_PROTO_INET6,
980
848
"_mandos._tcp", NULL, 0,
981
849
browse_callback, &mc);
983
851
fprintf(stderr, "Failed to create service browser: %s\n",
984
852
avahi_strerror(avahi_server_errno(mc.server)));
985
exitcode = EXIT_FAILURE;
853
returncode = EXIT_FAILURE;
989
857
/* Run the main loop */
992
fprintf(stderr, "Starting Avahi loop search\n");
860
fprintf(stderr, "Starting avahi loop search\n");
995
863
avahi_simple_poll_loop(mc.simple_poll);
1000
868
fprintf(stderr, "%s exiting\n", argv[0]);
1003
871
/* Cleanup things */
1005
873
avahi_s_service_browser_free(sb);
1007
if (mc.server != NULL)
1008
876
avahi_server_free(mc.server);
1010
if (mc.simple_poll != NULL)
1011
879
avahi_simple_poll_free(mc.simple_poll);
1012
880
free(pubkeyfile);
1013
881
free(seckeyfile);
1015
if (gnutls_initalized){
1016
gnutls_certificate_free_credentials (mc.cred);
1017
gnutls_global_deinit ();