/mandos/release : revision 41

34

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 <net/if.h> /* ifreq, SIOCGIFFLAGS, SIOCSIFFLAGS,

48

IFF_UP */

49

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

50

sockaddr_in6, PF_INET6,

51

SOCK_STREAM, INET6_ADDRSTRLEN,

52

uid_t, gid_t */

53

#include <sys/socket.h> /* socket(), struct sockaddr_in6,

54

struct in6_addr, inet_pton(),

55

connect() */

56

#include <assert.h> /* assert() */

57

#include <errno.h> /* perror(), errno */

58

#include <time.h> /* time() */

37

#include <stdio.h>

38

#include <assert.h>

39

#include <stdlib.h>

40

#include <time.h>

41

#include <net/if.h> /* if_nametoindex */

42

#include <sys/ioctl.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,

43

SIOCSIFFLAGS */

59

44

#include <net/if.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,

60

SIOCSIFFLAGS, if_indextoname(),

61

if_nametoindex(), IF_NAMESIZE */

62

#include <unistd.h> /* close(), SEEK_SET, off_t, write(),

63

getuid(), getgid(), setuid(),

64

setgid() */

65

#include <netinet/in.h>

66

#include <arpa/inet.h> /* inet_pton(), htons */

67

#include <iso646.h> /* not, and */

68

#include <argp.h> /* struct argp_option, error_t, struct

69

argp_state, struct argp,

70

argp_parse(), ARGP_KEY_ARG,

71

ARGP_KEY_END, ARGP_ERR_UNKNOWN */

45

SIOCSIFFLAGS */

72

46

73

/* Avahi */

74

/* All Avahi types, constants and functions

75

Avahi*, avahi_*,

76

AVAHI_* */

77

47

#include <avahi-core/core.h>

78

48

#include <avahi-core/lookup.h>

79

49

#include <avahi-core/log.h>

81

51

#include <avahi-common/malloc.h>

82

52

#include <avahi-common/error.h>

83

53

84

/* GnuTLS */

85

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

86

gnutls_*

87

init_gnutls_session(),

88

GNUTLS_* */

89

#include <gnutls/openpgp.h> /* gnutls_certificate_set_openpgp_key_file(),

90

GNUTLS_OPENPGP_FMT_BASE64 */

54

/* Mandos client part */

55

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

56

#include <sys/socket.h> /* socket(), struct sockaddr_in6,

57

struct in6_addr, inet_pton() */

58

#include <gnutls/gnutls.h> /* All GnuTLS stuff */

59

#include <gnutls/openpgp.h> /* GnuTLS with openpgp stuff */

60

61

#include <unistd.h> /* close() */

62

#include <netinet/in.h>

63

#include <stdbool.h> /* true */

64

#include <string.h> /* memset */

65

#include <arpa/inet.h> /* inet_pton() */

66

#include <iso646.h> /* not */

67

#include <net/if.h> /* IF_NAMESIZE */

91

68

92

69

/* GPGME */

93

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

94

gpgme_*

95

GPGME_PROTOCOL_OpenPGP,

96

GPG_ERR_NO_* */

70

#include <errno.h> /* perror() */

71

#include <gpgme.h>

72

73

/* getopt_long */

74

#include <getopt.h>

97

75

98

76

#define BUFFER_SIZE 256

99

77

78

static const char *keydir = "/conf/conf.d/mandos";

79

static const char *pubkeyfile = "pubkey.txt";

80

static const char *seckeyfile = "seckey.txt";

81

100

82

bool debug = false;

101

static const char *keydir = "/conf/conf.d/mandos";

102

static const char mandos_protocol_version[] = "1";

103

const char *argp_program_version = "password-request 1.0";

104

const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";

105

106

/* Used for passing in values through the Avahi callback functions */

83

84

const char mandos_protocol_version[] = "1";

85

86

/* Used for passing in values through all the callback functions */

107

87

typedef struct {

108

88

AvahiSimplePoll *simple_poll;

109

89

AvahiServer *server;

113

93

const char *priority;

114

94

} mandos_context;

115

95

116

/*

117

* Make room in "buffer" for at least BUFFER_SIZE additional bytes.

118

* "buffer_capacity" is how much is currently allocated,

119

* "buffer_length" is how much is already used.

120

*/

121

96

size_t adjustbuffer(char **buffer, size_t buffer_length,

122

97

size_t buffer_capacity){

123

98

if (buffer_length + BUFFER_SIZE > buffer_capacity){

258

233

259

234

*plaintext = NULL;

260

235

while(true){

261

plaintext_capacity = adjustbuffer(plaintext,

262

(size_t)plaintext_length,

236

plaintext_capacity = adjustbuffer(plaintext, (size_t)plaintext_length,

263

237

plaintext_capacity);

264

238

if (plaintext_capacity == 0){

265

239

perror("adjustbuffer");

313

287

fprintf(stderr, "GnuTLS: %s", string);

314

288

}

315

289

316

static int init_gnutls_global(mandos_context *mc,

317

const char *pubkeyfile,

318

const char *seckeyfile){

290

static int init_gnutls_global(mandos_context *mc){

319

291

int ret;

320

292

321

293

if(debug){

322

294

fprintf(stderr, "Initializing GnuTLS\n");

323

295

}

324

325

ret = gnutls_global_init();

326

if (ret != GNUTLS_E_SUCCESS) {

296

297

if ((ret = gnutls_global_init ())

298

!= GNUTLS_E_SUCCESS) {

327

299

fprintf (stderr, "GnuTLS global_init: %s\n",

328

300

safer_gnutls_strerror(ret));

329

301

return -1;

338

310

}

339

311

340

312

/* OpenPGP credentials */

341

gnutls_certificate_allocate_credentials(&mc->cred);

342

if (ret != GNUTLS_E_SUCCESS){

313

if ((ret = gnutls_certificate_allocate_credentials (&mc->cred))

314

!= GNUTLS_E_SUCCESS) {

343

315

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

344

316

safer_gnutls_strerror(ret));

345

gnutls_global_deinit ();

346

317

return -1;

347

318

}

348

319

360

331

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

361

332

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

362

333

safer_gnutls_strerror(ret));

363

goto globalfail;

334

return -1;

364

335

}

365

336

366

337

/* GnuTLS server initialization */

368

339

if (ret != GNUTLS_E_SUCCESS) {

369

340

fprintf (stderr, "Error in GnuTLS DH parameter initialization:"

370

341

" %s\n", safer_gnutls_strerror(ret));

371

goto globalfail;

342

return -1;

372

343

}

373

344

ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);

374

345

if (ret != GNUTLS_E_SUCCESS) {

375

346

fprintf (stderr, "Error in GnuTLS prime generation: %s\n",

376

347

safer_gnutls_strerror(ret));

377

goto globalfail;

348

return -1;

378

349

}

379

350

380

351

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

381

352

382

353

return 0;

383

384

globalfail:

385

386

gnutls_certificate_free_credentials(mc->cred);

387

gnutls_global_deinit();

388

return -1;

389

390

354

}

391

355

392

static int init_gnutls_session(mandos_context *mc,

393

gnutls_session_t *session){

356

static int init_gnutls_session(mandos_context *mc, gnutls_session_t *session){

394

357

int ret;

395

358

/* GnuTLS session creation */

396

359

ret = gnutls_init(session, GNUTLS_SERVER);

406

369

fprintf(stderr, "Syntax error at: %s\n", err);

407

370

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

408

371

safer_gnutls_strerror(ret));

409

gnutls_deinit (*session);

410

372

return -1;

411

373

}

412

374

}

416

378

if (ret != GNUTLS_E_SUCCESS) {

417

379

fprintf(stderr, "Error setting GnuTLS credentials: %s\n",

418

380

safer_gnutls_strerror(ret));

419

gnutls_deinit (*session);

420

381

return -1;

421

382

}

422

383

438

399

AvahiIfIndex if_index,

439

400

mandos_context *mc){

440

401

int ret, tcp_sd;

441

union { struct sockaddr in; struct sockaddr_in6 in6; } to;

402

struct sockaddr_in6 to;

442

403

char *buffer = NULL;

443

404

char *decrypted_buffer;

444

405

size_t buffer_length = 0;

448

409

int retval = 0;

449

410

char interface[IF_NAMESIZE];

450

411

gnutls_session_t session;

412

gnutls_dh_params_t dh_params;

451

413

452

414

ret = init_gnutls_session (mc, &session);

453

415

if (ret != 0){

474

436

}

475

437

476

438

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

477

to.in6.sin6_family = AF_INET6;

439

to.sin6_family = AF_INET6;

478

440

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

479

441

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

480

ret = inet_pton(AF_INET6, ip, &to.in6.sin6_addr);

442

ret = inet_pton(AF_INET6, ip, &to.sin6_addr);

481

443

if (ret < 0 ){

482

444

perror("inet_pton");

483

445

return -1;

486

448

fprintf(stderr, "Bad address: %s\n", ip);

487

449

return -1;

488

450

}

489

to.in6.sin6_port = htons(port); /* Spurious warning */

451

to.sin6_port = htons(port); /* Spurious warning */

490

452

491

to.in6.sin6_scope_id = (uint32_t)if_index;

453

to.sin6_scope_id = (uint32_t)if_index;

492

454

493

455

if(debug){

494

456

fprintf(stderr, "Connection to: %s, port %d\n", ip, port);

495

457

char addrstr[INET6_ADDRSTRLEN] = "";

496

if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,

458

if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr,

497

459

sizeof(addrstr)) == NULL){

498

460

perror("inet_ntop");

499

461

} else {

503

465

}

504

466

}

505

467

506

ret = connect(tcp_sd, &to.in, sizeof(to));

468

ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));

507

469

if (ret < 0){

508

470

perror("connect");

509

471

return -1;

538

500

}

539

501

540

502

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

503

504

ret = gnutls_handshake (session);

545

505

546

506

if (ret != GNUTLS_E_SUCCESS){

547

507

if(debug){

560

520

}

561

521

562

522

while(true){

563

buffer_capacity = adjustbuffer(&buffer, buffer_length,

564

buffer_capacity);

523

buffer_capacity = adjustbuffer(&buffer, buffer_length, buffer_capacity);

565

524

if (buffer_capacity == 0){

566

525

perror("adjustbuffer");

567

526

retval = -1;

579

538

case GNUTLS_E_AGAIN:

580

539

break;

581

540

case GNUTLS_E_REHANDSHAKE:

582

do{

583

ret = gnutls_handshake (session);

584

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

541

ret = gnutls_handshake (session);

585

542

if (ret < 0){

586

543

fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");

587

544

gnutls_perror (ret);

640

597

free(buffer);

641

598

close(tcp_sd);

642

599

gnutls_deinit (session);

600

gnutls_certificate_free_credentials (mc->cred);

601

gnutls_global_deinit ();

643

602

return retval;

644

603

}

645

604

772

731

gid_t gid;

773

732

char *connect_to = NULL;

774

733

AvahiIfIndex if_index = AVAHI_IF_UNSPEC;

775

const char *pubkeyfile = "pubkey.txt";

776

const char *seckeyfile = "seckey.txt";

777

734

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

778

735

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

779

bool gnutls_initalized = false;

780

736

781

737

{

782

struct argp_option options[] = {

783

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

784

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

785

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

786

.arg = "IP",

787

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

788

.group = 1 },

789

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

790

.arg = "INTERFACE",

791

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

792

.group = 1 },

793

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

794

.arg = "KEYDIR",

795

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

796

.group = 1 },

797

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

798

.arg = "SECKEY",

799

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

800

.group = 1 },

801

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

802

.arg = "PUBKEY",

803

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

804

.group = 2 },

805

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

806

.arg = "BITS",

807

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

808

.group = 2 },

809

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

810

.arg = "PRIORITY",

811

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

812

{ .name = NULL }

813

};

814

815

816

error_t parse_opt (int key, char *arg,

817

struct argp_state *state) {

818

/* Get the INPUT argument from `argp_parse', which we know is

819

a pointer to our plugin list pointer. */

820

switch (key) {

821

case 128:

822

debug = true;

738

/* Temporary int to get the address of for getopt_long */

739

int debug_int = debug ? 1 : 0;

740

while (true){

741

struct option long_options[] = {

742

{"debug", no_argument, &debug_int, 1},

743

{"connect", required_argument, NULL, 'c'},

744

{"interface", required_argument, NULL, 'i'},

745

{"keydir", required_argument, NULL, 'd'},

746

{"seckey", required_argument, NULL, 's'},

747

{"pubkey", required_argument, NULL, 'p'},

748

{"dh-bits", required_argument, NULL, 'D'},

749

{"priority", required_argument, NULL, 'P'},

750

{0, 0, 0, 0} };

751

752

int option_index = 0;

753

ret = getopt_long (argc, argv, "i:", long_options,

754

&option_index);

755

756

if (ret == -1){

757

break;

758

}

759

760

switch(ret){

761

case 0:

762

break;

763

case 'i':

764

interface = optarg;

823

765

break;

824

766

case 'c':

825

connect_to = arg;

826

break;

827

case 'i':

828

interface = arg;

767

connect_to = optarg;

829

768

break;

830

769

case 'd':

831

keydir = arg;

770

keydir = optarg;

771

break;

772

case 'p':

773

pubkeyfile = optarg;

832

774

break;

833

775

case 's':

834

seckeyfile = arg;

835

break;

836

case 'p':

837

pubkeyfile = arg;

838

break;

839

case 129:

776

seckeyfile = optarg;

777

break;

778

case 'D':

840

779

errno = 0;

841

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

780

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

842

781

if (errno){

843

782

perror("strtol");

844

783

exit(EXIT_FAILURE);

845

784

}

846

785

break;

847

case 130:

848

mc.priority = arg;

849

break;

850

case ARGP_KEY_ARG:

851

argp_usage (state);

852

break;

853

case ARGP_KEY_END:

854

break;

786

case 'P':

787

mc.priority = optarg;

788

break;

789

case '?':

855

790

default:

856

return ARGP_ERR_UNKNOWN;

791

/* getopt_long() has already printed a message about the

792

unrcognized option, so just exit. */

793

exit(EXIT_FAILURE);

857

794

}

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, "Unkown error while parsing arguments\n");

868

exitcode = EXIT_FAILURE;

869

goto end;

870

}

795

}

796

/* Set the global debug flag from the temporary int */

797

debug = debug_int ? true : false;

871

798

}

872

799

873

800

pubkeyfile = combinepath(keydir, pubkeyfile);

874

801

if (pubkeyfile == NULL){

875

802

perror("combinepath");

883

810

goto end;

884

811

}

885

812

886

ret = init_gnutls_global(&mc, pubkeyfile, seckeyfile);

813

ret = init_gnutls_global(&mc);

887

814

if (ret == -1){

888

815

fprintf(stderr, "init_gnutls_global\n");

889

816

goto end;

890

} else {

891

gnutls_initalized = true;

892

817

}

893

818

894

819

uid = getuid();

1043

968

avahi_simple_poll_free(mc.simple_poll);

1044

969

free(pubkeyfile);

1045

970

free(seckeyfile);

1046

1047

if (gnutls_initalized){

1048

gnutls_certificate_free_credentials(mc.cred);

1049

gnutls_global_deinit ();

1050

}

1051

971

1052

972

return exitcode;

1053

973

}