38
38
#include <sys/select.h> /* fd_set, select(), FD_ZERO(),
39
39
FD_SET(), FD_ISSET(), FD_CLR */
40
40
#include <sys/wait.h> /* wait(), waitpid(), WIFEXITED(),
41
WEXITSTATUS(), WTERMSIG(),
42
43
#include <sys/stat.h> /* struct stat, stat(), S_ISREG() */
43
44
#include <iso646.h> /* and, or, not */
44
45
#include <dirent.h> /* DIR, struct dirent, opendir(),
53
54
#include <fcntl.h> /* fcntl(), F_GETFD, F_SETFD,
55
#include <string.h> /* strsep, strlen(), asprintf() */
56
#include <string.h> /* strsep, strlen(), asprintf(),
56
58
#include <errno.h> /* errno */
57
59
#include <argp.h> /* struct argp_option, struct
58
60
argp_state, struct argp,
62
64
#include <signal.h> /* struct sigaction, sigemptyset(),
63
65
sigaddset(), sigaction(),
64
66
sigprocmask(), SIG_BLOCK, SIGCHLD,
65
SIG_UNBLOCK, kill() */
67
SIG_UNBLOCK, kill(), sig_atomic_t
66
69
#include <errno.h> /* errno, EBADF */
70
#include <inttypes.h> /* intmax_t, PRIdMAX, strtoimax() */
68
72
#define BUFFER_SIZE 256
99
103
or if none is found, creates a new one */
100
104
static plugin *getplugin(char *name){
101
105
/* Check for exiting plugin with that name */
102
for (plugin *p = plugin_list; p != NULL; p = p->next){
103
if ((p->name == name)
104
or (p->name and name and (strcmp(p->name, name) == 0))){
106
for(plugin *p = plugin_list; p != NULL; p = p->next){
108
or (p->name and name and (strcmp(p->name, name) == 0))){
108
112
/* Create a new plugin */
109
113
plugin *new_plugin = malloc(sizeof(plugin));
110
if (new_plugin == NULL){
114
if(new_plugin == NULL){
113
117
char *copy_name = NULL;
114
118
if(name != NULL){
115
119
copy_name = strdup(name);
116
120
if(copy_name == NULL){
121
*new_plugin = (plugin) { .name = copy_name,
124
.next = plugin_list };
126
*new_plugin = (plugin){ .name = copy_name,
129
.next = plugin_list };
126
131
new_plugin->argv = malloc(sizeof(char *) * 2);
127
if (new_plugin->argv == NULL){
132
if(new_plugin->argv == NULL){
129
134
free(new_plugin);
375
error_t parse_opt (int key, char *arg, __attribute__((unused))
376
struct argp_state *state) {
383
error_t parse_opt(int key, char *arg, __attribute__((unused))
384
struct argp_state *state){
378
387
case 'g': /* --global-options */
381
while((p = strsep(&arg, ",")) != NULL){
390
while((plugin_option = strsep(&arg, ",")) != NULL){
391
if(plugin_option[0] == '\0'){
385
if(not add_argument(getplugin(NULL), p)){
394
if(not add_argument(getplugin(NULL), plugin_option)){
386
395
perror("add_argument");
387
396
return ARGP_ERR_UNKNOWN;
400
409
case 'o': /* --options-for */
402
char *p_name = strsep(&arg, ":");
403
if(p_name[0] == '\0' or arg == NULL){
406
char *opt = strsep(&arg, ":");
407
if(opt[0] == '\0' or opt == NULL){
411
while((p = strsep(&opt, ",")) != NULL){
415
if(not add_argument(getplugin(p_name), p)){
411
char *plugin_name = strsep(&arg, ":");
412
if(plugin_name[0] == '\0'){
416
while((plugin_option = strsep(&arg, ",")) != NULL){
417
if(not add_argument(getplugin(plugin_name), plugin_option)){
416
418
perror("add_argument");
417
419
return ARGP_ERR_UNKNOWN;
457
459
plugindir = strdup(arg);
458
460
if(plugindir == NULL){
459
461
perror("strdup");
462
464
case 129: /* --config-file */
463
465
/* This is already done by parse_opt_config_file() */
465
467
case 130: /* --userid */
466
/* In the GNU C library, uid_t is always unsigned int */
467
ret = sscanf(arg, "%ud", &uid);
469
fprintf(stderr, "Bad user ID number: \"%s\", using %ud\n",
469
tmpmax = strtoimax(arg, &tmp, 10);
470
if(errno != 0 or tmp == arg or *tmp != '\0'
471
or tmpmax != (uid_t)tmpmax){
472
fprintf(stderr, "Bad user ID number: \"%s\", using %"
473
PRIdMAX "\n", arg, (intmax_t)uid);
473
478
case 131: /* --groupid */
474
/* In the GNU C library, gid_t is always unsigned int */
475
ret = sscanf(arg, "%ud", &gid);
477
fprintf(stderr, "Bad group ID number: \"%s\", using %ud\n",
480
tmpmax = strtoimax(arg, &tmp, 10);
481
if(errno != 0 or tmp == arg or *tmp != '\0'
482
or tmpmax != (gid_t)tmpmax){
483
fprintf(stderr, "Bad group ID number: \"%s\", using %"
484
PRIdMAX "\n", arg, (intmax_t)gid);
481
489
case 132: /* --debug */
504
512
/* This option parser is the same as parse_opt() above, except it
505
513
ignores everything but the --config-file option. */
506
error_t parse_opt_config_file (int key, char *arg,
507
__attribute__((unused))
508
struct argp_state *state) {
514
error_t parse_opt_config_file(int key, char *arg,
515
__attribute__((unused))
516
struct argp_state *state){
510
518
case 'g': /* --global-options */
511
519
case 'G': /* --global-env */
512
520
case 'o': /* --options-for */
540
548
.doc = "Mandos plugin runner -- Run plugins" };
542
/* Parse using the parse_opt_config_file in order to get the custom
550
/* Parse using parse_opt_config_file() in order to get the custom
543
551
config file location, if any. */
544
ret = argp_parse (&argp, argc, argv, ARGP_IN_ORDER, 0, NULL);
545
if (ret == ARGP_ERR_UNKNOWN){
552
ret = argp_parse(&argp, argc, argv, ARGP_IN_ORDER, 0, NULL);
553
if(ret == ARGP_ERR_UNKNOWN){
546
554
fprintf(stderr, "Unknown error while parsing arguments\n");
547
555
exitstatus = EXIT_FAILURE;
552
560
argp.parser = parse_opt;
554
562
/* Open the configfile if available */
555
if (argfile == NULL){
556
564
conffp = fopen(AFILE, "r");
558
566
conffp = fopen(argfile, "r");
560
568
if(conffp != NULL){
561
569
char *org_line = NULL;
562
570
char *p, *arg, *new_arg, *line;
564
572
const char whitespace_delims[] = " \r\t\f\v\n";
565
573
const char comment_delim[] = "#";
568
576
custom_argv = malloc(sizeof(char*) * 2);
569
577
if(custom_argv == NULL){
608
616
custom_argv[custom_argc-1] = new_arg;
609
custom_argv[custom_argc] = NULL;
617
custom_argv[custom_argc] = NULL;
614
622
/* Check for harmful errors and go to fallback. Other errors might
615
623
not affect opening plugins */
616
if (errno == EMFILE or errno == ENFILE or errno == ENOMEM){
624
if(errno == EMFILE or errno == ENFILE or errno == ENOMEM){
618
626
exitstatus = EXIT_FAILURE;
622
630
/* If there was any arguments from configuration file,
623
631
pass them to parser as command arguments */
624
632
if(custom_argv != NULL){
625
ret = argp_parse (&argp, custom_argc, custom_argv, ARGP_IN_ORDER,
627
if (ret == ARGP_ERR_UNKNOWN){
633
ret = argp_parse(&argp, custom_argc, custom_argv, ARGP_IN_ORDER,
635
if(ret == ARGP_ERR_UNKNOWN){
628
636
fprintf(stderr, "Unknown error while parsing arguments\n");
629
637
exitstatus = EXIT_FAILURE;
634
642
/* Parse actual command line arguments, to let them override the
636
ret = argp_parse (&argp, argc, argv, ARGP_IN_ORDER, 0, NULL);
637
if (ret == ARGP_ERR_UNKNOWN){
644
ret = argp_parse(&argp, argc, argv, ARGP_IN_ORDER, 0, NULL);
645
if(ret == ARGP_ERR_UNKNOWN){
638
646
fprintf(stderr, "Unknown error while parsing arguments\n");
639
647
exitstatus = EXIT_FAILURE;
647
655
for(char **a = p->argv; *a != NULL; a++){
648
656
fprintf(stderr, "\tArg: %s\n", *a);
650
fprintf(stderr, "...and %u environment variables\n", p->envc);
658
fprintf(stderr, "...and %d environment variables\n", p->envc);
651
659
for(char **a = p->environ; *a != NULL; a++){
652
660
fprintf(stderr, "\t%s\n", *a);
765
773
ret = stat(filename, &st);
772
780
/* Ignore non-executable files */
773
if (not S_ISREG(st.st_mode) or (access(filename, X_OK) != 0)){
781
if(not S_ISREG(st.st_mode) or (access(filename, X_OK) != 0)){
775
783
fprintf(stderr, "Ignoring plugin dir entry \"%s\""
776
784
" with bad type or mode\n", filename);
844
852
/* Block SIGCHLD until process is safely in process list */
845
ret = sigprocmask (SIG_BLOCK, &sigchld_action.sa_mask, NULL);
853
ret = sigprocmask(SIG_BLOCK, &sigchld_action.sa_mask, NULL);
847
855
perror("sigprocmask");
848
856
exitstatus = EXIT_FAILURE;
896
904
close(pipefd[1]); /* Close unused write end of pipe */
898
906
plugin *new_plugin = getplugin(dirst->d_name);
899
if (new_plugin == NULL){
907
if(new_plugin == NULL){
900
908
perror("getplugin");
901
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
909
ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
903
911
perror("sigprocmask");
912
920
/* Unblock SIGCHLD so signal handler can be run if this process
913
921
has already completed */
914
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
922
ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
916
924
perror("sigprocmask");
917
925
exitstatus = EXIT_FAILURE;
921
929
FD_SET(new_plugin->fd, &rfds_all);
923
if (maxfd < new_plugin->fd){
931
if(maxfd < new_plugin->fd){
924
932
maxfd = new_plugin->fd;
938
free_plugin(getplugin(NULL));
931
940
for(plugin *p = plugin_list; p != NULL; p = p->next){
952
961
from one of them */
953
962
for(plugin *proc = plugin_list; proc != NULL;){
954
963
/* Is this process completely done? */
955
if(proc->eof and proc->completed){
964
if(proc->completed and proc->eof){
956
965
/* Only accept the plugin output if it exited cleanly */
957
966
if(not WIFEXITED(proc->status)
958
967
or WEXITSTATUS(proc->status) != 0){
959
968
/* Bad exit by plugin */
962
971
if(WIFEXITED(proc->status)){
963
fprintf(stderr, "Plugin %u exited with status %d\n",
964
(unsigned int) (proc->pid),
972
fprintf(stderr, "Plugin %s [%" PRIdMAX "] exited with"
973
" status %d\n", proc->name,
974
(intmax_t) (proc->pid),
965
975
WEXITSTATUS(proc->status));
966
} else if(WIFSIGNALED(proc->status)) {
967
fprintf(stderr, "Plugin %u killed by signal %d\n",
968
(unsigned int) (proc->pid),
969
WTERMSIG(proc->status));
976
} else if(WIFSIGNALED(proc->status)){
977
fprintf(stderr, "Plugin %s [%" PRIdMAX "] killed by"
978
" signal %d: %s\n", proc->name,
979
(intmax_t) (proc->pid),
980
WTERMSIG(proc->status),
981
strsignal(WTERMSIG(proc->status)));
970
982
} else if(WCOREDUMP(proc->status)){
971
fprintf(stderr, "Plugin %d dumped core\n",
972
(unsigned int) (proc->pid));
983
fprintf(stderr, "Plugin %s [%" PRIdMAX "] dumped"
984
" core\n", proc->name, (intmax_t) (proc->pid));
976
988
/* Remove the plugin */
977
989
FD_CLR(proc->fd, &rfds_all);
979
991
/* Block signal while modifying process_list */
980
992
ret = sigprocmask(SIG_BLOCK, &sigchld_action.sa_mask, NULL);
989
1001
proc = next_plugin;
991
1003
/* We are done modifying process list, so unblock signal */
992
ret = sigprocmask (SIG_UNBLOCK, &sigchld_action.sa_mask,
1004
ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask,
995
1007
perror("sigprocmask");
996
1008
exitstatus = EXIT_FAILURE;
1025
1037
if(proc->buffer_length + BUFFER_SIZE > proc->buffer_size){
1026
1038
proc->buffer = realloc(proc->buffer, proc->buffer_size
1027
1039
+ (size_t) BUFFER_SIZE);
1028
if (proc->buffer == NULL){
1040
if(proc->buffer == NULL){
1029
1041
perror("malloc");
1030
1042
exitstatus = EXIT_FAILURE;