/mandos/trunk : revision 165

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;

105

111

if (new_plugin == NULL){

106

112

return NULL;

107

113

}

108

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

114

char *copy_name = NULL;

115

if(name != NULL){

116

copy_name = strdup(name);

117

if(copy_name == NULL){

118

return NULL;

119

}

120

}

121

122

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

109

123

.argc = 1,

110

.envc = 0,

111

124

.disabled = false,

112

.next = *plugin_list };

125

.next = plugin_list };

113

126

114

127

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

115

128

if (new_plugin->argv == NULL){

129

free(copy_name);

116

130

free(new_plugin);

117

131

return NULL;

118

132

}

119

new_plugin->argv[0] = name;

133

new_plugin->argv[0] = copy_name;

120

134

new_plugin->argv[1] = NULL;

121

135

122

136

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

123

137

if(new_plugin->environ == NULL){

138

free(copy_name);

124

139

free(new_plugin->argv);

125

140

free(new_plugin);

126

141

return NULL;

127

142

}

128

143

new_plugin->environ[0] = NULL;

144

129

145

/* Append the new plugin to the list */

130

*plugin_list = new_plugin;

146

plugin_list = new_plugin;

131

147

return new_plugin;

132

148

}

133

149

163

179

}

164

180

165

181

/* Add to a plugin's environment */

166

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

182

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

167

183

if(p == NULL){

168

184

return false;

169

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

}

170

203

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

171

204

}

172

205

173

174

206

/*

175

207

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

176

208

* Descriptor Flags".

187

219

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

188

220

}

189

221

190

process *process_list = NULL;

191

222

192

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

223

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

193

224

status. */

194

225

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

195

process *proc = process_list;

196

int status;

197

pid_t pid = wait(&status);

198

if(pid == -1){

199

perror("wait");

200

return;

201

}

202

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

203

proc = proc->next;

204

}

205

if(proc == NULL){

206

/* Process not found in process list */

207

return;

208

}

209

proc->status = status;

210

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

}

211

253

}

212

254

255

/* Prints out a password to stdout */

213

256

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

214

257

ssize_t ret;

215

258

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

225

268

return true;

226

269

}

227

270

228

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

229

if (argv == NULL){

230

*argc = 1;

231

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

232

if(argv == NULL){

233

return NULL;

271

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

272

static void free_plugin(plugin *plugin_node){

273

274

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

275

free(*arg);

276

}

277

free(plugin_node->argv);

278

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

279

free(*env);

280

}

281

free(plugin_node->environ);

282

free(plugin_node->buffer);

283

284

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

285

if(plugin_node == plugin_list){

286

/* First one - simple */

287

plugin_list = plugin_list->next;

288

} else {

289

/* Second one or later */

290

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

291

if(p->next == plugin_node){

292

p->next = plugin_node->next;

293

break;

294

}

234

295

}

235

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

236

argv[1] = NULL;

237

}

238

*argc += 1;

239

argv = realloc(argv, sizeof(char *)

240

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

241

if(argv == NULL){

242

return NULL;

243

}

244

argv[*argc-1] = arg;

245

argv[*argc] = NULL;

246

return argv;

296

}

297

298

free(plugin_node);

299

}

300

301

static void free_plugin_list(void){

302

while(plugin_list != NULL){

303

free_plugin(plugin_list);

304

}

247

305

}

248

306

249

307

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

250

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

251

const char *argfile = ARGFILE;

308

char *plugindir = NULL;

309

char *argfile = NULL;

252

310

FILE *conffp;

253

311

size_t d_name_len;

254

312

DIR *dir = NULL;

269

327

/* Establish a signal handler */

270

328

sigemptyset(&sigchld_action.sa_mask);

271

329

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

272

if(ret < 0){

330

if(ret == -1){

273

331

perror("sigaddset");

274

exit(EXIT_FAILURE);

332

exitstatus = EXIT_FAILURE;

333

goto fallback;

275

334

}

276

335

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

277

if(ret < 0){

336

if(ret == -1){

278

337

perror("sigaction");

279

exit(EXIT_FAILURE);

338

exitstatus = EXIT_FAILURE;

339

goto fallback;

280

340

}

281

341

282

342

/* The options we understand. */

284

344

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

285

345

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

286

346

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

287

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

347

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

288

348

.arg = "VAR=value",

289

349

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

290

350

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

291

351

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

292

352

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

293

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

353

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

294

354

.arg = "PLUGIN:ENV=value",

295

355

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

296

356

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

297

357

.arg = "PLUGIN",

298

358

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

359

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

360

.arg = "PLUGIN",

361

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

299

362

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

300

363

.arg = "DIRECTORY",

301

364

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

302

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

303

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

304

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

305

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

306

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

307

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

308

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

309

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

365

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

366

.arg = "FILE",

367

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

368

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

369

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

370

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

371

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

372

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

373

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

374

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

375

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

310

376

{ .name = NULL }

311

377

};

312

378

313

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

314

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

315

pointer to our plugin list pointer. */

316

plugin **plugins = state->input;

379

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

380

struct argp_state *state) {

317

381

switch (key) {

318

case 'g':

382

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

319

383

if (arg != NULL){

320

384

char *p;

321

385

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

322

386

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

323

387

continue;

324

388

}

325

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

389

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

326

390

perror("add_argument");

327

391

return ARGP_ERR_UNKNOWN;

328

392

}

329

393

}

330

394

}

331

395

break;

332

case 'e':

396

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

333

397

if(arg == NULL){

334

398

break;

335

399

}

338

402

if(envdef == NULL){

339

403

break;

340

404

}

341

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

405

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

342

406

perror("add_environment");

343

407

}

344

408

}

345

409

break;

346

case 'o':

410

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

347

411

if (arg != NULL){

348

412

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

349

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

413

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

350

414

break;

351

415

}

352

416

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

353

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

417

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

354

418

break;

355

419

}

356

if(opt != NULL){

357

char *p;

358

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

359

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

360

continue;

361

}

362

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

363

perror("add_argument");

364

return ARGP_ERR_UNKNOWN;

365

}

420

char *p;

421

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

422

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

423

continue;

424

}

425

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

426

perror("add_argument");

427

return ARGP_ERR_UNKNOWN;

366

428

}

367

429

}

368

430

}

369

431

break;

370

case 'f':

432

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

371

433

if(arg == NULL){

372

434

break;

373

435

}

381

443

break;

382

444

}

383

445

envdef++;

384

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

446

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

385

447

perror("add_environment");

386

448

}

387

449

}

388

450

break;

389

case 'd':

451

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

390

452

if (arg != NULL){

391

plugin *p = getplugin(arg, plugins);

453

plugin *p = getplugin(arg);

392

454

if(p == NULL){

393

455

return ARGP_ERR_UNKNOWN;

394

456

}

395

457

p->disabled = true;

396

458

}

397

459

break;

398

case 128:

399

plugindir = arg;

400

break;

401

case 129:

460

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

461

if (arg != NULL){

462

plugin *p = getplugin(arg);

463

if(p == NULL){

464

return ARGP_ERR_UNKNOWN;

465

}

466

p->disabled = false;

467

}

468

break;

469

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

470

plugindir = strdup(arg);

471

if(plugindir == NULL){

472

perror("strdup");

473

}

474

break;

475

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

476

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

477

break;

478

case 130: /* --userid */

402

479

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

403

480

break;

404

case 130:

481

case 131: /* --groupid */

405

482

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

406

483

break;

407

case 131:

484

case 132: /* --debug */

408

485

debug = true;

409

486

break;

410

487

case ARGP_KEY_ARG:

418

495

return 0;

419

496

}

420

497

421

plugin *plugin_list = NULL;

498

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

499

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

500

error_t parse_opt_config_file (int key, char *arg,

501

__attribute__((unused))

502

struct argp_state *state) {

503

switch (key) {

504

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

505

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

506

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

507

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

508

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

509

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

510

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

511

break;

512

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

513

argfile = strdup(arg);

514

if(argfile == NULL){

515

perror("strdup");

516

}

517

break;

518

case 130: /* --userid */

519

case 131: /* --groupid */

520

case 132: /* --debug */

521

case ARGP_KEY_ARG:

522

case ARGP_KEY_END:

523

break;

524

default:

525

return ARGP_ERR_UNKNOWN;

526

}

527

return 0;

528

}

422

529

423

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

424

.args_doc = "[+PLUS_SEPARATED_OPTIONS]",

530

struct argp argp = { .options = options,

531

.parser = parse_opt_config_file,

532

.args_doc = "",

425

533

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

426

534

427

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

535

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

536

config file location, if any. */

537

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

428

538

if (ret == ARGP_ERR_UNKNOWN){

429

539

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

430

540

exitstatus = EXIT_FAILURE;

431

goto end;

541

goto fallback;

432

542

}

433

434

conffp = fopen(argfile, "r");

543

544

/* Reset to the normal argument parser */

545

argp.parser = parse_opt;

546

547

/* Open the configfile if available */

548

if (argfile == NULL){

549

conffp = fopen(AFILE, "r");

550

} else {

551

conffp = fopen(argfile, "r");

552

}

435

553

if(conffp != NULL){

436

554

char *org_line = NULL;

555

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

437

556

size_t size = 0;

438

557

ssize_t sret;

439

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

440

558

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

441

559

const char comment_delim[] = "#";

442

560

561

custom_argc = 1;

562

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

563

if(custom_argv == NULL){

564

perror("malloc");

565

exitstatus = EXIT_FAILURE;

566

goto fallback;

567

}

568

custom_argv[0] = argv[0];

569

custom_argv[1] = NULL;

570

571

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

572

commented text */

443

573

while(true){

444

574

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

445

575

if(sret == -1){

453

583

continue;

454

584

}

455

585

new_arg = strdup(p);

456

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

457

if (custom_argv == NULL){

458

perror("add_to_argv");

459

exitstatus = EXIT_FAILURE;

460

goto end;

461

}

586

if(new_arg == NULL){

587

perror("strdup");

588

exitstatus = EXIT_FAILURE;

589

free(org_line);

590

goto fallback;

591

}

592

593

custom_argc += 1;

594

custom_argv = realloc(custom_argv, sizeof(char *)

595

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

596

if(custom_argv == NULL){

597

perror("realloc");

598

exitstatus = EXIT_FAILURE;

599

free(org_line);

600

goto fallback;

601

}

602

custom_argv[custom_argc-1] = new_arg;

603

custom_argv[custom_argc] = NULL;

462

604

}

463

605

}

464

606

free(org_line);

465

} else{

607

} else {

466

608

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

467

609

not affect opening plugins */

468

610

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

469

611

perror("fopen");

470

612

exitstatus = EXIT_FAILURE;

471

goto end;

613

goto fallback;

472

614

}

473

615

}

474

616

/* If there was any arguments from configuration file,

617

pass them to parser as command arguments */

475

618

if(custom_argv != NULL){

476

custom_argv[0] = argv[0];

477

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

619

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

620

0, NULL);

478

621

if (ret == ARGP_ERR_UNKNOWN){

479

622

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

480

623

exitstatus = EXIT_FAILURE;

481

goto end;

624

goto fallback;

482

625

}

483

626

}

484

627

628

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

629

config file */

630

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

631

if (ret == ARGP_ERR_UNKNOWN){

632

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

633

exitstatus = EXIT_FAILURE;

634

goto fallback;

635

}

636

485

637

if(debug){

486

638

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

487

639

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

496

648

}

497

649

}

498

650

651

/* Strip permissions down to nobody */

499

652

ret = setuid(uid);

500

653

if (ret == -1){

501

654

perror("setuid");

502

}

503

655

}

504

656

setgid(gid);

505

657

if (ret == -1){

506

658

perror("setgid");

507

659

}

508

660

509

dir = opendir(plugindir);

661

if (plugindir == NULL){

662

dir = opendir(PDIR);

663

} else {

664

dir = opendir(plugindir);

665

}

666

510

667

if(dir == NULL){

511

668

perror("Could not open plugin dir");

512

669

exitstatus = EXIT_FAILURE;

513

goto end;

670

goto fallback;

514

671

}

515

672

516

673

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

521

678

if(ret < 0){

522

679

perror("set_cloexec_flag");

523

680

exitstatus = EXIT_FAILURE;

524

goto end;

681

goto fallback;

525

682

}

526

683

}

527

684

}

528

685

529

686

FD_ZERO(&rfds_all);

530

687

688

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

531

689

while(true){

532

690

dirst = readdir(dir);

533

691

534

// All directory entries have been processed

692

/* All directory entries have been processed */

535

693

if(dirst == NULL){

536

694

if (errno == EBADF){

537

695

perror("readdir");

538

696

exitstatus = EXIT_FAILURE;

539

goto end;

697

goto fallback;

540

698

}

541

699

break;

542

700

}

543

701

544

702

d_name_len = strlen(dirst->d_name);

545

703

546

// Ignore dotfiles, backup files and other junk

704

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

547

705

{

548

706

bool bad_name = false;

549

707

564

722

break;

565

723

}

566

724

}

567

568

725

if(bad_name){

569

726

continue;

570

727

}

571

572

728

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

573

729

size_t suf_len = strlen(*suf);

574

730

if((d_name_len >= suf_len)

601

757

free(filename);

602

758

continue;

603

759

}

604

760

761

/* Ignore non-executable files */

605

762

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

606

763

if(debug){

607

764

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

610

767

free(filename);

611

768

continue;

612

769

}

613

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

770

771

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

614

772

if(p == NULL){

615

773

perror("getplugin");

616

774

free(filename);

626

784

}

627

785

{

628

786

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

629

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

787

plugin *g = getplugin(NULL);

630

788

if(g != NULL){

631

789

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

632

790

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

635

793

}

636

794

/* Add global environment variables */

637

795

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

638

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

796

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

639

797

perror("add_environment");

640

798

}

641

799

}

646

804

process, too. */

647

805

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

648

806

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

649

char *copy = strdup(*e);

650

if(copy == NULL){

651

perror("strdup");

652

continue;

653

}

654

if(not add_environment(p, copy)){

807

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

655

808

perror("add_environment");

656

809

}

657

810

}

658

811

}

659

812

660

int pipefd[2];

813

int pipefd[2];

661

814

ret = pipe(pipefd);

662

815

if (ret == -1){

663

816

perror("pipe");

664

817

exitstatus = EXIT_FAILURE;

665

goto end;

818

goto fallback;

666

819

}

820

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

667

821

ret = set_cloexec_flag(pipefd[0]);

668

822

if(ret < 0){

669

823

perror("set_cloexec_flag");

670

824

exitstatus = EXIT_FAILURE;

671

goto end;

825

goto fallback;

672

826

}

673

827

ret = set_cloexec_flag(pipefd[1]);

674

828

if(ret < 0){

675

829

perror("set_cloexec_flag");

676

830

exitstatus = EXIT_FAILURE;

677

goto end;

831

goto fallback;

678

832

}

679

833

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

680

834

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

681

835

if(ret < 0){

682

836

perror("sigprocmask");

683

837

exitstatus = EXIT_FAILURE;

684

goto end;

838

goto fallback;

685

839

}

686

// Starting a new process to be watched

840

/* Starting a new process to be watched */

687

841

pid_t pid = fork();

688

842

if(pid == -1){

689

843

perror("fork");

690

844

exitstatus = EXIT_FAILURE;

691

goto end;

845

goto fallback;

692

846

}

693

847

if(pid == 0){

694

848

/* this is the child process */

727

881

}

728

882

/* no return */

729

883

}

730

/* parent process */

884

/* Parent process */

885

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

731

886

free(filename);

732

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

733

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

734

if (new_process == NULL){

735

perror("malloc");

887

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

888

if (new_plugin == NULL){

889

perror("getplugin");

736

890

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

737

891

if(ret < 0){

738

perror("sigprocmask");

892

perror("sigprocmask");

739

893

}

740

894

exitstatus = EXIT_FAILURE;

741

goto end;

895

goto fallback;

742

896

}

743

897

744

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

745

.fd = pipefd[0],

746

.next = process_list };

747

// List handling

748

process_list = new_process;

898

new_plugin->pid = pid;

899

new_plugin->fd = pipefd[0];

900

749

901

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

750

902

has already completed */

751

903

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

752

904

if(ret < 0){

753

905

perror("sigprocmask");

754

906

exitstatus = EXIT_FAILURE;

755

goto end;

756

}

757

758

FD_SET(new_process->fd, &rfds_all);

759

760

if (maxfd < new_process->fd){

761

maxfd = new_process->fd;

762

}

763

764

}

765

766

/* Free the plugin list */

767

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

768

next = plugin_list->next;

769

free(plugin_list->argv);

770

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

771

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

772

free(*e);

773

}

774

}

775

free(plugin_list);

907

goto fallback;

908

}

909

910

FD_SET(new_plugin->fd, &rfds_all);

911

912

if (maxfd < new_plugin->fd){

913

maxfd = new_plugin->fd;

914

}

915

776

916

}

777

917

778

918

closedir(dir);

779

919

dir = NULL;

780

781

if (process_list == NULL){

782

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

783

" directory?\n");

784

process_list = NULL;

920

921

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

922

if(p->pid != 0){

923

break;

924

}

925

if(p->next == NULL){

926

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

927

" directory?\n");

928

free_plugin_list();

929

}

785

930

}

786

while(process_list){

931

932

/* Main loop while running plugins exist */

933

while(plugin_list){

787

934

fd_set rfds = rfds_all;

788

935

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

789

936

if (select_ret == -1){

790

937

perror("select");

791

938

exitstatus = EXIT_FAILURE;

792

goto end;

939

goto fallback;

793

940

}

794

941

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

795

942

from one of them */

796

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

943

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

797

944

/* Is this process completely done? */

798

945

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

799

946

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

800

947

if(not WIFEXITED(proc->status)

801

948

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

802

949

/* Bad exit by plugin */

950

803

951

if(debug){

804

952

if(WIFEXITED(proc->status)){

805

953

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

814

962

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

815

963

}

816

964

}

965

817

966

/* Remove the plugin */

818

967

FD_CLR(proc->fd, &rfds_all);

968

819

969

/* Block signal while modifying process_list */

820

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

970

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

821

971

if(ret < 0){

822

972

perror("sigprocmask");

823

973

exitstatus = EXIT_FAILURE;

824

goto end;

825

}

826

/* Delete this process entry from the list */

827

if(process_list == proc){

828

/* First one - simple */

829

process_list = proc->next;

830

} else {

831

/* Second one or later */

832

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

833

if(p->next == proc){

834

p->next = proc->next;

835

break;

836

}

837

}

838

}

974

goto fallback;

975

}

976

free_plugin(proc);

839

977

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

840

978

ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask,

841

979

NULL);

842

980

if(ret < 0){

843

981

perror("sigprocmask");

844

}

845

free(proc->buffer);

846

free(proc);

847

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

848

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

849

the process list */

850

break;

982

exitstatus = EXIT_FAILURE;

983

goto fallback;

984

}

985

986

if(plugin_list == NULL){

987

break;

988

}

989

continue;

851

990

}

991

852

992

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

853

993

854

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

994

bool bret = print_out_password(proc->buffer,

995

proc->buffer_length);

855

996

if(not bret){

856

997

perror("print_out_password");

857

998

exitstatus = EXIT_FAILURE;

858

999

}

859

goto end;

1000

goto fallback;

860

1001

}

1002

861

1003

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

862

1004

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

863

1005

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

870

1012

if (proc->buffer == NULL){

871

1013

perror("malloc");

872

1014

exitstatus = EXIT_FAILURE;

873

goto end;

1015

goto fallback;

874

1016

}

875

1017

proc->buffer_size += BUFFER_SIZE;

876

1018

}

891

1033

}

892

1034

893

1035

894

end:

1036

fallback:

895

1037

896

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

897

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

1038

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

1039

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

1040

occured */

898

1041

bool bret;

899

1042

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

900

1043

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

902

1045

if(not bret){

903

1046

perror("print_out_password");

904

1047

exitstatus = EXIT_FAILURE;

905

goto end;

906

1048

}

907

1049

}

908

1050

909

1051

/* Restore old signal handler */

910

sigaction(SIGCHLD, &old_sigchld_action, NULL);

911

912

free(custom_argv);

913

914

/* Free the plugin list */

915

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

916

next = plugin_list->next;

917

free(plugin_list->argv);

918

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

919

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

920

free(*e);

921

}

1052

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

1053

if(ret == -1){

1054

perror("sigaction");

1055

exitstatus = EXIT_FAILURE;

1056

}

1057

1058

if(custom_argv != NULL){

1059

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

1060

free(*arg);

922

1061

}

923

free(plugin_list->environ);

924

free(plugin_list);

1062

free(custom_argv);

925

1063

}

926

1064

927

1065

if(dir != NULL){

929

1067

}

930

1068

931

1069

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

932

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

933

next = process_list->next;

934

close(process_list->fd);

935

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

936

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

937

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

938

perror("kill");

1070

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

1071

if(p->pid != 0){

1072

close(p->fd);

1073

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

1074

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

1075

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

1076

perror("kill");

1077

}

939

1078

}

940

free(process_list->buffer);

941

free(process_list);

942

1079

}

943

1080

944

1081

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

948

1085

if(errno != ECHILD){

949

1086

perror("wait");

950

1087

}

1088

1089

free_plugin_list();

1090

1091

free(plugindir);

1092

free(argfile);

951

1093

952

1094

return exitstatus;

953

1095

}