/mandos/trunk : revision 177

65

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

66

67

#define BUFFER_SIZE 256

68

#define ARGFILE "/conf/conf.d/mandos/plugin-runner.conf"

68

69

#define PDIR "/lib/mandos/plugins.d"

70

#define AFILE "/conf/conf.d/mandos/plugin-runner.conf"

69

71

70

72

const char *argp_program_version = "plugin-runner 1.0";

71

73

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

72

74

73

struct process;

74

75

typedef struct process{

75

struct plugin;

76

77

typedef struct plugin{

78

char *name; /* can be NULL or any plugin name */

79

char **argv;

80

int argc;

81

char **environ;

82

int envc;

83

bool disabled;

84

85

/* Variables used for running processes*/

76

86

pid_t pid;

77

87

int fd;

78

88

char *buffer;

81

91

bool eof;

82

92

volatile bool completed;

83

93

volatile int status;

84

struct process *next;

85

} process;

86

87

typedef struct plugin{

88

char *name; /* can be NULL or any plugin name */

89

char **argv;

90

int argc;

91

char **environ;

92

int envc;

93

bool disabled;

94

struct plugin *next;

95

} plugin;

96

97

static plugin *getplugin(char *name, plugin **plugin_list){

98

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

97

static plugin *plugin_list = NULL;

98

99

/* Gets an existing plugin based on name,

100

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

101

static plugin *getplugin(char *name){

102

/* Check for exiting plugin with that name */

103

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

99

104

if ((p->name == name)

100

105

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

101

106

return p;

116

121

117

122

*new_plugin = (plugin) { .name = copy_name,

118

123

.argc = 1,

119

.envc = 0,

120

124

.disabled = false,

121

.next = *plugin_list };

125

.next = plugin_list };

122

126

123

127

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

124

128

if (new_plugin->argv == NULL){

128

132

}

129

133

new_plugin->argv[0] = copy_name;

130

134

new_plugin->argv[1] = NULL;

131

135

132

136

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

133

137

if(new_plugin->environ == NULL){

134

138

free(copy_name);

137

141

return NULL;

138

142

}

139

143

new_plugin->environ[0] = NULL;

144

140

145

/* Append the new plugin to the list */

141

*plugin_list = new_plugin;

146

plugin_list = new_plugin;

142

147

return new_plugin;

143

148

}

144

149

174

179

}

175

180

176

181

/* Add to a plugin's environment */

177

static bool add_environment(plugin *p, const char *def){

182

static bool add_environment(plugin *p, const char *def, bool replace){

178

183

if(p == NULL){

179

184

return false;

180

185

}

186

/* namelen = length of name of environment variable */

187

size_t namelen = (size_t)(strchrnul(def, '=') - def);

188

/* Search for this environment variable */

189

for(char **e = p->environ; *e != NULL; e++){

190

if(strncmp(*e, def, namelen + 1) == 0){

191

/* It already exists */

192

if(replace){

193

char *new = realloc(*e, strlen(def) + 1);

194

if(new == NULL){

195

return false;

196

}

197

*e = new;

198

strcpy(*e, def);

199

}

200

return true;

201

}

202

}

181

203

return add_to_char_array(def, &(p->environ), &(p->envc));

182

204

}

183

205

184

185

206

/*

186

207

* Based on the example in the GNU LibC manual chapter 13.13 "File

187

208

* Descriptor Flags".

198

219

return fcntl(fd, F_SETFD, ret | FD_CLOEXEC);

199

220

}

200

221

201

process *process_list = NULL;

202

222

203

223

/* Mark processes as completed when they exit, and save their exit

204

224

status. */

205

225

void handle_sigchld(__attribute__((unused)) int sig){

206

226

while(true){

207

process *proc = process_list;

227

plugin *proc = plugin_list;

208

228

int status;

209

229

pid_t pid = waitpid(-1, &status, WNOHANG);

210

230

if(pid == 0){

218

238

/* No child processes */

219

239

break;

220

240

}

221

241

222

242

/* A child exited, find it in process_list */

223

243

while(proc != NULL and proc->pid != pid){

224

244

proc = proc->next;

232

252

}

233

253

}

234

254

255

/* Prints out a password to stdout */

235

256

bool print_out_password(const char *buffer, size_t length){

236

257

ssize_t ret;

237

if(length>0 and buffer[length-1] == '\n'){

238

length--;

239

}

240

258

for(size_t written = 0; written < length; written += (size_t)ret){

241

259

ret = TEMP_FAILURE_RETRY(write(STDOUT_FILENO, buffer + written,

242

260

length - written));

247

265

return true;

248

266

}

249

267

250

char **add_to_argv(char **argv, int *argc, char *arg){

251

if (argv == NULL){

252

*argc = 1;

253

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

254

if(argv == NULL){

255

return NULL;

268

/* Removes and free a plugin from the plugin list */

269

static void free_plugin(plugin *plugin_node){

270

271

for(char **arg = plugin_node->argv; *arg != NULL; arg++){

272

free(*arg);

273

}

274

free(plugin_node->argv);

275

for(char **env = plugin_node->environ; *env != NULL; env++){

276

free(*env);

277

}

278

free(plugin_node->environ);

279

free(plugin_node->buffer);

280

281

/* Removes the plugin from the singly-linked list */

282

if(plugin_node == plugin_list){

283

/* First one - simple */

284

plugin_list = plugin_list->next;

285

} else {

286

/* Second one or later */

287

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

288

if(p->next == plugin_node){

289

p->next = plugin_node->next;

290

break;

291

}

256

292

}

257

argv[0] = NULL; /* Will be set to argv[0] in main before

258

parsing */

259

argv[1] = NULL;

260

}

261

*argc += 1;

262

argv = realloc(argv, sizeof(char *)

263

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

264

if(argv == NULL){

265

return NULL;

266

}

267

argv[*argc-1] = arg;

268

argv[*argc] = NULL;

269

return argv;

293

}

294

295

free(plugin_node);

270

296

}

271

297

272

static void free_plugin_list(plugin *plugin_list){

273

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

274

next = plugin_list->next;

275

for(char **arg = plugin_list->argv; *arg != NULL; arg++){

276

free(*arg);

277

}

278

free(plugin_list->argv);

279

for(char **env = plugin_list->environ; *env != NULL; env++){

280

free(*env);

281

}

282

free(plugin_list->environ);

283

free(plugin_list);

298

static void free_plugin_list(void){

299

while(plugin_list != NULL){

300

free_plugin(plugin_list);

284

301

}

285

302

}

286

303

287

304

int main(int argc, char *argv[]){

288

const char *plugindir = "/lib/mandos/plugins.d";

289

const char *argfile = ARGFILE;

305

char *plugindir = NULL;

306

char *argfile = NULL;

290

307

FILE *conffp;

291

308

size_t d_name_len;

292

309

DIR *dir = NULL;

324

341

{ .name = "global-options", .key = 'g',

325

342

.arg = "OPTION[,OPTION[,...]]",

326

343

.doc = "Options passed to all plugins" },

327

{ .name = "global-envs", .key = 'e',

344

{ .name = "global-env", .key = 'G',

328

345

.arg = "VAR=value",

329

346

.doc = "Environment variable passed to all plugins" },

330

347

{ .name = "options-for", .key = 'o',

331

348

.arg = "PLUGIN:OPTION[,OPTION[,...]]",

332

349

.doc = "Options passed only to specified plugin" },

333

{ .name = "envs-for", .key = 'f',

350

{ .name = "env-for", .key = 'E',

334

351

.arg = "PLUGIN:ENV=value",

335

352

.doc = "Environment variable passed to specified plugin" },

336

353

{ .name = "disable", .key = 'd',

337

354

.arg = "PLUGIN",

338

355

.doc = "Disable a specific plugin", .group = 1 },

356

{ .name = "enable", .key = 'e',

357

.arg = "PLUGIN",

358

.doc = "Enable a specific plugin", .group = 1 },

339

359

{ .name = "plugin-dir", .key = 128,

340

360

.arg = "DIRECTORY",

341

361

.doc = "Specify a different plugin directory", .group = 2 },

342

{ .name = "userid", .key = 129,

343

.arg = "ID", .flags = 0,

344

.doc = "User ID the plugins will run as", .group = 2 },

345

{ .name = "groupid", .key = 130,

346

.arg = "ID", .flags = 0,

347

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

348

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

349

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

362

{ .name = "config-file", .key = 129,

363

.arg = "FILE",

364

.doc = "Specify a different configuration file", .group = 2 },

365

{ .name = "userid", .key = 130,

366

.arg = "ID", .flags = 0,

367

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

368

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

369

.arg = "ID", .flags = 0,

370

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

371

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

372

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

350

373

{ .name = NULL }

351

374

};

352

375

353

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

354

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

355

pointer to our plugin list pointer. */

356

plugin **plugins = state->input;

376

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

377

struct argp_state *state) {

357

378

switch (key) {

358

case 'g':

379

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

359

380

if (arg != NULL){

360

381

char *p;

361

382

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

362

383

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

363

384

continue;

364

385

}

365

if(not add_argument(getplugin(NULL, plugins), p)){

386

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

366

387

perror("add_argument");

367

388

return ARGP_ERR_UNKNOWN;

368

389

}

369

390

}

370

391

}

371

392

break;

372

case 'e':

393

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

373

394

if(arg == NULL){

374

395

break;

375

396

}

376

{

377

char *envdef = strdup(arg);

378

if(envdef == NULL){

379

break;

380

}

381

if(not add_environment(getplugin(NULL, plugins), envdef)){

382

perror("add_environment");

383

}

397

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

398

perror("add_environment");

384

399

}

385

400

break;

386

case 'o':

401

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

387

402

if (arg != NULL){

388

403

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

389

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

404

if(p_name[0] == '\0' or arg == NULL){

390

405

break;

391

406

}

392

407

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

393

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

408

if(opt[0] == '\0' or opt == NULL){

394

409

break;

395

410

}

396

if(opt != NULL){

397

char *p;

398

while((p = strsep(&opt, ",")) != NULL){

399

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

400

continue;

401

}

402

if(not add_argument(getplugin(p_name, plugins), p)){

403

perror("add_argument");

404

return ARGP_ERR_UNKNOWN;

405

}

411

char *p;

412

while((p = strsep(&opt, ",")) != NULL){

413

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

414

continue;

415

}

416

if(not add_argument(getplugin(p_name), p)){

417

perror("add_argument");

418

return ARGP_ERR_UNKNOWN;

406

419

}

407

420

}

408

421

}

409

422

break;

410

case 'f':

423

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

411

424

if(arg == NULL){

412

425

break;

413

426

}

416

429

if(envdef == NULL){

417

430

break;

418

431

}

419

char *p_name = strndup(arg, (size_t) (envdef-arg));

420

if(p_name == NULL){

421

break;

422

}

423

envdef++;

424

if(not add_environment(getplugin(p_name, plugins), envdef)){

432

*envdef = '\0';

433

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

425

434

perror("add_environment");

426

435

}

427

436

}

428

437

break;

429

case 'd':

438

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

430

439

if (arg != NULL){

431

plugin *p = getplugin(arg, plugins);

440

plugin *p = getplugin(arg);

432

441

if(p == NULL){

433

442

return ARGP_ERR_UNKNOWN;

434

443

}

435

444

p->disabled = true;

436

445

}

437

446

break;

438

case 128:

439

plugindir = arg;

440

break;

441

case 129:

447

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

448

if (arg != NULL){

449

plugin *p = getplugin(arg);

450

if(p == NULL){

451

return ARGP_ERR_UNKNOWN;

452

}

453

p->disabled = false;

454

}

455

break;

456

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

457

free(plugindir);

458

plugindir = strdup(arg);

459

if(plugindir == NULL){

460

perror("strdup");

461

}

462

break;

463

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

464

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

465

break;

466

case 130: /* --userid */

442

467

uid = (uid_t)strtol(arg, NULL, 10);

443

468

break;

444

case 130:

469

case 131: /* --groupid */

445

470

gid = (gid_t)strtol(arg, NULL, 10);

446

471

break;

447

case 131:

472

case 132: /* --debug */

448

473

debug = true;

449

474

break;

450

475

case ARGP_KEY_ARG:

458

483

return 0;

459

484

}

460

485

461

plugin *plugin_list = NULL;

486

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

487

ignores everything but the --config-file option. */

488

error_t parse_opt_config_file (int key, char *arg,

489

__attribute__((unused))

490

struct argp_state *state) {

491

switch (key) {

492

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

493

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

494

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

495

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

496

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

497

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

498

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

499

break;

500

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

501

free(argfile);

502

argfile = strdup(arg);

503

if(argfile == NULL){

504

perror("strdup");

505

}

506

break;

507

case 130: /* --userid */

508

case 131: /* --groupid */

509

case 132: /* --debug */

510

case ARGP_KEY_ARG:

511

case ARGP_KEY_END:

512

break;

513

default:

514

return ARGP_ERR_UNKNOWN;

515

}

516

return 0;

517

}

462

518

463

struct argp argp = { .options = options, .parser = parse_opt,

464

.args_doc = "[+PLUS_SEPARATED_OPTIONS]",

519

struct argp argp = { .options = options,

520

.parser = parse_opt_config_file,

521

.args_doc = "",

465

522

.doc = "Mandos plugin runner -- Run plugins" };

466

523

467

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

524

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

525

config file location, if any. */

526

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

468

527

if (ret == ARGP_ERR_UNKNOWN){

469

528

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

470

529

exitstatus = EXIT_FAILURE;

471

530

goto fallback;

472

531

}

473

474

conffp = fopen(argfile, "r");

532

533

/* Reset to the normal argument parser */

534

argp.parser = parse_opt;

535

536

/* Open the configfile if available */

537

if (argfile == NULL){

538

conffp = fopen(AFILE, "r");

539

} else {

540

conffp = fopen(argfile, "r");

541

}

475

542

if(conffp != NULL){

476

543

char *org_line = NULL;

477

544

char *p, *arg, *new_arg, *line;

480

547

const char whitespace_delims[] = " \r\t\f\v\n";

481

548

const char comment_delim[] = "#";

482

549

550

custom_argc = 1;

551

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

552

if(custom_argv == NULL){

553

perror("malloc");

554

exitstatus = EXIT_FAILURE;

555

goto fallback;

556

}

557

custom_argv[0] = argv[0];

558

custom_argv[1] = NULL;

559

560

/* for each line in the config file, strip whitespace and ignore

561

commented text */

483

562

while(true){

484

563

sret = getline(&org_line, &size, conffp);

485

564

if(sret == -1){

493

572

continue;

494

573

}

495

574

new_arg = strdup(p);

496

custom_argv = add_to_argv(custom_argv, &custom_argc, new_arg);

497

if (custom_argv == NULL){

498

perror("add_to_argv");

499

exitstatus = EXIT_FAILURE;

500

goto fallback;

501

}

575

if(new_arg == NULL){

576

perror("strdup");

577

exitstatus = EXIT_FAILURE;

578

free(org_line);

579

goto fallback;

580

}

581

582

custom_argc += 1;

583

custom_argv = realloc(custom_argv, sizeof(char *)

584

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

585

if(custom_argv == NULL){

586

perror("realloc");

587

exitstatus = EXIT_FAILURE;

588

free(org_line);

589

goto fallback;

590

}

591

custom_argv[custom_argc-1] = new_arg;

592

custom_argv[custom_argc] = NULL;

502

593

}

503

594

}

504

595

free(org_line);

505

} else{

596

} else {

506

597

/* Check for harmful errors and go to fallback. Other errors might

507

598

not affect opening plugins */

508

599

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

511

602

goto fallback;

512

603

}

513

604

}

514

605

/* If there was any arguments from configuration file,

606

pass them to parser as command arguments */

515

607

if(custom_argv != NULL){

516

custom_argv[0] = argv[0];

517

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

518

&plugin_list);

608

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

609

0, NULL);

519

610

if (ret == ARGP_ERR_UNKNOWN){

520

611

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

521

612

exitstatus = EXIT_FAILURE;

523

614

}

524

615

}

525

616

617

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

618

config file */

619

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

620

if (ret == ARGP_ERR_UNKNOWN){

621

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

622

exitstatus = EXIT_FAILURE;

623

goto fallback;

624

}

625

526

626

if(debug){

527

627

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

528

628

fprintf(stderr, "Plugin: %s has %d arguments\n",

537

637

}

538

638

}

539

639

640

/* Strip permissions down to nobody */

540

641

ret = setuid(uid);

541

642

if (ret == -1){

542

643

perror("setuid");

543

}

544

644

}

545

645

setgid(gid);

546

646

if (ret == -1){

547

647

perror("setgid");

548

648

}

549

649

550

dir = opendir(plugindir);

650

if (plugindir == NULL){

651

dir = opendir(PDIR);

652

} else {

653

dir = opendir(plugindir);

654

}

655

551

656

if(dir == NULL){

552

657

perror("Could not open plugin dir");

553

658

exitstatus = EXIT_FAILURE;

569

674

570

675

FD_ZERO(&rfds_all);

571

676

677

/* Read and execute any executable in the plugin directory*/

572

678

while(true){

573

679

dirst = readdir(dir);

574

680

575

// All directory entries have been processed

681

/* All directory entries have been processed */

576

682

if(dirst == NULL){

577

683

if (errno == EBADF){

578

684

perror("readdir");

584

690

585

691

d_name_len = strlen(dirst->d_name);

586

692

587

// Ignore dotfiles, backup files and other junk

693

/* Ignore dotfiles, backup files and other junk */

588

694

{

589

695

bool bad_name = false;

590

696

605

711

break;

606

712

}

607

713

}

608

609

714

if(bad_name){

610

715

continue;

611

716

}

612

613

717

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

614

718

size_t suf_len = strlen(*suf);

615

719

if((d_name_len >= suf_len)

630

734

}

631

735

632

736

char *filename;

633

ret = asprintf(&filename, "%s/%s", plugindir, dirst->d_name);

737

if(plugindir == NULL){

738

ret = asprintf(&filename, PDIR "/%s", dirst->d_name);

739

} else {

740

ret = asprintf(&filename, "%s/%s", plugindir, dirst->d_name);

741

}

634

742

if(ret < 0){

635

743

perror("asprintf");

636

744

continue;

642

750

free(filename);

643

751

continue;

644

752

}

645

753

754

/* Ignore non-executable files */

646

755

if (not S_ISREG(st.st_mode) or (access(filename, X_OK) != 0)){

647

756

if(debug){

648

757

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

651

760

free(filename);

652

761

continue;

653

762

}

654

plugin *p = getplugin(dirst->d_name, &plugin_list);

763

764

plugin *p = getplugin(dirst->d_name);

655

765

if(p == NULL){

656

766

perror("getplugin");

657

767

free(filename);

667

777

}

668

778

{

669

779

/* Add global arguments to argument list for this plugin */

670

plugin *g = getplugin(NULL, &plugin_list);

780

plugin *g = getplugin(NULL);

671

781

if(g != NULL){

672

782

for(char **a = g->argv + 1; *a != NULL; a++){

673

783

if(not add_argument(p, *a)){

676

786

}

677

787

/* Add global environment variables */

678

788

for(char **e = g->environ; *e != NULL; e++){

679

if(not add_environment(p, *e)){

789

if(not add_environment(p, *e, false)){

680

790

perror("add_environment");

681

791

}

682

792

}

687

797

process, too. */

688

798

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

689

799

for(char **e = environ; *e != NULL; e++){

690

char *copy = strdup(*e);

691

if(copy == NULL){

692

perror("strdup");

693

continue;

694

}

695

if(not add_environment(p, copy)){

800

if(not add_environment(p, *e, false)){

696

801

perror("add_environment");

697

802

}

698

803

}

705

810

exitstatus = EXIT_FAILURE;

706

811

goto fallback;

707

812

}

813

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

708

814

ret = set_cloexec_flag(pipefd[0]);

709

815

if(ret < 0){

710

816

perror("set_cloexec_flag");

724

830

exitstatus = EXIT_FAILURE;

725

831

goto fallback;

726

832

}

727

// Starting a new process to be watched

833

/* Starting a new process to be watched */

728

834

pid_t pid = fork();

729

835

if(pid == -1){

730

836

perror("fork");

768

874

}

769

875

/* no return */

770

876

}

771

/* parent process */

877

/* Parent process */

878

close(pipefd[1]); /* Close unused write end of pipe */

772

879

free(filename);

773

close(pipefd[1]); /* close unused write end of pipe */

774

process *new_process = malloc(sizeof(process));

775

if (new_process == NULL){

776

perror("malloc");

880

plugin *new_plugin = getplugin(dirst->d_name);

881

if (new_plugin == NULL){

882

perror("getplugin");

777

883

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

778

884

if(ret < 0){

779

perror("sigprocmask");

885

perror("sigprocmask");

780

886

}

781

887

exitstatus = EXIT_FAILURE;

782

888

goto fallback;

783

889

}

784

890

785

*new_process = (struct process){ .pid = pid,

786

.fd = pipefd[0],

787

.next = process_list };

788

// List handling

789

process_list = new_process;

891

new_plugin->pid = pid;

892

new_plugin->fd = pipefd[0];

893

790

894

/* Unblock SIGCHLD so signal handler can be run if this process

791

895

has already completed */

792

896

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

796

900

goto fallback;

797

901

}

798

902

799

FD_SET(new_process->fd, &rfds_all);

903

FD_SET(new_plugin->fd, &rfds_all);

800

904

801

if (maxfd < new_process->fd){

802

maxfd = new_process->fd;

905

if (maxfd < new_plugin->fd){

906

maxfd = new_plugin->fd;

803

907

}

804

908

805

909

}

806

910

807

free_plugin_list(plugin_list);

808

plugin_list = NULL;

809

810

911

closedir(dir);

811

912

dir = NULL;

812

813

if (process_list == NULL){

814

fprintf(stderr, "No plugin processes started. Incorrect plugin"

815

" directory?\n");

816

process_list = NULL;

913

914

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

915

if(p->pid != 0){

916

break;

917

}

918

if(p->next == NULL){

919

fprintf(stderr, "No plugin processes started. Incorrect plugin"

920

" directory?\n");

921

free_plugin_list();

922

}

817

923

}

818

while(process_list){

924

925

/* Main loop while running plugins exist */

926

while(plugin_list){

819

927

fd_set rfds = rfds_all;

820

928

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

821

929

if (select_ret == -1){

825

933

}

826

934

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

827

935

from one of them */

828

for(process *proc = process_list; proc ; proc = proc->next){

936

for(plugin *proc = plugin_list; proc != NULL;){

829

937

/* Is this process completely done? */

830

938

if(proc->eof and proc->completed){

831

939

/* Only accept the plugin output if it exited cleanly */

832

940

if(not WIFEXITED(proc->status)

833

941

or WEXITSTATUS(proc->status) != 0){

834

942

/* Bad exit by plugin */

943

835

944

if(debug){

836

945

if(WIFEXITED(proc->status)){

837

946

fprintf(stderr, "Plugin %u exited with status %d\n",

846

955

(unsigned int) (proc->pid));

847

956

}

848

957

}

958

849

959

/* Remove the plugin */

850

960

FD_CLR(proc->fd, &rfds_all);

961

851

962

/* Block signal while modifying process_list */

852

963

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

853

964

if(ret < 0){

855

966

exitstatus = EXIT_FAILURE;

856

967

goto fallback;

857

968

}

858

/* Delete this process entry from the list */

859

if(process_list == proc){

860

/* First one - simple */

861

process_list = proc->next;

862

} else {

863

/* Second one or later */

864

for(process *p = process_list; p != NULL; p = p->next){

865

if(p->next == proc){

866

p->next = proc->next;

867

break;

868

}

869

}

870

}

969

871

970

/* We are done modifying process list, so unblock signal */

872

971

ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask,

873

972

NULL);

874

973

if(ret < 0){

875

974

perror("sigprocmask");

876

}

877

free(proc->buffer);

878

free(proc);

879

/* We deleted this process from the list, so we can't go

880

proc->next. Therefore, start over from the beginning of

881

the process list */

882

break;

975

exitstatus = EXIT_FAILURE;

976

goto fallback;

977

}

978

979

if(plugin_list == NULL){

980

break;

981

}

982

983

plugin *next_plugin = proc->next;

984

free_plugin(proc);

985

proc = next_plugin;

986

continue;

883

987

}

988

884

989

/* This process exited nicely, so print its buffer */

885

990

886

991

bool bret = print_out_password(proc->buffer,

891

996

}

892

997

goto fallback;

893

998

}

999

894

1000

/* This process has not completed. Does it have any output? */

895

1001

if(proc->eof or not FD_ISSET(proc->fd, &rfds)){

896

1002

/* This process had nothing to say at this time */

1003

proc = proc->next;

897

1004

continue;

898

1005

}

899

1006

/* Before reading, make the process' data buffer large enough */

912

1019

BUFFER_SIZE);

913

1020

if(ret < 0){

914

1021

/* Read error from this process; ignore the error */

1022

proc = proc->next;

915

1023

continue;

916

1024

}

917

1025

if(ret == 0){

926

1034

927

1035

fallback:

928

1036

929

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

1037

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

930

1038

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

931

1039

occured */

932

1040

bool bret;

933

1041

fprintf(stderr, "Going to fallback mode using getpass(3)\n");

934

1042

char *passwordbuffer = getpass("Password: ");

935

bret = print_out_password(passwordbuffer, strlen(passwordbuffer));

1043

size_t len = strlen(passwordbuffer);

1044

/* Strip trailing newline */

1045

if(len > 0 and passwordbuffer[len-1] == '\n'){

1046

passwordbuffer[len-1] = '\0'; /* not strictly necessary */

1047

len--;

1048

}

1049

bret = print_out_password(passwordbuffer, len);

936

1050

if(not bret){

937

1051

perror("print_out_password");

938

1052

exitstatus = EXIT_FAILURE;

947

1061

}

948

1062

949

1063

if(custom_argv != NULL){

950

for(char **arg = custom_argv; *arg != NULL; arg++){

1064

for(char **arg = custom_argv+1; *arg != NULL; arg++){

951

1065

free(*arg);

952

1066

}

953

1067

free(custom_argv);

954

1068

}

955

free_plugin_list(plugin_list);

956

1069

957

1070

if(dir != NULL){

958

1071

closedir(dir);

959

1072

}

960

1073

961

1074

/* Free the process list and kill the processes */

962

for(process *next; process_list != NULL; process_list = next){

963

next = process_list->next;

964

close(process_list->fd);

965

ret = kill(process_list->pid, SIGTERM);

966

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

967

/* set-uid proccesses migth not get closed */

968

perror("kill");

1075

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

1076

if(p->pid != 0){

1077

close(p->fd);

1078

ret = kill(p->pid, SIGTERM);

1079

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

1080

/* Set-uid proccesses might not get closed */

1081

perror("kill");

1082

}

969

1083

}

970

free(process_list->buffer);

971

free(process_list);

972

1084

}

973

1085

974

1086

/* Wait for any remaining child processes to terminate */

978

1090

if(errno != ECHILD){

979

1091

perror("wait");

980

1092

}

1093

1094

free_plugin_list();

1095

1096

free(plugindir);

1097

free(argfile);

981

1098

982

1099

return exitstatus;

983

1100

}