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
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
20
34
#define _LARGEFILE_SOURCE
21
35
#define _FILE_OFFSET_BITS 64
34
48
#include <avahi-common/error.h>
36
50
//mandos client part
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 */
51
#include <sys/types.h> /* socket(), setsockopt(),
53
#include <sys/socket.h> /* socket(), setsockopt(),
55
struct in6_addr, inet_pton() */
56
#include <gnutls/gnutls.h> /* All GnuTLS stuff */
57
#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */
42
59
#include <unistd.h> /* close() */
43
60
#include <netinet/in.h>
71
87
} encrypted_session;
74
ssize_t gpg_packet_decrypt (char *packet, size_t packet_size, char **new_packet, char *homedir){
90
ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
91
char **new_packet, const char *homedir){
75
92
gpgme_data_t dh_crypto, dh_plain;
79
size_t new_packet_capacity = 0;
80
size_t new_packet_length = 0;
96
ssize_t new_packet_capacity = 0;
97
ssize_t new_packet_length = 0;
81
98
gpgme_engine_info_t engine_info;
84
fprintf(stderr, "Attempting to decrypt password from gpg packet\n");
101
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
150
168
if (result == NULL){
151
169
fprintf(stderr, "gpgme_op_decrypt_result failed\n");
153
fprintf(stderr, "Unsupported algorithm: %s\n", result->unsupported_algorithm);
154
fprintf(stderr, "Wrong key usage: %d\n", result->wrong_key_usage);
171
fprintf(stderr, "Unsupported algorithm: %s\n",
172
result->unsupported_algorithm);
173
fprintf(stderr, "Wrong key usage: %d\n",
174
result->wrong_key_usage);
155
175
if(result->file_name != NULL){
156
176
fprintf(stderr, "File name: %s\n", result->file_name);
223
void debuggnutls(int level, const char* string){
246
void debuggnutls(__attribute__((unused)) int level,
224
248
fprintf(stderr, "%s", string);
227
251
int initgnutls(encrypted_session *es){
232
fprintf(stderr, "Initializing gnutls\n");
256
fprintf(stderr, "Initializing GnuTLS\n");
236
259
if ((ret = gnutls_global_init ())
237
260
!= GNUTLS_E_SUCCESS) {
244
267
gnutls_global_set_log_function(debuggnutls);
248
270
/* openpgp credentials */
249
271
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
250
272
!= GNUTLS_E_SUCCESS) {
251
fprintf (stderr, "memory error: %s\n", safer_gnutls_strerror(ret));
273
fprintf (stderr, "memory error: %s\n",
274
safer_gnutls_strerror(ret));
256
fprintf(stderr, "Attempting to use openpgp certificate %s"
257
" and keyfile %s as gnutls credentials\n", CERTFILE, KEYFILE);
279
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
280
" and keyfile %s as GnuTLS credentials\n", CERTFILE,
260
284
ret = gnutls_certificate_set_openpgp_key_file
261
285
(es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
262
286
if (ret != GNUTLS_E_SUCCESS) {
264
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s', '%s')\n",
288
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
265
290
ret, CERTFILE, KEYFILE);
266
291
fprintf(stdout, "The Error is: %s\n",
267
292
safer_gnutls_strerror(ret));
271
//Gnutls server initialization
296
//GnuTLS server initialization
272
297
if ((ret = gnutls_dh_params_init (&es->dh_params))
273
298
!= GNUTLS_E_SUCCESS) {
274
299
fprintf (stderr, "Error in dh parameter initialization: %s\n",
275
300
safer_gnutls_strerror(ret));
279
304
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
280
305
!= GNUTLS_E_SUCCESS) {
281
306
fprintf (stderr, "Error in prime generation: %s\n",
282
307
safer_gnutls_strerror(ret));
286
311
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
288
// Gnutls session creation
313
// GnuTLS session creation
289
314
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
290
315
!= GNUTLS_E_SUCCESS){
291
fprintf(stderr, "Error in gnutls session initialization: %s\n",
316
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
292
317
safer_gnutls_strerror(ret));
295
320
if ((ret = gnutls_priority_set_direct (es->session, "NORMAL", &err))
296
321
!= GNUTLS_E_SUCCESS) {
297
322
fprintf(stderr, "Syntax error at: %s\n", err);
298
fprintf(stderr, "Gnutls error: %s\n",
323
fprintf(stderr, "GnuTLS error: %s\n",
299
324
safer_gnutls_strerror(ret));
303
328
if ((ret = gnutls_credentials_set
304
329
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
305
330
!= GNUTLS_E_SUCCESS) {
307
332
safer_gnutls_strerror(ret));
311
336
/* ignore client certificate if any. */
312
gnutls_certificate_server_set_request (es->session, GNUTLS_CERT_IGNORE);
337
gnutls_certificate_server_set_request (es->session,
314
340
gnutls_dh_set_prime_bits (es->session, DH_BITS);
319
void empty_log(AvahiLogLevel level, const char *txt){}
345
void empty_log(__attribute__((unused)) AvahiLogLevel level,
346
__attribute__((unused)) const char *txt){}
321
int start_mandos_communication(char *ip, uint16_t port){
348
int start_mandos_communication(char *ip, uint16_t port,
349
unsigned int if_index){
323
351
struct sockaddr_in6 to;
324
352
encrypted_session es;
360
396
fprintf(stderr, "Bad address: %s\n", ip);
399
/* Spurious warnings for the next line, see for instance
400
<http://bugs.debian.org/488884> */
363
401
to.sin6_port = htons(port);
364
to.sin6_scope_id = if_nametoindex(interface);
403
to.sin6_scope_id = (uint32_t)if_index;
367
406
fprintf(stderr, "Connection to: %s\n", ip);
383
gnutls_transport_set_ptr (es.session, (gnutls_transport_ptr_t) tcp_sd);
421
gnutls_transport_set_ptr (es.session,
422
(gnutls_transport_ptr_t) tcp_sd);
386
fprintf(stderr, "Establishing tls session with %s\n", ip);
425
fprintf(stderr, "Establishing TLS session with %s\n", ip);
390
428
ret = gnutls_handshake (es.session);
435
fprintf(stderr, "Unknown error while reading data from encrypted session with mandos server\n");
474
fprintf(stderr, "Unknown error while reading data from"
475
" encrypted session with mandos server\n");
437
477
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
441
buffer_length += ret;
481
buffer_length += (size_t) ret;
445
485
if (buffer_length > 0){
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);
486
decrypted_buffer_size = pgp_packet_decrypt(buffer,
490
if (decrypted_buffer_size >= 0){
491
while(decrypted_buffer_size > 0){
492
ret = fwrite (decrypted_buffer, 1, (size_t)decrypted_buffer_size,
494
if(ret == 0 and ferror(stdout)){
496
fprintf(stderr, "Error writing encrypted data: %s\n",
502
decrypted_buffer += ret;
503
decrypted_buffer_size -= ret;
448
505
free(decrypted_buffer);
481
538
const char *host_name,
482
539
const AvahiAddress *address,
484
AvahiStringList *txt,
485
AvahiLookupResultFlags flags,
541
AVAHI_GCC_UNUSED AvahiStringList *txt,
542
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
486
543
AVAHI_GCC_UNUSED void* userdata) {
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);
547
/* Called whenever a service has been resolved successfully or
552
case AVAHI_RESOLVER_FAILURE:
553
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
554
" type '%s' in domain '%s': %s\n", name, type, domain,
555
avahi_strerror(avahi_server_errno(server)));
558
case AVAHI_RESOLVER_FOUND:
560
char ip[AVAHI_ADDRESS_STR_MAX];
561
avahi_address_snprint(ip, sizeof(ip), address);
563
fprintf(stderr, "Mandos server found on %s (%s) on port %d\n",
564
host_name, ip, port);
566
int ret = start_mandos_communication(ip, port,
511
avahi_s_service_resolver_free(r);
576
avahi_s_service_resolver_free(r);
514
579
static void browse_callback(
525
590
AvahiServer *s = userdata;
528
/* Called whenever a new services becomes available on the LAN or is removed from the LAN */
593
/* Called whenever a new services becomes available on the LAN or
594
is removed from the LAN */
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:
598
case AVAHI_BROWSER_FAILURE:
600
fprintf(stderr, "(Browser) %s\n",
601
avahi_strerror(avahi_server_errno(server)));
602
avahi_simple_poll_quit(simple_poll);
605
case AVAHI_BROWSER_NEW:
606
/* We ignore the returned resolver object. In the callback
607
function we free it. If the server is terminated before
608
the callback function is called the server will free
609
the resolver for us. */
611
if (!(avahi_s_service_resolver_new(s, interface, protocol, name,
613
AVAHI_PROTO_INET6, 0,
614
resolve_callback, s)))
615
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
616
avahi_strerror(avahi_server_errno(s)));
619
case AVAHI_BROWSER_REMOVE:
622
case AVAHI_BROWSER_ALL_FOR_NOW:
623
case AVAHI_BROWSER_CACHE_EXHAUSTED:
608
680
config.publish_domain = 0;
610
682
/* Allocate a new server */
611
server = avahi_server_new(avahi_simple_poll_get(simple_poll), &config, NULL, NULL, &error);
683
server = avahi_server_new(avahi_simple_poll_get(simple_poll),
684
&config, NULL, NULL, &error);
613
686
/* Free the configuration data */
614
687
avahi_server_config_free(&config);
616
689
/* Check if creating the server object succeeded */
618
fprintf(stderr, "Failed to create server: %s\n", avahi_strerror(error));
691
fprintf(stderr, "Failed to create server: %s\n",
692
avahi_strerror(error));
619
693
returncode = EXIT_FAILURE;
623
697
/* Create the service browser */
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)));
698
sb = avahi_s_service_browser_new(server,
700
if_nametoindex(interface),
702
"_mandos._tcp", NULL, 0,
703
browse_callback, server);
705
fprintf(stderr, "Failed to create service browser: %s\n",
706
avahi_strerror(avahi_server_errno(server)));
626
707
returncode = EXIT_FAILURE;