3
3
 * Mandos plugin runner - Run Mandos plugins
 
5
 
 * Copyright © 2008-2013 Teddy Hogeborn
 
6
 
 * Copyright © 2008-2013 Björn Påhlsson
 
 
5
 * Copyright © 2008,2009 Teddy Hogeborn
 
 
6
 * Copyright © 2008,2009 Björn Påhlsson
 
8
8
 * This program is free software: you can redistribute it and/or
 
9
9
 * modify it under the terms of the GNU General Public License as
 
 
19
19
 * along with this program.  If not, see
 
20
20
 * <http://www.gnu.org/licenses/>.
 
22
 
 * Contact the authors at <mandos@recompile.se>.
 
 
22
 * Contact the authors at <mandos@fukt.bsnet.se>.
 
25
25
#define _GNU_SOURCE             /* TEMP_FAILURE_RETRY(), getline(),
 
26
26
                                   asprintf(), O_CLOEXEC */
 
27
27
#include <stddef.h>             /* size_t, NULL */
 
28
 
#include <stdlib.h>             /* malloc(), exit(), EXIT_SUCCESS,
 
 
28
#include <stdlib.h>             /* malloc(), exit(), EXIT_FAILURE,
 
 
29
                                   EXIT_SUCCESS, realloc() */
 
30
30
#include <stdbool.h>            /* bool, true, false */
 
31
 
#include <stdio.h>              /* fileno(), fprintf(),
 
 
31
#include <stdio.h>              /* perror, fileno(), fprintf(),
 
32
32
                                   stderr, STDOUT_FILENO */
 
33
33
#include <sys/types.h>          /* DIR, fdopendir(), stat(), struct
 
34
34
                                   stat, waitpid(), WIFEXITED(),
 
 
54
54
#include <fcntl.h>              /* fcntl(), F_GETFD, F_SETFD,
 
56
56
#include <string.h>             /* strsep, strlen(), asprintf(),
 
57
 
                                   strsignal(), strcmp(), strncmp() */
 
58
58
#include <errno.h>              /* errno */
 
59
59
#include <argp.h>               /* struct argp_option, struct
 
60
60
                                   argp_state, struct argp,
 
 
69
69
#include <errno.h>              /* errno, EBADF */
 
70
70
#include <inttypes.h>           /* intmax_t, PRIdMAX, strtoimax() */
 
71
 
#include <sysexits.h>           /* EX_OSERR, EX_USAGE, EX_IOERR,
 
72
 
                                   EX_CONFIG, EX_UNAVAILABLE, EX_OK */
 
73
 
#include <errno.h>              /* errno */
 
74
 
#include <error.h>              /* error() */
 
 
71
#include <sysexits.h>           /* EX_OSERR, EX_USAGE */
 
76
73
#define BUFFER_SIZE 256
 
 
79
76
#define AFILE "/conf/conf.d/mandos/plugin-runner.conf"
 
81
78
const char *argp_program_version = "plugin-runner " VERSION;
 
82
 
const char *argp_program_bug_address = "<mandos@recompile.se>";
 
 
79
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
 
84
81
typedef struct plugin{
 
85
82
  char *name;                   /* can be NULL or any plugin name */
 
 
106
103
/* Gets an existing plugin based on name,
 
107
104
   or if none is found, creates a new one */
 
108
 
__attribute__((warn_unused_result))
 
109
105
static plugin *getplugin(char *name){
 
110
106
  /* Check for existing plugin with that name */
 
111
107
  for(plugin *p = plugin_list; p != NULL; p = p->next){
 
 
174
170
/* Helper function for add_argument and add_environment */
 
175
 
__attribute__((nonnull, warn_unused_result))
 
176
171
static bool add_to_char_array(const char *new, char ***array,
 
178
173
  /* Resize the pointed-to array to hold one more pointer */
 
179
 
  char **new_array = NULL;
 
181
 
    new_array = realloc(*array, sizeof(char *)
 
182
 
                        * (size_t) ((*len) + 2));
 
183
 
  } while(new_array == NULL and errno == EINTR);
 
 
175
    *array = realloc(*array, sizeof(char *)
 
 
176
                     * (size_t) ((*len) + 2));
 
 
177
  } while(*array == NULL and errno == EINTR);
 
184
178
  /* Malloc check */
 
185
 
  if(new_array == NULL){
 
189
182
  /* Make a copy of the new string */
 
 
214
206
/* Add to a plugin's environment */
 
215
 
__attribute__((nonnull(2), warn_unused_result))
 
216
207
static bool add_environment(plugin *p, const char *def, bool replace){
 
 
220
211
  /* namelen = length of name of environment variable */
 
221
212
  size_t namelen = (size_t)(strchrnul(def, '=') - def);
 
222
213
  /* Search for this environment variable */
 
223
 
  for(char **envdef = p->environ; *envdef != NULL; envdef++){
 
224
 
    if(strncmp(*envdef, def, namelen + 1) == 0){
 
 
214
  for(char **e = p->environ; *e != NULL; e++){
 
 
215
    if(strncmp(*e, def, namelen + 1) == 0){
 
225
216
      /* It already exists */
 
229
 
          new_envdef = realloc(*envdef, strlen(def) + 1);
 
230
 
        } while(new_envdef == NULL and errno == EINTR);
 
231
 
        if(new_envdef == NULL){
 
 
220
          new = realloc(*e, strlen(def) + 1);
 
 
221
        } while(new == NULL and errno == EINTR);
 
234
 
        *envdef = new_envdef;
 
235
 
        strcpy(*envdef, def);
 
 
245
236
 * Descriptor Flags".
 
246
237
 | [[info:libc:Descriptor%20Flags][File Descriptor Flags]] |
 
248
 
__attribute__((warn_unused_result))
 
249
239
static int set_cloexec_flag(int fd){
 
250
240
  int ret = (int)TEMP_FAILURE_RETRY(fcntl(fd, F_GETFD, 0));
 
251
241
  /* If reading the flags failed, return error indication now. */
 
 
295
285
/* Prints out a password to stdout */
 
296
 
__attribute__((nonnull, warn_unused_result))
 
297
286
static bool print_out_password(const char *buffer, size_t length){
 
299
288
  for(size_t written = 0; written < length; written += (size_t)ret){
 
 
368
356
  sigemptyset(&sigchld_action.sa_mask);
 
369
357
  ret = sigaddset(&sigchld_action.sa_mask, SIGCHLD);
 
371
 
    error(0, errno, "sigaddset");
 
372
 
    exitstatus = EX_OSERR;
 
 
360
    exitstatus = EXIT_FAILURE;
 
375
363
  ret = sigaction(SIGCHLD, &sigchld_action, &old_sigchld_action);
 
377
 
    error(0, errno, "sigaction");
 
378
 
    exitstatus = EX_OSERR;
 
 
366
    exitstatus = EXIT_FAILURE;
 
 
445
431
    case 'G':                   /* --global-env */
 
446
 
      if(add_environment(getplugin(NULL), arg, true)){
 
 
432
      add_environment(getplugin(NULL), arg, true);
 
450
434
    case 'o':                   /* --options-for */
 
 
489
 
        if(add_environment(getplugin(arg), envdef, true)){
 
 
472
        add_environment(getplugin(arg), envdef, true);
 
494
475
    case 'd':                   /* --disable */
 
 
505
485
        plugin *p = getplugin(arg);
 
507
487
          p->disabled = false;
 
512
491
    case 128:                   /* --plugin-dir */
 
514
493
      plugindir = strdup(arg);
 
515
 
      if(plugindir != NULL){
 
519
495
    case 129:                   /* --config-file */
 
520
496
      /* This is already done by parse_opt_config_file() */
 
522
498
    case 130:                   /* --userid */
 
523
 
      tmp_id = strtoimax(arg, &tmp, 10);
 
 
499
      tmpmax = strtoimax(arg, &tmp, 10);
 
524
500
      if(errno != 0 or tmp == arg or *tmp != '\0'
 
525
 
         or tmp_id != (uid_t)tmp_id){
 
 
501
         or tmpmax != (uid_t)tmpmax){
 
526
502
        argp_error(state, "Bad user ID number: \"%s\", using %"
 
527
503
                   PRIdMAX, arg, (intmax_t)uid);
 
533
508
    case 131:                   /* --groupid */
 
534
 
      tmp_id = strtoimax(arg, &tmp, 10);
 
 
509
      tmpmax = strtoimax(arg, &tmp, 10);
 
535
510
      if(errno != 0 or tmp == arg or *tmp != '\0'
 
536
 
         or tmp_id != (gid_t)tmp_id){
 
 
511
         or tmpmax != (gid_t)tmpmax){
 
537
512
        argp_error(state, "Bad group ID number: \"%s\", using %"
 
538
513
                   PRIdMAX, arg, (intmax_t)gid);
 
544
518
    case 132:                   /* --debug */
 
 
655
626
    custom_argv = malloc(sizeof(char*) * 2);
 
656
627
    if(custom_argv == NULL){
 
657
 
      error(0, errno, "malloc");
 
658
 
      exitstatus = EX_OSERR;
 
 
629
      exitstatus = EXIT_FAILURE;
 
661
632
    custom_argv[0] = argv[0];
 
 
678
649
        new_arg = strdup(p);
 
679
650
        if(new_arg == NULL){
 
680
 
          error(0, errno, "strdup");
 
681
 
          exitstatus = EX_OSERR;
 
 
652
          exitstatus = EXIT_FAILURE;
 
686
657
        custom_argc += 1;
 
688
 
          char **new_argv = realloc(custom_argv, sizeof(char *)
 
691
 
          if(new_argv == NULL){
 
692
 
            error(0, errno, "realloc");
 
693
 
            exitstatus = EX_OSERR;
 
698
 
            custom_argv = new_argv;
 
 
658
        custom_argv = realloc(custom_argv, sizeof(char *)
 
 
659
                              * ((unsigned int) custom_argc + 1));
 
 
660
        if(custom_argv == NULL){
 
 
662
          exitstatus = EXIT_FAILURE;
 
701
666
        custom_argv[custom_argc-1] = new_arg;
 
702
667
        custom_argv[custom_argc] = NULL;
 
 
715
680
    /* Check for harmful errors and go to fallback. Other errors might
 
716
681
       not affect opening plugins */
 
717
682
    if(errno == EMFILE or errno == ENFILE or errno == ENOMEM){
 
718
 
      error(0, errno, "fopen");
 
719
 
      exitstatus = EX_OSERR;
 
 
684
      exitstatus = EXIT_FAILURE;
 
 
778
 
    /* Work around Debian bug #633582:
 
779
 
       <http://bugs.debian.org/633582> */
 
780
 
    int plugindir_fd = open(/* plugindir or */ PDIR, O_RDONLY);
 
781
 
    if(plugindir_fd == -1){
 
782
 
      error(0, errno, "open");
 
784
 
      ret = (int)TEMP_FAILURE_RETRY(fstat(plugindir_fd, &st));
 
786
 
        error(0, errno, "fstat");
 
788
 
        if(S_ISDIR(st.st_mode) and st.st_uid == 0 and st.st_gid == 0){
 
789
 
          ret = fchown(plugindir_fd, uid, gid);
 
791
 
            error(0, errno, "fchown");
 
795
 
      TEMP_FAILURE_RETRY(close(plugindir_fd));
 
799
 
  /* Lower permissions */
 
 
742
  /* Strip permissions down to nobody */
 
802
 
    error(0, errno, "setgid");
 
804
747
  ret = setuid(uid);
 
806
 
    error(0, errno, "setuid");
 
809
752
  /* Open plugin directory with close_on_exec flag */
 
 
829
772
    if(dir_fd == -1){
 
830
 
      error(0, errno, "Could not open plugin dir");
 
831
 
      exitstatus = EX_UNAVAILABLE;
 
 
773
      perror("Could not open plugin dir");
 
 
774
      exitstatus = EXIT_FAILURE;
 
 
836
779
  /* Set the FD_CLOEXEC flag on the directory */
 
837
780
    ret = set_cloexec_flag(dir_fd);
 
839
 
      error(0, errno, "set_cloexec_flag");
 
 
782
      perror("set_cloexec_flag");
 
840
783
      TEMP_FAILURE_RETRY(close(dir_fd));
 
841
 
      exitstatus = EX_OSERR;
 
 
784
      exitstatus = EXIT_FAILURE;
 
844
787
#endif  /* O_CLOEXEC */
 
846
789
    dir = fdopendir(dir_fd);
 
848
 
      error(0, errno, "Could not open plugin dir");
 
 
791
      perror("Could not open plugin dir");
 
849
792
      TEMP_FAILURE_RETRY(close(dir_fd));
 
850
 
      exitstatus = EX_OSERR;
 
 
793
      exitstatus = EXIT_FAILURE;
 
 
877
820
      bool bad_name = false;
 
879
 
      const char * const bad_prefixes[] = { ".", "#", NULL };
 
 
822
      const char const *bad_prefixes[] = { ".", "#", NULL };
 
881
 
      const char * const bad_suffixes[] = { "~", "#", ".dpkg-new",
 
 
824
      const char const *bad_suffixes[] = { "~", "#", ".dpkg-new",
 
884
827
                                           ".dpkg-divert", NULL };
 
886
 
#pragma GCC diagnostic push
 
887
 
#pragma GCC diagnostic ignored "-Wcast-qual"
 
889
 
      for(const char **pre = (const char **)bad_prefixes;
 
890
 
          *pre != NULL; pre++){
 
892
 
#pragma GCC diagnostic pop
 
 
828
      for(const char **pre = bad_prefixes; *pre != NULL; pre++){
 
894
829
        size_t pre_len = strlen(*pre);
 
895
830
        if((d_name_len >= pre_len)
 
896
831
           and strncmp((dirst->d_name), *pre, pre_len) == 0){
 
 
909
 
#pragma GCC diagnostic push
 
910
 
#pragma GCC diagnostic ignored "-Wcast-qual"
 
912
 
      for(const char **suf = (const char **)bad_suffixes;
 
913
 
          *suf != NULL; suf++){
 
915
 
#pragma GCC diagnostic pop
 
 
843
      for(const char **suf = bad_suffixes; *suf != NULL; suf++){
 
917
844
        size_t suf_len = strlen(*suf);
 
918
845
        if((d_name_len >= suf_len)
 
919
 
           and (strcmp((dirst->d_name) + d_name_len-suf_len, *suf)
 
 
846
           and (strcmp((dirst->d_name)+d_name_len-suf_len, *suf)
 
922
849
            fprintf(stderr, "Ignoring plugin dir entry \"%s\""
 
 
985
912
        for(char **a = g->argv + 1; *a != NULL; a++){
 
986
913
          if(not add_argument(p, *a)){
 
987
 
            error(0, errno, "add_argument");
 
 
914
            perror("add_argument");
 
990
917
        /* Add global environment variables */
 
991
918
        for(char **e = g->environ; *e != NULL; e++){
 
992
919
          if(not add_environment(p, *e, false)){
 
993
 
            error(0, errno, "add_environment");
 
 
920
            perror("add_environment");
 
 
1001
928
    if(p->environ[0] != NULL){
 
1002
929
      for(char **e = environ; *e != NULL; e++){
 
1003
930
        if(not add_environment(p, *e, false)){
 
1004
 
          error(0, errno, "add_environment");
 
 
931
          perror("add_environment");
 
 
1010
937
    ret = (int)TEMP_FAILURE_RETRY(pipe(pipefd));
 
1012
 
      error(0, errno, "pipe");
 
1013
 
      exitstatus = EX_OSERR;
 
 
940
      exitstatus = EXIT_FAILURE;
 
1016
943
    /* Ask OS to automatic close the pipe on exec */
 
1017
944
    ret = set_cloexec_flag(pipefd[0]);
 
1019
 
      error(0, errno, "set_cloexec_flag");
 
1020
 
      exitstatus = EX_OSERR;
 
 
946
      perror("set_cloexec_flag");
 
 
947
      exitstatus = EXIT_FAILURE;
 
1023
950
    ret = set_cloexec_flag(pipefd[1]);
 
1025
 
      error(0, errno, "set_cloexec_flag");
 
1026
 
      exitstatus = EX_OSERR;
 
 
952
      perror("set_cloexec_flag");
 
 
953
      exitstatus = EXIT_FAILURE;
 
1029
956
    /* Block SIGCHLD until process is safely in process list */
 
 
1042
969
    } while(pid == -1 and errno == EINTR);
 
1044
 
      error(0, errno, "fork");
 
1045
 
      exitstatus = EX_OSERR;
 
 
972
      exitstatus = EXIT_FAILURE;
 
1049
976
      /* this is the child process */
 
1050
977
      ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);
 
1052
 
        error(0, errno, "sigaction");
 
1055
982
      ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
 
1057
 
        error(0, errno, "sigprocmask");
 
 
984
        perror("sigprocmask");
 
1061
988
      ret = dup2(pipefd[1], STDOUT_FILENO); /* replace our stdout */
 
1063
 
        error(0, errno, "dup2");
 
1067
994
      if(dirfd(dir) < 0){
 
 
1072
999
      if(p->environ[0] == NULL){
 
1073
1000
        if(execv(filename, p->argv) < 0){
 
1074
 
          error(0, errno, "execv for %s", filename);
 
 
1002
          _exit(EXIT_FAILURE);
 
1078
1005
        if(execve(filename, p->argv, p->environ) < 0){
 
1079
 
          error(0, errno, "execve for %s", filename);
 
 
1007
          _exit(EXIT_FAILURE);
 
1083
1010
      /* no return */
 
 
1088
1015
    free(filename);
 
1089
1016
    plugin *new_plugin = getplugin(dirst->d_name);
 
1090
1017
    if(new_plugin == NULL){
 
1091
 
      error(0, errno, "getplugin");
 
 
1018
      perror("getplugin");
 
1092
1019
      ret = (int)(TEMP_FAILURE_RETRY
 
1093
1020
                  (sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask,
 
1096
 
        error(0, errno, "sigprocmask");
 
 
1023
        perror("sigprocmask");
 
1098
 
      exitstatus = EX_OSERR;
 
 
1025
      exitstatus = EXIT_FAILURE;
 
 
1108
1035
                                              &sigchld_action.sa_mask,
 
1111
 
      error(0, errno, "sigprocmask");
 
1112
 
      exitstatus = EX_OSERR;
 
 
1038
      perror("sigprocmask");
 
 
1039
      exitstatus = EXIT_FAILURE;
 
1116
 
#if defined (__GNUC__) and defined (__GLIBC__)
 
1117
 
#if not __GLIBC_PREREQ(2, 16)
 
1118
 
#pragma GCC diagnostic push
 
1119
 
#pragma GCC diagnostic ignored "-Wsign-conversion"
 
1122
1043
    FD_SET(new_plugin->fd, &rfds_all); /* Spurious warning from
 
1123
 
                                          -Wconversion in GNU libc
 
1125
 
#if defined (__GNUC__) and defined (__GLIBC__)
 
1126
 
#if not __GLIBC_PREREQ(2, 16)
 
1127
 
#pragma GCC diagnostic pop
 
1131
1046
    if(maxfd < new_plugin->fd){
 
1132
1047
      maxfd = new_plugin->fd;
 
 
1153
1068
    fd_set rfds = rfds_all;
 
1154
1069
    int select_ret = select(maxfd+1, &rfds, NULL, NULL, NULL);
 
1155
1070
    if(select_ret == -1 and errno != EINTR){
 
1156
 
      error(0, errno, "select");
 
1157
 
      exitstatus = EX_OSERR;
 
 
1072
      exitstatus = EXIT_FAILURE;
 
1160
1075
    /* OK, now either a process completed, or something can be read
 
 
1188
1103
          /* Remove the plugin */
 
1189
 
#if defined (__GNUC__) and defined (__GLIBC__)
 
1190
 
#if not __GLIBC_PREREQ(2, 16)
 
1191
 
#pragma GCC diagnostic push
 
1192
 
#pragma GCC diagnostic ignored "-Wsign-conversion"
 
1195
1104
          FD_CLR(proc->fd, &rfds_all); /* Spurious warning from
 
1196
 
                                          -Wconversion in GNU libc
 
1198
 
#if defined (__GNUC__) and defined (__GLIBC__)
 
1199
 
#if not __GLIBC_PREREQ(2, 16)
 
1200
 
#pragma GCC diagnostic pop
 
1204
1107
          /* Block signal while modifying process_list */
 
1205
1108
          ret = (int)TEMP_FAILURE_RETRY(sigprocmask
 
 
1221
1124
                      (sigprocmask(SIG_UNBLOCK,
 
1222
1125
                                   &sigchld_action.sa_mask, NULL)));
 
1224
 
            error(0, errno, "sigprocmask");
 
1225
 
            exitstatus = EX_OSERR;
 
 
1127
            perror("sigprocmask");
 
 
1128
            exitstatus = EXIT_FAILURE;
 
 
1238
1141
        bool bret = print_out_password(proc->buffer,
 
1239
1142
                                       proc->buffer_length);
 
1241
 
          error(0, errno, "print_out_password");
 
1242
 
          exitstatus = EX_IOERR;
 
 
1144
          perror("print_out_password");
 
 
1145
          exitstatus = EXIT_FAILURE;
 
1247
1150
      /* This process has not completed.  Does it have any output? */
 
1248
 
#if defined (__GNUC__) and defined (__GLIBC__)
 
1249
 
#if not __GLIBC_PREREQ(2, 16)
 
1250
 
#pragma GCC diagnostic push
 
1251
 
#pragma GCC diagnostic ignored "-Wsign-conversion"
 
1254
1151
      if(proc->eof or not FD_ISSET(proc->fd, &rfds)){ /* Spurious
 
1260
 
#if defined (__GNUC__) and defined (__GLIBC__)
 
1261
 
#if not __GLIBC_PREREQ(2, 16)
 
1262
 
#pragma GCC diagnostic pop
 
1265
1154
        /* This process had nothing to say at this time */
 
1266
1155
        proc = proc->next;
 
1269
1158
      /* Before reading, make the process' data buffer large enough */
 
1270
1159
      if(proc->buffer_length + BUFFER_SIZE > proc->buffer_size){
 
1271
 
        char *new_buffer = realloc(proc->buffer, proc->buffer_size
 
1272
 
                                   + (size_t) BUFFER_SIZE);
 
1273
 
        if(new_buffer == NULL){
 
1274
 
          error(0, errno, "malloc");
 
1275
 
          exitstatus = EX_OSERR;
 
 
1160
        proc->buffer = realloc(proc->buffer, proc->buffer_size
 
 
1161
                               + (size_t) BUFFER_SIZE);
 
 
1162
        if(proc->buffer == NULL){
 
 
1164
          exitstatus = EXIT_FAILURE;
 
1278
 
        proc->buffer = new_buffer;
 
1279
1167
        proc->buffer_size += BUFFER_SIZE;
 
1281
1169
      /* Read from the process */
 
 
1303
 
  if(plugin_list == NULL or (exitstatus != EXIT_SUCCESS
 
1304
 
                             and exitstatus != EX_OK)){
 
 
1191
  if(plugin_list == NULL or exitstatus != EXIT_SUCCESS){
 
1305
1192
    /* Fallback if all plugins failed, none are found or an error
 
 
1316
1203
    bret = print_out_password(passwordbuffer, len);
 
1318
 
      error(0, errno, "print_out_password");
 
1319
 
      exitstatus = EX_IOERR;
 
 
1205
      perror("print_out_password");
 
 
1206
      exitstatus = EXIT_FAILURE;
 
1323
1210
  /* Restore old signal handler */
 
1324
1211
  ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);
 
1326
 
    error(0, errno, "sigaction");
 
1327
 
    exitstatus = EX_OSERR;
 
 
1213
    perror("sigaction");
 
 
1214
    exitstatus = EXIT_FAILURE;
 
1330
1217
  if(custom_argv != NULL){