/mandos/trunk : revision 174

56

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

57

argp_state, struct argp,

58

argp_parse(), ARGP_ERR_UNKNOWN,

59

ARGP_KEY_END, ARGP_KEY_ARG, error_t */

59

ARGP_KEY_END, ARGP_KEY_ARG,

60

error_t */

60

61

#include <signal.h> /* struct sigaction, sigemptyset(),

61

62

sigaddset(), sigaction(),

62

63

sigprocmask(), SIG_BLOCK, SIGCHLD,

64

65

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

65

66

67

#define BUFFER_SIZE 256

67

#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"

68

71

69

72

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

70

73

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

71

74

72

struct process;

73

74

typedef struct process{

75

pid_t pid;

76

int fd;

77

char *buffer;

78

size_t buffer_size;

79

size_t buffer_length;

80

bool eof;

81

bool completed;

82

int status;

83

struct process *next;

84

} process;

75

struct plugin;

85

76

86

77

typedef struct plugin{

87

78

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

90

81

char **environ;

91

82

int envc;

92

83

bool disabled;

84

85

/* Variables used for running processes*/

86

pid_t pid;

87

int fd;

88

char *buffer;

89

size_t buffer_size;

90

size_t buffer_length;

91

bool eof;

92

volatile bool completed;

93

volatile int status;

93

94

struct plugin *next;

94

95

} plugin;

95

96

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

97

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

98

104

if ((p->name == name)

99

105

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

100

106

return p;

115

121

116

122

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

117

123

.argc = 1,

118

.envc = 0,

119

124

.disabled = false,

120

.next = *plugin_list };

125

.next = plugin_list };

121

126

122

127

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

123

128

if (new_plugin->argv == NULL){

127

132

}

128

133

new_plugin->argv[0] = copy_name;

129

134

new_plugin->argv[1] = NULL;

130

135

131

136

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

132

137

if(new_plugin->environ == NULL){

133

138

free(copy_name);

136

141

return NULL;

137

142

}

138

143

new_plugin->environ[0] = NULL;

144

139

145

/* Append the new plugin to the list */

140

*plugin_list = new_plugin;

146

plugin_list = new_plugin;

141

147

return new_plugin;

142

148

}

143

149

173

179

}

174

180

175

181

/* Add to a plugin's environment */

176

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

182

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

177

183

if(p == NULL){

178

184

return false;

179

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

}

180

203

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

181

204

}

182

205

183

184

206

/*

185

207

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

186

208

* Descriptor Flags".

197

219

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

198

220

}

199

221

200

process *process_list = NULL;

201

222

202

/* Mark a process as completed when it exits, and save its exit

223

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

203

224

status. */

204

225

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

205

process *proc = process_list;

206

int status;

207

pid_t pid = wait(&status);

208

if(pid == -1){

209

perror("wait");

210

return;

211

}

212

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

213

proc = proc->next;

214

}

215

if(proc == NULL){

216

/* Process not found in process list */

217

return;

218

}

219

proc->status = status;

220

proc->completed = true;

226

while(true){

227

plugin *proc = plugin_list;

228

int status;

229

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

230

if(pid == 0){

231

/* Only still running child processes */

232

break;

233

}

234

if(pid == -1){

235

if (errno != ECHILD){

236

perror("waitpid");

237

}

238

/* No child processes */

239

break;

240

}

241

242

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

243

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

244

proc = proc->next;

245

}

246

if(proc == NULL){

247

/* Process not found in process list */

248

continue;

249

}

250

proc->status = status;

251

proc->completed = true;

252

}

221

253

}

222

254

255

/* Prints out a password to stdout */

223

256

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

224

257

ssize_t ret;

225

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

226

length--;

227

}

228

258

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

229

259

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

230

260

length - written));

235

265

return true;

236

266

}

237

267

238

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

239

if (argv == NULL){

240

*argc = 1;

241

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

242

if(argv == NULL){

243

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

}

244

292

}

245

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

246

argv[1] = NULL;

247

}

248

*argc += 1;

249

argv = realloc(argv, sizeof(char *)

250

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

251

if(argv == NULL){

252

return NULL;

253

}

254

argv[*argc-1] = arg;

255

argv[*argc] = NULL;

256

return argv;

293

}

294

295

free(plugin_node);

257

296

}

258

297

259

static void free_plugin_list(plugin *plugin_list){

260

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

261

next = plugin_list->next;

262

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

263

free(*arg);

264

}

265

free(plugin_list->argv);

266

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

267

free(*env);

268

}

269

free(plugin_list->environ);

270

free(plugin_list);

298

static void free_plugin_list(void){

299

while(plugin_list != NULL){

300

free_plugin(plugin_list);

271

301

}

272

302

}

273

303

274

304

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

275

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

276

const char *argfile = ARGFILE;

305

char *plugindir = NULL;

306

char *argfile = NULL;

277

307

FILE *conffp;

278

308

size_t d_name_len;

279

309

DIR *dir = NULL;

311

341

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

312

342

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

313

343

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

314

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

344

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

315

345

.arg = "VAR=value",

316

346

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

317

347

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

318

348

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

319

349

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

320

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

350

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

321

351

.arg = "PLUGIN:ENV=value",

322

352

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

323

353

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

324

354

.arg = "PLUGIN",

325

355

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

356

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

357

.arg = "PLUGIN",

358

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

326

359

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

327

360

.arg = "DIRECTORY",

328

361

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

329

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

330

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

331

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

332

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

333

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

334

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

335

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

336

.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 },

337

373

{ .name = NULL }

338

374

};

339

375

340

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

341

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

342

pointer to our plugin list pointer. */

343

plugin **plugins = state->input;

376

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

377

struct argp_state *state) {

344

378

switch (key) {

345

case 'g':

379

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

346

380

if (arg != NULL){

347

381

char *p;

348

382

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

349

383

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

350

384

continue;

351

385

}

352

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

386

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

353

387

perror("add_argument");

354

388

return ARGP_ERR_UNKNOWN;

355

389

}

356

390

}

357

391

}

358

392

break;

359

case 'e':

393

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

360

394

if(arg == NULL){

361

395

break;

362

396

}

365

399

if(envdef == NULL){

366

400

break;

367

401

}

368

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

402

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

369

403

perror("add_environment");

370

404

}

371

405

}

372

406

break;

373

case 'o':

407

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

374

408

if (arg != NULL){

375

409

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

376

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

410

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

377

411

break;

378

412

}

379

413

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

380

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

414

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

381

415

break;

382

416

}

383

if(opt != NULL){

384

char *p;

385

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

386

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

387

continue;

388

}

389

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

390

perror("add_argument");

391

return ARGP_ERR_UNKNOWN;

392

}

417

char *p;

418

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

419

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

420

continue;

421

}

422

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

423

perror("add_argument");

424

return ARGP_ERR_UNKNOWN;

393

425

}

394

426

}

395

427

}

396

428

break;

397

case 'f':

429

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

398

430

if(arg == NULL){

399

431

break;

400

432

}

408

440

break;

409

441

}

410

442

envdef++;

411

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

443

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

412

444

perror("add_environment");

413

445

}

414

446

}

415

447

break;

416

case 'd':

448

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

417

449

if (arg != NULL){

418

plugin *p = getplugin(arg, plugins);

450

plugin *p = getplugin(arg);

419

451

if(p == NULL){

420

452

return ARGP_ERR_UNKNOWN;

421

453

}

422

454

p->disabled = true;

423

455

}

424

456

break;

425

case 128:

426

plugindir = arg;

427

break;

428

case 129:

457

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

458

if (arg != NULL){

459

plugin *p = getplugin(arg);

460

if(p == NULL){

461

return ARGP_ERR_UNKNOWN;

462

}

463

p->disabled = false;

464

}

465

break;

466

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

467

plugindir = strdup(arg);

468

if(plugindir == NULL){

469

perror("strdup");

470

}

471

break;

472

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

473

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

474

break;

475

case 130: /* --userid */

429

476

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

430

477

break;

431

case 130:

478

case 131: /* --groupid */

432

479

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

433

480

break;

434

case 131:

481

case 132: /* --debug */

435

482

debug = true;

436

483

break;

437

484

case ARGP_KEY_ARG:

445

492

return 0;

446

493

}

447

494

448

plugin *plugin_list = NULL;

495

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

496

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

497

error_t parse_opt_config_file (int key, char *arg,

498

__attribute__((unused))

499

struct argp_state *state) {

500

switch (key) {

501

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

502

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

503

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

504

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

505

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

506

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

507

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

508

break;

509

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

510

argfile = strdup(arg);

511

if(argfile == NULL){

512

perror("strdup");

513

}

514

break;

515

case 130: /* --userid */

516

case 131: /* --groupid */

517

case 132: /* --debug */

518

case ARGP_KEY_ARG:

519

case ARGP_KEY_END:

520

break;

521

default:

522

return ARGP_ERR_UNKNOWN;

523

}

524

return 0;

525

}

449

526

450

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

451

.args_doc = "[+PLUS_SEPARATED_OPTIONS]",

527

struct argp argp = { .options = options,

528

.parser = parse_opt_config_file,

529

.args_doc = "",

452

530

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

453

531

454

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

532

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

533

config file location, if any. */

534

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

455

535

if (ret == ARGP_ERR_UNKNOWN){

456

536

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

457

537

exitstatus = EXIT_FAILURE;

458

538

goto fallback;

459

539

}

460

461

conffp = fopen(argfile, "r");

540

541

/* Reset to the normal argument parser */

542

argp.parser = parse_opt;

543

544

/* Open the configfile if available */

545

if (argfile == NULL){

546

conffp = fopen(AFILE, "r");

547

} else {

548

conffp = fopen(argfile, "r");

549

}

462

550

if(conffp != NULL){

463

551

char *org_line = NULL;

464

552

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

467

555

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

468

556

const char comment_delim[] = "#";

469

557

558

custom_argc = 1;

559

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

560

if(custom_argv == NULL){

561

perror("malloc");

562

exitstatus = EXIT_FAILURE;

563

goto fallback;

564

}

565

custom_argv[0] = argv[0];

566

custom_argv[1] = NULL;

567

568

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

569

commented text */

470

570

while(true){

471

571

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

472

572

if(sret == -1){

480

580

continue;

481

581

}

482

582

new_arg = strdup(p);

483

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

484

if (custom_argv == NULL){

485

perror("add_to_argv");

486

exitstatus = EXIT_FAILURE;

487

goto fallback;

488

}

583

if(new_arg == NULL){

584

perror("strdup");

585

exitstatus = EXIT_FAILURE;

586

free(org_line);

587

goto fallback;

588

}

589

590

custom_argc += 1;

591

custom_argv = realloc(custom_argv, sizeof(char *)

592

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

593

if(custom_argv == NULL){

594

perror("realloc");

595

exitstatus = EXIT_FAILURE;

596

free(org_line);

597

goto fallback;

598

}

599

custom_argv[custom_argc-1] = new_arg;

600

custom_argv[custom_argc] = NULL;

489

601

}

490

602

}

491

603

free(org_line);

492

} else{

604

} else {

493

605

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

494

606

not affect opening plugins */

495

607

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

498

610

goto fallback;

499

611

}

500

612

}

501

613

/* If there was any arguments from configuration file,

614

pass them to parser as command arguments */

502

615

if(custom_argv != NULL){

503

custom_argv[0] = argv[0];

504

ret = argp_parse (&argp, custom_argc, custom_argv, 0, 0, &plugin_list);

616

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

617

0, NULL);

505

618

if (ret == ARGP_ERR_UNKNOWN){

506

619

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

507

620

exitstatus = EXIT_FAILURE;

509

622

}

510

623

}

511

624

625

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

626

config file */

627

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

628

if (ret == ARGP_ERR_UNKNOWN){

629

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

630

exitstatus = EXIT_FAILURE;

631

goto fallback;

632

}

633

512

634

if(debug){

513

635

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

514

636

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

523

645

}

524

646

}

525

647

648

/* Strip permissions down to nobody */

526

649

ret = setuid(uid);

527

650

if (ret == -1){

528

651

perror("setuid");

529

}

530

652

}

531

653

setgid(gid);

532

654

if (ret == -1){

533

655

perror("setgid");

534

656

}

535

657

536

dir = opendir(plugindir);

658

if (plugindir == NULL){

659

dir = opendir(PDIR);

660

} else {

661

dir = opendir(plugindir);

662

}

663

537

664

if(dir == NULL){

538

665

perror("Could not open plugin dir");

539

666

exitstatus = EXIT_FAILURE;

555

682

556

683

FD_ZERO(&rfds_all);

557

684

685

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

558

686

while(true){

559

687

dirst = readdir(dir);

560

688

561

// All directory entries have been processed

689

/* All directory entries have been processed */

562

690

if(dirst == NULL){

563

691

if (errno == EBADF){

564

692

perror("readdir");

570

698

571

699

d_name_len = strlen(dirst->d_name);

572

700

573

// Ignore dotfiles, backup files and other junk

701

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

574

702

{

575

703

bool bad_name = false;

576

704

591

719

break;

592

720

}

593

721

}

594

595

722

if(bad_name){

596

723

continue;

597

724

}

598

599

725

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

600

726

size_t suf_len = strlen(*suf);

601

727

if((d_name_len >= suf_len)

616

742

}

617

743

618

744

char *filename;

619

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

745

if(plugindir == NULL){

746

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

747

} else {

748

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

749

}

620

750

if(ret < 0){

621

751

perror("asprintf");

622

752

continue;

628

758

free(filename);

629

759

continue;

630

760

}

631

761

762

/* Ignore non-executable files */

632

763

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

633

764

if(debug){

634

765

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

637

768

free(filename);

638

769

continue;

639

770

}

640

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

771

772

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

641

773

if(p == NULL){

642

774

perror("getplugin");

643

775

free(filename);

653

785

}

654

786

{

655

787

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

656

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

788

plugin *g = getplugin(NULL);

657

789

if(g != NULL){

658

790

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

659

791

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

662

794

}

663

795

/* Add global environment variables */

664

796

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

665

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

797

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

666

798

perror("add_environment");

667

799

}

668

800

}

673

805

process, too. */

674

806

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

675

807

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

676

char *copy = strdup(*e);

677

if(copy == NULL){

678

perror("strdup");

679

continue;

680

}

681

if(not add_environment(p, copy)){

808

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

682

809

perror("add_environment");

683

810

}

684

811

}

691

818

exitstatus = EXIT_FAILURE;

692

819

goto fallback;

693

820

}

821

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

694

822

ret = set_cloexec_flag(pipefd[0]);

695

823

if(ret < 0){

696

824

perror("set_cloexec_flag");

710

838

exitstatus = EXIT_FAILURE;

711

839

goto fallback;

712

840

}

713

// Starting a new process to be watched

841

/* Starting a new process to be watched */

714

842

pid_t pid = fork();

715

843

if(pid == -1){

716

844

perror("fork");

754

882

}

755

883

/* no return */

756

884

}

757

/* parent process */

885

/* Parent process */

886

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

758

887

free(filename);

759

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

760

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

761

if (new_process == NULL){

762

perror("malloc");

888

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

889

if (new_plugin == NULL){

890

perror("getplugin");

763

891

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

764

892

if(ret < 0){

765

perror("sigprocmask");

893

perror("sigprocmask");

766

894

}

767

895

exitstatus = EXIT_FAILURE;

768

896

goto fallback;

769

897

}

770

898

771

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

772

.fd = pipefd[0],

773

.next = process_list };

774

// List handling

775

process_list = new_process;

899

new_plugin->pid = pid;

900

new_plugin->fd = pipefd[0];

901

776

902

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

777

903

has already completed */

778

904

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

782

908

goto fallback;

783

909

}

784

910

785

FD_SET(new_process->fd, &rfds_all);

911

FD_SET(new_plugin->fd, &rfds_all);

786

912

787

if (maxfd < new_process->fd){

788

maxfd = new_process->fd;

913

if (maxfd < new_plugin->fd){

914

maxfd = new_plugin->fd;

789

915

}

790

916

791

917

}

792

918

793

free_plugin_list(plugin_list);

794

plugin_list = NULL;

795

796

919

closedir(dir);

797

920

dir = NULL;

798

799

if (process_list == NULL){

800

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

801

" directory?\n");

802

process_list = NULL;

921

922

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

923

if(p->pid != 0){

924

break;

925

}

926

if(p->next == NULL){

927

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

928

" directory?\n");

929

free_plugin_list();

930

}

803

931

}

804

while(process_list){

932

933

/* Main loop while running plugins exist */

934

while(plugin_list){

805

935

fd_set rfds = rfds_all;

806

936

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

807

937

if (select_ret == -1){

811

941

}

812

942

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

813

943

from one of them */

814

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

944

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

815

945

/* Is this process completely done? */

816

946

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

817

947

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

818

948

if(not WIFEXITED(proc->status)

819

949

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

820

950

/* Bad exit by plugin */

951

821

952

if(debug){

822

953

if(WIFEXITED(proc->status)){

823

954

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

832

963

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

833

964

}

834

965

}

966

835

967

/* Remove the plugin */

836

968

FD_CLR(proc->fd, &rfds_all);

969

837

970

/* Block signal while modifying process_list */

838

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

971

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

839

972

if(ret < 0){

840

973

perror("sigprocmask");

841

974

exitstatus = EXIT_FAILURE;

842

975

goto fallback;

843

976

}

844

/* Delete this process entry from the list */

845

if(process_list == proc){

846

/* First one - simple */

847

process_list = proc->next;

848

} else {

849

/* Second one or later */

850

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

851

if(p->next == proc){

852

p->next = proc->next;

853

break;

854

}

855

}

856

}

977

free_plugin(proc);

857

978

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

858

979

ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask,

859

980

NULL);

860

981

if(ret < 0){

861

982

perror("sigprocmask");

862

}

863

free(proc->buffer);

864

free(proc);

865

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

866

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

867

the process list */

868

break;

983

exitstatus = EXIT_FAILURE;

984

goto fallback;

985

}

986

987

if(plugin_list == NULL){

988

break;

989

}

990

continue;

869

991

}

992

870

993

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

871

994

872

bool bret = print_out_password(proc->buffer, proc->buffer_length);

995

bool bret = print_out_password(proc->buffer,

996

proc->buffer_length);

873

997

if(not bret){

874

998

perror("print_out_password");

875

999

exitstatus = EXIT_FAILURE;

876

1000

}

877

1001

goto fallback;

878

1002

}

1003

879

1004

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

880

1005

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

881

1006

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

911

1036

912

1037

fallback:

913

1038

914

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

915

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

1039

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

1040

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

1041

occured */

916

1042

bool bret;

917

1043

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

918

1044

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

919

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

1045

size_t len = strlen(passwordbuffer);

1046

/* Strip trailing newline */

1047

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

1048

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

1049

len--;

1050

}

1051

bret = print_out_password(passwordbuffer, len);

920

1052

if(not bret){

921

1053

perror("print_out_password");

922

1054

exitstatus = EXIT_FAILURE;

931

1063

}

932

1064

933

1065

if(custom_argv != NULL){

934

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

1066

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

935

1067

free(*arg);

936

1068

}

937

1069

free(custom_argv);

938

1070

}

939

free_plugin_list(plugin_list);

940

1071

941

1072

if(dir != NULL){

942

1073

closedir(dir);

943

1074

}

944

1075

945

1076

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

946

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

947

next = process_list->next;

948

close(process_list->fd);

949

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

950

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

951

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

952

perror("kill");

1077

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

1078

if(p->pid != 0){

1079

close(p->fd);

1080

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

1081

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

1082

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

1083

perror("kill");

1084

}

953

1085

}

954

free(process_list->buffer);

955

free(process_list);

956

1086

}

957

1087

958

1088

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

962

1092

if(errno != ECHILD){

963

1093

perror("wait");

964

1094

}

1095

1096

free_plugin_list();

1097

1098

free(plugindir);

1099

free(argfile);

965

1100

966

1101

return exitstatus;

967

1102

}