/mandos/trunk : revision 24.1.124

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

13

14

*

15

* This program is free software: you can redistribute it and/or

16

* modify it under the terms of the GNU General Public License as

36

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

37

38

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

39

stdout, ferror() */

39

stdout, ferror(), sscanf */

40

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

41

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

42

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

48

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

49

sockaddr_in6, PF_INET6,

50

SOCK_STREAM, INET6_ADDRSTRLEN,

51

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

51

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

52

DIR */

52

53

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

53

54

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

54

55

struct in6_addr, inet_pton(),

55

56

connect() */

56

57

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

57

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

58

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

58

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

59

*/

60

#include <inttypes.h> /* PRIu16, intmax_t, SCNdMAX */

59

61

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

60

62

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

61

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

63

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

62

64

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

63

65

SIOCSIFFLAGS, if_indextoname(),

64

66

if_nametoindex(), IF_NAMESIZE */

67

69

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

68

70

setgid() */

69

71

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

70

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

72

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

71

73

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

72

74

argp_state, struct argp,

73

75

argp_parse(), ARGP_KEY_ARG,

74

76

ARGP_KEY_END, ARGP_ERR_UNKNOWN */

77

#include <sys/klog.h> /* klogctl() */

75

78

76

79

/* Avahi */

77

80

/* All Avahi types, constants and functions

90

93

gnutls_*

91

94

init_gnutls_session(),

92

95

GNUTLS_* */

93

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

96

#include <gnutls/openpgp.h>

97

/* gnutls_certificate_set_openpgp_key_file(),

94

98

GNUTLS_OPENPGP_FMT_BASE64 */

95

99

96

100

/* GPGME */

129

133

*/

130

134

size_t adjustbuffer(char **buffer, size_t buffer_length,

131

135

size_t buffer_capacity){

132

if (buffer_length + BUFFER_SIZE > buffer_capacity){

136

if(buffer_length + BUFFER_SIZE > buffer_capacity){

133

137

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

134

if (buffer == NULL){

138

if(buffer == NULL){

135

139

return 0;

136

140

}

137

141

buffer_capacity += BUFFER_SIZE;

156

160

int fd;

157

161

gpgme_data_t pgp_data;

158

162

159

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

163

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

160

164

if(fd == -1){

161

165

perror("open");

162

166

return false;

163

167

}

164

168

165

169

rc = gpgme_data_new_from_fd(&pgp_data, fd);

166

if (rc != GPG_ERR_NO_ERROR){

170

if(rc != GPG_ERR_NO_ERROR){

167

171

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

168

172

gpgme_strsource(rc), gpgme_strerror(rc));

169

173

return false;

170

174

}

171

175

172

176

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

173

if (rc != GPG_ERR_NO_ERROR){

177

if(rc != GPG_ERR_NO_ERROR){

174

178

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

175

179

gpgme_strsource(rc), gpgme_strerror(rc));

176

180

return false;

177

181

}

178

182

179

ret = TEMP_FAILURE_RETRY(close(fd));

183

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

180

184

if(ret == -1){

181

185

perror("close");

182

186

}

184

188

return true;

185

189

}

186

190

187

if (debug){

191

if(debug){

188

192

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

189

193

}

190

194

191

195

/* Init GPGME */

192

196

gpgme_check_version(NULL);

193

197

rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);

194

if (rc != GPG_ERR_NO_ERROR){

198

if(rc != GPG_ERR_NO_ERROR){

195

199

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

196

200

gpgme_strsource(rc), gpgme_strerror(rc));

197

201

return false;

198

202

}

199

203

200

204

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

201

rc = gpgme_get_engine_info (&engine_info);

202

if (rc != GPG_ERR_NO_ERROR){

205

rc = gpgme_get_engine_info(&engine_info);

206

if(rc != GPG_ERR_NO_ERROR){

203

207

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

204

208

gpgme_strsource(rc), gpgme_strerror(rc));

205

209

return false;

219

223

220

224

/* Create new GPGME "context" */

221

225

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

222

if (rc != GPG_ERR_NO_ERROR){

226

if(rc != GPG_ERR_NO_ERROR){

223

227

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

224

228

gpgme_strsource(rc), gpgme_strerror(rc));

225

229

return false;

226

230

}

227

231

228

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

232

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

229

233

return false;

230

234

}

231

235

236

240

* Decrypt OpenPGP data.

237

241

* Returns -1 on error

238

242

*/

239

static ssize_t pgp_packet_decrypt (const mandos_context *mc,

240

const char *cryptotext,

241

size_t crypto_size,

242

char **plaintext){

243

static ssize_t pgp_packet_decrypt(const mandos_context *mc,

244

const char *cryptotext,

245

size_t crypto_size,

246

char **plaintext){

243

247

gpgme_data_t dh_crypto, dh_plain;

244

248

gpgme_error_t rc;

245

249

ssize_t ret;

246

250

size_t plaintext_capacity = 0;

247

251

ssize_t plaintext_length = 0;

248

252

249

if (debug){

253

if(debug){

250

254

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

251

255

}

252

256

253

257

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

254

258

rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,

255

259

0);

256

if (rc != GPG_ERR_NO_ERROR){

260

if(rc != GPG_ERR_NO_ERROR){

257

261

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

258

262

gpgme_strsource(rc), gpgme_strerror(rc));

259

263

return -1;

261

265

262

266

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

263

267

rc = gpgme_data_new(&dh_plain);

264

if (rc != GPG_ERR_NO_ERROR){

268

if(rc != GPG_ERR_NO_ERROR){

265

269

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

266

270

gpgme_strsource(rc), gpgme_strerror(rc));

267

271

gpgme_data_release(dh_crypto);

271

275

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

272

276

data buffer */

273

277

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

274

if (rc != GPG_ERR_NO_ERROR){

278

if(rc != GPG_ERR_NO_ERROR){

275

279

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

276

280

gpgme_strsource(rc), gpgme_strerror(rc));

277

281

plaintext_length = -1;

278

if (debug){

282

if(debug){

279

283

gpgme_decrypt_result_t result;

280

284

result = gpgme_op_decrypt_result(mc->ctx);

281

if (result == NULL){

285

if(result == NULL){

282

286

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

283

287

} else {

284

288

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

311

315

}

312

316

313

317

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

314

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

318

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

315

319

perror("gpgme_data_seek");

316

320

plaintext_length = -1;

317

321

goto decrypt_end;

322

326

plaintext_capacity = adjustbuffer(plaintext,

323

327

(size_t)plaintext_length,

324

328

plaintext_capacity);

325

if (plaintext_capacity == 0){

329

if(plaintext_capacity == 0){

326

330

perror("adjustbuffer");

327

331

plaintext_length = -1;

328

332

goto decrypt_end;

331

335

ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,

332

336

BUFFER_SIZE);

333

337

/* Print the data, if any */

334

if (ret == 0){

338

if(ret == 0){

335

339

/* EOF */

336

340

break;

337

341

}

361

365

return plaintext_length;

362

366

}

363

367

364

static const char * safer_gnutls_strerror (int value) {

365

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

366

if (ret == NULL)

368

static const char * safer_gnutls_strerror(int value) {

369

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

370

-Wunreachable-code */

371

if(ret == NULL)

367

372

ret = "(unknown)";

368

373

return ret;

369

374

}

384

389

}

385

390

386

391

ret = gnutls_global_init();

387

if (ret != GNUTLS_E_SUCCESS) {

388

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

389

safer_gnutls_strerror(ret));

392

if(ret != GNUTLS_E_SUCCESS) {

393

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

394

safer_gnutls_strerror(ret));

390

395

return -1;

391

396

}

392

397

393

if (debug){

398

if(debug){

394

399

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

395

400

* - GnuTLS manual

396

401

*/

400

405

401

406

/* OpenPGP credentials */

402

407

gnutls_certificate_allocate_credentials(&mc->cred);

403

if (ret != GNUTLS_E_SUCCESS){

404

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

405

warning */

406

safer_gnutls_strerror(ret));

407

gnutls_global_deinit ();

408

if(ret != GNUTLS_E_SUCCESS){

409

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

410

* from

411

* -Wunreachable-code

412

*/

413

safer_gnutls_strerror(ret));

414

gnutls_global_deinit();

408

415

return -1;

409

416

}

410

417

424

ret = gnutls_certificate_set_openpgp_key_file

418

425

(mc->cred, pubkeyfilename, seckeyfilename,

419

426

GNUTLS_OPENPGP_FMT_BASE64);

420

if (ret != GNUTLS_E_SUCCESS) {

427

if(ret != GNUTLS_E_SUCCESS) {

421

428

fprintf(stderr,

422

429

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

423

430

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

428

435

429

436

/* GnuTLS server initialization */

430

437

ret = gnutls_dh_params_init(&mc->dh_params);

431

if (ret != GNUTLS_E_SUCCESS) {

432

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

433

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

438

if(ret != GNUTLS_E_SUCCESS) {

439

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

440

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

434

441

goto globalfail;

435

442

}

436

443

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

437

if (ret != GNUTLS_E_SUCCESS) {

438

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

439

safer_gnutls_strerror(ret));

444

if(ret != GNUTLS_E_SUCCESS) {

445

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

446

safer_gnutls_strerror(ret));

440

447

goto globalfail;

441

448

}

442

449

457

464

int ret;

458

465

/* GnuTLS session creation */

459

466

ret = gnutls_init(session, GNUTLS_SERVER);

460

if (ret != GNUTLS_E_SUCCESS){

467

if(ret != GNUTLS_E_SUCCESS){

461

468

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

462

469

safer_gnutls_strerror(ret));

463

470

}

465

472

{

466

473

const char *err;

467

474

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

468

if (ret != GNUTLS_E_SUCCESS) {

475

if(ret != GNUTLS_E_SUCCESS) {

469

476

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

470

477

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

471

478

safer_gnutls_strerror(ret));

472

gnutls_deinit (*session);

479

gnutls_deinit(*session);

473

480

return -1;

474

481

}

475

482

}

476

483

477

484

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

478

485

mc->cred);

479

if (ret != GNUTLS_E_SUCCESS) {

486

if(ret != GNUTLS_E_SUCCESS) {

480

487

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

481

488

safer_gnutls_strerror(ret));

482

gnutls_deinit (*session);

489

gnutls_deinit(*session);

483

490

return -1;

484

491

}

485

492

486

493

/* ignore client certificate if any. */

487

gnutls_certificate_server_set_request (*session,

488

GNUTLS_CERT_IGNORE);

494

gnutls_certificate_server_set_request(*session,

495

GNUTLS_CERT_IGNORE);

489

496

490

gnutls_dh_set_prime_bits (*session, mc->dh_bits);

497

gnutls_dh_set_prime_bits(*session, mc->dh_bits);

491

498

492

499

return 0;

493

500

}

501

508

AvahiIfIndex if_index,

502

509

mandos_context *mc){

503

510

int ret, tcp_sd;

511

ssize_t sret;

504

512

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

505

513

char *buffer = NULL;

506

514

char *decrypted_buffer;

512

520

char interface[IF_NAMESIZE];

513

521

gnutls_session_t session;

514

522

515

ret = init_gnutls_session (mc, &session);

516

if (ret != 0){

523

ret = init_gnutls_session(mc, &session);

524

if(ret != 0){

517

525

return -1;

518

526

}

519

527

541

549

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

542

550

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

543

551

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

544

if (ret < 0 ){

552

if(ret < 0 ){

545

553

perror("inet_pton");

546

554

return -1;

547

555

}

549

557

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

550

558

return -1;

551

559

}

552

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

560

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

561

-Wconversion and

562

-Wunreachable-code */

553

563

554

564

to.in6.sin6_scope_id = (uint32_t)if_index;

555

565

568

578

}

569

579

570

580

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

571

if (ret < 0){

581

if(ret < 0){

572

582

perror("connect");

573

583

return -1;

574

584

}

575

585

576

586

const char *out = mandos_protocol_version;

577

587

written = 0;

578

while (true){

588

while(true){

579

589

size_t out_size = strlen(out);

580

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

590

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

581

591

out_size - written));

582

if (ret == -1){

592

if(ret == -1){

583

593

perror("write");

584

594

retval = -1;

585

595

goto mandos_end;

588

598

if(written < out_size){

589

599

continue;

590

600

} else {

591

if (out == mandos_protocol_version){

601

if(out == mandos_protocol_version){

592

602

written = 0;

593

603

out = "\r\n";

594

604

} else {

601

611

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

602

612

}

603

613

604

gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);

614

gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);

605

615

606

616

do{

607

ret = gnutls_handshake (session);

617

ret = gnutls_handshake(session);

608

618

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

609

619

610

if (ret != GNUTLS_E_SUCCESS){

620

if(ret != GNUTLS_E_SUCCESS){

611

621

if(debug){

612

622

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

613

gnutls_perror (ret);

623

gnutls_perror(ret);

614

624

}

615

625

retval = -1;

616

626

goto mandos_end;

626

636

while(true){

627

637

buffer_capacity = adjustbuffer(&buffer, buffer_length,

628

638

buffer_capacity);

629

if (buffer_capacity == 0){

639

if(buffer_capacity == 0){

630

640

perror("adjustbuffer");

631

641

retval = -1;

632

642

goto mandos_end;

633

643

}

634

644

635

ret = gnutls_record_recv(session, buffer+buffer_length,

636

BUFFER_SIZE);

637

if (ret == 0){

645

sret = gnutls_record_recv(session, buffer+buffer_length,

646

BUFFER_SIZE);

647

if(sret == 0){

638

648

break;

639

649

}

640

if (ret < 0){

641

switch(ret){

650

if(sret < 0){

651

switch(sret){

642

652

case GNUTLS_E_INTERRUPTED:

643

653

case GNUTLS_E_AGAIN:

644

654

break;

645

655

case GNUTLS_E_REHANDSHAKE:

646

656

do{

647

ret = gnutls_handshake (session);

657

ret = gnutls_handshake(session);

648

658

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

649

if (ret < 0){

659

if(ret < 0){

650

660

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

651

gnutls_perror (ret);

661

gnutls_perror(ret);

652

662

retval = -1;

653

663

goto mandos_end;

654

664

}

657

667

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

658

668

" encrypted session with Mandos server\n");

659

669

retval = -1;

660

gnutls_bye (session, GNUTLS_SHUT_RDWR);

670

gnutls_bye(session, GNUTLS_SHUT_RDWR);

661

671

goto mandos_end;

662

672

}

663

673

} else {

664

buffer_length += (size_t) ret;

674

buffer_length += (size_t) sret;

665

675

}

666

676

}

667

677

669

679

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

670

680

}

671

681

672

gnutls_bye (session, GNUTLS_SHUT_RDWR);

682

gnutls_bye(session, GNUTLS_SHUT_RDWR);

673

683

674

if (buffer_length > 0){

684

if(buffer_length > 0){

675

685

decrypted_buffer_size = pgp_packet_decrypt(mc, buffer,

676

686

buffer_length,

677

687

&decrypted_buffer);

678

if (decrypted_buffer_size >= 0){

688

if(decrypted_buffer_size >= 0){

679

689

written = 0;

680

690

while(written < (size_t) decrypted_buffer_size){

681

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

682

(size_t)decrypted_buffer_size - written,

683

stdout);

691

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

692

(size_t)decrypted_buffer_size - written,

693

stdout);

684

694

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

685

695

if(debug){

686

696

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

703

713

704

714

mandos_end:

705

715

free(buffer);

706

ret = TEMP_FAILURE_RETRY(close(tcp_sd));

716

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

707

717

if(ret == -1){

708

718

perror("close");

709

719

}

710

gnutls_deinit (session);

720

gnutls_deinit(session);

711

721

return retval;

712

722

}

713

723

731

741

/* Called whenever a service has been resolved successfully or

732

742

timed out */

733

743

734

switch (event) {

744

switch(event) {

735

745

default:

736

746

case AVAHI_RESOLVER_FAILURE:

737

747

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

745

755

avahi_address_snprint(ip, sizeof(ip), address);

746

756

if(debug){

747

757

fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %"

748

PRIu16 ") on port %d\n", name, host_name, ip,

749

interface, port);

758

PRIdMAX ") on port %" PRIu16 "\n", name, host_name,

759

ip, (intmax_t)interface, port);

750

760

}

751

761

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

752

if (ret == 0){

762

if(ret == 0){

753

763

avahi_simple_poll_quit(mc->simple_poll);

754

764

}

755

765

}

773

783

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

774

784

is removed from the LAN */

775

785

776

switch (event) {

786

switch(event) {

777

787

default:

778

788

case AVAHI_BROWSER_FAILURE:

779

789

788

798

the callback function is called the Avahi server will free the

789

799

resolver for us. */

790

800

791

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

801

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

792

802

protocol, name, type, domain,

793

803

AVAHI_PROTO_INET6, 0,

794

804

resolve_callback, mc)))

812

822

AvahiSServiceBrowser *sb = NULL;

813

823

int error;

814

824

int ret;

825

intmax_t tmpmax;

826

int numchars;

815

827

int exitcode = EXIT_SUCCESS;

816

828

const char *interface = "eth0";

817

829

struct ifreq network;

829

841

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

830

842

bool gnutls_initalized = false;

831

843

bool gpgme_initalized = false;

844

double delay = 2.5;

832

845

833

846

{

834

847

struct argp_option options[] = {

860

873

.arg = "STRING",

861

874

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

862

875

.group = 1 },

876

{ .name = "delay", .key = 131,

877

.arg = "SECONDS",

878

.doc = "Maximum delay to wait for interface startup",

879

.group = 2 },

863

880

{ .name = NULL }

864

881

};

865

882

866

error_t parse_opt (int key, char *arg,

867

struct argp_state *state) {

868

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

869

a pointer to our plugin list pointer. */

870

switch (key) {

883

error_t parse_opt(int key, char *arg,

884

struct argp_state *state) {

885

switch(key) {

871

886

case 128: /* --debug */

872

887

debug = true;

873

888

break;

884

899

pubkey = arg;

885

900

break;

886

901

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

887

errno = 0;

888

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

889

if (errno){

890

perror("strtol");

902

ret = sscanf(arg, "%" SCNdMAX "%n", &tmpmax, &numchars);

903

if(ret < 1 or tmpmax != (typeof(mc.dh_bits))tmpmax

904

or arg[numchars] != '\0'){

905

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

891

906

exit(EXIT_FAILURE);

892

907

}

908

mc.dh_bits = (typeof(mc.dh_bits))tmpmax;

893

909

break;

894

910

case 130: /* --priority */

895

911

mc.priority = arg;

896

912

break;

913

case 131: /* --delay */

914

ret = sscanf(arg, "%lf%n", &delay, &numchars);

915

if(ret < 1 or arg[numchars] != '\0'){

916

fprintf(stderr, "Bad delay\n");

917

exit(EXIT_FAILURE);

918

}

919

break;

897

920

case ARGP_KEY_ARG:

898

argp_usage (state);

921

argp_usage(state);

899

922

case ARGP_KEY_END:

900

923

break;

901

924

default:

908

931

.args_doc = "",

909

932

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

910

933

" passwords from a Mandos server" };

911

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

912

if (ret == ARGP_ERR_UNKNOWN){

934

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

935

if(ret == ARGP_ERR_UNKNOWN){

913

936

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

914

937

exitcode = EXIT_FAILURE;

915

938

goto end;

918

941

919

942

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

920

943

{

944

// Lower kernel loglevel to KERN_NOTICE to avoid

945

// KERN_INFO messages to mess up the prompt

946

ret = klogctl(8, NULL, 5);

947

if(ret == -1){

948

perror("klogctl");

949

}

950

921

951

sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);

922

952

if(sd < 0) {

923

953

perror("socket");

924

954

exitcode = EXIT_FAILURE;

955

ret = klogctl(7, NULL, 0);

956

if(ret == -1){

957

perror("klogctl");

958

}

925

959

goto end;

926

960

}

927

961

strcpy(network.ifr_name, interface);

928

962

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

929

963

if(ret == -1){

930

964

perror("ioctl SIOCGIFFLAGS");

965

ret = klogctl(7, NULL, 0);

966

if(ret == -1){

967

perror("klogctl");

968

}

931

969

exitcode = EXIT_FAILURE;

932

970

goto end;

933

971

}

937

975

if(ret == -1){

938

976

perror("ioctl SIOCSIFFLAGS");

939

977

exitcode = EXIT_FAILURE;

978

ret = klogctl(7, NULL, 0);

979

if(ret == -1){

980

perror("klogctl");

981

}

940

982

goto end;

941

983

}

942

984

}

943

ret = TEMP_FAILURE_RETRY(close(sd));

985

// sleep checking until interface is running

986

for(int i=0; i < delay * 4; i++){

987

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

988

if(ret == -1){

989

perror("ioctl SIOCGIFFLAGS");

990

} else if(network.ifr_flags & IFF_RUNNING){

991

break;

992

}

993

struct timespec sleeptime = { .tv_nsec = 250000000 };

994

nanosleep(&sleeptime, NULL);

995

}

996

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

944

997

if(ret == -1){

945

998

perror("close");

946

999

}

1000

// Restores kernel loglevel to default

1001

ret = klogctl(7, NULL, 0);

1002

if(ret == -1){

1003

perror("klogctl");

1004

}

947

1005

}

948

1006

949

1007

uid = getuid();

950

1008

gid = getgid();

951

1009

952

1010

ret = setuid(uid);

953

if (ret == -1){

1011

if(ret == -1){

954

1012

perror("setuid");

955

1013

}

956

1014

957

1015

setgid(gid);

958

if (ret == -1){

1016

if(ret == -1){

959

1017

perror("setgid");

960

1018

}

961

1019

962

1020

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

963

if (ret == -1){

1021

if(ret == -1){

964

1022

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

965

1023

exitcode = EXIT_FAILURE;

966

1024

goto end;

997

1055

exitcode = EXIT_FAILURE;

998

1056

goto end;

999

1057

}

1000

errno = 0;

1001

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

1002

if(errno){

1003

perror("Bad port number");

1058

uint16_t port;

1059

ret = sscanf(address+1, "%" SCNdMAX "%n", &tmpmax, &numchars);

1060

if(ret < 1 or tmpmax != (uint16_t)tmpmax

1061

or address[numchars+1] != '\0'){

1062

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

1004

1063

exitcode = EXIT_FAILURE;

1005

1064

goto end;

1006

1065

}

1066

port = (uint16_t)tmpmax;

1007

1067

*address = '\0';

1008

1068

address = connect_to;

1009

1069

ret = start_mandos_communication(address, port, if_index, &mc);

1015

1075

goto end;

1016

1076

}

1017

1077

1018

if (not debug){

1078

if(not debug){

1019

1079

avahi_set_log_function(empty_log);

1020

1080

}

1021

1081

1024

1084

1025

1085

/* Allocate main Avahi loop object */

1026

1086

mc.simple_poll = avahi_simple_poll_new();

1027

if (mc.simple_poll == NULL) {

1087

if(mc.simple_poll == NULL) {

1028

1088

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

1029

1089

" object.\n");

1030

1090

exitcode = EXIT_FAILURE;

1050

1110

}

1051

1111

1052

1112

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

1053

if (mc.server == NULL) {

1113

if(mc.server == NULL) {

1054

1114

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

1055

1115

avahi_strerror(error));

1056

1116

exitcode = EXIT_FAILURE;

1062

1122

AVAHI_PROTO_INET6,

1063

1123

"_mandos._tcp", NULL, 0,

1064

1124

browse_callback, &mc);

1065

if (sb == NULL) {

1125

if(sb == NULL) {

1066

1126

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

1067

1127

avahi_strerror(avahi_server_errno(mc.server)));

1068

1128

exitcode = EXIT_FAILURE;

1071

1131

1072

1132

/* Run the main loop */

1073

1133

1074

if (debug){

1134

if(debug){

1075

1135

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

1076

1136

}

1077

1137

1078

1138

avahi_simple_poll_loop(mc.simple_poll);

1079

1139

1080

1140

end:

1081

1141

1082

if (debug){

1142

if(debug){

1083

1143

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

1084

1144

}

1085

1145

1086

1146

/* Cleanup things */

1087

if (sb != NULL)

1147

if(sb != NULL)

1088

1148

avahi_s_service_browser_free(sb);

1089

1149

1090

if (mc.server != NULL)

1150

if(mc.server != NULL)

1091

1151

avahi_server_free(mc.server);

1092

1152

1093

if (mc.simple_poll != NULL)

1153

if(mc.simple_poll != NULL)

1094

1154

avahi_simple_poll_free(mc.simple_poll);

1095

1155

1096

if (gnutls_initalized){

1156

if(gnutls_initalized){

1097

1157

gnutls_certificate_free_credentials(mc.cred);

1098

gnutls_global_deinit ();

1158

gnutls_global_deinit();

1099

1159

gnutls_dh_params_deinit(mc.dh_params);

1100

1160

}

1101

1161

1109

1169

struct dirent *direntry;

1110

1170

d = opendir(tempdir);

1111

1171

if(d == NULL){

1112

perror("opendir");

1172

if(errno != ENOENT){

1173

perror("opendir");

1174

}

1113

1175

} else {

1114

1176

while(true){

1115

1177

direntry = readdir(d);

1116

1178

if(direntry == NULL){

1117

1179

break;

1118

1180

}

1119

if (direntry->d_type == DT_REG){

1181

if(direntry->d_type == DT_REG){

1120

1182

char *fullname = NULL;

1121

1183

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

1122

1184

direntry->d_name);

1135

1197

closedir(d);

1136

1198

}

1137

1199

ret = rmdir(tempdir);

1138

if(ret == -1){

1200

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

1139

1201

perror("rmdir");

1140

1202

}

1141

1203

}