To get this branch, use:
bzr branch
http://bzr.recompile.se/loggerhead/mandos/release
« back to all changes in this revision
Viewing changes to plugin-runner.c
- browse files at revision 237.7.777
- compare with another revision
- download diff
- download tarball
- view history from revision 237.7.777
- Committer: teddy at recompile
- Date: 2020-12-03 20:30:45 UTC
- mto: This revision was merged to the branch mainline in revision 404.
- Revision ID: teddy@recompile.se-20201203203045-iqd6nq9y5nwalh1x
Minor fix of a test function
In dracut-module/password-agent, the test function
test_send_password_to_socket_EMSGSIZE() (which tests that the
send_password_to_socket() task function aborts properly when getting
EMSGSIZE when writing to the password socket), part of the test code
is supposed to find a message size which definitely does trigger
EMSGSIZE when send()ing to a socket. Without a "break" in the proper
place, however, the size given is always exactly 1024 bytes too large.
This is very probably not a problem, since a too large message will
still be too large if it is increased by 1024 bytes, and send(2) in
practice checks the size before reading the buffer. The biggest issue
would be if some version of send(2) would try to look at the last 1024
bytes of the message buffer before checking the message size; this
would then lead to a buffer over-read when running this test function.
(But even then there would be no security implications since the tests
are not run in the normal operation of the program.)
* dracut-module/password-agent.c
(test_send_password_to_socket_EMSGSIZE): Break out early when ssret
< 0 and errno == EMSGSIZE; don't allow loop to increase message_size
again.
In dracut-module/password-agent, the test function
test_send_password_to_socket_EMSGSIZE() (which tests that the
send_password_to_socket() task function aborts properly when getting
EMSGSIZE when writing to the password socket), part of the test code
is supposed to find a message size which definitely does trigger
EMSGSIZE when send()ing to a socket. Without a "break" in the proper
place, however, the size given is always exactly 1024 bytes too large.
This is very probably not a problem, since a too large message will
still be too large if it is increased by 1024 bytes, and send(2) in
practice checks the size before reading the buffer. The biggest issue
would be if some version of send(2) would try to look at the last 1024
bytes of the message buffer before checking the message size; this
would then lead to a buffer over-read when running this test function.
(But even then there would be no security implications since the tests
are not run in the normal operation of the program.)
* dracut-module/password-agent.c
(test_send_password_to_socket_EMSGSIZE): Break out early when ssret
< 0 and errno == EMSGSIZE; don't allow loop to increase message_size
again.
- files added:
- .bzr-builddeb
- debian
- debian/po
- debian/source
- debian/tests
- debian/upstream
- dracut-module
- network-hooks.d
- plugin-helpers
- files removed:
- initramfs-tools-hook-conf
- files renamed:
- plugins.d/password-request.c => plugins.d/mandos-client.c
- plugins.d/password-request.xml => plugins.d/mandos-client.xml
- files modified:
- .bzrignore
added
removed
plugin-runner.c
1
/* -*- coding: utf-8 -*- */
1
/* -*- coding: utf-8; mode: c; mode: orgtbl -*- */
2
2
/*
3
3
* Mandos plugin runner - Run Mandos plugins
4
4
*
5
* Copyright © 2007-2008 Teddy Hogeborn & Björn Påhlsson
6
*
7
* This program is free software: you can redistribute it and/or
8
* modify it under the terms of the GNU General Public License as
9
* published by the Free Software Foundation, either version 3 of the
10
* License, or (at your option) any later version.
11
*
12
* This program is distributed in the hope that it will be useful, but
5
* Copyright © 2008-2020 Teddy Hogeborn
6
* Copyright © 2008-2020 Björn Påhlsson
7
*
8
* This file is part of Mandos.
9
*
10
* Mandos is free software: you can redistribute it and/or modify it
11
* under the terms of the GNU General Public License as published by
12
* the Free Software Foundation, either version 3 of the License, or
13
* (at your option) any later version.
14
*
15
* Mandos is distributed in the hope that it will be useful, but
13
16
* WITHOUT ANY WARRANTY; without even the implied warranty of
14
17
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15
18
* General Public License for more details.
16
19
*
17
20
* You should have received a copy of the GNU General Public License
18
* along with this program. If not, see
19
* <http://www.gnu.org/licenses/>.
21
* along with Mandos. If not, see <http://www.gnu.org/licenses/>.
20
22
*
21
* Contact the authors at <mandos@fukt.bsnet.se>.
23
* Contact the authors at <mandos@recompile.se>.
22
24
*/
23
25
24
26
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), getline(),
25
asprintf() */
27
O_CLOEXEC, pipe2() */
26
28
#include <stddef.h> /* size_t, NULL */
27
#include <stdlib.h> /* malloc(), exit(), EXIT_FAILURE,
28
EXIT_SUCCESS, realloc() */
29
#include <stdlib.h> /* malloc(), reallocarray(), realloc(),
30
EXIT_SUCCESS, exit() */
29
31
#include <stdbool.h> /* bool, true, false */
30
#include <stdio.h> /* perror, popen(), fileno(),
31
fprintf(), stderr, STDOUT_FILENO */
32
#include <sys/types.h> /* DIR, opendir(), stat(), struct
33
stat, waitpid(), WIFEXITED(),
34
WEXITSTATUS(), wait(), pid_t,
35
uid_t, gid_t, getuid(), getgid(),
36
dirfd() */
32
#include <stdio.h> /* fileno(), fprintf(),
33
stderr, STDOUT_FILENO, fclose() */
34
#include <sys/types.h> /* fstat(), struct stat, waitpid(),
35
WIFEXITED(), WEXITSTATUS(), wait(),
36
pid_t, uid_t, gid_t, getuid(),
37
getgid() */
37
38
#include <sys/select.h> /* fd_set, select(), FD_ZERO(),
38
39
FD_SET(), FD_ISSET(), FD_CLR */
39
40
#include <sys/wait.h> /* wait(), waitpid(), WIFEXITED(),
40
WEXITSTATUS() */
41
#include <sys/stat.h> /* struct stat, stat(), S_ISREG() */
41
WEXITSTATUS(), WTERMSIG() */
42
#include <sys/stat.h> /* struct stat, fstat(), S_ISREG() */
42
43
#include <iso646.h> /* and, or, not */
43
#include <dirent.h> /* DIR, struct dirent, opendir(),
44
readdir(), closedir(), dirfd() */
45
#include <unistd.h> /* struct stat, stat(), S_ISREG(),
46
fcntl(), setuid(), setgid(),
47
F_GETFD, F_SETFD, FD_CLOEXEC,
48
access(), pipe(), fork(), close()
49
dup2, STDOUT_FILENO, _exit(),
50
execv(), write(), read(),
51
close() */
44
#include <dirent.h> /* struct dirent, scandirat() */
45
#include <unistd.h> /* fcntl(), F_GETFD, F_SETFD,
46
FD_CLOEXEC, write(), STDOUT_FILENO,
47
struct stat, fstat(), close(),
48
setgid(), setuid(), S_ISREG(),
49
faccessat() pipe2(), fork(),
50
_exit(), dup2(), fexecve(), read()
51
*/
52
52
#include <fcntl.h> /* fcntl(), F_GETFD, F_SETFD,
53
FD_CLOEXEC */
54
#include <string.h> /* strsep, strlen(), asprintf() */
53
FD_CLOEXEC, openat(), scandirat(),
54
pipe2() */
55
#include <string.h> /* strsep, strlen(), strsignal(),
56
strcmp(), strncmp() */
55
57
#include <errno.h> /* errno */
56
58
#include <argp.h> /* struct argp_option, struct
57
59
argp_state, struct argp,
61
63
#include <signal.h> /* struct sigaction, sigemptyset(),
62
64
sigaddset(), sigaction(),
63
65
sigprocmask(), SIG_BLOCK, SIGCHLD,
64
SIG_UNBLOCK, kill() */
66
SIG_UNBLOCK, kill(), sig_atomic_t
67
*/
65
68
#include <errno.h> /* errno, EBADF */
69
#include <inttypes.h> /* intmax_t, PRIdMAX, strtoimax() */
70
#include <sysexits.h> /* EX_OSERR, EX_USAGE, EX_IOERR,
71
EX_CONFIG, EX_UNAVAILABLE, EX_OK */
72
#include <errno.h> /* errno */
73
#include <error.h> /* error() */
74
#include <fnmatch.h> /* fnmatch() */
66
75
67
76
#define BUFFER_SIZE 256
68
77
69
78
#define PDIR "/lib/mandos/plugins.d"
79
#define PHDIR "/lib/mandos/plugin-helpers"
70
80
#define AFILE "/conf/conf.d/mandos/plugin-runner.conf"
71
81
72
const char *argp_program_version = "plugin-runner 1.0";
73
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
74
75
struct plugin;
82
const char *argp_program_version = "plugin-runner " VERSION;
83
const char *argp_program_bug_address = "<mandos@recompile.se>";
76
84
77
85
typedef struct plugin{
78
86
char *name; /* can be NULL or any plugin name */
81
89
char **environ;
82
90
int envc;
83
91
bool disabled;
84
92
85
93
/* Variables used for running processes*/
86
94
pid_t pid;
87
95
int fd;
89
97
size_t buffer_size;
90
98
size_t buffer_length;
91
99
bool eof;
92
volatile bool completed;
93
volatile int status;
100
volatile sig_atomic_t completed;
101
int status;
94
102
struct plugin *next;
95
103
} plugin;
96
104
97
105
static plugin *plugin_list = NULL;
98
106
99
/* Gets a existing plugin based on name,
107
/* Gets an existing plugin based on name,
100
108
or if none is found, creates a new one */
109
__attribute__((warn_unused_result))
101
110
static plugin *getplugin(char *name){
102
/* Check for exiting plugin with that name */
103
for (plugin *p = plugin_list; p != NULL; p = p->next){
104
if ((p->name == name)
105
or (p->name and name and (strcmp(p->name, name) == 0))){
111
/* Check for existing plugin with that name */
112
for(plugin *p = plugin_list; p != NULL; p = p->next){
113
if((p->name == name)
114
or (p->name and name and (strcmp(p->name, name) == 0))){
106
115
return p;
107
116
}
108
117
}
109
118
/* Create a new plugin */
110
plugin *new_plugin = malloc(sizeof(plugin));
111
if (new_plugin == NULL){
119
plugin *new_plugin = NULL;
120
do {
121
new_plugin = malloc(sizeof(plugin));
122
} while(new_plugin == NULL and errno == EINTR);
123
if(new_plugin == NULL){
112
124
return NULL;
113
125
}
114
126
char *copy_name = NULL;
115
127
if(name != NULL){
116
copy_name = strdup(name);
128
do {
129
copy_name = strdup(name);
130
} while(copy_name == NULL and errno == EINTR);
117
131
if(copy_name == NULL){
132
int e = errno;
133
free(new_plugin);
134
errno = e;
118
135
return NULL;
119
136
}
120
137
}
121
122
*new_plugin = (plugin) { .name = copy_name,
123
.argc = 1,
124
.disabled = false,
125
.next = plugin_list };
126
127
new_plugin->argv = malloc(sizeof(char *) * 2);
128
if (new_plugin->argv == NULL){
138
139
*new_plugin = (plugin){ .name = copy_name,
140
.argc = 1,
141
.disabled = false,
142
.next = plugin_list };
143
144
do {
145
new_plugin->argv = malloc(sizeof(char *) * 2);
146
} while(new_plugin->argv == NULL and errno == EINTR);
147
if(new_plugin->argv == NULL){
148
int e = errno;
129
149
free(copy_name);
130
150
free(new_plugin);
151
errno = e;
131
152
return NULL;
132
153
}
133
154
new_plugin->argv[0] = copy_name;
134
155
new_plugin->argv[1] = NULL;
135
156
136
new_plugin->environ = malloc(sizeof(char *));
157
do {
158
new_plugin->environ = malloc(sizeof(char *));
159
} while(new_plugin->environ == NULL and errno == EINTR);
137
160
if(new_plugin->environ == NULL){
161
int e = errno;
138
162
free(copy_name);
139
163
free(new_plugin->argv);
140
164
free(new_plugin);
165
errno = e;
141
166
return NULL;
142
167
}
143
168
new_plugin->environ[0] = NULL;
148
173
}
149
174
150
175
/* Helper function for add_argument and add_environment */
176
__attribute__((nonnull, warn_unused_result))
151
177
static bool add_to_char_array(const char *new, char ***array,
152
178
int *len){
153
179
/* Resize the pointed-to array to hold one more pointer */
154
*array = realloc(*array, sizeof(char *)
155
* (size_t) ((*len) + 2));
180
char **new_array = NULL;
181
do {
182
#if defined(__GLIBC_PREREQ) and __GLIBC_PREREQ(2, 26)
183
new_array = reallocarray(*array, (size_t)((*len) + 2),
184
sizeof(char *));
185
#else
186
if(((size_t)((*len) + 2)) > (SIZE_MAX / sizeof(char *))){
187
/* overflow */
188
new_array = NULL;
189
errno = ENOMEM;
190
} else {
191
new_array = realloc(*array, (size_t)((*len) + 2)
192
* sizeof(char *));
193
}
194
#endif
195
} while(new_array == NULL and errno == EINTR);
156
196
/* Malloc check */
157
if(*array == NULL){
197
if(new_array == NULL){
158
198
return false;
159
199
}
200
*array = new_array;
160
201
/* Make a copy of the new string */
161
char *copy = strdup(new);
202
char *copy;
203
do {
204
copy = strdup(new);
205
} while(copy == NULL and errno == EINTR);
162
206
if(copy == NULL){
163
207
return false;
164
208
}
171
215
}
172
216
173
217
/* Add to a plugin's argument vector */
218
__attribute__((nonnull(2), warn_unused_result))
174
219
static bool add_argument(plugin *p, const char *arg){
175
220
if(p == NULL){
176
221
return false;
179
224
}
180
225
181
226
/* Add to a plugin's environment */
227
__attribute__((nonnull(2), warn_unused_result))
182
228
static bool add_environment(plugin *p, const char *def, bool replace){
183
229
if(p == NULL){
184
230
return false;
186
232
/* namelen = length of name of environment variable */
187
233
size_t namelen = (size_t)(strchrnul(def, '=') - def);
188
234
/* Search for this environment variable */
189
for(char **e = p->environ; *e != NULL; e++){
190
if(strncmp(*e, def, namelen+1) == 0){
235
for(char **envdef = p->environ; *envdef != NULL; envdef++){
236
if(strncmp(*envdef, def, namelen + 1) == 0){
191
237
/* It already exists */
192
238
if(replace){
193
char *new = realloc(*e, strlen(def));
194
if(new == NULL){
239
char *new_envdef;
240
do {
241
new_envdef = realloc(*envdef, strlen(def) + 1);
242
} while(new_envdef == NULL and errno == EINTR);
243
if(new_envdef == NULL){
195
244
return false;
196
245
}
197
*e = new;
198
strcpy(*e, def);
246
*envdef = new_envdef;
247
strcpy(*envdef, def);
199
248
}
200
249
return true;
201
250
}
203
252
return add_to_char_array(def, &(p->environ), &(p->envc));
204
253
}
205
254
255
#ifndef O_CLOEXEC
206
256
/*
207
257
* Based on the example in the GNU LibC manual chapter 13.13 "File
208
258
* Descriptor Flags".
209
* *Note File Descriptor Flags:(libc)Descriptor Flags.
259
| [[info:libc:Descriptor%20Flags][File Descriptor Flags]] |
210
260
*/
211
static int set_cloexec_flag(int fd)
212
{
213
int ret = fcntl(fd, F_GETFD, 0);
261
__attribute__((warn_unused_result))
262
static int set_cloexec_flag(int fd){
263
int ret = (int)TEMP_FAILURE_RETRY(fcntl(fd, F_GETFD, 0));
214
264
/* If reading the flags failed, return error indication now. */
215
265
if(ret < 0){
216
266
return ret;
217
267
}
218
268
/* Store modified flag word in the descriptor. */
219
return fcntl(fd, F_SETFD, ret | FD_CLOEXEC);
269
return (int)TEMP_FAILURE_RETRY(fcntl(fd, F_SETFD,
270
ret | FD_CLOEXEC));
220
271
}
272
#endif /* not O_CLOEXEC */
221
273
222
274
223
275
/* Mark processes as completed when they exit, and save their exit
224
276
status. */
225
void handle_sigchld(__attribute__((unused)) int sig){
277
static void handle_sigchld(__attribute__((unused)) int sig){
278
int old_errno = errno;
226
279
while(true){
227
280
plugin *proc = plugin_list;
228
281
int status;
232
285
break;
233
286
}
234
287
if(pid == -1){
235
if (errno != ECHILD){
236
perror("waitpid");
288
if(errno == ECHILD){
289
/* No child processes */
290
break;
237
291
}
238
/* No child processes */
239
break;
292
error(0, errno, "waitpid");
240
293
}
241
294
242
295
/* A child exited, find it in process_list */
243
296
while(proc != NULL and proc->pid != pid){
244
297
proc = proc->next;
248
301
continue;
249
302
}
250
303
proc->status = status;
251
proc->completed = true;
304
proc->completed = 1;
252
305
}
306
errno = old_errno;
253
307
}
254
308
255
309
/* Prints out a password to stdout */
256
bool print_out_password(const char *buffer, size_t length){
310
__attribute__((nonnull, warn_unused_result))
311
static bool print_out_password(const char *buffer, size_t length){
257
312
ssize_t ret;
258
if(length>0 and buffer[length-1] == '\n'){
259
length--;
260
}
261
313
for(size_t written = 0; written < length; written += (size_t)ret){
262
314
ret = TEMP_FAILURE_RETRY(write(STDOUT_FILENO, buffer + written,
263
315
length - written));
269
321
}
270
322
271
323
/* Removes and free a plugin from the plugin list */
324
__attribute__((nonnull))
272
325
static void free_plugin(plugin *plugin_node){
273
326
274
for(char **arg = plugin_node->argv; *arg != NULL; arg++){
327
for(char **arg = (plugin_node->argv)+1; *arg != NULL; arg++){
275
328
free(*arg);
276
329
}
330
free(plugin_node->name);
277
331
free(plugin_node->argv);
278
332
for(char **env = plugin_node->environ; *env != NULL; env++){
279
333
free(*env);
280
334
}
281
335
free(plugin_node->environ);
282
336
free(plugin_node->buffer);
283
337
284
338
/* Removes the plugin from the singly-linked list */
285
339
if(plugin_node == plugin_list){
286
340
/* First one - simple */
306
360
307
361
int main(int argc, char *argv[]){
308
362
char *plugindir = NULL;
363
char *pluginhelperdir = NULL;
309
364
char *argfile = NULL;
310
365
FILE *conffp;
311
size_t d_name_len;
312
DIR *dir = NULL;
313
struct dirent *dirst;
366
struct dirent **direntries = NULL;
314
367
struct stat st;
315
368
fd_set rfds_all;
316
369
int ret, maxfd = 0;
370
ssize_t sret;
317
371
uid_t uid = 65534;
318
372
gid_t gid = 65534;
319
373
bool debug = false;
323
377
.sa_flags = SA_NOCLDSTOP };
324
378
char **custom_argv = NULL;
325
379
int custom_argc = 0;
380
int dir_fd = -1;
326
381
327
382
/* Establish a signal handler */
328
383
sigemptyset(&sigchld_action.sa_mask);
329
384
ret = sigaddset(&sigchld_action.sa_mask, SIGCHLD);
330
385
if(ret == -1){
331
perror("sigaddset");
332
exitstatus = EXIT_FAILURE;
386
error(0, errno, "sigaddset");
387
exitstatus = EX_OSERR;
333
388
goto fallback;
334
389
}
335
390
ret = sigaction(SIGCHLD, &sigchld_action, &old_sigchld_action);
336
391
if(ret == -1){
337
perror("sigaction");
338
exitstatus = EXIT_FAILURE;
392
error(0, errno, "sigaction");
393
exitstatus = EX_OSERR;
339
394
goto fallback;
340
395
}
341
396
344
399
{ .name = "global-options", .key = 'g',
345
400
.arg = "OPTION[,OPTION[,...]]",
346
401
.doc = "Options passed to all plugins" },
347
{ .name = "global-env", .key = 'e',
402
{ .name = "global-env", .key = 'G',
348
403
.arg = "VAR=value",
349
404
.doc = "Environment variable passed to all plugins" },
350
405
{ .name = "options-for", .key = 'o',
351
406
.arg = "PLUGIN:OPTION[,OPTION[,...]]",
352
407
.doc = "Options passed only to specified plugin" },
353
{ .name = "env-for", .key = 'f',
408
{ .name = "env-for", .key = 'E',
354
409
.arg = "PLUGIN:ENV=value",
355
410
.doc = "Environment variable passed to specified plugin" },
356
411
{ .name = "disable", .key = 'd',
357
412
.arg = "PLUGIN",
358
413
.doc = "Disable a specific plugin", .group = 1 },
414
{ .name = "enable", .key = 'e',
415
.arg = "PLUGIN",
416
.doc = "Enable a specific plugin", .group = 1 },
359
417
{ .name = "plugin-dir", .key = 128,
360
418
.arg = "DIRECTORY",
361
419
.doc = "Specify a different plugin directory", .group = 2 },
370
428
.doc = "Group ID the plugins will run as", .group = 3 },
371
429
{ .name = "debug", .key = 132,
372
430
.doc = "Debug mode", .group = 4 },
431
{ .name = "plugin-helper-dir", .key = 133,
432
.arg = "DIRECTORY",
433
.doc = "Specify a different plugin helper directory",
434
.group = 2 },
435
/*
436
* These reproduce what we would get without ARGP_NO_HELP
437
*/
438
{ .name = "help", .key = '?',
439
.doc = "Give this help list", .group = -1 },
440
{ .name = "usage", .key = -3,
441
.doc = "Give a short usage message", .group = -1 },
442
{ .name = "version", .key = 'V',
443
.doc = "Print program version", .group = -1 },
373
444
{ .name = NULL }
374
445
};
375
446
376
error_t parse_opt (int key, char *arg, __attribute__((unused))
377
struct argp_state *state) {
378
/* Get the INPUT argument from `argp_parse', which we know is a
379
pointer to our plugin list pointer. */
380
switch (key) {
447
__attribute__((nonnull(3)))
448
error_t parse_opt(int key, char *arg, struct argp_state *state){
449
errno = 0;
450
switch(key){
451
char *tmp;
452
intmax_t tmp_id;
381
453
case 'g': /* --global-options */
382
if (arg != NULL){
383
char *p;
384
while((p = strsep(&arg, ",")) != NULL){
385
if(p[0] == '\0'){
386
continue;
387
}
388
if(not add_argument(getplugin(NULL), p)){
389
perror("add_argument");
390
return ARGP_ERR_UNKNOWN;
391
}
392
}
393
}
394
break;
395
case 'e': /* --global-env */
396
if(arg == NULL){
397
break;
398
}
399
454
{
400
char *envdef = strdup(arg);
401
if(envdef == NULL){
402
break;
403
}
404
if(not add_environment(getplugin(NULL), envdef, true)){
405
perror("add_environment");
406
}
455
char *plugin_option;
456
while((plugin_option = strsep(&arg, ",")) != NULL){
457
if(not add_argument(getplugin(NULL), plugin_option)){
458
break;
459
}
460
}
461
errno = 0;
462
}
463
break;
464
case 'G': /* --global-env */
465
if(add_environment(getplugin(NULL), arg, true)){
466
errno = 0;
407
467
}
408
468
break;
409
469
case 'o': /* --options-for */
410
if (arg != NULL){
411
char *p_name = strsep(&arg, ":");
412
if(p_name[0] == '\0'){
413
break;
414
}
415
char *opt = strsep(&arg, ":");
416
if(opt[0] == '\0'){
417
break;
418
}
419
if(opt != NULL){
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;
428
}
470
{
471
char *option_list = strchr(arg, ':');
472
if(option_list == NULL){
473
argp_error(state, "No colon in \"%s\"", arg);
474
errno = EINVAL;
475
break;
476
}
477
*option_list = '\0';
478
option_list++;
479
if(arg[0] == '\0'){
480
argp_error(state, "Empty plugin name");
481
errno = EINVAL;
482
break;
483
}
484
char *option;
485
while((option = strsep(&option_list, ",")) != NULL){
486
if(not add_argument(getplugin(arg), option)){
487
break;
429
488
}
430
489
}
490
errno = 0;
431
491
}
432
492
break;
433
case 'f': /* --env-for */
434
if(arg == NULL){
435
break;
436
}
493
case 'E': /* --env-for */
437
494
{
438
495
char *envdef = strchr(arg, ':');
439
496
if(envdef == NULL){
440
break;
441
}
442
char *p_name = strndup(arg, (size_t) (envdef-arg));
443
if(p_name == NULL){
444
break;
445
}
497
argp_error(state, "No colon in \"%s\"", arg);
498
errno = EINVAL;
499
break;
500
}
501
*envdef = '\0';
446
502
envdef++;
447
if(not add_environment(getplugin(p_name), envdef, true)){
448
perror("add_environment");
503
if(arg[0] == '\0'){
504
argp_error(state, "Empty plugin name");
505
errno = EINVAL;
506
break;
507
}
508
if(add_environment(getplugin(arg), envdef, true)){
509
errno = 0;
449
510
}
450
511
}
451
512
break;
452
513
case 'd': /* --disable */
453
if (arg != NULL){
454
plugin *p = getplugin(arg);
455
if(p == NULL){
456
return ARGP_ERR_UNKNOWN;
457
}
458
p->disabled = true;
514
{
515
plugin *p = getplugin(arg);
516
if(p != NULL){
517
p->disabled = true;
518
errno = 0;
519
}
520
}
521
break;
522
case 'e': /* --enable */
523
{
524
plugin *p = getplugin(arg);
525
if(p != NULL){
526
p->disabled = false;
527
errno = 0;
528
}
459
529
}
460
530
break;
461
531
case 128: /* --plugin-dir */
532
free(plugindir);
462
533
plugindir = strdup(arg);
463
if(plugindir == NULL){
464
perror("strdup");
465
}
466
break;
467
case 129: /* --config-file */
534
if(plugindir != NULL){
535
errno = 0;
536
}
537
break;
538
case 129: /* --config-file */
539
/* This is already done by parse_opt_config_file() */
540
break;
541
case 130: /* --userid */
542
tmp_id = strtoimax(arg, &tmp, 10);
543
if(errno != 0 or tmp == arg or *tmp != '\0'
544
or tmp_id != (uid_t)tmp_id){
545
argp_error(state, "Bad user ID number: \"%s\", using %"
546
PRIdMAX, arg, (intmax_t)uid);
547
break;
548
}
549
uid = (uid_t)tmp_id;
550
errno = 0;
551
break;
552
case 131: /* --groupid */
553
tmp_id = strtoimax(arg, &tmp, 10);
554
if(errno != 0 or tmp == arg or *tmp != '\0'
555
or tmp_id != (gid_t)tmp_id){
556
argp_error(state, "Bad group ID number: \"%s\", using %"
557
PRIdMAX, arg, (intmax_t)gid);
558
break;
559
}
560
gid = (gid_t)tmp_id;
561
errno = 0;
562
break;
563
case 132: /* --debug */
564
debug = true;
565
break;
566
case 133: /* --plugin-helper-dir */
567
free(pluginhelperdir);
568
pluginhelperdir = strdup(arg);
569
if(pluginhelperdir != NULL){
570
errno = 0;
571
}
572
break;
573
/*
574
* These reproduce what we would get without ARGP_NO_HELP
575
*/
576
case '?': /* --help */
577
state->flags &= ~(unsigned int)ARGP_NO_EXIT; /* force exit */
578
argp_state_help(state, state->out_stream, ARGP_HELP_STD_HELP);
579
__builtin_unreachable();
580
case -3: /* --usage */
581
state->flags &= ~(unsigned int)ARGP_NO_EXIT; /* force exit */
582
argp_state_help(state, state->out_stream,
583
ARGP_HELP_USAGE | ARGP_HELP_EXIT_OK);
584
__builtin_unreachable();
585
case 'V': /* --version */
586
fprintf(state->out_stream, "%s\n", argp_program_version);
587
exit(EXIT_SUCCESS);
588
break;
589
/*
590
* When adding more options before this line, remember to also add a
591
* "case" to the "parse_opt_config_file" function below.
592
*/
593
case ARGP_KEY_ARG:
594
/* Cryptsetup always passes an argument, which is an empty
595
string if "none" was specified in /etc/crypttab. So if
596
argument was empty, we ignore it silently. */
597
if(arg[0] == '\0'){
598
break;
599
}
600
#if __GNUC__ >= 7
601
__attribute__((fallthrough));
602
#else
603
/* FALLTHROUGH */
604
#endif
605
default:
606
return ARGP_ERR_UNKNOWN;
607
}
608
return errno; /* Set to 0 at start */
609
}
610
611
/* This option parser is the same as parse_opt() above, except it
612
ignores everything but the --config-file option. */
613
error_t parse_opt_config_file(int key, char *arg,
614
__attribute__((unused))
615
struct argp_state *state){
616
errno = 0;
617
switch(key){
618
case 'g': /* --global-options */
619
case 'G': /* --global-env */
620
case 'o': /* --options-for */
621
case 'E': /* --env-for */
622
case 'd': /* --disable */
623
case 'e': /* --enable */
624
case 128: /* --plugin-dir */
625
break;
626
case 129: /* --config-file */
627
free(argfile);
468
628
argfile = strdup(arg);
469
if(argfile == NULL){
470
perror("strdup");
629
if(argfile != NULL){
630
errno = 0;
471
631
}
472
break;
632
break;
473
633
case 130: /* --userid */
474
uid = (uid_t)strtol(arg, NULL, 10);
475
break;
476
634
case 131: /* --groupid */
477
gid = (gid_t)strtol(arg, NULL, 10);
478
break;
479
635
case 132: /* --debug */
480
debug = true;
481
break;
636
case 133: /* --plugin-helper-dir */
637
case '?': /* --help */
638
case -3: /* --usage */
639
case 'V': /* --version */
482
640
case ARGP_KEY_ARG:
483
fprintf(stderr, "Ignoring unknown argument \"%s\"\n", arg);
484
break;
485
case ARGP_KEY_END:
486
641
break;
487
642
default:
488
643
return ARGP_ERR_UNKNOWN;
489
644
}
490
return 0;
645
return errno;
491
646
}
492
647
493
struct argp argp = { .options = options, .parser = parse_opt,
648
struct argp argp = { .options = options,
649
.parser = parse_opt_config_file,
494
650
.args_doc = "",
495
651
.doc = "Mandos plugin runner -- Run plugins" };
496
652
653
/* Parse using parse_opt_config_file() in order to get the custom
654
config file location, if any. */
655
ret = argp_parse(&argp, argc, argv,
656
ARGP_IN_ORDER | ARGP_NO_EXIT | ARGP_NO_HELP,
657
NULL, NULL);
658
switch(ret){
659
case 0:
660
break;
661
case ENOMEM:
662
default:
663
errno = ret;
664
error(0, errno, "argp_parse");
665
exitstatus = EX_OSERR;
666
goto fallback;
667
case EINVAL:
668
exitstatus = EX_USAGE;
669
goto fallback;
670
}
671
672
/* Reset to the normal argument parser */
673
argp.parser = parse_opt;
674
497
675
/* Open the configfile if available */
498
if (argfile == NULL){
676
if(argfile == NULL){
499
677
conffp = fopen(AFILE, "r");
500
678
} else {
501
679
conffp = fopen(argfile, "r");
502
}
680
}
503
681
if(conffp != NULL){
504
682
char *org_line = NULL;
505
683
char *p, *arg, *new_arg, *line;
506
684
size_t size = 0;
507
ssize_t sret;
508
685
const char whitespace_delims[] = " \r\t\f\v\n";
509
686
const char comment_delim[] = "#";
510
687
511
688
custom_argc = 1;
512
689
custom_argv = malloc(sizeof(char*) * 2);
513
690
if(custom_argv == NULL){
514
perror("malloc");
515
exitstatus = EXIT_FAILURE;
691
error(0, errno, "malloc");
692
exitstatus = EX_OSERR;
516
693
goto fallback;
517
694
}
518
695
custom_argv[0] = argv[0];
519
696
custom_argv[1] = NULL;
520
697
521
698
/* for each line in the config file, strip whitespace and ignore
522
699
commented text */
523
700
while(true){
525
702
if(sret == -1){
526
703
break;
527
704
}
528
705
529
706
line = org_line;
530
707
arg = strsep(&line, comment_delim);
531
708
while((p = strsep(&arg, whitespace_delims)) != NULL){
534
711
}
535
712
new_arg = strdup(p);
536
713
if(new_arg == NULL){
537
perror("strdup");
538
exitstatus = EXIT_FAILURE;
714
error(0, errno, "strdup");
715
exitstatus = EX_OSERR;
539
716
free(org_line);
540
717
goto fallback;
541
718
}
542
719
543
720
custom_argc += 1;
544
custom_argv = realloc(custom_argv, sizeof(char *)
545
* ((unsigned int) custom_argc + 1));
546
if(custom_argv == NULL){
547
perror("realloc");
548
exitstatus = EXIT_FAILURE;
549
free(org_line);
550
goto fallback;
721
{
722
#if defined(__GLIBC_PREREQ) and __GLIBC_PREREQ(2, 26)
723
char **new_argv = reallocarray(custom_argv, (size_t)custom_argc + 1,
724
sizeof(char *));
725
#else
726
char **new_argv = NULL;
727
if(((size_t)custom_argc + 1) > (SIZE_MAX / sizeof(char *))){
728
/* overflow */
729
errno = ENOMEM;
730
} else {
731
new_argv = realloc(custom_argv, ((size_t)custom_argc + 1)
732
* sizeof(char *));
733
}
734
#endif
735
if(new_argv == NULL){
736
error(0, errno, "reallocarray");
737
exitstatus = EX_OSERR;
738
free(new_arg);
739
free(org_line);
740
goto fallback;
741
} else {
742
custom_argv = new_argv;
743
}
551
744
}
552
745
custom_argv[custom_argc-1] = new_arg;
553
custom_argv[custom_argc] = NULL;
746
custom_argv[custom_argc] = NULL;
554
747
}
555
748
}
749
do {
750
ret = fclose(conffp);
751
} while(ret == EOF and errno == EINTR);
752
if(ret == EOF){
753
error(0, errno, "fclose");
754
exitstatus = EX_IOERR;
755
goto fallback;
756
}
556
757
free(org_line);
557
758
} else {
558
759
/* Check for harmful errors and go to fallback. Other errors might
559
760
not affect opening plugins */
560
if (errno == EMFILE or errno == ENFILE or errno == ENOMEM){
561
perror("fopen");
562
exitstatus = EXIT_FAILURE;
761
if(errno == EMFILE or errno == ENFILE or errno == ENOMEM){
762
error(0, errno, "fopen");
763
exitstatus = EX_OSERR;
563
764
goto fallback;
564
765
}
565
766
}
566
/* If there was any arguments from configuration file,
567
pass them to parser as command arguments */
767
/* If there were any arguments from the configuration file, pass
768
them to parser as command line arguments */
568
769
if(custom_argv != NULL){
569
ret = argp_parse (&argp, custom_argc, custom_argv, ARGP_IN_ORDER,
570
0, NULL);
571
if (ret == ARGP_ERR_UNKNOWN){
572
fprintf(stderr, "Unknown error while parsing arguments\n");
573
exitstatus = EXIT_FAILURE;
770
ret = argp_parse(&argp, custom_argc, custom_argv,
771
ARGP_IN_ORDER | ARGP_NO_EXIT | ARGP_NO_HELP,
772
NULL, NULL);
773
switch(ret){
774
case 0:
775
break;
776
case ENOMEM:
777
default:
778
errno = ret;
779
error(0, errno, "argp_parse");
780
exitstatus = EX_OSERR;
781
goto fallback;
782
case EINVAL:
783
exitstatus = EX_CONFIG;
574
784
goto fallback;
575
785
}
576
786
}
577
787
578
788
/* Parse actual command line arguments, to let them override the
579
789
config file */
580
ret = argp_parse (&argp, argc, argv, ARGP_IN_ORDER, 0, NULL);
581
if (ret == ARGP_ERR_UNKNOWN){
582
fprintf(stderr, "Unknown error while parsing arguments\n");
583
exitstatus = EXIT_FAILURE;
584
goto fallback;
790
ret = argp_parse(&argp, argc, argv,
791
ARGP_IN_ORDER | ARGP_NO_EXIT | ARGP_NO_HELP,
792
NULL, NULL);
793
switch(ret){
794
case 0:
795
break;
796
case ENOMEM:
797
default:
798
errno = ret;
799
error(0, errno, "argp_parse");
800
exitstatus = EX_OSERR;
801
goto fallback;
802
case EINVAL:
803
exitstatus = EX_USAGE;
804
goto fallback;
805
}
806
807
{
808
char *pluginhelperenv;
809
bool bret = true;
810
ret = asprintf(&pluginhelperenv, "MANDOSPLUGINHELPERDIR=%s",
811
pluginhelperdir != NULL ? pluginhelperdir : PHDIR);
812
if(ret != -1){
813
bret = add_environment(getplugin(NULL), pluginhelperenv, true);
814
}
815
if(ret == -1 or not bret){
816
error(0, errno, "Failed to set MANDOSPLUGINHELPERDIR"
817
" environment variable to \"%s\" for all plugins\n",
818
pluginhelperdir != NULL ? pluginhelperdir : PHDIR);
819
}
820
if(ret != -1){
821
free(pluginhelperenv);
822
}
585
823
}
586
824
587
825
if(debug){
588
for(plugin *p = plugin_list; p != NULL; p=p->next){
826
for(plugin *p = plugin_list; p != NULL; p = p->next){
589
827
fprintf(stderr, "Plugin: %s has %d arguments\n",
590
828
p->name ? p->name : "Global", p->argc - 1);
591
829
for(char **a = p->argv; *a != NULL; a++){
592
830
fprintf(stderr, "\tArg: %s\n", *a);
593
831
}
594
fprintf(stderr, "...and %u environment variables\n", p->envc);
832
fprintf(stderr, "...and %d environment variables\n", p->envc);
595
833
for(char **a = p->environ; *a != NULL; a++){
596
834
fprintf(stderr, "\t%s\n", *a);
597
835
}
598
836
}
599
837
}
600
838
601
/* Strip permissions down to nobody */
839
if(getuid() == 0){
840
/* Work around Debian bug #633582:
841
<https://bugs.debian.org/633582> */
842
int plugindir_fd = open(/* plugindir or */ PDIR, O_RDONLY);
843
if(plugindir_fd == -1){
844
if(errno != ENOENT){
845
error(0, errno, "open(\"" PDIR "\")");
846
}
847
} else {
848
ret = (int)TEMP_FAILURE_RETRY(fstat(plugindir_fd, &st));
849
if(ret == -1){
850
error(0, errno, "fstat");
851
} else {
852
if(S_ISDIR(st.st_mode) and st.st_uid == 0 and st.st_gid == 0){
853
ret = fchown(plugindir_fd, uid, gid);
854
if(ret == -1){
855
error(0, errno, "fchown");
856
}
857
}
858
}
859
close(plugindir_fd);
860
}
861
}
862
863
/* Lower permissions */
864
ret = setgid(gid);
865
if(ret == -1){
866
error(0, errno, "setgid");
867
}
602
868
ret = setuid(uid);
603
if (ret == -1){
604
perror("setuid");
605
}
606
setgid(gid);
607
if (ret == -1){
608
perror("setgid");
609
}
610
611
if (plugindir == NULL){
612
dir = opendir(PDIR);
613
} else {
614
dir = opendir(plugindir);
615
}
616
617
if(dir == NULL){
618
perror("Could not open plugin dir");
619
exitstatus = EXIT_FAILURE;
620
goto fallback;
621
}
622
623
/* Set the FD_CLOEXEC flag on the directory, if possible */
869
if(ret == -1){
870
error(0, errno, "setuid");
871
}
872
873
/* Open plugin directory with close_on_exec flag */
624
874
{
625
int dir_fd = dirfd(dir);
626
if(dir_fd >= 0){
627
ret = set_cloexec_flag(dir_fd);
628
if(ret < 0){
629
perror("set_cloexec_flag");
630
exitstatus = EXIT_FAILURE;
631
goto fallback;
875
dir_fd = open(plugindir != NULL ? plugindir : PDIR, O_RDONLY |
876
#ifdef O_CLOEXEC
877
O_CLOEXEC
878
#else /* not O_CLOEXEC */
879
0
880
#endif /* not O_CLOEXEC */
881
);
882
if(dir_fd == -1){
883
error(0, errno, "Could not open plugin dir");
884
exitstatus = EX_UNAVAILABLE;
885
goto fallback;
886
}
887
888
#ifndef O_CLOEXEC
889
/* Set the FD_CLOEXEC flag on the directory */
890
ret = set_cloexec_flag(dir_fd);
891
if(ret < 0){
892
error(0, errno, "set_cloexec_flag");
893
exitstatus = EX_OSERR;
894
goto fallback;
895
}
896
#endif /* O_CLOEXEC */
897
}
898
899
int good_name(const struct dirent * const dirent){
900
const char * const patterns[] = { ".*", "#*#", "*~", "*.dpkg-new",
901
"*.dpkg-old", "*.dpkg-bak",
902
"*.dpkg-divert", NULL };
903
#ifdef __GNUC__
904
#pragma GCC diagnostic push
905
#pragma GCC diagnostic ignored "-Wcast-qual"
906
#endif
907
for(const char **pat = (const char **)patterns;
908
*pat != NULL; pat++){
909
#ifdef __GNUC__
910
#pragma GCC diagnostic pop
911
#endif
912
if(fnmatch(*pat, dirent->d_name, FNM_FILE_NAME | FNM_PERIOD)
913
!= FNM_NOMATCH){
914
if(debug){
915
fprintf(stderr, "Ignoring plugin dir entry \"%s\""
916
" matching pattern %s\n", dirent->d_name, *pat);
917
}
918
return 0;
632
919
}
633
920
}
921
return 1;
922
}
923
924
int numplugins = scandirat(dir_fd, ".", &direntries, good_name,
925
alphasort);
926
if(numplugins == -1){
927
error(0, errno, "Could not scan plugin dir");
928
direntries = NULL;
929
exitstatus = EX_OSERR;
930
goto fallback;
634
931
}
635
932
636
933
FD_ZERO(&rfds_all);
637
934
638
935
/* Read and execute any executable in the plugin directory*/
639
while(true){
640
dirst = readdir(dir);
641
642
/* All directory entries have been processed */
643
if(dirst == NULL){
644
if (errno == EBADF){
645
perror("readdir");
646
exitstatus = EXIT_FAILURE;
647
goto fallback;
648
}
649
break;
650
}
651
652
d_name_len = strlen(dirst->d_name);
653
654
/* Ignore dotfiles, backup files and other junk */
655
{
656
bool bad_name = false;
657
658
const char const *bad_prefixes[] = { ".", "#", NULL };
659
660
const char const *bad_suffixes[] = { "~", "#", ".dpkg-new",
661
".dpkg-old",
662
".dpkg-divert", NULL };
663
for(const char **pre = bad_prefixes; *pre != NULL; pre++){
664
size_t pre_len = strlen(*pre);
665
if((d_name_len >= pre_len)
666
and strncmp((dirst->d_name), *pre, pre_len) == 0){
667
if(debug){
668
fprintf(stderr, "Ignoring plugin dir entry \"%s\""
669
" with bad prefix %s\n", dirst->d_name, *pre);
670
}
671
bad_name = true;
672
break;
673
}
674
}
675
if(bad_name){
676
continue;
677
}
678
for(const char **suf = bad_suffixes; *suf != NULL; suf++){
679
size_t suf_len = strlen(*suf);
680
if((d_name_len >= suf_len)
681
and (strcmp((dirst->d_name)+d_name_len-suf_len, *suf)
682
== 0)){
683
if(debug){
684
fprintf(stderr, "Ignoring plugin dir entry \"%s\""
685
" with bad suffix %s\n", dirst->d_name, *suf);
686
}
687
bad_name = true;
688
break;
689
}
690
}
691
692
if(bad_name){
693
continue;
694
}
695
}
696
697
char *filename;
698
ret = asprintf(&filename, "%s/%s", plugindir, dirst->d_name);
699
if(ret < 0){
700
perror("asprintf");
701
continue;
702
}
703
704
ret = stat(filename, &st);
705
if (ret == -1){
706
perror("stat");
707
free(filename);
708
continue;
709
}
710
936
for(int i = 0; i < numplugins; i++){
937
938
int plugin_fd = openat(dir_fd, direntries[i]->d_name, O_RDONLY);
939
if(plugin_fd == -1){
940
error(0, errno, "Could not open plugin");
941
free(direntries[i]);
942
continue;
943
}
944
ret = (int)TEMP_FAILURE_RETRY(fstat(plugin_fd, &st));
945
if(ret == -1){
946
error(0, errno, "stat");
947
close(plugin_fd);
948
free(direntries[i]);
949
continue;
950
}
951
711
952
/* Ignore non-executable files */
712
if (not S_ISREG(st.st_mode) or (access(filename, X_OK) != 0)){
953
if(not S_ISREG(st.st_mode)
954
or (TEMP_FAILURE_RETRY(faccessat(dir_fd, direntries[i]->d_name,
955
X_OK, 0)) != 0)){
713
956
if(debug){
714
fprintf(stderr, "Ignoring plugin dir entry \"%s\""
715
" with bad type or mode\n", filename);
957
fprintf(stderr, "Ignoring plugin dir entry \"%s/%s\""
958
" with bad type or mode\n",
959
plugindir != NULL ? plugindir : PDIR,
960
direntries[i]->d_name);
716
961
}
717
free(filename);
962
close(plugin_fd);
963
free(direntries[i]);
718
964
continue;
719
965
}
720
966
721
plugin *p = getplugin(dirst->d_name);
967
plugin *p = getplugin(direntries[i]->d_name);
722
968
if(p == NULL){
723
perror("getplugin");
724
free(filename);
969
error(0, errno, "getplugin");
970
close(plugin_fd);
971
free(direntries[i]);
725
972
continue;
726
973
}
727
974
if(p->disabled){
728
975
if(debug){
729
976
fprintf(stderr, "Ignoring disabled plugin \"%s\"\n",
730
dirst->d_name);
977
direntries[i]->d_name);
731
978
}
732
free(filename);
979
close(plugin_fd);
980
free(direntries[i]);
733
981
continue;
734
982
}
735
983
{
738
986
if(g != NULL){
739
987
for(char **a = g->argv + 1; *a != NULL; a++){
740
988
if(not add_argument(p, *a)){
741
perror("add_argument");
989
error(0, errno, "add_argument");
742
990
}
743
991
}
744
992
/* Add global environment variables */
745
993
for(char **e = g->environ; *e != NULL; e++){
746
994
if(not add_environment(p, *e, false)){
747
perror("add_environment");
995
error(0, errno, "add_environment");
748
996
}
749
997
}
750
998
}
751
999
}
752
/* If this plugin has any environment variables, we will call
753
using execve and need to duplicate the environment from this
754
process, too. */
1000
/* If this plugin has any environment variables, we need to
1001
duplicate the environment from this process, too. */
755
1002
if(p->environ[0] != NULL){
756
1003
for(char **e = environ; *e != NULL; e++){
757
1004
if(not add_environment(p, *e, false)){
758
perror("add_environment");
1005
error(0, errno, "add_environment");
759
1006
}
760
1007
}
761
1008
}
762
1009
763
1010
int pipefd[2];
764
ret = pipe(pipefd);
765
if (ret == -1){
766
perror("pipe");
767
exitstatus = EXIT_FAILURE;
768
goto fallback;
769
}
1011
#ifndef O_CLOEXEC
1012
ret = (int)TEMP_FAILURE_RETRY(pipe(pipefd));
1013
#else /* O_CLOEXEC */
1014
ret = (int)TEMP_FAILURE_RETRY(pipe2(pipefd, O_CLOEXEC));
1015
#endif /* O_CLOEXEC */
1016
if(ret == -1){
1017
error(0, errno, "pipe");
1018
exitstatus = EX_OSERR;
1019
free(direntries[i]);
1020
goto fallback;
1021
}
1022
if(pipefd[0] >= FD_SETSIZE){
1023
fprintf(stderr, "pipe()[0] (%d) >= FD_SETSIZE (%d)", pipefd[0],
1024
FD_SETSIZE);
1025
close(pipefd[0]);
1026
close(pipefd[1]);
1027
exitstatus = EX_OSERR;
1028
free(direntries[i]);
1029
goto fallback;
1030
}
1031
#ifndef O_CLOEXEC
770
1032
/* Ask OS to automatic close the pipe on exec */
771
1033
ret = set_cloexec_flag(pipefd[0]);
772
1034
if(ret < 0){
773
perror("set_cloexec_flag");
774
exitstatus = EXIT_FAILURE;
1035
error(0, errno, "set_cloexec_flag");
1036
close(pipefd[0]);
1037
close(pipefd[1]);
1038
exitstatus = EX_OSERR;
1039
free(direntries[i]);
775
1040
goto fallback;
776
1041
}
777
1042
ret = set_cloexec_flag(pipefd[1]);
778
1043
if(ret < 0){
779
perror("set_cloexec_flag");
780
exitstatus = EXIT_FAILURE;
1044
error(0, errno, "set_cloexec_flag");
1045
close(pipefd[0]);
1046
close(pipefd[1]);
1047
exitstatus = EX_OSERR;
1048
free(direntries[i]);
781
1049
goto fallback;
782
1050
}
1051
#endif /* not O_CLOEXEC */
783
1052
/* Block SIGCHLD until process is safely in process list */
784
ret = sigprocmask (SIG_BLOCK, &sigchld_action.sa_mask, NULL);
1053
ret = (int)TEMP_FAILURE_RETRY(sigprocmask(SIG_BLOCK,
1054
&sigchld_action.sa_mask,
1055
NULL));
785
1056
if(ret < 0){
786
perror("sigprocmask");
787
exitstatus = EXIT_FAILURE;
1057
error(0, errno, "sigprocmask");
1058
exitstatus = EX_OSERR;
1059
free(direntries[i]);
788
1060
goto fallback;
789
1061
}
790
1062
/* Starting a new process to be watched */
791
pid_t pid = fork();
1063
pid_t pid;
1064
do {
1065
pid = fork();
1066
} while(pid == -1 and errno == EINTR);
792
1067
if(pid == -1){
793
perror("fork");
794
exitstatus = EXIT_FAILURE;
1068
error(0, errno, "fork");
1069
TEMP_FAILURE_RETRY(sigprocmask(SIG_UNBLOCK,
1070
&sigchld_action.sa_mask, NULL));
1071
close(pipefd[0]);
1072
close(pipefd[1]);
1073
exitstatus = EX_OSERR;
1074
free(direntries[i]);
795
1075
goto fallback;
796
1076
}
797
1077
if(pid == 0){
798
1078
/* this is the child process */
799
1079
ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);
800
1080
if(ret < 0){
801
perror("sigaction");
802
_exit(EXIT_FAILURE);
1081
error(0, errno, "sigaction");
1082
_exit(EX_OSERR);
803
1083
}
804
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
1084
ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
805
1085
if(ret < 0){
806
perror("sigprocmask");
807
_exit(EXIT_FAILURE);
1086
error(0, errno, "sigprocmask");
1087
_exit(EX_OSERR);
808
1088
}
809
1089
810
1090
ret = dup2(pipefd[1], STDOUT_FILENO); /* replace our stdout */
811
1091
if(ret == -1){
812
perror("dup2");
813
_exit(EXIT_FAILURE);
1092
error(0, errno, "dup2");
1093
_exit(EX_OSERR);
814
1094
}
815
1095
816
if(dirfd(dir) < 0){
817
/* If dir has no file descriptor, we could not set FD_CLOEXEC
818
above and must now close it manually here. */
819
closedir(dir);
820
}
821
if(p->environ[0] == NULL){
822
if(execv(filename, p->argv) < 0){
823
perror("execv");
824
_exit(EXIT_FAILURE);
825
}
826
} else {
827
if(execve(filename, p->argv, p->environ) < 0){
828
perror("execve");
829
_exit(EXIT_FAILURE);
830
}
1096
if(fexecve(plugin_fd, p->argv,
1097
(p->environ[0] != NULL) ? p->environ : environ) < 0){
1098
error(0, errno, "fexecve for %s/%s",
1099
plugindir != NULL ? plugindir : PDIR,
1100
direntries[i]->d_name);
1101
_exit(EX_OSERR);
831
1102
}
832
1103
/* no return */
833
1104
}
834
1105
/* Parent process */
835
1106
close(pipefd[1]); /* Close unused write end of pipe */
836
free(filename);
837
plugin *new_plugin = getplugin(dirst->d_name);
838
if (new_plugin == NULL){
839
perror("getplugin");
840
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
1107
close(plugin_fd);
1108
plugin *new_plugin = getplugin(direntries[i]->d_name);
1109
if(new_plugin == NULL){
1110
error(0, errno, "getplugin");
1111
ret = (int)(TEMP_FAILURE_RETRY
1112
(sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask,
1113
NULL)));
841
1114
if(ret < 0){
842
perror("sigprocmask");
1115
error(0, errno, "sigprocmask");
843
1116
}
844
exitstatus = EXIT_FAILURE;
1117
exitstatus = EX_OSERR;
1118
free(direntries[i]);
845
1119
goto fallback;
846
1120
}
1121
free(direntries[i]);
847
1122
848
1123
new_plugin->pid = pid;
849
1124
new_plugin->fd = pipefd[0];
850
1125
1126
if(debug){
1127
fprintf(stderr, "Plugin %s started (PID %" PRIdMAX ")\n",
1128
new_plugin->name, (intmax_t) (new_plugin->pid));
1129
}
1130
851
1131
/* Unblock SIGCHLD so signal handler can be run if this process
852
1132
has already completed */
853
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
1133
ret = (int)TEMP_FAILURE_RETRY(sigprocmask(SIG_UNBLOCK,
1134
&sigchld_action.sa_mask,
1135
NULL));
854
1136
if(ret < 0){
855
perror("sigprocmask");
856
exitstatus = EXIT_FAILURE;
1137
error(0, errno, "sigprocmask");
1138
exitstatus = EX_OSERR;
857
1139
goto fallback;
858
1140
}
859
1141
860
1142
FD_SET(new_plugin->fd, &rfds_all);
861
1143
862
if (maxfd < new_plugin->fd){
1144
if(maxfd < new_plugin->fd){
863
1145
maxfd = new_plugin->fd;
864
1146
}
865
866
1147
}
867
1148
868
closedir(dir);
869
dir = NULL;
870
1149
free(direntries);
1150
direntries = NULL;
1151
close(dir_fd);
1152
dir_fd = -1;
1153
free_plugin(getplugin(NULL));
1154
871
1155
for(plugin *p = plugin_list; p != NULL; p = p->next){
872
1156
if(p->pid != 0){
873
1157
break;
878
1162
free_plugin_list();
879
1163
}
880
1164
}
881
1165
882
1166
/* Main loop while running plugins exist */
883
1167
while(plugin_list){
884
1168
fd_set rfds = rfds_all;
885
1169
int select_ret = select(maxfd+1, &rfds, NULL, NULL, NULL);
886
if (select_ret == -1){
887
perror("select");
888
exitstatus = EXIT_FAILURE;
1170
if(select_ret == -1 and errno != EINTR){
1171
error(0, errno, "select");
1172
exitstatus = EX_OSERR;
889
1173
goto fallback;
890
1174
}
891
1175
/* OK, now either a process completed, or something can be read
892
1176
from one of them */
893
for(plugin *proc = plugin_list; proc != NULL; proc = proc->next){
1177
for(plugin *proc = plugin_list; proc != NULL;){
894
1178
/* Is this process completely done? */
895
if(proc->eof and proc->completed){
1179
if(proc->completed and proc->eof){
896
1180
/* Only accept the plugin output if it exited cleanly */
897
1181
if(not WIFEXITED(proc->status)
898
1182
or WEXITSTATUS(proc->status) != 0){
899
1183
/* Bad exit by plugin */
900
1184
901
1185
if(debug){
902
1186
if(WIFEXITED(proc->status)){
903
fprintf(stderr, "Plugin %u exited with status %d\n",
904
(unsigned int) (proc->pid),
1187
fprintf(stderr, "Plugin %s [%" PRIdMAX "] exited with"
1188
" status %d\n", proc->name,
1189
(intmax_t) (proc->pid),
905
1190
WEXITSTATUS(proc->status));
906
} else if(WIFSIGNALED(proc->status)) {
907
fprintf(stderr, "Plugin %u killed by signal %d\n",
908
(unsigned int) (proc->pid),
909
WTERMSIG(proc->status));
910
} else if(WCOREDUMP(proc->status)){
911
fprintf(stderr, "Plugin %d dumped core\n",
912
(unsigned int) (proc->pid));
1191
} else if(WIFSIGNALED(proc->status)){
1192
fprintf(stderr, "Plugin %s [%" PRIdMAX "] killed by"
1193
" signal %d: %s\n", proc->name,
1194
(intmax_t) (proc->pid),
1195
WTERMSIG(proc->status),
1196
strsignal(WTERMSIG(proc->status)));
913
1197
}
914
1198
}
915
1199
916
1200
/* Remove the plugin */
917
1201
FD_CLR(proc->fd, &rfds_all);
918
1202
919
1203
/* Block signal while modifying process_list */
920
ret = sigprocmask(SIG_BLOCK, &sigchld_action.sa_mask, NULL);
1204
ret = (int)TEMP_FAILURE_RETRY(sigprocmask
1205
(SIG_BLOCK,
1206
&sigchld_action.sa_mask,
1207
NULL));
921
1208
if(ret < 0){
922
perror("sigprocmask");
923
exitstatus = EXIT_FAILURE;
1209
error(0, errno, "sigprocmask");
1210
exitstatus = EX_OSERR;
924
1211
goto fallback;
925
1212
}
1213
1214
plugin *next_plugin = proc->next;
926
1215
free_plugin(proc);
1216
proc = next_plugin;
1217
927
1218
/* We are done modifying process list, so unblock signal */
928
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask,
929
NULL);
1219
ret = (int)(TEMP_FAILURE_RETRY
1220
(sigprocmask(SIG_UNBLOCK,
1221
&sigchld_action.sa_mask, NULL)));
930
1222
if(ret < 0){
931
perror("sigprocmask");
932
exitstatus = EXIT_FAILURE;
1223
error(0, errno, "sigprocmask");
1224
exitstatus = EX_OSERR;
933
1225
goto fallback;
934
1226
}
935
1227
936
1228
if(plugin_list == NULL){
937
1229
break;
938
1230
}
1231
939
1232
continue;
940
1233
}
941
1234
942
1235
/* This process exited nicely, so print its buffer */
943
1236
944
1237
bool bret = print_out_password(proc->buffer,
945
1238
proc->buffer_length);
946
1239
if(not bret){
947
perror("print_out_password");
948
exitstatus = EXIT_FAILURE;
1240
error(0, errno, "print_out_password");
1241
exitstatus = EX_IOERR;
949
1242
}
950
1243
goto fallback;
951
1244
}
953
1246
/* This process has not completed. Does it have any output? */
954
1247
if(proc->eof or not FD_ISSET(proc->fd, &rfds)){
955
1248
/* This process had nothing to say at this time */
1249
proc = proc->next;
956
1250
continue;
957
1251
}
958
1252
/* Before reading, make the process' data buffer large enough */
959
1253
if(proc->buffer_length + BUFFER_SIZE > proc->buffer_size){
960
proc->buffer = realloc(proc->buffer, proc->buffer_size
961
+ (size_t) BUFFER_SIZE);
962
if (proc->buffer == NULL){
963
perror("malloc");
964
exitstatus = EXIT_FAILURE;
1254
char *new_buffer = realloc(proc->buffer, proc->buffer_size
1255
+ (size_t) BUFFER_SIZE);
1256
if(new_buffer == NULL){
1257
error(0, errno, "malloc");
1258
exitstatus = EX_OSERR;
965
1259
goto fallback;
966
1260
}
1261
proc->buffer = new_buffer;
967
1262
proc->buffer_size += BUFFER_SIZE;
968
1263
}
969
1264
/* Read from the process */
970
ret = read(proc->fd, proc->buffer + proc->buffer_length,
971
BUFFER_SIZE);
972
if(ret < 0){
1265
sret = TEMP_FAILURE_RETRY(read(proc->fd,
1266
proc->buffer
1267
+ proc->buffer_length,
1268
BUFFER_SIZE));
1269
if(sret < 0){
973
1270
/* Read error from this process; ignore the error */
1271
proc = proc->next;
974
1272
continue;
975
1273
}
976
if(ret == 0){
1274
if(sret == 0){
977
1275
/* got EOF */
978
1276
proc->eof = true;
979
1277
} else {
980
proc->buffer_length += (size_t) ret;
1278
proc->buffer_length += (size_t) sret;
981
1279
}
982
1280
}
983
1281
}
984
985
1282
1283
986
1284
fallback:
987
1285
988
if(plugin_list == NULL or exitstatus != EXIT_SUCCESS){
1286
if(plugin_list == NULL or (exitstatus != EXIT_SUCCESS
1287
and exitstatus != EX_OK)){
989
1288
/* Fallback if all plugins failed, none are found or an error
990
1289
occured */
991
1290
bool bret;
992
1291
fprintf(stderr, "Going to fallback mode using getpass(3)\n");
993
1292
char *passwordbuffer = getpass("Password: ");
994
bret = print_out_password(passwordbuffer, strlen(passwordbuffer));
1293
size_t len = strlen(passwordbuffer);
1294
/* Strip trailing newline */
1295
if(len > 0 and passwordbuffer[len-1] == '\n'){
1296
passwordbuffer[len-1] = '\0'; /* not strictly necessary */
1297
len--;
1298
}
1299
bret = print_out_password(passwordbuffer, len);
995
1300
if(not bret){
996
perror("print_out_password");
997
exitstatus = EXIT_FAILURE;
1301
error(0, errno, "print_out_password");
1302
exitstatus = EX_IOERR;
998
1303
}
999
1304
}
1000
1305
1001
1306
/* Restore old signal handler */
1002
1307
ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);
1003
1308
if(ret == -1){
1004
perror("sigaction");
1005
exitstatus = EXIT_FAILURE;
1309
error(0, errno, "sigaction");
1310
exitstatus = EX_OSERR;
1006
1311
}
1007
1312
1008
1313
if(custom_argv != NULL){
1009
1314
for(char **arg = custom_argv+1; *arg != NULL; arg++){
1010
1315
free(*arg);
1012
1317
free(custom_argv);
1013
1318
}
1014
1319
1015
if(dir != NULL){
1016
closedir(dir);
1320
free(direntries);
1321
1322
if(dir_fd != -1){
1323
close(dir_fd);
1017
1324
}
1018
1325
1019
/* Free the process list and kill the processes */
1326
/* Kill the processes */
1020
1327
for(plugin *p = plugin_list; p != NULL; p = p->next){
1021
1328
if(p->pid != 0){
1022
1329
close(p->fd);
1023
1330
ret = kill(p->pid, SIGTERM);
1024
1331
if(ret == -1 and errno != ESRCH){
1025
1332
/* Set-uid proccesses might not get closed */
1026
perror("kill");
1333
error(0, errno, "kill");
1027
1334
}
1028
1335
}
1029
1336
}
1030
1337
1031
1338
/* Wait for any remaining child processes to terminate */
1032
do{
1339
do {
1033
1340
ret = wait(NULL);
1034
1341
} while(ret >= 0);
1035
1342
if(errno != ECHILD){
1036
perror("wait");
1343
error(0, errno, "wait");
1037
1344
}
1038
1345
1039
1346
free_plugin_list();
1040
1347
1041
1348
free(plugindir);
1349
free(pluginhelperdir);
1042
1350
free(argfile);
1043
1351
1044
1352
return exitstatus;
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0