To get this branch, use:
bzr branch
http://bzr.recompile.se/loggerhead/mandos/trunk
« back to all changes in this revision
Viewing changes to plugins.d/mandosclient.c
- browse files at revision 16
- compare with another revision
- download diff
- download tarball
- view history from revision 16
- Committer: Teddy Hogeborn
- Date: 2008-07-21 01:50:31 UTC
- Revision ID: teddy@fukt.bsnet.se-20080721015031-ivjiclli2j06hwgs
* Makefile: Include targets for all binaries.
* plugins.d/Makefile: Do nothing but call the parent Makefile.
* server.py: Added copyright statement and information.
(Client.__init__): Added doc string.
(Client.stop): Bug fix: Only log message if stopping for the first
time. Check if the "stop_initiator_tag" and
"checker_initiator_tag" attributes exist before using
them.
(Client.__del__): Call self.stop() instead of doing things here.
(Client.checker_callback): Set self.checker_callback_tag and
self.checker to None unconditionally and
immediately.
(Client.stop_checker): Added some checks to handle multiple calls.
(tcp_handler.handle): Use "self.server.clients" instead of "clients".
(__main__): Moved all code to the "main" function.
(main): New. New option "--address". Instantiate IPv6_TCPServer
with "options.address". Log before starting main loop.
(main.cleanup) Use "clients.pop()" to remove clients from the set as
they are stopped.
* plugins.d/Makefile: Do nothing but call the parent Makefile.
* server.py: Added copyright statement and information.
(Client.__init__): Added doc string.
(Client.stop): Bug fix: Only log message if stopping for the first
time. Check if the "stop_initiator_tag" and
"checker_initiator_tag" attributes exist before using
them.
(Client.__del__): Call self.stop() instead of doing things here.
(Client.checker_callback): Set self.checker_callback_tag and
self.checker to None unconditionally and
immediately.
(Client.stop_checker): Added some checks to handle multiple calls.
(tcp_handler.handle): Use "self.server.clients" instead of "clients".
(__main__): Moved all code to the "main" function.
(main): New. New option "--address". Instantiate IPv6_TCPServer
with "options.address". Log before starting main loop.
(main.cleanup) Use "clients.pop()" to remove clients from the set as
they are stopped.
- files added:
- ca.pem
- files removed:
- .bzr-builddeb
- debian
- debian/po
- debian/source
- debian/upstream
- network-hooks.d
- plugin-helpers
- files renamed:
- clients.conf => mandos-clients.conf
- plugin-runner.c => plugbasedclient.c
- plugins.d/mandos-client.c => plugins.d/mandosclient.c
- plugins.d/password-prompt.c => plugins.d/passprompt.c
- mandos => server.py
- files modified:
- Makefile
added
removed
plugins.d/mandosclient.c
1
/* -*- coding: utf-8 -*- */
2
/*
3
* Mandos-client - get and decrypt data from a Mandos server
1
/* $Id$ */
2
3
/* PLEASE NOTE *
4
* This file demonstrates how to use Avahi's core API, this is
5
* the embeddable mDNS stack for embedded applications.
4
6
*
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".
10
*
11
* Everything else is
12
* Copyright © 2008-2015 Teddy Hogeborn
13
* Copyright © 2008-2015 Björn Påhlsson
14
*
15
* This program is free software: you can redistribute it and/or
16
* modify it under the terms of the GNU General Public License as
17
* published by the Free Software Foundation, either version 3 of the
18
* License, or (at your option) any later version.
19
*
20
* This program is distributed in the hope that it will be useful, but
21
* WITHOUT ANY WARRANTY; without even the implied warranty of
22
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
23
* General Public License for more details.
24
*
25
* You should have received a copy of the GNU General Public License
26
* along with this program. If not, see
27
* <http://www.gnu.org/licenses/>.
28
*
29
* Contact the authors at <mandos@recompile.se>.
7
* End user applications should *not* use this API and should use
8
* the D-Bus or C APIs, please see
9
* client-browse-services.c and glib-integration.c
10
*
11
* I repeat, you probably do *not* want to use this example.
30
12
*/
31
13
32
/* Needed by GPGME, specifically gpgme_data_seek() */
33
#ifndef _LARGEFILE_SOURCE
14
/***
15
This file is part of avahi.
16
17
avahi is free software; you can redistribute it and/or modify it
18
under the terms of the GNU Lesser General Public License as
19
published by the Free Software Foundation; either version 2.1 of the
20
License, or (at your option) any later version.
21
22
avahi is distributed in the hope that it will be useful, but WITHOUT
23
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
24
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
25
Public License for more details.
26
27
You should have received a copy of the GNU Lesser General Public
28
License along with avahi; if not, write to the Free Software
29
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
30
USA.
31
***/
32
34
33
#define _LARGEFILE_SOURCE
35
#endif /* not _LARGEFILE_SOURCE */
36
#ifndef _FILE_OFFSET_BITS
37
34
#define _FILE_OFFSET_BITS 64
38
#endif /* not _FILE_OFFSET_BITS */
39
40
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), asprintf() */
41
42
#include <stdio.h> /* fprintf(), stderr, fwrite(),
43
stdout, ferror() */
44
#include <stdint.h> /* uint16_t, uint32_t, intptr_t */
45
#include <stddef.h> /* NULL, size_t, ssize_t */
46
#include <stdlib.h> /* free(), EXIT_SUCCESS, srand(),
47
strtof(), abort() */
48
#include <stdbool.h> /* bool, false, true */
49
#include <string.h> /* memset(), strcmp(), strlen(),
50
strerror(), asprintf(), strcpy() */
51
#include <sys/ioctl.h> /* ioctl */
52
#include <sys/types.h> /* socket(), inet_pton(), sockaddr,
53
sockaddr_in6, PF_INET6,
54
SOCK_STREAM, uid_t, gid_t, open(),
55
opendir(), DIR */
56
#include <sys/stat.h> /* open(), S_ISREG */
57
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
58
inet_pton(), connect(),
59
getnameinfo() */
60
#include <fcntl.h> /* open(), unlinkat() */
61
#include <dirent.h> /* opendir(), struct dirent, readdir()
62
*/
63
#include <inttypes.h> /* PRIu16, PRIdMAX, intmax_t,
64
strtoimax() */
65
#include <errno.h> /* perror(), errno,
66
program_invocation_short_name */
67
#include <time.h> /* nanosleep(), time(), sleep() */
68
#include <net/if.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
69
SIOCSIFFLAGS, if_indextoname(),
70
if_nametoindex(), IF_NAMESIZE */
71
#include <netinet/in.h> /* IN6_IS_ADDR_LINKLOCAL,
72
INET_ADDRSTRLEN, INET6_ADDRSTRLEN
73
*/
74
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
75
getuid(), getgid(), seteuid(),
76
setgid(), pause(), _exit(),
77
unlinkat() */
78
#include <arpa/inet.h> /* inet_pton(), htons() */
79
#include <iso646.h> /* not, or, and */
80
#include <argp.h> /* struct argp_option, error_t, struct
81
argp_state, struct argp,
82
argp_parse(), ARGP_KEY_ARG,
83
ARGP_KEY_END, ARGP_ERR_UNKNOWN */
84
#include <signal.h> /* sigemptyset(), sigaddset(),
85
sigaction(), SIGTERM, sig_atomic_t,
86
raise() */
87
#include <sysexits.h> /* EX_OSERR, EX_USAGE, EX_UNAVAILABLE,
88
EX_NOHOST, EX_IOERR, EX_PROTOCOL */
89
#include <sys/wait.h> /* waitpid(), WIFEXITED(),
90
WEXITSTATUS(), WTERMSIG() */
91
#include <grp.h> /* setgroups() */
92
#include <argz.h> /* argz_add_sep(), argz_next(),
93
argz_delete(), argz_append(),
94
argz_stringify(), argz_add(),
95
argz_count() */
96
#include <netdb.h> /* getnameinfo(), NI_NUMERICHOST,
97
EAI_SYSTEM, gai_strerror() */
98
99
#ifdef __linux__
100
#include <sys/klog.h> /* klogctl() */
101
#endif /* __linux__ */
102
103
/* Avahi */
104
/* All Avahi types, constants and functions
105
Avahi*, avahi_*,
106
AVAHI_* */
35
36
#include <stdio.h>
37
#include <assert.h>
38
#include <stdlib.h>
39
#include <time.h>
40
#include <net/if.h> /* if_nametoindex */
41
107
42
#include <avahi-core/core.h>
108
43
#include <avahi-core/lookup.h>
109
44
#include <avahi-core/log.h>
111
46
#include <avahi-common/malloc.h>
112
47
#include <avahi-common/error.h>
113
48
114
/* GnuTLS */
115
#include <gnutls/gnutls.h> /* All GnuTLS types, constants and
116
functions:
117
gnutls_*
118
init_gnutls_session(),
119
GNUTLS_* */
120
#include <gnutls/openpgp.h>
121
/* gnutls_certificate_set_openpgp_key_file(),
122
GNUTLS_OPENPGP_FMT_BASE64 */
123
124
/* GPGME */
125
#include <gpgme.h> /* All GPGME types, constants and
126
functions:
127
gpgme_*
128
GPGME_PROTOCOL_OpenPGP,
129
GPG_ERR_NO_* */
130
49
//mandos client part
50
#include <sys/types.h> /* socket(), setsockopt(), inet_pton() */
51
#include <sys/socket.h> /* socket(), setsockopt(), struct sockaddr_in6, struct in6_addr, inet_pton() */
52
#include <gnutls/gnutls.h> /* ALL GNUTLS STUFF */
53
#include <gnutls/openpgp.h> /* gnutls with openpgp stuff */
54
55
#include <unistd.h> /* close() */
56
#include <netinet/in.h>
57
#include <stdbool.h> /* true */
58
#include <string.h> /* memset */
59
#include <arpa/inet.h> /* inet_pton() */
60
#include <iso646.h> /* not */
61
62
// gpgme
63
#include <errno.h> /* perror() */
64
#include <gpgme.h>
65
66
67
#ifndef CERT_ROOT
68
#define CERT_ROOT "/conf/conf.d/cryptkeyreq/"
69
#endif
70
#define CERTFILE CERT_ROOT "openpgp-client.txt"
71
#define KEYFILE CERT_ROOT "openpgp-client-key.txt"
131
72
#define BUFFER_SIZE 256
132
133
#define PATHDIR "/conf/conf.d/mandos"
134
#define SECKEY "seckey.txt"
135
#define PUBKEY "pubkey.txt"
136
#define HOOKDIR "/lib/mandos/network-hooks.d"
137
138
bool debug = false;
139
static const char mandos_protocol_version[] = "1";
140
const char *argp_program_version = "mandos-client " VERSION;
141
const char *argp_program_bug_address = "<mandos@recompile.se>";
142
static const char sys_class_net[] = "/sys/class/net";
143
char *connect_to = NULL;
144
const char *hookdir = HOOKDIR;
145
int hookdir_fd = -1;
146
uid_t uid = 65534;
147
gid_t gid = 65534;
148
149
/* Doubly linked list that need to be circularly linked when used */
150
typedef struct server{
151
const char *ip;
152
in_port_t port;
153
AvahiIfIndex if_index;
154
int af;
155
struct timespec last_seen;
156
struct server *next;
157
struct server *prev;
158
} server;
159
160
/* Used for passing in values through the Avahi callback functions */
73
#define DH_BITS 1024
74
161
75
typedef struct {
162
AvahiServer *server;
76
gnutls_session_t session;
163
77
gnutls_certificate_credentials_t cred;
164
unsigned int dh_bits;
165
78
gnutls_dh_params_t dh_params;
166
const char *priority;
79
} encrypted_session;
80
81
82
ssize_t gpg_packet_decrypt (char *packet, size_t packet_size, char **new_packet, char *homedir){
83
gpgme_data_t dh_crypto, dh_plain;
167
84
gpgme_ctx_t ctx;
168
server *current_server;
169
char *interfaces;
170
size_t interfaces_size;
171
} mandos_context;
172
173
/* global so signal handler can reach it*/
174
AvahiSimplePoll *simple_poll;
175
176
sig_atomic_t quit_now = 0;
177
int signal_received = 0;
178
179
/* Function to use when printing errors */
180
void perror_plus(const char *print_text){
181
int e = errno;
182
fprintf(stderr, "Mandos plugin %s: ",
183
program_invocation_short_name);
184
errno = e;
185
perror(print_text);
186
}
187
188
__attribute__((format (gnu_printf, 2, 3), nonnull))
189
int fprintf_plus(FILE *stream, const char *format, ...){
190
va_list ap;
191
va_start (ap, format);
192
193
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
194
program_invocation_short_name));
195
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
196
}
197
198
/*
199
* Make additional room in "buffer" for at least BUFFER_SIZE more
200
* bytes. "buffer_capacity" is how much is currently allocated,
201
* "buffer_length" is how much is already used.
202
*/
203
__attribute__((nonnull, warn_unused_result))
204
size_t incbuffer(char **buffer, size_t buffer_length,
205
size_t buffer_capacity){
206
if(buffer_length + BUFFER_SIZE > buffer_capacity){
207
char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
208
if(new_buf == NULL){
209
int old_errno = errno;
210
free(*buffer);
211
errno = old_errno;
212
*buffer = NULL;
213
return 0;
214
}
215
*buffer = new_buf;
216
buffer_capacity += BUFFER_SIZE;
217
}
218
return buffer_capacity;
219
}
220
221
/* Add server to set of servers to retry periodically */
222
__attribute__((nonnull, warn_unused_result))
223
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
224
int af, server **current_server){
225
int ret;
226
server *new_server = malloc(sizeof(server));
227
if(new_server == NULL){
228
perror_plus("malloc");
229
return false;
230
}
231
*new_server = (server){ .ip = strdup(ip),
232
.port = port,
233
.if_index = if_index,
234
.af = af };
235
if(new_server->ip == NULL){
236
perror_plus("strdup");
237
free(new_server);
238
return false;
239
}
240
ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
241
if(ret == -1){
242
perror_plus("clock_gettime");
243
#ifdef __GNUC__
244
#pragma GCC diagnostic push
245
#pragma GCC diagnostic ignored "-Wcast-qual"
246
#endif
247
free((char *)(new_server->ip));
248
#ifdef __GNUC__
249
#pragma GCC diagnostic pop
250
#endif
251
free(new_server);
252
return false;
253
}
254
/* Special case of first server */
255
if(*current_server == NULL){
256
new_server->next = new_server;
257
new_server->prev = new_server;
258
*current_server = new_server;
259
} else {
260
/* Place the new server last in the list */
261
new_server->next = *current_server;
262
new_server->prev = (*current_server)->prev;
263
new_server->prev->next = new_server;
264
(*current_server)->prev = new_server;
265
}
266
return true;
267
}
268
269
/*
270
* Initialize GPGME.
271
*/
272
__attribute__((nonnull, warn_unused_result))
273
static bool init_gpgme(const char * const seckey,
274
const char * const pubkey,
275
const char * const tempdir,
276
mandos_context *mc){
277
85
gpgme_error_t rc;
86
ssize_t ret;
87
size_t new_packet_capacity = 0;
88
size_t new_packet_length = 0;
278
89
gpgme_engine_info_t engine_info;
279
280
/*
281
* Helper function to insert pub and seckey to the engine keyring.
282
*/
283
bool import_key(const char * const filename){
284
int ret;
285
int fd;
286
gpgme_data_t pgp_data;
287
288
fd = (int)TEMP_FAILURE_RETRY(open(filename, O_RDONLY));
289
if(fd == -1){
290
perror_plus("open");
291
return false;
292
}
293
294
rc = gpgme_data_new_from_fd(&pgp_data, fd);
295
if(rc != GPG_ERR_NO_ERROR){
296
fprintf_plus(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
297
gpgme_strsource(rc), gpgme_strerror(rc));
298
return false;
299
}
300
301
rc = gpgme_op_import(mc->ctx, pgp_data);
302
if(rc != GPG_ERR_NO_ERROR){
303
fprintf_plus(stderr, "bad gpgme_op_import: %s: %s\n",
304
gpgme_strsource(rc), gpgme_strerror(rc));
305
return false;
306
}
307
308
ret = (int)TEMP_FAILURE_RETRY(close(fd));
309
if(ret == -1){
310
perror_plus("close");
311
}
312
gpgme_data_release(pgp_data);
313
return true;
314
}
315
316
if(debug){
317
fprintf_plus(stderr, "Initializing GPGME\n");
318
}
319
90
320
91
/* Init GPGME */
321
92
gpgme_check_version(NULL);
322
rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
323
if(rc != GPG_ERR_NO_ERROR){
324
fprintf_plus(stderr, "bad gpgme_engine_check_version: %s: %s\n",
325
gpgme_strsource(rc), gpgme_strerror(rc));
326
return false;
327
}
93
gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
328
94
329
/* Set GPGME home directory for the OpenPGP engine only */
330
rc = gpgme_get_engine_info(&engine_info);
331
if(rc != GPG_ERR_NO_ERROR){
332
fprintf_plus(stderr, "bad gpgme_get_engine_info: %s: %s\n",
333
gpgme_strsource(rc), gpgme_strerror(rc));
334
return false;
95
/* Set GPGME home directory */
96
rc = gpgme_get_engine_info (&engine_info);
97
if (rc != GPG_ERR_NO_ERROR){
98
fprintf(stderr, "bad gpgme_get_engine_info: %s: %s\n",
99
gpgme_strsource(rc), gpgme_strerror(rc));
100
return -1;
335
101
}
336
102
while(engine_info != NULL){
337
103
if(engine_info->protocol == GPGME_PROTOCOL_OpenPGP){
338
104
gpgme_set_engine_info(GPGME_PROTOCOL_OpenPGP,
339
engine_info->file_name, tempdir);
105
engine_info->file_name, homedir);
340
106
break;
341
107
}
342
108
engine_info = engine_info->next;
343
109
}
344
110
if(engine_info == NULL){
345
fprintf_plus(stderr, "Could not set GPGME home dir to %s\n",
346
tempdir);
347
return false;
348
}
349
350
/* Create new GPGME "context" */
351
rc = gpgme_new(&(mc->ctx));
352
if(rc != GPG_ERR_NO_ERROR){
353
fprintf_plus(stderr, "Mandos plugin mandos-client: "
354
"bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
355
gpgme_strerror(rc));
356
return false;
357
}
358
359
if(not import_key(pubkey) or not import_key(seckey)){
360
return false;
361
}
362
363
return true;
364
}
365
366
/*
367
* Decrypt OpenPGP data.
368
* Returns -1 on error
369
*/
370
__attribute__((nonnull, warn_unused_result))
371
static ssize_t pgp_packet_decrypt(const char *cryptotext,
372
size_t crypto_size,
373
char **plaintext,
374
mandos_context *mc){
375
gpgme_data_t dh_crypto, dh_plain;
376
gpgme_error_t rc;
377
ssize_t ret;
378
size_t plaintext_capacity = 0;
379
ssize_t plaintext_length = 0;
380
381
if(debug){
382
fprintf_plus(stderr, "Trying to decrypt OpenPGP data\n");
383
}
384
385
/* Create new GPGME data buffer from memory cryptotext */
386
rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,
387
0);
388
if(rc != GPG_ERR_NO_ERROR){
389
fprintf_plus(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
390
gpgme_strsource(rc), gpgme_strerror(rc));
111
fprintf(stderr, "Could not set home dir to %s\n", homedir);
112
return -1;
113
}
114
115
/* Create new GPGME data buffer from packet buffer */
116
rc = gpgme_data_new_from_mem(&dh_crypto, packet, packet_size, 0);
117
if (rc != GPG_ERR_NO_ERROR){
118
fprintf(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
119
gpgme_strsource(rc), gpgme_strerror(rc));
391
120
return -1;
392
121
}
393
122
394
123
/* Create new empty GPGME data buffer for the plaintext */
395
124
rc = gpgme_data_new(&dh_plain);
396
if(rc != GPG_ERR_NO_ERROR){
397
fprintf_plus(stderr, "Mandos plugin mandos-client: "
398
"bad gpgme_data_new: %s: %s\n",
399
gpgme_strsource(rc), gpgme_strerror(rc));
400
gpgme_data_release(dh_crypto);
401
return -1;
402
}
403
404
/* Decrypt data from the cryptotext data buffer to the plaintext
405
data buffer */
406
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
407
if(rc != GPG_ERR_NO_ERROR){
408
fprintf_plus(stderr, "bad gpgme_op_decrypt: %s: %s\n",
409
gpgme_strsource(rc), gpgme_strerror(rc));
410
plaintext_length = -1;
411
if(debug){
412
gpgme_decrypt_result_t result;
413
result = gpgme_op_decrypt_result(mc->ctx);
414
if(result == NULL){
415
fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
416
} else {
417
fprintf_plus(stderr, "Unsupported algorithm: %s\n",
418
result->unsupported_algorithm);
419
fprintf_plus(stderr, "Wrong key usage: %u\n",
420
result->wrong_key_usage);
421
if(result->file_name != NULL){
422
fprintf_plus(stderr, "File name: %s\n", result->file_name);
423
}
424
gpgme_recipient_t recipient;
425
recipient = result->recipients;
426
while(recipient != NULL){
427
fprintf_plus(stderr, "Public key algorithm: %s\n",
428
gpgme_pubkey_algo_name
429
(recipient->pubkey_algo));
430
fprintf_plus(stderr, "Key ID: %s\n", recipient->keyid);
431
fprintf_plus(stderr, "Secret key available: %s\n",
432
recipient->status == GPG_ERR_NO_SECKEY
433
? "No" : "Yes");
434
recipient = recipient->next;
435
}
436
}
437
}
438
goto decrypt_end;
439
}
440
441
if(debug){
442
fprintf_plus(stderr, "Decryption of OpenPGP data succeeded\n");
443
}
125
if (rc != GPG_ERR_NO_ERROR){
126
fprintf(stderr, "bad gpgme_data_new: %s: %s\n",
127
gpgme_strsource(rc), gpgme_strerror(rc));
128
return -1;
129
}
130
131
/* Create new GPGME "context" */
132
rc = gpgme_new(&ctx);
133
if (rc != GPG_ERR_NO_ERROR){
134
fprintf(stderr, "bad gpgme_new: %s: %s\n",
135
gpgme_strsource(rc), gpgme_strerror(rc));
136
return -1;
137
}
138
139
/* Decrypt data from the FILE pointer to the plaintext data buffer */
140
rc = gpgme_op_decrypt(ctx, dh_crypto, dh_plain);
141
if (rc != GPG_ERR_NO_ERROR){
142
fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
143
gpgme_strsource(rc), gpgme_strerror(rc));
144
return -1;
145
}
146
147
/* gpgme_decrypt_result_t result; */
148
/* result = gpgme_op_decrypt_result(ctx); */
149
/* fprintf(stderr, "Unsupported algorithm: %s\n", result->unsupported_algorithm); */
150
/* fprintf(stderr, "Wrong key usage: %d\n", result->wrong_key_usage); */
151
/* if(result->file_name != NULL){ */
152
/* fprintf(stderr, "File name: %s\n", result->file_name); */
153
/* } */
154
/* gpgme_recipient_t recipient; */
155
/* recipient = result->recipients; */
156
/* if(recipient){ */
157
/* while(recipient != NULL){ */
158
/* fprintf(stderr, "Public key algorithm: %s\n", */
159
/* gpgme_pubkey_algo_name(recipient->pubkey_algo)); */
160
/* fprintf(stderr, "Key ID: %s\n", recipient->keyid); */
161
/* fprintf(stderr, "Secret key available: %s\n", */
162
/* recipient->status == GPG_ERR_NO_SECKEY ? "No" : "Yes"); */
163
/* recipient = recipient->next; */
164
/* } */
165
/* } */
166
167
/* Delete the GPGME FILE pointer cryptotext data buffer */
168
gpgme_data_release(dh_crypto);
444
169
445
170
/* Seek back to the beginning of the GPGME plaintext data buffer */
446
if(gpgme_data_seek(dh_plain, (off_t)0, SEEK_SET) == -1){
447
perror_plus("gpgme_data_seek");
448
plaintext_length = -1;
449
goto decrypt_end;
450
}
451
452
*plaintext = NULL;
171
gpgme_data_seek(dh_plain, 0, SEEK_SET);
172
173
*new_packet = 0;
453
174
while(true){
454
plaintext_capacity = incbuffer(plaintext,
455
(size_t)plaintext_length,
456
plaintext_capacity);
457
if(plaintext_capacity == 0){
458
perror_plus("incbuffer");
459
plaintext_length = -1;
460
goto decrypt_end;
175
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
176
*new_packet = realloc(*new_packet, new_packet_capacity + BUFFER_SIZE);
177
if (*new_packet == NULL){
178
perror("realloc");
179
return -1;
180
}
181
new_packet_capacity += BUFFER_SIZE;
461
182
}
462
183
463
ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
464
BUFFER_SIZE);
184
ret = gpgme_data_read(dh_plain, *new_packet + new_packet_length, BUFFER_SIZE);
465
185
/* Print the data, if any */
466
if(ret == 0){
467
/* EOF */
186
if (ret == 0){
187
/* If password is empty, then a incorrect error will be printed */
468
188
break;
469
189
}
470
190
if(ret < 0){
471
perror_plus("gpgme_data_read");
472
plaintext_length = -1;
473
goto decrypt_end;
474
}
475
plaintext_length += ret;
476
}
477
478
if(debug){
479
fprintf_plus(stderr, "Decrypted password is: ");
480
for(ssize_t i = 0; i < plaintext_length; i++){
481
fprintf(stderr, "%02hhX ", (*plaintext)[i]);
482
}
483
fprintf(stderr, "\n");
484
}
485
486
decrypt_end:
487
488
/* Delete the GPGME cryptotext data buffer */
489
gpgme_data_release(dh_crypto);
490
491
/* Delete the GPGME plaintext data buffer */
191
perror("gpgme_data_read");
192
return -1;
193
}
194
new_packet_length += ret;
195
}
196
197
/* Delete the GPGME plaintext data buffer */
492
198
gpgme_data_release(dh_plain);
493
return plaintext_length;
199
return new_packet_length;
494
200
}
495
201
496
__attribute__((warn_unused_result))
497
static const char *safer_gnutls_strerror(int value){
498
const char *ret = gnutls_strerror(value);
499
if(ret == NULL)
202
static const char * safer_gnutls_strerror (int value) {
203
const char *ret = gnutls_strerror (value);
204
if (ret == NULL)
500
205
ret = "(unknown)";
501
206
return ret;
502
207
}
503
208
504
/* GnuTLS log function callback */
505
__attribute__((nonnull))
506
static void debuggnutls(__attribute__((unused)) int level,
507
const char* string){
508
fprintf_plus(stderr, "GnuTLS: %s", string);
209
void debuggnutls(int level, const char* string){
210
fprintf(stderr, "%s", string);
509
211
}
510
212
511
__attribute__((nonnull, warn_unused_result))
512
static int init_gnutls_global(const char *pubkeyfilename,
513
const char *seckeyfilename,
514
mandos_context *mc){
213
int initgnutls(encrypted_session *es){
214
const char *err;
515
215
int ret;
516
216
517
if(debug){
518
fprintf_plus(stderr, "Initializing GnuTLS\n");
519
}
520
521
ret = gnutls_global_init();
522
if(ret != GNUTLS_E_SUCCESS){
523
fprintf_plus(stderr, "GnuTLS global_init: %s\n",
524
safer_gnutls_strerror(ret));
525
return -1;
526
}
527
528
if(debug){
529
/* "Use a log level over 10 to enable all debugging options."
530
* - GnuTLS manual
531
*/
532
gnutls_global_set_log_level(11);
533
gnutls_global_set_log_function(debuggnutls);
534
}
535
536
/* OpenPGP credentials */
537
ret = gnutls_certificate_allocate_credentials(&mc->cred);
538
if(ret != GNUTLS_E_SUCCESS){
539
fprintf_plus(stderr, "GnuTLS memory error: %s\n",
540
safer_gnutls_strerror(ret));
541
gnutls_global_deinit();
542
return -1;
543
}
544
545
if(debug){
546
fprintf_plus(stderr, "Attempting to use OpenPGP public key %s and"
547
" secret key %s as GnuTLS credentials\n",
548
pubkeyfilename,
549
seckeyfilename);
550
}
551
217
if ((ret = gnutls_global_init ())
218
!= GNUTLS_E_SUCCESS) {
219
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
220
return -1;
221
}
222
223
/* Uncomment to enable full debuggin on the gnutls library */
224
/* gnutls_global_set_log_level(11); */
225
/* gnutls_global_set_log_function(debuggnutls); */
226
227
228
/* openpgp credentials */
229
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
230
!= GNUTLS_E_SUCCESS) {
231
fprintf (stderr, "memory error: %s\n", safer_gnutls_strerror(ret));
232
return -1;
233
}
234
552
235
ret = gnutls_certificate_set_openpgp_key_file
553
(mc->cred, pubkeyfilename, seckeyfilename,
554
GNUTLS_OPENPGP_FMT_BASE64);
555
if(ret != GNUTLS_E_SUCCESS){
556
fprintf_plus(stderr,
557
"Error[%d] while reading the OpenPGP key pair ('%s',"
558
" '%s')\n", ret, pubkeyfilename, seckeyfilename);
559
fprintf_plus(stderr, "The GnuTLS error is: %s\n",
560
safer_gnutls_strerror(ret));
561
goto globalfail;
562
}
563
564
/* GnuTLS server initialization */
565
ret = gnutls_dh_params_init(&mc->dh_params);
566
if(ret != GNUTLS_E_SUCCESS){
567
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
568
" initialization: %s\n",
569
safer_gnutls_strerror(ret));
570
goto globalfail;
571
}
572
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
573
if(ret != GNUTLS_E_SUCCESS){
574
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
575
safer_gnutls_strerror(ret));
576
goto globalfail;
577
}
578
579
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
580
581
return 0;
582
583
globalfail:
584
585
gnutls_certificate_free_credentials(mc->cred);
586
gnutls_global_deinit();
587
gnutls_dh_params_deinit(mc->dh_params);
588
return -1;
589
}
590
591
__attribute__((nonnull, warn_unused_result))
592
static int init_gnutls_session(gnutls_session_t *session,
593
mandos_context *mc){
594
int ret;
595
/* GnuTLS session creation */
596
do {
597
ret = gnutls_init(session, GNUTLS_SERVER);
598
if(quit_now){
599
return -1;
600
}
601
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
602
if(ret != GNUTLS_E_SUCCESS){
603
fprintf_plus(stderr,
604
"Error in GnuTLS session initialization: %s\n",
605
safer_gnutls_strerror(ret));
606
}
607
608
{
609
const char *err;
610
do {
611
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
612
if(quit_now){
613
gnutls_deinit(*session);
614
return -1;
615
}
616
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
617
if(ret != GNUTLS_E_SUCCESS){
618
fprintf_plus(stderr, "Syntax error at: %s\n", err);
619
fprintf_plus(stderr, "GnuTLS error: %s\n",
620
safer_gnutls_strerror(ret));
621
gnutls_deinit(*session);
622
return -1;
623
}
624
}
625
626
do {
627
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
628
mc->cred);
629
if(quit_now){
630
gnutls_deinit(*session);
631
return -1;
632
}
633
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
634
if(ret != GNUTLS_E_SUCCESS){
635
fprintf_plus(stderr, "Error setting GnuTLS credentials: %s\n",
636
safer_gnutls_strerror(ret));
637
gnutls_deinit(*session);
638
return -1;
639
}
640
236
(es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
237
if (ret != GNUTLS_E_SUCCESS) {
238
fprintf
239
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s', '%s')\n",
240
ret, CERTFILE, KEYFILE);
241
fprintf(stdout, "The Error is: %s\n",
242
safer_gnutls_strerror(ret));
243
return -1;
244
}
245
246
//Gnutls server initialization
247
if ((ret = gnutls_dh_params_init (&es->dh_params))
248
!= GNUTLS_E_SUCCESS) {
249
fprintf (stderr, "Error in dh parameter initialization: %s\n",
250
safer_gnutls_strerror(ret));
251
return -1;
252
}
253
254
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
255
!= GNUTLS_E_SUCCESS) {
256
fprintf (stderr, "Error in prime generation: %s\n",
257
safer_gnutls_strerror(ret));
258
return -1;
259
}
260
261
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
262
263
// Gnutls session creation
264
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
265
!= GNUTLS_E_SUCCESS){
266
fprintf(stderr, "Error in gnutls session initialization: %s\n",
267
safer_gnutls_strerror(ret));
268
}
269
270
if ((ret = gnutls_priority_set_direct (es->session, "NORMAL", &err))
271
!= GNUTLS_E_SUCCESS) {
272
fprintf(stderr, "Syntax error at: %s\n", err);
273
fprintf(stderr, "Gnutls error: %s\n",
274
safer_gnutls_strerror(ret));
275
return -1;
276
}
277
278
if ((ret = gnutls_credentials_set
279
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
280
!= GNUTLS_E_SUCCESS) {
281
fprintf(stderr, "Error setting a credentials set: %s\n",
282
safer_gnutls_strerror(ret));
283
return -1;
284
}
285
641
286
/* ignore client certificate if any. */
642
gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
287
gnutls_certificate_server_set_request (es->session, GNUTLS_CERT_IGNORE);
643
288
644
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
289
gnutls_dh_set_prime_bits (es->session, DH_BITS);
645
290
646
291
return 0;
647
292
}
648
293
649
/* Avahi log function callback */
650
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
651
__attribute__((unused)) const char *txt){}
652
653
/* Set effective uid to 0, return errno */
654
__attribute__((warn_unused_result))
655
error_t raise_privileges(void){
656
error_t old_errno = errno;
657
error_t ret_errno = 0;
658
if(seteuid(0) == -1){
659
ret_errno = errno;
660
}
661
errno = old_errno;
662
return ret_errno;
663
}
664
665
/* Set effective and real user ID to 0. Return errno. */
666
__attribute__((warn_unused_result))
667
error_t raise_privileges_permanently(void){
668
error_t old_errno = errno;
669
error_t ret_errno = raise_privileges();
670
if(ret_errno != 0){
671
errno = old_errno;
672
return ret_errno;
673
}
674
if(setuid(0) == -1){
675
ret_errno = errno;
676
}
677
errno = old_errno;
678
return ret_errno;
679
}
680
681
/* Set effective user ID to unprivileged saved user ID */
682
__attribute__((warn_unused_result))
683
error_t lower_privileges(void){
684
error_t old_errno = errno;
685
error_t ret_errno = 0;
686
if(seteuid(uid) == -1){
687
ret_errno = errno;
688
}
689
errno = old_errno;
690
return ret_errno;
691
}
692
693
/* Lower privileges permanently */
694
__attribute__((warn_unused_result))
695
error_t lower_privileges_permanently(void){
696
error_t old_errno = errno;
697
error_t ret_errno = 0;
698
if(setuid(uid) == -1){
699
ret_errno = errno;
700
}
701
errno = old_errno;
702
return ret_errno;
703
}
704
705
/* Helper function to add_local_route() and remove_local_route() */
706
__attribute__((nonnull, warn_unused_result))
707
static bool add_remove_local_route(const bool add,
708
const char *address,
709
AvahiIfIndex if_index){
710
int ret;
711
char helper[] = "mandos-client-iprouteadddel";
712
char add_arg[] = "add";
713
char remove_arg[] = "remove";
714
char *pluginhelperdir = getenv("MANDOSPLUGINHELPERDIR");
715
if(pluginhelperdir == NULL){
716
if(debug){
717
fprintf_plus(stderr, "MANDOSPLUGINHELPERDIR environment"
718
" variable not set; cannot run helper\n");
719
}
720
return false;
721
}
722
723
char interface[IF_NAMESIZE];
724
if(if_indextoname((unsigned int)if_index, interface) == NULL){
725
perror_plus("if_indextoname");
726
return false;
727
}
728
729
int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
730
if(devnull == -1){
731
perror_plus("open(\"/dev/null\", O_RDONLY)");
732
return false;
733
}
734
pid_t pid = fork();
735
if(pid == 0){
736
/* Child */
737
/* Raise privileges */
738
errno = raise_privileges_permanently();
739
if(errno != 0){
740
perror_plus("Failed to raise privileges");
741
/* _exit(EX_NOPERM); */
742
} else {
743
/* Set group */
744
errno = 0;
745
ret = setgid(0);
746
if(ret == -1){
747
perror_plus("setgid");
748
_exit(EX_NOPERM);
749
}
750
/* Reset supplementary groups */
751
errno = 0;
752
ret = setgroups(0, NULL);
753
if(ret == -1){
754
perror_plus("setgroups");
755
_exit(EX_NOPERM);
756
}
757
}
758
ret = dup2(devnull, STDIN_FILENO);
759
if(ret == -1){
760
perror_plus("dup2(devnull, STDIN_FILENO)");
761
_exit(EX_OSERR);
762
}
763
ret = close(devnull);
764
if(ret == -1){
765
perror_plus("close");
766
_exit(EX_OSERR);
767
}
768
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
769
if(ret == -1){
770
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
771
_exit(EX_OSERR);
772
}
773
int helperdir_fd = (int)TEMP_FAILURE_RETRY(open(pluginhelperdir,
774
O_RDONLY
775
| O_DIRECTORY
776
| O_PATH
777
| O_CLOEXEC));
778
int helper_fd = (int)TEMP_FAILURE_RETRY(openat(helperdir_fd,
779
helper, O_RDONLY));
780
TEMP_FAILURE_RETRY(close(helperdir_fd));
781
#ifdef __GNUC__
782
#pragma GCC diagnostic push
783
#pragma GCC diagnostic ignored "-Wcast-qual"
784
#endif
785
if(fexecve(helper_fd, (char *const [])
786
{ helper, add ? add_arg : remove_arg, (char *)address,
787
interface, NULL }, environ) == -1){
788
#ifdef __GNUC__
789
#pragma GCC diagnostic pop
790
#endif
791
perror_plus("fexecve");
792
_exit(EXIT_FAILURE);
793
}
794
}
795
if(pid == -1){
796
perror_plus("fork");
797
return false;
798
}
799
int status;
800
pid_t pret = -1;
801
errno = 0;
802
do {
803
pret = waitpid(pid, &status, 0);
804
if(pret == -1 and errno == EINTR and quit_now){
805
int errno_raising = 0;
806
if((errno = raise_privileges()) != 0){
807
errno_raising = errno;
808
perror_plus("Failed to raise privileges in order to"
809
" kill helper program");
810
}
811
if(kill(pid, SIGTERM) == -1){
812
perror_plus("kill");
813
}
814
if((errno_raising == 0) and (errno = lower_privileges()) != 0){
815
perror_plus("Failed to lower privileges after killing"
816
" helper program");
817
}
818
return false;
819
}
820
} while(pret == -1 and errno == EINTR);
821
if(pret == -1){
822
perror_plus("waitpid");
823
return false;
824
}
825
if(WIFEXITED(status)){
826
if(WEXITSTATUS(status) != 0){
827
fprintf_plus(stderr, "Error: iprouteadddel exited"
828
" with status %d\n", WEXITSTATUS(status));
829
return false;
830
}
831
return true;
832
}
833
if(WIFSIGNALED(status)){
834
fprintf_plus(stderr, "Error: iprouteadddel died by"
835
" signal %d\n", WTERMSIG(status));
836
return false;
837
}
838
fprintf_plus(stderr, "Error: iprouteadddel crashed\n");
839
return false;
840
}
841
842
__attribute__((nonnull, warn_unused_result))
843
static bool add_local_route(const char *address,
844
AvahiIfIndex if_index){
845
return add_remove_local_route(true, address, if_index);
846
}
847
848
__attribute__((nonnull, warn_unused_result))
849
static bool remove_local_route(const char *address,
850
AvahiIfIndex if_index){
851
return add_remove_local_route(false, address, if_index);
852
}
853
854
/* Called when a Mandos server is found */
855
__attribute__((nonnull, warn_unused_result))
856
static int start_mandos_communication(const char *ip, in_port_t port,
857
AvahiIfIndex if_index,
858
int af, mandos_context *mc){
859
int ret, tcp_sd = -1;
860
ssize_t sret;
861
struct sockaddr_storage to;
294
void empty_log(AvahiLogLevel level, const char *txt){}
295
296
int start_mandos_communcation(char *ip, uint16_t port){
297
int ret, tcp_sd;
298
struct sockaddr_in6 to;
299
struct in6_addr ip_addr;
300
encrypted_session es;
862
301
char *buffer = NULL;
863
char *decrypted_buffer = NULL;
302
char *decrypted_buffer;
864
303
size_t buffer_length = 0;
865
304
size_t buffer_capacity = 0;
866
size_t written;
867
int retval = -1;
868
gnutls_session_t session;
869
int pf; /* Protocol family */
870
bool route_added = false;
871
872
errno = 0;
873
874
if(quit_now){
875
errno = EINTR;
876
return -1;
877
}
878
879
switch(af){
880
case AF_INET6:
881
pf = PF_INET6;
882
break;
883
case AF_INET:
884
pf = PF_INET;
885
break;
886
default:
887
fprintf_plus(stderr, "Bad address family: %d\n", af);
888
errno = EINVAL;
889
return -1;
890
}
891
892
/* If the interface is specified and we have a list of interfaces */
893
if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
894
/* Check if the interface is one of the interfaces we are using */
895
bool match = false;
896
{
897
char *interface = NULL;
898
while((interface=argz_next(mc->interfaces, mc->interfaces_size,
899
interface))){
900
if(if_nametoindex(interface) == (unsigned int)if_index){
901
match = true;
902
break;
903
}
904
}
905
}
906
if(not match){
907
/* This interface does not match any in the list, so we don't
908
connect to the server */
909
if(debug){
910
char interface[IF_NAMESIZE];
911
if(if_indextoname((unsigned int)if_index, interface) == NULL){
912
perror_plus("if_indextoname");
913
} else {
914
fprintf_plus(stderr, "Skipping server on non-used interface"
915
" \"%s\"\n",
916
if_indextoname((unsigned int)if_index,
917
interface));
918
}
919
}
920
return -1;
921
}
922
}
923
924
ret = init_gnutls_session(&session, mc);
925
if(ret != 0){
926
return -1;
927
}
928
929
if(debug){
930
fprintf_plus(stderr, "Setting up a TCP connection to %s, port %"
931
PRIuMAX "\n", ip, (uintmax_t)port);
932
}
933
934
tcp_sd = socket(pf, SOCK_STREAM | SOCK_CLOEXEC, 0);
935
if(tcp_sd < 0){
936
int e = errno;
937
perror_plus("socket");
938
errno = e;
939
goto mandos_end;
940
}
941
942
if(quit_now){
943
errno = EINTR;
944
goto mandos_end;
945
}
946
947
memset(&to, 0, sizeof(to));
948
if(af == AF_INET6){
949
((struct sockaddr_in6 *)&to)->sin6_family = (sa_family_t)af;
950
ret = inet_pton(af, ip, &((struct sockaddr_in6 *)&to)->sin6_addr);
951
} else { /* IPv4 */
952
((struct sockaddr_in *)&to)->sin_family = (sa_family_t)af;
953
ret = inet_pton(af, ip, &((struct sockaddr_in *)&to)->sin_addr);
954
}
955
if(ret < 0 ){
956
int e = errno;
957
perror_plus("inet_pton");
958
errno = e;
959
goto mandos_end;
960
}
305
ssize_t decrypted_buffer_size;
306
int retval = 0;
307
308
309
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
310
if(tcp_sd < 0) {
311
perror("socket");
312
return -1;
313
}
314
315
ret = setsockopt(tcp_sd, SOL_SOCKET, SO_BINDTODEVICE, "eth0", 5);
316
if(tcp_sd < 0) {
317
perror("setsockopt bindtodevice");
318
return -1;
319
}
320
321
memset(&to,0,sizeof(to));
322
to.sin6_family = AF_INET6;
323
ret = inet_pton(AF_INET6, ip, &ip_addr);
324
if (ret < 0 ){
325
perror("inet_pton");
326
return -1;
327
}
961
328
if(ret == 0){
962
int e = errno;
963
fprintf_plus(stderr, "Bad address: %s\n", ip);
964
errno = e;
965
goto mandos_end;
966
}
967
if(af == AF_INET6){
968
((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
969
if(IN6_IS_ADDR_LINKLOCAL
970
(&((struct sockaddr_in6 *)&to)->sin6_addr)){
971
if(if_index == AVAHI_IF_UNSPEC){
972
fprintf_plus(stderr, "An IPv6 link-local address is"
973
" incomplete without a network interface\n");
974
errno = EINVAL;
975
goto mandos_end;
976
}
977
/* Set the network interface number as scope */
978
((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
979
}
980
} else {
981
((struct sockaddr_in *)&to)->sin_port = htons(port);
982
}
983
984
if(quit_now){
985
errno = EINTR;
986
goto mandos_end;
987
}
988
989
if(debug){
990
if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){
991
char interface[IF_NAMESIZE];
992
if(if_indextoname((unsigned int)if_index, interface) == NULL){
993
perror_plus("if_indextoname");
994
} else {
995
fprintf_plus(stderr, "Connection to: %s%%%s, port %" PRIuMAX
996
"\n", ip, interface, (uintmax_t)port);
997
}
998
} else {
999
fprintf_plus(stderr, "Connection to: %s, port %" PRIuMAX "\n",
1000
ip, (uintmax_t)port);
1001
}
1002
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
1003
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
1004
if(af == AF_INET6){
1005
ret = getnameinfo((struct sockaddr *)&to,
1006
sizeof(struct sockaddr_in6),
1007
addrstr, sizeof(addrstr), NULL, 0,
1008
NI_NUMERICHOST);
1009
} else {
1010
ret = getnameinfo((struct sockaddr *)&to,
1011
sizeof(struct sockaddr_in),
1012
addrstr, sizeof(addrstr), NULL, 0,
1013
NI_NUMERICHOST);
1014
}
1015
if(ret == EAI_SYSTEM){
1016
perror_plus("getnameinfo");
1017
} else if(ret != 0) {
1018
fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
1019
} else if(strcmp(addrstr, ip) != 0){
1020
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
1021
}
1022
}
1023
1024
if(quit_now){
1025
errno = EINTR;
1026
goto mandos_end;
1027
}
1028
1029
while(true){
1030
if(af == AF_INET6){
1031
ret = connect(tcp_sd, (struct sockaddr *)&to,
1032
sizeof(struct sockaddr_in6));
1033
} else {
1034
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
1035
sizeof(struct sockaddr_in));
1036
}
1037
if(ret < 0){
1038
if(errno == ENETUNREACH
1039
and if_index != AVAHI_IF_UNSPEC
1040
and connect_to == NULL
1041
and not route_added and
1042
((af == AF_INET6 and not
1043
IN6_IS_ADDR_LINKLOCAL(&(((struct sockaddr_in6 *)
1044
&to)->sin6_addr)))
1045
or (af == AF_INET and
1046
/* Not a a IPv4LL address */
1047
(ntohl(((struct sockaddr_in *)&to)->sin_addr.s_addr)
1048
& 0xFFFF0000L) != 0xA9FE0000L))){
1049
/* Work around Avahi bug - Avahi does not announce link-local
1050
addresses if it has a global address, so local hosts with
1051
*only* a link-local address (e.g. Mandos clients) cannot
1052
connect to a Mandos server announced by Avahi on a server
1053
host with a global address. Work around this by retrying
1054
with an explicit route added with the server's address.
1055
1056
Avahi bug reference:
1057
http://lists.freedesktop.org/archives/avahi/2010-February/001833.html
1058
https://bugs.debian.org/587961
1059
*/
1060
int e = errno;
1061
route_added = add_local_route(ip, if_index);
1062
if(route_added){
1063
continue;
1064
}
1065
errno = e;
1066
}
1067
if(errno != ECONNREFUSED or debug){
1068
int e = errno;
1069
perror_plus("connect");
1070
errno = e;
1071
}
1072
goto mandos_end;
1073
}
1074
1075
if(quit_now){
1076
errno = EINTR;
1077
goto mandos_end;
1078
}
1079
break;
1080
}
1081
1082
const char *out = mandos_protocol_version;
1083
written = 0;
1084
while(true){
1085
size_t out_size = strlen(out);
1086
ret = (int)TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
1087
out_size - written));
1088
if(ret == -1){
1089
int e = errno;
1090
perror_plus("write");
1091
errno = e;
1092
goto mandos_end;
1093
}
1094
written += (size_t)ret;
1095
if(written < out_size){
1096
continue;
1097
} else {
1098
if(out == mandos_protocol_version){
1099
written = 0;
1100
out = "\r\n";
1101
} else {
1102
break;
1103
}
1104
}
1105
1106
if(quit_now){
1107
errno = EINTR;
1108
goto mandos_end;
1109
}
1110
}
1111
1112
if(debug){
1113
fprintf_plus(stderr, "Establishing TLS session with %s\n", ip);
1114
}
1115
1116
if(quit_now){
1117
errno = EINTR;
1118
goto mandos_end;
1119
}
1120
1121
/* This casting via intptr_t is to eliminate warning about casting
1122
an int to a pointer type. This is exactly how the GnuTLS Guile
1123
function "set-session-transport-fd!" does it. */
1124
gnutls_transport_set_ptr(session,
1125
(gnutls_transport_ptr_t)(intptr_t)tcp_sd);
1126
1127
if(quit_now){
1128
errno = EINTR;
1129
goto mandos_end;
1130
}
1131
1132
do {
1133
ret = gnutls_handshake(session);
1134
if(quit_now){
1135
errno = EINTR;
1136
goto mandos_end;
1137
}
1138
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
1139
1140
if(ret != GNUTLS_E_SUCCESS){
1141
if(debug){
1142
fprintf_plus(stderr, "*** GnuTLS Handshake failed ***\n");
1143
gnutls_perror(ret);
1144
}
1145
errno = EPROTO;
1146
goto mandos_end;
1147
}
1148
1149
/* Read OpenPGP packet that contains the wanted password */
1150
1151
if(debug){
1152
fprintf_plus(stderr, "Retrieving OpenPGP encrypted password from"
1153
" %s\n", ip);
1154
}
1155
1156
while(true){
1157
1158
if(quit_now){
1159
errno = EINTR;
1160
goto mandos_end;
1161
}
1162
1163
buffer_capacity = incbuffer(&buffer, buffer_length,
1164
buffer_capacity);
1165
if(buffer_capacity == 0){
1166
int e = errno;
1167
perror_plus("incbuffer");
1168
errno = e;
1169
goto mandos_end;
1170
}
1171
1172
if(quit_now){
1173
errno = EINTR;
1174
goto mandos_end;
1175
}
1176
1177
sret = gnutls_record_recv(session, buffer+buffer_length,
1178
BUFFER_SIZE);
1179
if(sret == 0){
329
fprintf(stderr, "Bad address: %s\n", ip);
330
return -1;
331
}
332
to.sin6_port = htons(port);
333
to.sin6_scope_id = if_nametoindex("eth0");
334
335
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
336
if (ret < 0){
337
perror("connect");
338
return -1;
339
}
340
341
ret = initgnutls (&es);
342
if (ret != 0){
343
retval = -1;
344
return -1;
345
}
346
347
348
gnutls_transport_set_ptr (es.session, (gnutls_transport_ptr_t) tcp_sd);
349
350
ret = gnutls_handshake (es.session);
351
352
if (ret != GNUTLS_E_SUCCESS){
353
fprintf(stderr, "\n*** Handshake failed ***\n");
354
gnutls_perror (ret);
355
retval = -1;
356
goto exit;
357
}
358
359
//retrive password
360
while(true){
361
if (buffer_length + BUFFER_SIZE > buffer_capacity){
362
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
363
if (buffer == NULL){
364
perror("realloc");
365
goto exit;
366
}
367
buffer_capacity += BUFFER_SIZE;
368
}
369
370
ret = gnutls_record_recv
371
(es.session, buffer+buffer_length, BUFFER_SIZE);
372
if (ret == 0){
1180
373
break;
1181
374
}
1182
if(sret < 0){
1183
switch(sret){
375
if (ret < 0){
376
switch(ret){
1184
377
case GNUTLS_E_INTERRUPTED:
1185
378
case GNUTLS_E_AGAIN:
1186
379
break;
1187
380
case GNUTLS_E_REHANDSHAKE:
1188
do {
1189
ret = gnutls_handshake(session);
1190
1191
if(quit_now){
1192
errno = EINTR;
1193
goto mandos_end;
1194
}
1195
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
1196
if(ret < 0){
1197
fprintf_plus(stderr, "*** GnuTLS Re-handshake failed "
1198
"***\n");
1199
gnutls_perror(ret);
1200
errno = EPROTO;
1201
goto mandos_end;
381
ret = gnutls_handshake (es.session);
382
if (ret < 0){
383
fprintf(stderr, "\n*** Handshake failed ***\n");
384
gnutls_perror (ret);
385
retval = -1;
386
goto exit;
1202
387
}
1203
388
break;
1204
389
default:
1205
fprintf_plus(stderr, "Unknown error while reading data from"
1206
" encrypted session with Mandos server\n");
1207
gnutls_bye(session, GNUTLS_SHUT_RDWR);
1208
errno = EIO;
1209
goto mandos_end;
390
fprintf(stderr, "Unknown error while reading data from encrypted session with mandos server\n");
391
retval = -1;
392
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
393
goto exit;
1210
394
}
1211
395
} else {
1212
buffer_length += (size_t) sret;
1213
}
1214
}
1215
1216
if(debug){
1217
fprintf_plus(stderr, "Closing TLS session\n");
1218
}
1219
1220
if(quit_now){
1221
errno = EINTR;
1222
goto mandos_end;
1223
}
1224
1225
do {
1226
ret = gnutls_bye(session, GNUTLS_SHUT_RDWR);
1227
if(quit_now){
1228
errno = EINTR;
1229
goto mandos_end;
1230
}
1231
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
1232
1233
if(buffer_length > 0){
1234
ssize_t decrypted_buffer_size;
1235
decrypted_buffer_size = pgp_packet_decrypt(buffer, buffer_length,
1236
&decrypted_buffer, mc);
1237
if(decrypted_buffer_size >= 0){
1238
1239
written = 0;
1240
while(written < (size_t) decrypted_buffer_size){
1241
if(quit_now){
1242
errno = EINTR;
1243
goto mandos_end;
1244
}
1245
1246
ret = (int)fwrite(decrypted_buffer + written, 1,
1247
(size_t)decrypted_buffer_size - written,
1248
stdout);
1249
if(ret == 0 and ferror(stdout)){
1250
int e = errno;
1251
if(debug){
1252
fprintf_plus(stderr, "Error writing encrypted data: %s\n",
1253
strerror(errno));
1254
}
1255
errno = e;
1256
goto mandos_end;
1257
}
1258
written += (size_t)ret;
1259
}
1260
retval = 0;
1261
}
1262
}
1263
1264
/* Shutdown procedure */
1265
1266
mandos_end:
1267
{
1268
if(route_added){
1269
if(not remove_local_route(ip, if_index)){
1270
fprintf_plus(stderr, "Failed to remove local route to %s on"
1271
" interface %d", ip, if_index);
1272
}
1273
}
1274
int e = errno;
1275
free(decrypted_buffer);
1276
free(buffer);
1277
if(tcp_sd >= 0){
1278
ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
1279
}
1280
if(ret == -1){
1281
if(e == 0){
1282
e = errno;
1283
}
1284
perror_plus("close");
1285
}
1286
gnutls_deinit(session);
1287
errno = e;
1288
if(quit_now){
1289
errno = EINTR;
396
buffer_length += ret;
397
}
398
}
399
400
if (buffer_length > 0){
401
if ((decrypted_buffer_size = gpg_packet_decrypt(buffer, buffer_length, &decrypted_buffer, CERT_ROOT)) == 0){
1290
402
retval = -1;
403
} else {
404
fwrite (decrypted_buffer, 1, decrypted_buffer_size, stdout);
405
free(decrypted_buffer);
1291
406
}
1292
407
}
408
409
free(buffer);
410
411
//shutdown procedure
412
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
413
exit:
414
close(tcp_sd);
415
gnutls_deinit (es.session);
416
gnutls_certificate_free_credentials (es.cred);
417
gnutls_global_deinit ();
1293
418
return retval;
1294
419
}
1295
420
1296
__attribute__((nonnull))
1297
static void resolve_callback(AvahiSServiceResolver *r,
1298
AvahiIfIndex interface,
1299
AvahiProtocol proto,
1300
AvahiResolverEvent event,
1301
const char *name,
1302
const char *type,
1303
const char *domain,
1304
const char *host_name,
1305
const AvahiAddress *address,
1306
uint16_t port,
1307
AVAHI_GCC_UNUSED AvahiStringList *txt,
1308
AVAHI_GCC_UNUSED AvahiLookupResultFlags
1309
flags,
1310
void *mc){
1311
if(r == NULL){
1312
return;
1313
}
1314
1315
/* Called whenever a service has been resolved successfully or
1316
timed out */
1317
1318
if(quit_now){
421
static AvahiSimplePoll *simple_poll = NULL;
422
static AvahiServer *server = NULL;
423
424
static void resolve_callback(
425
AvahiSServiceResolver *r,
426
AVAHI_GCC_UNUSED AvahiIfIndex interface,
427
AVAHI_GCC_UNUSED AvahiProtocol protocol,
428
AvahiResolverEvent event,
429
const char *name,
430
const char *type,
431
const char *domain,
432
const char *host_name,
433
const AvahiAddress *address,
434
uint16_t port,
435
AvahiStringList *txt,
436
AvahiLookupResultFlags flags,
437
AVAHI_GCC_UNUSED void* userdata) {
438
439
assert(r);
440
441
/* Called whenever a service has been resolved successfully or timed out */
442
443
switch (event) {
444
case AVAHI_RESOLVER_FAILURE:
445
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)));
446
break;
447
448
case AVAHI_RESOLVER_FOUND: {
449
char ip[AVAHI_ADDRESS_STR_MAX];
450
avahi_address_snprint(ip, sizeof(ip), address);
451
int ret = start_mandos_communcation(ip, port);
452
if (ret == 0){
453
exit(EXIT_SUCCESS);
454
} else {
455
exit(EXIT_FAILURE);
456
}
457
}
458
}
1319
459
avahi_s_service_resolver_free(r);
1320
return;
1321
}
1322
1323
switch(event){
1324
default:
1325
case AVAHI_RESOLVER_FAILURE:
1326
fprintf_plus(stderr, "(Avahi Resolver) Failed to resolve service "
1327
"'%s' of type '%s' in domain '%s': %s\n", name, type,
1328
domain,
1329
avahi_strerror(avahi_server_errno
1330
(((mandos_context*)mc)->server)));
1331
break;
1332
1333
case AVAHI_RESOLVER_FOUND:
1334
{
1335
char ip[AVAHI_ADDRESS_STR_MAX];
1336
avahi_address_snprint(ip, sizeof(ip), address);
1337
if(debug){
1338
fprintf_plus(stderr, "Mandos server \"%s\" found on %s (%s, %"
1339
PRIdMAX ") on port %" PRIu16 "\n", name,
1340
host_name, ip, (intmax_t)interface, port);
1341
}
1342
int ret = start_mandos_communication(ip, (in_port_t)port,
1343
interface,
1344
avahi_proto_to_af(proto),
1345
mc);
1346
if(ret == 0){
1347
avahi_simple_poll_quit(simple_poll);
1348
} else {
1349
if(not add_server(ip, (in_port_t)port, interface,
1350
avahi_proto_to_af(proto),
1351
&((mandos_context*)mc)->current_server)){
1352
fprintf_plus(stderr, "Failed to add server \"%s\" to server"
1353
" list\n", name);
1354
}
1355
}
1356
}
1357
}
1358
avahi_s_service_resolver_free(r);
1359
}
1360
1361
static void browse_callback(AvahiSServiceBrowser *b,
1362
AvahiIfIndex interface,
1363
AvahiProtocol protocol,
1364
AvahiBrowserEvent event,
1365
const char *name,
1366
const char *type,
1367
const char *domain,
1368
AVAHI_GCC_UNUSED AvahiLookupResultFlags
1369
flags,
1370
void *mc){
1371
if(b == NULL){
1372
return;
1373
}
1374
1375
/* Called whenever a new services becomes available on the LAN or
1376
is removed from the LAN */
1377
1378
if(quit_now){
1379
return;
1380
}
1381
1382
switch(event){
1383
default:
1384
case AVAHI_BROWSER_FAILURE:
1385
1386
fprintf_plus(stderr, "(Avahi browser) %s\n",
1387
avahi_strerror(avahi_server_errno
1388
(((mandos_context*)mc)->server)));
1389
avahi_simple_poll_quit(simple_poll);
1390
return;
1391
1392
case AVAHI_BROWSER_NEW:
1393
/* We ignore the returned Avahi resolver object. In the callback
1394
function we free it. If the Avahi server is terminated before
1395
the callback function is called the Avahi server will free the
1396
resolver for us. */
1397
1398
if(avahi_s_service_resolver_new(((mandos_context*)mc)->server,
1399
interface, protocol, name, type,
1400
domain, protocol, 0,
1401
resolve_callback, mc) == NULL)
1402
fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1403
" %s\n", name,
1404
avahi_strerror(avahi_server_errno
1405
(((mandos_context*)mc)->server)));
1406
break;
1407
1408
case AVAHI_BROWSER_REMOVE:
1409
break;
1410
1411
case AVAHI_BROWSER_ALL_FOR_NOW:
1412
case AVAHI_BROWSER_CACHE_EXHAUSTED:
1413
if(debug){
1414
fprintf_plus(stderr, "No Mandos server found, still"
1415
" searching...\n");
1416
}
1417
break;
1418
}
1419
}
1420
1421
/* Signal handler that stops main loop after SIGTERM */
1422
static void handle_sigterm(int sig){
1423
if(quit_now){
1424
return;
1425
}
1426
quit_now = 1;
1427
signal_received = sig;
1428
int old_errno = errno;
1429
/* set main loop to exit */
1430
if(simple_poll != NULL){
1431
avahi_simple_poll_quit(simple_poll);
1432
}
1433
errno = old_errno;
1434
}
1435
1436
__attribute__((nonnull, warn_unused_result))
1437
bool get_flags(const char *ifname, struct ifreq *ifr){
1438
int ret;
1439
error_t ret_errno;
1440
1441
int s = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1442
if(s < 0){
1443
ret_errno = errno;
1444
perror_plus("socket");
1445
errno = ret_errno;
1446
return false;
1447
}
1448
strcpy(ifr->ifr_name, ifname);
1449
ret = ioctl(s, SIOCGIFFLAGS, ifr);
1450
if(ret == -1){
1451
if(debug){
1452
ret_errno = errno;
1453
perror_plus("ioctl SIOCGIFFLAGS");
1454
errno = ret_errno;
1455
}
1456
return false;
1457
}
1458
return true;
1459
}
1460
1461
__attribute__((nonnull, warn_unused_result))
1462
bool good_flags(const char *ifname, const struct ifreq *ifr){
1463
1464
/* Reject the loopback device */
1465
if(ifr->ifr_flags & IFF_LOOPBACK){
1466
if(debug){
1467
fprintf_plus(stderr, "Rejecting loopback interface \"%s\"\n",
1468
ifname);
1469
}
1470
return false;
1471
}
1472
/* Accept point-to-point devices only if connect_to is specified */
1473
if(connect_to != NULL and (ifr->ifr_flags & IFF_POINTOPOINT)){
1474
if(debug){
1475
fprintf_plus(stderr, "Accepting point-to-point interface"
1476
" \"%s\"\n", ifname);
1477
}
1478
return true;
1479
}
1480
/* Otherwise, reject non-broadcast-capable devices */
1481
if(not (ifr->ifr_flags & IFF_BROADCAST)){
1482
if(debug){
1483
fprintf_plus(stderr, "Rejecting non-broadcast interface"
1484
" \"%s\"\n", ifname);
1485
}
1486
return false;
1487
}
1488
/* Reject non-ARP interfaces (including dummy interfaces) */
1489
if(ifr->ifr_flags & IFF_NOARP){
1490
if(debug){
1491
fprintf_plus(stderr, "Rejecting non-ARP interface \"%s\"\n",
1492
ifname);
1493
}
1494
return false;
1495
}
1496
1497
/* Accept this device */
1498
if(debug){
1499
fprintf_plus(stderr, "Interface \"%s\" is good\n", ifname);
1500
}
1501
return true;
1502
}
1503
1504
/*
1505
* This function determines if a directory entry in /sys/class/net
1506
* corresponds to an acceptable network device.
1507
* (This function is passed to scandir(3) as a filter function.)
1508
*/
1509
__attribute__((nonnull, warn_unused_result))
1510
int good_interface(const struct dirent *if_entry){
1511
if(if_entry->d_name[0] == '.'){
1512
return 0;
1513
}
1514
1515
struct ifreq ifr;
1516
if(not get_flags(if_entry->d_name, &ifr)){
1517
if(debug){
1518
fprintf_plus(stderr, "Failed to get flags for interface "
1519
"\"%s\"\n", if_entry->d_name);
1520
}
1521
return 0;
1522
}
1523
1524
if(not good_flags(if_entry->d_name, &ifr)){
1525
return 0;
1526
}
1527
return 1;
1528
}
1529
1530
/*
1531
* This function determines if a network interface is up.
1532
*/
1533
__attribute__((nonnull, warn_unused_result))
1534
bool interface_is_up(const char *interface){
1535
struct ifreq ifr;
1536
if(not get_flags(interface, &ifr)){
1537
if(debug){
1538
fprintf_plus(stderr, "Failed to get flags for interface "
1539
"\"%s\"\n", interface);
1540
}
1541
return false;
1542
}
1543
1544
return (bool)(ifr.ifr_flags & IFF_UP);
1545
}
1546
1547
/*
1548
* This function determines if a network interface is running
1549
*/
1550
__attribute__((nonnull, warn_unused_result))
1551
bool interface_is_running(const char *interface){
1552
struct ifreq ifr;
1553
if(not get_flags(interface, &ifr)){
1554
if(debug){
1555
fprintf_plus(stderr, "Failed to get flags for interface "
1556
"\"%s\"\n", interface);
1557
}
1558
return false;
1559
}
1560
1561
return (bool)(ifr.ifr_flags & IFF_RUNNING);
1562
}
1563
1564
__attribute__((nonnull, pure, warn_unused_result))
1565
int notdotentries(const struct dirent *direntry){
1566
/* Skip "." and ".." */
1567
if(direntry->d_name[0] == '.'
1568
and (direntry->d_name[1] == '\0'
1569
or (direntry->d_name[1] == '.'
1570
and direntry->d_name[2] == '\0'))){
1571
return 0;
1572
}
1573
return 1;
1574
}
1575
1576
/* Is this directory entry a runnable program? */
1577
__attribute__((nonnull, warn_unused_result))
1578
int runnable_hook(const struct dirent *direntry){
1579
int ret;
1580
size_t sret;
1581
struct stat st;
1582
1583
if((direntry->d_name)[0] == '\0'){
1584
/* Empty name? */
1585
return 0;
1586
}
1587
1588
sret = strspn(direntry->d_name, "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
1589
"abcdefghijklmnopqrstuvwxyz"
1590
"0123456789"
1591
"_.-");
1592
if((direntry->d_name)[sret] != '\0'){
1593
/* Contains non-allowed characters */
1594
if(debug){
1595
fprintf_plus(stderr, "Ignoring hook \"%s\" with bad name\n",
1596
direntry->d_name);
1597
}
1598
return 0;
1599
}
1600
1601
ret = fstatat(hookdir_fd, direntry->d_name, &st, 0);
1602
if(ret == -1){
1603
if(debug){
1604
perror_plus("Could not stat hook");
1605
}
1606
return 0;
1607
}
1608
if(not (S_ISREG(st.st_mode))){
1609
/* Not a regular file */
1610
if(debug){
1611
fprintf_plus(stderr, "Ignoring hook \"%s\" - not a file\n",
1612
direntry->d_name);
1613
}
1614
return 0;
1615
}
1616
if(not (st.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH))){
1617
/* Not executable */
1618
if(debug){
1619
fprintf_plus(stderr, "Ignoring hook \"%s\" - not executable\n",
1620
direntry->d_name);
1621
}
1622
return 0;
1623
}
1624
if(debug){
1625
fprintf_plus(stderr, "Hook \"%s\" is acceptable\n",
1626
direntry->d_name);
1627
}
1628
return 1;
1629
}
1630
1631
__attribute__((nonnull, warn_unused_result))
1632
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
1633
mandos_context *mc){
1634
int ret;
1635
struct timespec now;
1636
struct timespec waited_time;
1637
intmax_t block_time;
1638
1639
while(true){
1640
if(mc->current_server == NULL){
1641
if(debug){
1642
fprintf_plus(stderr, "Wait until first server is found."
1643
" No timeout!\n");
1644
}
1645
ret = avahi_simple_poll_iterate(s, -1);
1646
} else {
1647
if(debug){
1648
fprintf_plus(stderr, "Check current_server if we should run"
1649
" it, or wait\n");
1650
}
1651
/* the current time */
1652
ret = clock_gettime(CLOCK_MONOTONIC, &now);
1653
if(ret == -1){
1654
perror_plus("clock_gettime");
1655
return -1;
1656
}
1657
/* Calculating in ms how long time between now and server
1658
who we visted longest time ago. Now - last seen. */
1659
waited_time.tv_sec = (now.tv_sec
1660
- mc->current_server->last_seen.tv_sec);
1661
waited_time.tv_nsec = (now.tv_nsec
1662
- mc->current_server->last_seen.tv_nsec);
1663
/* total time is 10s/10,000ms.
1664
Converting to s from ms by dividing by 1,000,
1665
and ns to ms by dividing by 1,000,000. */
1666
block_time = ((retry_interval
1667
- ((intmax_t)waited_time.tv_sec * 1000))
1668
- ((intmax_t)waited_time.tv_nsec / 1000000));
1669
1670
if(debug){
1671
fprintf_plus(stderr, "Blocking for %" PRIdMAX " ms\n",
1672
block_time);
1673
}
1674
1675
if(block_time <= 0){
1676
ret = start_mandos_communication(mc->current_server->ip,
1677
mc->current_server->port,
1678
mc->current_server->if_index,
1679
mc->current_server->af, mc);
1680
if(ret == 0){
1681
avahi_simple_poll_quit(s);
1682
return 0;
1683
}
1684
ret = clock_gettime(CLOCK_MONOTONIC,
1685
&mc->current_server->last_seen);
1686
if(ret == -1){
1687
perror_plus("clock_gettime");
1688
return -1;
1689
}
1690
mc->current_server = mc->current_server->next;
1691
block_time = 0; /* Call avahi to find new Mandos
1692
servers, but don't block */
1693
}
1694
1695
ret = avahi_simple_poll_iterate(s, (int)block_time);
1696
}
1697
if(ret != 0){
1698
if(ret > 0 or errno != EINTR){
1699
return (ret != 1) ? ret : 0;
1700
}
1701
}
1702
}
1703
}
1704
1705
__attribute__((nonnull))
1706
void run_network_hooks(const char *mode, const char *interface,
1707
const float delay){
1708
struct dirent **direntries = NULL;
1709
if(hookdir_fd == -1){
1710
hookdir_fd = open(hookdir, O_RDONLY | O_DIRECTORY | O_PATH
1711
| O_CLOEXEC);
1712
if(hookdir_fd == -1){
1713
if(errno == ENOENT){
1714
if(debug){
1715
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1716
" found\n", hookdir);
1717
}
1718
} else {
1719
perror_plus("open");
1720
}
1721
return;
1722
}
1723
}
1724
#ifdef __GLIBC__
1725
#if __GLIBC_PREREQ(2, 15)
1726
int numhooks = scandirat(hookdir_fd, ".", &direntries,
1727
runnable_hook, alphasort);
1728
#else /* not __GLIBC_PREREQ(2, 15) */
1729
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1730
alphasort);
1731
#endif /* not __GLIBC_PREREQ(2, 15) */
1732
#else /* not __GLIBC__ */
1733
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1734
alphasort);
1735
#endif /* not __GLIBC__ */
1736
if(numhooks == -1){
1737
perror_plus("scandir");
1738
return;
1739
}
1740
struct dirent *direntry;
1741
int ret;
1742
int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
1743
if(devnull == -1){
1744
perror_plus("open(\"/dev/null\", O_RDONLY)");
1745
return;
1746
}
1747
for(int i = 0; i < numhooks; i++){
1748
direntry = direntries[i];
1749
if(debug){
1750
fprintf_plus(stderr, "Running network hook \"%s\"\n",
1751
direntry->d_name);
1752
}
1753
pid_t hook_pid = fork();
1754
if(hook_pid == 0){
1755
/* Child */
1756
/* Raise privileges */
1757
errno = raise_privileges_permanently();
1758
if(errno != 0){
1759
perror_plus("Failed to raise privileges");
1760
_exit(EX_NOPERM);
1761
}
1762
/* Set group */
1763
errno = 0;
1764
ret = setgid(0);
1765
if(ret == -1){
1766
perror_plus("setgid");
1767
_exit(EX_NOPERM);
1768
}
1769
/* Reset supplementary groups */
1770
errno = 0;
1771
ret = setgroups(0, NULL);
1772
if(ret == -1){
1773
perror_plus("setgroups");
1774
_exit(EX_NOPERM);
1775
}
1776
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1777
if(ret == -1){
1778
perror_plus("setenv");
1779
_exit(EX_OSERR);
1780
}
1781
ret = setenv("DEVICE", interface, 1);
1782
if(ret == -1){
1783
perror_plus("setenv");
1784
_exit(EX_OSERR);
1785
}
1786
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1787
if(ret == -1){
1788
perror_plus("setenv");
1789
_exit(EX_OSERR);
1790
}
1791
ret = setenv("MODE", mode, 1);
1792
if(ret == -1){
1793
perror_plus("setenv");
1794
_exit(EX_OSERR);
1795
}
1796
char *delaystring;
1797
ret = asprintf(&delaystring, "%f", (double)delay);
1798
if(ret == -1){
1799
perror_plus("asprintf");
1800
_exit(EX_OSERR);
1801
}
1802
ret = setenv("DELAY", delaystring, 1);
1803
if(ret == -1){
1804
free(delaystring);
1805
perror_plus("setenv");
1806
_exit(EX_OSERR);
1807
}
1808
free(delaystring);
1809
if(connect_to != NULL){
1810
ret = setenv("CONNECT", connect_to, 1);
1811
if(ret == -1){
1812
perror_plus("setenv");
1813
_exit(EX_OSERR);
1814
}
1815
}
1816
int hook_fd = TEMP_FAILURE_RETRY(openat(hookdir_fd,
1817
direntry->d_name,
1818
O_RDONLY));
1819
if(hook_fd == -1){
1820
perror_plus("openat");
1821
_exit(EXIT_FAILURE);
1822
}
1823
if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1824
perror_plus("close");
1825
_exit(EXIT_FAILURE);
1826
}
1827
ret = dup2(devnull, STDIN_FILENO);
1828
if(ret == -1){
1829
perror_plus("dup2(devnull, STDIN_FILENO)");
1830
_exit(EX_OSERR);
1831
}
1832
ret = close(devnull);
1833
if(ret == -1){
1834
perror_plus("close");
1835
_exit(EX_OSERR);
1836
}
1837
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
1838
if(ret == -1){
1839
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
1840
_exit(EX_OSERR);
1841
}
1842
if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
1843
environ) == -1){
1844
perror_plus("fexecve");
1845
_exit(EXIT_FAILURE);
1846
}
1847
} else {
1848
if(hook_pid == -1){
1849
perror_plus("fork");
1850
free(direntry);
1851
continue;
1852
}
1853
int status;
1854
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1855
perror_plus("waitpid");
1856
free(direntry);
1857
continue;
1858
}
1859
if(WIFEXITED(status)){
1860
if(WEXITSTATUS(status) != 0){
1861
fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1862
" with status %d\n", direntry->d_name,
1863
WEXITSTATUS(status));
1864
free(direntry);
1865
continue;
1866
}
1867
} else if(WIFSIGNALED(status)){
1868
fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1869
" signal %d\n", direntry->d_name,
1870
WTERMSIG(status));
1871
free(direntry);
1872
continue;
1873
} else {
1874
fprintf_plus(stderr, "Warning: network hook \"%s\""
1875
" crashed\n", direntry->d_name);
1876
free(direntry);
1877
continue;
1878
}
1879
}
1880
if(debug){
1881
fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1882
direntry->d_name);
1883
}
1884
free(direntry);
1885
}
1886
free(direntries);
1887
if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1888
perror_plus("close");
1889
} else {
1890
hookdir_fd = -1;
1891
}
1892
close(devnull);
1893
}
1894
1895
__attribute__((nonnull, warn_unused_result))
1896
error_t bring_up_interface(const char *const interface,
1897
const float delay){
1898
error_t old_errno = errno;
1899
int ret;
1900
struct ifreq network;
1901
unsigned int if_index = if_nametoindex(interface);
1902
if(if_index == 0){
1903
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1904
errno = old_errno;
1905
return ENXIO;
1906
}
1907
1908
if(quit_now){
1909
errno = old_errno;
1910
return EINTR;
1911
}
1912
1913
if(not interface_is_up(interface)){
1914
error_t ret_errno = 0, ioctl_errno = 0;
1915
if(not get_flags(interface, &network)){
1916
ret_errno = errno;
1917
fprintf_plus(stderr, "Failed to get flags for interface "
1918
"\"%s\"\n", interface);
1919
errno = old_errno;
1920
return ret_errno;
1921
}
1922
network.ifr_flags |= IFF_UP; /* set flag */
1923
1924
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1925
if(sd == -1){
1926
ret_errno = errno;
1927
perror_plus("socket");
1928
errno = old_errno;
1929
return ret_errno;
1930
}
1931
1932
if(quit_now){
1933
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1934
if(ret == -1){
1935
perror_plus("close");
1936
}
1937
errno = old_errno;
1938
return EINTR;
1939
}
1940
1941
if(debug){
1942
fprintf_plus(stderr, "Bringing up interface \"%s\"\n",
1943
interface);
1944
}
1945
1946
/* Raise privileges */
1947
ret_errno = raise_privileges();
1948
if(ret_errno != 0){
1949
errno = ret_errno;
1950
perror_plus("Failed to raise privileges");
1951
}
1952
1953
#ifdef __linux__
1954
int ret_linux;
1955
bool restore_loglevel = false;
1956
if(ret_errno == 0){
1957
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1958
messages about the network interface to mess up the prompt */
1959
ret_linux = klogctl(8, NULL, 5);
1960
if(ret_linux == -1){
1961
perror_plus("klogctl");
1962
} else {
1963
restore_loglevel = true;
1964
}
1965
}
1966
#endif /* __linux__ */
1967
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1968
ioctl_errno = errno;
1969
#ifdef __linux__
1970
if(restore_loglevel){
1971
ret_linux = klogctl(7, NULL, 0);
1972
if(ret_linux == -1){
1973
perror_plus("klogctl");
1974
}
1975
}
1976
#endif /* __linux__ */
1977
1978
/* If raise_privileges() succeeded above */
1979
if(ret_errno == 0){
1980
/* Lower privileges */
1981
ret_errno = lower_privileges();
1982
if(ret_errno != 0){
1983
errno = ret_errno;
1984
perror_plus("Failed to lower privileges");
1985
}
1986
}
1987
1988
/* Close the socket */
1989
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1990
if(ret == -1){
1991
perror_plus("close");
1992
}
1993
1994
if(ret_setflags == -1){
1995
errno = ioctl_errno;
1996
perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1997
errno = old_errno;
1998
return ioctl_errno;
1999
}
2000
} else if(debug){
2001
fprintf_plus(stderr, "Interface \"%s\" is already up; good\n",
2002
interface);
2003
}
2004
2005
/* Sleep checking until interface is running.
2006
Check every 0.25s, up to total time of delay */
2007
for(int i=0; i < delay * 4; i++){
2008
if(interface_is_running(interface)){
2009
break;
2010
}
2011
struct timespec sleeptime = { .tv_nsec = 250000000 };
2012
ret = nanosleep(&sleeptime, NULL);
2013
if(ret == -1 and errno != EINTR){
2014
perror_plus("nanosleep");
2015
}
2016
}
2017
2018
errno = old_errno;
2019
return 0;
2020
}
2021
2022
__attribute__((nonnull, warn_unused_result))
2023
error_t take_down_interface(const char *const interface){
2024
error_t old_errno = errno;
2025
struct ifreq network;
2026
unsigned int if_index = if_nametoindex(interface);
2027
if(if_index == 0){
2028
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
2029
errno = old_errno;
2030
return ENXIO;
2031
}
2032
if(interface_is_up(interface)){
2033
error_t ret_errno = 0, ioctl_errno = 0;
2034
if(not get_flags(interface, &network) and debug){
2035
ret_errno = errno;
2036
fprintf_plus(stderr, "Failed to get flags for interface "
2037
"\"%s\"\n", interface);
2038
errno = old_errno;
2039
return ret_errno;
2040
}
2041
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
2042
2043
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
2044
if(sd == -1){
2045
ret_errno = errno;
2046
perror_plus("socket");
2047
errno = old_errno;
2048
return ret_errno;
2049
}
2050
2051
if(debug){
2052
fprintf_plus(stderr, "Taking down interface \"%s\"\n",
2053
interface);
2054
}
2055
2056
/* Raise privileges */
2057
ret_errno = raise_privileges();
2058
if(ret_errno != 0){
2059
errno = ret_errno;
2060
perror_plus("Failed to raise privileges");
2061
}
2062
2063
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
2064
ioctl_errno = errno;
2065
2066
/* If raise_privileges() succeeded above */
2067
if(ret_errno == 0){
2068
/* Lower privileges */
2069
ret_errno = lower_privileges();
2070
if(ret_errno != 0){
2071
errno = ret_errno;
2072
perror_plus("Failed to lower privileges");
2073
}
2074
}
2075
2076
/* Close the socket */
2077
int ret = (int)TEMP_FAILURE_RETRY(close(sd));
2078
if(ret == -1){
2079
perror_plus("close");
2080
}
2081
2082
if(ret_setflags == -1){
2083
errno = ioctl_errno;
2084
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
2085
errno = old_errno;
2086
return ioctl_errno;
2087
}
2088
} else if(debug){
2089
fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
2090
interface);
2091
}
2092
2093
errno = old_errno;
2094
return 0;
2095
}
2096
2097
int main(int argc, char *argv[]){
2098
mandos_context mc = { .server = NULL, .dh_bits = 1024,
2099
.priority = "SECURE256:!CTYPE-X.509:"
2100
"+CTYPE-OPENPGP", .current_server = NULL,
2101
.interfaces = NULL, .interfaces_size = 0 };
2102
AvahiSServiceBrowser *sb = NULL;
2103
error_t ret_errno;
2104
int ret;
2105
intmax_t tmpmax;
2106
char *tmp;
2107
int exitcode = EXIT_SUCCESS;
2108
char *interfaces_to_take_down = NULL;
2109
size_t interfaces_to_take_down_size = 0;
2110
char run_tempdir[] = "/run/tmp/mandosXXXXXX";
2111
char old_tempdir[] = "/tmp/mandosXXXXXX";
2112
char *tempdir = NULL;
2113
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
2114
const char *seckey = PATHDIR "/" SECKEY;
2115
const char *pubkey = PATHDIR "/" PUBKEY;
2116
char *interfaces_hooks = NULL;
2117
2118
bool gnutls_initialized = false;
2119
bool gpgme_initialized = false;
2120
float delay = 2.5f;
2121
double retry_interval = 10; /* 10s between trying a server and
2122
retrying the same server again */
2123
2124
struct sigaction old_sigterm_action = { .sa_handler = SIG_DFL };
2125
struct sigaction sigterm_action = { .sa_handler = handle_sigterm };
2126
2127
uid = getuid();
2128
gid = getgid();
2129
2130
/* Lower any group privileges we might have, just to be safe */
2131
errno = 0;
2132
ret = setgid(gid);
2133
if(ret == -1){
2134
perror_plus("setgid");
2135
}
2136
2137
/* Lower user privileges (temporarily) */
2138
errno = 0;
2139
ret = seteuid(uid);
2140
if(ret == -1){
2141
perror_plus("seteuid");
2142
}
2143
2144
if(quit_now){
2145
goto end;
2146
}
2147
2148
{
2149
struct argp_option options[] = {
2150
{ .name = "debug", .key = 128,
2151
.doc = "Debug mode", .group = 3 },
2152
{ .name = "connect", .key = 'c',
2153
.arg = "ADDRESS:PORT",
2154
.doc = "Connect directly to a specific Mandos server",
2155
.group = 1 },
2156
{ .name = "interface", .key = 'i',
2157
.arg = "NAME",
2158
.doc = "Network interface that will be used to search for"
2159
" Mandos servers",
2160
.group = 1 },
2161
{ .name = "seckey", .key = 's',
2162
.arg = "FILE",
2163
.doc = "OpenPGP secret key file base name",
2164
.group = 1 },
2165
{ .name = "pubkey", .key = 'p',
2166
.arg = "FILE",
2167
.doc = "OpenPGP public key file base name",
2168
.group = 2 },
2169
{ .name = "dh-bits", .key = 129,
2170
.arg = "BITS",
2171
.doc = "Bit length of the prime number used in the"
2172
" Diffie-Hellman key exchange",
2173
.group = 2 },
2174
{ .name = "priority", .key = 130,
2175
.arg = "STRING",
2176
.doc = "GnuTLS priority string for the TLS handshake",
2177
.group = 1 },
2178
{ .name = "delay", .key = 131,
2179
.arg = "SECONDS",
2180
.doc = "Maximum delay to wait for interface startup",
2181
.group = 2 },
2182
{ .name = "retry", .key = 132,
2183
.arg = "SECONDS",
2184
.doc = "Retry interval used when denied by the Mandos server",
2185
.group = 2 },
2186
{ .name = "network-hook-dir", .key = 133,
2187
.arg = "DIR",
2188
.doc = "Directory where network hooks are located",
2189
.group = 2 },
2190
/*
2191
* These reproduce what we would get without ARGP_NO_HELP
2192
*/
2193
{ .name = "help", .key = '?',
2194
.doc = "Give this help list", .group = -1 },
2195
{ .name = "usage", .key = -3,
2196
.doc = "Give a short usage message", .group = -1 },
2197
{ .name = "version", .key = 'V',
2198
.doc = "Print program version", .group = -1 },
2199
{ .name = NULL }
2200
};
2201
2202
error_t parse_opt(int key, char *arg,
2203
struct argp_state *state){
2204
errno = 0;
2205
switch(key){
2206
case 128: /* --debug */
2207
debug = true;
2208
break;
2209
case 'c': /* --connect */
2210
connect_to = arg;
2211
break;
2212
case 'i': /* --interface */
2213
ret_errno = argz_add_sep(&mc.interfaces, &mc.interfaces_size,
2214
arg, (int)',');
2215
if(ret_errno != 0){
2216
argp_error(state, "%s", strerror(ret_errno));
2217
}
2218
break;
2219
case 's': /* --seckey */
2220
seckey = arg;
2221
break;
2222
case 'p': /* --pubkey */
2223
pubkey = arg;
2224
break;
2225
case 129: /* --dh-bits */
2226
errno = 0;
2227
tmpmax = strtoimax(arg, &tmp, 10);
2228
if(errno != 0 or tmp == arg or *tmp != '\0'
2229
or tmpmax != (typeof(mc.dh_bits))tmpmax){
2230
argp_error(state, "Bad number of DH bits");
2231
}
2232
mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
2233
break;
2234
case 130: /* --priority */
2235
mc.priority = arg;
2236
break;
2237
case 131: /* --delay */
2238
errno = 0;
2239
delay = strtof(arg, &tmp);
2240
if(errno != 0 or tmp == arg or *tmp != '\0'){
2241
argp_error(state, "Bad delay");
2242
}
2243
case 132: /* --retry */
2244
errno = 0;
2245
retry_interval = strtod(arg, &tmp);
2246
if(errno != 0 or tmp == arg or *tmp != '\0'
2247
or (retry_interval * 1000) > INT_MAX
2248
or retry_interval < 0){
2249
argp_error(state, "Bad retry interval");
2250
}
2251
break;
2252
case 133: /* --network-hook-dir */
2253
hookdir = arg;
2254
break;
2255
/*
2256
* These reproduce what we would get without ARGP_NO_HELP
2257
*/
2258
case '?': /* --help */
2259
argp_state_help(state, state->out_stream,
2260
(ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
2261
& ~(unsigned int)ARGP_HELP_EXIT_OK);
2262
case -3: /* --usage */
2263
argp_state_help(state, state->out_stream,
2264
ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
2265
case 'V': /* --version */
2266
fprintf_plus(state->out_stream, "%s\n", argp_program_version);
2267
exit(argp_err_exit_status);
2268
break;
2269
default:
2270
return ARGP_ERR_UNKNOWN;
2271
}
2272
return errno;
2273
}
2274
2275
struct argp argp = { .options = options, .parser = parse_opt,
2276
.args_doc = "",
2277
.doc = "Mandos client -- Get and decrypt"
2278
" passwords from a Mandos server" };
2279
ret = argp_parse(&argp, argc, argv,
2280
ARGP_IN_ORDER | ARGP_NO_HELP, 0, NULL);
2281
switch(ret){
2282
case 0:
2283
break;
2284
case ENOMEM:
2285
default:
2286
errno = ret;
2287
perror_plus("argp_parse");
2288
exitcode = EX_OSERR;
2289
goto end;
2290
case EINVAL:
2291
exitcode = EX_USAGE;
2292
goto end;
2293
}
2294
}
2295
2296
{
2297
/* Work around Debian bug #633582:
2298
<http://bugs.debian.org/633582> */
2299
2300
/* Re-raise privileges */
2301
ret_errno = raise_privileges();
2302
if(ret_errno != 0){
2303
errno = ret_errno;
2304
perror_plus("Failed to raise privileges");
2305
} else {
2306
struct stat st;
2307
2308
if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
2309
int seckey_fd = open(seckey, O_RDONLY);
2310
if(seckey_fd == -1){
2311
perror_plus("open");
2312
} else {
2313
ret = (int)TEMP_FAILURE_RETRY(fstat(seckey_fd, &st));
2314
if(ret == -1){
2315
perror_plus("fstat");
2316
} else {
2317
if(S_ISREG(st.st_mode)
2318
and st.st_uid == 0 and st.st_gid == 0){
2319
ret = fchown(seckey_fd, uid, gid);
2320
if(ret == -1){
2321
perror_plus("fchown");
2322
}
2323
}
2324
}
2325
TEMP_FAILURE_RETRY(close(seckey_fd));
2326
}
2327
}
2328
2329
if(strcmp(pubkey, PATHDIR "/" PUBKEY) == 0){
2330
int pubkey_fd = open(pubkey, O_RDONLY);
2331
if(pubkey_fd == -1){
2332
perror_plus("open");
2333
} else {
2334
ret = (int)TEMP_FAILURE_RETRY(fstat(pubkey_fd, &st));
2335
if(ret == -1){
2336
perror_plus("fstat");
2337
} else {
2338
if(S_ISREG(st.st_mode)
2339
and st.st_uid == 0 and st.st_gid == 0){
2340
ret = fchown(pubkey_fd, uid, gid);
2341
if(ret == -1){
2342
perror_plus("fchown");
2343
}
2344
}
2345
}
2346
TEMP_FAILURE_RETRY(close(pubkey_fd));
2347
}
2348
}
2349
2350
/* Lower privileges */
2351
ret_errno = lower_privileges();
2352
if(ret_errno != 0){
2353
errno = ret_errno;
2354
perror_plus("Failed to lower privileges");
2355
}
2356
}
2357
}
2358
2359
/* Remove invalid interface names (except "none") */
2360
{
2361
char *interface = NULL;
2362
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2363
interface))){
2364
if(strcmp(interface, "none") != 0
2365
and if_nametoindex(interface) == 0){
2366
if(interface[0] != '\0'){
2367
fprintf_plus(stderr, "Not using nonexisting interface"
2368
" \"%s\"\n", interface);
2369
}
2370
argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
2371
interface = NULL;
2372
}
2373
}
2374
}
2375
2376
/* Run network hooks */
2377
{
2378
if(mc.interfaces != NULL){
2379
interfaces_hooks = malloc(mc.interfaces_size);
2380
if(interfaces_hooks == NULL){
2381
perror_plus("malloc");
2382
goto end;
2383
}
2384
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2385
argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
2386
}
2387
run_network_hooks("start", interfaces_hooks != NULL ?
2388
interfaces_hooks : "", delay);
2389
}
2390
2391
if(not debug){
460
}
461
462
static void browse_callback(
463
AvahiSServiceBrowser *b,
464
AvahiIfIndex interface,
465
AvahiProtocol protocol,
466
AvahiBrowserEvent event,
467
const char *name,
468
const char *type,
469
const char *domain,
470
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
471
void* userdata) {
472
473
AvahiServer *s = userdata;
474
assert(b);
475
476
/* Called whenever a new services becomes available on the LAN or is removed from the LAN */
477
478
switch (event) {
479
480
case AVAHI_BROWSER_FAILURE:
481
482
fprintf(stderr, "(Browser) %s\n", avahi_strerror(avahi_server_errno(server)));
483
avahi_simple_poll_quit(simple_poll);
484
return;
485
486
case AVAHI_BROWSER_NEW:
487
/* We ignore the returned resolver object. In the callback
488
function we free it. If the server is terminated before
489
the callback function is called the server will free
490
the resolver for us. */
491
492
if (!(avahi_s_service_resolver_new(s, interface, protocol, name, type, domain, AVAHI_PROTO_INET6, 0, resolve_callback, s)))
493
fprintf(stderr, "Failed to resolve service '%s': %s\n", name, avahi_strerror(avahi_server_errno(s)));
494
495
break;
496
497
case AVAHI_BROWSER_REMOVE:
498
break;
499
500
case AVAHI_BROWSER_ALL_FOR_NOW:
501
case AVAHI_BROWSER_CACHE_EXHAUSTED:
502
break;
503
}
504
}
505
506
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
507
AvahiServerConfig config;
508
AvahiSServiceBrowser *sb = NULL;
509
int error;
510
int ret = 1;
511
2392
512
avahi_set_log_function(empty_log);
2393
}
2394
2395
/* Initialize Avahi early so avahi_simple_poll_quit() can be called
2396
from the signal handler */
2397
/* Initialize the pseudo-RNG for Avahi */
2398
srand((unsigned int) time(NULL));
2399
simple_poll = avahi_simple_poll_new();
2400
if(simple_poll == NULL){
2401
fprintf_plus(stderr,
2402
"Avahi: Failed to create simple poll object.\n");
2403
exitcode = EX_UNAVAILABLE;
2404
goto end;
2405
}
2406
2407
sigemptyset(&sigterm_action.sa_mask);
2408
ret = sigaddset(&sigterm_action.sa_mask, SIGINT);
2409
if(ret == -1){
2410
perror_plus("sigaddset");
2411
exitcode = EX_OSERR;
2412
goto end;
2413
}
2414
ret = sigaddset(&sigterm_action.sa_mask, SIGHUP);
2415
if(ret == -1){
2416
perror_plus("sigaddset");
2417
exitcode = EX_OSERR;
2418
goto end;
2419
}
2420
ret = sigaddset(&sigterm_action.sa_mask, SIGTERM);
2421
if(ret == -1){
2422
perror_plus("sigaddset");
2423
exitcode = EX_OSERR;
2424
goto end;
2425
}
2426
/* Need to check if the handler is SIG_IGN before handling:
2427
| [[info:libc:Initial Signal Actions]] |
2428
| [[info:libc:Basic Signal Handling]] |
2429
*/
2430
ret = sigaction(SIGINT, NULL, &old_sigterm_action);
2431
if(ret == -1){
2432
perror_plus("sigaction");
2433
return EX_OSERR;
2434
}
2435
if(old_sigterm_action.sa_handler != SIG_IGN){
2436
ret = sigaction(SIGINT, &sigterm_action, NULL);
2437
if(ret == -1){
2438
perror_plus("sigaction");
2439
exitcode = EX_OSERR;
2440
goto end;
2441
}
2442
}
2443
ret = sigaction(SIGHUP, NULL, &old_sigterm_action);
2444
if(ret == -1){
2445
perror_plus("sigaction");
2446
return EX_OSERR;
2447
}
2448
if(old_sigterm_action.sa_handler != SIG_IGN){
2449
ret = sigaction(SIGHUP, &sigterm_action, NULL);
2450
if(ret == -1){
2451
perror_plus("sigaction");
2452
exitcode = EX_OSERR;
2453
goto end;
2454
}
2455
}
2456
ret = sigaction(SIGTERM, NULL, &old_sigterm_action);
2457
if(ret == -1){
2458
perror_plus("sigaction");
2459
return EX_OSERR;
2460
}
2461
if(old_sigterm_action.sa_handler != SIG_IGN){
2462
ret = sigaction(SIGTERM, &sigterm_action, NULL);
2463
if(ret == -1){
2464
perror_plus("sigaction");
2465
exitcode = EX_OSERR;
2466
goto end;
2467
}
2468
}
2469
2470
/* If no interfaces were specified, make a list */
2471
if(mc.interfaces == NULL){
2472
struct dirent **direntries = NULL;
2473
/* Look for any good interfaces */
2474
ret = scandir(sys_class_net, &direntries, good_interface,
2475
alphasort);
2476
if(ret >= 1){
2477
/* Add all found interfaces to interfaces list */
2478
for(int i = 0; i < ret; ++i){
2479
ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2480
direntries[i]->d_name);
2481
if(ret_errno != 0){
2482
errno = ret_errno;
2483
perror_plus("argz_add");
2484
free(direntries[i]);
2485
continue;
2486
}
2487
if(debug){
2488
fprintf_plus(stderr, "Will use interface \"%s\"\n",
2489
direntries[i]->d_name);
2490
}
2491
free(direntries[i]);
2492
}
2493
free(direntries);
2494
} else {
2495
if(ret == 0){
2496
free(direntries);
2497
}
2498
fprintf_plus(stderr, "Could not find a network interface\n");
2499
exitcode = EXIT_FAILURE;
2500
goto end;
2501
}
2502
}
2503
2504
/* Bring up interfaces which are down, and remove any "none"s */
2505
{
2506
char *interface = NULL;
2507
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2508
interface))){
2509
/* If interface name is "none", stop bringing up interfaces.
2510
Also remove all instances of "none" from the list */
2511
if(strcmp(interface, "none") == 0){
2512
argz_delete(&mc.interfaces, &mc.interfaces_size,
2513
interface);
2514
interface = NULL;
2515
while((interface = argz_next(mc.interfaces,
2516
mc.interfaces_size, interface))){
2517
if(strcmp(interface, "none") == 0){
2518
argz_delete(&mc.interfaces, &mc.interfaces_size,
2519
interface);
2520
interface = NULL;
2521
}
2522
}
2523
break;
2524
}
2525
bool interface_was_up = interface_is_up(interface);
2526
errno = bring_up_interface(interface, delay);
2527
if(not interface_was_up){
2528
if(errno != 0){
2529
perror_plus("Failed to bring up interface");
2530
} else {
2531
errno = argz_add(&interfaces_to_take_down,
2532
&interfaces_to_take_down_size,
2533
interface);
2534
if(errno != 0){
2535
perror_plus("argz_add");
2536
}
2537
}
2538
}
2539
}
2540
if(debug and (interfaces_to_take_down == NULL)){
2541
fprintf_plus(stderr, "No interfaces were brought up\n");
2542
}
2543
}
2544
2545
/* If we only got one interface, explicitly use only that one */
2546
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2547
if(debug){
2548
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2549
mc.interfaces);
2550
}
2551
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
2552
}
2553
2554
if(quit_now){
2555
goto end;
2556
}
2557
2558
ret = init_gnutls_global(pubkey, seckey, &mc);
2559
if(ret == -1){
2560
fprintf_plus(stderr, "init_gnutls_global failed\n");
2561
exitcode = EX_UNAVAILABLE;
2562
goto end;
2563
} else {
2564
gnutls_initialized = true;
2565
}
2566
2567
if(quit_now){
2568
goto end;
2569
}
2570
2571
/* Try /run/tmp before /tmp */
2572
tempdir = mkdtemp(run_tempdir);
2573
if(tempdir == NULL and errno == ENOENT){
2574
if(debug){
2575
fprintf_plus(stderr, "Tempdir %s did not work, trying %s\n",
2576
run_tempdir, old_tempdir);
2577
}
2578
tempdir = mkdtemp(old_tempdir);
2579
}
2580
if(tempdir == NULL){
2581
perror_plus("mkdtemp");
2582
goto end;
2583
}
2584
2585
if(quit_now){
2586
goto end;
2587
}
2588
2589
if(not init_gpgme(pubkey, seckey, tempdir, &mc)){
2590
fprintf_plus(stderr, "init_gpgme failed\n");
2591
exitcode = EX_UNAVAILABLE;
2592
goto end;
2593
} else {
2594
gpgme_initialized = true;
2595
}
2596
2597
if(quit_now){
2598
goto end;
2599
}
2600
2601
if(connect_to != NULL){
2602
/* Connect directly, do not use Zeroconf */
2603
/* (Mainly meant for debugging) */
2604
char *address = strrchr(connect_to, ':');
2605
2606
if(address == NULL){
2607
fprintf_plus(stderr, "No colon in address\n");
2608
exitcode = EX_USAGE;
2609
goto end;
2610
}
2611
2612
if(quit_now){
2613
goto end;
2614
}
2615
2616
in_port_t port;
2617
errno = 0;
2618
tmpmax = strtoimax(address+1, &tmp, 10);
2619
if(errno != 0 or tmp == address+1 or *tmp != '\0'
2620
or tmpmax != (in_port_t)tmpmax){
2621
fprintf_plus(stderr, "Bad port number\n");
2622
exitcode = EX_USAGE;
2623
goto end;
2624
}
2625
2626
if(quit_now){
2627
goto end;
2628
}
2629
2630
port = (in_port_t)tmpmax;
2631
*address = '\0';
2632
/* Colon in address indicates IPv6 */
2633
int af;
2634
if(strchr(connect_to, ':') != NULL){
2635
af = AF_INET6;
2636
/* Accept [] around IPv6 address - see RFC 5952 */
2637
if(connect_to[0] == '[' and address[-1] == ']')
2638
{
2639
connect_to++;
2640
address[-1] = '\0';
2641
}
2642
} else {
2643
af = AF_INET;
2644
}
2645
address = connect_to;
2646
2647
if(quit_now){
2648
goto end;
2649
}
2650
2651
while(not quit_now){
2652
ret = start_mandos_communication(address, port, if_index, af,
2653
&mc);
2654
if(quit_now or ret == 0){
2655
break;
2656
}
2657
if(debug){
2658
fprintf_plus(stderr, "Retrying in %d seconds\n",
2659
(int)retry_interval);
2660
}
2661
sleep((unsigned int)retry_interval);
2662
}
2663
2664
if(not quit_now){
2665
exitcode = EXIT_SUCCESS;
2666
}
2667
2668
goto end;
2669
}
2670
2671
if(quit_now){
2672
goto end;
2673
}
2674
2675
{
2676
AvahiServerConfig config;
2677
/* Do not publish any local Zeroconf records */
513
514
/* Initialize the psuedo-RNG */
515
srand(time(NULL));
516
517
/* Allocate main loop object */
518
if (!(simple_poll = avahi_simple_poll_new())) {
519
fprintf(stderr, "Failed to create simple poll object.\n");
520
goto fail;
521
}
522
523
/* Do not publish any local records */
2678
524
avahi_server_config_init(&config);
2679
525
config.publish_hinfo = 0;
2680
526
config.publish_addresses = 0;
2681
527
config.publish_workstation = 0;
2682
528
config.publish_domain = 0;
529
530
/* /\* Set a unicast DNS server for wide area DNS-SD *\/ */
531
/* avahi_address_parse("193.11.177.11", AVAHI_PROTO_UNSPEC, &config.wide_area_servers[0]); */
532
/* config.n_wide_area_servers = 1; */
533
/* config.enable_wide_area = 1; */
2683
534
2684
535
/* Allocate a new server */
2685
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
2686
&config, NULL, NULL, &ret_errno);
2687
2688
/* Free the Avahi configuration data */
536
server = avahi_server_new(avahi_simple_poll_get(simple_poll), &config, NULL, NULL, &error);
537
538
/* Free the configuration data */
2689
539
avahi_server_config_free(&config);
2690
}
2691
2692
/* Check if creating the Avahi server object succeeded */
2693
if(mc.server == NULL){
2694
fprintf_plus(stderr, "Failed to create Avahi server: %s\n",
2695
avahi_strerror(ret_errno));
2696
exitcode = EX_UNAVAILABLE;
2697
goto end;
2698
}
2699
2700
if(quit_now){
2701
goto end;
2702
}
2703
2704
/* Create the Avahi service browser */
2705
sb = avahi_s_service_browser_new(mc.server, if_index,
2706
AVAHI_PROTO_UNSPEC, "_mandos._tcp",
2707
NULL, 0, browse_callback,
2708
(void *)&mc);
2709
if(sb == NULL){
2710
fprintf_plus(stderr, "Failed to create service browser: %s\n",
2711
avahi_strerror(avahi_server_errno(mc.server)));
2712
exitcode = EX_UNAVAILABLE;
2713
goto end;
2714
}
2715
2716
if(quit_now){
2717
goto end;
2718
}
2719
2720
/* Run the main loop */
2721
2722
if(debug){
2723
fprintf_plus(stderr, "Starting Avahi loop search\n");
2724
}
2725
2726
ret = avahi_loop_with_timeout(simple_poll,
2727
(int)(retry_interval * 1000), &mc);
2728
if(debug){
2729
fprintf_plus(stderr, "avahi_loop_with_timeout exited %s\n",
2730
(ret == 0) ? "successfully" : "with error");
2731
}
2732
2733
end:
2734
2735
if(debug){
2736
fprintf_plus(stderr, "%s exiting\n", argv[0]);
2737
}
2738
2739
/* Cleanup things */
2740
free(mc.interfaces);
2741
2742
if(sb != NULL)
2743
avahi_s_service_browser_free(sb);
2744
2745
if(mc.server != NULL)
2746
avahi_server_free(mc.server);
2747
2748
if(simple_poll != NULL)
2749
avahi_simple_poll_free(simple_poll);
2750
2751
if(gnutls_initialized){
2752
gnutls_certificate_free_credentials(mc.cred);
2753
gnutls_global_deinit();
2754
gnutls_dh_params_deinit(mc.dh_params);
2755
}
2756
2757
if(gpgme_initialized){
2758
gpgme_release(mc.ctx);
2759
}
2760
2761
/* Cleans up the circular linked list of Mandos servers the client
2762
has seen */
2763
if(mc.current_server != NULL){
2764
mc.current_server->prev->next = NULL;
2765
while(mc.current_server != NULL){
2766
server *next = mc.current_server->next;
2767
#ifdef __GNUC__
2768
#pragma GCC diagnostic push
2769
#pragma GCC diagnostic ignored "-Wcast-qual"
2770
#endif
2771
free((char *)(mc.current_server->ip));
2772
#ifdef __GNUC__
2773
#pragma GCC diagnostic pop
2774
#endif
2775
free(mc.current_server);
2776
mc.current_server = next;
2777
}
2778
}
2779
2780
/* Re-raise privileges */
2781
{
2782
ret_errno = raise_privileges();
2783
if(ret_errno != 0){
2784
errno = ret_errno;
2785
perror_plus("Failed to raise privileges");
2786
} else {
2787
2788
/* Run network hooks */
2789
run_network_hooks("stop", interfaces_hooks != NULL ?
2790
interfaces_hooks : "", delay);
2791
2792
/* Take down the network interfaces which were brought up */
2793
{
2794
char *interface = NULL;
2795
while((interface=argz_next(interfaces_to_take_down,
2796
interfaces_to_take_down_size,
2797
interface))){
2798
ret_errno = take_down_interface(interface);
2799
if(ret_errno != 0){
2800
errno = ret_errno;
2801
perror_plus("Failed to take down interface");
2802
}
2803
}
2804
if(debug and (interfaces_to_take_down == NULL)){
2805
fprintf_plus(stderr, "No interfaces needed to be taken"
2806
" down\n");
2807
}
2808
}
2809
}
2810
2811
ret_errno = lower_privileges_permanently();
2812
if(ret_errno != 0){
2813
errno = ret_errno;
2814
perror_plus("Failed to lower privileges permanently");
2815
}
2816
}
2817
2818
free(interfaces_to_take_down);
2819
free(interfaces_hooks);
2820
2821
/* Removes the GPGME temp directory and all files inside */
2822
if(tempdir != NULL){
2823
struct dirent **direntries = NULL;
2824
int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY
2825
| O_NOFOLLOW
2826
| O_DIRECTORY
2827
| O_PATH));
2828
if(tempdir_fd == -1){
2829
perror_plus("open");
2830
} else {
2831
#ifdef __GLIBC__
2832
#if __GLIBC_PREREQ(2, 15)
2833
int numentries = scandirat(tempdir_fd, ".", &direntries,
2834
notdotentries, alphasort);
2835
#else /* not __GLIBC_PREREQ(2, 15) */
2836
int numentries = scandir(tempdir, &direntries, notdotentries,
2837
alphasort);
2838
#endif /* not __GLIBC_PREREQ(2, 15) */
2839
#else /* not __GLIBC__ */
2840
int numentries = scandir(tempdir, &direntries, notdotentries,
2841
alphasort);
2842
#endif /* not __GLIBC__ */
2843
if(numentries >= 0){
2844
for(int i = 0; i < numentries; i++){
2845
ret = unlinkat(tempdir_fd, direntries[i]->d_name, 0);
2846
if(ret == -1){
2847
fprintf_plus(stderr, "unlinkat(open(\"%s\", O_RDONLY),"
2848
" \"%s\", 0): %s\n", tempdir,
2849
direntries[i]->d_name, strerror(errno));
2850
}
2851
free(direntries[i]);
2852
}
2853
2854
/* need to clean even if 0 because man page doesn't specify */
2855
free(direntries);
2856
if(numentries == -1){
2857
perror_plus("scandir");
2858
}
2859
ret = rmdir(tempdir);
2860
if(ret == -1 and errno != ENOENT){
2861
perror_plus("rmdir");
2862
}
2863
}
2864
TEMP_FAILURE_RETRY(close(tempdir_fd));
2865
}
2866
}
2867
2868
if(quit_now){
2869
sigemptyset(&old_sigterm_action.sa_mask);
2870
old_sigterm_action.sa_handler = SIG_DFL;
2871
ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
2872
&old_sigterm_action,
2873
NULL));
2874
if(ret == -1){
2875
perror_plus("sigaction");
2876
}
2877
do {
2878
ret = raise(signal_received);
2879
} while(ret != 0 and errno == EINTR);
2880
if(ret != 0){
2881
perror_plus("raise");
2882
abort();
2883
}
2884
TEMP_FAILURE_RETRY(pause());
2885
}
2886
2887
return exitcode;
540
541
/* Check wether creating the server object succeeded */
542
if (!server) {
543
fprintf(stderr, "Failed to create server: %s\n", avahi_strerror(error));
544
goto fail;
545
}
546
547
/* Create the service browser */
548
if (!(sb = avahi_s_service_browser_new(server, if_nametoindex("eth0"), AVAHI_PROTO_INET6, "_mandos._tcp", NULL, 0, browse_callback, server))) {
549
fprintf(stderr, "Failed to create service browser: %s\n", avahi_strerror(avahi_server_errno(server)));
550
goto fail;
551
}
552
553
/* Run the main loop */
554
avahi_simple_poll_loop(simple_poll);
555
556
ret = 0;
557
558
fail:
559
560
/* Cleanup things */
561
if (sb)
562
avahi_s_service_browser_free(sb);
563
564
if (server)
565
avahi_server_free(server);
566
567
if (simple_poll)
568
avahi_simple_poll_free(simple_poll);
569
570
return ret;
2888
571
}
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0