/mandos/release : revision 237.2.181

25

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

26

asprintf(), O_CLOEXEC */

27

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

28

#include <stdlib.h> /* malloc(), exit(), EXIT_FAILURE,

29

EXIT_SUCCESS, realloc() */

28

#include <stdlib.h> /* malloc(), exit(), EXIT_SUCCESS,

29

realloc() */

30

#include <stdbool.h> /* bool, true, false */

31

#include <stdio.h> /* perror, fileno(), fprintf(),

32

stderr, STDOUT_FILENO */

54

#include <fcntl.h> /* fcntl(), F_GETFD, F_SETFD,

55

FD_CLOEXEC */

56

#include <string.h> /* strsep, strlen(), asprintf(),

57

strsignal() */

57

strsignal(), strcmp(), strncmp() */

58

#include <errno.h> /* errno */

59

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

60

argp_state, struct argp,

68

*/

69

#include <errno.h> /* errno, EBADF */

70

#include <inttypes.h> /* intmax_t, PRIdMAX, strtoimax() */

71

#include <sysexits.h> /* EX_OSERR, EX_USAGE, EX_IOERR,

72

EX_CONFIG, EX_UNAVAILABLE, EX_OK */

71

73

72

74

#define BUFFER_SIZE 256

73

75

102

104

/* Gets an existing plugin based on name,

103

105

or if none is found, creates a new one */

104

106

static plugin *getplugin(char *name){

105

/* Check for exiting plugin with that name */

107

/* Check for existing plugin with that name */

106

108

for(plugin *p = plugin_list; p != NULL; p = p->next){

107

109

if((p->name == name)

108

110

or (p->name and name and (strcmp(p->name, name) == 0))){

123

125

copy_name = strdup(name);

124

126

} while(copy_name == NULL and errno == EINTR);

125

127

if(copy_name == NULL){

128

int e = errno;

126

129

free(new_plugin);

130

errno = e;

127

131

return NULL;

128

132

}

129

133

}

137

141

new_plugin->argv = malloc(sizeof(char *) * 2);

138

142

} while(new_plugin->argv == NULL and errno == EINTR);

139

143

if(new_plugin->argv == NULL){

144

int e = errno;

140

145

free(copy_name);

141

146

free(new_plugin);

147

errno = e;

142

148

return NULL;

143

149

}

144

150

new_plugin->argv[0] = copy_name;

148

154

new_plugin->environ = malloc(sizeof(char *));

149

155

} while(new_plugin->environ == NULL and errno == EINTR);

150

156

if(new_plugin->environ == NULL){

157

int e = errno;

151

158

free(copy_name);

152

159

free(new_plugin->argv);

153

160

free(new_plugin);

161

errno = e;

154

162

return NULL;

155

163

}

156

164

new_plugin->environ[0] = NULL;

350

358

ret = sigaddset(&sigchld_action.sa_mask, SIGCHLD);

351

359

if(ret == -1){

352

360

perror("sigaddset");

353

exitstatus = EXIT_FAILURE;

361

exitstatus = EX_OSERR;

354

362

goto fallback;

355

363

}

356

364

ret = sigaction(SIGCHLD, &sigchld_action, &old_sigchld_action);

357

365

if(ret == -1){

358

366

perror("sigaction");

359

exitstatus = EXIT_FAILURE;

367

exitstatus = EX_OSERR;

360

368

goto fallback;

361

369

}

362

370

394

402

.doc = "Group ID the plugins will run as", .group = 3 },

395

403

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

396

404

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

405

/*

406

* These reproduce what we would get without ARGP_NO_HELP

407

*/

408

{ .name = "help", .key = '?',

409

.doc = "Give this help list", .group = -1 },

410

{ .name = "usage", .key = -3,

411

.doc = "Give a short usage message", .group = -1 },

412

{ .name = "version", .key = 'V',

413

.doc = "Print program version", .group = -1 },

397

414

{ .name = NULL }

398

415

};

399

416

400

error_t parse_opt(int key, char *arg, __attribute__((unused))

401

struct argp_state *state){

417

error_t parse_opt(int key, char *arg, struct argp_state *state){

418

errno = 0;

402

419

switch(key){

403

420

char *tmp;

404

421

intmax_t tmpmax;

405

422

case 'g': /* --global-options */

406

if(arg != NULL){

423

{

407

424

char *plugin_option;

408

425

while((plugin_option = strsep(&arg, ",")) != NULL){

409

if(plugin_option[0] == '\0'){

410

continue;

411

}

412

426

if(not add_argument(getplugin(NULL), plugin_option)){

413

perror("add_argument");

414

return ARGP_ERR_UNKNOWN;

427

break;

415

428

}

416

429

}

417

430

}

418

431

break;

419

432

case 'G': /* --global-env */

420

if(arg == NULL){

421

break;

422

}

423

if(not add_environment(getplugin(NULL), arg, true)){

424

perror("add_environment");

425

}

433

add_environment(getplugin(NULL), arg, true);

426

434

break;

427

435

case 'o': /* --options-for */

428

if(arg != NULL){

429

char *plugin_name = strsep(&arg, ":");

430

if(plugin_name[0] == '\0'){

431

break;

432

}

433

char *plugin_option;

434

while((plugin_option = strsep(&arg, ",")) != NULL){

435

if(not add_argument(getplugin(plugin_name), plugin_option)){

436

perror("add_argument");

437

return ARGP_ERR_UNKNOWN;

436

{

437

char *option_list = strchr(arg, ':');

438

if(option_list == NULL){

439

argp_error(state, "No colon in \"%s\"", arg);

440

errno = EINVAL;

441

break;

442

}

443

*option_list = '\0';

444

option_list++;

445

if(arg[0] == '\0'){

446

argp_error(state, "Empty plugin name");

447

errno = EINVAL;

448

break;

449

}

450

char *option;

451

while((option = strsep(&option_list, ",")) != NULL){

452

if(not add_argument(getplugin(arg), option)){

453

break;

438

454

}

439

455

}

440

456

}

441

457

break;

442

458

case 'E': /* --env-for */

443

if(arg == NULL){

444

break;

445

}

446

459

{

447

460

char *envdef = strchr(arg, ':');

448

461

if(envdef == NULL){

462

argp_error(state, "No colon in \"%s\"", arg);

463

errno = EINVAL;

449

464

break;

450

465

}

451

466

*envdef = '\0';

452

if(not add_environment(getplugin(arg), envdef+1, true)){

453

perror("add_environment");

467

envdef++;

468

if(arg[0] == '\0'){

469

argp_error(state, "Empty plugin name");

470

errno = EINVAL;

471

break;

454

472

}

473

add_environment(getplugin(arg), envdef, true);

455

474

}

456

475

break;

457

476

case 'd': /* --disable */

458

if(arg != NULL){

477

{

459

478

plugin *p = getplugin(arg);

460

if(p == NULL){

461

return ARGP_ERR_UNKNOWN;

479

if(p != NULL){

480

p->disabled = true;

462

481

}

463

p->disabled = true;

464

482

}

465

483

break;

466

484

case 'e': /* --enable */

467

if(arg != NULL){

485

{

468

486

plugin *p = getplugin(arg);

469

if(p == NULL){

470

return ARGP_ERR_UNKNOWN;

487

if(p != NULL){

488

p->disabled = false;

471

489

}

472

p->disabled = false;

473

490

}

474

491

break;

475

492

case 128: /* --plugin-dir */

476

493

free(plugindir);

477

494

plugindir = strdup(arg);

478

if(plugindir == NULL){

479

perror("strdup");

480

}

481

495

break;

482

496

case 129: /* --config-file */

483

497

/* This is already done by parse_opt_config_file() */

484

498

break;

485

499

case 130: /* --userid */

486

errno = 0;

487

500

tmpmax = strtoimax(arg, &tmp, 10);

488

501

if(errno != 0 or tmp == arg or *tmp != '\0'

489

502

or tmpmax != (uid_t)tmpmax){

490

fprintf(stderr, "Bad user ID number: \"%s\", using %"

491

PRIdMAX "\n", arg, (intmax_t)uid);

492

} else {

493

uid = (uid_t)tmpmax;

503

argp_error(state, "Bad user ID number: \"%s\", using %"

504

PRIdMAX, arg, (intmax_t)uid);

505

break;

494

506

}

507

uid = (uid_t)tmpmax;

495

508

break;

496

509

case 131: /* --groupid */

497

errno = 0;

498

510

tmpmax = strtoimax(arg, &tmp, 10);

499

511

if(errno != 0 or tmp == arg or *tmp != '\0'

500

512

or tmpmax != (gid_t)tmpmax){

501

fprintf(stderr, "Bad group ID number: \"%s\", using %"

502

PRIdMAX "\n", arg, (intmax_t)gid);

503

} else {

504

gid = (gid_t)tmpmax;

513

argp_error(state, "Bad group ID number: \"%s\", using %"

514

PRIdMAX, arg, (intmax_t)gid);

515

break;

505

516

}

517

gid = (gid_t)tmpmax;

506

518

break;

507

519

case 132: /* --debug */

508

520

debug = true;

509

521

break;

522

/*

523

* These reproduce what we would get without ARGP_NO_HELP

524

*/

525

case '?': /* --help */

526

state->flags &= ~(unsigned int)ARGP_NO_EXIT; /* force exit */

527

argp_state_help(state, state->out_stream, ARGP_HELP_STD_HELP);

528

case -3: /* --usage */

529

state->flags &= ~(unsigned int)ARGP_NO_EXIT; /* force exit */

530

argp_state_help(state, state->out_stream,

531

ARGP_HELP_USAGE | ARGP_HELP_EXIT_OK);

532

case 'V': /* --version */

533

fprintf(state->out_stream, "%s\n", argp_program_version);

534

exit(EXIT_SUCCESS);

535

break;

510

536

/*

511

537

* When adding more options before this line, remember to also add a

512

538

* "case" to the "parse_opt_config_file" function below.

515

541

/* Cryptsetup always passes an argument, which is an empty

516

542

string if "none" was specified in /etc/crypttab. So if

517

543

argument was empty, we ignore it silently. */

518

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

519

fprintf(stderr, "Ignoring unknown argument \"%s\"\n", arg);

544

if(arg[0] == '\0'){

545

break;

520

546

}

521

break;

522

case ARGP_KEY_END:

523

break;

524

547

default:

525

548

return ARGP_ERR_UNKNOWN;

526

549

}

527

return 0;

550

return errno; /* Set to 0 at start */

528

551

}

529

552

530

553

/* This option parser is the same as parse_opt() above, except it

532

555

error_t parse_opt_config_file(int key, char *arg,

533

556

__attribute__((unused))

534

557

struct argp_state *state){

558

errno = 0;

535

559

switch(key){

536

560

case 'g': /* --global-options */

537

561

case 'G': /* --global-env */

544

568

case 129: /* --config-file */

545

569

free(argfile);

546

570

argfile = strdup(arg);

547

if(argfile == NULL){

548

perror("strdup");

549

}

550

571

break;

551

572

case 130: /* --userid */

552

573

case 131: /* --groupid */

553

574

case 132: /* --debug */

575

case '?': /* --help */

576

case -3: /* --usage */

577

case 'V': /* --version */

554

578

case ARGP_KEY_ARG:

555

case ARGP_KEY_END:

556

579

break;

557

580

default:

558

581

return ARGP_ERR_UNKNOWN;

559

582

}

560

return 0;

583

return errno;

561

584

}

562

585

563

586

struct argp argp = { .options = options,

567

590

568

591

/* Parse using parse_opt_config_file() in order to get the custom

569

592

config file location, if any. */

570

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

571

if(ret == ARGP_ERR_UNKNOWN){

572

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

573

exitstatus = EXIT_FAILURE;

593

ret = argp_parse(&argp, argc, argv,

594

ARGP_IN_ORDER | ARGP_NO_EXIT | ARGP_NO_HELP,

595

NULL, NULL);

596

switch(ret){

597

case 0:

598

break;

599

case ENOMEM:

600

default:

601

errno = ret;

602

perror("argp_parse");

603

exitstatus = EX_OSERR;

604

goto fallback;

605

case EINVAL:

606

exitstatus = EX_USAGE;

574

607

goto fallback;

575

608

}

576

609

594

627

custom_argv = malloc(sizeof(char*) * 2);

595

628

if(custom_argv == NULL){

596

629

perror("malloc");

597

exitstatus = EXIT_FAILURE;

630

exitstatus = EX_OSERR;

598

631

goto fallback;

599

632

}

600

633

custom_argv[0] = argv[0];

617

650

new_arg = strdup(p);

618

651

if(new_arg == NULL){

619

652

perror("strdup");

620

exitstatus = EXIT_FAILURE;

653

exitstatus = EX_OSERR;

621

654

free(org_line);

622

655

goto fallback;

623

656

}

627

660

* ((unsigned int) custom_argc + 1));

628

661

if(custom_argv == NULL){

629

662

perror("realloc");

630

exitstatus = EXIT_FAILURE;

663

exitstatus = EX_OSERR;

631

664

free(org_line);

632

665

goto fallback;

633

666

}

640

673

} while(ret == EOF and errno == EINTR);

641

674

if(ret == EOF){

642

675

perror("fclose");

643

exitstatus = EXIT_FAILURE;

676

exitstatus = EX_IOERR;

644

677

goto fallback;

645

678

}

646

679

free(org_line);

649

682

not affect opening plugins */

650

683

if(errno == EMFILE or errno == ENFILE or errno == ENOMEM){

651

684

perror("fopen");

652

exitstatus = EXIT_FAILURE;

685

exitstatus = EX_OSERR;

653

686

goto fallback;

654

687

}

655

688

}

656

/* If there was any arguments from configuration file,

657

pass them to parser as command arguments */

689

/* If there were any arguments from the configuration file, pass

690

them to parser as command line arguments */

658

691

if(custom_argv != NULL){

659

ret = argp_parse(&argp, custom_argc, custom_argv, ARGP_IN_ORDER,

660

0, NULL);

661

if(ret == ARGP_ERR_UNKNOWN){

662

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

663

exitstatus = EXIT_FAILURE;

692

ret = argp_parse(&argp, custom_argc, custom_argv,

693

ARGP_IN_ORDER | ARGP_NO_EXIT | ARGP_NO_HELP,

694

NULL, NULL);

695

switch(ret){

696

case 0:

697

break;

698

case ENOMEM:

699

default:

700

errno = ret;

701

perror("argp_parse");

702

exitstatus = EX_OSERR;

703

goto fallback;

704

case EINVAL:

705

exitstatus = EX_CONFIG;

664

706

goto fallback;

665

707

}

666

708

}

667

709

668

710

/* Parse actual command line arguments, to let them override the

669

711

config file */

670

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

671

if(ret == ARGP_ERR_UNKNOWN){

672

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

673

exitstatus = EXIT_FAILURE;

712

ret = argp_parse(&argp, argc, argv,

713

ARGP_IN_ORDER | ARGP_NO_EXIT | ARGP_NO_HELP,

714

NULL, NULL);

715

switch(ret){

716

case 0:

717

break;

718

case ENOMEM:

719

default:

720

errno = ret;

721

perror("argp_parse");

722

exitstatus = EX_OSERR;

723

goto fallback;

724

case EINVAL:

725

exitstatus = EX_USAGE;

674

726

goto fallback;

675

727

}

676

728

720

772

}

721

773

if(dir_fd == -1){

722

774

perror("Could not open plugin dir");

723

exitstatus = EXIT_FAILURE;

775

exitstatus = EX_UNAVAILABLE;

724

776

goto fallback;

725

777

}

726

778

730

782

if(ret < 0){

731

783

perror("set_cloexec_flag");

732

784

TEMP_FAILURE_RETRY(close(dir_fd));

733

exitstatus = EXIT_FAILURE;

785

exitstatus = EX_OSERR;

734

786

goto fallback;

735

787

}

736

788

#endif /* O_CLOEXEC */

739

791

if(dir == NULL){

740

792

perror("Could not open plugin dir");

741

793

TEMP_FAILURE_RETRY(close(dir_fd));

742

exitstatus = EXIT_FAILURE;

794

exitstatus = EX_OSERR;

743

795

goto fallback;

744

796

}

745

797

}

756

808

if(dirst == NULL){

757

809

if(errno == EBADF){

758

810

perror("readdir");

759

exitstatus = EXIT_FAILURE;

811

exitstatus = EX_IOERR;

760

812

goto fallback;

761

813

}

762

814

break;

792

844

for(const char **suf = bad_suffixes; *suf != NULL; suf++){

793

845

size_t suf_len = strlen(*suf);

794

846

if((d_name_len >= suf_len)

795

and (strcmp((dirst->d_name)+d_name_len-suf_len, *suf)

847

and (strcmp((dirst->d_name) + d_name_len-suf_len, *suf)

796

848

== 0)){

797

849

if(debug){

798

850

fprintf(stderr, "Ignoring plugin dir entry \"%s\""

886

938

ret = (int)TEMP_FAILURE_RETRY(pipe(pipefd));

887

939

if(ret == -1){

888

940

perror("pipe");

889

exitstatus = EXIT_FAILURE;

941

exitstatus = EX_OSERR;

890

942

goto fallback;

891

943

}

892

944

/* Ask OS to automatic close the pipe on exec */

893

945

ret = set_cloexec_flag(pipefd[0]);

894

946

if(ret < 0){

895

947

perror("set_cloexec_flag");

896

exitstatus = EXIT_FAILURE;

948

exitstatus = EX_OSERR;

897

949

goto fallback;

898

950

}

899

951

ret = set_cloexec_flag(pipefd[1]);

900

952

if(ret < 0){

901

953

perror("set_cloexec_flag");

902

exitstatus = EXIT_FAILURE;

954

exitstatus = EX_OSERR;

903

955

goto fallback;

904

956

}

905

957

/* Block SIGCHLD until process is safely in process list */

908

960

NULL));

909

961

if(ret < 0){

910

962

perror("sigprocmask");

911

exitstatus = EXIT_FAILURE;

963

exitstatus = EX_OSERR;

912

964

goto fallback;

913

965

}

914

966

/* Starting a new process to be watched */

918

970

} while(pid == -1 and errno == EINTR);

919

971

if(pid == -1){

920

972

perror("fork");

921

exitstatus = EXIT_FAILURE;

973

exitstatus = EX_OSERR;

922

974

goto fallback;

923

975

}

924

976

if(pid == 0){

926

978

ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);

927

979

if(ret < 0){

928

980

perror("sigaction");

929

_exit(EXIT_FAILURE);

981

_exit(EX_OSERR);

930

982

}

931

983

ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);

932

984

if(ret < 0){

933

985

perror("sigprocmask");

934

_exit(EXIT_FAILURE);

986

_exit(EX_OSERR);

935

987

}

936

988

937

989

ret = dup2(pipefd[1], STDOUT_FILENO); /* replace our stdout */

938

990

if(ret == -1){

939

991

perror("dup2");

940

_exit(EXIT_FAILURE);

992

_exit(EX_OSERR);

941

993

}

942

994

943

995

if(dirfd(dir) < 0){

948

1000

if(p->environ[0] == NULL){

949

1001

if(execv(filename, p->argv) < 0){

950

1002

perror("execv");

951

_exit(EXIT_FAILURE);

1003

_exit(EX_OSERR);

952

1004

}

953

1005

} else {

954

1006

if(execve(filename, p->argv, p->environ) < 0){

955

1007

perror("execve");

956

_exit(EXIT_FAILURE);

1008

_exit(EX_OSERR);

957

1009

}

958

1010

}

959

1011

/* no return */

971

1023

if(ret < 0){

972

1024

perror("sigprocmask");

973

1025

}

974

exitstatus = EXIT_FAILURE;

1026

exitstatus = EX_OSERR;

975

1027

goto fallback;

976

1028

}

977

1029

985

1037

NULL));

986

1038

if(ret < 0){

987

1039

perror("sigprocmask");

988

exitstatus = EXIT_FAILURE;

1040

exitstatus = EX_OSERR;

989

1041

goto fallback;

990

1042

}

991

1043

1018

1070

int select_ret = select(maxfd+1, &rfds, NULL, NULL, NULL);

1019

1071

if(select_ret == -1 and errno != EINTR){

1020

1072

perror("select");

1021

exitstatus = EXIT_FAILURE;

1073

exitstatus = EX_OSERR;

1022

1074

goto fallback;

1023

1075

}

1024

1076

/* OK, now either a process completed, or something can be read

1060

1112

NULL));

1061

1113

if(ret < 0){

1062

1114

perror("sigprocmask");

1063

exitstatus = EXIT_FAILURE;

1115

exitstatus = EX_OSERR;

1064

1116

goto fallback;

1065

1117

}

1066

1118

1074

1126

&sigchld_action.sa_mask, NULL)));

1075

1127

if(ret < 0){

1076

1128

perror("sigprocmask");

1077

exitstatus = EXIT_FAILURE;

1129

exitstatus = EX_OSERR;

1078

1130

goto fallback;

1079

1131

}

1080

1132

1091

1143

proc->buffer_length);

1092

1144

if(not bret){

1093

1145

perror("print_out_password");

1094

exitstatus = EXIT_FAILURE;

1146

exitstatus = EX_IOERR;

1095

1147

}

1096

1148

goto fallback;

1097

1149

}

1110

1162

+ (size_t) BUFFER_SIZE);

1111

1163

if(proc->buffer == NULL){

1112

1164

perror("malloc");

1113

exitstatus = EXIT_FAILURE;

1165

exitstatus = EX_OSERR;

1114

1166

goto fallback;

1115

1167

}

1116

1168

proc->buffer_size += BUFFER_SIZE;

1137

1189

1138

1190

fallback:

1139

1191

1140

if(plugin_list == NULL or exitstatus != EXIT_SUCCESS){

1192

if(plugin_list == NULL or (exitstatus != EXIT_SUCCESS

1193

and exitstatus != EX_OK)){

1141

1194

/* Fallback if all plugins failed, none are found or an error

1142

1195

occured */

1143

1196

bool bret;

1152

1205

bret = print_out_password(passwordbuffer, len);

1153

1206

if(not bret){

1154

1207

perror("print_out_password");

1155

exitstatus = EXIT_FAILURE;

1208

exitstatus = EX_IOERR;

1156

1209

}

1157

1210

}

1158

1211

1160

1213

ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);

1161

1214

if(ret == -1){

1162

1215

perror("sigaction");

1163

exitstatus = EXIT_FAILURE;

1216

exitstatus = EX_OSERR;

1164

1217

}

1165

1218

1166

1219

if(custom_argv != NULL){