utils/gssd/gssd_main_loop.c

   1 /*
   2   Copyright (c) 2004 The Regents of the University of Michigan.
   3   All rights reserved.
   4
   5   Redistribution and use in source and binary forms, with or without
   6   modification, are permitted provided that the following conditions
   7   are met:
   8
   9   1. Redistributions of source code must retain the above copyright
  10      notice, this list of conditions and the following disclaimer.
  11   2. Redistributions in binary form must reproduce the above copyright
  12      notice, this list of conditions and the following disclaimer in the
  13      documentation and/or other materials provided with the distribution.
  14   3. Neither the name of the University nor the names of its
  15      contributors may be used to endorse or promote products derived
  16      from this software without specific prior written permission.
  17
  18   THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  19   WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  20   MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  21   DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  22   FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  23   CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  24   SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  25   BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  26   LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  27   NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  28   SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29 */
  30
  31 #ifdef HAVE_CONFIG_H
  32 #include <config.h>
  33 #endif  /* HAVE_CONFIG_H */
  34
  35 #ifndef _GNU_SOURCE
  36 #define _GNU_SOURCE
  37 #endif
  38
  39 #include <sys/param.h>
  40 #include <sys/socket.h>
  41 #include <sys/poll.h>
  42 #include <netinet/in.h>
  43
  44 #include <stdio.h>
  45 #include <stdlib.h>
  46 #include <string.h>
  47 #include <memory.h>
  48 #include <errno.h>
  49 #include <fcntl.h>
  50 #include <signal.h>
  51 #include <unistd.h>
  52 #include <dirent.h>
  53
  54 #include "gssd.h"
  55 #include "err_util.h"
  56
  57 extern struct pollfd *pollarray;
  58 extern int pollsize;
  59
  60 #define POLL_MILLISECS  500
  61
  62 static volatile int dir_changed = 1;
  63
  64 static void dir_notify_handler(__attribute__((unused))int sig)
  65 {
  66         dir_changed = 1;
  67 }
  68
  69 static void
  70 scan_poll_results(int ret)
  71 {
  72         int                     i;
  73         struct clnt_info        *clp;
  74
  75         for (clp = clnt_list.tqh_first; clp != NULL; clp = clp->list.tqe_next)
  76         {
  77                 i = clp->gssd_poll_index;
  78                 if (i >= 0 && pollarray[i].revents) {
  79                         if (pollarray[i].revents & POLLHUP) {
  80                                 clp->gssd_close_me = 1;
  81                                 dir_changed = 1;
  82                         }
  83                         if (pollarray[i].revents & POLLIN)
  84                                 handle_gssd_upcall(clp);
  85                         pollarray[clp->gssd_poll_index].revents = 0;
  86                         ret--;
  87                         if (!ret)
  88                                 break;
  89                 }
  90                 i = clp->krb5_poll_index;
  91                 if (i >= 0 && pollarray[i].revents) {
  92                         if (pollarray[i].revents & POLLHUP) {
  93                                 clp->krb5_close_me = 1;
  94                                 dir_changed = 1;
  95                         }
  96                         if (pollarray[i].revents & POLLIN)
  97                                 handle_krb5_upcall(clp);
  98                         pollarray[clp->krb5_poll_index].revents = 0;
  99                         ret--;
 100                         if (!ret)
 101                                 break;
 102                 }
 103         }
 104 };
 105
 106 static int
 107 topdirs_add_entry(struct dirent *dent)
 108 {
 109         struct topdirs_info *tdi;
 110
 111         tdi = calloc(sizeof(struct topdirs_info), 1);
 112         if (tdi == NULL) {
 113                 printerr(0, "ERROR: Couldn't allocate struct topdirs_info\n");
 114                 return -1;
 115         }
 116         tdi->dirname = malloc(PATH_MAX);
 117         if (tdi->dirname == NULL) {
 118                 printerr(0, "ERROR: Couldn't allocate directory name\n");
 119                 free(tdi);
 120                 return -1;
 121         }
 122         snprintf(tdi->dirname, PATH_MAX, "%s/%s", pipefs_dir, dent->d_name);
 123         tdi->fd = open(tdi->dirname, O_RDONLY);
 124         if (tdi->fd != -1) {
 125                 fcntl(tdi->fd, F_SETSIG, DNOTIFY_SIGNAL);
 126                 fcntl(tdi->fd, F_NOTIFY,
 127                       DN_CREATE|DN_DELETE|DN_MODIFY|DN_MULTISHOT);
 128         }
 129
 130         TAILQ_INSERT_HEAD(&topdirs_list, tdi, list);
 131         return 0;
 132 }
 133
 134 static void
 135 topdirs_free_list(void)
 136 {
 137         struct topdirs_info *tdi;
 138
 139         TAILQ_FOREACH(tdi, &topdirs_list, list) {
 140                 free(tdi->dirname);
 141                 if (tdi->fd != -1)
 142                         close(tdi->fd);
 143                 TAILQ_REMOVE(&topdirs_list, tdi, list);
 144                 free(tdi);
 145         }
 146 }
 147
 148 static int
 149 topdirs_init_list(void)
 150 {
 151         DIR             *pipedir;
 152         struct dirent   *dent;
 153         int             ret;
 154
 155         TAILQ_INIT(&topdirs_list);
 156
 157         pipedir = opendir(pipefs_dir);
 158         if (pipedir == NULL) {
 159                 printerr(0, "ERROR: could not open rpc_pipefs directory '%s': "
 160                          "%s\n", pipefs_dir, strerror(errno));
 161                 return -1;
 162         }
 163         for (dent = readdir(pipedir); dent != NULL; dent = readdir(pipedir)) {
 164                 if (dent->d_type != DT_DIR ||
 165                     strcmp(dent->d_name, ".") == 0  ||
 166                     strcmp(dent->d_name, "..") == 0) {
 167                         continue;
 168                 }
 169                 ret = topdirs_add_entry(dent);
 170                 if (ret)
 171                         goto out_err;
 172         }
 173         closedir(pipedir);
 174         return 0;
 175 out_err:
 176         topdirs_free_list();
 177         return -1;
 178 }
 179
 180 void
 181 gssd_run()
 182 {
 183         int                     ret;
 184         struct sigaction        dn_act = {
 185                 .sa_handler = dir_notify_handler
 186         };
 187         sigset_t                set;
 188
 189         sigemptyset(&dn_act.sa_mask);
 190         sigaction(DNOTIFY_SIGNAL, &dn_act, NULL);
 191
 192         /* just in case the signal is blocked... */
 193         sigemptyset(&set);
 194         sigaddset(&set, DNOTIFY_SIGNAL);
 195         sigprocmask(SIG_UNBLOCK, &set, NULL);
 196
 197         if (topdirs_init_list() != 0)
 198                 return;
 199
 200         init_client_list();
 201
 202         printerr(1, "beginning poll\n");
 203         while (1) {
 204                 while (dir_changed) {
 205                         dir_changed = 0;
 206                         if (update_client_list()) {
 207                                 /* Error msg is already printed */
 208                                 exit(1);
 209                         }
 210                 }
 211                 /* race condition here: dir_changed could be set before we
 212                  * enter the poll, and we'd never notice if it weren't for the
 213                  * timeout. */
 214                 ret = poll(pollarray, pollsize, POLL_MILLISECS);
 215                 if (ret < 0) {
 216                         if (errno != EINTR)
 217                                 printerr(0,
 218                                          "WARNING: error return from poll\n");
 219                 } else if (ret == 0) {
 220                         /* timeout */
 221                 } else { /* ret > 0 */
 222                         scan_poll_results(ret);
 223                 }
 224         }
 225         topdirs_free_list();
 226
 227         return;
 228 }