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 unsigned long 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                 printerr(0, "ERROR: failed to open %s\n", tdi->dirname);
 126                 free(tdi);
 127                 return -1;
 128         }
 129         fcntl(tdi->fd, F_SETSIG, DNOTIFY_SIGNAL);
 130         fcntl(tdi->fd, F_NOTIFY, DN_CREATE|DN_DELETE|DN_MODIFY|DN_MULTISHOT);
 131
 132         TAILQ_INSERT_HEAD(&topdirs_list, tdi, list);
 133         return 0;
 134 }
 135
 136 static void
 137 topdirs_free_list(void)
 138 {
 139         struct topdirs_info *tdi;
 140
 141         TAILQ_FOREACH(tdi, &topdirs_list, list) {
 142                 free(tdi->dirname);
 143                 if (tdi->fd != -1)
 144                         close(tdi->fd);
 145                 TAILQ_REMOVE(&topdirs_list, tdi, list);
 146                 free(tdi);
 147         }
 148 }
 149
 150 static int
 151 topdirs_init_list(void)
 152 {
 153         DIR             *pipedir;
 154         struct dirent   *dent;
 155         int             ret;
 156
 157         TAILQ_INIT(&topdirs_list);
 158
 159         pipedir = opendir(pipefs_dir);
 160         if (pipedir == NULL) {
 161                 printerr(0, "ERROR: could not open rpc_pipefs directory '%s': "
 162                          "%s\n", pipefs_dir, strerror(errno));
 163                 return -1;
 164         }
 165         for (dent = readdir(pipedir); dent != NULL; dent = readdir(pipedir)) {
 166                 if (dent->d_type != DT_DIR ||
 167                     strcmp(dent->d_name, ".") == 0  ||
 168                     strcmp(dent->d_name, "..") == 0) {
 169                         continue;
 170                 }
 171                 ret = topdirs_add_entry(dent);
 172                 if (ret)
 173                         goto out_err;
 174         }
 175         closedir(pipedir);
 176         return 0;
 177 out_err:
 178         topdirs_free_list();
 179         return -1;
 180 }
 181
 182 #ifdef HAVE_PPOLL
 183 static void gssd_poll(struct pollfd *fds, unsigned long nfds)
 184 {
 185         sigset_t emptyset;
 186         int ret;
 187
 188         sigemptyset(&emptyset);
 189         ret = ppoll(fds, nfds, NULL, &emptyset);
 190         if (ret < 0) {
 191                 if (errno != EINTR)
 192                         printerr(0, "WARNING: error return from poll\n");
 193         } else if (ret == 0) {
 194                 printerr(0, "WARNING: unexpected timeout\n");
 195         } else {
 196                 scan_poll_results(ret);
 197         }
 198 }
 199 #else   /* !HAVE_PPOLL */
 200 static void gssd_poll(struct pollfd *fds, unsigned long nfds)
 201 {
 202         int ret;
 203
 204         /* race condition here: dir_changed could be set before we
 205          * enter the poll, and we'd never notice if it weren't for the
 206          * timeout. */
 207         ret = poll(fds, nfds, POLL_MILLISECS);
 208         if (ret < 0) {
 209                 if (errno != EINTR)
 210                         printerr(0, "WARNING: error return from poll\n");
 211         } else if (ret == 0) {
 212                 /* timeout */
 213         } else { /* ret > 0 */
 214                 scan_poll_results(ret);
 215         }
 216 }
 217 #endif  /* !HAVE_PPOLL */
 218
 219 void
 220 gssd_run()
 221 {
 222         struct sigaction        dn_act = {
 223                 .sa_handler = dir_notify_handler
 224         };
 225         sigset_t                set;
 226
 227         sigemptyset(&dn_act.sa_mask);
 228         sigaction(DNOTIFY_SIGNAL, &dn_act, NULL);
 229
 230         /* just in case the signal is blocked... */
 231         sigemptyset(&set);
 232         sigaddset(&set, DNOTIFY_SIGNAL);
 233         sigprocmask(SIG_UNBLOCK, &set, NULL);
 234
 235         if (topdirs_init_list() != 0)
 236                 return;
 237
 238         init_client_list();
 239
 240         printerr(1, "beginning poll\n");
 241         while (1) {
 242                 while (dir_changed) {
 243                         dir_changed = 0;
 244                         if (update_client_list()) {
 245                                 /* Error msg is already printed */
 246                                 exit(1);
 247                         }
 248                 }
 249                 gssd_poll(pollarray, pollsize);
 250         }
 251         topdirs_free_list();
 252
 253         return;
 254 }