/mandos/trunk

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

  • Committer: Teddy Hogeborn
  • Date: 2008-08-16 03:29:08 UTC
  • Revision ID: teddy@fukt.bsnet.se-20080816032908-ihw7c05r2mnyk389
Add feature to specify custom environment variables for plugins.

* plugin-runner.c (plugin): New members "environ" and "envc" to
                            contain possible custom environment.
  (getplugin): Return NULL on failure instead of doing exit(); all
               callers changed.
  (add_to_char_array): New helper function for "add_argument" and
                       "add_environment".
  (addargument): Renamed to "add_argument".  Return bool.  Call
                 "add_to_char_array" to actually do things.
  (add_environment): New; analogous to "add_argument".
  (addcustomargument): Renamed to "add_to_argv" to avoid confusion
                       with "add_argument".
  (main): New options "--global-envs" and "--envs-for" to specify
          custom environment for plugins.  Print environment for
          plugins in debug mode.  Use asprintf instead of strcpy and
          strcat.  Use execve() for plugins with custom environments.
          Free environment for plugin when freeing plugin list.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
/*  -*- coding: utf-8 -*- */
2
2
/*
3
 
 * Mandos-client - get and decrypt data from a Mandos server
 
3
 * Mandos client - get and decrypt data from a Mandos server
4
4
 *
5
5
 * This program is partly derived from an example program for an Avahi
6
6
 * service browser, downloaded from
9
9
 * "browse_callback", and parts of "main".
10
10
 * 
11
11
 * Everything else is
12
 
 * Copyright © 2008,2009 Teddy Hogeborn
13
 
 * Copyright © 2008,2009 Björn Påhlsson
 
12
 * Copyright © 2007-2008 Teddy Hogeborn & Björn Påhlsson
14
13
 * 
15
14
 * This program is free software: you can redistribute it and/or
16
15
 * modify it under the terms of the GNU General Public License as
36
35
#define _GNU_SOURCE             /* TEMP_FAILURE_RETRY(), asprintf() */
37
36
 
38
37
#include <stdio.h>              /* fprintf(), stderr, fwrite(),
39
 
                                   stdout, ferror(), sscanf(),
40
 
                                   remove() */
 
38
                                   stdout, ferror() */
41
39
#include <stdint.h>             /* uint16_t, uint32_t */
42
40
#include <stddef.h>             /* NULL, size_t, ssize_t */
43
41
#include <stdlib.h>             /* free(), EXIT_SUCCESS, EXIT_FAILURE,
44
42
                                   srand() */
45
 
#include <stdbool.h>            /* bool, false, true */
 
43
#include <stdbool.h>            /* bool, true */
46
44
#include <string.h>             /* memset(), strcmp(), strlen(),
47
45
                                   strerror(), asprintf(), strcpy() */
48
 
#include <sys/ioctl.h>          /* ioctl */
 
46
#include <sys/ioctl.h>          /* ioctl */
49
47
#include <sys/types.h>          /* socket(), inet_pton(), sockaddr,
50
48
                                   sockaddr_in6, PF_INET6,
51
 
                                   SOCK_STREAM, uid_t, gid_t, open(),
52
 
                                   opendir(), DIR */
53
 
#include <sys/stat.h>           /* open() */
 
49
                                   SOCK_STREAM, INET6_ADDRSTRLEN,
 
50
                                   uid_t, gid_t */
 
51
#include <inttypes.h>           /* PRIu16 */
54
52
#include <sys/socket.h>         /* socket(), struct sockaddr_in6,
55
 
                                   inet_pton(), connect() */
56
 
#include <fcntl.h>              /* open() */
57
 
#include <dirent.h>             /* opendir(), struct dirent, readdir()
58
 
                                 */
59
 
#include <inttypes.h>           /* PRIu16, intmax_t, SCNdMAX */
 
53
                                   struct in6_addr, inet_pton(),
 
54
                                   connect() */
60
55
#include <assert.h>             /* assert() */
61
56
#include <errno.h>              /* perror(), errno */
62
 
#include <time.h>               /* nanosleep(), time() */
 
57
#include <time.h>               /* time() */
63
58
#include <net/if.h>             /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
64
59
                                   SIOCSIFFLAGS, if_indextoname(),
65
60
                                   if_nametoindex(), IF_NAMESIZE */
66
 
#include <netinet/in.h>         /* IN6_IS_ADDR_LINKLOCAL,
67
 
                                   INET_ADDRSTRLEN, INET6_ADDRSTRLEN
68
 
                                */
69
61
#include <unistd.h>             /* close(), SEEK_SET, off_t, write(),
70
62
                                   getuid(), getgid(), setuid(),
71
63
                                   setgid() */
 
64
#include <netinet/in.h>
72
65
#include <arpa/inet.h>          /* inet_pton(), htons */
73
 
#include <iso646.h>             /* not, or, and */
 
66
#include <iso646.h>             /* not, and */
74
67
#include <argp.h>               /* struct argp_option, error_t, struct
75
68
                                   argp_state, struct argp,
76
69
                                   argp_parse(), ARGP_KEY_ARG,
77
70
                                   ARGP_KEY_END, ARGP_ERR_UNKNOWN */
78
 
#ifdef __linux__
79
 
#include <sys/klog.h>           /* klogctl() */
80
 
#endif
81
71
 
82
72
/* Avahi */
83
73
/* All Avahi types, constants and functions
96
86
                                   gnutls_*
97
87
                                   init_gnutls_session(),
98
88
                                   GNUTLS_* */
99
 
#include <gnutls/openpgp.h>
100
 
                          /* gnutls_certificate_set_openpgp_key_file(),
 
89
#include <gnutls/openpgp.h>     /* gnutls_certificate_set_openpgp_key_file(),
101
90
                                   GNUTLS_OPENPGP_FMT_BASE64 */
102
91
 
103
92
/* GPGME */
109
98
 
110
99
#define BUFFER_SIZE 256
111
100
 
112
 
#define PATHDIR "/conf/conf.d/mandos"
113
 
#define SECKEY "seckey.txt"
114
 
#define PUBKEY "pubkey.txt"
115
 
 
116
101
bool debug = false;
 
102
static const char *keydir = "/conf/conf.d/mandos";
117
103
static const char mandos_protocol_version[] = "1";
118
 
const char *argp_program_version = "mandos-client " VERSION;
 
104
const char *argp_program_version = "password-request 1.0";
119
105
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
120
106
 
121
107
/* Used for passing in values through the Avahi callback functions */
126
112
  unsigned int dh_bits;
127
113
  gnutls_dh_params_t dh_params;
128
114
  const char *priority;
129
 
  gpgme_ctx_t ctx;
130
115
} mandos_context;
131
116
 
132
117
/*
136
121
 */
137
122
size_t adjustbuffer(char **buffer, size_t buffer_length,
138
123
                  size_t buffer_capacity){
139
 
  if(buffer_length + BUFFER_SIZE > buffer_capacity){
 
124
  if (buffer_length + BUFFER_SIZE > buffer_capacity){
140
125
    *buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
141
 
    if(buffer == NULL){
 
126
    if (buffer == NULL){
142
127
      return 0;
143
128
    }
144
129
    buffer_capacity += BUFFER_SIZE;
147
132
}
148
133
 
149
134
/* 
150
 
 * Initialize GPGME.
 
135
 * Decrypt OpenPGP data using keyrings in HOMEDIR.
 
136
 * Returns -1 on error
151
137
 */
152
 
static bool init_gpgme(mandos_context *mc, const char *seckey,
153
 
                       const char *pubkey, const char *tempdir){
154
 
  int ret;
 
138
static ssize_t pgp_packet_decrypt (const char *cryptotext,
 
139
                                   size_t crypto_size,
 
140
                                   char **plaintext,
 
141
                                   const char *homedir){
 
142
  gpgme_data_t dh_crypto, dh_plain;
 
143
  gpgme_ctx_t ctx;
155
144
  gpgme_error_t rc;
 
145
  ssize_t ret;
 
146
  size_t plaintext_capacity = 0;
 
147
  ssize_t plaintext_length = 0;
156
148
  gpgme_engine_info_t engine_info;
157
149
  
158
 
  
159
 
  /*
160
 
   * Helper function to insert pub and seckey to the engine keyring.
161
 
   */
162
 
  bool import_key(const char *filename){
163
 
    int fd;
164
 
    gpgme_data_t pgp_data;
165
 
    
166
 
    fd = (int)TEMP_FAILURE_RETRY(open(filename, O_RDONLY));
167
 
    if(fd == -1){
168
 
      perror("open");
169
 
      return false;
170
 
    }
171
 
    
172
 
    rc = gpgme_data_new_from_fd(&pgp_data, fd);
173
 
    if(rc != GPG_ERR_NO_ERROR){
174
 
      fprintf(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
175
 
              gpgme_strsource(rc), gpgme_strerror(rc));
176
 
      return false;
177
 
    }
178
 
    
179
 
    rc = gpgme_op_import(mc->ctx, pgp_data);
180
 
    if(rc != GPG_ERR_NO_ERROR){
181
 
      fprintf(stderr, "bad gpgme_op_import: %s: %s\n",
182
 
              gpgme_strsource(rc), gpgme_strerror(rc));
183
 
      return false;
184
 
    }
185
 
    
186
 
    ret = (int)TEMP_FAILURE_RETRY(close(fd));
187
 
    if(ret == -1){
188
 
      perror("close");
189
 
    }
190
 
    gpgme_data_release(pgp_data);
191
 
    return true;
192
 
  }
193
 
  
194
 
  if(debug){
195
 
    fprintf(stderr, "Initialize gpgme\n");
 
150
  if (debug){
 
151
    fprintf(stderr, "Trying to decrypt OpenPGP data\n");
196
152
  }
197
153
  
198
154
  /* Init GPGME */
199
155
  gpgme_check_version(NULL);
200
156
  rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);
201
 
  if(rc != GPG_ERR_NO_ERROR){
 
157
  if (rc != GPG_ERR_NO_ERROR){
202
158
    fprintf(stderr, "bad gpgme_engine_check_version: %s: %s\n",
203
159
            gpgme_strsource(rc), gpgme_strerror(rc));
204
 
    return false;
 
160
    return -1;
205
161
  }
206
162
  
207
 
    /* Set GPGME home directory for the OpenPGP engine only */
208
 
  rc = gpgme_get_engine_info(&engine_info);
209
 
  if(rc != GPG_ERR_NO_ERROR){
 
163
  /* Set GPGME home directory for the OpenPGP engine only */
 
164
  rc = gpgme_get_engine_info (&engine_info);
 
165
  if (rc != GPG_ERR_NO_ERROR){
210
166
    fprintf(stderr, "bad gpgme_get_engine_info: %s: %s\n",
211
167
            gpgme_strsource(rc), gpgme_strerror(rc));
212
 
    return false;
 
168
    return -1;
213
169
  }
214
170
  while(engine_info != NULL){
215
171
    if(engine_info->protocol == GPGME_PROTOCOL_OpenPGP){
216
172
      gpgme_set_engine_info(GPGME_PROTOCOL_OpenPGP,
217
 
                            engine_info->file_name, tempdir);
 
173
                            engine_info->file_name, homedir);
218
174
      break;
219
175
    }
220
176
    engine_info = engine_info->next;
221
177
  }
222
178
  if(engine_info == NULL){
223
 
    fprintf(stderr, "Could not set GPGME home dir to %s\n", tempdir);
224
 
    return false;
225
 
  }
226
 
  
227
 
  /* Create new GPGME "context" */
228
 
  rc = gpgme_new(&(mc->ctx));
229
 
  if(rc != GPG_ERR_NO_ERROR){
230
 
    fprintf(stderr, "bad gpgme_new: %s: %s\n",
231
 
            gpgme_strsource(rc), gpgme_strerror(rc));
232
 
    return false;
233
 
  }
234
 
  
235
 
  if(not import_key(pubkey) or not import_key(seckey)){
236
 
    return false;
237
 
  }
238
 
  
239
 
  return true; 
240
 
}
241
 
 
242
 
/* 
243
 
 * Decrypt OpenPGP data.
244
 
 * Returns -1 on error
245
 
 */
246
 
static ssize_t pgp_packet_decrypt(const mandos_context *mc,
247
 
                                  const char *cryptotext,
248
 
                                  size_t crypto_size,
249
 
                                  char **plaintext){
250
 
  gpgme_data_t dh_crypto, dh_plain;
251
 
  gpgme_error_t rc;
252
 
  ssize_t ret;
253
 
  size_t plaintext_capacity = 0;
254
 
  ssize_t plaintext_length = 0;
255
 
  
256
 
  if(debug){
257
 
    fprintf(stderr, "Trying to decrypt OpenPGP data\n");
 
179
    fprintf(stderr, "Could not set GPGME home dir to %s\n", homedir);
 
180
    return -1;
258
181
  }
259
182
  
260
183
  /* Create new GPGME data buffer from memory cryptotext */
261
184
  rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,
262
185
                               0);
263
 
  if(rc != GPG_ERR_NO_ERROR){
 
186
  if (rc != GPG_ERR_NO_ERROR){
264
187
    fprintf(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
265
188
            gpgme_strsource(rc), gpgme_strerror(rc));
266
189
    return -1;
268
191
  
269
192
  /* Create new empty GPGME data buffer for the plaintext */
270
193
  rc = gpgme_data_new(&dh_plain);
271
 
  if(rc != GPG_ERR_NO_ERROR){
 
194
  if (rc != GPG_ERR_NO_ERROR){
272
195
    fprintf(stderr, "bad gpgme_data_new: %s: %s\n",
273
196
            gpgme_strsource(rc), gpgme_strerror(rc));
274
197
    gpgme_data_release(dh_crypto);
275
198
    return -1;
276
199
  }
277
200
  
 
201
  /* Create new GPGME "context" */
 
202
  rc = gpgme_new(&ctx);
 
203
  if (rc != GPG_ERR_NO_ERROR){
 
204
    fprintf(stderr, "bad gpgme_new: %s: %s\n",
 
205
            gpgme_strsource(rc), gpgme_strerror(rc));
 
206
    plaintext_length = -1;
 
207
    goto decrypt_end;
 
208
  }
 
209
  
278
210
  /* Decrypt data from the cryptotext data buffer to the plaintext
279
211
     data buffer */
280
 
  rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
281
 
  if(rc != GPG_ERR_NO_ERROR){
 
212
  rc = gpgme_op_decrypt(ctx, dh_crypto, dh_plain);
 
213
  if (rc != GPG_ERR_NO_ERROR){
282
214
    fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
283
215
            gpgme_strsource(rc), gpgme_strerror(rc));
284
216
    plaintext_length = -1;
285
 
    if(debug){
286
 
      gpgme_decrypt_result_t result;
287
 
      result = gpgme_op_decrypt_result(mc->ctx);
288
 
      if(result == NULL){
289
 
        fprintf(stderr, "gpgme_op_decrypt_result failed\n");
290
 
      } else {
291
 
        fprintf(stderr, "Unsupported algorithm: %s\n",
292
 
                result->unsupported_algorithm);
293
 
        fprintf(stderr, "Wrong key usage: %u\n",
294
 
                result->wrong_key_usage);
295
 
        if(result->file_name != NULL){
296
 
          fprintf(stderr, "File name: %s\n", result->file_name);
297
 
        }
298
 
        gpgme_recipient_t recipient;
299
 
        recipient = result->recipients;
300
 
        if(recipient){
301
 
          while(recipient != NULL){
302
 
            fprintf(stderr, "Public key algorithm: %s\n",
303
 
                    gpgme_pubkey_algo_name(recipient->pubkey_algo));
304
 
            fprintf(stderr, "Key ID: %s\n", recipient->keyid);
305
 
            fprintf(stderr, "Secret key available: %s\n",
306
 
                    recipient->status == GPG_ERR_NO_SECKEY
307
 
                    ? "No" : "Yes");
308
 
            recipient = recipient->next;
309
 
          }
310
 
        }
311
 
      }
312
 
    }
313
217
    goto decrypt_end;
314
218
  }
315
219
  
317
221
    fprintf(stderr, "Decryption of OpenPGP data succeeded\n");
318
222
  }
319
223
  
 
224
  if (debug){
 
225
    gpgme_decrypt_result_t result;
 
226
    result = gpgme_op_decrypt_result(ctx);
 
227
    if (result == NULL){
 
228
      fprintf(stderr, "gpgme_op_decrypt_result failed\n");
 
229
    } else {
 
230
      fprintf(stderr, "Unsupported algorithm: %s\n",
 
231
              result->unsupported_algorithm);
 
232
      fprintf(stderr, "Wrong key usage: %u\n",
 
233
              result->wrong_key_usage);
 
234
      if(result->file_name != NULL){
 
235
        fprintf(stderr, "File name: %s\n", result->file_name);
 
236
      }
 
237
      gpgme_recipient_t recipient;
 
238
      recipient = result->recipients;
 
239
      if(recipient){
 
240
        while(recipient != NULL){
 
241
          fprintf(stderr, "Public key algorithm: %s\n",
 
242
                  gpgme_pubkey_algo_name(recipient->pubkey_algo));
 
243
          fprintf(stderr, "Key ID: %s\n", recipient->keyid);
 
244
          fprintf(stderr, "Secret key available: %s\n",
 
245
                  recipient->status == GPG_ERR_NO_SECKEY
 
246
                  ? "No" : "Yes");
 
247
          recipient = recipient->next;
 
248
        }
 
249
      }
 
250
    }
 
251
  }
 
252
  
320
253
  /* Seek back to the beginning of the GPGME plaintext data buffer */
321
 
  if(gpgme_data_seek(dh_plain, (off_t)0, SEEK_SET) == -1){
322
 
    perror("gpgme_data_seek");
 
254
  if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){
 
255
    perror("pgpme_data_seek");
323
256
    plaintext_length = -1;
324
257
    goto decrypt_end;
325
258
  }
329
262
    plaintext_capacity = adjustbuffer(plaintext,
330
263
                                      (size_t)plaintext_length,
331
264
                                      plaintext_capacity);
332
 
    if(plaintext_capacity == 0){
 
265
    if (plaintext_capacity == 0){
333
266
        perror("adjustbuffer");
334
267
        plaintext_length = -1;
335
268
        goto decrypt_end;
338
271
    ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
339
272
                          BUFFER_SIZE);
340
273
    /* Print the data, if any */
341
 
    if(ret == 0){
 
274
    if (ret == 0){
342
275
      /* EOF */
343
276
      break;
344
277
    }
349
282
    }
350
283
    plaintext_length += ret;
351
284
  }
352
 
  
 
285
 
353
286
  if(debug){
354
287
    fprintf(stderr, "Decrypted password is: ");
355
288
    for(ssize_t i = 0; i < plaintext_length; i++){
368
301
  return plaintext_length;
369
302
}
370
303
 
371
 
static const char * safer_gnutls_strerror(int value){
372
 
  const char *ret = gnutls_strerror(value); /* Spurious warning from
373
 
                                               -Wunreachable-code */
374
 
  if(ret == NULL)
 
304
static const char * safer_gnutls_strerror (int value) {
 
305
  const char *ret = gnutls_strerror (value);
 
306
  if (ret == NULL)
375
307
    ret = "(unknown)";
376
308
  return ret;
377
309
}
392
324
  }
393
325
  
394
326
  ret = gnutls_global_init();
395
 
  if(ret != GNUTLS_E_SUCCESS){
396
 
    fprintf(stderr, "GnuTLS global_init: %s\n",
397
 
            safer_gnutls_strerror(ret));
 
327
  if (ret != GNUTLS_E_SUCCESS) {
 
328
    fprintf (stderr, "GnuTLS global_init: %s\n",
 
329
             safer_gnutls_strerror(ret));
398
330
    return -1;
399
331
  }
400
332
  
401
 
  if(debug){
 
333
  if (debug){
402
334
    /* "Use a log level over 10 to enable all debugging options."
403
335
     * - GnuTLS manual
404
336
     */
408
340
  
409
341
  /* OpenPGP credentials */
410
342
  gnutls_certificate_allocate_credentials(&mc->cred);
411
 
  if(ret != GNUTLS_E_SUCCESS){
412
 
    fprintf(stderr, "GnuTLS memory error: %s\n", /* Spurious warning
413
 
                                                    from
414
 
                                                    -Wunreachable-code
415
 
                                                 */
416
 
            safer_gnutls_strerror(ret));
417
 
    gnutls_global_deinit();
 
343
  if (ret != GNUTLS_E_SUCCESS){
 
344
    fprintf (stderr, "GnuTLS memory error: %s\n",
 
345
             safer_gnutls_strerror(ret));
 
346
    gnutls_global_deinit ();
418
347
    return -1;
419
348
  }
420
349
  
421
350
  if(debug){
422
 
    fprintf(stderr, "Attempting to use OpenPGP public key %s and"
423
 
            " secret key %s as GnuTLS credentials\n", pubkeyfilename,
 
351
    fprintf(stderr, "Attempting to use OpenPGP certificate %s"
 
352
            " and keyfile %s as GnuTLS credentials\n", pubkeyfilename,
424
353
            seckeyfilename);
425
354
  }
426
355
  
427
356
  ret = gnutls_certificate_set_openpgp_key_file
428
357
    (mc->cred, pubkeyfilename, seckeyfilename,
429
358
     GNUTLS_OPENPGP_FMT_BASE64);
430
 
  if(ret != GNUTLS_E_SUCCESS){
 
359
  if (ret != GNUTLS_E_SUCCESS) {
431
360
    fprintf(stderr,
432
361
            "Error[%d] while reading the OpenPGP key pair ('%s',"
433
362
            " '%s')\n", ret, pubkeyfilename, seckeyfilename);
434
 
    fprintf(stderr, "The GnuTLS error is: %s\n",
 
363
    fprintf(stdout, "The GnuTLS error is: %s\n",
435
364
            safer_gnutls_strerror(ret));
436
365
    goto globalfail;
437
366
  }
438
367
  
439
368
  /* GnuTLS server initialization */
440
369
  ret = gnutls_dh_params_init(&mc->dh_params);
441
 
  if(ret != GNUTLS_E_SUCCESS){
442
 
    fprintf(stderr, "Error in GnuTLS DH parameter initialization:"
443
 
            " %s\n", safer_gnutls_strerror(ret));
 
370
  if (ret != GNUTLS_E_SUCCESS) {
 
371
    fprintf (stderr, "Error in GnuTLS DH parameter initialization:"
 
372
             " %s\n", safer_gnutls_strerror(ret));
444
373
    goto globalfail;
445
374
  }
446
375
  ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
447
 
  if(ret != GNUTLS_E_SUCCESS){
448
 
    fprintf(stderr, "Error in GnuTLS prime generation: %s\n",
449
 
            safer_gnutls_strerror(ret));
 
376
  if (ret != GNUTLS_E_SUCCESS) {
 
377
    fprintf (stderr, "Error in GnuTLS prime generation: %s\n",
 
378
             safer_gnutls_strerror(ret));
450
379
    goto globalfail;
451
380
  }
452
381
  
453
382
  gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
454
 
  
 
383
 
455
384
  return 0;
456
 
  
 
385
 
457
386
 globalfail:
458
 
  
 
387
 
459
388
  gnutls_certificate_free_credentials(mc->cred);
460
389
  gnutls_global_deinit();
461
 
  gnutls_dh_params_deinit(mc->dh_params);
462
390
  return -1;
 
391
 
463
392
}
464
393
 
465
394
static int init_gnutls_session(mandos_context *mc,
467
396
  int ret;
468
397
  /* GnuTLS session creation */
469
398
  ret = gnutls_init(session, GNUTLS_SERVER);
470
 
  if(ret != GNUTLS_E_SUCCESS){
 
399
  if (ret != GNUTLS_E_SUCCESS){
471
400
    fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
472
401
            safer_gnutls_strerror(ret));
473
402
  }
475
404
  {
476
405
    const char *err;
477
406
    ret = gnutls_priority_set_direct(*session, mc->priority, &err);
478
 
    if(ret != GNUTLS_E_SUCCESS){
 
407
    if (ret != GNUTLS_E_SUCCESS) {
479
408
      fprintf(stderr, "Syntax error at: %s\n", err);
480
409
      fprintf(stderr, "GnuTLS error: %s\n",
481
410
              safer_gnutls_strerror(ret));
482
 
      gnutls_deinit(*session);
 
411
      gnutls_deinit (*session);
483
412
      return -1;
484
413
    }
485
414
  }
486
415
  
487
416
  ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
488
417
                               mc->cred);
489
 
  if(ret != GNUTLS_E_SUCCESS){
 
418
  if (ret != GNUTLS_E_SUCCESS) {
490
419
    fprintf(stderr, "Error setting GnuTLS credentials: %s\n",
491
420
            safer_gnutls_strerror(ret));
492
 
    gnutls_deinit(*session);
 
421
    gnutls_deinit (*session);
493
422
    return -1;
494
423
  }
495
424
  
496
425
  /* ignore client certificate if any. */
497
 
  gnutls_certificate_server_set_request(*session,
498
 
                                        GNUTLS_CERT_IGNORE);
 
426
  gnutls_certificate_server_set_request (*session,
 
427
                                         GNUTLS_CERT_IGNORE);
499
428
  
500
 
  gnutls_dh_set_prime_bits(*session, mc->dh_bits);
 
429
  gnutls_dh_set_prime_bits (*session, mc->dh_bits);
501
430
  
502
431
  return 0;
503
432
}
509
438
/* Called when a Mandos server is found */
510
439
static int start_mandos_communication(const char *ip, uint16_t port,
511
440
                                      AvahiIfIndex if_index,
512
 
                                      mandos_context *mc, int af){
 
441
                                      mandos_context *mc){
513
442
  int ret, tcp_sd;
514
 
  ssize_t sret;
515
 
  union {
516
 
    struct sockaddr_in in;
517
 
    struct sockaddr_in6 in6;
518
 
  } to;
 
443
  union { struct sockaddr in; struct sockaddr_in6 in6; } to;
519
444
  char *buffer = NULL;
520
445
  char *decrypted_buffer;
521
446
  size_t buffer_length = 0;
523
448
  ssize_t decrypted_buffer_size;
524
449
  size_t written;
525
450
  int retval = 0;
 
451
  char interface[IF_NAMESIZE];
526
452
  gnutls_session_t session;
527
 
  int pf;                       /* Protocol family */
528
 
  
529
 
  switch(af){
530
 
  case AF_INET6:
531
 
    pf = PF_INET6;
532
 
    break;
533
 
  case AF_INET:
534
 
    pf = PF_INET;
535
 
    break;
536
 
  default:
537
 
    fprintf(stderr, "Bad address family: %d\n", af);
538
 
    return -1;
539
 
  }
540
 
  
541
 
  ret = init_gnutls_session(mc, &session);
542
 
  if(ret != 0){
 
453
  
 
454
  ret = init_gnutls_session (mc, &session);
 
455
  if (ret != 0){
543
456
    return -1;
544
457
  }
545
458
  
546
459
  if(debug){
547
 
    fprintf(stderr, "Setting up a TCP connection to %s, port %" PRIu16
 
460
    fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
548
461
            "\n", ip, port);
549
462
  }
550
463
  
551
 
  tcp_sd = socket(pf, SOCK_STREAM, 0);
552
 
  if(tcp_sd < 0){
 
464
  tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
 
465
  if(tcp_sd < 0) {
553
466
    perror("socket");
554
467
    return -1;
555
468
  }
 
469
 
 
470
  if(debug){
 
471
    if(if_indextoname((unsigned int)if_index, interface) == NULL){
 
472
      perror("if_indextoname");
 
473
      return -1;
 
474
    }
 
475
    fprintf(stderr, "Binding to interface %s\n", interface);
 
476
  }
556
477
  
557
 
  memset(&to, 0, sizeof(to));
558
 
  if(af == AF_INET6){
559
 
    to.in6.sin6_family = (uint16_t)af;
560
 
    ret = inet_pton(af, ip, &to.in6.sin6_addr);
561
 
  } else {                      /* IPv4 */
562
 
    to.in.sin_family = (sa_family_t)af;
563
 
    ret = inet_pton(af, ip, &to.in.sin_addr);
564
 
  }
565
 
  if(ret < 0 ){
 
478
  memset(&to, 0, sizeof(to));   /* Spurious warning */
 
479
  to.in6.sin6_family = AF_INET6;
 
480
  /* It would be nice to have a way to detect if we were passed an
 
481
     IPv4 address here.   Now we assume an IPv6 address. */
 
482
  ret = inet_pton(AF_INET6, ip, &to.in6.sin6_addr);
 
483
  if (ret < 0 ){
566
484
    perror("inet_pton");
567
485
    return -1;
568
486
  }
570
488
    fprintf(stderr, "Bad address: %s\n", ip);
571
489
    return -1;
572
490
  }
573
 
  if(af == AF_INET6){
574
 
    to.in6.sin6_port = htons(port); /* Spurious warnings from
575
 
                                       -Wconversion and
576
 
                                       -Wunreachable-code */
577
 
    
578
 
    if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
579
 
       (&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
580
 
                              -Wunreachable-code*/
581
 
      if(if_index == AVAHI_IF_UNSPEC){
582
 
        fprintf(stderr, "An IPv6 link-local address is incomplete"
583
 
                " without a network interface\n");
584
 
        return -1;
585
 
      }
586
 
      /* Set the network interface number as scope */
587
 
      to.in6.sin6_scope_id = (uint32_t)if_index;
588
 
    }
589
 
  } else {
590
 
    to.in.sin_port = htons(port); /* Spurious warnings from
591
 
                                     -Wconversion and
592
 
                                     -Wunreachable-code */
593
 
  }
 
491
  to.in6.sin6_port = htons(port); /* Spurious warning */
 
492
  
 
493
  to.in6.sin6_scope_id = (uint32_t)if_index;
594
494
  
595
495
  if(debug){
596
 
    if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){
597
 
      char interface[IF_NAMESIZE];
598
 
      if(if_indextoname((unsigned int)if_index, interface) == NULL){
599
 
        perror("if_indextoname");
600
 
      } else {
601
 
        fprintf(stderr, "Connection to: %s%%%s, port %" PRIu16 "\n",
602
 
                ip, interface, port);
603
 
      }
604
 
    } else {
605
 
      fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
606
 
              port);
607
 
    }
608
 
    char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
609
 
                 INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
610
 
    const char *pcret;
611
 
    if(af == AF_INET6){
612
 
      pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
613
 
                        sizeof(addrstr));
614
 
    } else {
615
 
      pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
616
 
                        sizeof(addrstr));
617
 
    }
618
 
    if(pcret == NULL){
 
496
    fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
 
497
            port);
 
498
    char addrstr[INET6_ADDRSTRLEN] = "";
 
499
    if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
 
500
                 sizeof(addrstr)) == NULL){
619
501
      perror("inet_ntop");
620
502
    } else {
621
503
      if(strcmp(addrstr, ip) != 0){
624
506
    }
625
507
  }
626
508
  
627
 
  if(af == AF_INET6){
628
 
    ret = connect(tcp_sd, &to.in6, sizeof(to));
629
 
  } else {
630
 
    ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
631
 
  }
632
 
  if(ret < 0){
 
509
  ret = connect(tcp_sd, &to.in, sizeof(to));
 
510
  if (ret < 0){
633
511
    perror("connect");
634
512
    return -1;
635
513
  }
636
 
  
 
514
 
637
515
  const char *out = mandos_protocol_version;
638
516
  written = 0;
639
 
  while(true){
 
517
  while (true){
640
518
    size_t out_size = strlen(out);
641
 
    ret = (int)TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
 
519
    ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
642
520
                                   out_size - written));
643
 
    if(ret == -1){
 
521
    if (ret == -1){
644
522
      perror("write");
645
523
      retval = -1;
646
524
      goto mandos_end;
649
527
    if(written < out_size){
650
528
      continue;
651
529
    } else {
652
 
      if(out == mandos_protocol_version){
 
530
      if (out == mandos_protocol_version){
653
531
        written = 0;
654
532
        out = "\r\n";
655
533
      } else {
657
535
      }
658
536
    }
659
537
  }
660
 
  
 
538
 
661
539
  if(debug){
662
540
    fprintf(stderr, "Establishing TLS session with %s\n", ip);
663
541
  }
664
542
  
665
 
  gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);
666
 
  
 
543
  gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
 
544
 
667
545
  do{
668
 
    ret = gnutls_handshake(session);
 
546
    ret = gnutls_handshake (session);
669
547
  } while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
670
548
  
671
 
  if(ret != GNUTLS_E_SUCCESS){
 
549
  if (ret != GNUTLS_E_SUCCESS){
672
550
    if(debug){
673
551
      fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
674
 
      gnutls_perror(ret);
 
552
      gnutls_perror (ret);
675
553
    }
676
554
    retval = -1;
677
555
    goto mandos_end;
680
558
  /* Read OpenPGP packet that contains the wanted password */
681
559
  
682
560
  if(debug){
683
 
    fprintf(stderr, "Retrieving OpenPGP encrypted password from %s\n",
 
561
    fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
684
562
            ip);
685
563
  }
686
 
  
 
564
 
687
565
  while(true){
688
566
    buffer_capacity = adjustbuffer(&buffer, buffer_length,
689
567
                                   buffer_capacity);
690
 
    if(buffer_capacity == 0){
 
568
    if (buffer_capacity == 0){
691
569
      perror("adjustbuffer");
692
570
      retval = -1;
693
571
      goto mandos_end;
694
572
    }
695
573
    
696
 
    sret = gnutls_record_recv(session, buffer+buffer_length,
697
 
                              BUFFER_SIZE);
698
 
    if(sret == 0){
 
574
    ret = gnutls_record_recv(session, buffer+buffer_length,
 
575
                             BUFFER_SIZE);
 
576
    if (ret == 0){
699
577
      break;
700
578
    }
701
 
    if(sret < 0){
702
 
      switch(sret){
 
579
    if (ret < 0){
 
580
      switch(ret){
703
581
      case GNUTLS_E_INTERRUPTED:
704
582
      case GNUTLS_E_AGAIN:
705
583
        break;
706
584
      case GNUTLS_E_REHANDSHAKE:
707
585
        do{
708
 
          ret = gnutls_handshake(session);
 
586
          ret = gnutls_handshake (session);
709
587
        } while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
710
 
        if(ret < 0){
 
588
        if (ret < 0){
711
589
          fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
712
 
          gnutls_perror(ret);
 
590
          gnutls_perror (ret);
713
591
          retval = -1;
714
592
          goto mandos_end;
715
593
        }
718
596
        fprintf(stderr, "Unknown error while reading data from"
719
597
                " encrypted session with Mandos server\n");
720
598
        retval = -1;
721
 
        gnutls_bye(session, GNUTLS_SHUT_RDWR);
 
599
        gnutls_bye (session, GNUTLS_SHUT_RDWR);
722
600
        goto mandos_end;
723
601
      }
724
602
    } else {
725
 
      buffer_length += (size_t) sret;
 
603
      buffer_length += (size_t) ret;
726
604
    }
727
605
  }
728
606
  
730
608
    fprintf(stderr, "Closing TLS session\n");
731
609
  }
732
610
  
733
 
  gnutls_bye(session, GNUTLS_SHUT_RDWR);
 
611
  gnutls_bye (session, GNUTLS_SHUT_RDWR);
734
612
  
735
 
  if(buffer_length > 0){
736
 
    decrypted_buffer_size = pgp_packet_decrypt(mc, buffer,
 
613
  if (buffer_length > 0){
 
614
    decrypted_buffer_size = pgp_packet_decrypt(buffer,
737
615
                                               buffer_length,
738
 
                                               &decrypted_buffer);
739
 
    if(decrypted_buffer_size >= 0){
 
616
                                               &decrypted_buffer,
 
617
                                               keydir);
 
618
    if (decrypted_buffer_size >= 0){
740
619
      written = 0;
741
620
      while(written < (size_t) decrypted_buffer_size){
742
 
        ret = (int)fwrite(decrypted_buffer + written, 1,
743
 
                          (size_t)decrypted_buffer_size - written,
744
 
                          stdout);
 
621
        ret = (int)fwrite (decrypted_buffer + written, 1,
 
622
                           (size_t)decrypted_buffer_size - written,
 
623
                           stdout);
745
624
        if(ret == 0 and ferror(stdout)){
746
625
          if(debug){
747
626
            fprintf(stderr, "Error writing encrypted data: %s\n",
756
635
    } else {
757
636
      retval = -1;
758
637
    }
759
 
  } else {
760
 
    retval = -1;
761
638
  }
762
639
  
763
640
  /* Shutdown procedure */
764
641
  
765
642
 mandos_end:
766
643
  free(buffer);
767
 
  ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
768
 
  if(ret == -1){
769
 
    perror("close");
770
 
  }
771
 
  gnutls_deinit(session);
 
644
  close(tcp_sd);
 
645
  gnutls_deinit (session);
772
646
  return retval;
773
647
}
774
648
 
775
649
static void resolve_callback(AvahiSServiceResolver *r,
776
650
                             AvahiIfIndex interface,
777
 
                             AvahiProtocol proto,
 
651
                             AVAHI_GCC_UNUSED AvahiProtocol protocol,
778
652
                             AvahiResolverEvent event,
779
653
                             const char *name,
780
654
                             const char *type,
785
659
                             AVAHI_GCC_UNUSED AvahiStringList *txt,
786
660
                             AVAHI_GCC_UNUSED AvahiLookupResultFlags
787
661
                             flags,
788
 
                             void* userdata){
 
662
                             void* userdata) {
789
663
  mandos_context *mc = userdata;
790
 
  assert(r);
 
664
  assert(r);                    /* Spurious warning */
791
665
  
792
666
  /* Called whenever a service has been resolved successfully or
793
667
     timed out */
794
668
  
795
 
  switch(event){
 
669
  switch (event) {
796
670
  default:
797
671
  case AVAHI_RESOLVER_FAILURE:
798
672
    fprintf(stderr, "(Avahi Resolver) Failed to resolve service '%s'"
806
680
      avahi_address_snprint(ip, sizeof(ip), address);
807
681
      if(debug){
808
682
        fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %"
809
 
                PRIdMAX ") on port %" PRIu16 "\n", name, host_name,
810
 
                ip, (intmax_t)interface, port);
 
683
                PRIu16 ") on port %d\n", name, host_name, ip,
 
684
                interface, port);
811
685
      }
812
 
      int ret = start_mandos_communication(ip, port, interface, mc,
813
 
                                           avahi_proto_to_af(proto));
814
 
      if(ret == 0){
 
686
      int ret = start_mandos_communication(ip, port, interface, mc);
 
687
      if (ret == 0){
815
688
        avahi_simple_poll_quit(mc->simple_poll);
816
689
      }
817
690
    }
819
692
  avahi_s_service_resolver_free(r);
820
693
}
821
694
 
822
 
static void browse_callback(AvahiSServiceBrowser *b,
823
 
                            AvahiIfIndex interface,
824
 
                            AvahiProtocol protocol,
825
 
                            AvahiBrowserEvent event,
826
 
                            const char *name,
827
 
                            const char *type,
828
 
                            const char *domain,
829
 
                            AVAHI_GCC_UNUSED AvahiLookupResultFlags
830
 
                            flags,
831
 
                            void* userdata){
 
695
static void browse_callback( AvahiSServiceBrowser *b,
 
696
                             AvahiIfIndex interface,
 
697
                             AvahiProtocol protocol,
 
698
                             AvahiBrowserEvent event,
 
699
                             const char *name,
 
700
                             const char *type,
 
701
                             const char *domain,
 
702
                             AVAHI_GCC_UNUSED AvahiLookupResultFlags
 
703
                             flags,
 
704
                             void* userdata) {
832
705
  mandos_context *mc = userdata;
833
 
  assert(b);
 
706
  assert(b);                    /* Spurious warning */
834
707
  
835
708
  /* Called whenever a new services becomes available on the LAN or
836
709
     is removed from the LAN */
837
710
  
838
 
  switch(event){
 
711
  switch (event) {
839
712
  default:
840
713
  case AVAHI_BROWSER_FAILURE:
841
714
    
850
723
       the callback function is called the Avahi server will free the
851
724
       resolver for us. */
852
725
    
853
 
    if(!(avahi_s_service_resolver_new(mc->server, interface,
 
726
    if (!(avahi_s_service_resolver_new(mc->server, interface,
854
727
                                       protocol, name, type, domain,
855
728
                                       AVAHI_PROTO_INET6, 0,
856
729
                                       resolve_callback, mc)))
870
743
  }
871
744
}
872
745
 
 
746
/* Combines file name and path and returns the malloced new
 
747
   string. some sane checks could/should be added */
 
748
static char *combinepath(const char *first, const char *second){
 
749
  char *tmp;
 
750
  int ret = asprintf(&tmp, "%s/%s", first, second);
 
751
  if(ret < 0){
 
752
    return NULL;
 
753
  }
 
754
  return tmp;
 
755
}
 
756
 
 
757
 
873
758
int main(int argc, char *argv[]){
874
 
  AvahiSServiceBrowser *sb = NULL;
875
 
  int error;
876
 
  int ret;
877
 
  intmax_t tmpmax;
878
 
  int numchars;
879
 
  int exitcode = EXIT_SUCCESS;
880
 
  const char *interface = "eth0";
881
 
  struct ifreq network;
882
 
  int sd;
883
 
  uid_t uid;
884
 
  gid_t gid;
885
 
  char *connect_to = NULL;
886
 
  char tempdir[] = "/tmp/mandosXXXXXX";
887
 
  bool tempdir_created = false;
888
 
  AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
889
 
  const char *seckey = PATHDIR "/" SECKEY;
890
 
  const char *pubkey = PATHDIR "/" PUBKEY;
891
 
  
892
 
  mandos_context mc = { .simple_poll = NULL, .server = NULL,
893
 
                        .dh_bits = 1024, .priority = "SECURE256"
894
 
                        ":!CTYPE-X.509:+CTYPE-OPENPGP" };
895
 
  bool gnutls_initialized = false;
896
 
  bool gpgme_initialized = false;
897
 
  double delay = 2.5;
898
 
  
899
 
  {
900
 
    struct argp_option options[] = {
901
 
      { .name = "debug", .key = 128,
902
 
        .doc = "Debug mode", .group = 3 },
903
 
      { .name = "connect", .key = 'c',
904
 
        .arg = "ADDRESS:PORT",
905
 
        .doc = "Connect directly to a specific Mandos server",
906
 
        .group = 1 },
907
 
      { .name = "interface", .key = 'i',
908
 
        .arg = "NAME",
909
 
        .doc = "Network interface that will be used to search for"
910
 
        " Mandos servers",
911
 
        .group = 1 },
912
 
      { .name = "seckey", .key = 's',
913
 
        .arg = "FILE",
914
 
        .doc = "OpenPGP secret key file base name",
915
 
        .group = 1 },
916
 
      { .name = "pubkey", .key = 'p',
917
 
        .arg = "FILE",
918
 
        .doc = "OpenPGP public key file base name",
919
 
        .group = 2 },
920
 
      { .name = "dh-bits", .key = 129,
921
 
        .arg = "BITS",
922
 
        .doc = "Bit length of the prime number used in the"
923
 
        " Diffie-Hellman key exchange",
924
 
        .group = 2 },
925
 
      { .name = "priority", .key = 130,
926
 
        .arg = "STRING",
927
 
        .doc = "GnuTLS priority string for the TLS handshake",
928
 
        .group = 1 },
929
 
      { .name = "delay", .key = 131,
930
 
        .arg = "SECONDS",
931
 
        .doc = "Maximum delay to wait for interface startup",
932
 
        .group = 2 },
933
 
      { .name = NULL }
934
 
    };
935
 
    
936
 
    error_t parse_opt(int key, char *arg,
937
 
                      struct argp_state *state){
938
 
      switch(key){
939
 
      case 128:                 /* --debug */
940
 
        debug = true;
941
 
        break;
942
 
      case 'c':                 /* --connect */
943
 
        connect_to = arg;
944
 
        break;
945
 
      case 'i':                 /* --interface */
946
 
        interface = arg;
947
 
        break;
948
 
      case 's':                 /* --seckey */
949
 
        seckey = arg;
950
 
        break;
951
 
      case 'p':                 /* --pubkey */
952
 
        pubkey = arg;
953
 
        break;
954
 
      case 129:                 /* --dh-bits */
955
 
        ret = sscanf(arg, "%" SCNdMAX "%n", &tmpmax, &numchars);
956
 
        if(ret < 1 or tmpmax != (typeof(mc.dh_bits))tmpmax
957
 
           or arg[numchars] != '\0'){
958
 
          fprintf(stderr, "Bad number of DH bits\n");
959
 
          exit(EXIT_FAILURE);
960
 
        }
961
 
        mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
962
 
        break;
963
 
      case 130:                 /* --priority */
964
 
        mc.priority = arg;
965
 
        break;
966
 
      case 131:                 /* --delay */
967
 
        ret = sscanf(arg, "%lf%n", &delay, &numchars);
968
 
        if(ret < 1 or arg[numchars] != '\0'){
969
 
          fprintf(stderr, "Bad delay\n");
970
 
          exit(EXIT_FAILURE);
971
 
        }
972
 
        break;
973
 
      case ARGP_KEY_ARG:
974
 
        argp_usage(state);
975
 
      case ARGP_KEY_END:
976
 
        break;
977
 
      default:
978
 
        return ARGP_ERR_UNKNOWN;
979
 
      }
980
 
      return 0;
981
 
    }
982
 
    
983
 
    struct argp argp = { .options = options, .parser = parse_opt,
984
 
                         .args_doc = "",
985
 
                         .doc = "Mandos client -- Get and decrypt"
986
 
                         " passwords from a Mandos server" };
987
 
    ret = argp_parse(&argp, argc, argv, 0, 0, NULL);
988
 
    if(ret == ARGP_ERR_UNKNOWN){
989
 
      fprintf(stderr, "Unknown error while parsing arguments\n");
990
 
      exitcode = EXIT_FAILURE;
991
 
      goto end;
992
 
    }
993
 
  }
994
 
  
995
 
  /* If the interface is down, bring it up */
996
 
  if(interface[0] != '\0'){
997
 
#ifdef __linux__
998
 
    /* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
999
 
       messages to mess up the prompt */
1000
 
    ret = klogctl(8, NULL, 5);
1001
 
    bool restore_loglevel = true;
1002
 
    if(ret == -1){
1003
 
      restore_loglevel = false;
1004
 
      perror("klogctl");
1005
 
    }
1006
 
#endif
1007
 
    
1008
 
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1009
 
    if(sd < 0){
1010
 
      perror("socket");
1011
 
      exitcode = EXIT_FAILURE;
1012
 
#ifdef __linux__
1013
 
      if(restore_loglevel){
1014
 
        ret = klogctl(7, NULL, 0);
1015
 
        if(ret == -1){
1016
 
          perror("klogctl");
1017
 
        }
1018
 
      }
1019
 
#endif
1020
 
      goto end;
1021
 
    }
1022
 
    strcpy(network.ifr_name, interface);
1023
 
    ret = ioctl(sd, SIOCGIFFLAGS, &network);
1024
 
    if(ret == -1){
1025
 
      perror("ioctl SIOCGIFFLAGS");
1026
 
#ifdef __linux__
1027
 
      if(restore_loglevel){
1028
 
        ret = klogctl(7, NULL, 0);
1029
 
        if(ret == -1){
1030
 
          perror("klogctl");
1031
 
        }
1032
 
      }
1033
 
#endif
1034
 
      exitcode = EXIT_FAILURE;
1035
 
      goto end;
1036
 
    }
1037
 
    if((network.ifr_flags & IFF_UP) == 0){
1038
 
      network.ifr_flags |= IFF_UP;
1039
 
      ret = ioctl(sd, SIOCSIFFLAGS, &network);
1040
 
      if(ret == -1){
1041
 
        perror("ioctl SIOCSIFFLAGS");
1042
 
        exitcode = EXIT_FAILURE;
1043
 
#ifdef __linux__
1044
 
        if(restore_loglevel){
1045
 
          ret = klogctl(7, NULL, 0);
1046
 
          if(ret == -1){
1047
 
            perror("klogctl");
 
759
    AvahiSServiceBrowser *sb = NULL;
 
760
    int error;
 
761
    int ret;
 
762
    int exitcode = EXIT_SUCCESS;
 
763
    const char *interface = "eth0";
 
764
    struct ifreq network;
 
765
    int sd;
 
766
    uid_t uid;
 
767
    gid_t gid;
 
768
    char *connect_to = NULL;
 
769
    AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
 
770
    char *pubkeyfilename = NULL;
 
771
    char *seckeyfilename = NULL;
 
772
    const char *pubkeyname = "pubkey.txt";
 
773
    const char *seckeyname = "seckey.txt";
 
774
    mandos_context mc = { .simple_poll = NULL, .server = NULL,
 
775
                          .dh_bits = 1024, .priority = "SECURE256"};
 
776
    bool gnutls_initalized = false;
 
777
    
 
778
    {
 
779
      struct argp_option options[] = {
 
780
        { .name = "debug", .key = 128,
 
781
          .doc = "Debug mode", .group = 3 },
 
782
        { .name = "connect", .key = 'c',
 
783
          .arg = "IP",
 
784
          .doc = "Connect directly to a sepcified mandos server",
 
785
          .group = 1 },
 
786
        { .name = "interface", .key = 'i',
 
787
          .arg = "INTERFACE",
 
788
          .doc = "Interface that Avahi will conntect through",
 
789
          .group = 1 },
 
790
        { .name = "keydir", .key = 'd',
 
791
          .arg = "KEYDIR",
 
792
          .doc = "Directory where the openpgp keyring is",
 
793
          .group = 1 },
 
794
        { .name = "seckey", .key = 's',
 
795
          .arg = "SECKEY",
 
796
          .doc = "Secret openpgp key for gnutls authentication",
 
797
          .group = 1 },
 
798
        { .name = "pubkey", .key = 'p',
 
799
          .arg = "PUBKEY",
 
800
          .doc = "Public openpgp key for gnutls authentication",
 
801
          .group = 2 },
 
802
        { .name = "dh-bits", .key = 129,
 
803
          .arg = "BITS",
 
804
          .doc = "dh-bits to use in gnutls communication",
 
805
          .group = 2 },
 
806
        { .name = "priority", .key = 130,
 
807
          .arg = "PRIORITY",
 
808
          .doc = "GNUTLS priority", .group = 1 },
 
809
        { .name = NULL }
 
810
      };
 
811
 
 
812
      
 
813
      error_t parse_opt (int key, char *arg,
 
814
                         struct argp_state *state) {
 
815
        /* Get the INPUT argument from `argp_parse', which we know is
 
816
           a pointer to our plugin list pointer. */
 
817
        switch (key) {
 
818
        case 128:
 
819
          debug = true;
 
820
          break;
 
821
        case 'c':
 
822
          connect_to = arg;
 
823
          break;
 
824
        case 'i':
 
825
          interface = arg;
 
826
          break;
 
827
        case 'd':
 
828
          keydir = arg;
 
829
          break;
 
830
        case 's':
 
831
          seckeyname = arg;
 
832
          break;
 
833
        case 'p':
 
834
          pubkeyname = arg;
 
835
          break;
 
836
        case 129:
 
837
          errno = 0;
 
838
          mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);
 
839
          if (errno){
 
840
            perror("strtol");
 
841
            exit(EXIT_FAILURE);
1048
842
          }
 
843
          break;
 
844
        case 130:
 
845
          mc.priority = arg;
 
846
          break;
 
847
        case ARGP_KEY_ARG:
 
848
          argp_usage (state);
 
849
        case ARGP_KEY_END:
 
850
          break;
 
851
        default:
 
852
          return ARGP_ERR_UNKNOWN;
1049
853
        }
1050
 
#endif
1051
 
        goto end;
1052
 
      }
1053
 
    }
1054
 
    /* sleep checking until interface is running */
1055
 
    for(int i=0; i < delay * 4; i++){
 
854
        return 0;
 
855
      }
 
856
 
 
857
      struct argp argp = { .options = options, .parser = parse_opt,
 
858
                           .args_doc = "",
 
859
                           .doc = "Mandos client -- Get and decrypt"
 
860
                           " passwords from mandos server" };
 
861
      ret = argp_parse (&argp, argc, argv, 0, 0, NULL);
 
862
      if (ret == ARGP_ERR_UNKNOWN){
 
863
        fprintf(stderr, "Unknown error while parsing arguments\n");
 
864
        exitcode = EXIT_FAILURE;
 
865
        goto end;
 
866
      }
 
867
    }
 
868
      
 
869
    pubkeyfilename = combinepath(keydir, pubkeyname);
 
870
    if (pubkeyfilename == NULL){
 
871
      perror("combinepath");
 
872
      exitcode = EXIT_FAILURE;
 
873
      goto end;
 
874
    }
 
875
    
 
876
    seckeyfilename = combinepath(keydir, seckeyname);
 
877
    if (seckeyfilename == NULL){
 
878
      perror("combinepath");
 
879
      exitcode = EXIT_FAILURE;
 
880
      goto end;
 
881
    }
 
882
 
 
883
    ret = init_gnutls_global(&mc, pubkeyfilename, seckeyfilename);
 
884
    if (ret == -1){
 
885
      fprintf(stderr, "init_gnutls_global failed\n");
 
886
      exitcode = EXIT_FAILURE;
 
887
      goto end;
 
888
    } else {
 
889
      gnutls_initalized = true;
 
890
    }
 
891
    
 
892
    /* If the interface is down, bring it up */
 
893
    {
 
894
      sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
895
      if(sd < 0) {
 
896
        perror("socket");
 
897
        exitcode = EXIT_FAILURE;
 
898
        goto end;
 
899
      }
 
900
      strcpy(network.ifr_name, interface); /* Spurious warning */
1056
901
      ret = ioctl(sd, SIOCGIFFLAGS, &network);
1057
902
      if(ret == -1){
1058
903
        perror("ioctl SIOCGIFFLAGS");
1059
 
      } else if(network.ifr_flags & IFF_RUNNING){
1060
 
        break;
1061
 
      }
1062
 
      struct timespec sleeptime = { .tv_nsec = 250000000 };
1063
 
      ret = nanosleep(&sleeptime, NULL);
1064
 
      if(ret == -1 and errno != EINTR){
1065
 
        perror("nanosleep");
1066
 
      }
1067
 
    }
1068
 
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
1069
 
    if(ret == -1){
1070
 
      perror("close");
1071
 
    }
1072
 
#ifdef __linux__
1073
 
    if(restore_loglevel){
1074
 
      /* Restores kernel loglevel to default */
1075
 
      ret = klogctl(7, NULL, 0);
1076
 
      if(ret == -1){
1077
 
        perror("klogctl");
1078
 
      }
1079
 
    }
1080
 
#endif
1081
 
  }
1082
 
  
1083
 
  uid = getuid();
1084
 
  gid = getgid();
1085
 
  
1086
 
  errno = 0;
1087
 
  setgid(gid);
1088
 
  if(ret == -1){
1089
 
    perror("setgid");
1090
 
  }
1091
 
  
1092
 
  ret = setuid(uid);
1093
 
  if(ret == -1){
1094
 
    perror("setuid");
1095
 
  }
1096
 
  
1097
 
  ret = init_gnutls_global(&mc, pubkey, seckey);
1098
 
  if(ret == -1){
1099
 
    fprintf(stderr, "init_gnutls_global failed\n");
1100
 
    exitcode = EXIT_FAILURE;
1101
 
    goto end;
1102
 
  } else {
1103
 
    gnutls_initialized = true;
1104
 
  }
1105
 
  
1106
 
  if(mkdtemp(tempdir) == NULL){
1107
 
    perror("mkdtemp");
1108
 
    goto end;
1109
 
  }
1110
 
  tempdir_created = true;
1111
 
  
1112
 
  if(not init_gpgme(&mc, pubkey, seckey, tempdir)){
1113
 
    fprintf(stderr, "init_gpgme failed\n");
1114
 
    exitcode = EXIT_FAILURE;
1115
 
    goto end;
1116
 
  } else {
1117
 
    gpgme_initialized = true;
1118
 
  }
1119
 
  
1120
 
  if(interface[0] != '\0'){
 
904
        exitcode = EXIT_FAILURE;
 
905
        goto end;
 
906
      }
 
907
      if((network.ifr_flags & IFF_UP) == 0){
 
908
        network.ifr_flags |= IFF_UP;
 
909
        ret = ioctl(sd, SIOCSIFFLAGS, &network);
 
910
        if(ret == -1){
 
911
          perror("ioctl SIOCSIFFLAGS");
 
912
          exitcode = EXIT_FAILURE;
 
913
          goto end;
 
914
        }
 
915
      }
 
916
      close(sd);
 
917
    }
 
918
    
 
919
    uid = getuid();
 
920
    gid = getgid();
 
921
    
 
922
    ret = setuid(uid);
 
923
    if (ret == -1){
 
924
      perror("setuid");
 
925
    }
 
926
    
 
927
    setgid(gid);
 
928
    if (ret == -1){
 
929
      perror("setgid");
 
930
    }
 
931
    
1121
932
    if_index = (AvahiIfIndex) if_nametoindex(interface);
1122
933
    if(if_index == 0){
1123
934
      fprintf(stderr, "No such interface: \"%s\"\n", interface);
1124
 
      exitcode = EXIT_FAILURE;
1125
 
      goto end;
1126
 
    }
1127
 
  }
1128
 
  
1129
 
  if(connect_to != NULL){
1130
 
    /* Connect directly, do not use Zeroconf */
1131
 
    /* (Mainly meant for debugging) */
1132
 
    char *address = strrchr(connect_to, ':');
1133
 
    if(address == NULL){
1134
 
      fprintf(stderr, "No colon in address\n");
1135
 
      exitcode = EXIT_FAILURE;
1136
 
      goto end;
1137
 
    }
1138
 
    uint16_t port;
1139
 
    ret = sscanf(address+1, "%" SCNdMAX "%n", &tmpmax, &numchars);
1140
 
    if(ret < 1 or tmpmax != (uint16_t)tmpmax
1141
 
       or address[numchars+1] != '\0'){
1142
 
      fprintf(stderr, "Bad port number\n");
1143
 
      exitcode = EXIT_FAILURE;
1144
 
      goto end;
1145
 
    }
1146
 
    port = (uint16_t)tmpmax;
1147
 
    *address = '\0';
1148
 
    address = connect_to;
1149
 
    /* Colon in address indicates IPv6 */
1150
 
    int af;
1151
 
    if(strchr(address, ':') != NULL){
1152
 
      af = AF_INET6;
1153
 
    } else {
1154
 
      af = AF_INET;
1155
 
    }
1156
 
    ret = start_mandos_communication(address, port, if_index, &mc,
1157
 
                                     af);
1158
 
    if(ret < 0){
1159
 
      exitcode = EXIT_FAILURE;
1160
 
    } else {
1161
 
      exitcode = EXIT_SUCCESS;
1162
 
    }
1163
 
    goto end;
1164
 
  }
1165
 
  
1166
 
  if(not debug){
1167
 
    avahi_set_log_function(empty_log);
1168
 
  }
1169
 
  
1170
 
  /* Initialize the pseudo-RNG for Avahi */
1171
 
  srand((unsigned int) time(NULL));
1172
 
  
1173
 
  /* Allocate main Avahi loop object */
1174
 
  mc.simple_poll = avahi_simple_poll_new();
1175
 
  if(mc.simple_poll == NULL){
1176
 
    fprintf(stderr, "Avahi: Failed to create simple poll object.\n");
1177
 
    exitcode = EXIT_FAILURE;
1178
 
    goto end;
1179
 
  }
1180
 
  
1181
 
  {
1182
 
    AvahiServerConfig config;
1183
 
    /* Do not publish any local Zeroconf records */
1184
 
    avahi_server_config_init(&config);
1185
 
    config.publish_hinfo = 0;
1186
 
    config.publish_addresses = 0;
1187
 
    config.publish_workstation = 0;
1188
 
    config.publish_domain = 0;
1189
 
    
1190
 
    /* Allocate a new server */
1191
 
    mc.server = avahi_server_new(avahi_simple_poll_get
1192
 
                                 (mc.simple_poll), &config, NULL,
1193
 
                                 NULL, &error);
1194
 
    
1195
 
    /* Free the Avahi configuration data */
1196
 
    avahi_server_config_free(&config);
1197
 
  }
1198
 
  
1199
 
  /* Check if creating the Avahi server object succeeded */
1200
 
  if(mc.server == NULL){
1201
 
    fprintf(stderr, "Failed to create Avahi server: %s\n",
1202
 
            avahi_strerror(error));
1203
 
    exitcode = EXIT_FAILURE;
1204
 
    goto end;
1205
 
  }
1206
 
  
1207
 
  /* Create the Avahi service browser */
1208
 
  sb = avahi_s_service_browser_new(mc.server, if_index,
1209
 
                                   AVAHI_PROTO_INET6, "_mandos._tcp",
1210
 
                                   NULL, 0, browse_callback, &mc);
1211
 
  if(sb == NULL){
1212
 
    fprintf(stderr, "Failed to create service browser: %s\n",
1213
 
            avahi_strerror(avahi_server_errno(mc.server)));
1214
 
    exitcode = EXIT_FAILURE;
1215
 
    goto end;
1216
 
  }
1217
 
  
1218
 
  /* Run the main loop */
1219
 
  
1220
 
  if(debug){
1221
 
    fprintf(stderr, "Starting Avahi loop search\n");
1222
 
  }
1223
 
  
1224
 
  avahi_simple_poll_loop(mc.simple_poll);
1225
 
  
 
935
      exit(EXIT_FAILURE);
 
936
    }
 
937
    
 
938
    if(connect_to != NULL){
 
939
      /* Connect directly, do not use Zeroconf */
 
940
      /* (Mainly meant for debugging) */
 
941
      char *address = strrchr(connect_to, ':');
 
942
      if(address == NULL){
 
943
        fprintf(stderr, "No colon in address\n");
 
944
        exitcode = EXIT_FAILURE;
 
945
        goto end;
 
946
      }
 
947
      errno = 0;
 
948
      uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
 
949
      if(errno){
 
950
        perror("Bad port number");
 
951
        exitcode = EXIT_FAILURE;
 
952
        goto end;
 
953
      }
 
954
      *address = '\0';
 
955
      address = connect_to;
 
956
      ret = start_mandos_communication(address, port, if_index, &mc);
 
957
      if(ret < 0){
 
958
        exitcode = EXIT_FAILURE;
 
959
      } else {
 
960
        exitcode = EXIT_SUCCESS;
 
961
      }
 
962
      goto end;
 
963
    }
 
964
    
 
965
    if (not debug){
 
966
      avahi_set_log_function(empty_log);
 
967
    }
 
968
    
 
969
    /* Initialize the pseudo-RNG for Avahi */
 
970
    srand((unsigned int) time(NULL));
 
971
    
 
972
    /* Allocate main Avahi loop object */
 
973
    mc.simple_poll = avahi_simple_poll_new();
 
974
    if (mc.simple_poll == NULL) {
 
975
        fprintf(stderr, "Avahi: Failed to create simple poll"
 
976
                " object.\n");
 
977
        exitcode = EXIT_FAILURE;
 
978
        goto end;
 
979
    }
 
980
 
 
981
    {
 
982
      AvahiServerConfig config;
 
983
      /* Do not publish any local Zeroconf records */
 
984
      avahi_server_config_init(&config);
 
985
      config.publish_hinfo = 0;
 
986
      config.publish_addresses = 0;
 
987
      config.publish_workstation = 0;
 
988
      config.publish_domain = 0;
 
989
 
 
990
      /* Allocate a new server */
 
991
      mc.server = avahi_server_new(avahi_simple_poll_get
 
992
                                   (mc.simple_poll), &config, NULL,
 
993
                                   NULL, &error);
 
994
    
 
995
      /* Free the Avahi configuration data */
 
996
      avahi_server_config_free(&config);
 
997
    }
 
998
    
 
999
    /* Check if creating the Avahi server object succeeded */
 
1000
    if (mc.server == NULL) {
 
1001
        fprintf(stderr, "Failed to create Avahi server: %s\n",
 
1002
                avahi_strerror(error));
 
1003
        exitcode = EXIT_FAILURE;
 
1004
        goto end;
 
1005
    }
 
1006
    
 
1007
    /* Create the Avahi service browser */
 
1008
    sb = avahi_s_service_browser_new(mc.server, if_index,
 
1009
                                     AVAHI_PROTO_INET6,
 
1010
                                     "_mandos._tcp", NULL, 0,
 
1011
                                     browse_callback, &mc);
 
1012
    if (sb == NULL) {
 
1013
        fprintf(stderr, "Failed to create service browser: %s\n",
 
1014
                avahi_strerror(avahi_server_errno(mc.server)));
 
1015
        exitcode = EXIT_FAILURE;
 
1016
        goto end;
 
1017
    }
 
1018
    
 
1019
    /* Run the main loop */
 
1020
 
 
1021
    if (debug){
 
1022
      fprintf(stderr, "Starting Avahi loop search\n");
 
1023
    }
 
1024
    
 
1025
    avahi_simple_poll_loop(mc.simple_poll);
 
1026
    
1226
1027
 end:
1227
 
  
1228
 
  if(debug){
1229
 
    fprintf(stderr, "%s exiting\n", argv[0]);
1230
 
  }
1231
 
  
1232
 
  /* Cleanup things */
1233
 
  if(sb != NULL)
1234
 
    avahi_s_service_browser_free(sb);
1235
 
  
1236
 
  if(mc.server != NULL)
1237
 
    avahi_server_free(mc.server);
1238
 
  
1239
 
  if(mc.simple_poll != NULL)
1240
 
    avahi_simple_poll_free(mc.simple_poll);
1241
 
  
1242
 
  if(gnutls_initialized){
1243
 
    gnutls_certificate_free_credentials(mc.cred);
1244
 
    gnutls_global_deinit();
1245
 
    gnutls_dh_params_deinit(mc.dh_params);
1246
 
  }
1247
 
  
1248
 
  if(gpgme_initialized){
1249
 
    gpgme_release(mc.ctx);
1250
 
  }
1251
 
  
1252
 
  /* Removes the temp directory used by GPGME */
1253
 
  if(tempdir_created){
1254
 
    DIR *d;
1255
 
    struct dirent *direntry;
1256
 
    d = opendir(tempdir);
1257
 
    if(d == NULL){
1258
 
      if(errno != ENOENT){
1259
 
        perror("opendir");
1260
 
      }
1261
 
    } else {
1262
 
      while(true){
1263
 
        direntry = readdir(d);
1264
 
        if(direntry == NULL){
1265
 
          break;
1266
 
        }
1267
 
        /* Skip "." and ".." */
1268
 
        if(direntry->d_name[0] == '.'
1269
 
           and (direntry->d_name[1] == '\0'
1270
 
                or (direntry->d_name[1] == '.'
1271
 
                    and direntry->d_name[2] == '\0'))){
1272
 
          continue;
1273
 
        }
1274
 
        char *fullname = NULL;
1275
 
        ret = asprintf(&fullname, "%s/%s", tempdir,
1276
 
                       direntry->d_name);
1277
 
        if(ret < 0){
1278
 
          perror("asprintf");
1279
 
          continue;
1280
 
        }
1281
 
        ret = remove(fullname);
1282
 
        if(ret == -1){
1283
 
          fprintf(stderr, "remove(\"%s\"): %s\n", fullname,
1284
 
                  strerror(errno));
1285
 
        }
1286
 
        free(fullname);
1287
 
      }
1288
 
      closedir(d);
1289
 
    }
1290
 
    ret = rmdir(tempdir);
1291
 
    if(ret == -1 and errno != ENOENT){
1292
 
      perror("rmdir");
1293
 
    }
1294
 
  }
1295
 
  
1296
 
  return exitcode;
 
1028
 
 
1029
    if (debug){
 
1030
      fprintf(stderr, "%s exiting\n", argv[0]);
 
1031
    }
 
1032
    
 
1033
    /* Cleanup things */
 
1034
    if (sb != NULL)
 
1035
        avahi_s_service_browser_free(sb);
 
1036
    
 
1037
    if (mc.server != NULL)
 
1038
        avahi_server_free(mc.server);
 
1039
 
 
1040
    if (mc.simple_poll != NULL)
 
1041
        avahi_simple_poll_free(mc.simple_poll);
 
1042
    free(pubkeyfilename);
 
1043
    free(seckeyfilename);
 
1044
 
 
1045
    if (gnutls_initalized){
 
1046
      gnutls_certificate_free_credentials(mc.cred);
 
1047
      gnutls_global_deinit ();
 
1048
    }
 
1049
    
 
1050
    return exitcode;
1297
1051
}