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