/mandos/trunk : revision 24.1.51

32

#define _LARGEFILE_SOURCE

33

#define _FILE_OFFSET_BITS 64

34

35

#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), asprintf() */

35

#define _GNU_SOURCE /* TEMP_FAILURE_RETRY() */

36

37

#include <stdio.h> /* fprintf(), stderr, fwrite(),

38

stdout, ferror() */

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(), asprintf(), strcpy() */

45

strerror(), memcpy(), strcpy() */

46

#include <sys/ioctl.h> /* ioctl */

47

#include <sys/types.h> /* socket(), inet_pton(), sockaddr,

48

sockaddr_in6, PF_INET6,

81

#include <avahi-common/error.h>

82

83

/* GnuTLS */

84

#include <gnutls/gnutls.h> /* All GnuTLS types, constants and

85

functions:

84

#include <gnutls/gnutls.h> /* All GnuTLS types, constants and functions

86

85

gnutls_*

87

86

init_gnutls_session(),

88

87

GNUTLS_* */

90

89

GNUTLS_OPENPGP_FMT_BASE64 */

91

90

92

91

/* GPGME */

93

#include <gpgme.h> /* All GPGME types, constants and

94

functions:

92

#include <gpgme.h> /* All GPGME types, constants and functions

95

93

gpgme_*

96

94

GPGME_PROTOCOL_OpenPGP,

97

95

GPG_ERR_NO_* */

214

212

fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",

215

213

gpgme_strsource(rc), gpgme_strerror(rc));

216

214

plaintext_length = -1;

217

if (debug){

218

gpgme_decrypt_result_t result;

219

result = gpgme_op_decrypt_result(ctx);

220

if (result == NULL){

221

fprintf(stderr, "gpgme_op_decrypt_result failed\n");

222

} else {

223

fprintf(stderr, "Unsupported algorithm: %s\n",

224

result->unsupported_algorithm);

225

fprintf(stderr, "Wrong key usage: %u\n",

226

result->wrong_key_usage);

227

if(result->file_name != NULL){

228

fprintf(stderr, "File name: %s\n", result->file_name);

229

}

230

gpgme_recipient_t recipient;

231

recipient = result->recipients;

232

if(recipient){

233

while(recipient != NULL){

234

fprintf(stderr, "Public key algorithm: %s\n",

235

gpgme_pubkey_algo_name(recipient->pubkey_algo));

236

fprintf(stderr, "Key ID: %s\n", recipient->keyid);

237

fprintf(stderr, "Secret key available: %s\n",

238

recipient->status == GPG_ERR_NO_SECKEY

239

? "No" : "Yes");

240

recipient = recipient->next;

241

}

242

}

243

}

244

}

245

215

goto decrypt_end;

246

216

}

247

217

249

219

fprintf(stderr, "Decryption of OpenPGP data succeeded\n");

250

220

}

251

221

222

if (debug){

223

gpgme_decrypt_result_t result;

224

result = gpgme_op_decrypt_result(ctx);

225

if (result == NULL){

226

fprintf(stderr, "gpgme_op_decrypt_result failed\n");

227

} else {

228

fprintf(stderr, "Unsupported algorithm: %s\n",

229

result->unsupported_algorithm);

230

fprintf(stderr, "Wrong key usage: %u\n",

231

result->wrong_key_usage);

232

if(result->file_name != NULL){

233

fprintf(stderr, "File name: %s\n", result->file_name);

234

}

235

gpgme_recipient_t recipient;

236

recipient = result->recipients;

237

if(recipient){

238

while(recipient != NULL){

239

fprintf(stderr, "Public key algorithm: %s\n",

240

gpgme_pubkey_algo_name(recipient->pubkey_algo));

241

fprintf(stderr, "Key ID: %s\n", recipient->keyid);

242

fprintf(stderr, "Secret key available: %s\n",

243

recipient->status == GPG_ERR_NO_SECKEY

244

? "No" : "Yes");

245

recipient = recipient->next;

246

}

247

}

248

}

249

}

250

252

251

/* Seek back to the beginning of the GPGME plaintext data buffer */

253

252

if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){

254

253

perror("pgpme_data_seek");

281

280

}

282

281

plaintext_length += ret;

283

282

}

284

283

285

284

if(debug){

286

285

fprintf(stderr, "Decrypted password is: ");

287

286

for(ssize_t i = 0; i < plaintext_length; i++){

301

300

}

302

301

303

302

static const char * safer_gnutls_strerror (int value) {

304

const char *ret = gnutls_strerror (value); /* Spurious warning */

303

const char *ret = gnutls_strerror (value);

305

304

if (ret == NULL)

306

305

ret = "(unknown)";

307

306

return ret;

314

313

}

315

314

316

315

static int init_gnutls_global(mandos_context *mc,

317

const char *pubkeyfilename,

318

const char *seckeyfilename){

316

const char *pubkeyfile,

317

const char *seckeyfile){

319

318

int ret;

320

319

321

320

if(debug){

340

339

/* OpenPGP credentials */

341

340

gnutls_certificate_allocate_credentials(&mc->cred);

342

341

if (ret != GNUTLS_E_SUCCESS){

343

fprintf (stderr, "GnuTLS memory error: %s\n", /* Spurious

344

warning */

342

fprintf (stderr, "GnuTLS memory error: %s\n",

345

343

safer_gnutls_strerror(ret));

346

344

gnutls_global_deinit ();

347

345

return -1;

349

347

350

348

if(debug){

351

349

fprintf(stderr, "Attempting to use OpenPGP certificate %s"

352

" and keyfile %s as GnuTLS credentials\n", pubkeyfilename,

353

seckeyfilename);

350

" and keyfile %s as GnuTLS credentials\n", pubkeyfile,

351

seckeyfile);

354

352

}

355

353

356

354

ret = gnutls_certificate_set_openpgp_key_file

357

(mc->cred, pubkeyfilename, seckeyfilename,

358

GNUTLS_OPENPGP_FMT_BASE64);

355

(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);

359

356

if (ret != GNUTLS_E_SUCCESS) {

360

357

fprintf(stderr,

361

358

"Error[%d] while reading the OpenPGP key pair ('%s',"

362

" '%s')\n", ret, pubkeyfilename, seckeyfilename);

359

" '%s')\n", ret, pubkeyfile, seckeyfile);

363

360

fprintf(stdout, "The GnuTLS error is: %s\n",

364

361

safer_gnutls_strerror(ret));

365

362

goto globalfail;

380

377

}

381

378

382

379

gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);

383

380

384

381

return 0;

385

382

386

383

globalfail:

387

384

388

385

gnutls_certificate_free_credentials(mc->cred);

389

386

gnutls_global_deinit();

390

387

return -1;

388

391

389

}

392

390

393

391

static int init_gnutls_session(mandos_context *mc,

465

463

perror("socket");

466

464

return -1;

467

465

}

468

466

469

467

if(debug){

470

468

if(if_indextoname((unsigned int)if_index, interface) == NULL){

471

469

perror("if_indextoname");

474

472

fprintf(stderr, "Binding to interface %s\n", interface);

475

473

}

476

474

477

memset(&to, 0, sizeof(to));

475

memset(&to,0,sizeof(to)); /* Spurious warning */

478

476

to.in6.sin6_family = AF_INET6;

479

477

/* It would be nice to have a way to detect if we were passed an

480

478

IPv4 address here. Now we assume an IPv6 address. */

510

508

perror("connect");

511

509

return -1;

512

510

}

513

511

514

512

const char *out = mandos_protocol_version;

515

513

written = 0;

516

514

while (true){

534

532

}

535

533

}

536

534

}

537

535

538

536

if(debug){

539

537

fprintf(stderr, "Establishing TLS session with %s\n", ip);

540

538

}

541

539

542

540

gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);

543

541

544

542

do{

545

543

ret = gnutls_handshake (session);

546

544

} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);

560

558

fprintf(stderr, "Retrieving pgp encrypted password from %s\n",

561

559

ip);

562

560

}

563

561

564

562

while(true){

565

563

buffer_capacity = adjustbuffer(&buffer, buffer_length,

566

564

buffer_capacity);

634

632

} else {

635

633

retval = -1;

636

634

}

637

} else {

638

retval = -1;

639

635

}

640

636

641

637

/* Shutdown procedure */

662

658

flags,

663

659

void* userdata) {

664

660

mandos_context *mc = userdata;

665

assert(r);

661

assert(r); /* Spurious warning */

666

662

667

663

/* Called whenever a service has been resolved successfully or

668

664

timed out */

704

700

flags,

705

701

void* userdata) {

706

702

mandos_context *mc = userdata;

707

assert(b);

703

assert(b); /* Spurious warning */

708

704

709

705

/* Called whenever a new services becomes available on the LAN or

710

706

is removed from the LAN */

746

742

747

743

/* Combines file name and path and returns the malloced new

748

744

string. some sane checks could/should be added */

749

static char *combinepath(const char *first, const char *second){

750

char *tmp;

751

int ret = asprintf(&tmp, "%s/%s", first, second);

752

if(ret < 0){

745

static const char *combinepath(const char *first, const char *second){

746

size_t f_len = strlen(first);

747

size_t s_len = strlen(second);

748

char *tmp = malloc(f_len + s_len + 2);

749

if (tmp == NULL){

753

750

return NULL;

754

751

}

752

if(f_len > 0){

753

memcpy(tmp, first, f_len); /* Spurious warning */

754

}

755

tmp[f_len] = '/';

756

if(s_len > 0){

757

memcpy(tmp + f_len + 1, second, s_len); /* Spurious warning */

758

}

759

tmp[f_len + 1 + s_len] = '\0';

755

760

return tmp;

756

761

}

757

762

768

773

gid_t gid;

769

774

char *connect_to = NULL;

770

775

AvahiIfIndex if_index = AVAHI_IF_UNSPEC;

771

char *pubkeyfilename = NULL;

772

char *seckeyfilename = NULL;

773

const char *pubkeyname = "pubkey.txt";

774

const char *seckeyname = "seckey.txt";

776

const char *pubkeyfile = "pubkey.txt";

777

const char *seckeyfile = "seckey.txt";

775

778

mandos_context mc = { .simple_poll = NULL, .server = NULL,

776

.dh_bits = 1024, .priority = "SECURE256"

777

":!CTYPE-X.509:+CTYPE-OPENPGP" };

779

.dh_bits = 1024, .priority = "SECURE256"};

778

780

bool gnutls_initalized = false;

779

781

780

782

{

782

784

{ .name = "debug", .key = 128,

783

785

.doc = "Debug mode", .group = 3 },

784

786

{ .name = "connect", .key = 'c',

785

.arg = "ADDRESS:PORT",

786

.doc = "Connect directly to a specific Mandos server",

787

.arg = "IP",

788

.doc = "Connect directly to a sepcified mandos server",

787

789

.group = 1 },

788

790

{ .name = "interface", .key = 'i',

789

.arg = "NAME",

790

.doc = "Interface that will be used to search for Mandos"

791

" servers",

791

.arg = "INTERFACE",

792

.doc = "Interface that Avahi will conntect through",

792

793

.group = 1 },

793

794

{ .name = "keydir", .key = 'd',

794

.arg = "DIRECTORY",

795

.doc = "Directory to read the OpenPGP key files from",

795

.arg = "KEYDIR",

796

.doc = "Directory where the openpgp keyring is",

796

797

.group = 1 },

797

798

{ .name = "seckey", .key = 's',

798

.arg = "FILE",

799

.doc = "OpenPGP secret key file base name",

799

.arg = "SECKEY",

800

.doc = "Secret openpgp key for gnutls authentication",

800

801

.group = 1 },

801

802

{ .name = "pubkey", .key = 'p',

802

.arg = "FILE",

803

.doc = "OpenPGP public key file base name",

803

.arg = "PUBKEY",

804

.doc = "Public openpgp key for gnutls authentication",

804

805

.group = 2 },

805

806

{ .name = "dh-bits", .key = 129,

806

807

.arg = "BITS",

807

.doc = "Bit length of the prime number used in the"

808

" Diffie-Hellman key exchange",

808

.doc = "dh-bits to use in gnutls communication",

809

.group = 2 },

810

{ .name = "priority", .key = 130,

811

.arg = "STRING",

812

.doc = "GnuTLS priority string for the TLS handshake",

813

.group = 1 },

811

.arg = "PRIORITY",

812

.doc = "GNUTLS priority", .group = 1 },

814

813

{ .name = NULL }

815

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: /* --debug */

822

case 128:

823

debug = true;

824

break;

825

case 'c': /* --connect */

825

case 'c':

826

connect_to = arg;

827

break;

828

case 'i': /* --interface */

828

case 'i':

829

interface = arg;

830

break;

831

case 'd': /* --keydir */

831

case 'd':

832

keydir = arg;

833

break;

834

case 's': /* --seckey */

835

seckeyname = arg;

836

break;

837

case 'p': /* --pubkey */

838

pubkeyname = arg;

839

break;

840

case 129: /* --dh-bits */

834

case 's':

835

seckeyfile = arg;

836

break;

837

case 'p':

838

pubkeyfile = arg;

839

break;

840

case 129:

841

errno = 0;

842

mc.dh_bits = (unsigned int) strtol(arg, NULL, 10);

843

if (errno){

845

exit(EXIT_FAILURE);

846

}

847

break;

848

case 130: /* --priority */

848

case 130:

849

mc.priority = arg;

850

break;

851

case ARGP_KEY_ARG:

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 a Mandos server" };

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");

869

goto end;

870

}

871

}

872

873

pubkeyfilename = combinepath(keydir, pubkeyname);

874

if (pubkeyfilename == NULL){

875

perror("combinepath");

876

exitcode = EXIT_FAILURE;

877

goto end;

878

}

879

880

seckeyfilename = combinepath(keydir, seckeyname);

881

if (seckeyfilename == NULL){

882

perror("combinepath");

883

exitcode = EXIT_FAILURE;

884

goto end;

885

}

886

887

ret = init_gnutls_global(&mc, pubkeyfilename, seckeyfilename);

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;

901

exitcode = EXIT_FAILURE;

902

goto end;

903

}

904

strcpy(network.ifr_name, interface);

904

strcpy(network.ifr_name, interface); /* Spurious warning */

905

ret = ioctl(sd, SIOCGIFFLAGS, &network);

906

if(ret == -1){

907

perror("ioctl SIOCGIFFLAGS");

981

exitcode = EXIT_FAILURE;

982

goto end;

983

}

984

985

{

986

AvahiServerConfig config;

987

/* Do not publish any local Zeroconf records */

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

}

1021

}

1022

1023

/* Run the main loop */

1024

1025

if (debug){

1026

fprintf(stderr, "Starting Avahi loop search\n");

1027

}

1029

avahi_simple_poll_loop(mc.simple_poll);

1030

1031

end:

1032

1033

if (debug){

1034

fprintf(stderr, "%s exiting\n", argv[0]);

1035

}

1040

1041

if (mc.server != NULL)

1042

avahi_server_free(mc.server);

1043

1044

if (mc.simple_poll != NULL)

1045

avahi_simple_poll_free(mc.simple_poll);

1046

free(pubkeyfilename);

1047

free(seckeyfilename);

1048

1046

free(pubkeyfile);

1047

free(seckeyfile);

1048

1049

if (gnutls_initalized){

1050

gnutls_certificate_free_credentials(mc.cred);

1051

gnutls_global_deinit ();