/mandos/trunk

To get this branch, use:
bzr branch http://bzr.recompile.se/loggerhead/mandos/trunk

« back to all changes in this revision

Viewing changes to plugin-runner.c

  • Committer: Teddy Hogeborn
  • Date: 2014-05-12 21:02:38 UTC
  • Revision ID: teddy@recompile.se-20140512210238-t6o8b1ieeojrs0xl
Do not run self-tests when building arch-indep Debian package.

* debian/rules (override_dh_auto_test-arch): New; does nothing.

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugin-runner.c
2
2
/*
3
3
 * Mandos plugin runner - Run Mandos plugins
4
4
 *
5
 
 * Copyright © 2008-2013 Teddy Hogeborn
6
 
 * Copyright © 2008-2013 Björn Påhlsson
 
5
 * Copyright © 2008-2014 Teddy Hogeborn
 
6
 * Copyright © 2008-2014 Björn Påhlsson
7
7
 * 
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
23
23
 */
24
24
 
25
25
#define _GNU_SOURCE             /* TEMP_FAILURE_RETRY(), getline(),
26
 
                                   asprintf(), O_CLOEXEC */
 
26
                                   O_CLOEXEC */
27
27
#include <stddef.h>             /* size_t, NULL */
28
28
#include <stdlib.h>             /* malloc(), exit(), EXIT_SUCCESS,
29
29
                                   realloc() */
30
30
#include <stdbool.h>            /* bool, true, false */
31
31
#include <stdio.h>              /* fileno(), fprintf(),
32
 
                                   stderr, STDOUT_FILENO */
33
 
#include <sys/types.h>          /* DIR, fdopendir(), stat(), struct
 
32
                                   stderr, STDOUT_FILENO, fclose() */
 
33
#include <sys/types.h>          /* DIR, fdopendir(), fstat(), struct
34
34
                                   stat, waitpid(), WIFEXITED(),
35
35
                                   WEXITSTATUS(), wait(), pid_t,
36
36
                                   uid_t, gid_t, getuid(), getgid(),
40
40
#include <sys/wait.h>           /* wait(), waitpid(), WIFEXITED(),
41
41
                                   WEXITSTATUS(), WTERMSIG(),
42
42
                                   WCOREDUMP() */
43
 
#include <sys/stat.h>           /* struct stat, stat(), S_ISREG() */
 
43
#include <sys/stat.h>           /* struct stat, fstat(), S_ISREG() */
44
44
#include <iso646.h>             /* and, or, not */
45
45
#include <dirent.h>             /* DIR, struct dirent, fdopendir(),
46
46
                                   readdir(), closedir(), dirfd() */
47
 
#include <unistd.h>             /* struct stat, stat(), S_ISREG(),
48
 
                                   fcntl(), setuid(), setgid(),
49
 
                                   F_GETFD, F_SETFD, FD_CLOEXEC,
50
 
                                   access(), pipe(), fork(), close()
51
 
                                   dup2(), STDOUT_FILENO, _exit(),
52
 
                                   execv(), write(), read(),
53
 
                                   close() */
 
47
#include <unistd.h>             /* fcntl(), F_GETFD, F_SETFD,
 
48
                                   FD_CLOEXEC, write(), STDOUT_FILENO,
 
49
                                   struct stat, fstat(), close(),
 
50
                                   setgid(), setuid(), S_ISREG(),
 
51
                                   faccessat() pipe(), fork(),
 
52
                                   _exit(), dup2(), fexecve(), read()
 
53
                                */
54
54
#include <fcntl.h>              /* fcntl(), F_GETFD, F_SETFD,
55
 
                                   FD_CLOEXEC */
56
 
#include <string.h>             /* strsep, strlen(), asprintf(),
57
 
                                   strsignal(), strcmp(), strncmp() */
 
55
                                   FD_CLOEXEC, openat() */
 
56
#include <string.h>             /* strsep, strlen(), strsignal(),
 
57
                                   strcmp(), strncmp() */
58
58
#include <errno.h>              /* errno */
59
59
#include <argp.h>               /* struct argp_option, struct
60
60
                                   argp_state, struct argp,
72
72
                                   EX_CONFIG, EX_UNAVAILABLE, EX_OK */
73
73
#include <errno.h>              /* errno */
74
74
#include <error.h>              /* error() */
 
75
#include <fnmatch.h>            /* fnmatch() */
75
76
 
76
77
#define BUFFER_SIZE 256
77
78
 
105
106
 
106
107
/* Gets an existing plugin based on name,
107
108
   or if none is found, creates a new one */
 
109
__attribute__((warn_unused_result))
108
110
static plugin *getplugin(char *name){
109
111
  /* Check for existing plugin with that name */
110
112
  for(plugin *p = plugin_list; p != NULL; p = p->next){
171
173
}
172
174
 
173
175
/* Helper function for add_argument and add_environment */
174
 
__attribute__((nonnull))
 
176
__attribute__((nonnull, warn_unused_result))
175
177
static bool add_to_char_array(const char *new, char ***array,
176
178
                              int *len){
177
179
  /* Resize the pointed-to array to hold one more pointer */
202
204
}
203
205
 
204
206
/* Add to a plugin's argument vector */
205
 
__attribute__((nonnull(2)))
 
207
__attribute__((nonnull(2), warn_unused_result))
206
208
static bool add_argument(plugin *p, const char *arg){
207
209
  if(p == NULL){
208
210
    return false;
211
213
}
212
214
 
213
215
/* Add to a plugin's environment */
214
 
__attribute__((nonnull(2)))
 
216
__attribute__((nonnull(2), warn_unused_result))
215
217
static bool add_environment(plugin *p, const char *def, bool replace){
216
218
  if(p == NULL){
217
219
    return false;
244
246
 * Descriptor Flags".
245
247
 | [[info:libc:Descriptor%20Flags][File Descriptor Flags]] |
246
248
 */
 
249
__attribute__((warn_unused_result))
247
250
static int set_cloexec_flag(int fd){
248
251
  int ret = (int)TEMP_FAILURE_RETRY(fcntl(fd, F_GETFD, 0));
249
252
  /* If reading the flags failed, return error indication now. */
291
294
}
292
295
 
293
296
/* Prints out a password to stdout */
294
 
__attribute__((nonnull))
 
297
__attribute__((nonnull, warn_unused_result))
295
298
static bool print_out_password(const char *buffer, size_t length){
296
299
  ssize_t ret;
297
300
  for(size_t written = 0; written < length; written += (size_t)ret){
345
348
  char *plugindir = NULL;
346
349
  char *argfile = NULL;
347
350
  FILE *conffp;
348
 
  size_t d_name_len;
349
351
  DIR *dir = NULL;
350
352
  struct dirent *dirst;
351
353
  struct stat st;
361
363
                                      .sa_flags = SA_NOCLDSTOP };
362
364
  char **custom_argv = NULL;
363
365
  int custom_argc = 0;
 
366
  int dir_fd;
364
367
  
365
368
  /* Establish a signal handler */
366
369
  sigemptyset(&sigchld_action.sa_mask);
437
440
            break;
438
441
          }
439
442
        }
 
443
        errno = 0;
440
444
      }
441
445
      break;
442
446
    case 'G':                   /* --global-env */
443
 
      add_environment(getplugin(NULL), arg, true);
 
447
      if(add_environment(getplugin(NULL), arg, true)){
 
448
        errno = 0;
 
449
      }
444
450
      break;
445
451
    case 'o':                   /* --options-for */
446
452
      {
463
469
            break;
464
470
          }
465
471
        }
 
472
        errno = 0;
466
473
      }
467
474
      break;
468
475
    case 'E':                   /* --env-for */
480
487
          errno = EINVAL;
481
488
          break;
482
489
        }
483
 
        add_environment(getplugin(arg), envdef, true);
 
490
        if(add_environment(getplugin(arg), envdef, true)){
 
491
          errno = 0;
 
492
        }
484
493
      }
485
494
      break;
486
495
    case 'd':                   /* --disable */
488
497
        plugin *p = getplugin(arg);
489
498
        if(p != NULL){
490
499
          p->disabled = true;
 
500
          errno = 0;
491
501
        }
492
502
      }
493
503
      break;
496
506
        plugin *p = getplugin(arg);
497
507
        if(p != NULL){
498
508
          p->disabled = false;
 
509
          errno = 0;
499
510
        }
500
511
      }
501
512
      break;
502
513
    case 128:                   /* --plugin-dir */
503
514
      free(plugindir);
504
515
      plugindir = strdup(arg);
 
516
      if(plugindir != NULL){
 
517
        errno = 0;
 
518
      }
505
519
      break;
506
520
    case 129:                   /* --config-file */
507
521
      /* This is already done by parse_opt_config_file() */
515
529
        break;
516
530
      }
517
531
      uid = (uid_t)tmp_id;
 
532
      errno = 0;
518
533
      break;
519
534
    case 131:                   /* --groupid */
520
535
      tmp_id = strtoimax(arg, &tmp, 10);
525
540
        break;
526
541
      }
527
542
      gid = (gid_t)tmp_id;
 
543
      errno = 0;
528
544
      break;
529
545
    case 132:                   /* --debug */
530
546
      debug = true;
578
594
    case 129:                   /* --config-file */
579
595
      free(argfile);
580
596
      argfile = strdup(arg);
 
597
      if(argfile != NULL){
 
598
        errno = 0;
 
599
      }
581
600
      break;
582
601
    case 130:                   /* --userid */
583
602
    case 131:                   /* --groupid */
761
780
       <http://bugs.debian.org/633582> */
762
781
    int plugindir_fd = open(/* plugindir or */ PDIR, O_RDONLY);
763
782
    if(plugindir_fd == -1){
764
 
      error(0, errno, "open");
 
783
      if(errno != ENOENT){
 
784
        error(0, errno, "open(\"" PDIR "\")");
 
785
      }
765
786
    } else {
766
787
      ret = (int)TEMP_FAILURE_RETRY(fstat(plugindir_fd, &st));
767
788
      if(ret == -1){
790
811
  
791
812
  /* Open plugin directory with close_on_exec flag */
792
813
  {
793
 
    int dir_fd = -1;
794
 
    if(plugindir == NULL){
795
 
      dir_fd = open(PDIR, O_RDONLY |
796
 
#ifdef O_CLOEXEC
797
 
                    O_CLOEXEC
798
 
#else  /* not O_CLOEXEC */
799
 
                    0
800
 
#endif  /* not O_CLOEXEC */
801
 
                    );
802
 
    } else {
803
 
      dir_fd = open(plugindir, O_RDONLY |
804
 
#ifdef O_CLOEXEC
805
 
                    O_CLOEXEC
806
 
#else  /* not O_CLOEXEC */
807
 
                    0
808
 
#endif  /* not O_CLOEXEC */
809
 
                    );
810
 
    }
 
814
    dir_fd = open(plugindir != NULL ? plugindir : PDIR, O_RDONLY |
 
815
#ifdef O_CLOEXEC
 
816
                  O_CLOEXEC
 
817
#else  /* not O_CLOEXEC */
 
818
                  0
 
819
#endif  /* not O_CLOEXEC */
 
820
                  );
811
821
    if(dir_fd == -1){
812
822
      error(0, errno, "Could not open plugin dir");
813
823
      exitstatus = EX_UNAVAILABLE;
852
862
      break;
853
863
    }
854
864
    
855
 
    d_name_len = strlen(dirst->d_name);
856
 
    
857
865
    /* Ignore dotfiles, backup files and other junk */
858
866
    {
859
867
      bool bad_name = false;
860
 
      
861
 
      const char * const bad_prefixes[] = { ".", "#", NULL };
862
 
      
863
 
      const char * const bad_suffixes[] = { "~", "#", ".dpkg-new",
864
 
                                           ".dpkg-old",
865
 
                                           ".dpkg-bak",
866
 
                                           ".dpkg-divert", NULL };
867
 
#ifdef __GNUC__
868
 
#pragma GCC diagnostic push
869
 
#pragma GCC diagnostic ignored "-Wcast-qual"
870
 
#endif
871
 
      for(const char **pre = (const char **)bad_prefixes;
872
 
          *pre != NULL; pre++){
873
 
#ifdef __GNUC__
874
 
#pragma GCC diagnostic pop
875
 
#endif
876
 
        size_t pre_len = strlen(*pre);
877
 
        if((d_name_len >= pre_len)
878
 
           and strncmp((dirst->d_name), *pre, pre_len) == 0){
879
 
          if(debug){
880
 
            fprintf(stderr, "Ignoring plugin dir entry \"%s\""
881
 
                    " with bad prefix %s\n", dirst->d_name, *pre);
882
 
          }
883
 
          bad_name = true;
884
 
          break;
885
 
        }
886
 
      }
887
 
      if(bad_name){
888
 
        continue;
889
 
      }
890
 
#ifdef __GNUC__
891
 
#pragma GCC diagnostic push
892
 
#pragma GCC diagnostic ignored "-Wcast-qual"
893
 
#endif
894
 
      for(const char **suf = (const char **)bad_suffixes;
895
 
          *suf != NULL; suf++){
896
 
#ifdef __GNUC__
897
 
#pragma GCC diagnostic pop
898
 
#endif
899
 
        size_t suf_len = strlen(*suf);
900
 
        if((d_name_len >= suf_len)
901
 
           and (strcmp((dirst->d_name) + d_name_len-suf_len, *suf)
902
 
                == 0)){
903
 
          if(debug){
904
 
            fprintf(stderr, "Ignoring plugin dir entry \"%s\""
905
 
                    " with bad suffix %s\n", dirst->d_name, *suf);
906
 
          }
907
 
          bad_name = true;
908
 
          break;
909
 
        }
910
 
      }
911
 
      
 
868
      const char * const patterns[] = { ".*", "#*#", "*~",
 
869
                                        "*.dpkg-new", "*.dpkg-old",
 
870
                                        "*.dpkg-bak", "*.dpkg-divert",
 
871
                                        NULL };
 
872
#ifdef __GNUC__
 
873
#pragma GCC diagnostic push
 
874
#pragma GCC diagnostic ignored "-Wcast-qual"
 
875
#endif
 
876
      for(const char **pat = (const char **)patterns;
 
877
          *pat != NULL; pat++){
 
878
#ifdef __GNUC__
 
879
#pragma GCC diagnostic pop
 
880
#endif
 
881
        if(fnmatch(*pat, dirst->d_name,
 
882
                   FNM_FILE_NAME | FNM_PERIOD) != FNM_NOMATCH){
 
883
          if(debug){
 
884
            fprintf(stderr, "Ignoring plugin dir entry \"%s\""
 
885
                    " matching pattern %s\n", dirst->d_name, *pat);
 
886
          }
 
887
          bad_name = true;
 
888
          break;
 
889
        }
 
890
      }
912
891
      if(bad_name){
913
892
        continue;
914
893
      }
915
894
    }
916
895
    
917
 
    char *filename;
918
 
    if(plugindir == NULL){
919
 
      ret = (int)TEMP_FAILURE_RETRY(asprintf(&filename, PDIR "/%s",
920
 
                                             dirst->d_name));
921
 
    } else {
922
 
      ret = (int)TEMP_FAILURE_RETRY(asprintf(&filename, "%s/%s",
923
 
                                             plugindir,
924
 
                                             dirst->d_name));
 
896
    int plugin_fd = openat(dir_fd, dirst->d_name, O_RDONLY |
 
897
#ifdef O_CLOEXEC
 
898
                            O_CLOEXEC
 
899
#else  /* not O_CLOEXEC */
 
900
                            0
 
901
#endif  /* not O_CLOEXEC */
 
902
                            );
 
903
    if(plugin_fd == -1){
 
904
      error(0, errno, "Could not open plugin");
 
905
      continue;
925
906
    }
 
907
#ifndef O_CLOEXEC
 
908
  /* Set the FD_CLOEXEC flag on the plugin FD */
 
909
    ret = set_cloexec_flag(plugin_fd);
926
910
    if(ret < 0){
927
 
      error(0, errno, "asprintf");
 
911
      error(0, errno, "set_cloexec_flag");
 
912
      TEMP_FAILURE_RETRY(close(plugin_fd));
928
913
      continue;
929
914
    }
930
 
    
931
 
    ret = (int)TEMP_FAILURE_RETRY(stat(filename, &st));
 
915
#endif  /* O_CLOEXEC */
 
916
    ret = (int)TEMP_FAILURE_RETRY(fstat(plugin_fd, &st));
932
917
    if(ret == -1){
933
918
      error(0, errno, "stat");
934
 
      free(filename);
 
919
      TEMP_FAILURE_RETRY(close(plugin_fd));
935
920
      continue;
936
921
    }
937
922
    
938
923
    /* Ignore non-executable files */
939
924
    if(not S_ISREG(st.st_mode)
940
 
       or (TEMP_FAILURE_RETRY(access(filename, X_OK)) != 0)){
 
925
       or (TEMP_FAILURE_RETRY(faccessat(dir_fd, dirst->d_name, X_OK,
 
926
                                        0)) != 0)){
941
927
      if(debug){
942
 
        fprintf(stderr, "Ignoring plugin dir entry \"%s\""
943
 
                " with bad type or mode\n", filename);
 
928
        fprintf(stderr, "Ignoring plugin dir entry \"%s/%s\""
 
929
                " with bad type or mode\n",
 
930
                plugindir != NULL ? plugindir : PDIR, dirst->d_name);
944
931
      }
945
 
      free(filename);
 
932
      TEMP_FAILURE_RETRY(close(plugin_fd));
946
933
      continue;
947
934
    }
948
935
    
949
936
    plugin *p = getplugin(dirst->d_name);
950
937
    if(p == NULL){
951
938
      error(0, errno, "getplugin");
952
 
      free(filename);
 
939
      TEMP_FAILURE_RETRY(close(plugin_fd));
953
940
      continue;
954
941
    }
955
942
    if(p->disabled){
957
944
        fprintf(stderr, "Ignoring disabled plugin \"%s\"\n",
958
945
                dirst->d_name);
959
946
      }
960
 
      free(filename);
 
947
      TEMP_FAILURE_RETRY(close(plugin_fd));
961
948
      continue;
962
949
    }
963
950
    {
977
964
        }
978
965
      }
979
966
    }
980
 
    /* If this plugin has any environment variables, we will call
981
 
       using execve and need to duplicate the environment from this
982
 
       process, too. */
 
967
    /* If this plugin has any environment variables, we need to
 
968
       duplicate the environment from this process, too. */
983
969
    if(p->environ[0] != NULL){
984
970
      for(char **e = environ; *e != NULL; e++){
985
971
        if(not add_environment(p, *e, false)){
1051
1037
           above and must now close it manually here. */
1052
1038
        closedir(dir);
1053
1039
      }
1054
 
      if(p->environ[0] == NULL){
1055
 
        if(execv(filename, p->argv) < 0){
1056
 
          error(0, errno, "execv for %s", filename);
1057
 
          _exit(EX_OSERR);
1058
 
        }
1059
 
      } else {
1060
 
        if(execve(filename, p->argv, p->environ) < 0){
1061
 
          error(0, errno, "execve for %s", filename);
1062
 
          _exit(EX_OSERR);
1063
 
        }
 
1040
      if(fexecve(plugin_fd, p->argv,
 
1041
                (p->environ[0] != NULL) ? p->environ : environ) < 0){
 
1042
        error(0, errno, "fexecve for %s/%s",
 
1043
              plugindir != NULL ? plugindir : PDIR, dirst->d_name);
 
1044
        _exit(EX_OSERR);
1064
1045
      }
1065
1046
      /* no return */
1066
1047
    }
1067
1048
    /* Parent process */
1068
1049
    TEMP_FAILURE_RETRY(close(pipefd[1])); /* Close unused write end of
1069
1050
                                             pipe */
1070
 
    free(filename);
 
1051
    TEMP_FAILURE_RETRY(close(plugin_fd));
1071
1052
    plugin *new_plugin = getplugin(dirst->d_name);
1072
1053
    if(new_plugin == NULL){
1073
1054
      error(0, errno, "getplugin");