/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: 2012-05-05 09:33:27 UTC
  • Revision ID: teddy@recompile.se-20120505093327-kzn0kkia6rhpciwd
* mandos-ctl: Break long lines.
* mandos-monitor: - '' -

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-2012 Teddy Hogeborn
 
6
 * Copyright © 2008-2012 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
49
49
                                   F_GETFD, F_SETFD, FD_CLOEXEC,
50
50
                                   access(), pipe(), fork(), close()
51
51
                                   dup2(), STDOUT_FILENO, _exit(),
52
 
                                   execve(), write(), read(),
 
52
                                   execv(), write(), read(),
53
53
                                   close() */
54
54
#include <fcntl.h>              /* fcntl(), F_GETFD, F_SETFD,
55
55
                                   FD_CLOEXEC */
105
105
 
106
106
/* Gets an existing plugin based on name,
107
107
   or if none is found, creates a new one */
108
 
__attribute__((warn_unused_result))
109
108
static plugin *getplugin(char *name){
110
109
  /* Check for existing plugin with that name */
111
110
  for(plugin *p = plugin_list; p != NULL; p = p->next){
172
171
}
173
172
 
174
173
/* Helper function for add_argument and add_environment */
175
 
__attribute__((nonnull, warn_unused_result))
 
174
__attribute__((nonnull))
176
175
static bool add_to_char_array(const char *new, char ***array,
177
176
                              int *len){
178
177
  /* Resize the pointed-to array to hold one more pointer */
179
 
  char **new_array = NULL;
180
178
  do {
181
 
    new_array = realloc(*array, sizeof(char *)
182
 
                        * (size_t) ((*len) + 2));
183
 
  } while(new_array == NULL and errno == EINTR);
 
179
    *array = realloc(*array, sizeof(char *)
 
180
                     * (size_t) ((*len) + 2));
 
181
  } while(*array == NULL and errno == EINTR);
184
182
  /* Malloc check */
185
 
  if(new_array == NULL){
 
183
  if(*array == NULL){
186
184
    return false;
187
185
  }
188
 
  *array = new_array;
189
186
  /* Make a copy of the new string */
190
187
  char *copy;
191
188
  do {
203
200
}
204
201
 
205
202
/* Add to a plugin's argument vector */
206
 
__attribute__((nonnull(2), warn_unused_result))
 
203
__attribute__((nonnull(2)))
207
204
static bool add_argument(plugin *p, const char *arg){
208
205
  if(p == NULL){
209
206
    return false;
212
209
}
213
210
 
214
211
/* Add to a plugin's environment */
215
 
__attribute__((nonnull(2), warn_unused_result))
 
212
__attribute__((nonnull(2)))
216
213
static bool add_environment(plugin *p, const char *def, bool replace){
217
214
  if(p == NULL){
218
215
    return false;
220
217
  /* namelen = length of name of environment variable */
221
218
  size_t namelen = (size_t)(strchrnul(def, '=') - def);
222
219
  /* Search for this environment variable */
223
 
  for(char **envdef = p->environ; *envdef != NULL; envdef++){
224
 
    if(strncmp(*envdef, def, namelen + 1) == 0){
 
220
  for(char **e = p->environ; *e != NULL; e++){
 
221
    if(strncmp(*e, def, namelen + 1) == 0){
225
222
      /* It already exists */
226
223
      if(replace){
227
 
        char *new_envdef;
 
224
        char *new;
228
225
        do {
229
 
          new_envdef = realloc(*envdef, strlen(def) + 1);
230
 
        } while(new_envdef == NULL and errno == EINTR);
231
 
        if(new_envdef == NULL){
 
226
          new = realloc(*e, strlen(def) + 1);
 
227
        } while(new == NULL and errno == EINTR);
 
228
        if(new == NULL){
232
229
          return false;
233
230
        }
234
 
        *envdef = new_envdef;
235
 
        strcpy(*envdef, def);
 
231
        *e = new;
 
232
        strcpy(*e, def);
236
233
      }
237
234
      return true;
238
235
    }
245
242
 * Descriptor Flags".
246
243
 | [[info:libc:Descriptor%20Flags][File Descriptor Flags]] |
247
244
 */
248
 
__attribute__((warn_unused_result))
249
245
static int set_cloexec_flag(int fd){
250
246
  int ret = (int)TEMP_FAILURE_RETRY(fcntl(fd, F_GETFD, 0));
251
247
  /* If reading the flags failed, return error indication now. */
293
289
}
294
290
 
295
291
/* Prints out a password to stdout */
296
 
__attribute__((nonnull, warn_unused_result))
 
292
__attribute__((nonnull))
297
293
static bool print_out_password(const char *buffer, size_t length){
298
294
  ssize_t ret;
299
295
  for(size_t written = 0; written < length; written += (size_t)ret){
439
435
            break;
440
436
          }
441
437
        }
442
 
        errno = 0;
443
438
      }
444
439
      break;
445
440
    case 'G':                   /* --global-env */
446
 
      if(add_environment(getplugin(NULL), arg, true)){
447
 
        errno = 0;
448
 
      }
 
441
      add_environment(getplugin(NULL), arg, true);
449
442
      break;
450
443
    case 'o':                   /* --options-for */
451
444
      {
468
461
            break;
469
462
          }
470
463
        }
471
 
        errno = 0;
472
464
      }
473
465
      break;
474
466
    case 'E':                   /* --env-for */
486
478
          errno = EINVAL;
487
479
          break;
488
480
        }
489
 
        if(add_environment(getplugin(arg), envdef, true)){
490
 
          errno = 0;
491
 
        }
 
481
        add_environment(getplugin(arg), envdef, true);
492
482
      }
493
483
      break;
494
484
    case 'd':                   /* --disable */
496
486
        plugin *p = getplugin(arg);
497
487
        if(p != NULL){
498
488
          p->disabled = true;
499
 
          errno = 0;
500
489
        }
501
490
      }
502
491
      break;
505
494
        plugin *p = getplugin(arg);
506
495
        if(p != NULL){
507
496
          p->disabled = false;
508
 
          errno = 0;
509
497
        }
510
498
      }
511
499
      break;
512
500
    case 128:                   /* --plugin-dir */
513
501
      free(plugindir);
514
502
      plugindir = strdup(arg);
515
 
      if(plugindir != NULL){
516
 
        errno = 0;
517
 
      }
518
503
      break;
519
504
    case 129:                   /* --config-file */
520
505
      /* This is already done by parse_opt_config_file() */
528
513
        break;
529
514
      }
530
515
      uid = (uid_t)tmp_id;
531
 
      errno = 0;
532
516
      break;
533
517
    case 131:                   /* --groupid */
534
518
      tmp_id = strtoimax(arg, &tmp, 10);
539
523
        break;
540
524
      }
541
525
      gid = (gid_t)tmp_id;
542
 
      errno = 0;
543
526
      break;
544
527
    case 132:                   /* --debug */
545
528
      debug = true;
593
576
    case 129:                   /* --config-file */
594
577
      free(argfile);
595
578
      argfile = strdup(arg);
596
 
      if(argfile != NULL){
597
 
        errno = 0;
598
 
      }
599
579
      break;
600
580
    case 130:                   /* --userid */
601
581
    case 131:                   /* --groupid */
684
664
        }
685
665
        
686
666
        custom_argc += 1;
687
 
        {
688
 
          char **new_argv = realloc(custom_argv, sizeof(char *)
689
 
                                    * ((unsigned int)
690
 
                                       custom_argc + 1));
691
 
          if(new_argv == NULL){
692
 
            error(0, errno, "realloc");
693
 
            exitstatus = EX_OSERR;
694
 
            free(new_arg);
695
 
            free(org_line);
696
 
            goto fallback;
697
 
          } else {
698
 
            custom_argv = new_argv;
699
 
          }
 
667
        custom_argv = realloc(custom_argv, sizeof(char *)
 
668
                              * ((unsigned int) custom_argc + 1));
 
669
        if(custom_argv == NULL){
 
670
          error(0, errno, "realloc");
 
671
          exitstatus = EX_OSERR;
 
672
          free(org_line);
 
673
          goto fallback;
700
674
        }
701
675
        custom_argv[custom_argc-1] = new_arg;
702
676
        custom_argv[custom_argc] = NULL;
779
753
       <http://bugs.debian.org/633582> */
780
754
    int plugindir_fd = open(/* plugindir or */ PDIR, O_RDONLY);
781
755
    if(plugindir_fd == -1){
782
 
      error(0, errno, "open(\"" PDIR "\")");
 
756
      error(0, errno, "open");
783
757
    } else {
784
758
      ret = (int)TEMP_FAILURE_RETRY(fstat(plugindir_fd, &st));
785
759
      if(ret == -1){
797
771
  }
798
772
  
799
773
  /* Lower permissions */
800
 
  ret = setgid(gid);
 
774
  setgid(gid);
801
775
  if(ret == -1){
802
776
    error(0, errno, "setgid");
803
777
  }
876
850
    {
877
851
      bool bad_name = false;
878
852
      
879
 
      const char * const bad_prefixes[] = { ".", "#", NULL };
 
853
      const char const *bad_prefixes[] = { ".", "#", NULL };
880
854
      
881
 
      const char * const bad_suffixes[] = { "~", "#", ".dpkg-new",
 
855
      const char const *bad_suffixes[] = { "~", "#", ".dpkg-new",
882
856
                                           ".dpkg-old",
883
857
                                           ".dpkg-bak",
884
858
                                           ".dpkg-divert", NULL };
885
 
#ifdef __GNUC__
886
 
#pragma GCC diagnostic push
887
 
#pragma GCC diagnostic ignored "-Wcast-qual"
888
 
#endif
889
 
      for(const char **pre = (const char **)bad_prefixes;
890
 
          *pre != NULL; pre++){
891
 
#ifdef __GNUC__
892
 
#pragma GCC diagnostic pop
893
 
#endif
 
859
      for(const char **pre = bad_prefixes; *pre != NULL; pre++){
894
860
        size_t pre_len = strlen(*pre);
895
861
        if((d_name_len >= pre_len)
896
862
           and strncmp((dirst->d_name), *pre, pre_len) == 0){
905
871
      if(bad_name){
906
872
        continue;
907
873
      }
908
 
#ifdef __GNUC__
909
 
#pragma GCC diagnostic push
910
 
#pragma GCC diagnostic ignored "-Wcast-qual"
911
 
#endif
912
 
      for(const char **suf = (const char **)bad_suffixes;
913
 
          *suf != NULL; suf++){
914
 
#ifdef __GNUC__
915
 
#pragma GCC diagnostic pop
916
 
#endif
 
874
      for(const char **suf = bad_suffixes; *suf != NULL; suf++){
917
875
        size_t suf_len = strlen(*suf);
918
876
        if((d_name_len >= suf_len)
919
877
           and (strcmp((dirst->d_name) + d_name_len-suf_len, *suf)
1069
1027
           above and must now close it manually here. */
1070
1028
        closedir(dir);
1071
1029
      }
1072
 
      if(execve(filename, p->argv,
1073
 
                (p->environ[0] != NULL) ? p->environ : environ) < 0){
1074
 
        error(0, errno, "execve for %s", filename);
1075
 
        _exit(EX_OSERR);
 
1030
      if(p->environ[0] == NULL){
 
1031
        if(execv(filename, p->argv) < 0){
 
1032
          error(0, errno, "execv for %s", filename);
 
1033
          _exit(EX_OSERR);
 
1034
        }
 
1035
      } else {
 
1036
        if(execve(filename, p->argv, p->environ) < 0){
 
1037
          error(0, errno, "execve for %s", filename);
 
1038
          _exit(EX_OSERR);
 
1039
        }
1076
1040
      }
1077
1041
      /* no return */
1078
1042
    }
1107
1071
      goto fallback;
1108
1072
    }
1109
1073
    
1110
 
#if defined (__GNUC__) and defined (__GLIBC__)
1111
 
#if not __GLIBC_PREREQ(2, 16)
1112
 
#pragma GCC diagnostic push
1113
 
#pragma GCC diagnostic ignored "-Wsign-conversion"
1114
 
#endif
1115
 
#endif
1116
1074
    FD_SET(new_plugin->fd, &rfds_all); /* Spurious warning from
1117
 
                                          -Wconversion in GNU libc
1118
 
                                          before 2.16 */
1119
 
#if defined (__GNUC__) and defined (__GLIBC__)
1120
 
#if not __GLIBC_PREREQ(2, 16)
1121
 
#pragma GCC diagnostic pop
1122
 
#endif
1123
 
#endif
 
1075
                                          -Wconversion */
1124
1076
    
1125
1077
    if(maxfd < new_plugin->fd){
1126
1078
      maxfd = new_plugin->fd;
1180
1132
          }
1181
1133
          
1182
1134
          /* Remove the plugin */
1183
 
#if defined (__GNUC__) and defined (__GLIBC__)
1184
 
#if not __GLIBC_PREREQ(2, 16)
1185
 
#pragma GCC diagnostic push
1186
 
#pragma GCC diagnostic ignored "-Wsign-conversion"
1187
 
#endif
1188
 
#endif
1189
1135
          FD_CLR(proc->fd, &rfds_all); /* Spurious warning from
1190
 
                                          -Wconversion in GNU libc
1191
 
                                          before 2.16 */
1192
 
#if defined (__GNUC__) and defined (__GLIBC__)
1193
 
#if not __GLIBC_PREREQ(2, 16)
1194
 
#pragma GCC diagnostic pop
1195
 
#endif
1196
 
#endif
 
1136
                                          -Wconversion */
1197
1137
          
1198
1138
          /* Block signal while modifying process_list */
1199
1139
          ret = (int)TEMP_FAILURE_RETRY(sigprocmask
1239
1179
      }
1240
1180
      
1241
1181
      /* This process has not completed.  Does it have any output? */
1242
 
#if defined (__GNUC__) and defined (__GLIBC__)
1243
 
#if not __GLIBC_PREREQ(2, 16)
1244
 
#pragma GCC diagnostic push
1245
 
#pragma GCC diagnostic ignored "-Wsign-conversion"
1246
 
#endif
1247
 
#endif
1248
1182
      if(proc->eof or not FD_ISSET(proc->fd, &rfds)){ /* Spurious
1249
1183
                                                         warning from
1250
 
                                                         -Wconversion
1251
 
                                                         in GNU libc
1252
 
                                                         before
1253
 
                                                         2.16 */
1254
 
#if defined (__GNUC__) and defined (__GLIBC__)
1255
 
#if not __GLIBC_PREREQ(2, 16)
1256
 
#pragma GCC diagnostic pop
1257
 
#endif
1258
 
#endif
 
1184
                                                         -Wconversion */
1259
1185
        /* This process had nothing to say at this time */
1260
1186
        proc = proc->next;
1261
1187
        continue;
1262
1188
      }
1263
1189
      /* Before reading, make the process' data buffer large enough */
1264
1190
      if(proc->buffer_length + BUFFER_SIZE > proc->buffer_size){
1265
 
        char *new_buffer = realloc(proc->buffer, proc->buffer_size
1266
 
                                   + (size_t) BUFFER_SIZE);
1267
 
        if(new_buffer == NULL){
 
1191
        proc->buffer = realloc(proc->buffer, proc->buffer_size
 
1192
                               + (size_t) BUFFER_SIZE);
 
1193
        if(proc->buffer == NULL){
1268
1194
          error(0, errno, "malloc");
1269
1195
          exitstatus = EX_OSERR;
1270
1196
          goto fallback;
1271
1197
        }
1272
 
        proc->buffer = new_buffer;
1273
1198
        proc->buffer_size += BUFFER_SIZE;
1274
1199
      }
1275
1200
      /* Read from the process */