1
/* -*- coding: utf-8 -*- */
3
* Mandos client - get and decrypt data from a Mandos server
5
* This program is partly derived from an example program for an Avahi
6
* service browser, downloaded from
7
* <http://avahi.org/browser/examples/core-browse-services.c>. This
8
* includes the following functions: "resolve_callback",
9
* "browse_callback", and parts of "main".
11
* Everything else is Copyright © 2007-2008 Teddy Hogeborn and Björn
14
* This program is free software: you can redistribute it and/or
15
* modify it under the terms of the GNU General Public License as
16
* published by the Free Software Foundation, either version 3 of the
17
* License, or (at your option) any later version.
19
* This program is distributed in the hope that it will be useful, but
20
* WITHOUT ANY WARRANTY; without even the implied warranty of
21
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
22
* General Public License for more details.
24
* You should have received a copy of the GNU General Public License
25
* along with this program. If not, see
26
* <http://www.gnu.org/licenses/>.
28
* Contact the authors at <https://www.fukt.bsnet.se/~belorn/> and
29
* <https://www.fukt.bsnet.se/~teddy/>.
32
#define _FORTIFY_SOURCE 2
2
This file is part of avahi.
4
avahi is free software; you can redistribute it and/or modify it
5
under the terms of the GNU Lesser General Public License as
6
published by the Free Software Foundation; either version 2.1 of the
7
License, or (at your option) any later version.
9
avahi is distributed in the hope that it will be useful, but WITHOUT
10
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
11
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
12
Public License for more details.
14
You should have received a copy of the GNU Lesser General Public
15
License along with avahi; if not, write to the Free Software
16
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
34
20
#define _LARGEFILE_SOURCE
35
21
#define _FILE_OFFSET_BITS 64
48
34
#include <avahi-common/error.h>
50
36
//mandos client part
51
#include <sys/types.h> /* socket(), inet_pton() */
52
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
53
struct in6_addr, inet_pton() */
54
#include <gnutls/gnutls.h> /* All GnuTLS stuff */
55
#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */
37
#include <sys/types.h> /* socket(), setsockopt(), inet_pton() */
38
#include <sys/socket.h> /* socket(), setsockopt(), struct sockaddr_in6, struct in6_addr, inet_pton() */
39
#include <gnutls/gnutls.h> /* ALL GNUTLS STUFF */
40
#include <gnutls/openpgp.h> /* gnutls with openpgp stuff */
57
42
#include <unistd.h> /* close() */
58
43
#include <netinet/in.h>
85
71
} encrypted_session;
88
ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
89
char **new_packet, const char *homedir){
74
ssize_t gpg_packet_decrypt (char *packet, size_t packet_size, char **new_packet, char *homedir){
90
75
gpgme_data_t dh_crypto, dh_plain;
94
ssize_t new_packet_capacity = 0;
95
ssize_t new_packet_length = 0;
79
size_t new_packet_capacity = 0;
80
size_t new_packet_length = 0;
96
81
gpgme_engine_info_t engine_info;
99
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
84
fprintf(stderr, "Attempting to decrypt password from gpg packet\n");
166
150
if (result == NULL){
167
151
fprintf(stderr, "gpgme_op_decrypt_result failed\n");
169
fprintf(stderr, "Unsupported algorithm: %s\n",
170
result->unsupported_algorithm);
171
fprintf(stderr, "Wrong key usage: %d\n",
172
result->wrong_key_usage);
153
fprintf(stderr, "Unsupported algorithm: %s\n", result->unsupported_algorithm);
154
fprintf(stderr, "Wrong key usage: %d\n", result->wrong_key_usage);
173
155
if(result->file_name != NULL){
174
156
fprintf(stderr, "File name: %s\n", result->file_name);
193
174
gpgme_data_release(dh_crypto);
195
176
/* Seek back to the beginning of the GPGME plaintext data buffer */
196
gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET);
177
gpgme_data_seek(dh_plain, 0, SEEK_SET);
200
181
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
201
*new_packet = realloc(*new_packet,
202
(unsigned int)new_packet_capacity
182
*new_packet = realloc(*new_packet, new_packet_capacity + BUFFER_SIZE);
204
183
if (*new_packet == NULL){
205
184
perror("realloc");
244
void debuggnutls(__attribute__((unused)) int level,
223
void debuggnutls(int level, const char* string){
246
224
fprintf(stderr, "%s", string);
249
227
int initgnutls(encrypted_session *es){
254
fprintf(stderr, "Initializing GnuTLS\n");
232
fprintf(stderr, "Initializing gnutls\n");
257
236
if ((ret = gnutls_global_init ())
258
237
!= GNUTLS_E_SUCCESS) {
265
244
gnutls_global_set_log_function(debuggnutls);
268
248
/* openpgp credentials */
269
249
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
270
250
!= GNUTLS_E_SUCCESS) {
271
fprintf (stderr, "memory error: %s\n",
272
safer_gnutls_strerror(ret));
251
fprintf (stderr, "memory error: %s\n", safer_gnutls_strerror(ret));
277
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
278
" and keyfile %s as GnuTLS credentials\n", CERTFILE,
256
fprintf(stderr, "Attempting to use openpgp certificate %s"
257
" and keyfile %s as gnutls credentials\n", CERTFILE, KEYFILE);
282
260
ret = gnutls_certificate_set_openpgp_key_file
283
261
(es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
284
262
if (ret != GNUTLS_E_SUCCESS) {
286
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
264
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s', '%s')\n",
288
265
ret, CERTFILE, KEYFILE);
289
266
fprintf(stdout, "The Error is: %s\n",
290
267
safer_gnutls_strerror(ret));
294
//GnuTLS server initialization
271
//Gnutls server initialization
295
272
if ((ret = gnutls_dh_params_init (&es->dh_params))
296
273
!= GNUTLS_E_SUCCESS) {
297
274
fprintf (stderr, "Error in dh parameter initialization: %s\n",
298
275
safer_gnutls_strerror(ret));
302
279
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
303
280
!= GNUTLS_E_SUCCESS) {
304
281
fprintf (stderr, "Error in prime generation: %s\n",
305
282
safer_gnutls_strerror(ret));
309
286
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
311
// GnuTLS session creation
288
// Gnutls session creation
312
289
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
313
290
!= GNUTLS_E_SUCCESS){
314
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
291
fprintf(stderr, "Error in gnutls session initialization: %s\n",
315
292
safer_gnutls_strerror(ret));
318
295
if ((ret = gnutls_priority_set_direct (es->session, "NORMAL", &err))
319
296
!= GNUTLS_E_SUCCESS) {
320
297
fprintf(stderr, "Syntax error at: %s\n", err);
321
fprintf(stderr, "GnuTLS error: %s\n",
298
fprintf(stderr, "Gnutls error: %s\n",
322
299
safer_gnutls_strerror(ret));
326
303
if ((ret = gnutls_credentials_set
327
304
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
328
305
!= GNUTLS_E_SUCCESS) {
330
307
safer_gnutls_strerror(ret));
334
311
/* ignore client certificate if any. */
335
gnutls_certificate_server_set_request (es->session,
312
gnutls_certificate_server_set_request (es->session, GNUTLS_CERT_IGNORE);
338
314
gnutls_dh_set_prime_bits (es->session, DH_BITS);
343
void empty_log(__attribute__((unused)) AvahiLogLevel level,
344
__attribute__((unused)) const char *txt){}
319
void empty_log(AvahiLogLevel level, const char *txt){}
346
int start_mandos_communication(const char *ip, uint16_t port,
347
unsigned int if_index){
321
int start_mandos_communication(char *ip, uint16_t port){
349
323
struct sockaddr_in6 to;
350
324
encrypted_session es;
366
338
perror("socket");
370
if(if_indextoname(if_index, interface) == NULL){
372
perror("if_indextoname");
378
343
fprintf(stderr, "Binding to interface %s\n", interface);
346
ret = setsockopt(tcp_sd, SOL_SOCKET, SO_BINDTODEVICE, interface, 5);
348
perror("setsockopt bindtodevice");
381
memset(&to,0,sizeof(to)); /* Spurious warning */
352
memset(&to,0,sizeof(to));
382
353
to.sin6_family = AF_INET6;
383
354
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
412
gnutls_transport_set_ptr (es.session,
413
(gnutls_transport_ptr_t) tcp_sd);
383
gnutls_transport_set_ptr (es.session, (gnutls_transport_ptr_t) tcp_sd);
416
fprintf(stderr, "Establishing TLS session with %s\n", ip);
386
fprintf(stderr, "Establishing tls session with %s\n", ip);
419
390
ret = gnutls_handshake (es.session);
421
392
if (ret != GNUTLS_E_SUCCESS){
423
fprintf(stderr, "\n*** Handshake failed ***\n");
393
fprintf(stderr, "\n*** Handshake failed ***\n");
430
//Retrieve OpenPGP packet that contains the wanted password
399
//Retrieve gpg packet that contains the wanted password
433
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
402
fprintf(stderr, "Retrieving pgp encrypted password from %s\n", ip);
467
fprintf(stderr, "Unknown error while reading data from"
468
" encrypted session with mandos server\n");
435
fprintf(stderr, "Unknown error while reading data from encrypted session with mandos server\n");
470
437
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
474
buffer_length += (size_t) ret;
441
buffer_length += ret;
478
445
if (buffer_length > 0){
479
decrypted_buffer_size = pgp_packet_decrypt(buffer,
483
if (decrypted_buffer_size >= 0){
484
while(written < decrypted_buffer_size){
485
ret = (int)fwrite (decrypted_buffer + written, 1,
486
(size_t)decrypted_buffer_size - written,
488
if(ret == 0 and ferror(stdout)){
490
fprintf(stderr, "Error writing encrypted data: %s\n",
496
written += (size_t)ret;
446
if ((decrypted_buffer_size = gpg_packet_decrypt(buffer, buffer_length, &decrypted_buffer, CERT_ROOT)) >= 0){
447
fwrite (decrypted_buffer, 1, decrypted_buffer_size, stdout);
498
448
free(decrypted_buffer);
531
481
const char *host_name,
532
482
const AvahiAddress *address,
534
AVAHI_GCC_UNUSED AvahiStringList *txt,
535
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
484
AvahiStringList *txt,
485
AvahiLookupResultFlags flags,
536
486
AVAHI_GCC_UNUSED void* userdata) {
538
assert(r); /* Spurious warning */
540
/* Called whenever a service has been resolved successfully or
545
case AVAHI_RESOLVER_FAILURE:
546
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
547
" type '%s' in domain '%s': %s\n", name, type, domain,
548
avahi_strerror(avahi_server_errno(server)));
551
case AVAHI_RESOLVER_FOUND:
553
char ip[AVAHI_ADDRESS_STR_MAX];
554
avahi_address_snprint(ip, sizeof(ip), address);
556
fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
557
" port %d\n", name, host_name, ip, port);
559
int ret = start_mandos_communication(ip, port,
560
(unsigned int) interface);
490
/* Called whenever a service has been resolved successfully or timed out */
493
case AVAHI_RESOLVER_FAILURE:
494
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of type '%s' in domain '%s': %s\n", name, type, domain, avahi_strerror(avahi_server_errno(server)));
497
case AVAHI_RESOLVER_FOUND: {
498
char ip[AVAHI_ADDRESS_STR_MAX];
499
avahi_address_snprint(ip, sizeof(ip), address);
501
fprintf(stderr, "Mandos server found at %s on port %d\n", ip, port);
503
int ret = start_mandos_communication(ip, port);
566
avahi_s_service_resolver_free(r);
511
avahi_s_service_resolver_free(r);
569
514
static void browse_callback(
578
523
void* userdata) {
580
525
AvahiServer *s = userdata;
581
assert(b); /* Spurious warning */
583
/* Called whenever a new services becomes available on the LAN or
584
is removed from the LAN */
528
/* Called whenever a new services becomes available on the LAN or is removed from the LAN */
588
case AVAHI_BROWSER_FAILURE:
590
fprintf(stderr, "(Browser) %s\n",
591
avahi_strerror(avahi_server_errno(server)));
592
avahi_simple_poll_quit(simple_poll);
595
case AVAHI_BROWSER_NEW:
596
/* We ignore the returned resolver object. In the callback
597
function we free it. If the server is terminated before
598
the callback function is called the server will free
599
the resolver for us. */
601
if (!(avahi_s_service_resolver_new(s, interface, protocol, name,
603
AVAHI_PROTO_INET6, 0,
604
resolve_callback, s)))
605
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
606
avahi_strerror(avahi_server_errno(s)));
609
case AVAHI_BROWSER_REMOVE:
612
case AVAHI_BROWSER_ALL_FOR_NOW:
613
case AVAHI_BROWSER_CACHE_EXHAUSTED:
532
case AVAHI_BROWSER_FAILURE:
534
fprintf(stderr, "(Browser) %s\n", avahi_strerror(avahi_server_errno(server)));
535
avahi_simple_poll_quit(simple_poll);
538
case AVAHI_BROWSER_NEW:
539
/* We ignore the returned resolver object. In the callback
540
function we free it. If the server is terminated before
541
the callback function is called the server will free
542
the resolver for us. */
544
if (!(avahi_s_service_resolver_new(s, interface, protocol, name, type, domain, AVAHI_PROTO_INET6, 0, resolve_callback, s)))
545
fprintf(stderr, "Failed to resolve service '%s': %s\n", name, avahi_strerror(avahi_server_errno(s)));
549
case AVAHI_BROWSER_REMOVE:
552
case AVAHI_BROWSER_ALL_FOR_NOW:
553
case AVAHI_BROWSER_CACHE_EXHAUSTED:
623
563
int returncode = EXIT_SUCCESS;
624
const char *interface = "eth0";
627
566
static struct option long_options[] = {
628
567
{"debug", no_argument, (int *)&debug, 1},
629
568
{"interface", required_argument, 0, 'i'},
632
571
int option_index = 0;
633
ret = getopt_long (argc, argv, "i:", long_options,
572
ret = getopt_long (argc, argv, "i:", long_options, &option_index);
670
608
config.publish_domain = 0;
672
610
/* Allocate a new server */
673
server = avahi_server_new(avahi_simple_poll_get(simple_poll),
674
&config, NULL, NULL, &error);
611
server = avahi_server_new(avahi_simple_poll_get(simple_poll), &config, NULL, NULL, &error);
676
613
/* Free the configuration data */
677
614
avahi_server_config_free(&config);
679
616
/* Check if creating the server object succeeded */
681
fprintf(stderr, "Failed to create server: %s\n",
682
avahi_strerror(error));
618
fprintf(stderr, "Failed to create server: %s\n", avahi_strerror(error));
683
619
returncode = EXIT_FAILURE;
687
623
/* Create the service browser */
688
sb = avahi_s_service_browser_new(server,
690
if_nametoindex(interface),
692
"_mandos._tcp", NULL, 0,
693
browse_callback, server);
695
fprintf(stderr, "Failed to create service browser: %s\n",
696
avahi_strerror(avahi_server_errno(server)));
624
if (!(sb = avahi_s_service_browser_new(server, if_nametoindex("eth0"), AVAHI_PROTO_INET6, "_mandos._tcp", NULL, 0, browse_callback, server))) {
625
fprintf(stderr, "Failed to create service browser: %s\n", avahi_strerror(avahi_server_errno(server)));
697
626
returncode = EXIT_FAILURE;