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(), 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 */
42
57
#include <unistd.h> /* close() */
43
58
#include <netinet/in.h>
71
84
} encrypted_session;
74
ssize_t gpg_packet_decrypt (char *packet, size_t packet_size, char **new_packet, char *homedir){
87
ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
88
char **new_packet, const char *homedir){
75
89
gpgme_data_t dh_crypto, dh_plain;
79
size_t new_packet_capacity = 0;
80
size_t new_packet_length = 0;
93
ssize_t new_packet_capacity = 0;
94
ssize_t new_packet_length = 0;
81
95
gpgme_engine_info_t engine_info;
84
fprintf(stderr, "Attempting to decrypt password from gpg packet\n");
98
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
88
102
gpgme_check_version(NULL);
89
gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
103
rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
104
if (rc != GPG_ERR_NO_ERROR){
105
fprintf(stderr, "bad gpgme_engine_check_version: %s: %s\n",
106
gpgme_strsource(rc), gpgme_strerror(rc));
91
110
/* Set GPGME home directory */
92
111
rc = gpgme_get_engine_info (&engine_info);
150
170
if (result == NULL){
151
171
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);
173
fprintf(stderr, "Unsupported algorithm: %s\n",
174
result->unsupported_algorithm);
175
fprintf(stderr, "Wrong key usage: %d\n",
176
result->wrong_key_usage);
155
177
if(result->file_name != NULL){
156
178
fprintf(stderr, "File name: %s\n", result->file_name);
174
197
gpgme_data_release(dh_crypto);
176
199
/* Seek back to the beginning of the GPGME plaintext data buffer */
177
gpgme_data_seek(dh_plain, 0, SEEK_SET);
200
if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){
201
perror("pgpme_data_seek");
181
206
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
182
*new_packet = realloc(*new_packet, new_packet_capacity + BUFFER_SIZE);
207
*new_packet = realloc(*new_packet,
208
(unsigned int)new_packet_capacity
183
210
if (*new_packet == NULL){
184
211
perror("realloc");
223
void debuggnutls(int level, const char* string){
250
void debuggnutls(__attribute__((unused)) int level,
224
252
fprintf(stderr, "%s", string);
227
255
int initgnutls(encrypted_session *es){
232
fprintf(stderr, "Initializing gnutls\n");
260
fprintf(stderr, "Initializing GnuTLS\n");
236
263
if ((ret = gnutls_global_init ())
237
264
!= GNUTLS_E_SUCCESS) {
238
265
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
244
271
gnutls_global_set_log_function(debuggnutls);
248
274
/* openpgp credentials */
249
275
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
250
276
!= GNUTLS_E_SUCCESS) {
251
fprintf (stderr, "memory error: %s\n", safer_gnutls_strerror(ret));
277
fprintf (stderr, "memory error: %s\n",
278
safer_gnutls_strerror(ret));
256
fprintf(stderr, "Attempting to use openpgp certificate %s"
257
" and keyfile %s as gnutls credentials\n", CERTFILE, KEYFILE);
283
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
284
" and keyfile %s as GnuTLS credentials\n", certfile,
260
288
ret = gnutls_certificate_set_openpgp_key_file
261
(es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
289
(es->cred, certfile, certkey, GNUTLS_OPENPGP_FMT_BASE64);
262
290
if (ret != GNUTLS_E_SUCCESS) {
264
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s', '%s')\n",
265
ret, CERTFILE, KEYFILE);
292
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
294
ret, certfile, certkey);
266
295
fprintf(stdout, "The Error is: %s\n",
267
296
safer_gnutls_strerror(ret));
271
//Gnutls server initialization
300
//GnuTLS server initialization
272
301
if ((ret = gnutls_dh_params_init (&es->dh_params))
273
302
!= GNUTLS_E_SUCCESS) {
274
303
fprintf (stderr, "Error in dh parameter initialization: %s\n",
275
304
safer_gnutls_strerror(ret));
279
308
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
280
309
!= GNUTLS_E_SUCCESS) {
281
310
fprintf (stderr, "Error in prime generation: %s\n",
282
311
safer_gnutls_strerror(ret));
286
315
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
288
// Gnutls session creation
317
// GnuTLS session creation
289
318
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
290
319
!= GNUTLS_E_SUCCESS){
291
fprintf(stderr, "Error in gnutls session initialization: %s\n",
320
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
292
321
safer_gnutls_strerror(ret));
295
324
if ((ret = gnutls_priority_set_direct (es->session, "NORMAL", &err))
296
325
!= GNUTLS_E_SUCCESS) {
297
326
fprintf(stderr, "Syntax error at: %s\n", err);
298
fprintf(stderr, "Gnutls error: %s\n",
327
fprintf(stderr, "GnuTLS error: %s\n",
299
328
safer_gnutls_strerror(ret));
303
332
if ((ret = gnutls_credentials_set
304
333
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
305
334
!= GNUTLS_E_SUCCESS) {
307
336
safer_gnutls_strerror(ret));
311
340
/* ignore client certificate if any. */
312
gnutls_certificate_server_set_request (es->session, GNUTLS_CERT_IGNORE);
341
gnutls_certificate_server_set_request (es->session,
314
344
gnutls_dh_set_prime_bits (es->session, DH_BITS);
319
void empty_log(AvahiLogLevel level, const char *txt){}
349
void empty_log(__attribute__((unused)) AvahiLogLevel level,
350
__attribute__((unused)) const char *txt){}
321
int start_mandos_communication(char *ip, uint16_t port){
352
int start_mandos_communication(const char *ip, uint16_t port,
353
unsigned int if_index){
323
355
struct sockaddr_in6 to;
324
356
encrypted_session es;
338
372
perror("socket");
376
if(if_indextoname(if_index, interface) == NULL){
378
perror("if_indextoname");
343
384
fprintf(stderr, "Binding to interface %s\n", interface);
346
ret = setsockopt(tcp_sd, SOL_SOCKET, SO_BINDTODEVICE, interface, 5);
348
perror("setsockopt bindtodevice");
352
memset(&to,0,sizeof(to));
387
memset(&to,0,sizeof(to)); /* Spurious warning */
353
388
to.sin6_family = AF_INET6;
354
389
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
383
gnutls_transport_set_ptr (es.session, (gnutls_transport_ptr_t) tcp_sd);
418
gnutls_transport_set_ptr (es.session,
419
(gnutls_transport_ptr_t) tcp_sd);
386
fprintf(stderr, "Establishing tls session with %s\n", ip);
422
fprintf(stderr, "Establishing TLS session with %s\n", ip);
390
425
ret = gnutls_handshake (es.session);
392
427
if (ret != GNUTLS_E_SUCCESS){
393
fprintf(stderr, "\n*** Handshake failed ***\n");
429
fprintf(stderr, "\n*** Handshake failed ***\n");
399
//Retrieve gpg packet that contains the wanted password
436
//Retrieve OpenPGP packet that contains the wanted password
402
fprintf(stderr, "Retrieving pgp encrypted password from %s\n", ip);
439
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
435
fprintf(stderr, "Unknown error while reading data from encrypted session with mandos server\n");
473
fprintf(stderr, "Unknown error while reading data from"
474
" encrypted session with mandos server\n");
437
476
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
441
buffer_length += ret;
480
buffer_length += (size_t) ret;
445
484
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);
485
decrypted_buffer_size = pgp_packet_decrypt(buffer,
489
if (decrypted_buffer_size >= 0){
490
while(written < decrypted_buffer_size){
491
ret = (int)fwrite (decrypted_buffer + written, 1,
492
(size_t)decrypted_buffer_size - written,
494
if(ret == 0 and ferror(stdout)){
496
fprintf(stderr, "Error writing encrypted data: %s\n",
502
written += (size_t)ret;
448
504
free(decrypted_buffer);
481
537
const char *host_name,
482
538
const AvahiAddress *address,
484
AvahiStringList *txt,
485
AvahiLookupResultFlags flags,
540
AVAHI_GCC_UNUSED AvahiStringList *txt,
541
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
486
542
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);
544
assert(r); /* Spurious warning */
546
/* Called whenever a service has been resolved successfully or
551
case AVAHI_RESOLVER_FAILURE:
552
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
553
" type '%s' in domain '%s': %s\n", name, type, domain,
554
avahi_strerror(avahi_server_errno(server)));
557
case AVAHI_RESOLVER_FOUND:
559
char ip[AVAHI_ADDRESS_STR_MAX];
560
avahi_address_snprint(ip, sizeof(ip), address);
562
fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
563
" port %d\n", name, host_name, ip, port);
565
int ret = start_mandos_communication(ip, port,
566
(unsigned int) interface);
511
avahi_s_service_resolver_free(r);
572
avahi_s_service_resolver_free(r);
514
575
static void browse_callback(
523
584
void* userdata) {
525
586
AvahiServer *s = userdata;
528
/* Called whenever a new services becomes available on the LAN or is removed from the LAN */
587
assert(b); /* Spurious warning */
589
/* Called whenever a new services becomes available on the LAN or
590
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:
594
case AVAHI_BROWSER_FAILURE:
596
fprintf(stderr, "(Browser) %s\n",
597
avahi_strerror(avahi_server_errno(server)));
598
avahi_simple_poll_quit(simple_poll);
601
case AVAHI_BROWSER_NEW:
602
/* We ignore the returned resolver object. In the callback
603
function we free it. If the server is terminated before
604
the callback function is called the server will free
605
the resolver for us. */
607
if (!(avahi_s_service_resolver_new(s, interface, protocol, name,
609
AVAHI_PROTO_INET6, 0,
610
resolve_callback, s)))
611
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
612
avahi_strerror(avahi_server_errno(s)));
615
case AVAHI_BROWSER_REMOVE:
618
case AVAHI_BROWSER_ALL_FOR_NOW:
619
case AVAHI_BROWSER_CACHE_EXHAUSTED:
624
/* combinds file name and path and returns the malloced new string. som sane checks could/should be added */
625
const char *combinepath(const char *first, const char *second){
627
tmp = malloc(strlen(first) + strlen(second) + 2);
633
if (first[0] != '\0' and first[strlen(first) - 1] != '/'){
558
641
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
559
642
AvahiServerConfig config;
560
643
AvahiSServiceBrowser *sb = NULL;
563
646
int returncode = EXIT_SUCCESS;
647
const char *interface = "eth0";
566
650
static struct option long_options[] = {
567
651
{"debug", no_argument, (int *)&debug, 1},
568
652
{"interface", required_argument, 0, 'i'},
653
{"certdir", required_argument, 0, 'd'},
654
{"certkey", required_argument, 0, 'c'},
655
{"certfile", required_argument, 0, 'k'},
571
658
int option_index = 0;
572
ret = getopt_long (argc, argv, "i:", long_options, &option_index);
659
ret = getopt_long (argc, argv, "i:", long_options,
608
715
config.publish_domain = 0;
610
717
/* Allocate a new server */
611
server = avahi_server_new(avahi_simple_poll_get(simple_poll), &config, NULL, NULL, &error);
718
server = avahi_server_new(avahi_simple_poll_get(simple_poll),
719
&config, NULL, NULL, &error);
613
721
/* Free the configuration data */
614
722
avahi_server_config_free(&config);
616
724
/* Check if creating the server object succeeded */
618
fprintf(stderr, "Failed to create server: %s\n", avahi_strerror(error));
726
fprintf(stderr, "Failed to create server: %s\n",
727
avahi_strerror(error));
619
728
returncode = EXIT_FAILURE;
623
732
/* 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)));
733
sb = avahi_s_service_browser_new(server,
735
if_nametoindex(interface),
737
"_mandos._tcp", NULL, 0,
738
browse_callback, server);
740
fprintf(stderr, "Failed to create service browser: %s\n",
741
avahi_strerror(avahi_server_errno(server)));
626
742
returncode = EXIT_FAILURE;