/mandos/trunk : revision 276

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

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

63

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

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,

90

92

gnutls_*

91

93

init_gnutls_session(),

92

94

GNUTLS_* */

93

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

95

#include <gnutls/openpgp.h>

96

/* gnutls_certificate_set_openpgp_key_file(),

94

97

GNUTLS_OPENPGP_FMT_BASE64 */

95

98

96

99

/* GPGME */

129

132

*/

130

133

size_t adjustbuffer(char **buffer, size_t buffer_length,

131

134

size_t buffer_capacity){

132

if (buffer_length + BUFFER_SIZE > buffer_capacity){

135

if(buffer_length + BUFFER_SIZE > buffer_capacity){

133

136

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

134

if (buffer == NULL){

137

if(buffer == NULL){

135

138

return 0;

136

139

}

137

140

buffer_capacity += BUFFER_SIZE;

156

159

int fd;

157

160

gpgme_data_t pgp_data;

158

161

159

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

162

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

160

163

if(fd == -1){

161

164

perror("open");

162

165

return false;

163

166

}

164

167

165

168

rc = gpgme_data_new_from_fd(&pgp_data, fd);

166

if (rc != GPG_ERR_NO_ERROR){

169

if(rc != GPG_ERR_NO_ERROR){

167

170

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

168

171

gpgme_strsource(rc), gpgme_strerror(rc));

169

172

return false;

170

173

}

171

174

172

175

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

173

if (rc != GPG_ERR_NO_ERROR){

176

if(rc != GPG_ERR_NO_ERROR){

174

177

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

175

178

gpgme_strsource(rc), gpgme_strerror(rc));

176

179

return false;

177

180

}

178

181

179

ret = TEMP_FAILURE_RETRY(close(fd));

182

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

180

183

if(ret == -1){

181

184

perror("close");

182

185

}

184

187

return true;

185

188

}

186

189

187

if (debug){

190

if(debug){

188

191

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

189

192

}

190

193

191

194

/* Init GPGME */

192

195

gpgme_check_version(NULL);

193

196

rc = gpgme_engine_check_version(GPGME_PROTOCOL_OpenPGP);

194

if (rc != GPG_ERR_NO_ERROR){

197

if(rc != GPG_ERR_NO_ERROR){

195

198

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

196

199

gpgme_strsource(rc), gpgme_strerror(rc));

197

200

return false;

198

201

}

199

202

200

203

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

201

rc = gpgme_get_engine_info (&engine_info);

202

if (rc != GPG_ERR_NO_ERROR){

204

rc = gpgme_get_engine_info(&engine_info);

205

if(rc != GPG_ERR_NO_ERROR){

203

206

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

204

207

gpgme_strsource(rc), gpgme_strerror(rc));

205

208

return false;

219

222

220

223

/* Create new GPGME "context" */

221

224

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

222

if (rc != GPG_ERR_NO_ERROR){

225

if(rc != GPG_ERR_NO_ERROR){

223

226

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

224

227

gpgme_strsource(rc), gpgme_strerror(rc));

225

228

return false;

226

229

}

227

230

228

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

231

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

229

232

return false;

230

233

}

231

234

236

239

* Decrypt OpenPGP data.

237

240

* Returns -1 on error

238

241

*/

239

static ssize_t pgp_packet_decrypt (const mandos_context *mc,

240

const char *cryptotext,

241

size_t crypto_size,

242

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

243

246

gpgme_data_t dh_crypto, dh_plain;

244

247

gpgme_error_t rc;

245

248

ssize_t ret;

246

249

size_t plaintext_capacity = 0;

247

250

ssize_t plaintext_length = 0;

248

251

249

if (debug){

252

if(debug){

250

253

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

251

254

}

252

255

253

256

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

254

257

rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,

255

258

0);

256

if (rc != GPG_ERR_NO_ERROR){

259

if(rc != GPG_ERR_NO_ERROR){

257

260

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

258

261

gpgme_strsource(rc), gpgme_strerror(rc));

259

262

return -1;

261

264

262

265

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

263

266

rc = gpgme_data_new(&dh_plain);

264

if (rc != GPG_ERR_NO_ERROR){

267

if(rc != GPG_ERR_NO_ERROR){

265

268

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

266

269

gpgme_strsource(rc), gpgme_strerror(rc));

267

270

gpgme_data_release(dh_crypto);

271

274

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

272

275

data buffer */

273

276

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

274

if (rc != GPG_ERR_NO_ERROR){

277

if(rc != GPG_ERR_NO_ERROR){

275

278

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

276

279

gpgme_strsource(rc), gpgme_strerror(rc));

277

280

plaintext_length = -1;

278

if (debug){

281

if(debug){

279

282

gpgme_decrypt_result_t result;

280

283

result = gpgme_op_decrypt_result(mc->ctx);

281

if (result == NULL){

284

if(result == NULL){

282

285

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

283

286

} else {

284

287

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

311

314

}

312

315

313

316

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

314

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

317

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

315

318

perror("gpgme_data_seek");

316

319

plaintext_length = -1;

317

320

goto decrypt_end;

322

325

plaintext_capacity = adjustbuffer(plaintext,

323

326

(size_t)plaintext_length,

324

327

plaintext_capacity);

325

if (plaintext_capacity == 0){

328

if(plaintext_capacity == 0){

326

329

perror("adjustbuffer");

327

330

plaintext_length = -1;

328

331

goto decrypt_end;

331

334

ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,

332

335

BUFFER_SIZE);

333

336

/* Print the data, if any */

334

if (ret == 0){

337

if(ret == 0){

335

338

/* EOF */

336

339

break;

337

340

}

361

364

return plaintext_length;

362

365

}

363

366

364

static const char * safer_gnutls_strerror (int value) {

365

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

366

if (ret == NULL)

367

static const char * safer_gnutls_strerror(int value) {

368

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

369

-Wunreachable-code */

370

if(ret == NULL)

367

371

ret = "(unknown)";

368

372

return ret;

369

373

}

384

388

}

385

389

386

390

ret = gnutls_global_init();

387

if (ret != GNUTLS_E_SUCCESS) {

388

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

389

safer_gnutls_strerror(ret));

391

if(ret != GNUTLS_E_SUCCESS) {

392

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

393

safer_gnutls_strerror(ret));

390

394

return -1;

391

395

}

392

396

393

if (debug){

397

if(debug){

394

398

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

395

399

* - GnuTLS manual

396

400

*/

400

404

401

405

/* OpenPGP credentials */

402

406

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

407

if(ret != GNUTLS_E_SUCCESS){

408

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

409

* from

410

* -Wunreachable-code

411

*/

412

safer_gnutls_strerror(ret));

413

gnutls_global_deinit();

408

414

return -1;

409

415

}

410

416

417

423

ret = gnutls_certificate_set_openpgp_key_file

418

424

(mc->cred, pubkeyfilename, seckeyfilename,

419

425

GNUTLS_OPENPGP_FMT_BASE64);

420

if (ret != GNUTLS_E_SUCCESS) {

426

if(ret != GNUTLS_E_SUCCESS) {

421

427

fprintf(stderr,

422

428

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

423

429

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

428

434

429

435

/* GnuTLS server initialization */

430

436

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

437

if(ret != GNUTLS_E_SUCCESS) {

438

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

439

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

434

440

goto globalfail;

435

441

}

436

442

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

443

if(ret != GNUTLS_E_SUCCESS) {

444

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

445

safer_gnutls_strerror(ret));

440

446

goto globalfail;

441

447

}

442

448

457

463

int ret;

458

464

/* GnuTLS session creation */

459

465

ret = gnutls_init(session, GNUTLS_SERVER);

460

if (ret != GNUTLS_E_SUCCESS){

466

if(ret != GNUTLS_E_SUCCESS){

461

467

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

462

468

safer_gnutls_strerror(ret));

463

469

}

465

471

{

466

472

const char *err;

467

473

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

468

if (ret != GNUTLS_E_SUCCESS) {

474

if(ret != GNUTLS_E_SUCCESS) {

469

475

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

470

476

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

471

477

safer_gnutls_strerror(ret));

472

gnutls_deinit (*session);

478

gnutls_deinit(*session);

473

479

return -1;

474

480

}

475

481

}

476

482

477

483

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

478

484

mc->cred);

479

if (ret != GNUTLS_E_SUCCESS) {

485

if(ret != GNUTLS_E_SUCCESS) {

480

486

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

481

487

safer_gnutls_strerror(ret));

482

gnutls_deinit (*session);

488

gnutls_deinit(*session);

483

489

return -1;

484

490

}

485

491

486

492

/* ignore client certificate if any. */

487

gnutls_certificate_server_set_request (*session,

488

GNUTLS_CERT_IGNORE);

493

gnutls_certificate_server_set_request(*session,

494

GNUTLS_CERT_IGNORE);

489

495

490

gnutls_dh_set_prime_bits (*session, mc->dh_bits);

496

gnutls_dh_set_prime_bits(*session, mc->dh_bits);

491

497

492

498

return 0;

493

499

}

501

507

AvahiIfIndex if_index,

502

508

mandos_context *mc){

503

509

int ret, tcp_sd;

510

ssize_t sret;

504

511

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

505

512

char *buffer = NULL;

506

513

char *decrypted_buffer;

512

519

char interface[IF_NAMESIZE];

513

520

gnutls_session_t session;

514

521

515

ret = init_gnutls_session (mc, &session);

516

if (ret != 0){

522

ret = init_gnutls_session(mc, &session);

523

if(ret != 0){

517

524

return -1;

518

525

}

519

526

541

548

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

542

549

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

543

550

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

544

if (ret < 0 ){

551

if(ret < 0 ){

545

552

perror("inet_pton");

546

553

return -1;

547

554

}

549

556

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

550

557

return -1;

551

558

}

552

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

559

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

560

-Wconversion and

561

-Wunreachable-code */

553

562

554

563

to.in6.sin6_scope_id = (uint32_t)if_index;

555

564

568

577

}

569

578

570

579

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

571

if (ret < 0){

580

if(ret < 0){

572

581

perror("connect");

573

582

return -1;

574

583

}

575

584

576

585

const char *out = mandos_protocol_version;

577

586

written = 0;

578

while (true){

587

while(true){

579

588

size_t out_size = strlen(out);

580

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

589

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

581

590

out_size - written));

582

if (ret == -1){

591

if(ret == -1){

583

592

perror("write");

584

593

retval = -1;

585

594

goto mandos_end;

588

597

if(written < out_size){

589

598

continue;

590

599

} else {

591

if (out == mandos_protocol_version){

600

if(out == mandos_protocol_version){

592

601

written = 0;

593

602

out = "\r\n";

594

603

} else {

601

610

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

602

611

}

603

612

604

gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);

613

gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);

605

614

606

615

do{

607

ret = gnutls_handshake (session);

616

ret = gnutls_handshake(session);

608

617

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

609

618

610

if (ret != GNUTLS_E_SUCCESS){

619

if(ret != GNUTLS_E_SUCCESS){

611

620

if(debug){

612

621

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

613

gnutls_perror (ret);

622

gnutls_perror(ret);

614

623

}

615

624

retval = -1;

616

625

goto mandos_end;

626

635

while(true){

627

636

buffer_capacity = adjustbuffer(&buffer, buffer_length,

628

637

buffer_capacity);

629

if (buffer_capacity == 0){

638

if(buffer_capacity == 0){

630

639

perror("adjustbuffer");

631

640

retval = -1;

632

641

goto mandos_end;

633

642

}

634

643

635

ret = gnutls_record_recv(session, buffer+buffer_length,

636

BUFFER_SIZE);

637

if (ret == 0){

644

sret = gnutls_record_recv(session, buffer+buffer_length,

645

BUFFER_SIZE);

646

if(sret == 0){

638

647

break;

639

648

}

640

if (ret < 0){

641

switch(ret){

649

if(sret < 0){

650

switch(sret){

642

651

case GNUTLS_E_INTERRUPTED:

643

652

case GNUTLS_E_AGAIN:

644

653

break;

645

654

case GNUTLS_E_REHANDSHAKE:

646

655

do{

647

ret = gnutls_handshake (session);

656

ret = gnutls_handshake(session);

648

657

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

649

if (ret < 0){

658

if(ret < 0){

650

659

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

651

gnutls_perror (ret);

660

gnutls_perror(ret);

652

661

retval = -1;

653

662

goto mandos_end;

654

663

}

657

666

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

658

667

" encrypted session with Mandos server\n");

659

668

retval = -1;

660

gnutls_bye (session, GNUTLS_SHUT_RDWR);

669

gnutls_bye(session, GNUTLS_SHUT_RDWR);

661

670

goto mandos_end;

662

671

}

663

672

} else {

664

buffer_length += (size_t) ret;

673

buffer_length += (size_t) sret;

665

674

}

666

675

}

667

676

669

678

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

670

679

}

671

680

672

gnutls_bye (session, GNUTLS_SHUT_RDWR);

681

gnutls_bye(session, GNUTLS_SHUT_RDWR);

673

682

674

if (buffer_length > 0){

683

if(buffer_length > 0){

675

684

decrypted_buffer_size = pgp_packet_decrypt(mc, buffer,

676

685

buffer_length,

677

686

&decrypted_buffer);

678

if (decrypted_buffer_size >= 0){

687

if(decrypted_buffer_size >= 0){

679

688

written = 0;

680

689

while(written < (size_t) decrypted_buffer_size){

681

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

682

(size_t)decrypted_buffer_size - written,

683

stdout);

690

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

691

(size_t)decrypted_buffer_size - written,

692

stdout);

684

693

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

685

694

if(debug){

686

695

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

703

712

704

713

mandos_end:

705

714

free(buffer);

706

ret = TEMP_FAILURE_RETRY(close(tcp_sd));

715

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

707

716

if(ret == -1){

708

717

perror("close");

709

718

}

710

gnutls_deinit (session);

719

gnutls_deinit(session);

711

720

return retval;

712

721

}

713

722

731

740

/* Called whenever a service has been resolved successfully or

732

741

timed out */

733

742

734

switch (event) {

743

switch(event) {

735

744

default:

736

745

case AVAHI_RESOLVER_FAILURE:

737

746

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

745

754

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

746

755

if(debug){

747

756

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

748

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

749

interface, port);

757

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

758

ip, (intmax_t)interface, port);

750

759

}

751

760

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

752

if (ret == 0){

761

if(ret == 0){

753

762

avahi_simple_poll_quit(mc->simple_poll);

754

763

}

755

764

}

773

782

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

774

783

is removed from the LAN */

775

784

776

switch (event) {

785

switch(event) {

777

786

default:

778

787

case AVAHI_BROWSER_FAILURE:

779

788

797

the callback function is called the Avahi server will free the

789

798

resolver for us. */

790

799

791

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

800

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

792

801

protocol, name, type, domain,

793

802

AVAHI_PROTO_INET6, 0,

794

803

resolve_callback, mc)))

812

821

AvahiSServiceBrowser *sb = NULL;

813

822

int error;

814

823

int ret;

824

intmax_t tmpmax;

825

int numchars;

815

826

int exitcode = EXIT_SUCCESS;

816

827

const char *interface = "eth0";

817

828

struct ifreq network;

863

874

{ .name = NULL }

864

875

};

865

876

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

877

error_t parse_opt(int key, char *arg,

878

struct argp_state *state) {

879

switch(key) {

871

880

case 128: /* --debug */

872

881

debug = true;

873

882

break;

884

893

pubkey = arg;

885

894

break;

886

895

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

887

errno = 0;

888

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

889

if (errno){

890

perror("strtol");

896

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

897

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

898

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

899

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

891

900

exit(EXIT_FAILURE);

892

901

}

902

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

893

903

break;

894

904

case 130: /* --priority */

895

905

mc.priority = arg;

896

906

break;

897

907

case ARGP_KEY_ARG:

898

argp_usage (state);

908

argp_usage(state);

899

909

case ARGP_KEY_END:

900

910

break;

901

911

default:

908

918

.args_doc = "",

909

919

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

910

920

" passwords from a Mandos server" };

911

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

912

if (ret == ARGP_ERR_UNKNOWN){

921

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

922

if(ret == ARGP_ERR_UNKNOWN){

913

923

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

914

924

exitcode = EXIT_FAILURE;

915

925

goto end;

940

950

goto end;

941

951

}

942

952

}

943

ret = TEMP_FAILURE_RETRY(close(sd));

953

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

944

954

if(ret == -1){

945

955

perror("close");

946

956

}

950

960

gid = getgid();

951

961

952

962

ret = setuid(uid);

953

if (ret == -1){

963

if(ret == -1){

954

964

perror("setuid");

955

965

}

956

966

957

967

setgid(gid);

958

if (ret == -1){

968

if(ret == -1){

959

969

perror("setgid");

960

970

}

961

971

962

972

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

963

if (ret == -1){

973

if(ret == -1){

964

974

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

965

975

exitcode = EXIT_FAILURE;

966

976

goto end;

997

1007

exitcode = EXIT_FAILURE;

998

1008

goto end;

999

1009

}

1000

errno = 0;

1001

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

1002

if(errno){

1003

perror("Bad port number");

1010

uint16_t port;

1011

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

1012

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

1013

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

1014

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

1004

1015

exitcode = EXIT_FAILURE;

1005

1016

goto end;

1006

1017

}

1018

port = (uint16_t)tmpmax;

1007

1019

*address = '\0';

1008

1020

address = connect_to;

1009

1021

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

1015

1027

goto end;

1016

1028

}

1017

1029

1018

if (not debug){

1030

if(not debug){

1019

1031

avahi_set_log_function(empty_log);

1020

1032

}

1021

1033

1024

1036

1025

1037

/* Allocate main Avahi loop object */

1026

1038

mc.simple_poll = avahi_simple_poll_new();

1027

if (mc.simple_poll == NULL) {

1039

if(mc.simple_poll == NULL) {

1028

1040

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

1029

1041

" object.\n");

1030

1042

exitcode = EXIT_FAILURE;

1050

1062

}

1051

1063

1052

1064

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

1053

if (mc.server == NULL) {

1065

if(mc.server == NULL) {

1054

1066

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

1055

1067

avahi_strerror(error));

1056

1068

exitcode = EXIT_FAILURE;

1062

1074

AVAHI_PROTO_INET6,

1063

1075

"_mandos._tcp", NULL, 0,

1064

1076

browse_callback, &mc);

1065

if (sb == NULL) {

1077

if(sb == NULL) {

1066

1078

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

1067

1079

avahi_strerror(avahi_server_errno(mc.server)));

1068

1080

exitcode = EXIT_FAILURE;

1071

1083

1072

1084

/* Run the main loop */

1073

1085

1074

if (debug){

1086

if(debug){

1075

1087

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

1076

1088

}

1077

1089

1079

1091

1080

1092

end:

1081

1093

1082

if (debug){

1094

if(debug){

1083

1095

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

1084

1096

}

1085

1097

1086

1098

/* Cleanup things */

1087

if (sb != NULL)

1099

if(sb != NULL)

1088

1100

avahi_s_service_browser_free(sb);

1089

1101

1090

if (mc.server != NULL)

1102

if(mc.server != NULL)

1091

1103

avahi_server_free(mc.server);

1092

1104

1093

if (mc.simple_poll != NULL)

1105

if(mc.simple_poll != NULL)

1094

1106

avahi_simple_poll_free(mc.simple_poll);

1095

1107

1096

if (gnutls_initalized){

1108

if(gnutls_initalized){

1097

1109

gnutls_certificate_free_credentials(mc.cred);

1098

gnutls_global_deinit ();

1110

gnutls_global_deinit();

1099

1111

gnutls_dh_params_deinit(mc.dh_params);

1100

1112

}

1101

1113

1109

1121

struct dirent *direntry;

1110

1122

d = opendir(tempdir);

1111

1123

if(d == NULL){

1112

perror("opendir");

1124

if(errno != ENOENT){

1125

perror("opendir");

1126

}

1113

1127

} else {

1114

1128

while(true){

1115

1129

direntry = readdir(d);

1116

1130

if(direntry == NULL){

1117

1131

break;

1118

1132

}

1119

if (direntry->d_type == DT_REG){

1133

if(direntry->d_type == DT_REG){

1120

1134

char *fullname = NULL;

1121

1135

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

1122

1136

direntry->d_name);

1135

1149

closedir(d);

1136

1150

}

1137

1151

ret = rmdir(tempdir);

1138

if(ret == -1){

1152

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

1139

1153

perror("rmdir");

1140

1154

}

1141

1155

}