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/password-request.c
- browse files at revision 24.1.51
- compare with another revision
- download diff
- download tarball
- view history from revision 24.1.51
- Committer: Björn Påhlsson
- Date: 2008-08-15 20:17:32 UTC
- mto: (24.1.154 mandos) (237.4.3 mandos-release)
- mto: This revision was merged to the branch mainline in revision 77.
- Revision ID: belorn@braxen-20080815201732-b7uux3yqs05b3fy9
Added configuration files support for mandos-client
Removed plus argument support for mandos-client
Removed plus argument support for mandos-client
- files added:
- COPYING
- 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
#define DH_BITS 1024
73
74
static const char *certdir = "/conf/conf.d/mandos";
75
static const char *certfile = "openpgp-client.txt";
76
static const char *certkey = "openpgp-client-key.txt";
77
98
78
99
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>";
79
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){
258
const char *err;
315
static int init_gnutls_global(mandos_context *mc,
316
const char *pubkeyfile,
317
const char *seckeyfile){
259
318
int ret;
260
319
261
320
if(debug){
262
321
fprintf(stderr, "Initializing GnuTLS\n");
263
322
}
264
265
if ((ret = gnutls_global_init ())
266
!= GNUTLS_E_SUCCESS) {
267
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));
268
328
return -1;
269
329
}
270
330
271
331
if (debug){
332
/* "Use a log level over 10 to enable all debugging options."
333
* - GnuTLS manual
334
*/
272
335
gnutls_global_set_log_level(11);
273
336
gnutls_global_set_log_function(debuggnutls);
274
337
}
275
338
276
/* openpgp credentials */
277
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
278
!= GNUTLS_E_SUCCESS) {
279
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",
280
343
safer_gnutls_strerror(ret));
344
gnutls_global_deinit ();
281
345
return -1;
282
346
}
283
347
284
348
if(debug){
285
349
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
286
" and keyfile %s as GnuTLS credentials\n", certfile,
287
certkey);
350
" and keyfile %s as GnuTLS credentials\n", pubkeyfile,
351
seckeyfile);
288
352
}
289
353
290
354
ret = gnutls_certificate_set_openpgp_key_file
291
(es->cred, certfile, certkey, GNUTLS_OPENPGP_FMT_BASE64);
355
(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);
292
356
if (ret != GNUTLS_E_SUCCESS) {
293
fprintf
294
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
295
" '%s')\n",
296
ret, certfile, certkey);
297
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",
298
361
safer_gnutls_strerror(ret));
299
return -1;
300
}
301
302
//GnuTLS server initialization
303
if ((ret = gnutls_dh_params_init (&es->dh_params))
304
!= GNUTLS_E_SUCCESS) {
305
fprintf (stderr, "Error in dh parameter initialization: %s\n",
306
safer_gnutls_strerror(ret));
307
return -1;
308
}
309
310
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
311
!= GNUTLS_E_SUCCESS) {
312
fprintf (stderr, "Error in prime generation: %s\n",
313
safer_gnutls_strerror(ret));
314
return -1;
315
}
316
317
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
318
319
// GnuTLS session creation
320
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
321
!= 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){
322
397
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
323
398
safer_gnutls_strerror(ret));
324
399
}
325
400
326
if ((ret = gnutls_priority_set_direct (es->session, mc->priority, &err))
327
!= GNUTLS_E_SUCCESS) {
328
fprintf(stderr, "Syntax error at: %s\n", err);
329
fprintf(stderr, "GnuTLS error: %s\n",
330
safer_gnutls_strerror(ret));
331
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
}
332
411
}
333
412
334
if ((ret = gnutls_credentials_set
335
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
336
!= GNUTLS_E_SUCCESS) {
337
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",
338
417
safer_gnutls_strerror(ret));
418
gnutls_deinit (*session);
339
419
return -1;
340
420
}
341
421
342
422
/* ignore client certificate if any. */
343
gnutls_certificate_server_set_request (es->session,
423
gnutls_certificate_server_set_request (*session,
344
424
GNUTLS_CERT_IGNORE);
345
425
346
gnutls_dh_set_prime_bits (es->session, DH_BITS);
426
gnutls_dh_set_prime_bits (*session, mc->dh_bits);
347
427
348
428
return 0;
349
429
}
350
430
431
/* Avahi log function callback */
351
432
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
352
433
__attribute__((unused)) const char *txt){}
353
434
435
/* Called when a Mandos server is found */
354
436
static int start_mandos_communication(const char *ip, uint16_t port,
355
437
AvahiIfIndex if_index,
356
438
mandos_context *mc){
357
439
int ret, tcp_sd;
358
struct sockaddr_in6 to;
359
encrypted_session es;
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];
449
gnutls_session_t session;
450
451
ret = init_gnutls_session (mc, &session);
452
if (ret != 0){
453
return -1;
454
}
368
455
369
456
if(debug){
370
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
371
ip, port);
457
fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
458
"\n", ip, port);
372
459
}
373
460
374
461
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
379
466
380
467
if(debug){
381
468
if(if_indextoname((unsigned int)if_index, interface) == NULL){
382
if(debug){
383
perror("if_indextoname");
384
}
469
perror("if_indextoname");
385
470
return -1;
386
471
}
387
388
472
fprintf(stderr, "Binding to interface %s\n", interface);
389
473
}
390
474
391
475
memset(&to,0,sizeof(to)); /* Spurious warning */
392
to.sin6_family = AF_INET6;
393
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);
394
480
if (ret < 0 ){
395
481
perror("inet_pton");
396
482
return -1;
397
}
483
}
398
484
if(ret == 0){
399
485
fprintf(stderr, "Bad address: %s\n", ip);
400
486
return -1;
401
487
}
402
to.sin6_port = htons(port); /* Spurious warning */
488
to.in6.sin6_port = htons(port); /* Spurious warning */
403
489
404
to.sin6_scope_id = (uint32_t)if_index;
490
to.in6.sin6_scope_id = (uint32_t)if_index;
405
491
406
492
if(debug){
407
fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
408
/* char addrstr[INET6_ADDRSTRLEN]; */
409
/* if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr, */
410
/* sizeof(addrstr)) == NULL){ */
411
/* perror("inet_ntop"); */
412
/* } else { */
413
/* fprintf(stderr, "Really connecting to: %s, port %d\n", */
414
/* addrstr, ntohs(to.sin6_port)); */
415
/* } */
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
}
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 (&es);
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
}
428
534
}
429
430
gnutls_transport_set_ptr (es.session,
431
(gnutls_transport_ptr_t) tcp_sd);
432
535
433
536
if(debug){
434
537
fprintf(stderr, "Establishing TLS session with %s\n", ip);
435
538
}
436
539
437
ret = gnutls_handshake (es.session);
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);
438
545
439
546
if (ret != GNUTLS_E_SUCCESS){
440
547
if(debug){
441
fprintf(stderr, "\n*** Handshake failed ***\n");
548
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
442
549
gnutls_perror (ret);
443
550
}
444
551
retval = -1;
445
goto exit;
552
goto mandos_end;
446
553
}
447
554
448
//Retrieve OpenPGP packet that contains the wanted password
555
/* Read OpenPGP packet that contains the wanted password */
449
556
450
557
if(debug){
451
558
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
453
560
}
454
561
455
562
while(true){
456
if (buffer_length + BUFFER_SIZE > buffer_capacity){
457
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
458
if (buffer == NULL){
459
perror("realloc");
460
goto exit;
461
}
462
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;
463
569
}
464
570
465
ret = gnutls_record_recv
466
(es.session, buffer+buffer_length, BUFFER_SIZE);
571
ret = gnutls_record_recv(session, buffer+buffer_length,
572
BUFFER_SIZE);
467
573
if (ret == 0){
468
574
break;
469
575
}
473
579
case GNUTLS_E_AGAIN:
474
580
break;
475
581
case GNUTLS_E_REHANDSHAKE:
476
ret = gnutls_handshake (es.session);
582
do{
583
ret = gnutls_handshake (session);
584
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
477
585
if (ret < 0){
478
fprintf(stderr, "\n*** Handshake failed ***\n");
586
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
479
587
gnutls_perror (ret);
480
588
retval = -1;
481
goto exit;
589
goto mandos_end;
482
590
}
483
591
break;
484
592
default:
485
593
fprintf(stderr, "Unknown error while reading data from"
486
" encrypted session with mandos server\n");
594
" encrypted session with Mandos server\n");
487
595
retval = -1;
488
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
489
goto exit;
596
gnutls_bye (session, GNUTLS_SHUT_RDWR);
597
goto mandos_end;
490
598
}
491
599
} else {
492
600
buffer_length += (size_t) ret;
493
601
}
494
602
}
495
603
604
if(debug){
605
fprintf(stderr, "Closing TLS session\n");
606
}
607
608
gnutls_bye (session, GNUTLS_SHUT_RDWR);
609
496
610
if (buffer_length > 0){
497
611
decrypted_buffer_size = pgp_packet_decrypt(buffer,
498
612
buffer_length,
499
613
&decrypted_buffer,
500
certdir);
614
keydir);
501
615
if (decrypted_buffer_size >= 0){
616
written = 0;
502
617
while(written < (size_t) decrypted_buffer_size){
503
618
ret = (int)fwrite (decrypted_buffer + written, 1,
504
619
(size_t)decrypted_buffer_size - written,
518
633
retval = -1;
519
634
}
520
635
}
521
522
//shutdown procedure
523
524
if(debug){
525
fprintf(stderr, "Closing TLS session\n");
526
}
527
636
637
/* Shutdown procedure */
638
639
mandos_end:
528
640
free(buffer);
529
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
530
exit:
531
641
close(tcp_sd);
532
gnutls_deinit (es.session);
533
gnutls_certificate_free_credentials (es.cred);
534
gnutls_global_deinit ();
642
gnutls_deinit (session);
535
643
return retval;
536
644
}
537
645
538
static void resolve_callback( AvahiSServiceResolver *r,
539
AvahiIfIndex interface,
540
AVAHI_GCC_UNUSED AvahiProtocol protocol,
541
AvahiResolverEvent event,
542
const char *name,
543
const char *type,
544
const char *domain,
545
const char *host_name,
546
const AvahiAddress *address,
547
uint16_t port,
548
AVAHI_GCC_UNUSED AvahiStringList *txt,
549
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
550
AVAHI_GCC_UNUSED 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) {
551
660
mandos_context *mc = userdata;
552
661
assert(r); /* Spurious warning */
553
662
557
666
switch (event) {
558
667
default:
559
668
case AVAHI_RESOLVER_FAILURE:
560
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
561
" 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,
562
671
avahi_strerror(avahi_server_errno(mc->server)));
563
672
break;
564
673
567
676
char ip[AVAHI_ADDRESS_STR_MAX];
568
677
avahi_address_snprint(ip, sizeof(ip), address);
569
678
if(debug){
570
fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
571
" 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);
572
682
}
573
683
int ret = start_mandos_communication(ip, port, interface, mc);
574
684
if (ret == 0){
575
exit(EXIT_SUCCESS);
685
avahi_simple_poll_quit(mc->simple_poll);
576
686
}
577
687
}
578
688
}
586
696
const char *name,
587
697
const char *type,
588
698
const char *domain,
589
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
699
AVAHI_GCC_UNUSED AvahiLookupResultFlags
700
flags,
590
701
void* userdata) {
591
702
mandos_context *mc = userdata;
592
703
assert(b); /* Spurious warning */
597
708
switch (event) {
598
709
default:
599
710
case AVAHI_BROWSER_FAILURE:
600
601
fprintf(stderr, "(Browser) %s\n",
711
712
fprintf(stderr, "(Avahi browser) %s\n",
602
713
avahi_strerror(avahi_server_errno(mc->server)));
603
714
avahi_simple_poll_quit(mc->simple_poll);
604
715
return;
605
716
606
717
case AVAHI_BROWSER_NEW:
607
/* We ignore the returned resolver object. In the callback
608
function we free it. If the server is terminated before
609
the callback function is called the server will free
610
the resolver for us. */
611
612
if (!(avahi_s_service_resolver_new(mc->server, interface, protocol, name,
613
type, domain,
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,
614
725
AVAHI_PROTO_INET6, 0,
615
726
resolve_callback, mc)))
616
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
617
avahi_strerror(avahi_server_errno(s)));
727
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
728
name, avahi_strerror(avahi_server_errno(mc->server)));
618
729
break;
619
730
620
731
case AVAHI_BROWSER_REMOVE:
621
732
break;
622
733
623
734
case AVAHI_BROWSER_ALL_FOR_NOW:
624
735
case AVAHI_BROWSER_CACHE_EXHAUSTED:
736
if(debug){
737
fprintf(stderr, "No Mandos server found, still searching...\n");
738
}
625
739
break;
626
740
}
627
741
}
636
750
return NULL;
637
751
}
638
752
if(f_len > 0){
639
memcpy(tmp, first, f_len);
753
memcpy(tmp, first, f_len); /* Spurious warning */
640
754
}
641
755
tmp[f_len] = '/';
642
756
if(s_len > 0){
643
memcpy(tmp + f_len + 1, second, s_len);
757
memcpy(tmp + f_len + 1, second, s_len); /* Spurious warning */
644
758
}
645
759
tmp[f_len + 1 + s_len] = '\0';
646
760
return tmp;
647
761
}
648
762
649
763
650
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
651
AvahiServerConfig config;
764
int main(int argc, char *argv[]){
652
765
AvahiSServiceBrowser *sb = NULL;
653
766
int error;
654
767
int ret;
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
.dh_bits = 2048, .priority = "SECURE256"};
779
.dh_bits = 1024, .priority = "SECURE256"};
780
bool gnutls_initalized = false;
663
781
664
while (true){
665
static struct option long_options[] = {
666
{"debug", no_argument, (int *)&debug, 1},
667
{"connect", required_argument, 0, 'C'},
668
{"interface", required_argument, 0, 'i'},
669
{"certdir", required_argument, 0, 'd'},
670
{"certkey", required_argument, 0, 'c'},
671
{"certfile", required_argument, 0, 'k'},
672
{"dh_bits", required_argument, 0, 'D'},
673
{"priority", required_argument, 0, 'p'},
674
{0, 0, 0, 0} };
675
676
int option_index = 0;
677
ret = getopt_long (argc, argv, "i:", long_options,
678
&option_index);
679
680
if (ret == -1){
681
break;
682
}
683
684
switch(ret){
685
case 0:
686
break;
687
case 'i':
688
interface = optarg;
689
break;
690
case 'C':
691
connect_to = optarg;
692
break;
693
case 'd':
694
certdir = optarg;
695
break;
696
case 'c':
697
certfile = optarg;
698
break;
699
case 'k':
700
certkey = optarg;
701
break;
702
case 'D':
703
{
704
long int tmp;
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:
705
841
errno = 0;
706
tmp = strtol(optarg, NULL, 10);
707
if (errno == ERANGE){
842
mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
843
if (errno){
708
844
perror("strtol");
709
845
exit(EXIT_FAILURE);
710
846
}
711
mc.dh_bits = tmp;
712
}
713
break;
714
case 'p':
715
mc.priority = optarg;
716
break;
717
default:
718
exit(EXIT_FAILURE);
719
}
720
}
721
722
certfile = combinepath(certdir, certfile);
723
if (certfile == NULL){
724
perror("combinepath");
725
returncode = EXIT_FAILURE;
726
goto exit;
727
}
728
729
certkey = combinepath(certdir, certkey);
730
if (certkey == NULL){
731
perror("combinepath");
732
returncode = EXIT_FAILURE;
733
goto exit;
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");
734
934
}
735
935
736
936
if_index = (AvahiIfIndex) if_nametoindex(interface);
745
945
char *address = strrchr(connect_to, ':');
746
946
if(address == NULL){
747
947
fprintf(stderr, "No colon in address\n");
748
exit(EXIT_FAILURE);
948
exitcode = EXIT_FAILURE;
949
goto end;
749
950
}
750
951
errno = 0;
751
952
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
752
953
if(errno){
753
954
perror("Bad port number");
754
exit(EXIT_FAILURE);
955
exitcode = EXIT_FAILURE;
956
goto end;
755
957
}
756
958
*address = '\0';
757
959
address = connect_to;
758
ret = start_mandos_communication(address, port, if_index);
960
ret = start_mandos_communication(address, port, if_index, &mc);
759
961
if(ret < 0){
760
exit(EXIT_FAILURE);
962
exitcode = EXIT_FAILURE;
761
963
} else {
762
exit(EXIT_SUCCESS);
763
}
764
}
765
766
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
767
if(sd < 0) {
768
perror("socket");
769
returncode = EXIT_FAILURE;
770
goto exit;
771
}
772
strcpy(network.ifr_name, interface);
773
ret = ioctl(sd, SIOCGIFFLAGS, &network);
774
if(ret == -1){
775
776
perror("ioctl SIOCGIFFLAGS");
777
returncode = EXIT_FAILURE;
778
goto exit;
779
}
780
if((network.ifr_flags & IFF_UP) == 0){
781
network.ifr_flags |= IFF_UP;
782
ret = ioctl(sd, SIOCSIFFLAGS, &network);
783
if(ret == -1){
784
perror("ioctl SIOCSIFFLAGS");
785
returncode = EXIT_FAILURE;
786
goto exit;
787
}
788
}
789
close(sd);
964
exitcode = EXIT_SUCCESS;
965
}
966
goto end;
967
}
790
968
791
969
if (not debug){
792
970
avahi_set_log_function(empty_log);
793
971
}
794
972
795
/* Initialize the psuedo-RNG */
973
/* Initialize the pseudo-RNG for Avahi */
796
974
srand((unsigned int) time(NULL));
797
798
/* Allocate main loop object */
799
if (!(mc.simple_poll = avahi_simple_poll_new())) {
800
fprintf(stderr, "Failed to create simple poll object.\n");
801
returncode = EXIT_FAILURE;
802
goto exit;
803
}
804
805
/* Do not publish any local records */
806
avahi_server_config_init(&config);
807
config.publish_hinfo = 0;
808
config.publish_addresses = 0;
809
config.publish_workstation = 0;
810
config.publish_domain = 0;
811
812
/* Allocate a new server */
813
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
814
&config, NULL, NULL, &error);
815
816
/* Free the configuration data */
817
avahi_server_config_free(&config);
818
819
/* Check if creating the server object succeeded */
820
if (!mc.server) {
821
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",
822
1006
avahi_strerror(error));
823
returncode = EXIT_FAILURE;
824
goto exit;
1007
exitcode = EXIT_FAILURE;
1008
goto end;
825
1009
}
826
1010
827
/* Create the service browser */
1011
/* Create the Avahi service browser */
828
1012
sb = avahi_s_service_browser_new(mc.server, if_index,
829
1013
AVAHI_PROTO_INET6,
830
1014
"_mandos._tcp", NULL, 0,
831
1015
browse_callback, &mc);
832
if (!sb) {
1016
if (sb == NULL) {
833
1017
fprintf(stderr, "Failed to create service browser: %s\n",
834
1018
avahi_strerror(avahi_server_errno(mc.server)));
835
returncode = EXIT_FAILURE;
836
goto exit;
1019
exitcode = EXIT_FAILURE;
1020
goto end;
837
1021
}
838
1022
839
1023
/* Run the main loop */
840
1024
841
1025
if (debug){
842
fprintf(stderr, "Starting avahi loop search\n");
1026
fprintf(stderr, "Starting Avahi loop search\n");
843
1027
}
844
1028
845
avahi_simple_poll_loop(simple_poll);
1029
avahi_simple_poll_loop(mc.simple_poll);
846
1030
847
exit:
1031
end:
848
1032
849
1033
if (debug){
850
1034
fprintf(stderr, "%s exiting\n", argv[0]);
851
1035
}
852
1036
853
1037
/* Cleanup things */
854
if (sb)
1038
if (sb != NULL)
855
1039
avahi_s_service_browser_free(sb);
856
1040
857
if (mc.server)
1041
if (mc.server != NULL)
858
1042
avahi_server_free(mc.server);
859
1043
860
if (simple_poll)
861
avahi_simple_poll_free(simple_poll);
862
free(certfile);
863
free(certkey);
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
}
864
1053
865
return returncode;
1054
return exitcode;
866
1055
}
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0