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(int sig, siginfo_t *si, void *data)
  65 {
  66         printerr(2, "dir_notify_handler: sig %d si %p data %p\n", sig, si, data);
  67
  68         dir_changed = 1;
  69 }
  70
  71 static void
  72 scan_poll_results(int ret)
  73 {
  74         int                     i;
  75         struct clnt_info        *clp;
  76
  77         for (clp = clnt_list.tqh_first; clp != NULL; clp = clp->list.tqe_next)
  78         {
  79                 i = clp->gssd_poll_index;
  80                 if (i >= 0 && pollarray[i].revents) {
  81                         if (pollarray[i].revents & POLLHUP) {
  82                                 clp->gssd_close_me = 1;
  83                                 dir_changed = 1;
  84                         }
  85                         if (pollarray[i].revents & POLLIN)
  86                                 handle_gssd_upcall(clp);
  87                         pollarray[clp->gssd_poll_index].revents = 0;
  88                         ret--;
  89                         if (!ret)
  90                                 break;
  91                 }
  92                 i = clp->krb5_poll_index;
  93                 if (i >= 0 && pollarray[i].revents) {
  94                         if (pollarray[i].revents & POLLHUP) {
  95                                 clp->krb5_close_me = 1;
  96                                 dir_changed = 1;
  97                         }
  98                         if (pollarray[i].revents & POLLIN)
  99                                 handle_krb5_upcall(clp);
 100                         pollarray[clp->krb5_poll_index].revents = 0;
 101                         ret--;
 102                         if (!ret)
 103                                 break;
 104                 }
 105         }
 106 };
 107
 108 static int
 109 topdirs_add_entry(struct dirent *dent)
 110 {
 111         struct topdirs_info *tdi;
 112
 113         tdi = calloc(sizeof(struct topdirs_info), 1);
 114         if (tdi == NULL) {
 115                 printerr(0, "ERROR: Couldn't allocate struct topdirs_info\n");
 116                 return -1;
 117         }
 118         tdi->dirname = malloc(PATH_MAX);
 119         if (tdi->dirname == NULL) {
 120                 printerr(0, "ERROR: Couldn't allocate directory name\n");
 121                 free(tdi);
 122                 return -1;
 123         }
 124         snprintf(tdi->dirname, PATH_MAX, "%s/%s", pipefs_dir, dent->d_name);
 125         tdi->fd = open(tdi->dirname, O_RDONLY);
 126         if (tdi->fd != -1) {
 127                 fcntl(tdi->fd, F_SETSIG, DNOTIFY_SIGNAL);
 128                 fcntl(tdi->fd, F_NOTIFY,
 129                       DN_CREATE|DN_DELETE|DN_MODIFY|DN_MULTISHOT);
 130         }
 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 void
 183 gssd_run()
 184 {
 185         int                     ret;
 186         struct sigaction        dn_act;
 187         sigset_t                set;
 188
 189         /* Taken from linux/Documentation/dnotify.txt: */
 190         dn_act.sa_sigaction = dir_notify_handler;
 191         sigemptyset(&dn_act.sa_mask);
 192         dn_act.sa_flags = SA_SIGINFO;
 193         sigaction(DNOTIFY_SIGNAL, &dn_act, NULL);
 194
 195         /* just in case the signal is blocked... */
 196         sigemptyset(&set);
 197         sigaddset(&set, DNOTIFY_SIGNAL);
 198         sigprocmask(SIG_UNBLOCK, &set, NULL);
 199
 200         if (topdirs_init_list() != 0)
 201                 return;
 202
 203         init_client_list();
 204
 205         printerr(1, "beginning poll\n");
 206         while (1) {
 207                 while (dir_changed) {
 208                         dir_changed = 0;
 209                         if (update_client_list()) {
 210                                 /* Error msg is already printed */
 211                                 exit(1);
 212                         }
 213                 }
 214                 /* race condition here: dir_changed could be set before we
 215                  * enter the poll, and we'd never notice if it weren't for the
 216                  * timeout. */
 217                 ret = poll(pollarray, pollsize, POLL_MILLISECS);
 218                 if (ret < 0) {
 219                         if (errno != EINTR)
 220                                 printerr(0,
 221                                          "WARNING: error return from poll\n");
 222                 } else if (ret == 0) {
 223                         /* timeout */
 224                 } else { /* ret > 0 */
 225                         scan_poll_results(ret);
 226                 }
 227         }
 228         topdirs_free_list();
 229
 230         return;
 231 }