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(),
 
 
28
28
#include <stdlib.h>             /* malloc(), exit(), EXIT_SUCCESS,
 
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,
 
 
70
70
#include <inttypes.h>           /* intmax_t, PRIdMAX, strtoimax() */
 
71
71
#include <sysexits.h>           /* EX_OSERR, EX_USAGE, EX_IOERR,
 
72
72
                                   EX_CONFIG, EX_UNAVAILABLE, EX_OK */
 
73
 
#include <errno.h>              /* errno */
 
74
 
#include <error.h>              /* error() */
 
76
74
#define BUFFER_SIZE 256
 
 
79
77
#define AFILE "/conf/conf.d/mandos/plugin-runner.conf"
 
81
79
const char *argp_program_version = "plugin-runner " VERSION;
 
82
 
const char *argp_program_bug_address = "<mandos@recompile.se>";
 
 
80
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
 
84
82
typedef struct plugin{
 
85
83
  char *name;                   /* can be NULL or any plugin name */
 
 
106
104
/* Gets an existing plugin based on name,
 
107
105
   or if none is found, creates a new one */
 
108
 
__attribute__((warn_unused_result))
 
109
106
static plugin *getplugin(char *name){
 
110
107
  /* Check for existing plugin with that name */
 
111
108
  for(plugin *p = plugin_list; p != NULL; p = p->next){
 
 
174
171
/* Helper function for add_argument and add_environment */
 
175
 
__attribute__((nonnull, warn_unused_result))
 
176
172
static bool add_to_char_array(const char *new, char ***array,
 
178
174
  /* 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);
 
 
176
    *array = realloc(*array, sizeof(char *)
 
 
177
                     * (size_t) ((*len) + 2));
 
 
178
  } while(*array == NULL and errno == EINTR);
 
184
179
  /* Malloc check */
 
185
 
  if(new_array == NULL){
 
189
183
  /* Make a copy of the new string */
 
 
214
207
/* Add to a plugin's environment */
 
215
 
__attribute__((nonnull(2), warn_unused_result))
 
216
208
static bool add_environment(plugin *p, const char *def, bool replace){
 
 
220
212
  /* namelen = length of name of environment variable */
 
221
213
  size_t namelen = (size_t)(strchrnul(def, '=') - def);
 
222
214
  /* Search for this environment variable */
 
223
 
  for(char **envdef = p->environ; *envdef != NULL; envdef++){
 
224
 
    if(strncmp(*envdef, def, namelen + 1) == 0){
 
 
215
  for(char **e = p->environ; *e != NULL; e++){
 
 
216
    if(strncmp(*e, def, namelen + 1) == 0){
 
225
217
      /* It already exists */
 
229
 
          new_envdef = realloc(*envdef, strlen(def) + 1);
 
230
 
        } while(new_envdef == NULL and errno == EINTR);
 
231
 
        if(new_envdef == NULL){
 
 
221
          new = realloc(*e, strlen(def) + 1);
 
 
222
        } while(new == NULL and errno == EINTR);
 
234
 
        *envdef = new_envdef;
 
235
 
        strcpy(*envdef, def);
 
 
245
237
 * Descriptor Flags".
 
246
238
 | [[info:libc:Descriptor%20Flags][File Descriptor Flags]] |
 
248
 
__attribute__((warn_unused_result))
 
249
240
static int set_cloexec_flag(int fd){
 
250
241
  int ret = (int)TEMP_FAILURE_RETRY(fcntl(fd, F_GETFD, 0));
 
251
242
  /* If reading the flags failed, return error indication now. */
 
 
295
286
/* Prints out a password to stdout */
 
296
 
__attribute__((nonnull, warn_unused_result))
 
297
287
static bool print_out_password(const char *buffer, size_t length){
 
299
289
  for(size_t written = 0; written < length; written += (size_t)ret){
 
 
368
357
  sigemptyset(&sigchld_action.sa_mask);
 
369
358
  ret = sigaddset(&sigchld_action.sa_mask, SIGCHLD);
 
371
 
    error(0, errno, "sigaddset");
 
372
361
    exitstatus = EX_OSERR;
 
375
364
  ret = sigaction(SIGCHLD, &sigchld_action, &old_sigchld_action);
 
377
 
    error(0, errno, "sigaction");
 
378
367
    exitstatus = EX_OSERR;
 
 
445
432
    case 'G':                   /* --global-env */
 
446
 
      if(add_environment(getplugin(NULL), arg, true)){
 
 
433
      add_environment(getplugin(NULL), arg, true);
 
450
435
    case 'o':                   /* --options-for */
 
 
489
 
        if(add_environment(getplugin(arg), envdef, true)){
 
 
473
        add_environment(getplugin(arg), envdef, true);
 
494
476
    case 'd':                   /* --disable */
 
 
505
486
        plugin *p = getplugin(arg);
 
507
488
          p->disabled = false;
 
512
492
    case 128:                   /* --plugin-dir */
 
514
494
      plugindir = strdup(arg);
 
515
 
      if(plugindir != NULL){
 
519
496
    case 129:                   /* --config-file */
 
520
497
      /* This is already done by parse_opt_config_file() */
 
522
499
    case 130:                   /* --userid */
 
523
 
      tmp_id = strtoimax(arg, &tmp, 10);
 
 
500
      tmpmax = strtoimax(arg, &tmp, 10);
 
524
501
      if(errno != 0 or tmp == arg or *tmp != '\0'
 
525
 
         or tmp_id != (uid_t)tmp_id){
 
 
502
         or tmpmax != (uid_t)tmpmax){
 
526
503
        argp_error(state, "Bad user ID number: \"%s\", using %"
 
527
504
                   PRIdMAX, arg, (intmax_t)uid);
 
533
509
    case 131:                   /* --groupid */
 
534
 
      tmp_id = strtoimax(arg, &tmp, 10);
 
 
510
      tmpmax = strtoimax(arg, &tmp, 10);
 
535
511
      if(errno != 0 or tmp == arg or *tmp != '\0'
 
536
 
         or tmp_id != (gid_t)tmp_id){
 
 
512
         or tmpmax != (gid_t)tmpmax){
 
537
513
        argp_error(state, "Bad group ID number: \"%s\", using %"
 
538
514
                   PRIdMAX, arg, (intmax_t)gid);
 
544
519
    case 132:                   /* --debug */
 
 
678
650
        new_arg = strdup(p);
 
679
651
        if(new_arg == NULL){
 
680
 
          error(0, errno, "strdup");
 
681
653
          exitstatus = EX_OSERR;
 
686
658
        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;
 
 
659
        custom_argv = realloc(custom_argv, sizeof(char *)
 
 
660
                              * ((unsigned int) custom_argc + 1));
 
 
661
        if(custom_argv == NULL){
 
 
663
          exitstatus = EX_OSERR;
 
701
667
        custom_argv[custom_argc-1] = new_arg;
 
702
668
        custom_argv[custom_argc] = NULL;
 
 
715
681
    /* Check for harmful errors and go to fallback. Other errors might
 
716
682
       not affect opening plugins */
 
717
683
    if(errno == EMFILE or errno == ENFILE or errno == ENOMEM){
 
718
 
      error(0, errno, "fopen");
 
719
 
      exitstatus = EX_OSERR;
 
 
685
      exitstatus = EX_IOERR;
 
 
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 */
 
 
743
  /* Strip permissions down to nobody */
 
802
 
    error(0, errno, "setgid");
 
804
748
  ret = setuid(uid);
 
806
 
    error(0, errno, "setuid");
 
809
753
  /* Open plugin directory with close_on_exec flag */
 
 
836
780
  /* Set the FD_CLOEXEC flag on the directory */
 
837
781
    ret = set_cloexec_flag(dir_fd);
 
839
 
      error(0, errno, "set_cloexec_flag");
 
 
783
      perror("set_cloexec_flag");
 
840
784
      TEMP_FAILURE_RETRY(close(dir_fd));
 
841
785
      exitstatus = EX_OSERR;
 
 
877
821
      bool bad_name = false;
 
879
 
      const char * const bad_prefixes[] = { ".", "#", NULL };
 
 
823
      const char const *bad_prefixes[] = { ".", "#", NULL };
 
881
 
      const char * const bad_suffixes[] = { "~", "#", ".dpkg-new",
 
 
825
      const char const *bad_suffixes[] = { "~", "#", ".dpkg-new",
 
884
828
                                           ".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
 
 
829
      for(const char **pre = bad_prefixes; *pre != NULL; pre++){
 
894
830
        size_t pre_len = strlen(*pre);
 
895
831
        if((d_name_len >= pre_len)
 
896
832
           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
 
 
844
      for(const char **suf = bad_suffixes; *suf != NULL; suf++){
 
917
845
        size_t suf_len = strlen(*suf);
 
918
846
        if((d_name_len >= suf_len)
 
919
 
           and (strcmp((dirst->d_name) + d_name_len-suf_len, *suf)
 
 
847
           and (strcmp((dirst->d_name)+d_name_len-suf_len, *suf)
 
922
850
            fprintf(stderr, "Ignoring plugin dir entry \"%s\""
 
 
985
913
        for(char **a = g->argv + 1; *a != NULL; a++){
 
986
914
          if(not add_argument(p, *a)){
 
987
 
            error(0, errno, "add_argument");
 
 
915
            perror("add_argument");
 
990
918
        /* Add global environment variables */
 
991
919
        for(char **e = g->environ; *e != NULL; e++){
 
992
920
          if(not add_environment(p, *e, false)){
 
993
 
            error(0, errno, "add_environment");
 
 
921
            perror("add_environment");
 
 
1001
929
    if(p->environ[0] != NULL){
 
1002
930
      for(char **e = environ; *e != NULL; e++){
 
1003
931
        if(not add_environment(p, *e, false)){
 
1004
 
          error(0, errno, "add_environment");
 
 
932
          perror("add_environment");
 
 
1010
938
    ret = (int)TEMP_FAILURE_RETRY(pipe(pipefd));
 
1012
 
      error(0, errno, "pipe");
 
1013
941
      exitstatus = EX_OSERR;
 
1016
944
    /* Ask OS to automatic close the pipe on exec */
 
1017
945
    ret = set_cloexec_flag(pipefd[0]);
 
1019
 
      error(0, errno, "set_cloexec_flag");
 
 
947
      perror("set_cloexec_flag");
 
1020
948
      exitstatus = EX_OSERR;
 
1023
951
    ret = set_cloexec_flag(pipefd[1]);
 
1025
 
      error(0, errno, "set_cloexec_flag");
 
 
953
      perror("set_cloexec_flag");
 
1026
954
      exitstatus = EX_OSERR;
 
 
1049
977
      /* this is the child process */
 
1050
978
      ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);
 
1052
 
        error(0, errno, "sigaction");
 
1053
981
        _exit(EX_OSERR);
 
1055
983
      ret = sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask, NULL);
 
1057
 
        error(0, errno, "sigprocmask");
 
 
985
        perror("sigprocmask");
 
1058
986
        _exit(EX_OSERR);
 
1061
989
      ret = dup2(pipefd[1], STDOUT_FILENO); /* replace our stdout */
 
1063
 
        error(0, errno, "dup2");
 
1064
992
        _exit(EX_OSERR);
 
 
1072
1000
      if(p->environ[0] == NULL){
 
1073
1001
        if(execv(filename, p->argv) < 0){
 
1074
 
          error(0, errno, "execv for %s", filename);
 
1075
1003
          _exit(EX_OSERR);
 
1078
1006
        if(execve(filename, p->argv, p->environ) < 0){
 
1079
 
          error(0, errno, "execve for %s", filename);
 
1080
1008
          _exit(EX_OSERR);
 
 
1088
1016
    free(filename);
 
1089
1017
    plugin *new_plugin = getplugin(dirst->d_name);
 
1090
1018
    if(new_plugin == NULL){
 
1091
 
      error(0, errno, "getplugin");
 
 
1019
      perror("getplugin");
 
1092
1020
      ret = (int)(TEMP_FAILURE_RETRY
 
1093
1021
                  (sigprocmask(SIG_UNBLOCK, &sigchld_action.sa_mask,
 
1096
 
        error(0, errno, "sigprocmask");
 
 
1024
        perror("sigprocmask");
 
1098
1026
      exitstatus = EX_OSERR;
 
 
1108
1036
                                              &sigchld_action.sa_mask,
 
1111
 
      error(0, errno, "sigprocmask");
 
 
1039
      perror("sigprocmask");
 
1112
1040
      exitstatus = EX_OSERR;
 
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
1044
    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
1047
    if(maxfd < new_plugin->fd){
 
1132
1048
      maxfd = new_plugin->fd;
 
 
1153
1069
    fd_set rfds = rfds_all;
 
1154
1070
    int select_ret = select(maxfd+1, &rfds, NULL, NULL, NULL);
 
1155
1071
    if(select_ret == -1 and errno != EINTR){
 
1156
 
      error(0, errno, "select");
 
1157
1073
      exitstatus = EX_OSERR;
 
 
1188
1104
          /* 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
1105
          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
1108
          /* Block signal while modifying process_list */
 
1205
1109
          ret = (int)TEMP_FAILURE_RETRY(sigprocmask
 
 
1221
1125
                      (sigprocmask(SIG_UNBLOCK,
 
1222
1126
                                   &sigchld_action.sa_mask, NULL)));
 
1224
 
            error(0, errno, "sigprocmask");
 
 
1128
            perror("sigprocmask");
 
1225
1129
            exitstatus = EX_OSERR;
 
 
1238
1142
        bool bret = print_out_password(proc->buffer,
 
1239
1143
                                       proc->buffer_length);
 
1241
 
          error(0, errno, "print_out_password");
 
 
1145
          perror("print_out_password");
 
1242
1146
          exitstatus = EX_IOERR;
 
1247
1151
      /* 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
1152
      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
1155
        /* This process had nothing to say at this time */
 
1266
1156
        proc = proc->next;
 
1269
1159
      /* Before reading, make the process' data buffer large enough */
 
1270
1160
      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");
 
 
1161
        proc->buffer = realloc(proc->buffer, proc->buffer_size
 
 
1162
                               + (size_t) BUFFER_SIZE);
 
 
1163
        if(proc->buffer == NULL){
 
1275
1165
          exitstatus = EX_OSERR;
 
1278
 
        proc->buffer = new_buffer;
 
1279
1168
        proc->buffer_size += BUFFER_SIZE;
 
1281
1170
      /* Read from the process */
 
 
1316
1205
    bret = print_out_password(passwordbuffer, len);
 
1318
 
      error(0, errno, "print_out_password");
 
 
1207
      perror("print_out_password");
 
1319
1208
      exitstatus = EX_IOERR;
 
 
1323
1212
  /* Restore old signal handler */
 
1324
1213
  ret = sigaction(SIGCHLD, &old_sigchld_action, NULL);
 
1326
 
    error(0, errno, "sigaction");
 
 
1215
    perror("sigaction");
 
1327
1216
    exitstatus = EX_OSERR;