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
76
static const char *certdir = "/conf/conf.d/mandos";
77
static const char *certfile = "openpgp-client.txt";
78
static const char *certkey = "openpgp-client-key.txt";
77
80
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 */
82
const char mandos_protocol_version[] = "1";
85
85
AvahiSimplePoll *simple_poll;
86
86
AvahiServer *server;
87
87
gnutls_certificate_credentials_t cred;
88
88
unsigned int dh_bits;
89
gnutls_dh_params_t dh_params;
90
89
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,
92
size_t adjustbuffer(char *buffer, size_t buffer_length,
99
93
size_t buffer_capacity){
100
94
if (buffer_length + BUFFER_SIZE > buffer_capacity){
101
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
95
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
102
96
if (buffer == NULL){
214
/* Delete the GPGME FILE pointer cryptotext data buffer */
215
gpgme_data_release(dh_crypto);
229
217
/* Seek back to the beginning of the GPGME plaintext data buffer */
230
218
if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){
231
219
perror("pgpme_data_seek");
232
plaintext_length = -1;
238
plaintext_capacity = adjustbuffer(plaintext,
239
(size_t)plaintext_length,
241
if (plaintext_capacity == 0){
224
new_packet_capacity = adjustbuffer(*new_packet, new_packet_length,
225
new_packet_capacity);
226
if (new_packet_capacity == 0){
242
227
perror("adjustbuffer");
243
plaintext_length = -1;
230
new_packet_capacity += BUFFER_SIZE;
247
ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
233
ret = gpgme_data_read(dh_plain, *new_packet + new_packet_length,
249
235
/* Print the data, if any */
255
240
perror("gpgme_data_read");
256
plaintext_length = -1;
259
plaintext_length += ret;
243
new_packet_length += ret;
263
fprintf(stderr, "Decrypted password is: ");
264
for(ssize_t i = 0; i < plaintext_length; i++){
265
fprintf(stderr, "%02hhX ", (*plaintext)[i]);
267
fprintf(stderr, "\n");
272
/* Delete the GPGME cryptotext data buffer */
273
gpgme_data_release(dh_crypto);
246
/* FIXME: check characters before printing to screen so to not print
247
terminal control characters */
249
/* fprintf(stderr, "decrypted password is: "); */
250
/* fwrite(*new_packet, 1, new_packet_length, stderr); */
251
/* fprintf(stderr, "\n"); */
275
254
/* Delete the GPGME plaintext data buffer */
276
255
gpgme_data_release(dh_plain);
277
return plaintext_length;
256
return new_packet_length;
280
259
static const char * safer_gnutls_strerror (int value) {
302
279
if ((ret = gnutls_global_init ())
303
280
!= GNUTLS_E_SUCCESS) {
304
fprintf (stderr, "GnuTLS global_init: %s\n",
305
safer_gnutls_strerror(ret));
281
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
310
/* "Use a log level over 10 to enable all debugging options."
313
286
gnutls_global_set_log_level(11);
314
287
gnutls_global_set_log_function(debuggnutls);
317
/* OpenPGP credentials */
318
if ((ret = gnutls_certificate_allocate_credentials (&mc->cred))
290
/* openpgp credentials */
291
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
319
292
!= GNUTLS_E_SUCCESS) {
320
fprintf (stderr, "GnuTLS memory error: %s\n",
293
fprintf (stderr, "memory error: %s\n",
321
294
safer_gnutls_strerror(ret));
326
299
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
327
" and keyfile %s as GnuTLS credentials\n", pubkeyfile,
300
" and keyfile %s as GnuTLS credentials\n", certfile,
331
304
ret = gnutls_certificate_set_openpgp_key_file
332
(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);
305
(es->cred, certfile, certkey, GNUTLS_OPENPGP_FMT_BASE64);
333
306
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",
308
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
310
ret, certfile, certkey);
311
fprintf(stdout, "The Error is: %s\n",
338
312
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){
316
//GnuTLS server initialization
317
if ((ret = gnutls_dh_params_init (&es->dh_params))
318
!= GNUTLS_E_SUCCESS) {
319
fprintf (stderr, "Error in dh parameter initialization: %s\n",
320
safer_gnutls_strerror(ret));
324
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
325
!= GNUTLS_E_SUCCESS) {
326
fprintf (stderr, "Error in prime generation: %s\n",
327
safer_gnutls_strerror(ret));
331
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
333
// GnuTLS session creation
334
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
335
!= GNUTLS_E_SUCCESS){
367
336
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
368
337
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));
340
if ((ret = gnutls_priority_set_direct (es->session, mc->priority, &err))
341
!= GNUTLS_E_SUCCESS) {
342
fprintf(stderr, "Syntax error at: %s\n", err);
343
fprintf(stderr, "GnuTLS error: %s\n",
344
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",
348
if ((ret = gnutls_credentials_set
349
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
350
!= GNUTLS_E_SUCCESS) {
351
fprintf(stderr, "Error setting a credentials set: %s\n",
386
352
safer_gnutls_strerror(ret));
390
356
/* ignore client certificate if any. */
391
gnutls_certificate_server_set_request (*session,
357
gnutls_certificate_server_set_request (es->session,
392
358
GNUTLS_CERT_IGNORE);
394
gnutls_dh_set_prime_bits (*session, mc->dh_bits);
360
gnutls_dh_set_prime_bits (es->session, DH_BITS);
399
/* Avahi log function callback */
400
365
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
401
366
__attribute__((unused)) const char *txt){}
403
/* Called when a Mandos server is found */
404
368
static int start_mandos_communication(const char *ip, uint16_t port,
405
369
AvahiIfIndex if_index,
406
370
mandos_context *mc){
408
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
372
struct sockaddr_in6 to;
373
encrypted_session es;
409
374
char *buffer = NULL;
410
375
char *decrypted_buffer;
411
376
size_t buffer_length = 0;
436
395
if(if_indextoname((unsigned int)if_index, interface) == NULL){
437
perror("if_indextoname");
397
perror("if_indextoname");
440
402
fprintf(stderr, "Binding to interface %s\n", interface);
443
405
memset(&to,0,sizeof(to)); /* Spurious warning */
444
to.in6.sin6_family = AF_INET6;
445
/* It would be nice to have a way to detect if we were passed an
446
IPv4 address here. Now we assume an IPv6 address. */
447
ret = inet_pton(AF_INET6, ip, &to.in6.sin6_addr);
406
to.sin6_family = AF_INET6;
407
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
449
409
perror("inet_pton");
453
413
fprintf(stderr, "Bad address: %s\n", ip);
456
to.in6.sin6_port = htons(port); /* Spurious warning */
416
to.sin6_port = htons(port); /* Spurious warning */
458
to.in6.sin6_scope_id = (uint32_t)if_index;
418
to.sin6_scope_id = (uint32_t)if_index;
461
421
fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
462
char addrstr[INET6_ADDRSTRLEN] = "";
463
if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
464
sizeof(addrstr)) == NULL){
467
if(strcmp(addrstr, ip) != 0){
468
fprintf(stderr, "Canonical address form: %s\n", addrstr);
422
/* char addrstr[INET6_ADDRSTRLEN]; */
423
/* if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr, */
424
/* sizeof(addrstr)) == NULL){ */
425
/* perror("inet_ntop"); */
427
/* fprintf(stderr, "Really connecting to: %s, port %d\n", */
428
/* addrstr, ntohs(to.sin6_port)); */
473
ret = connect(tcp_sd, &to.in, sizeof(to));
432
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
475
434
perror("connect");
479
const char *out = mandos_protocol_version;
438
char *out = mandos_protocol_version;
482
441
size_t out_size = strlen(out);
600
/* Shutdown procedure */
562
fprintf(stderr, "Closing TLS session\n");
566
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
605
gnutls_deinit (session);
606
gnutls_certificate_free_credentials (mc->cred);
569
gnutls_deinit (es.session);
570
gnutls_certificate_free_credentials (es.cred);
607
571
gnutls_global_deinit ();
611
static void resolve_callback(AvahiSServiceResolver *r,
612
AvahiIfIndex interface,
613
AVAHI_GCC_UNUSED AvahiProtocol protocol,
614
AvahiResolverEvent event,
618
const char *host_name,
619
const AvahiAddress *address,
621
AVAHI_GCC_UNUSED AvahiStringList *txt,
622
AVAHI_GCC_UNUSED AvahiLookupResultFlags
575
static void resolve_callback( AvahiSServiceResolver *r,
576
AvahiIfIndex interface,
577
AVAHI_GCC_UNUSED AvahiProtocol protocol,
578
AvahiResolverEvent event,
582
const char *host_name,
583
const AvahiAddress *address,
585
AVAHI_GCC_UNUSED AvahiStringList *txt,
586
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
587
AVAHI_GCC_UNUSED void* userdata) {
625
588
mandos_context *mc = userdata;
626
589
assert(r); /* Spurious warning */
674
636
case AVAHI_BROWSER_FAILURE:
676
fprintf(stderr, "(Avahi browser) %s\n",
638
fprintf(stderr, "(Browser) %s\n",
677
639
avahi_strerror(avahi_server_errno(mc->server)));
678
640
avahi_simple_poll_quit(mc->simple_poll);
681
643
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
687
if (!(avahi_s_service_resolver_new(mc->server, interface,
688
protocol, name, type, domain,
644
/* We ignore the returned resolver object. In the callback
645
function we free it. If the server is terminated before
646
the callback function is called the server will free
647
the resolver for us. */
649
if (!(avahi_s_service_resolver_new(mc->server, interface, protocol, name,
689
651
AVAHI_PROTO_INET6, 0,
690
652
resolve_callback, mc)))
691
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
692
name, avahi_strerror(avahi_server_errno(mc->server)));
653
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
654
avahi_strerror(avahi_server_errno(s)));
695
657
case AVAHI_BROWSER_REMOVE:
698
660
case AVAHI_BROWSER_ALL_FOR_NOW:
699
661
case AVAHI_BROWSER_CACHE_EXHAUSTED:
701
fprintf(stderr, "No Mandos server found, still searching...\n");
717
memcpy(tmp, first, f_len); /* Spurious warning */
676
memcpy(tmp, first, f_len);
719
678
tmp[f_len] = '/';
721
memcpy(tmp + f_len + 1, second, s_len); /* Spurious warning */
680
memcpy(tmp + f_len + 1, second, s_len);
723
682
tmp[f_len + 1 + s_len] = '\0';
728
int main(int argc, char *argv[]){
687
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
688
AvahiServerConfig config;
729
689
AvahiSServiceBrowser *sb = NULL;
732
int exitcode = EXIT_SUCCESS;
692
int returncode = EXIT_SUCCESS;
733
693
const char *interface = "eth0";
734
694
struct ifreq network;
738
696
char *connect_to = NULL;
739
697
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
740
const char *pubkeyfile = "pubkey.txt";
741
const char *seckeyfile = "seckey.txt";
742
698
mandos_context mc = { .simple_poll = NULL, .server = NULL,
743
.dh_bits = 1024, .priority = "SECURE256"};
699
.dh_bits = 2048, .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. */
702
static struct option long_options[] = {
703
{"debug", no_argument, (int *)&debug, 1},
704
{"connect", required_argument, 0, 'C'},
705
{"interface", required_argument, 0, 'i'},
706
{"certdir", required_argument, 0, 'd'},
707
{"certkey", required_argument, 0, 'c'},
708
{"certfile", required_argument, 0, 'k'},
709
{"dh_bits", required_argument, 0, 'D'},
710
{"priority", required_argument, 0, 'p'},
713
int option_index = 0;
714
ret = getopt_long (argc, argv, "i:", long_options,
805
mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
743
tmp = strtol(optarg, NULL, 10);
744
if (errno == ERANGE){
807
745
perror("strtol");
808
746
exit(EXIT_FAILURE);
820
return ARGP_ERR_UNKNOWN;
752
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);
832
pubkeyfile = combinepath(keydir, pubkeyfile);
833
if (pubkeyfile == NULL){
834
perror("combinepath");
835
exitcode = EXIT_FAILURE;
839
seckeyfile = combinepath(keydir, seckeyfile);
840
if (seckeyfile == NULL){
841
perror("combinepath");
845
ret = init_gnutls_global(&mc, pubkeyfile, seckeyfile);
847
fprintf(stderr, "init_gnutls_global\n");
759
certfile = combinepath(certdir, certfile);
760
if (certfile == NULL){
761
perror("combinepath");
762
returncode = EXIT_FAILURE;
766
certkey = combinepath(certdir, certkey);
767
if (certkey == NULL){
768
perror("combinepath");
769
returncode = EXIT_FAILURE;
864
773
if_index = (AvahiIfIndex) if_nametoindex(interface);
873
782
char *address = strrchr(connect_to, ':');
874
783
if(address == NULL){
875
784
fprintf(stderr, "No colon in address\n");
876
exitcode = EXIT_FAILURE;
880
788
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
882
790
perror("Bad port number");
883
exitcode = EXIT_FAILURE;
887
794
address = connect_to;
888
ret = start_mandos_communication(address, port, if_index, &mc);
795
ret = start_mandos_communication(address, port, if_index);
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);
803
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
806
returncode = EXIT_FAILURE;
809
strcpy(network.ifr_name, interface);
810
ret = ioctl(sd, SIOCGIFFLAGS, &network);
813
perror("ioctl SIOCGIFFLAGS");
814
returncode = EXIT_FAILURE;
817
if((network.ifr_flags & IFF_UP) == 0){
818
network.ifr_flags |= IFF_UP;
819
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;
821
perror("ioctl SIOCSIFFLAGS");
822
returncode = EXIT_FAILURE;
925
829
avahi_set_log_function(empty_log);
928
/* Initialize the pseudo-RNG for Avahi */
832
/* Initialize the psuedo-RNG */
929
833
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",
835
/* Allocate main loop object */
836
if (!(mc.simple_poll = avahi_simple_poll_new())) {
837
fprintf(stderr, "Failed to create simple poll object.\n");
838
returncode = EXIT_FAILURE;
842
/* Do not publish any local records */
843
avahi_server_config_init(&config);
844
config.publish_hinfo = 0;
845
config.publish_addresses = 0;
846
config.publish_workstation = 0;
847
config.publish_domain = 0;
849
/* Allocate a new server */
850
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
851
&config, NULL, NULL, &error);
853
/* Free the configuration data */
854
avahi_server_config_free(&config);
856
/* Check if creating the server object succeeded */
858
fprintf(stderr, "Failed to create server: %s\n",
961
859
avahi_strerror(error));
962
exitcode = EXIT_FAILURE;
860
returncode = EXIT_FAILURE;
966
/* Create the Avahi service browser */
864
/* Create the service browser */
967
865
sb = avahi_s_service_browser_new(mc.server, if_index,
968
866
AVAHI_PROTO_INET6,
969
867
"_mandos._tcp", NULL, 0,
970
868
browse_callback, &mc);
972
870
fprintf(stderr, "Failed to create service browser: %s\n",
973
871
avahi_strerror(avahi_server_errno(mc.server)));
974
exitcode = EXIT_FAILURE;
872
returncode = EXIT_FAILURE;
978
876
/* Run the main loop */
981
fprintf(stderr, "Starting Avahi loop search\n");
879
fprintf(stderr, "Starting avahi loop search\n");
984
avahi_simple_poll_loop(mc.simple_poll);
882
avahi_simple_poll_loop(simple_poll);
989
887
fprintf(stderr, "%s exiting\n", argv[0]);
992
890
/* Cleanup things */
994
892
avahi_s_service_browser_free(sb);
996
if (mc.server != NULL)
997
895
avahi_server_free(mc.server);
999
if (mc.simple_poll != NULL)
1000
avahi_simple_poll_free(mc.simple_poll);
898
avahi_simple_poll_free(simple_poll);