/mandos/trunk : revision 89

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,

60

error_t */

59

ARGP_KEY_END, ARGP_KEY_ARG, error_t */

61

60

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

62

61

sigaddset(), sigaction(),

63

62

sigprocmask(), SIG_BLOCK, SIGCHLD,

65

64

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

66

65

67

66

#define BUFFER_SIZE 256

68

69

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

70

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

67

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

71

68

72

69

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

73

70

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

74

71

75

struct plugin;

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;

76

85

77

86

typedef struct plugin{

78

87

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

81

90

char **environ;

82

91

int envc;

83

92

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;

94

93

struct plugin *next;

95

94

} plugin;

96

95

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

96

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

97

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

104

98

if ((p->name == name)

105

99

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

106

100

return p;

111

105

if (new_plugin == NULL){

112

106

return NULL;

113

107

}

114

char *copy_name = NULL;

115

if(name != NULL){

116

copy_name = strdup(name);

117

if(copy_name == NULL){

118

return NULL;

119

}

108

char *copy_name = strdup(name);

109

if(copy_name == NULL){

110

return NULL;

120

111

}

121

112

122

113

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

123

114

.argc = 1,

115

.envc = 0,

124

116

.disabled = false,

125

.next = plugin_list };

117

.next = *plugin_list };

126

118

127

119

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

128

120

if (new_plugin->argv == NULL){

129

free(copy_name);

130

121

free(new_plugin);

131

122

return NULL;

132

123

}

133

124

new_plugin->argv[0] = copy_name;

134

125

new_plugin->argv[1] = NULL;

135

126

136

127

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

137

128

if(new_plugin->environ == NULL){

138

free(copy_name);

139

129

free(new_plugin->argv);

140

130

free(new_plugin);

141

131

return NULL;

142

132

}

143

133

new_plugin->environ[0] = NULL;

144

145

134

/* Append the new plugin to the list */

146

plugin_list = new_plugin;

135

*plugin_list = new_plugin;

147

136

return new_plugin;

148

137

}

149

138

179

168

}

180

169

181

170

/* Add to a plugin's environment */

182

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

171

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

183

172

if(p == NULL){

184

173

return false;

185

174

}

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

}

203

175

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

204

176

}

205

177

178

206

179

/*

207

180

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

208

181

* Descriptor Flags".

219

192

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

220

193

}

221

194

195

process *process_list = NULL;

222

196

223

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

197

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

224

198

status. */

225

199

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

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

}

200

process *proc = process_list;

201

int status;

202

pid_t pid = wait(&status);

203

if(pid == -1){

204

perror("wait");

205

return;

206

}

207

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

208

proc = proc->next;

209

}

210

if(proc == NULL){

211

/* Process not found in process list */

212

return;

213

}

214

proc->status = status;

215

proc->completed = true;

253

216

}

254

217

255

/* Prints out a password to stdout */

256

218

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

257

219

ssize_t ret;

220

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

221

length--;

222

}

258

223

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

259

224

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

260

225

length - written));

265

230

return true;

266

231

}

267

232

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

}

233

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

234

if (argv == NULL){

235

*argc = 1;

236

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

237

if(argv == NULL){

238

return NULL;

292

239

}

293

}

294

295

free(plugin_node);

240

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

241

argv[1] = NULL;

242

}

243

*argc += 1;

244

argv = realloc(argv, sizeof(char *)

245

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

246

if(argv == NULL){

247

return NULL;

248

}

249

argv[*argc-1] = arg;

250

argv[*argc] = NULL;

251

return argv;

296

252

}

297

253

298

static void free_plugin_list(void){

299

while(plugin_list != NULL){

300

free_plugin(plugin_list);

301

}

254

static void free_plugin_list(plugin *plugin_list){

255

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

256

next = plugin_list->next;

257

free(plugin_list->name);

258

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

259

free(*arg);

260

}

261

free(plugin_list->argv);

262

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

263

free(*env);

264

}

265

free(plugin_list->environ);

266

free(plugin_list);

267

}

302

268

}

303

269

304

270

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

305

char *plugindir = NULL;

306

char *argfile = NULL;

271

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

272

const char *argfile = ARGFILE;

307

273

FILE *conffp;

308

274

size_t d_name_len;

309

275

DIR *dir = NULL;

332

298

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

333

299

if(ret == -1){

334

300

perror("sigaction");

335

exitstatus = EXIT_FAILURE;

301

exitstatus = EXIT_FAILURE;

336

302

goto fallback;

337

303

}

338

304

341

307

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

342

308

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

343

309

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

344

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

310

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

345

311

.arg = "VAR=value",

346

312

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

347

313

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

348

314

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

349

315

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

350

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

316

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

351

317

.arg = "PLUGIN:ENV=value",

352

318

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

353

319

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

354

320

.arg = "PLUGIN",

355

321

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

356

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

357

.arg = "PLUGIN",

358

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

359

322

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

360

323

.arg = "DIRECTORY",

361

324

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

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

325

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

326

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

327

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

328

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

329

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

330

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

331

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

332

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

373

333

{ .name = NULL }

374

334

};

375

335

376

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

377

struct argp_state *state) {

336

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

337

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

338

pointer to our plugin list pointer. */

339

plugin **plugins = state->input;

378

340

switch (key) {

379

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

341

case 'g':

380

342

if (arg != NULL){

381

343

char *p;

382

344

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

383

345

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

384

346

continue;

385

347

}

386

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

348

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

387

349

perror("add_argument");

388

350

return ARGP_ERR_UNKNOWN;

389

351

}

390

352

}

391

353

}

392

354

break;

393

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

355

case 'e':

394

356

if(arg == NULL){

395

357

break;

396

358

}

397

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

398

perror("add_environment");

359

{

360

char *envdef = strdup(arg);

361

if(envdef == NULL){

362

break;

363

}

364

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

365

perror("add_environment");

366

}

399

367

}

400

368

break;

401

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

369

case 'o':

402

370

if (arg != NULL){

403

371

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

404

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

372

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

405

373

break;

406

374

}

407

375

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

408

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

376

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

409

377

break;

410

378

}

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;

379

if(opt != NULL){

380

char *p;

381

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

382

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

383

continue;

384

}

385

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

386

perror("add_argument");

387

return ARGP_ERR_UNKNOWN;

388

}

419

389

}

420

390

}

421

391

}

422

392

break;

423

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

393

case 'f':

424

394

if(arg == NULL){

425

395

break;

426

396

}

429

399

if(envdef == NULL){

430

400

break;

431

401

}

432

*envdef = '\0';

433

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

402

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

403

if(p_name == NULL){

404

break;

405

}

406

envdef++;

407

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

434

408

perror("add_environment");

435

409

}

436

410

}

437

411

break;

438

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

412

case 'd':

439

413

if (arg != NULL){

440

plugin *p = getplugin(arg);

414

plugin *p = getplugin(arg, plugins);

441

415

if(p == NULL){

442

416

return ARGP_ERR_UNKNOWN;

443

417

}

444

418

p->disabled = true;

445

419

}

446

420

break;

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

421

case 128:

422

plugindir = arg;

423

break;

424

case 129:

467

425

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

468

426

break;

469

case 131: /* --groupid */

427

case 130:

470

428

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

471

429

break;

472

case 132: /* --debug */

430

case 131:

473

431

debug = true;

474

432

break;

475

433

case ARGP_KEY_ARG:

476

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

477

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

478

argument was empty, we ignore it silently. */

479

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

480

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

481

}

482

break;

483

case ARGP_KEY_END:

484

break;

485

default:

486

return ARGP_ERR_UNKNOWN;

487

}

488

return 0;

489

}

490

491

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

492

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

493

error_t parse_opt_config_file (int key, char *arg,

494

__attribute__((unused))

495

struct argp_state *state) {

496

switch (key) {

497

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

498

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

499

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

500

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

501

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

502

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

503

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

504

break;

505

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

506

free(argfile);

507

argfile = strdup(arg);

508

if(argfile == NULL){

509

perror("strdup");

510

}

511

break;

512

case 130: /* --userid */

513

case 131: /* --groupid */

514

case 132: /* --debug */

515

case ARGP_KEY_ARG:

516

case ARGP_KEY_END:

517

break;

518

default:

519

return ARGP_ERR_UNKNOWN;

520

}

521

return 0;

522

}

523

524

struct argp argp = { .options = options,

525

.parser = parse_opt_config_file,

526

.args_doc = "",

434

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

435

break;

436

case ARGP_KEY_END:

437

break;

438

default:

439

return ARGP_ERR_UNKNOWN;

440

}

441

return 0;

442

}

443

444

plugin *plugin_list = NULL;

445

446

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

447

.args_doc = "[+PLUS_SEPARATED_OPTIONS]",

527

448

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

528

449

529

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

530

config file location, if any. */

531

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

450

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

532

451

if (ret == ARGP_ERR_UNKNOWN){

533

452

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

534

453

exitstatus = EXIT_FAILURE;

535

454

goto fallback;

536

455

}

537

538

/* Reset to the normal argument parser */

539

argp.parser = parse_opt;

540

541

/* Open the configfile if available */

542

if (argfile == NULL){

543

conffp = fopen(AFILE, "r");

544

} else {

545

conffp = fopen(argfile, "r");

546

}

456

457

conffp = fopen(argfile, "r");

547

458

if(conffp != NULL){

548

459

char *org_line = NULL;

549

460

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

552

463

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

553

464

const char comment_delim[] = "#";

554

465

555

custom_argc = 1;

556

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

557

if(custom_argv == NULL){

558

perror("malloc");

559

exitstatus = EXIT_FAILURE;

560

goto fallback;

561

}

562

custom_argv[0] = argv[0];

563

custom_argv[1] = NULL;

564

565

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

566

commented text */

567

466

while(true){

568

467

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

569

468

if(sret == -1){

577

476

continue;

578

477

}

579

478

new_arg = strdup(p);

580

if(new_arg == NULL){

581

perror("strdup");

582

exitstatus = EXIT_FAILURE;

583

free(org_line);

584

goto fallback;

585

}

586

587

custom_argc += 1;

588

custom_argv = realloc(custom_argv, sizeof(char *)

589

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

590

if(custom_argv == NULL){

591

perror("realloc");

592

exitstatus = EXIT_FAILURE;

593

free(org_line);

594

goto fallback;

595

}

596

custom_argv[custom_argc-1] = new_arg;

597

custom_argv[custom_argc] = NULL;

479

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

480

if (custom_argv == NULL){

481

perror("add_to_argv");

482

exitstatus = EXIT_FAILURE;

483

goto fallback;

484

}

598

485

}

599

486

}

600

487

free(org_line);

601

} else {

488

} else{

602

489

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

603

490

not affect opening plugins */

604

491

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

607

494

goto fallback;

608

495

}

609

496

}

610

/* If there was any arguments from configuration file,

611

pass them to parser as command arguments */

497

612

498

if(custom_argv != NULL){

613

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

614

0, NULL);

499

custom_argv[0] = argv[0];

500

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

615

501

if (ret == ARGP_ERR_UNKNOWN){

616

502

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

617

503

exitstatus = EXIT_FAILURE;

619

505

}

620

506

}

621

507

622

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

623

config file */

624

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

625

if (ret == ARGP_ERR_UNKNOWN){

626

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

627

exitstatus = EXIT_FAILURE;

628

goto fallback;

629

}

630

631

508

if(debug){

632

509

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

633

510

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

642

519

}

643

520

}

644

521

645

/* Strip permissions down to nobody */

646

522

ret = setuid(uid);

647

523

if (ret == -1){

648

524

perror("setuid");

649

}

525

}

526

650

527

setgid(gid);

651

528

if (ret == -1){

652

529

perror("setgid");

653

530

}

654

531

655

if (plugindir == NULL){

656

dir = opendir(PDIR);

657

} else {

658

dir = opendir(plugindir);

659

}

660

532

dir = opendir(plugindir);

661

533

if(dir == NULL){

662

534

perror("Could not open plugin dir");

663

535

exitstatus = EXIT_FAILURE;

679

551

680

552

FD_ZERO(&rfds_all);

681

553

682

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

683

554

while(true){

684

555

dirst = readdir(dir);

685

556

686

/* All directory entries have been processed */

557

// All directory entries have been processed

687

558

if(dirst == NULL){

688

559

if (errno == EBADF){

689

560

perror("readdir");

695

566

696

567

d_name_len = strlen(dirst->d_name);

697

568

698

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

569

// Ignore dotfiles, backup files and other junk

699

570

{

700

571

bool bad_name = false;

701

572

716

587

break;

717

588

}

718

589

}

590

719

591

if(bad_name){

720

592

continue;

721

593

}

594

722

595

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

723

596

size_t suf_len = strlen(*suf);

724

597

if((d_name_len >= suf_len)

739

612

}

740

613

741

614

char *filename;

742

if(plugindir == NULL){

743

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

744

} else {

745

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

746

}

615

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

747

616

if(ret < 0){

748

617

perror("asprintf");

749

618

continue;

755

624

free(filename);

756

625

continue;

757

626

}

758

759

/* Ignore non-executable files */

627

760

628

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

761

629

if(debug){

762

630

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

765

633

free(filename);

766

634

continue;

767

635

}

768

769

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

636

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

770

637

if(p == NULL){

771

638

perror("getplugin");

772

639

free(filename);

782

649

}

783

650

{

784

651

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

785

plugin *g = getplugin(NULL);

652

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

786

653

if(g != NULL){

787

654

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

788

655

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

791

658

}

792

659

/* Add global environment variables */

793

660

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

794

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

661

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

795

662

perror("add_environment");

796

663

}

797

664

}

802

669

process, too. */

803

670

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

804

671

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

805

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

672

char *copy = strdup(*e);

673

if(copy == NULL){

674

perror("strdup");

675

continue;

676

}

677

if(not add_environment(p, copy)){

806

678

perror("add_environment");

807

679

}

808

680

}

809

681

}

810

682

811

int pipefd[2];

683

int pipefd[2];

812

684

ret = pipe(pipefd);

813

685

if (ret == -1){

814

686

perror("pipe");

815

687

exitstatus = EXIT_FAILURE;

816

688

goto fallback;

817

689

}

818

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

819

690

ret = set_cloexec_flag(pipefd[0]);

820

691

if(ret < 0){

821

692

perror("set_cloexec_flag");

835

706

exitstatus = EXIT_FAILURE;

836

707

goto fallback;

837

708

}

838

/* Starting a new process to be watched */

709

// Starting a new process to be watched

839

710

pid_t pid = fork();

840

711

if(pid == -1){

841

712

perror("fork");

879

750

}

880

751

/* no return */

881

752

}

882

/* Parent process */

883

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

753

/* parent process */

884

754

free(filename);

885

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

886

if (new_plugin == NULL){

887

perror("getplugin");

755

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

756

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

757

if (new_process == NULL){

758

perror("malloc");

888

759

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

889

760

if(ret < 0){

890

perror("sigprocmask");

761

perror("sigprocmask");

891

762

}

892

763

exitstatus = EXIT_FAILURE;

893

764

goto fallback;

894

765

}

895

766

896

new_plugin->pid = pid;

897

new_plugin->fd = pipefd[0];

898

767

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

768

.fd = pipefd[0],

769

.next = process_list };

770

// List handling

771

process_list = new_process;

899

772

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

900

773

has already completed */

901

774

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

905

778

goto fallback;

906

779

}

907

780

908

FD_SET(new_plugin->fd, &rfds_all);

781

FD_SET(new_process->fd, &rfds_all);

909

782

910

if (maxfd < new_plugin->fd){

911

maxfd = new_plugin->fd;

783

if (maxfd < new_process->fd){

784

maxfd = new_process->fd;

912

785

}

913

786

914

787

}

915

788

789

free_plugin_list(plugin_list);

790

916

791

closedir(dir);

917

792

dir = NULL;

918

919

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

920

if(p->pid != 0){

921

break;

922

}

923

if(p->next == NULL){

924

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

925

" directory?\n");

926

free_plugin_list();

927

}

793

794

if (process_list == NULL){

795

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

796

" directory?\n");

797

process_list = NULL;

928

798

}

929

930

/* Main loop while running plugins exist */

931

while(plugin_list){

799

while(process_list){

932

800

fd_set rfds = rfds_all;

933

801

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

934

802

if (select_ret == -1){

938

806

}

939

807

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

940

808

from one of them */

941

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

809

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

942

810

/* Is this process completely done? */

943

811

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

944

812

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

945

813

if(not WIFEXITED(proc->status)

946

814

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

947

815

/* Bad exit by plugin */

948

949

816

if(debug){

950

817

if(WIFEXITED(proc->status)){

951

818

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

960

827

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

961

828

}

962

829

}

963

964

830

/* Remove the plugin */

965

831

FD_CLR(proc->fd, &rfds_all);

966

967

832

/* Block signal while modifying process_list */

968

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

833

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

969

834

if(ret < 0){

970

835

perror("sigprocmask");

971

836

exitstatus = EXIT_FAILURE;

972

837

goto fallback;

973

838

}

974

839

/* Delete this process entry from the list */

840

if(process_list == proc){

841

/* First one - simple */

842

process_list = proc->next;

843

} else {

844

/* Second one or later */

845

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

846

if(p->next == proc){

847

p->next = proc->next;

848

break;

849

}

850

}

851

}

975

852

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

976

853

ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask,

977

854

NULL);

978

855

if(ret < 0){

979

856

perror("sigprocmask");

980

exitstatus = EXIT_FAILURE;

981

goto fallback;

982

}

983

984

if(plugin_list == NULL){

985

break;

986

}

987

988

plugin *next_plugin = proc->next;

989

free_plugin(proc);

990

proc = next_plugin;

991

continue;

857

}

858

free(proc->buffer);

859

free(proc);

860

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

861

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

862

the process list */

863

break;

992

864

}

993

994

865

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

995

866

996

bool bret = print_out_password(proc->buffer,

997

proc->buffer_length);

867

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

998

868

if(not bret){

999

869

perror("print_out_password");

1000

870

exitstatus = EXIT_FAILURE;

1001

871

}

1002

872

goto fallback;

1003

873

}

1004

1005

874

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

1006

875

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

1007

876

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

1008

proc = proc->next;

1009

877

continue;

1010

878

}

1011

879

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

1024

892

BUFFER_SIZE);

1025

893

if(ret < 0){

1026

894

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

1027

proc = proc->next;

1028

895

continue;

1029

896

}

1030

897

if(ret == 0){

1039

906

1040

907

fallback:

1041

908

1042

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

1043

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

1044

occured */

909

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

910

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

1045

911

bool bret;

1046

912

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

1047

913

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

1048

size_t len = strlen(passwordbuffer);

1049

/* Strip trailing newline */

1050

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

1051

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

1052

len--;

1053

}

1054

bret = print_out_password(passwordbuffer, len);

914

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

1055

915

if(not bret){

1056

916

perror("print_out_password");

1057

917

exitstatus = EXIT_FAILURE;

1066

926

}

1067

927

1068

928

if(custom_argv != NULL){

1069

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

929

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

1070

930

free(*arg);

1071

931

}

1072

932

free(custom_argv);

1073

933

}

934

free_plugin_list(plugin_list);

1074

935

1075

936

if(dir != NULL){

1076

937

closedir(dir);

1077

938

}

1078

939

1079

940

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

1080

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

1081

if(p->pid != 0){

1082

close(p->fd);

1083

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

1084

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

1085

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

1086

perror("kill");

1087

}

941

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

942

next = process_list->next;

943

close(process_list->fd);

944

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

945

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

946

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

947

perror("kill");

1088

948

}

949

free(process_list->buffer);

950

free(process_list);

1089

951

}

1090

952

1091

953

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

1095

957

if(errno != ECHILD){

1096

958

perror("wait");

1097

959

}

1098

1099

free_plugin_list();

1100

1101

free(plugindir);

1102

free(argfile);

1103

960

1104

961

return exitstatus;

1105

962

}