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