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/password-request.c
- browse files at revision 72
- compare with another revision
- download diff
- download tarball
- view history from revision 72
- Committer: Teddy Hogeborn
- Date: 2008-08-12 21:28:42 UTC
- Revision ID: teddy@fukt.bsnet.se-20080812212842-i96bjpu10iq0wpjd
* Makefile (uninstall-client): Refuse to uninstall if it is in use.
- files added:
- initramfs-tools-hook
- files removed:
- ca.pem
- files renamed:
- server.py => mandos
- plugbasedclient.c => mandos-client.c
- server.conf => mandos.conf
- plugins.d/passprompt.c => plugins.d/password-prompt.c
- plugins.d/mandosclient.c => plugins.d/password-request.c
- files modified:
- Makefile
added
removed
plugins.d/password-request.c
32
32
#define _LARGEFILE_SOURCE
33
33
#define _FILE_OFFSET_BITS 64
34
34
35
#include <stdio.h>
36
#include <assert.h>
37
#include <stdlib.h>
38
#include <time.h>
39
#include <net/if.h> /* if_nametoindex */
40
#include <sys/ioctl.h> // ioctl, ifreq, SIOCGIFFLAGS, IFF_UP, SIOCSIFFLAGS
41
#include <net/if.h> // ioctl, ifreq, SIOCGIFFLAGS, IFF_UP, SIOCSIFFLAGS
42
35
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY() */
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 */
71
72
/* Avahi */
73
/* All Avahi types, constants and functions
74
Avahi*, avahi_*,
75
AVAHI_* */
43
76
#include <avahi-core/core.h>
44
77
#include <avahi-core/lookup.h>
45
78
#include <avahi-core/log.h>
47
80
#include <avahi-common/malloc.h>
48
81
#include <avahi-common/error.h>
49
82
50
//mandos client part
51
#include <sys/types.h> /* socket(), inet_pton() */
52
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
53
struct in6_addr, inet_pton() */
54
#include <gnutls/gnutls.h> /* All GnuTLS stuff */
55
#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */
56
57
#include <unistd.h> /* close() */
58
#include <netinet/in.h>
59
#include <stdbool.h> /* true */
60
#include <string.h> /* memset */
61
#include <arpa/inet.h> /* inet_pton() */
62
#include <iso646.h> /* not */
63
64
// gpgme
65
#include <errno.h> /* perror() */
66
#include <gpgme.h>
67
68
// getopt_long
69
#include <getopt.h>
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_* */
70
96
71
97
#define BUFFER_SIZE 256
72
98
99
bool debug = false;
73
100
static const char *keydir = "/conf/conf.d/mandos";
74
static const char *pubkeyfile = "pubkey.txt";
75
static const char *seckeyfile = "seckey.txt";
76
77
bool debug = false;
78
79
/* Used for passing in values through all the callback functions */
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 */
80
106
typedef struct {
81
107
AvahiSimplePoll *simple_poll;
82
108
AvahiServer *server;
83
109
gnutls_certificate_credentials_t cred;
84
110
unsigned int dh_bits;
111
gnutls_dh_params_t dh_params;
85
112
const char *priority;
86
113
} mandos_context;
87
114
88
static ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
89
char **new_packet,
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,
121
size_t buffer_capacity){
122
if (buffer_length + BUFFER_SIZE > buffer_capacity){
123
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
124
if (buffer == NULL){
125
return 0;
126
}
127
buffer_capacity += BUFFER_SIZE;
128
}
129
return buffer_capacity;
130
}
131
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,
90
139
const char *homedir){
91
140
gpgme_data_t dh_crypto, dh_plain;
92
141
gpgme_ctx_t ctx;
93
142
gpgme_error_t rc;
94
143
ssize_t ret;
95
ssize_t new_packet_capacity = 0;
96
ssize_t new_packet_length = 0;
144
size_t plaintext_capacity = 0;
145
ssize_t plaintext_length = 0;
97
146
gpgme_engine_info_t engine_info;
98
147
99
148
if (debug){
100
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
149
fprintf(stderr, "Trying to decrypt OpenPGP data\n");
101
150
}
102
151
103
152
/* Init GPGME */
109
158
return -1;
110
159
}
111
160
112
/* Set GPGME home directory */
161
/* Set GPGME home directory for the OpenPGP engine only */
113
162
rc = gpgme_get_engine_info (&engine_info);
114
163
if (rc != GPG_ERR_NO_ERROR){
115
164
fprintf(stderr, "bad gpgme_get_engine_info: %s: %s\n",
125
174
engine_info = engine_info->next;
126
175
}
127
176
if(engine_info == NULL){
128
fprintf(stderr, "Could not set home dir to %s\n", homedir);
177
fprintf(stderr, "Could not set GPGME home dir to %s\n", homedir);
129
178
return -1;
130
179
}
131
180
132
/* Create new GPGME data buffer from packet buffer */
133
rc = gpgme_data_new_from_mem(&dh_crypto, packet, packet_size, 0);
181
/* Create new GPGME data buffer from memory cryptotext */
182
rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,
183
0);
134
184
if (rc != GPG_ERR_NO_ERROR){
135
185
fprintf(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
136
186
gpgme_strsource(rc), gpgme_strerror(rc));
142
192
if (rc != GPG_ERR_NO_ERROR){
143
193
fprintf(stderr, "bad gpgme_data_new: %s: %s\n",
144
194
gpgme_strsource(rc), gpgme_strerror(rc));
195
gpgme_data_release(dh_crypto);
145
196
return -1;
146
197
}
147
198
150
201
if (rc != GPG_ERR_NO_ERROR){
151
202
fprintf(stderr, "bad gpgme_new: %s: %s\n",
152
203
gpgme_strsource(rc), gpgme_strerror(rc));
153
return -1;
204
plaintext_length = -1;
205
goto decrypt_end;
154
206
}
155
207
156
/* Decrypt data from the FILE pointer to the plaintext data
157
buffer */
208
/* Decrypt data from the cryptotext data buffer to the plaintext
209
data buffer */
158
210
rc = gpgme_op_decrypt(ctx, dh_crypto, dh_plain);
159
211
if (rc != GPG_ERR_NO_ERROR){
160
212
fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
161
213
gpgme_strsource(rc), gpgme_strerror(rc));
162
return -1;
214
plaintext_length = -1;
215
goto decrypt_end;
163
216
}
164
217
165
218
if(debug){
166
fprintf(stderr, "Decryption of OpenPGP packet succeeded\n");
219
fprintf(stderr, "Decryption of OpenPGP data succeeded\n");
167
220
}
168
221
169
222
if (debug){
170
223
gpgme_decrypt_result_t result;
171
224
result = gpgme_op_decrypt_result(ctx);
174
227
} else {
175
228
fprintf(stderr, "Unsupported algorithm: %s\n",
176
229
result->unsupported_algorithm);
177
fprintf(stderr, "Wrong key usage: %d\n",
230
fprintf(stderr, "Wrong key usage: %u\n",
178
231
result->wrong_key_usage);
179
232
if(result->file_name != NULL){
180
233
fprintf(stderr, "File name: %s\n", result->file_name);
195
248
}
196
249
}
197
250
198
/* Delete the GPGME FILE pointer cryptotext data buffer */
199
gpgme_data_release(dh_crypto);
200
201
251
/* Seek back to the beginning of the GPGME plaintext data buffer */
202
252
if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){
203
253
perror("pgpme_data_seek");
254
plaintext_length = -1;
255
goto decrypt_end;
204
256
}
205
257
206
*new_packet = 0;
258
*plaintext = NULL;
207
259
while(true){
208
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
209
*new_packet = realloc(*new_packet,
210
(unsigned int)new_packet_capacity
211
+ BUFFER_SIZE);
212
if (*new_packet == NULL){
213
perror("realloc");
214
return -1;
215
}
216
new_packet_capacity += BUFFER_SIZE;
260
plaintext_capacity = adjustbuffer(plaintext,
261
(size_t)plaintext_length,
262
plaintext_capacity);
263
if (plaintext_capacity == 0){
264
perror("adjustbuffer");
265
plaintext_length = -1;
266
goto decrypt_end;
217
267
}
218
268
219
ret = gpgme_data_read(dh_plain, *new_packet + new_packet_length,
269
ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
220
270
BUFFER_SIZE);
221
271
/* Print the data, if any */
222
272
if (ret == 0){
273
/* EOF */
223
274
break;
224
275
}
225
276
if(ret < 0){
226
277
perror("gpgme_data_read");
227
return -1;
278
plaintext_length = -1;
279
goto decrypt_end;
228
280
}
229
new_packet_length += ret;
281
plaintext_length += ret;
230
282
}
231
283
232
/* FIXME: check characters before printing to screen so to not print
233
terminal control characters */
234
/* if(debug){ */
235
/* fprintf(stderr, "decrypted password is: "); */
236
/* fwrite(*new_packet, 1, new_packet_length, stderr); */
237
/* fprintf(stderr, "\n"); */
238
/* } */
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);
239
296
240
297
/* Delete the GPGME plaintext data buffer */
241
298
gpgme_data_release(dh_plain);
242
return new_packet_length;
299
return plaintext_length;
243
300
}
244
301
245
302
static const char * safer_gnutls_strerror (int value) {
249
306
return ret;
250
307
}
251
308
309
/* GnuTLS log function callback */
252
310
static void debuggnutls(__attribute__((unused)) int level,
253
311
const char* string){
254
fprintf(stderr, "%s", string);
312
fprintf(stderr, "GnuTLS: %s", string);
255
313
}
256
314
257
static int initgnutls(mandos_context *mc, gnutls_session_t *session,
258
gnutls_dh_params_t *dh_params){
259
const char *err;
315
static int init_gnutls_global(mandos_context *mc,
316
const char *pubkeyfile,
317
const char *seckeyfile){
260
318
int ret;
261
319
262
320
if(debug){
263
321
fprintf(stderr, "Initializing GnuTLS\n");
264
322
}
265
266
if ((ret = gnutls_global_init ())
267
!= GNUTLS_E_SUCCESS) {
268
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
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));
269
328
return -1;
270
329
}
271
330
272
331
if (debug){
332
/* "Use a log level over 10 to enable all debugging options."
333
* - GnuTLS manual
334
*/
273
335
gnutls_global_set_log_level(11);
274
336
gnutls_global_set_log_function(debuggnutls);
275
337
}
276
338
277
/* openpgp credentials */
278
if ((ret = gnutls_certificate_allocate_credentials (&mc->cred))
279
!= GNUTLS_E_SUCCESS) {
280
fprintf (stderr, "memory error: %s\n",
339
/* OpenPGP credentials */
340
gnutls_certificate_allocate_credentials(&mc->cred);
341
if (ret != GNUTLS_E_SUCCESS){
342
fprintf (stderr, "GnuTLS memory error: %s\n",
281
343
safer_gnutls_strerror(ret));
344
gnutls_global_deinit ();
282
345
return -1;
283
346
}
284
347
291
354
ret = gnutls_certificate_set_openpgp_key_file
292
355
(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);
293
356
if (ret != GNUTLS_E_SUCCESS) {
294
fprintf
295
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
296
" '%s')\n",
297
ret, pubkeyfile, seckeyfile);
298
fprintf(stdout, "The Error is: %s\n",
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",
299
361
safer_gnutls_strerror(ret));
300
return -1;
301
}
302
303
//GnuTLS server initialization
304
if ((ret = gnutls_dh_params_init(dh_params))
305
!= GNUTLS_E_SUCCESS) {
306
fprintf (stderr, "Error in dh parameter initialization: %s\n",
307
safer_gnutls_strerror(ret));
308
return -1;
309
}
310
311
if ((ret = gnutls_dh_params_generate2(*dh_params, mc->dh_bits))
312
!= GNUTLS_E_SUCCESS) {
313
fprintf (stderr, "Error in prime generation: %s\n",
314
safer_gnutls_strerror(ret));
315
return -1;
316
}
317
318
gnutls_certificate_set_dh_params(mc->cred, *dh_params);
319
320
// GnuTLS session creation
321
if ((ret = gnutls_init(session, GNUTLS_SERVER))
322
!= GNUTLS_E_SUCCESS){
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){
323
397
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
324
398
safer_gnutls_strerror(ret));
325
399
}
326
400
327
if ((ret = gnutls_priority_set_direct(*session, mc->priority, &err))
328
!= GNUTLS_E_SUCCESS) {
329
fprintf(stderr, "Syntax error at: %s\n", err);
330
fprintf(stderr, "GnuTLS error: %s\n",
331
safer_gnutls_strerror(ret));
332
return -1;
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
}
333
411
}
334
412
335
if ((ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
336
mc->cred))
337
!= GNUTLS_E_SUCCESS) {
338
fprintf(stderr, "Error setting a credentials set: %s\n",
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",
339
417
safer_gnutls_strerror(ret));
418
gnutls_deinit (*session);
340
419
return -1;
341
420
}
342
421
349
428
return 0;
350
429
}
351
430
431
/* Avahi log function callback */
352
432
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
353
433
__attribute__((unused)) const char *txt){}
354
434
435
/* Called when a Mandos server is found */
355
436
static int start_mandos_communication(const char *ip, uint16_t port,
356
437
AvahiIfIndex if_index,
357
438
mandos_context *mc){
358
439
int ret, tcp_sd;
359
struct sockaddr_in6 to;
440
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
360
441
char *buffer = NULL;
361
442
char *decrypted_buffer;
362
443
size_t buffer_length = 0;
363
444
size_t buffer_capacity = 0;
364
445
ssize_t decrypted_buffer_size;
365
size_t written = 0;
446
size_t written;
366
447
int retval = 0;
367
448
char interface[IF_NAMESIZE];
368
449
gnutls_session_t session;
369
gnutls_dh_params_t dh_params;
450
451
ret = init_gnutls_session (mc, &session);
452
if (ret != 0){
453
return -1;
454
}
370
455
371
456
if(debug){
372
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
373
ip, port);
457
fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
458
"\n", ip, port);
374
459
}
375
460
376
461
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
388
473
}
389
474
390
475
memset(&to,0,sizeof(to)); /* Spurious warning */
391
to.sin6_family = AF_INET6;
392
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
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);
393
480
if (ret < 0 ){
394
481
perror("inet_pton");
395
482
return -1;
398
485
fprintf(stderr, "Bad address: %s\n", ip);
399
486
return -1;
400
487
}
401
to.sin6_port = htons(port); /* Spurious warning */
488
to.in6.sin6_port = htons(port); /* Spurious warning */
402
489
403
to.sin6_scope_id = (uint32_t)if_index;
490
to.in6.sin6_scope_id = (uint32_t)if_index;
404
491
405
492
if(debug){
406
fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
493
fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
494
port);
407
495
char addrstr[INET6_ADDRSTRLEN] = "";
408
if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr,
496
if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
409
497
sizeof(addrstr)) == NULL){
410
498
perror("inet_ntop");
411
499
} else {
415
503
}
416
504
}
417
505
418
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
506
ret = connect(tcp_sd, &to.in, sizeof(to));
419
507
if (ret < 0){
420
508
perror("connect");
421
509
return -1;
422
510
}
423
424
ret = initgnutls (mc, &session, &dh_params);
425
if (ret != 0){
426
retval = -1;
427
return -1;
511
512
const char *out = mandos_protocol_version;
513
written = 0;
514
while (true){
515
size_t out_size = strlen(out);
516
ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
517
out_size - written));
518
if (ret == -1){
519
perror("write");
520
retval = -1;
521
goto mandos_end;
522
}
523
written += (size_t)ret;
524
if(written < out_size){
525
continue;
526
} else {
527
if (out == mandos_protocol_version){
528
written = 0;
529
out = "\r\n";
530
} else {
531
break;
532
}
533
}
534
}
535
536
if(debug){
537
fprintf(stderr, "Establishing TLS session with %s\n", ip);
428
538
}
429
539
430
540
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
431
432
if(debug){
433
fprintf(stderr, "Establishing TLS session with %s\n", ip);
434
}
435
436
ret = gnutls_handshake (session);
541
542
do{
543
ret = gnutls_handshake (session);
544
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
437
545
438
546
if (ret != GNUTLS_E_SUCCESS){
439
547
if(debug){
440
fprintf(stderr, "\n*** Handshake failed ***\n");
548
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
441
549
gnutls_perror (ret);
442
550
}
443
551
retval = -1;
444
goto exit;
552
goto mandos_end;
445
553
}
446
554
447
//Retrieve OpenPGP packet that contains the wanted password
555
/* Read OpenPGP packet that contains the wanted password */
448
556
449
557
if(debug){
450
558
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
452
560
}
453
561
454
562
while(true){
455
if (buffer_length + BUFFER_SIZE > buffer_capacity){
456
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
457
if (buffer == NULL){
458
perror("realloc");
459
goto exit;
460
}
461
buffer_capacity += BUFFER_SIZE;
563
buffer_capacity = adjustbuffer(&buffer, buffer_length,
564
buffer_capacity);
565
if (buffer_capacity == 0){
566
perror("adjustbuffer");
567
retval = -1;
568
goto mandos_end;
462
569
}
463
570
464
571
ret = gnutls_record_recv(session, buffer+buffer_length,
472
579
case GNUTLS_E_AGAIN:
473
580
break;
474
581
case GNUTLS_E_REHANDSHAKE:
475
ret = gnutls_handshake (session);
582
do{
583
ret = gnutls_handshake (session);
584
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
476
585
if (ret < 0){
477
fprintf(stderr, "\n*** Handshake failed ***\n");
586
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
478
587
gnutls_perror (ret);
479
588
retval = -1;
480
goto exit;
589
goto mandos_end;
481
590
}
482
591
break;
483
592
default:
484
593
fprintf(stderr, "Unknown error while reading data from"
485
" encrypted session with mandos server\n");
594
" encrypted session with Mandos server\n");
486
595
retval = -1;
487
596
gnutls_bye (session, GNUTLS_SHUT_RDWR);
488
goto exit;
597
goto mandos_end;
489
598
}
490
599
} else {
491
600
buffer_length += (size_t) ret;
492
601
}
493
602
}
494
603
604
if(debug){
605
fprintf(stderr, "Closing TLS session\n");
606
}
607
608
gnutls_bye (session, GNUTLS_SHUT_RDWR);
609
495
610
if (buffer_length > 0){
496
611
decrypted_buffer_size = pgp_packet_decrypt(buffer,
497
612
buffer_length,
498
613
&decrypted_buffer,
499
614
keydir);
500
615
if (decrypted_buffer_size >= 0){
616
written = 0;
501
617
while(written < (size_t) decrypted_buffer_size){
502
618
ret = (int)fwrite (decrypted_buffer + written, 1,
503
619
(size_t)decrypted_buffer_size - written,
517
633
retval = -1;
518
634
}
519
635
}
520
521
//shutdown procedure
522
523
if(debug){
524
fprintf(stderr, "Closing TLS session\n");
525
}
526
636
637
/* Shutdown procedure */
638
639
mandos_end:
527
640
free(buffer);
528
gnutls_bye (session, GNUTLS_SHUT_RDWR);
529
exit:
530
641
close(tcp_sd);
531
642
gnutls_deinit (session);
532
gnutls_certificate_free_credentials (mc->cred);
533
gnutls_global_deinit ();
534
643
return retval;
535
644
}
536
645
537
static void resolve_callback( AvahiSServiceResolver *r,
538
AvahiIfIndex interface,
539
AVAHI_GCC_UNUSED AvahiProtocol protocol,
540
AvahiResolverEvent event,
541
const char *name,
542
const char *type,
543
const char *domain,
544
const char *host_name,
545
const AvahiAddress *address,
546
uint16_t port,
547
AVAHI_GCC_UNUSED AvahiStringList *txt,
548
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
549
void* userdata) {
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) {
550
660
mandos_context *mc = userdata;
551
661
assert(r); /* Spurious warning */
552
662
556
666
switch (event) {
557
667
default:
558
668
case AVAHI_RESOLVER_FAILURE:
559
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
560
" type '%s' in domain '%s': %s\n", name, type, domain,
669
fprintf(stderr, "(Avahi Resolver) Failed to resolve service '%s'"
670
" of type '%s' in domain '%s': %s\n", name, type, domain,
561
671
avahi_strerror(avahi_server_errno(mc->server)));
562
672
break;
563
673
566
676
char ip[AVAHI_ADDRESS_STR_MAX];
567
677
avahi_address_snprint(ip, sizeof(ip), address);
568
678
if(debug){
569
fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
570
" port %d\n", name, host_name, ip, port);
679
fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %"
680
PRIu16 ") on port %d\n", name, host_name, ip,
681
interface, port);
571
682
}
572
683
int ret = start_mandos_communication(ip, port, interface, mc);
573
684
if (ret == 0){
574
exit(EXIT_SUCCESS);
685
avahi_simple_poll_quit(mc->simple_poll);
575
686
}
576
687
}
577
688
}
585
696
const char *name,
586
697
const char *type,
587
698
const char *domain,
588
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
699
AVAHI_GCC_UNUSED AvahiLookupResultFlags
700
flags,
589
701
void* userdata) {
590
702
mandos_context *mc = userdata;
591
703
assert(b); /* Spurious warning */
597
709
default:
598
710
case AVAHI_BROWSER_FAILURE:
599
711
600
fprintf(stderr, "(Browser) %s\n",
712
fprintf(stderr, "(Avahi browser) %s\n",
601
713
avahi_strerror(avahi_server_errno(mc->server)));
602
714
avahi_simple_poll_quit(mc->simple_poll);
603
715
return;
604
716
605
717
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. */
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. */
610
722
611
if (!(avahi_s_service_resolver_new(mc->server, interface, protocol, name,
612
type, domain,
723
if (!(avahi_s_service_resolver_new(mc->server, interface,
724
protocol, name, type, domain,
613
725
AVAHI_PROTO_INET6, 0,
614
726
resolve_callback, mc)))
615
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
616
avahi_strerror(avahi_server_errno(mc->server)));
727
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
728
name, avahi_strerror(avahi_server_errno(mc->server)));
617
729
break;
618
730
619
731
case AVAHI_BROWSER_REMOVE:
621
733
622
734
case AVAHI_BROWSER_ALL_FOR_NOW:
623
735
case AVAHI_BROWSER_CACHE_EXHAUSTED:
736
if(debug){
737
fprintf(stderr, "No Mandos server found, still searching...\n");
738
}
624
739
break;
625
740
}
626
741
}
646
761
}
647
762
648
763
649
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
650
AvahiServerConfig config;
764
int main(int argc, char *argv[]){
651
765
AvahiSServiceBrowser *sb = NULL;
652
766
int error;
653
767
int ret;
654
int debug_int;
655
int returncode = EXIT_SUCCESS;
768
int exitcode = EXIT_SUCCESS;
656
769
const char *interface = "eth0";
657
770
struct ifreq network;
658
771
int sd;
772
uid_t uid;
773
gid_t gid;
659
774
char *connect_to = NULL;
660
775
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
776
const char *pubkeyfile = "pubkey.txt";
777
const char *seckeyfile = "seckey.txt";
661
778
mandos_context mc = { .simple_poll = NULL, .server = NULL,
662
779
.dh_bits = 1024, .priority = "SECURE256"};
780
bool gnutls_initalized = false;
663
781
664
debug_int = debug ? 1 : 0;
665
while (true){
666
struct option long_options[] = {
667
{"debug", no_argument, &debug_int, 1},
668
{"connect", required_argument, NULL, 'c'},
669
{"interface", required_argument, NULL, 'i'},
670
{"keydir", required_argument, NULL, 'd'},
671
{"seckey", required_argument, NULL, 's'},
672
{"pubkey", required_argument, NULL, 'p'},
673
{"dh-bits", required_argument, NULL, 'D'},
674
{"priority", required_argument, NULL, 'P'},
675
{0, 0, 0, 0} };
676
677
int option_index = 0;
678
ret = getopt_long (argc, argv, "i:", long_options,
679
&option_index);
680
681
if (ret == -1){
682
break;
683
}
684
685
switch(ret){
686
case 0:
687
break;
688
case 'i':
689
interface = optarg;
690
break;
691
case 'c':
692
connect_to = optarg;
693
break;
694
case 'd':
695
keydir = optarg;
696
break;
697
case 'p':
698
pubkeyfile = optarg;
699
break;
700
case 's':
701
seckeyfile = optarg;
702
break;
703
case 'D':
704
errno = 0;
705
mc.dh_bits = (unsigned int) strtol(optarg, NULL, 10);
706
if (errno){
707
perror("strtol");
708
exit(EXIT_FAILURE);
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:
841
errno = 0;
842
mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
843
if (errno){
844
perror("strtol");
845
exit(EXIT_FAILURE);
846
}
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;
709
857
}
710
break;
711
case 'P':
712
mc.priority = optarg;
713
break;
714
case '?':
715
default:
716
exit(EXIT_FAILURE);
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;
717
870
}
718
871
}
719
debug = debug_int ? true : false;
720
872
721
873
pubkeyfile = combinepath(keydir, pubkeyfile);
722
874
if (pubkeyfile == NULL){
723
875
perror("combinepath");
724
returncode = EXIT_FAILURE;
725
goto exit;
876
exitcode = EXIT_FAILURE;
877
goto end;
726
878
}
727
879
728
880
seckeyfile = combinepath(keydir, seckeyfile);
729
881
if (seckeyfile == NULL){
730
882
perror("combinepath");
731
goto exit;
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");
732
934
}
733
935
734
936
if_index = (AvahiIfIndex) if_nametoindex(interface);
743
945
char *address = strrchr(connect_to, ':');
744
946
if(address == NULL){
745
947
fprintf(stderr, "No colon in address\n");
746
exit(EXIT_FAILURE);
948
exitcode = EXIT_FAILURE;
949
goto end;
747
950
}
748
951
errno = 0;
749
952
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
750
953
if(errno){
751
954
perror("Bad port number");
752
exit(EXIT_FAILURE);
955
exitcode = EXIT_FAILURE;
956
goto end;
753
957
}
754
958
*address = '\0';
755
959
address = connect_to;
756
960
ret = start_mandos_communication(address, port, if_index, &mc);
757
961
if(ret < 0){
758
exit(EXIT_FAILURE);
962
exitcode = EXIT_FAILURE;
759
963
} else {
760
exit(EXIT_SUCCESS);
761
}
762
}
763
764
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
765
if(sd < 0) {
766
perror("socket");
767
returncode = EXIT_FAILURE;
768
goto exit;
769
}
770
strcpy(network.ifr_name, interface); /* Spurious warning */
771
ret = ioctl(sd, SIOCGIFFLAGS, &network);
772
if(ret == -1){
773
774
perror("ioctl SIOCGIFFLAGS");
775
returncode = EXIT_FAILURE;
776
goto exit;
777
}
778
if((network.ifr_flags & IFF_UP) == 0){
779
network.ifr_flags |= IFF_UP;
780
ret = ioctl(sd, SIOCSIFFLAGS, &network);
781
if(ret == -1){
782
perror("ioctl SIOCSIFFLAGS");
783
returncode = EXIT_FAILURE;
784
goto exit;
785
}
786
}
787
close(sd);
964
exitcode = EXIT_SUCCESS;
965
}
966
goto end;
967
}
788
968
789
969
if (not debug){
790
970
avahi_set_log_function(empty_log);
791
971
}
792
972
793
/* Initialize the psuedo-RNG */
973
/* Initialize the pseudo-RNG for Avahi */
794
974
srand((unsigned int) time(NULL));
795
796
/* Allocate main loop object */
797
if (!(mc.simple_poll = avahi_simple_poll_new())) {
798
fprintf(stderr, "Failed to create simple poll object.\n");
799
returncode = EXIT_FAILURE;
800
goto exit;
801
}
802
803
/* Do not publish any local records */
804
avahi_server_config_init(&config);
805
config.publish_hinfo = 0;
806
config.publish_addresses = 0;
807
config.publish_workstation = 0;
808
config.publish_domain = 0;
809
810
/* Allocate a new server */
811
mc.server=avahi_server_new(avahi_simple_poll_get(mc.simple_poll),
812
&config, NULL, NULL, &error);
813
814
/* Free the configuration data */
815
avahi_server_config_free(&config);
816
817
/* Check if creating the server object succeeded */
818
if (!mc.server) {
819
fprintf(stderr, "Failed to create server: %s\n",
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",
820
1006
avahi_strerror(error));
821
returncode = EXIT_FAILURE;
822
goto exit;
1007
exitcode = EXIT_FAILURE;
1008
goto end;
823
1009
}
824
1010
825
/* Create the service browser */
1011
/* Create the Avahi service browser */
826
1012
sb = avahi_s_service_browser_new(mc.server, if_index,
827
1013
AVAHI_PROTO_INET6,
828
1014
"_mandos._tcp", NULL, 0,
829
1015
browse_callback, &mc);
830
if (!sb) {
1016
if (sb == NULL) {
831
1017
fprintf(stderr, "Failed to create service browser: %s\n",
832
1018
avahi_strerror(avahi_server_errno(mc.server)));
833
returncode = EXIT_FAILURE;
834
goto exit;
1019
exitcode = EXIT_FAILURE;
1020
goto end;
835
1021
}
836
1022
837
1023
/* Run the main loop */
838
1024
839
1025
if (debug){
840
fprintf(stderr, "Starting avahi loop search\n");
1026
fprintf(stderr, "Starting Avahi loop search\n");
841
1027
}
842
1028
843
1029
avahi_simple_poll_loop(mc.simple_poll);
844
1030
845
exit:
1031
end:
846
1032
847
1033
if (debug){
848
1034
fprintf(stderr, "%s exiting\n", argv[0]);
849
1035
}
850
1036
851
1037
/* Cleanup things */
852
if (sb)
1038
if (sb != NULL)
853
1039
avahi_s_service_browser_free(sb);
854
1040
855
if (mc.server)
1041
if (mc.server != NULL)
856
1042
avahi_server_free(mc.server);
857
1043
858
if (mc.simple_poll)
1044
if (mc.simple_poll != NULL)
859
1045
avahi_simple_poll_free(mc.simple_poll);
860
1046
free(pubkeyfile);
861
1047
free(seckeyfile);
1048
1049
if (gnutls_initalized){
1050
gnutls_certificate_free_credentials(mc.cred);
1051
gnutls_global_deinit ();
1052
}
862
1053
863
return returncode;
1054
return exitcode;
864
1055
}
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0