/mandos/trunk : revision 24.1.146

23

*/

24

25

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

26

asprintf() */

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

33

#include <sys/types.h> /* DIR, opendir(), stat(), struct

33

#include <sys/types.h> /* DIR, fdopendir(), stat(), struct

34

stat, waitpid(), WIFEXITED(),

35

WEXITSTATUS(), wait(), pid_t,

36

uid_t, gid_t, getuid(), getgid(),

42

WCOREDUMP() */

43

#include <sys/stat.h> /* struct stat, stat(), S_ISREG() */

44

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

45

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

45

#include <dirent.h> /* DIR, struct dirent, fdopendir(),

46

readdir(), closedir(), dirfd() */

47

#include <unistd.h> /* struct stat, stat(), S_ISREG(),

48

fcntl(), setuid(), setgid(),

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

698

750

perror("setuid");

699

751

}

700

752

701

if(plugindir == NULL){

702

dir = opendir(PDIR);

703

} else {

704

dir = opendir(plugindir);

705

}

706

707

if(dir == NULL){

708

perror("Could not open plugin dir");

709

exitstatus = EXIT_FAILURE;

710

goto fallback;

711

}

712

713

/* Set the FD_CLOEXEC flag on the directory, if possible */

753

/* Open plugin directory with close_on_exec flag */

714

754

{

715

int dir_fd = dirfd(dir);

716

if(dir_fd >= 0){

717

ret = set_cloexec_flag(dir_fd);

718

if(ret < 0){

719

perror("set_cloexec_flag");

720

exitstatus = EXIT_FAILURE;

721

goto fallback;

722

}

755

int dir_fd = -1;

756

if(plugindir == NULL){

757

dir_fd = open(PDIR, O_RDONLY |

758

#ifdef O_CLOEXEC

759

O_CLOEXEC

760

#else /* not O_CLOEXEC */

761

0

762

#endif /* not O_CLOEXEC */

763

);

764

} else {

765

dir_fd = open(plugindir, O_RDONLY |

766

#ifdef O_CLOEXEC

767

O_CLOEXEC

768

#else /* not O_CLOEXEC */

769

0

770

#endif /* not O_CLOEXEC */

771

);

772

}

773

if(dir_fd == -1){

774

perror("Could not open plugin dir");

775

exitstatus = EX_UNAVAILABLE;

776

goto fallback;

777

}

778

779

#ifndef O_CLOEXEC

780

/* Set the FD_CLOEXEC flag on the directory */

781

ret = set_cloexec_flag(dir_fd);

782

if(ret < 0){

783

perror("set_cloexec_flag");

784

TEMP_FAILURE_RETRY(close(dir_fd));

785

exitstatus = EX_OSERR;

786

goto fallback;

787

}

788

#endif /* O_CLOEXEC */

789

790

dir = fdopendir(dir_fd);

791

if(dir == NULL){

792

perror("Could not open plugin dir");

793

TEMP_FAILURE_RETRY(close(dir_fd));

794

exitstatus = EX_OSERR;

795

goto fallback;

723

796

}

724

797

}

725

798

735

808

if(dirst == NULL){

736

809

if(errno == EBADF){

737

810

perror("readdir");

738

exitstatus = EXIT_FAILURE;

811

exitstatus = EX_IOERR;

739

812

goto fallback;

740

813

}

741

814

break;

865

938

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

866

939

if(ret == -1){

867

940

perror("pipe");

868

exitstatus = EXIT_FAILURE;

941

exitstatus = EX_OSERR;

869

942

goto fallback;

870

943

}

871

944

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

872

945

ret = set_cloexec_flag(pipefd[0]);

873

946

if(ret < 0){

874

947

perror("set_cloexec_flag");

875

exitstatus = EXIT_FAILURE;

948

exitstatus = EX_OSERR;

876

949

goto fallback;

877

950

}

878

951

ret = set_cloexec_flag(pipefd[1]);

879

952

if(ret < 0){

880

953

perror("set_cloexec_flag");

881

exitstatus = EXIT_FAILURE;

954

exitstatus = EX_OSERR;

882

955

goto fallback;

883

956

}

884

957

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

887

960

NULL));

888

961

if(ret < 0){

889

962

perror("sigprocmask");

890

exitstatus = EXIT_FAILURE;

963

exitstatus = EX_OSERR;

891

964

goto fallback;

892

965

}

893

966

/* Starting a new process to be watched */

897

970

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

898

971

if(pid == -1){

899

972

perror("fork");

900

exitstatus = EXIT_FAILURE;

973

exitstatus = EX_OSERR;

901

974

goto fallback;

902

975

}

903

976

if(pid == 0){

905

978

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

906

979

if(ret < 0){

907

980

perror("sigaction");

908

_exit(EXIT_FAILURE);

981

_exit(EX_OSERR);

909

982

}

910

983

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

911

984

if(ret < 0){

912

985

perror("sigprocmask");

913

_exit(EXIT_FAILURE);

986

_exit(EX_OSERR);

914

987

}

915

988

916

989

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

917

990

if(ret == -1){

918

991

perror("dup2");

919

_exit(EXIT_FAILURE);

992

_exit(EX_OSERR);

920

993

}

921

994

922

995

if(dirfd(dir) < 0){

927

1000

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

928

1001

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

929

1002

perror("execv");

930

_exit(EXIT_FAILURE);

1003

_exit(EX_OSERR);

931

1004

}

932

1005

} else {

933

1006

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

934

1007

perror("execve");

935

_exit(EXIT_FAILURE);

1008

_exit(EX_OSERR);

936

1009

}

937

1010

}

938

1011

/* no return */

950

1023

if(ret < 0){

951

1024

perror("sigprocmask");

952

1025

}

953

exitstatus = EXIT_FAILURE;

1026

exitstatus = EX_OSERR;

954

1027

goto fallback;

955

1028

}

956

1029

964

1037

NULL));

965

1038

if(ret < 0){

966

1039

perror("sigprocmask");

967

exitstatus = EXIT_FAILURE;

1040

exitstatus = EX_OSERR;

968

1041

goto fallback;

969

1042

}

970

1043

997

1070

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

998

1071

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

999

1072

perror("select");

1000

exitstatus = EXIT_FAILURE;

1073

exitstatus = EX_OSERR;

1001

1074

goto fallback;

1002

1075

}

1003

1076

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

1039

1112

NULL));

1040

1113

if(ret < 0){

1041

1114

perror("sigprocmask");

1042

exitstatus = EXIT_FAILURE;

1115

exitstatus = EX_OSERR;

1043

1116

goto fallback;

1044

1117

}

1045

1118

1053

1126

&sigchld_action.sa_mask, NULL)));

1054

1127

if(ret < 0){

1055

1128

perror("sigprocmask");

1056

exitstatus = EXIT_FAILURE;

1129

exitstatus = EX_OSERR;

1057

1130

goto fallback;

1058

1131

}

1059

1132

1070

1143

proc->buffer_length);

1071

1144

if(not bret){

1072

1145

perror("print_out_password");

1073

exitstatus = EXIT_FAILURE;

1146

exitstatus = EX_IOERR;

1074

1147

}

1075

1148

goto fallback;

1076

1149

}

1089

1162

+ (size_t) BUFFER_SIZE);

1090

1163

if(proc->buffer == NULL){

1091

1164

perror("malloc");

1092

exitstatus = EXIT_FAILURE;

1165

exitstatus = EX_OSERR;

1093

1166

goto fallback;

1094

1167

}

1095

1168

proc->buffer_size += BUFFER_SIZE;

1116

1189

1117

1190

fallback:

1118

1191

1119

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

1192

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

1193

and exitstatus != EX_OK)){

1120

1194

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

1121

1195

occured */

1122

1196

bool bret;

1131

1205

bret = print_out_password(passwordbuffer, len);

1132

1206

if(not bret){

1133

1207

perror("print_out_password");

1134

exitstatus = EXIT_FAILURE;

1208

exitstatus = EX_IOERR;

1135

1209

}

1136

1210

}

1137

1211

1139

1213

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

1140

1214

if(ret == -1){

1141

1215

perror("sigaction");

1142

exitstatus = EXIT_FAILURE;

1216

exitstatus = EX_OSERR;

1143

1217

}

1144

1218

1145

1219

if(custom_argv != NULL){