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/mandos-client.c
- browse files at revision 237.2.29
- compare with another revision
- download diff
- download tarball
- view history from revision 237.2.29
- Committer: Teddy Hogeborn
- Date: 2009-01-13 04:35:19 UTC
- mto: (24.1.123 mandos) (237.4.2 mandos-pipe-ipc) (299.1.1 release) (300.1.1 release) (301.1.1 release)
- mto: This revision was merged to the branch mainline in revision 245.
- Revision ID: teddy@fukt.bsnet.se-20090113043519-0yr39snphoegq8l1
* plugin-runner.c: Only space changes.
* plugins.d/mandos-client.c: - '' -
* plugins.d/password-prompt.c: - '' -
* plugins.d/mandos-client.c: - '' -
* plugins.d/password-prompt.c: - '' -
- files added:
- .bzr-builddeb
- debian
- debian/po
- files removed:
- ca.pem
- files renamed:
- mandos-clients.conf => clients.conf
- server.py => mandos
- plugbasedclient.c => plugin-runner.c
- plugins.d/mandosclient.c => plugins.d/mandos-client.c
- plugins.d/passprompt.c => plugins.d/password-prompt.c
- files modified:
- Makefile
added
removed
plugins.d/mandos-client.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
8
8
* includes the following functions: "resolve_callback",
9
9
* "browse_callback", and parts of "main".
10
10
*
11
* Everything else is Copyright © 2007-2008 Teddy Hogeborn and Björn
12
* Påhlsson.
11
* Everything else is
12
* Copyright © 2008,2009 Teddy Hogeborn
13
* Copyright © 2008,2009 Björn Påhlsson
13
14
*
14
15
* This program is free software: you can redistribute it and/or
15
16
* modify it under the terms of the GNU General Public License as
25
26
* along with this program. If not, see
26
27
* <http://www.gnu.org/licenses/>.
27
28
*
28
* Contact the authors at <https://www.fukt.bsnet.se/~belorn/> and
29
* <https://www.fukt.bsnet.se/~teddy/>.
29
* Contact the authors at <mandos@fukt.bsnet.se>.
30
30
*/
31
31
32
#define _FORTIFY_SOURCE 2
33
32
/* Needed by GPGME, specifically gpgme_data_seek() */
34
33
#define _LARGEFILE_SOURCE
35
34
#define _FILE_OFFSET_BITS 64
36
35
37
#include <stdio.h>
38
#include <assert.h>
39
#include <stdlib.h>
40
#include <time.h>
41
#include <net/if.h> /* if_nametoindex */
42
36
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), asprintf() */
37
38
#include <stdio.h> /* fprintf(), stderr, fwrite(),
39
stdout, ferror(), sscanf */
40
#include <stdint.h> /* uint16_t, uint32_t */
41
#include <stddef.h> /* NULL, size_t, ssize_t */
42
#include <stdlib.h> /* free(), EXIT_SUCCESS, EXIT_FAILURE,
43
srand() */
44
#include <stdbool.h> /* bool, true */
45
#include <string.h> /* memset(), strcmp(), strlen(),
46
strerror(), asprintf(), strcpy() */
47
#include <sys/ioctl.h> /* ioctl */
48
#include <sys/types.h> /* socket(), inet_pton(), sockaddr,
49
sockaddr_in6, PF_INET6,
50
SOCK_STREAM, INET6_ADDRSTRLEN,
51
uid_t, gid_t, open(), opendir(),
52
DIR */
53
#include <sys/stat.h> /* open() */
54
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
55
struct in6_addr, inet_pton(),
56
connect() */
57
#include <fcntl.h> /* open() */
58
#include <dirent.h> /* opendir(), struct dirent, readdir()
59
*/
60
#include <inttypes.h> /* PRIu16, SCNu16 */
61
#include <assert.h> /* assert() */
62
#include <errno.h> /* perror(), errno */
63
#include <time.h> /* time() */
64
#include <net/if.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
65
SIOCSIFFLAGS, if_indextoname(),
66
if_nametoindex(), IF_NAMESIZE */
67
#include <netinet/in.h>
68
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
69
getuid(), getgid(), setuid(),
70
setgid() */
71
#include <arpa/inet.h> /* inet_pton(), htons */
72
#include <iso646.h> /* not, and, or */
73
#include <argp.h> /* struct argp_option, error_t, struct
74
argp_state, struct argp,
75
argp_parse(), ARGP_KEY_ARG,
76
ARGP_KEY_END, ARGP_ERR_UNKNOWN */
77
78
/* Avahi */
79
/* All Avahi types, constants and functions
80
Avahi*, avahi_*,
81
AVAHI_* */
43
82
#include <avahi-core/core.h>
44
83
#include <avahi-core/lookup.h>
45
84
#include <avahi-core/log.h>
47
86
#include <avahi-common/malloc.h>
48
87
#include <avahi-common/error.h>
49
88
50
//mandos client part
51
#include <sys/types.h> /* socket(), setsockopt(),
52
inet_pton() */
53
#include <sys/socket.h> /* socket(), setsockopt(),
54
struct sockaddr_in6,
55
struct in6_addr, inet_pton() */
56
#include <gnutls/gnutls.h> /* All GnuTLS stuff */
57
#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */
58
59
#include <unistd.h> /* close() */
60
#include <netinet/in.h>
61
#include <stdbool.h> /* true */
62
#include <string.h> /* memset */
63
#include <arpa/inet.h> /* inet_pton() */
64
#include <iso646.h> /* not */
65
66
// gpgme
67
#include <errno.h> /* perror() */
68
#include <gpgme.h>
69
70
// getopt long
71
#include <getopt.h>
72
73
#ifndef CERT_ROOT
74
#define CERT_ROOT "/conf/conf.d/cryptkeyreq/"
75
#endif
76
#define CERTFILE CERT_ROOT "openpgp-client.txt"
77
#define KEYFILE CERT_ROOT "openpgp-client-key.txt"
89
/* GnuTLS */
90
#include <gnutls/gnutls.h> /* All GnuTLS types, constants and
91
functions:
92
gnutls_*
93
init_gnutls_session(),
94
GNUTLS_* */
95
#include <gnutls/openpgp.h>
96
/* gnutls_certificate_set_openpgp_key_file(),
97
GNUTLS_OPENPGP_FMT_BASE64 */
98
99
/* GPGME */
100
#include <gpgme.h> /* All GPGME types, constants and
101
functions:
102
gpgme_*
103
GPGME_PROTOCOL_OpenPGP,
104
GPG_ERR_NO_* */
105
78
106
#define BUFFER_SIZE 256
79
#define DH_BITS 1024
107
108
#define PATHDIR "/conf/conf.d/mandos"
109
#define SECKEY "seckey.txt"
110
#define PUBKEY "pubkey.txt"
80
111
81
112
bool debug = false;
113
static const char mandos_protocol_version[] = "1";
114
const char *argp_program_version = "mandos-client " VERSION;
115
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
82
116
117
/* Used for passing in values through the Avahi callback functions */
83
118
typedef struct {
84
gnutls_session_t session;
119
AvahiSimplePoll *simple_poll;
120
AvahiServer *server;
85
121
gnutls_certificate_credentials_t cred;
122
unsigned int dh_bits;
86
123
gnutls_dh_params_t dh_params;
87
} encrypted_session;
88
89
90
ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
91
char **new_packet, const char *homedir){
92
gpgme_data_t dh_crypto, dh_plain;
124
const char *priority;
93
125
gpgme_ctx_t ctx;
126
} mandos_context;
127
128
/*
129
* Make room in "buffer" for at least BUFFER_SIZE additional bytes.
130
* "buffer_capacity" is how much is currently allocated,
131
* "buffer_length" is how much is already used.
132
*/
133
size_t adjustbuffer(char **buffer, size_t buffer_length,
134
size_t buffer_capacity){
135
if(buffer_length + BUFFER_SIZE > buffer_capacity){
136
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
137
if(buffer == NULL){
138
return 0;
139
}
140
buffer_capacity += BUFFER_SIZE;
141
}
142
return buffer_capacity;
143
}
144
145
/*
146
* Initialize GPGME.
147
*/
148
static bool init_gpgme(mandos_context *mc, const char *seckey,
149
const char *pubkey, const char *tempdir){
150
int ret;
94
151
gpgme_error_t rc;
95
ssize_t ret;
96
ssize_t new_packet_capacity = 0;
97
ssize_t new_packet_length = 0;
98
152
gpgme_engine_info_t engine_info;
99
100
if (debug){
101
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
153
154
155
/*
156
* Helper function to insert pub and seckey to the enigne keyring.
157
*/
158
bool import_key(const char *filename){
159
int fd;
160
gpgme_data_t pgp_data;
161
162
fd = (int)TEMP_FAILURE_RETRY(open(filename, O_RDONLY));
163
if(fd == -1){
164
perror("open");
165
return false;
166
}
167
168
rc = gpgme_data_new_from_fd(&pgp_data, fd);
169
if(rc != GPG_ERR_NO_ERROR){
170
fprintf(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
171
gpgme_strsource(rc), gpgme_strerror(rc));
172
return false;
173
}
174
175
rc = gpgme_op_import(mc->ctx, pgp_data);
176
if(rc != GPG_ERR_NO_ERROR){
177
fprintf(stderr, "bad gpgme_op_import: %s: %s\n",
178
gpgme_strsource(rc), gpgme_strerror(rc));
179
return false;
180
}
181
182
ret = (int)TEMP_FAILURE_RETRY(close(fd));
183
if(ret == -1){
184
perror("close");
185
}
186
gpgme_data_release(pgp_data);
187
return true;
188
}
189
190
if(debug){
191
fprintf(stderr, "Initialize gpgme\n");
102
192
}
103
193
104
194
/* Init GPGME */
105
195
gpgme_check_version(NULL);
106
gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
196
rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
197
if(rc != GPG_ERR_NO_ERROR){
198
fprintf(stderr, "bad gpgme_engine_check_version: %s: %s\n",
199
gpgme_strsource(rc), gpgme_strerror(rc));
200
return false;
201
}
107
202
108
/* Set GPGME home directory */
109
rc = gpgme_get_engine_info (&engine_info);
110
if (rc != GPG_ERR_NO_ERROR){
203
/* Set GPGME home directory for the OpenPGP engine only */
204
rc = gpgme_get_engine_info(&engine_info);
205
if(rc != GPG_ERR_NO_ERROR){
111
206
fprintf(stderr, "bad gpgme_get_engine_info: %s: %s\n",
112
207
gpgme_strsource(rc), gpgme_strerror(rc));
113
return -1;
208
return false;
114
209
}
115
210
while(engine_info != NULL){
116
211
if(engine_info->protocol == GPGME_PROTOCOL_OpenPGP){
117
212
gpgme_set_engine_info(GPGME_PROTOCOL_OpenPGP,
118
engine_info->file_name, homedir);
213
engine_info->file_name, tempdir);
119
214
break;
120
215
}
121
216
engine_info = engine_info->next;
122
217
}
123
218
if(engine_info == NULL){
124
fprintf(stderr, "Could not set home dir to %s\n", homedir);
125
return -1;
126
}
127
128
/* Create new GPGME data buffer from packet buffer */
129
rc = gpgme_data_new_from_mem(&dh_crypto, packet, packet_size, 0);
130
if (rc != GPG_ERR_NO_ERROR){
219
fprintf(stderr, "Could not set GPGME home dir to %s\n", tempdir);
220
return false;
221
}
222
223
/* Create new GPGME "context" */
224
rc = gpgme_new(&(mc->ctx));
225
if(rc != GPG_ERR_NO_ERROR){
226
fprintf(stderr, "bad gpgme_new: %s: %s\n",
227
gpgme_strsource(rc), gpgme_strerror(rc));
228
return false;
229
}
230
231
if(not import_key(pubkey) or not import_key(seckey)){
232
return false;
233
}
234
235
return true;
236
}
237
238
/*
239
* Decrypt OpenPGP data.
240
* Returns -1 on error
241
*/
242
static ssize_t pgp_packet_decrypt(const mandos_context *mc,
243
const char *cryptotext,
244
size_t crypto_size,
245
char **plaintext){
246
gpgme_data_t dh_crypto, dh_plain;
247
gpgme_error_t rc;
248
ssize_t ret;
249
size_t plaintext_capacity = 0;
250
ssize_t plaintext_length = 0;
251
252
if(debug){
253
fprintf(stderr, "Trying to decrypt OpenPGP data\n");
254
}
255
256
/* Create new GPGME data buffer from memory cryptotext */
257
rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,
258
0);
259
if(rc != GPG_ERR_NO_ERROR){
131
260
fprintf(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
132
261
gpgme_strsource(rc), gpgme_strerror(rc));
133
262
return -1;
135
264
136
265
/* Create new empty GPGME data buffer for the plaintext */
137
266
rc = gpgme_data_new(&dh_plain);
138
if (rc != GPG_ERR_NO_ERROR){
267
if(rc != GPG_ERR_NO_ERROR){
139
268
fprintf(stderr, "bad gpgme_data_new: %s: %s\n",
140
269
gpgme_strsource(rc), gpgme_strerror(rc));
141
return -1;
142
}
143
144
/* Create new GPGME "context" */
145
rc = gpgme_new(&ctx);
146
if (rc != GPG_ERR_NO_ERROR){
147
fprintf(stderr, "bad gpgme_new: %s: %s\n",
148
gpgme_strsource(rc), gpgme_strerror(rc));
149
return -1;
150
}
151
152
/* Decrypt data from the FILE pointer to the plaintext data
153
buffer */
154
rc = gpgme_op_decrypt(ctx, dh_crypto, dh_plain);
155
if (rc != GPG_ERR_NO_ERROR){
270
gpgme_data_release(dh_crypto);
271
return -1;
272
}
273
274
/* Decrypt data from the cryptotext data buffer to the plaintext
275
data buffer */
276
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
277
if(rc != GPG_ERR_NO_ERROR){
156
278
fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
157
279
gpgme_strsource(rc), gpgme_strerror(rc));
158
return -1;
280
plaintext_length = -1;
281
if(debug){
282
gpgme_decrypt_result_t result;
283
result = gpgme_op_decrypt_result(mc->ctx);
284
if(result == NULL){
285
fprintf(stderr, "gpgme_op_decrypt_result failed\n");
286
} else {
287
fprintf(stderr, "Unsupported algorithm: %s\n",
288
result->unsupported_algorithm);
289
fprintf(stderr, "Wrong key usage: %u\n",
290
result->wrong_key_usage);
291
if(result->file_name != NULL){
292
fprintf(stderr, "File name: %s\n", result->file_name);
293
}
294
gpgme_recipient_t recipient;
295
recipient = result->recipients;
296
if(recipient){
297
while(recipient != NULL){
298
fprintf(stderr, "Public key algorithm: %s\n",
299
gpgme_pubkey_algo_name(recipient->pubkey_algo));
300
fprintf(stderr, "Key ID: %s\n", recipient->keyid);
301
fprintf(stderr, "Secret key available: %s\n",
302
recipient->status == GPG_ERR_NO_SECKEY
303
? "No" : "Yes");
304
recipient = recipient->next;
305
}
306
}
307
}
308
}
309
goto decrypt_end;
159
310
}
160
311
161
312
if(debug){
162
fprintf(stderr, "Decryption of OpenPGP packet succeeded\n");
163
}
164
165
if (debug){
166
gpgme_decrypt_result_t result;
167
result = gpgme_op_decrypt_result(ctx);
168
if (result == NULL){
169
fprintf(stderr, "gpgme_op_decrypt_result failed\n");
170
} else {
171
fprintf(stderr, "Unsupported algorithm: %s\n",
172
result->unsupported_algorithm);
173
fprintf(stderr, "Wrong key usage: %d\n",
174
result->wrong_key_usage);
175
if(result->file_name != NULL){
176
fprintf(stderr, "File name: %s\n", result->file_name);
177
}
178
gpgme_recipient_t recipient;
179
recipient = result->recipients;
180
if(recipient){
181
while(recipient != NULL){
182
fprintf(stderr, "Public key algorithm: %s\n",
183
gpgme_pubkey_algo_name(recipient->pubkey_algo));
184
fprintf(stderr, "Key ID: %s\n", recipient->keyid);
185
fprintf(stderr, "Secret key available: %s\n",
186
recipient->status == GPG_ERR_NO_SECKEY
187
? "No" : "Yes");
188
recipient = recipient->next;
189
}
190
}
191
}
192
}
193
194
/* Delete the GPGME FILE pointer cryptotext data buffer */
195
gpgme_data_release(dh_crypto);
313
fprintf(stderr, "Decryption of OpenPGP data succeeded\n");
314
}
196
315
197
316
/* Seek back to the beginning of the GPGME plaintext data buffer */
198
gpgme_data_seek(dh_plain, 0, SEEK_SET);
199
200
*new_packet = 0;
317
if(gpgme_data_seek(dh_plain, (off_t)0, SEEK_SET) == -1){
318
perror("gpgme_data_seek");
319
plaintext_length = -1;
320
goto decrypt_end;
321
}
322
323
*plaintext = NULL;
201
324
while(true){
202
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
203
*new_packet = realloc(*new_packet,
204
(unsigned int)new_packet_capacity
205
+ BUFFER_SIZE);
206
if (*new_packet == NULL){
207
perror("realloc");
208
return -1;
209
}
210
new_packet_capacity += BUFFER_SIZE;
325
plaintext_capacity = adjustbuffer(plaintext,
326
(size_t)plaintext_length,
327
plaintext_capacity);
328
if(plaintext_capacity == 0){
329
perror("adjustbuffer");
330
plaintext_length = -1;
331
goto decrypt_end;
211
332
}
212
333
213
ret = gpgme_data_read(dh_plain, *new_packet + new_packet_length,
334
ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
214
335
BUFFER_SIZE);
215
336
/* Print the data, if any */
216
if (ret == 0){
337
if(ret == 0){
338
/* EOF */
217
339
break;
218
340
}
219
341
if(ret < 0){
220
342
perror("gpgme_data_read");
221
return -1;
222
}
223
new_packet_length += ret;
224
}
225
226
/* FIXME: check characters before printing to screen so to not print
227
terminal control characters */
228
/* if(debug){ */
229
/* fprintf(stderr, "decrypted password is: "); */
230
/* fwrite(*new_packet, 1, new_packet_length, stderr); */
231
/* fprintf(stderr, "\n"); */
232
/* } */
343
plaintext_length = -1;
344
goto decrypt_end;
345
}
346
plaintext_length += ret;
347
}
348
349
if(debug){
350
fprintf(stderr, "Decrypted password is: ");
351
for(ssize_t i = 0; i < plaintext_length; i++){
352
fprintf(stderr, "%02hhX ", (*plaintext)[i]);
353
}
354
fprintf(stderr, "\n");
355
}
356
357
decrypt_end:
358
359
/* Delete the GPGME cryptotext data buffer */
360
gpgme_data_release(dh_crypto);
233
361
234
362
/* Delete the GPGME plaintext data buffer */
235
363
gpgme_data_release(dh_plain);
236
return new_packet_length;
364
return plaintext_length;
237
365
}
238
366
239
static const char * safer_gnutls_strerror (int value) {
240
const char *ret = gnutls_strerror (value);
241
if (ret == NULL)
367
static const char * safer_gnutls_strerror(int value) {
368
const char *ret = gnutls_strerror(value); /* Spurious warning */
369
if(ret == NULL)
242
370
ret = "(unknown)";
243
371
return ret;
244
372
}
245
373
246
void debuggnutls(__attribute__((unused)) int level,
247
const char* string){
248
fprintf(stderr, "%s", string);
374
/* GnuTLS log function callback */
375
static void debuggnutls(__attribute__((unused)) int level,
376
const char* string){
377
fprintf(stderr, "GnuTLS: %s", string);
249
378
}
250
379
251
int initgnutls(encrypted_session *es){
252
const char *err;
380
static int init_gnutls_global(mandos_context *mc,
381
const char *pubkeyfilename,
382
const char *seckeyfilename){
253
383
int ret;
254
384
255
385
if(debug){
256
386
fprintf(stderr, "Initializing GnuTLS\n");
257
387
}
258
388
259
if ((ret = gnutls_global_init ())
260
!= GNUTLS_E_SUCCESS) {
261
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
389
ret = gnutls_global_init();
390
if(ret != GNUTLS_E_SUCCESS) {
391
fprintf(stderr, "GnuTLS global_init: %s\n",
392
safer_gnutls_strerror(ret));
262
393
return -1;
263
394
}
264
265
if (debug){
395
396
if(debug){
397
/* "Use a log level over 10 to enable all debugging options."
398
* - GnuTLS manual
399
*/
266
400
gnutls_global_set_log_level(11);
267
401
gnutls_global_set_log_function(debuggnutls);
268
402
}
269
403
270
/* openpgp credentials */
271
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
272
!= GNUTLS_E_SUCCESS) {
273
fprintf (stderr, "memory error: %s\n",
274
safer_gnutls_strerror(ret));
404
/* OpenPGP credentials */
405
gnutls_certificate_allocate_credentials(&mc->cred);
406
if(ret != GNUTLS_E_SUCCESS){
407
fprintf(stderr, "GnuTLS memory error: %s\n", /* Spurious
408
warning */
409
safer_gnutls_strerror(ret));
410
gnutls_global_deinit();
275
411
return -1;
276
412
}
277
413
278
414
if(debug){
279
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
280
" and keyfile %s as GnuTLS credentials\n", CERTFILE,
281
KEYFILE);
415
fprintf(stderr, "Attempting to use OpenPGP public key %s and"
416
" secret key %s as GnuTLS credentials\n", pubkeyfilename,
417
seckeyfilename);
282
418
}
283
419
284
420
ret = gnutls_certificate_set_openpgp_key_file
285
(es->cred, CERTFILE, KEYFILE, GNUTLS_OPENPGP_FMT_BASE64);
286
if (ret != GNUTLS_E_SUCCESS) {
287
fprintf
288
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
289
" '%s')\n",
290
ret, CERTFILE, KEYFILE);
291
fprintf(stdout, "The Error is: %s\n",
292
safer_gnutls_strerror(ret));
293
return -1;
294
}
295
296
//GnuTLS server initialization
297
if ((ret = gnutls_dh_params_init (&es->dh_params))
298
!= GNUTLS_E_SUCCESS) {
299
fprintf (stderr, "Error in dh parameter initialization: %s\n",
300
safer_gnutls_strerror(ret));
301
return -1;
302
}
303
304
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
305
!= GNUTLS_E_SUCCESS) {
306
fprintf (stderr, "Error in prime generation: %s\n",
307
safer_gnutls_strerror(ret));
308
return -1;
309
}
310
311
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
312
313
// GnuTLS session creation
314
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
315
!= GNUTLS_E_SUCCESS){
421
(mc->cred, pubkeyfilename, seckeyfilename,
422
GNUTLS_OPENPGP_FMT_BASE64);
423
if(ret != GNUTLS_E_SUCCESS) {
424
fprintf(stderr,
425
"Error[%d] while reading the OpenPGP key pair ('%s',"
426
" '%s')\n", ret, pubkeyfilename, seckeyfilename);
427
fprintf(stderr, "The GnuTLS error is: %s\n",
428
safer_gnutls_strerror(ret));
429
goto globalfail;
430
}
431
432
/* GnuTLS server initialization */
433
ret = gnutls_dh_params_init(&mc->dh_params);
434
if(ret != GNUTLS_E_SUCCESS) {
435
fprintf(stderr, "Error in GnuTLS DH parameter initialization:"
436
" %s\n", safer_gnutls_strerror(ret));
437
goto globalfail;
438
}
439
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
440
if(ret != GNUTLS_E_SUCCESS) {
441
fprintf(stderr, "Error in GnuTLS prime generation: %s\n",
442
safer_gnutls_strerror(ret));
443
goto globalfail;
444
}
445
446
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
447
448
return 0;
449
450
globalfail:
451
452
gnutls_certificate_free_credentials(mc->cred);
453
gnutls_global_deinit();
454
gnutls_dh_params_deinit(mc->dh_params);
455
return -1;
456
}
457
458
static int init_gnutls_session(mandos_context *mc,
459
gnutls_session_t *session){
460
int ret;
461
/* GnuTLS session creation */
462
ret = gnutls_init(session, GNUTLS_SERVER);
463
if(ret != GNUTLS_E_SUCCESS){
316
464
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
317
465
safer_gnutls_strerror(ret));
318
466
}
319
467
320
if ((ret = gnutls_priority_set_direct (es->session, "NORMAL", &err))
321
!= GNUTLS_E_SUCCESS) {
322
fprintf(stderr, "Syntax error at: %s\n", err);
323
fprintf(stderr, "GnuTLS error: %s\n",
324
safer_gnutls_strerror(ret));
325
return -1;
468
{
469
const char *err;
470
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
471
if(ret != GNUTLS_E_SUCCESS) {
472
fprintf(stderr, "Syntax error at: %s\n", err);
473
fprintf(stderr, "GnuTLS error: %s\n",
474
safer_gnutls_strerror(ret));
475
gnutls_deinit(*session);
476
return -1;
477
}
326
478
}
327
479
328
if ((ret = gnutls_credentials_set
329
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
330
!= GNUTLS_E_SUCCESS) {
331
fprintf(stderr, "Error setting a credentials set: %s\n",
480
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
481
mc->cred);
482
if(ret != GNUTLS_E_SUCCESS) {
483
fprintf(stderr, "Error setting GnuTLS credentials: %s\n",
332
484
safer_gnutls_strerror(ret));
485
gnutls_deinit(*session);
333
486
return -1;
334
487
}
335
488
336
489
/* ignore client certificate if any. */
337
gnutls_certificate_server_set_request (es->session,
338
GNUTLS_CERT_IGNORE);
490
gnutls_certificate_server_set_request(*session,
491
GNUTLS_CERT_IGNORE);
339
492
340
gnutls_dh_set_prime_bits (es->session, DH_BITS);
493
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
341
494
342
495
return 0;
343
496
}
344
497
345
void empty_log(__attribute__((unused)) AvahiLogLevel level,
346
__attribute__((unused)) const char *txt){}
498
/* Avahi log function callback */
499
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
500
__attribute__((unused)) const char *txt){}
347
501
348
int start_mandos_communication(char *ip, uint16_t port,
349
unsigned int if_index){
502
/* Called when a Mandos server is found */
503
static int start_mandos_communication(const char *ip, uint16_t port,
504
AvahiIfIndex if_index,
505
mandos_context *mc){
350
506
int ret, tcp_sd;
351
struct sockaddr_in6 to;
352
encrypted_session es;
507
ssize_t sret;
508
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
353
509
char *buffer = NULL;
354
510
char *decrypted_buffer;
355
511
size_t buffer_length = 0;
356
512
size_t buffer_capacity = 0;
357
513
ssize_t decrypted_buffer_size;
514
size_t written;
358
515
int retval = 0;
359
516
char interface[IF_NAMESIZE];
517
gnutls_session_t session;
518
519
ret = init_gnutls_session(mc, &session);
520
if(ret != 0){
521
return -1;
522
}
360
523
361
524
if(debug){
362
fprintf(stderr, "Setting up a tcp connection to %s\n", ip);
525
fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
526
"\n", ip, port);
363
527
}
364
528
365
529
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
368
532
return -1;
369
533
}
370
534
371
if(if_indextoname(if_index, interface) == NULL){
372
if(debug){
535
if(debug){
536
if(if_indextoname((unsigned int)if_index, interface) == NULL){
373
537
perror("if_indextoname");
538
return -1;
374
539
}
375
return -1;
376
}
377
378
if(debug){
379
540
fprintf(stderr, "Binding to interface %s\n", interface);
380
541
}
381
542
382
ret = setsockopt(tcp_sd, SOL_SOCKET, SO_BINDTODEVICE, interface, 5);
383
if(ret < 0) {
384
perror("setsockopt bindtodevice");
385
return -1;
386
}
387
388
memset(&to,0,sizeof(to));
389
to.sin6_family = AF_INET6;
390
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
391
if (ret < 0 ){
543
memset(&to, 0, sizeof(to));
544
to.in6.sin6_family = AF_INET6;
545
/* It would be nice to have a way to detect if we were passed an
546
IPv4 address here. Now we assume an IPv6 address. */
547
ret = inet_pton(AF_INET6, ip, &to.in6.sin6_addr);
548
if(ret < 0 ){
392
549
perror("inet_pton");
393
550
return -1;
394
}
551
}
395
552
if(ret == 0){
396
553
fprintf(stderr, "Bad address: %s\n", ip);
397
554
return -1;
398
555
}
399
/* Spurious warnings for the next line, see for instance
400
<http://bugs.debian.org/488884> */
401
to.sin6_port = htons(port);
556
to.in6.sin6_port = htons(port); /* Spurious warning */
402
557
403
to.sin6_scope_id = (uint32_t)if_index;
558
to.in6.sin6_scope_id = (uint32_t)if_index;
404
559
405
560
if(debug){
406
fprintf(stderr, "Connection to: %s\n", ip);
561
fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
562
port);
563
char addrstr[INET6_ADDRSTRLEN] = "";
564
if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
565
sizeof(addrstr)) == NULL){
566
perror("inet_ntop");
567
} else {
568
if(strcmp(addrstr, ip) != 0){
569
fprintf(stderr, "Canonical address form: %s\n", addrstr);
570
}
571
}
407
572
}
408
573
409
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
410
if (ret < 0){
574
ret = connect(tcp_sd, &to.in, sizeof(to));
575
if(ret < 0){
411
576
perror("connect");
412
577
return -1;
413
578
}
414
579
415
ret = initgnutls (&es);
416
if (ret != 0){
417
retval = -1;
418
return -1;
580
const char *out = mandos_protocol_version;
581
written = 0;
582
while(true){
583
size_t out_size = strlen(out);
584
ret = (int)TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
585
out_size - written));
586
if(ret == -1){
587
perror("write");
588
retval = -1;
589
goto mandos_end;
590
}
591
written += (size_t)ret;
592
if(written < out_size){
593
continue;
594
} else {
595
if(out == mandos_protocol_version){
596
written = 0;
597
out = "\r\n";
598
} else {
599
break;
600
}
601
}
419
602
}
420
603
421
gnutls_transport_set_ptr (es.session,
422
(gnutls_transport_ptr_t) tcp_sd);
423
424
604
if(debug){
425
605
fprintf(stderr, "Establishing TLS session with %s\n", ip);
426
606
}
427
607
428
ret = gnutls_handshake (es.session);
429
430
if (ret != GNUTLS_E_SUCCESS){
431
fprintf(stderr, "\n*** Handshake failed ***\n");
432
gnutls_perror (ret);
608
gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);
609
610
do{
611
ret = gnutls_handshake(session);
612
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
613
614
if(ret != GNUTLS_E_SUCCESS){
615
if(debug){
616
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
617
gnutls_perror(ret);
618
}
433
619
retval = -1;
434
goto exit;
620
goto mandos_end;
435
621
}
436
622
437
//Retrieve OpenPGP packet that contains the wanted password
623
/* Read OpenPGP packet that contains the wanted password */
438
624
439
625
if(debug){
440
626
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
441
627
ip);
442
628
}
443
629
444
630
while(true){
445
if (buffer_length + BUFFER_SIZE > buffer_capacity){
446
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
447
if (buffer == NULL){
448
perror("realloc");
449
goto exit;
450
}
451
buffer_capacity += BUFFER_SIZE;
631
buffer_capacity = adjustbuffer(&buffer, buffer_length,
632
buffer_capacity);
633
if(buffer_capacity == 0){
634
perror("adjustbuffer");
635
retval = -1;
636
goto mandos_end;
452
637
}
453
638
454
ret = gnutls_record_recv
455
(es.session, buffer+buffer_length, BUFFER_SIZE);
456
if (ret == 0){
639
sret = gnutls_record_recv(session, buffer+buffer_length,
640
BUFFER_SIZE);
641
if(sret == 0){
457
642
break;
458
643
}
459
if (ret < 0){
460
switch(ret){
644
if(sret < 0){
645
switch(sret){
461
646
case GNUTLS_E_INTERRUPTED:
462
647
case GNUTLS_E_AGAIN:
463
648
break;
464
649
case GNUTLS_E_REHANDSHAKE:
465
ret = gnutls_handshake (es.session);
466
if (ret < 0){
467
fprintf(stderr, "\n*** Handshake failed ***\n");
468
gnutls_perror (ret);
650
do{
651
ret = gnutls_handshake(session);
652
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
653
if(ret < 0){
654
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
655
gnutls_perror(ret);
469
656
retval = -1;
470
goto exit;
657
goto mandos_end;
471
658
}
472
659
break;
473
660
default:
474
661
fprintf(stderr, "Unknown error while reading data from"
475
" encrypted session with mandos server\n");
662
" encrypted session with Mandos server\n");
476
663
retval = -1;
477
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
478
goto exit;
664
gnutls_bye(session, GNUTLS_SHUT_RDWR);
665
goto mandos_end;
479
666
}
480
667
} else {
481
buffer_length += (size_t) ret;
668
buffer_length += (size_t) sret;
482
669
}
483
670
}
484
671
485
if (buffer_length > 0){
486
decrypted_buffer_size = pgp_packet_decrypt(buffer,
672
if(debug){
673
fprintf(stderr, "Closing TLS session\n");
674
}
675
676
gnutls_bye(session, GNUTLS_SHUT_RDWR);
677
678
if(buffer_length > 0){
679
decrypted_buffer_size = pgp_packet_decrypt(mc, buffer,
487
680
buffer_length,
488
&decrypted_buffer,
489
CERT_ROOT);
490
if (decrypted_buffer_size >= 0){
491
while(decrypted_buffer_size > 0){
492
ret = fwrite (decrypted_buffer, 1, (size_t)decrypted_buffer_size,
493
stdout);
681
&decrypted_buffer);
682
if(decrypted_buffer_size >= 0){
683
written = 0;
684
while(written < (size_t) decrypted_buffer_size){
685
ret = (int)fwrite(decrypted_buffer + written, 1,
686
(size_t)decrypted_buffer_size - written,
687
stdout);
494
688
if(ret == 0 and ferror(stdout)){
495
689
if(debug){
496
690
fprintf(stderr, "Error writing encrypted data: %s\n",
499
693
retval = -1;
500
694
break;
501
695
}
502
decrypted_buffer += ret;
503
decrypted_buffer_size -= ret;
696
written += (size_t)ret;
504
697
}
505
698
free(decrypted_buffer);
506
699
} else {
507
700
retval = -1;
508
701
}
509
}
510
511
//shutdown procedure
512
513
if(debug){
514
fprintf(stderr, "Closing TLS session\n");
515
}
516
702
} else {
703
retval = -1;
704
}
705
706
/* Shutdown procedure */
707
708
mandos_end:
517
709
free(buffer);
518
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
519
exit:
520
close(tcp_sd);
521
gnutls_deinit (es.session);
522
gnutls_certificate_free_credentials (es.cred);
523
gnutls_global_deinit ();
710
ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
711
if(ret == -1){
712
perror("close");
713
}
714
gnutls_deinit(session);
524
715
return retval;
525
716
}
526
717
527
static AvahiSimplePoll *simple_poll = NULL;
528
static AvahiServer *server = NULL;
529
530
static void resolve_callback(
531
AvahiSServiceResolver *r,
532
AVAHI_GCC_UNUSED AvahiIfIndex interface,
533
AVAHI_GCC_UNUSED AvahiProtocol protocol,
534
AvahiResolverEvent event,
535
const char *name,
536
const char *type,
537
const char *domain,
538
const char *host_name,
539
const AvahiAddress *address,
540
uint16_t port,
541
AVAHI_GCC_UNUSED AvahiStringList *txt,
542
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
543
AVAHI_GCC_UNUSED void* userdata) {
544
718
static void resolve_callback(AvahiSServiceResolver *r,
719
AvahiIfIndex interface,
720
AVAHI_GCC_UNUSED AvahiProtocol protocol,
721
AvahiResolverEvent event,
722
const char *name,
723
const char *type,
724
const char *domain,
725
const char *host_name,
726
const AvahiAddress *address,
727
uint16_t port,
728
AVAHI_GCC_UNUSED AvahiStringList *txt,
729
AVAHI_GCC_UNUSED AvahiLookupResultFlags
730
flags,
731
void* userdata) {
732
mandos_context *mc = userdata;
545
733
assert(r);
546
734
547
735
/* Called whenever a service has been resolved successfully or
548
736
timed out */
549
550
switch (event) {
737
738
switch(event) {
551
739
default:
552
740
case AVAHI_RESOLVER_FAILURE:
553
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
554
" type '%s' in domain '%s': %s\n", name, type, domain,
555
avahi_strerror(avahi_server_errno(server)));
741
fprintf(stderr, "(Avahi Resolver) Failed to resolve service '%s'"
742
" of type '%s' in domain '%s': %s\n", name, type, domain,
743
avahi_strerror(avahi_server_errno(mc->server)));
556
744
break;
557
745
558
746
case AVAHI_RESOLVER_FOUND:
559
747
{
560
748
char ip[AVAHI_ADDRESS_STR_MAX];
561
749
avahi_address_snprint(ip, sizeof(ip), address);
562
750
if(debug){
563
fprintf(stderr, "Mandos server found on %s (%s) on port %d\n",
564
host_name, ip, port);
751
fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %"
752
PRIu16 ") on port %d\n", name, host_name, ip,
753
interface, port);
565
754
}
566
int ret = start_mandos_communication(ip, port,
567
(unsigned int)
568
interface);
569
if (ret == 0){
570
exit(EXIT_SUCCESS);
571
} else {
572
exit(EXIT_FAILURE);
755
int ret = start_mandos_communication(ip, port, interface, mc);
756
if(ret == 0){
757
avahi_simple_poll_quit(mc->simple_poll);
573
758
}
574
759
}
575
760
}
576
761
avahi_s_service_resolver_free(r);
577
762
}
578
763
579
static void browse_callback(
580
AvahiSServiceBrowser *b,
581
AvahiIfIndex interface,
582
AvahiProtocol protocol,
583
AvahiBrowserEvent event,
584
const char *name,
585
const char *type,
586
const char *domain,
587
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
588
void* userdata) {
589
590
AvahiServer *s = userdata;
591
assert(b);
592
593
/* Called whenever a new services becomes available on the LAN or
594
is removed from the LAN */
595
596
switch (event) {
597
default:
598
case AVAHI_BROWSER_FAILURE:
599
600
fprintf(stderr, "(Browser) %s\n",
601
avahi_strerror(avahi_server_errno(server)));
602
avahi_simple_poll_quit(simple_poll);
603
return;
604
605
case AVAHI_BROWSER_NEW:
606
/* We ignore the returned resolver object. In the callback
607
function we free it. If the server is terminated before
608
the callback function is called the server will free
609
the resolver for us. */
610
611
if (!(avahi_s_service_resolver_new(s, interface, protocol, name,
612
type, domain,
613
AVAHI_PROTO_INET6, 0,
614
resolve_callback, s)))
615
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
616
avahi_strerror(avahi_server_errno(s)));
617
break;
618
619
case AVAHI_BROWSER_REMOVE:
620
break;
621
622
case AVAHI_BROWSER_ALL_FOR_NOW:
623
case AVAHI_BROWSER_CACHE_EXHAUSTED:
624
break;
764
static void browse_callback( AvahiSServiceBrowser *b,
765
AvahiIfIndex interface,
766
AvahiProtocol protocol,
767
AvahiBrowserEvent event,
768
const char *name,
769
const char *type,
770
const char *domain,
771
AVAHI_GCC_UNUSED AvahiLookupResultFlags
772
flags,
773
void* userdata) {
774
mandos_context *mc = userdata;
775
assert(b);
776
777
/* Called whenever a new services becomes available on the LAN or
778
is removed from the LAN */
779
780
switch(event) {
781
default:
782
case AVAHI_BROWSER_FAILURE:
783
784
fprintf(stderr, "(Avahi browser) %s\n",
785
avahi_strerror(avahi_server_errno(mc->server)));
786
avahi_simple_poll_quit(mc->simple_poll);
787
return;
788
789
case AVAHI_BROWSER_NEW:
790
/* We ignore the returned Avahi resolver object. In the callback
791
function we free it. If the Avahi server is terminated before
792
the callback function is called the Avahi server will free the
793
resolver for us. */
794
795
if(!(avahi_s_service_resolver_new(mc->server, interface,
796
protocol, name, type, domain,
797
AVAHI_PROTO_INET6, 0,
798
resolve_callback, mc)))
799
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
800
name, avahi_strerror(avahi_server_errno(mc->server)));
801
break;
802
803
case AVAHI_BROWSER_REMOVE:
804
break;
805
806
case AVAHI_BROWSER_ALL_FOR_NOW:
807
case AVAHI_BROWSER_CACHE_EXHAUSTED:
808
if(debug){
809
fprintf(stderr, "No Mandos server found, still searching...\n");
625
810
}
811
break;
812
}
626
813
}
627
814
628
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
629
AvahiServerConfig config;
815
int main(int argc, char *argv[]){
630
816
AvahiSServiceBrowser *sb = NULL;
631
817
int error;
632
818
int ret;
633
int returncode = EXIT_SUCCESS;
819
int exitcode = EXIT_SUCCESS;
634
820
const char *interface = "eth0";
635
636
while (true){
637
static struct option long_options[] = {
638
{"debug", no_argument, (int *)&debug, 1},
639
{"interface", required_argument, 0, 'i'},
640
{0, 0, 0, 0} };
641
642
int option_index = 0;
643
ret = getopt_long (argc, argv, "i:", long_options,
644
&option_index);
645
646
if (ret == -1){
647
break;
648
}
649
650
switch(ret){
651
case 0:
652
break;
653
case 'i':
654
interface = optarg;
655
break;
656
default:
657
exit(EXIT_FAILURE);
658
}
659
}
660
661
if (not debug){
821
struct ifreq network;
822
int sd;
823
uid_t uid;
824
gid_t gid;
825
char *connect_to = NULL;
826
char tempdir[] = "/tmp/mandosXXXXXX";
827
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
828
const char *seckey = PATHDIR "/" SECKEY;
829
const char *pubkey = PATHDIR "/" PUBKEY;
830
831
mandos_context mc = { .simple_poll = NULL, .server = NULL,
832
.dh_bits = 1024, .priority = "SECURE256"
833
":!CTYPE-X.509:+CTYPE-OPENPGP" };
834
bool gnutls_initalized = false;
835
bool gpgme_initalized = false;
836
837
{
838
struct argp_option options[] = {
839
{ .name = "debug", .key = 128,
840
.doc = "Debug mode", .group = 3 },
841
{ .name = "connect", .key = 'c',
842
.arg = "ADDRESS:PORT",
843
.doc = "Connect directly to a specific Mandos server",
844
.group = 1 },
845
{ .name = "interface", .key = 'i',
846
.arg = "NAME",
847
.doc = "Interface that will be used to search for Mandos"
848
" servers",
849
.group = 1 },
850
{ .name = "seckey", .key = 's',
851
.arg = "FILE",
852
.doc = "OpenPGP secret key file base name",
853
.group = 1 },
854
{ .name = "pubkey", .key = 'p',
855
.arg = "FILE",
856
.doc = "OpenPGP public key file base name",
857
.group = 2 },
858
{ .name = "dh-bits", .key = 129,
859
.arg = "BITS",
860
.doc = "Bit length of the prime number used in the"
861
" Diffie-Hellman key exchange",
862
.group = 2 },
863
{ .name = "priority", .key = 130,
864
.arg = "STRING",
865
.doc = "GnuTLS priority string for the TLS handshake",
866
.group = 1 },
867
{ .name = NULL }
868
};
869
870
error_t parse_opt(int key, char *arg,
871
struct argp_state *state) {
872
switch(key) {
873
case 128: /* --debug */
874
debug = true;
875
break;
876
case 'c': /* --connect */
877
connect_to = arg;
878
break;
879
case 'i': /* --interface */
880
interface = arg;
881
break;
882
case 's': /* --seckey */
883
seckey = arg;
884
break;
885
case 'p': /* --pubkey */
886
pubkey = arg;
887
break;
888
case 129: /* --dh-bits */
889
ret = sscanf(arg, "%u", &mc.dh_bits);
890
if(ret != 1){
891
fprintf(stderr, "Bad number of DH bits\n");
892
exit(EXIT_FAILURE);
893
}
894
break;
895
case 130: /* --priority */
896
mc.priority = arg;
897
break;
898
case ARGP_KEY_ARG:
899
argp_usage(state);
900
case ARGP_KEY_END:
901
break;
902
default:
903
return ARGP_ERR_UNKNOWN;
904
}
905
return 0;
906
}
907
908
struct argp argp = { .options = options, .parser = parse_opt,
909
.args_doc = "",
910
.doc = "Mandos client -- Get and decrypt"
911
" passwords from a Mandos server" };
912
ret = argp_parse(&argp, argc, argv, 0, 0, NULL);
913
if(ret == ARGP_ERR_UNKNOWN){
914
fprintf(stderr, "Unknown error while parsing arguments\n");
915
exitcode = EXIT_FAILURE;
916
goto end;
917
}
918
}
919
920
/* If the interface is down, bring it up */
921
{
922
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
923
if(sd < 0) {
924
perror("socket");
925
exitcode = EXIT_FAILURE;
926
goto end;
927
}
928
strcpy(network.ifr_name, interface);
929
ret = ioctl(sd, SIOCGIFFLAGS, &network);
930
if(ret == -1){
931
perror("ioctl SIOCGIFFLAGS");
932
exitcode = EXIT_FAILURE;
933
goto end;
934
}
935
if((network.ifr_flags & IFF_UP) == 0){
936
network.ifr_flags |= IFF_UP;
937
ret = ioctl(sd, SIOCSIFFLAGS, &network);
938
if(ret == -1){
939
perror("ioctl SIOCSIFFLAGS");
940
exitcode = EXIT_FAILURE;
941
goto end;
942
}
943
}
944
ret = (int)TEMP_FAILURE_RETRY(close(sd));
945
if(ret == -1){
946
perror("close");
947
}
948
}
949
950
uid = getuid();
951
gid = getgid();
952
953
ret = setuid(uid);
954
if(ret == -1){
955
perror("setuid");
956
}
957
958
setgid(gid);
959
if(ret == -1){
960
perror("setgid");
961
}
962
963
ret = init_gnutls_global(&mc, pubkey, seckey);
964
if(ret == -1){
965
fprintf(stderr, "init_gnutls_global failed\n");
966
exitcode = EXIT_FAILURE;
967
goto end;
968
} else {
969
gnutls_initalized = true;
970
}
971
972
if(mkdtemp(tempdir) == NULL){
973
perror("mkdtemp");
974
tempdir[0] = '\0';
975
goto end;
976
}
977
978
if(not init_gpgme(&mc, pubkey, seckey, tempdir)){
979
fprintf(stderr, "gpgme_initalized failed\n");
980
exitcode = EXIT_FAILURE;
981
goto end;
982
} else {
983
gpgme_initalized = true;
984
}
985
986
if_index = (AvahiIfIndex) if_nametoindex(interface);
987
if(if_index == 0){
988
fprintf(stderr, "No such interface: \"%s\"\n", interface);
989
exit(EXIT_FAILURE);
990
}
991
992
if(connect_to != NULL){
993
/* Connect directly, do not use Zeroconf */
994
/* (Mainly meant for debugging) */
995
char *address = strrchr(connect_to, ':');
996
if(address == NULL){
997
fprintf(stderr, "No colon in address\n");
998
exitcode = EXIT_FAILURE;
999
goto end;
1000
}
1001
uint16_t port;
1002
ret = sscanf(address+1, "%" SCNu16, &port);
1003
if(ret != 1){
1004
fprintf(stderr, "Bad port number\n");
1005
exitcode = EXIT_FAILURE;
1006
goto end;
1007
}
1008
*address = '\0';
1009
address = connect_to;
1010
ret = start_mandos_communication(address, port, if_index, &mc);
1011
if(ret < 0){
1012
exitcode = EXIT_FAILURE;
1013
} else {
1014
exitcode = EXIT_SUCCESS;
1015
}
1016
goto end;
1017
}
1018
1019
if(not debug){
662
1020
avahi_set_log_function(empty_log);
663
1021
}
664
1022
665
/* Initialize the psuedo-RNG */
1023
/* Initialize the pseudo-RNG for Avahi */
666
1024
srand((unsigned int) time(NULL));
667
668
/* Allocate main loop object */
669
if (!(simple_poll = avahi_simple_poll_new())) {
670
fprintf(stderr, "Failed to create simple poll object.\n");
671
672
goto exit;
673
}
674
675
/* Do not publish any local records */
676
avahi_server_config_init(&config);
677
config.publish_hinfo = 0;
678
config.publish_addresses = 0;
679
config.publish_workstation = 0;
680
config.publish_domain = 0;
681
682
/* Allocate a new server */
683
server = avahi_server_new(avahi_simple_poll_get(simple_poll),
684
&config, NULL, NULL, &error);
685
686
/* Free the configuration data */
687
avahi_server_config_free(&config);
688
689
/* Check if creating the server object succeeded */
690
if (!server) {
691
fprintf(stderr, "Failed to create server: %s\n",
1025
1026
/* Allocate main Avahi loop object */
1027
mc.simple_poll = avahi_simple_poll_new();
1028
if(mc.simple_poll == NULL) {
1029
fprintf(stderr, "Avahi: Failed to create simple poll"
1030
" object.\n");
1031
exitcode = EXIT_FAILURE;
1032
goto end;
1033
}
1034
1035
{
1036
AvahiServerConfig config;
1037
/* Do not publish any local Zeroconf records */
1038
avahi_server_config_init(&config);
1039
config.publish_hinfo = 0;
1040
config.publish_addresses = 0;
1041
config.publish_workstation = 0;
1042
config.publish_domain = 0;
1043
1044
/* Allocate a new server */
1045
mc.server = avahi_server_new(avahi_simple_poll_get
1046
(mc.simple_poll), &config, NULL,
1047
NULL, &error);
1048
1049
/* Free the Avahi configuration data */
1050
avahi_server_config_free(&config);
1051
}
1052
1053
/* Check if creating the Avahi server object succeeded */
1054
if(mc.server == NULL) {
1055
fprintf(stderr, "Failed to create Avahi server: %s\n",
692
1056
avahi_strerror(error));
693
returncode = EXIT_FAILURE;
694
goto exit;
1057
exitcode = EXIT_FAILURE;
1058
goto end;
695
1059
}
696
1060
697
/* Create the service browser */
698
sb = avahi_s_service_browser_new(server,
699
(AvahiIfIndex)
700
if_nametoindex(interface),
1061
/* Create the Avahi service browser */
1062
sb = avahi_s_service_browser_new(mc.server, if_index,
701
1063
AVAHI_PROTO_INET6,
702
1064
"_mandos._tcp", NULL, 0,
703
browse_callback, server);
704
if (!sb) {
1065
browse_callback, &mc);
1066
if(sb == NULL) {
705
1067
fprintf(stderr, "Failed to create service browser: %s\n",
706
avahi_strerror(avahi_server_errno(server)));
707
returncode = EXIT_FAILURE;
708
goto exit;
1068
avahi_strerror(avahi_server_errno(mc.server)));
1069
exitcode = EXIT_FAILURE;
1070
goto end;
709
1071
}
710
1072
711
1073
/* Run the main loop */
712
713
if (debug){
714
fprintf(stderr, "Starting avahi loop search\n");
1074
1075
if(debug){
1076
fprintf(stderr, "Starting Avahi loop search\n");
715
1077
}
716
1078
717
avahi_simple_poll_loop(simple_poll);
718
719
exit:
720
721
if (debug){
1079
avahi_simple_poll_loop(mc.simple_poll);
1080
1081
end:
1082
1083
if(debug){
722
1084
fprintf(stderr, "%s exiting\n", argv[0]);
723
1085
}
724
1086
725
1087
/* Cleanup things */
726
if (sb)
1088
if(sb != NULL)
727
1089
avahi_s_service_browser_free(sb);
728
1090
729
if (server)
730
avahi_server_free(server);
731
732
if (simple_poll)
733
avahi_simple_poll_free(simple_poll);
734
735
return returncode;
1091
if(mc.server != NULL)
1092
avahi_server_free(mc.server);
1093
1094
if(mc.simple_poll != NULL)
1095
avahi_simple_poll_free(mc.simple_poll);
1096
1097
if(gnutls_initalized){
1098
gnutls_certificate_free_credentials(mc.cred);
1099
gnutls_global_deinit();
1100
gnutls_dh_params_deinit(mc.dh_params);
1101
}
1102
1103
if(gpgme_initalized){
1104
gpgme_release(mc.ctx);
1105
}
1106
1107
/* Removes the temp directory used by GPGME */
1108
if(tempdir[0] != '\0'){
1109
DIR *d;
1110
struct dirent *direntry;
1111
d = opendir(tempdir);
1112
if(d == NULL){
1113
if(errno != ENOENT){
1114
perror("opendir");
1115
}
1116
} else {
1117
while(true){
1118
direntry = readdir(d);
1119
if(direntry == NULL){
1120
break;
1121
}
1122
if(direntry->d_type == DT_REG){
1123
char *fullname = NULL;
1124
ret = asprintf(&fullname, "%s/%s", tempdir,
1125
direntry->d_name);
1126
if(ret < 0){
1127
perror("asprintf");
1128
continue;
1129
}
1130
ret = unlink(fullname);
1131
if(ret == -1){
1132
fprintf(stderr, "unlink(\"%s\"): %s",
1133
fullname, strerror(errno));
1134
}
1135
free(fullname);
1136
}
1137
}
1138
closedir(d);
1139
}
1140
ret = rmdir(tempdir);
1141
if(ret == -1 and errno != ENOENT){
1142
perror("rmdir");
1143
}
1144
}
1145
1146
return exitcode;
736
1147
}
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0