/mandos/trunk : revision 155

1

/* -*- coding: utf-8 -*- */

2

/*

3

* Mandos-client - get and decrypt data from a Mandos server

3

* Mandos client - get and decrypt data from a Mandos server

4

*

5

* This program is partly derived from an example program for an Avahi

6

* service browser, downloaded from

9

* "browse_callback", and parts of "main".

10

*

11

* Everything else is

12

13

12

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

38

stdout, ferror() */

40

39

#include <stdint.h> /* uint16_t, uint32_t */

41

40

#include <stddef.h> /* NULL, size_t, ssize_t */

42

41

#include <stdlib.h> /* free(), EXIT_SUCCESS, EXIT_FAILURE,

48

47

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

49

48

sockaddr_in6, PF_INET6,

50

49

SOCK_STREAM, INET6_ADDRSTRLEN,

51

uid_t, gid_t, open(), opendir(),

52

DIR */

50

uid_t, gid_t, open(), opendir(), DIR */

53

51

#include <sys/stat.h> /* open() */

54

52

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

55

53

struct in6_addr, inet_pton(),

56

54

connect() */

57

55

#include <fcntl.h> /* open() */

58

#include <dirent.h> /* opendir(), struct dirent, readdir()

59

*/

60

#include <inttypes.h> /* PRIu16, SCNu16 */

56

#include <dirent.h> /* opendir(), struct dirent, readdir() */

57

#include <inttypes.h> /* PRIu16 */

61

58

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

62

59

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

63

60

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

69

66

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

70

67

setgid() */

71

68

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

72

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

69

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

73

70

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

74

71

argp_state, struct argp,

75

72

argp_parse(), ARGP_KEY_ARG,

92

89

gnutls_*

93

90

init_gnutls_session(),

94

91

GNUTLS_* */

95

#include <gnutls/openpgp.h>

96

/* gnutls_certificate_set_openpgp_key_file(),

92

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

97

93

GNUTLS_OPENPGP_FMT_BASE64 */

98

94

99

95

/* GPGME */

105

101

106

102

#define BUFFER_SIZE 256

107

103

104

/*

105

#define PATHDIR "/conf/conf.d/mandos"

106

*/

107

108

#define PATHDIR "/conf/conf.d/mandos"

109

#define SECKEY "seckey.txt"

110

#define PUBKEY "pubkey.txt"

110

#define PUBKEY "pupkey.txt"

111

112

bool debug = false;

113

static const char mandos_protocol_version[] = "1";

114

const char *argp_program_version = "mandos-client " VERSION;

114

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

115

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

116

117

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

132

*/

133

size_t adjustbuffer(char **buffer, size_t buffer_length,

134

size_t buffer_capacity){

135

if(buffer_length + BUFFER_SIZE > buffer_capacity){

135

if (buffer_length + BUFFER_SIZE > buffer_capacity){

136

*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);

137

if(buffer == NULL){

137

if (buffer == NULL){

138

return 0;

139

}

140

buffer_capacity += BUFFER_SIZE;

150

int ret;

151

gpgme_error_t rc;

152

gpgme_engine_info_t engine_info;

153

154

155

/*

156

* Helper function to insert pub and seckey to the enigne keyring.

159

int fd;

160

gpgme_data_t pgp_data;

161

162

fd = (int)TEMP_FAILURE_RETRY(open(filename, O_RDONLY));

162

fd = TEMP_FAILURE_RETRY(open(filename, O_RDONLY));

163

if(fd == -1){

164

perror("open");

165

return false;

166

}

167

168

rc = gpgme_data_new_from_fd(&pgp_data, fd);

169

if(rc != GPG_ERR_NO_ERROR){

169

if (rc != GPG_ERR_NO_ERROR){

170

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

171

gpgme_strsource(rc), gpgme_strerror(rc));

172

return false;

173

}

174

175

rc = gpgme_op_import(mc->ctx, pgp_data);

176

if(rc != GPG_ERR_NO_ERROR){

176

if (rc != GPG_ERR_NO_ERROR){

177

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

178

gpgme_strsource(rc), gpgme_strerror(rc));

179

return false;

180

}

181

182

ret = (int)TEMP_FAILURE_RETRY(close(fd));

181

182

ret = TEMP_FAILURE_RETRY(close(fd));

183

if(ret == -1){

184

perror("close");

185

}

187

return true;

188

}

189

190

if(debug){

190

if (debug){

191

fprintf(stderr, "Initialize gpgme\n");

192

}

193

194

/* Init GPGME */

195

gpgme_check_version(NULL);

196

rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);

197

if(rc != GPG_ERR_NO_ERROR){

197

if (rc != GPG_ERR_NO_ERROR){

198

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

199

gpgme_strsource(rc), gpgme_strerror(rc));

200

return false;

201

}

202

203

/* Set GPGME home directory for the OpenPGP engine only */

204

rc = gpgme_get_engine_info(&engine_info);

205

if(rc != GPG_ERR_NO_ERROR){

204

rc = gpgme_get_engine_info (&engine_info);

205

if (rc != GPG_ERR_NO_ERROR){

206

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

207

gpgme_strsource(rc), gpgme_strerror(rc));

208

return false;

219

fprintf(stderr, "Could not set GPGME home dir to %s\n", tempdir);

220

return false;

221

}

222

223

/* Create new GPGME "context" */

224

rc = gpgme_new(&(mc->ctx));

225

if(rc != GPG_ERR_NO_ERROR){

225

if (rc != GPG_ERR_NO_ERROR){

226

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

227

gpgme_strsource(rc), gpgme_strerror(rc));

228

return false;

229

}

230

231

if(not import_key(pubkey) or not import_key(seckey)){

231

if (not import_key(pubkey) or not import_key(seckey)){

232

return false;

233

}

234

239

* Decrypt OpenPGP data.

240

* Returns -1 on error

241

*/

242

static ssize_t pgp_packet_decrypt(const mandos_context *mc,

243

const char *cryptotext,

244

size_t crypto_size,

245

char **plaintext){

242

static ssize_t pgp_packet_decrypt (const mandos_context *mc,

243

const char *cryptotext,

244

size_t crypto_size,

245

char **plaintext){

246

gpgme_data_t dh_crypto, dh_plain;

247

gpgme_error_t rc;

248

ssize_t ret;

249

size_t plaintext_capacity = 0;

250

ssize_t plaintext_length = 0;

251

252

if(debug){

252

if (debug){

253

fprintf(stderr, "Trying to decrypt OpenPGP data\n");

254

}

255

256

/* Create new GPGME data buffer from memory cryptotext */

257

rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,

258

0);

259

if(rc != GPG_ERR_NO_ERROR){

259

if (rc != GPG_ERR_NO_ERROR){

260

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

261

gpgme_strsource(rc), gpgme_strerror(rc));

262

return -1;

264

265

/* Create new empty GPGME data buffer for the plaintext */

266

rc = gpgme_data_new(&dh_plain);

267

if(rc != GPG_ERR_NO_ERROR){

267

if (rc != GPG_ERR_NO_ERROR){

268

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

269

gpgme_strsource(rc), gpgme_strerror(rc));

270

gpgme_data_release(dh_crypto);

274

/* Decrypt data from the cryptotext data buffer to the plaintext

275

data buffer */

276

rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);

277

if(rc != GPG_ERR_NO_ERROR){

277

if (rc != GPG_ERR_NO_ERROR){

278

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

279

gpgme_strsource(rc), gpgme_strerror(rc));

280

plaintext_length = -1;

281

if(debug){

281

if (debug){

282

gpgme_decrypt_result_t result;

283

result = gpgme_op_decrypt_result(mc->ctx);

284

if(result == NULL){

284

if (result == NULL){

285

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

286

} else {

287

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

314

}

315

316

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

317

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

318

perror("gpgme_data_seek");

317

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

318

perror("pgpme_data_seek");

319

plaintext_length = -1;

320

goto decrypt_end;

321

}

325

plaintext_capacity = adjustbuffer(plaintext,

326

(size_t)plaintext_length,

327

plaintext_capacity);

328

if(plaintext_capacity == 0){

328

if (plaintext_capacity == 0){

329

perror("adjustbuffer");

330

plaintext_length = -1;

331

goto decrypt_end;

334

ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,

335

BUFFER_SIZE);

336

/* Print the data, if any */

337

if(ret == 0){

337

if (ret == 0){

338

/* EOF */

339

break;

340

}

364

return plaintext_length;

365

}

366

367

static const char * safer_gnutls_strerror(int value) {

368

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

369

if(ret == NULL)

367

static const char * safer_gnutls_strerror (int value) {

368

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

369

if (ret == NULL)

370

ret = "(unknown)";

371

return ret;

372

}

387

}

388

389

ret = gnutls_global_init();

390

if(ret != GNUTLS_E_SUCCESS) {

391

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

392

safer_gnutls_strerror(ret));

390

if (ret != GNUTLS_E_SUCCESS) {

391

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

392

safer_gnutls_strerror(ret));

393

return -1;

394

}

395

396

if(debug){

396

if (debug){

397

/* "Use a log level over 10 to enable all debugging options."

398

* - GnuTLS manual

399

*/

403

404

/* OpenPGP credentials */

405

gnutls_certificate_allocate_credentials(&mc->cred);

406

if(ret != GNUTLS_E_SUCCESS){

407

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

408

warning */

409

safer_gnutls_strerror(ret));

410

gnutls_global_deinit();

406

if (ret != GNUTLS_E_SUCCESS){

407

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

408

warning */

409

safer_gnutls_strerror(ret));

410

gnutls_global_deinit ();

411

return -1;

412

}

413

420

ret = gnutls_certificate_set_openpgp_key_file

421

(mc->cred, pubkeyfilename, seckeyfilename,

422

GNUTLS_OPENPGP_FMT_BASE64);

423

if(ret != GNUTLS_E_SUCCESS) {

423

if (ret != GNUTLS_E_SUCCESS) {

424

fprintf(stderr,

425

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

426

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

431

432

/* GnuTLS server initialization */

433

ret = gnutls_dh_params_init(&mc->dh_params);

434

if(ret != GNUTLS_E_SUCCESS) {

435

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

436

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

434

if (ret != GNUTLS_E_SUCCESS) {

435

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

436

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

437

goto globalfail;

438

}

439

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

440

if(ret != GNUTLS_E_SUCCESS) {

441

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

442

safer_gnutls_strerror(ret));

440

if (ret != GNUTLS_E_SUCCESS) {

441

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

442

safer_gnutls_strerror(ret));

443

goto globalfail;

444

}

445

451

452

gnutls_certificate_free_credentials(mc->cred);

453

gnutls_global_deinit();

454

gnutls_dh_params_deinit(mc->dh_params);

455

454

return -1;

456

455

}

457

456

460

459

int ret;

461

460

/* GnuTLS session creation */

462

461

ret = gnutls_init(session, GNUTLS_SERVER);

463

if(ret != GNUTLS_E_SUCCESS){

462

if (ret != GNUTLS_E_SUCCESS){

464

463

fprintf(stderr, "Error in GnuTLS session initialization: %s\n",

465

464

safer_gnutls_strerror(ret));

466

465

}

468

467

{

469

468

const char *err;

470

469

ret = gnutls_priority_set_direct(*session, mc->priority, &err);

471

if(ret != GNUTLS_E_SUCCESS) {

470

if (ret != GNUTLS_E_SUCCESS) {

472

471

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

473

472

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

474

473

safer_gnutls_strerror(ret));

475

gnutls_deinit(*session);

474

gnutls_deinit (*session);

476

475

return -1;

477

476

}

478

477

}

479

478

480

479

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

481

480

mc->cred);

482

if(ret != GNUTLS_E_SUCCESS) {

481

if (ret != GNUTLS_E_SUCCESS) {

483

482

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

484

483

safer_gnutls_strerror(ret));

485

gnutls_deinit(*session);

484

gnutls_deinit (*session);

486

485

return -1;

487

486

}

488

487

489

488

/* ignore client certificate if any. */

490

gnutls_certificate_server_set_request(*session,

491

GNUTLS_CERT_IGNORE);

489

gnutls_certificate_server_set_request (*session,

490

GNUTLS_CERT_IGNORE);

492

491

493

gnutls_dh_set_prime_bits(*session, mc->dh_bits);

492

gnutls_dh_set_prime_bits (*session, mc->dh_bits);

494

493

495

494

return 0;

496

495

}

504

503

AvahiIfIndex if_index,

505

504

mandos_context *mc){

506

505

int ret, tcp_sd;

507

ssize_t sret;

508

506

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

509

507

char *buffer = NULL;

510

508

char *decrypted_buffer;

516

514

char interface[IF_NAMESIZE];

517

515

gnutls_session_t session;

518

516

519

ret = init_gnutls_session(mc, &session);

520

if(ret != 0){

517

ret = init_gnutls_session (mc, &session);

518

if (ret != 0){

521

519

return -1;

522

520

}

523

521

545

543

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

546

544

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

547

545

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

548

if(ret < 0 ){

546

if (ret < 0 ){

549

547

perror("inet_pton");

550

548

return -1;

551

549

}

572

570

}

573

571

574

572

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

575

if(ret < 0){

573

if (ret < 0){

576

574

perror("connect");

577

575

return -1;

578

576

}

579

577

580

578

const char *out = mandos_protocol_version;

581

579

written = 0;

582

while(true){

580

while (true){

583

581

size_t out_size = strlen(out);

584

ret = (int)TEMP_FAILURE_RETRY(write(tcp_sd, out + written,

582

ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,

585

583

out_size - written));

586

if(ret == -1){

584

if (ret == -1){

587

585

perror("write");

588

586

retval = -1;

589

587

goto mandos_end;

592

590

if(written < out_size){

593

591

continue;

594

592

} else {

595

if(out == mandos_protocol_version){

593

if (out == mandos_protocol_version){

596

594

written = 0;

597

595

out = "\r\n";

598

596

} else {

605

603

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

606

604

}

607

605

608

gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);

606

gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);

609

607

610

608

do{

611

ret = gnutls_handshake(session);

609

ret = gnutls_handshake (session);

612

610

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

613

611

614

if(ret != GNUTLS_E_SUCCESS){

612

if (ret != GNUTLS_E_SUCCESS){

615

613

if(debug){

616

614

fprintf(stderr, "*** GnuTLS Handshake failed ***\n");

617

gnutls_perror(ret);

615

gnutls_perror (ret);

618

616

}

619

617

retval = -1;

620

618

goto mandos_end;

630

628

while(true){

631

629

buffer_capacity = adjustbuffer(&buffer, buffer_length,

632

630

buffer_capacity);

633

if(buffer_capacity == 0){

631

if (buffer_capacity == 0){

634

632

perror("adjustbuffer");

635

633

retval = -1;

636

634

goto mandos_end;

637

635

}

638

636

639

sret = gnutls_record_recv(session, buffer+buffer_length,

640

BUFFER_SIZE);

641

if(sret == 0){

637

ret = gnutls_record_recv(session, buffer+buffer_length,

638

BUFFER_SIZE);

639

if (ret == 0){

642

640

break;

643

641

}

644

if(sret < 0){

645

switch(sret){

642

if (ret < 0){

643

switch(ret){

646

644

case GNUTLS_E_INTERRUPTED:

647

645

case GNUTLS_E_AGAIN:

648

646

break;

649

647

case GNUTLS_E_REHANDSHAKE:

650

648

do{

651

ret = gnutls_handshake(session);

649

ret = gnutls_handshake (session);

652

650

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

653

if(ret < 0){

651

if (ret < 0){

654

652

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

655

gnutls_perror(ret);

653

gnutls_perror (ret);

656

654

retval = -1;

657

655

goto mandos_end;

658

656

}

661

659

fprintf(stderr, "Unknown error while reading data from"

662

660

" encrypted session with Mandos server\n");

663

661

retval = -1;

664

gnutls_bye(session, GNUTLS_SHUT_RDWR);

662

gnutls_bye (session, GNUTLS_SHUT_RDWR);

665

663

goto mandos_end;

666

664

}

667

665

} else {

668

buffer_length += (size_t) sret;

666

buffer_length += (size_t) ret;

669

667

}

670

668

}

671

669

673

671

fprintf(stderr, "Closing TLS session\n");

674

672

}

675

673

676

gnutls_bye(session, GNUTLS_SHUT_RDWR);

674

gnutls_bye (session, GNUTLS_SHUT_RDWR);

677

675

678

if(buffer_length > 0){

676

if (buffer_length > 0){

679

677

decrypted_buffer_size = pgp_packet_decrypt(mc, buffer,

680

678

buffer_length,

681

679

&decrypted_buffer);

682

if(decrypted_buffer_size >= 0){

680

if (decrypted_buffer_size >= 0){

683

681

written = 0;

684

682

while(written < (size_t) decrypted_buffer_size){

685

ret = (int)fwrite(decrypted_buffer + written, 1,

686

(size_t)decrypted_buffer_size - written,

687

stdout);

683

ret = (int)fwrite (decrypted_buffer + written, 1,

684

(size_t)decrypted_buffer_size - written,

685

stdout);

688

686

if(ret == 0 and ferror(stdout)){

689

687

if(debug){

690

688

fprintf(stderr, "Error writing encrypted data: %s\n",

707

705

708

706

mandos_end:

709

707

free(buffer);

710

ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));

708

ret = TEMP_FAILURE_RETRY(close(tcp_sd));

711

709

if(ret == -1){

712

710

perror("close");

713

711

}

714

gnutls_deinit(session);

712

gnutls_deinit (session);

715

713

return retval;

716

714

}

717

715

735

733

/* Called whenever a service has been resolved successfully or

736

734

timed out */

737

735

738

switch(event) {

736

switch (event) {

739

737

default:

740

738

case AVAHI_RESOLVER_FAILURE:

741

739

fprintf(stderr, "(Avahi Resolver) Failed to resolve service '%s'"

753

751

interface, port);

754

752

}

755

753

int ret = start_mandos_communication(ip, port, interface, mc);

756

if(ret == 0){

754

if (ret == 0){

757

755

avahi_simple_poll_quit(mc->simple_poll);

758

756

}

759

757

}

777

775

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

778

776

is removed from the LAN */

779

777

780

switch(event) {

778

switch (event) {

781

779

default:

782

780

case AVAHI_BROWSER_FAILURE:

783

781

792

790

the callback function is called the Avahi server will free the

793

791

resolver for us. */

794

792

795

if(!(avahi_s_service_resolver_new(mc->server, interface,

793

if (!(avahi_s_service_resolver_new(mc->server, interface,

796

794

protocol, name, type, domain,

797

795

AVAHI_PROTO_INET6, 0,

798

796

resolve_callback, mc)))

832

830

.dh_bits = 1024, .priority = "SECURE256"

833

831

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

834

832

bool gnutls_initalized = false;

835

bool gpgme_initalized = false;

833

bool pgpme_initalized = false;

836

834

837

835

{

838

836

struct argp_option options[] = {

867

865

{ .name = NULL }

868

866

};

869

867

870

error_t parse_opt(int key, char *arg,

871

struct argp_state *state) {

872

switch(key) {

868

error_t parse_opt (int key, char *arg,

869

struct argp_state *state) {

870

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

871

a pointer to our plugin list pointer. */

872

switch (key) {

873

case 128: /* --debug */

874

debug = true;

875

break;

886

pubkey = arg;

887

break;

888

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

889

ret = sscanf(arg, "%u", &mc.dh_bits);

890

if(ret != 1){

891

fprintf(stderr, "Bad number of DH bits\n");

889

errno = 0;

890

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

891

if (errno){

892

perror("strtol");

892

893

exit(EXIT_FAILURE);

893

894

}

894

895

break;

896

897

mc.priority = arg;

897

898

break;

898

899

case ARGP_KEY_ARG:

899

argp_usage(state);

900

argp_usage (state);

900

901

case ARGP_KEY_END:

901

902

break;

902

903

default:

909

910

.args_doc = "",

910

911

.doc = "Mandos client -- Get and decrypt"

911

912

" passwords from a Mandos server" };

912

ret = argp_parse(&argp, argc, argv, 0, 0, NULL);

913

if(ret == ARGP_ERR_UNKNOWN){

913

ret = argp_parse (&argp, argc, argv, 0, 0, NULL);

914

if (ret == ARGP_ERR_UNKNOWN){

914

915

fprintf(stderr, "Unknown error while parsing arguments\n");

915

916

exitcode = EXIT_FAILURE;

916

917

goto end;

917

918

}

918

919

}

919

920

921

ret = init_gnutls_global(&mc, pubkey, seckey);

922

if (ret == -1){

923

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

924

exitcode = EXIT_FAILURE;

925

goto end;

926

} else {

927

gnutls_initalized = true;

928

}

929

930

if(mkdtemp(tempdir) == NULL){

931

perror("mkdtemp");

932

tempdir[0] = '\0';

933

goto end;

934

}

935

936

if(not init_gpgme(&mc, pubkey, seckey, tempdir)){

937

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

938

exitcode = EXIT_FAILURE;

939

goto end;

940

} else {

941

pgpme_initalized = true;

942

}

943

920

944

/* If the interface is down, bring it up */

921

945

{

922

946

sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);

941

965

goto end;

942

966

}

943

967

}

944

ret = (int)TEMP_FAILURE_RETRY(close(sd));

968

ret = TEMP_FAILURE_RETRY(close(sd));

945

969

if(ret == -1){

946

970

perror("close");

947

971

}

951

975

gid = getgid();

952

976

953

977

ret = setuid(uid);

954

if(ret == -1){

978

if (ret == -1){

955

979

perror("setuid");

956

980

}

957

981

958

982

setgid(gid);

959

if(ret == -1){

983

if (ret == -1){

960

984

perror("setgid");

961

985

}

962

986

963

ret = init_gnutls_global(&mc, pubkey, seckey);

964

if(ret == -1){

965

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

966

exitcode = EXIT_FAILURE;

967

goto end;

968

} else {

969

gnutls_initalized = true;

970

}

971

972

if(mkdtemp(tempdir) == NULL){

973

perror("mkdtemp");

974

tempdir[0] = '\0';

975

goto end;

976

}

977

978

if(not init_gpgme(&mc, pubkey, seckey, tempdir)){

979

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

980

exitcode = EXIT_FAILURE;

981

goto end;

982

} else {

983

gpgme_initalized = true;

984

}

985

986

987

if_index = (AvahiIfIndex) if_nametoindex(interface);

987

988

if(if_index == 0){

988

989

fprintf(stderr, "No such interface: \"%s\"\n", interface);

998

999

exitcode = EXIT_FAILURE;

999

1000

goto end;

1000

1001

}

1001

uint16_t port;

1002

ret = sscanf(address+1, "%" SCNu16, &port);

1003

if(ret != 1){

1004

fprintf(stderr, "Bad port number\n");

1002

errno = 0;

1003

uint16_t port = (uint16_t) strtol(address+1, NULL, 10);

1004

if(errno){

1005

perror("Bad port number");

1005

1006

exitcode = EXIT_FAILURE;

1006

1007

goto end;

1007

1008

}

1016

1017

goto end;

1017

1018

}

1018

1019

if(not debug){

1020

if (not debug){

1020

1021

avahi_set_log_function(empty_log);

1021

1022

}

1022

1023

1025

1026

1027

/* Allocate main Avahi loop object */

1027

1028

mc.simple_poll = avahi_simple_poll_new();

1028

if(mc.simple_poll == NULL) {

1029

if (mc.simple_poll == NULL) {

1029

1030

fprintf(stderr, "Avahi: Failed to create simple poll"

1030

1031

" object.\n");

1031

1032

exitcode = EXIT_FAILURE;

1051

1052

}

1052

1053

1054

/* Check if creating the Avahi server object succeeded */

1054

if(mc.server == NULL) {

1055

if (mc.server == NULL) {

1055

1056

fprintf(stderr, "Failed to create Avahi server: %s\n",

1056

1057

avahi_strerror(error));

1057

1058

exitcode = EXIT_FAILURE;

1063

1064

AVAHI_PROTO_INET6,

1064

1065

"_mandos._tcp", NULL, 0,

1065

1066

browse_callback, &mc);

1066

if(sb == NULL) {

1067

if (sb == NULL) {

1067

1068

fprintf(stderr, "Failed to create service browser: %s\n",

1068

1069

avahi_strerror(avahi_server_errno(mc.server)));

1069

1070

exitcode = EXIT_FAILURE;

1072

1073

1074

/* Run the main loop */

1074

1075

if(debug){

1076

if (debug){

1076

1077

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

1077

1078

}

1078

1079

1080

1081

1082

end:

1082

1083

if(debug){

1084

if (debug){

1084

1085

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

1085

1086

}

1086

1087

1088

/* Cleanup things */

1088

if(sb != NULL)

1089

if (sb != NULL)

1089

1090

avahi_s_service_browser_free(sb);

1090

1091

if(mc.server != NULL)

1092

if (mc.server != NULL)

1092

1093

avahi_server_free(mc.server);

1093

1094

if(mc.simple_poll != NULL)

1095

if (mc.simple_poll != NULL)

1095

1096

avahi_simple_poll_free(mc.simple_poll);

1096

1097

if(gnutls_initalized){

1098

if (gnutls_initalized){

1098

1099

gnutls_certificate_free_credentials(mc.cred);

1099

gnutls_global_deinit();

1100

gnutls_dh_params_deinit(mc.dh_params);

1100

gnutls_global_deinit ();

1101

}

1102

1103

if(gpgme_initalized){

1102

1103

if(pgpme_initalized){

1104

gpgme_release(mc.ctx);

1105

}

1106

1107

/* Removes the temp directory used by GPGME */

1108

if(tempdir[0] != '\0'){

1109

DIR *d;

1110

struct dirent *direntry;

1111

d = opendir(tempdir);

1112

if(d == NULL){

1113

if(errno != ENOENT){

1114

perror("opendir");

1115

}

1113

perror("opendir");

1116

1114

} else {

1117

1115

while(true){

1118

1116

direntry = readdir(d);

1119

1117

if(direntry == NULL){

1120

1118

break;

1121

1119

}

1122

if(direntry->d_type == DT_REG){

1120

if (direntry->d_type == DT_REG){

1123

1121

char *fullname = NULL;

1124

1122

ret = asprintf(&fullname, "%s/%s", tempdir,

1125

1123

direntry->d_name);

1135

1133

free(fullname);

1136

1134

}

1137

1135

}

1138

closedir(d);

1139

1136

}

1140

1137

ret = rmdir(tempdir);

1141

if(ret == -1 and errno != ENOENT){

1138

if(ret == -1){

1142

1139

perror("rmdir");

1143

1140

}

1144

1141

}