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                                 dir_changed = 1;
  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                                 dir_changed = 1;
  94                         if (pollarray[i].revents & POLLIN)
  95                                 handle_krb5_upcall(clp);
  96                         pollarray[clp->krb5_poll_index].revents = 0;
  97                         ret--;
  98                         if (!ret)
  99                                 break;
 100                 }
 101         }
 102 };
 103
 104 static int
 105 topdirs_add_entry(struct dirent *dent)
 106 {
 107         struct topdirs_info *tdi;
 108
 109         tdi = calloc(sizeof(struct topdirs_info), 1);
 110         if (tdi == NULL) {
 111                 printerr(0, "ERROR: Couldn't allocate struct topdirs_info\n");
 112                 return -1;
 113         }
 114         tdi->dirname = malloc(PATH_MAX);
 115         if (tdi->dirname == NULL) {
 116                 printerr(0, "ERROR: Couldn't allocate directory name\n");
 117                 free(tdi);
 118                 return -1;
 119         }
 120         snprintf(tdi->dirname, PATH_MAX, "%s/%s", pipefs_dir, dent->d_name);
 121         tdi->fd = open(tdi->dirname, O_RDONLY);
 122         if (tdi->fd != -1) {
 123                 fcntl(tdi->fd, F_SETSIG, DNOTIFY_SIGNAL);
 124                 fcntl(tdi->fd, F_NOTIFY,
 125                       DN_CREATE|DN_DELETE|DN_MODIFY|DN_MULTISHOT);
 126         }
 127
 128         TAILQ_INSERT_HEAD(&topdirs_list, tdi, list);
 129         return 0;
 130 }
 131
 132 static void
 133 topdirs_free_list(void)
 134 {
 135         struct topdirs_info *tdi;
 136
 137         TAILQ_FOREACH(tdi, &topdirs_list, list) {
 138                 free(tdi->dirname);
 139                 if (tdi->fd != -1)
 140                         close(tdi->fd);
 141                 TAILQ_REMOVE(&topdirs_list, tdi, list);
 142                 free(tdi);
 143         }
 144 }
 145
 146 static int
 147 topdirs_init_list(void)
 148 {
 149         DIR             *pipedir;
 150         struct dirent   *dent;
 151         int             ret;
 152
 153         TAILQ_INIT(&topdirs_list);
 154
 155         pipedir = opendir(pipefs_dir);
 156         if (pipedir == NULL) {
 157                 printerr(0, "ERROR: could not open rpc_pipefs directory '%s': "
 158                          "%s\n", pipefs_dir, strerror(errno));
 159                 return -1;
 160         }
 161         for (dent = readdir(pipedir); dent != NULL; dent = readdir(pipedir)) {
 162                 if (dent->d_type != DT_DIR ||
 163                     strcmp(dent->d_name, ".") == 0  ||
 164                     strcmp(dent->d_name, "..") == 0) {
 165                         continue;
 166                 }
 167                 ret = topdirs_add_entry(dent);
 168                 if (ret)
 169                         goto out_err;
 170         }
 171         closedir(pipedir);
 172         return 0;
 173 out_err:
 174         topdirs_free_list();
 175         return -1;
 176 }
 177
 178 void
 179 gssd_run()
 180 {
 181         int                     ret;
 182         struct sigaction        dn_act;
 183         sigset_t                set;
 184
 185         /* Taken from linux/Documentation/dnotify.txt: */
 186         dn_act.sa_sigaction = dir_notify_handler;
 187         sigemptyset(&dn_act.sa_mask);
 188         dn_act.sa_flags = SA_SIGINFO;
 189         sigaction(DNOTIFY_SIGNAL, &dn_act, NULL);
 190
 191         /* just in case the signal is blocked... */
 192         sigemptyset(&set);
 193         sigaddset(&set, DNOTIFY_SIGNAL);
 194         sigprocmask(SIG_UNBLOCK, &set, NULL);
 195
 196         if (topdirs_init_list() != 0)
 197                 return;
 198
 199         init_client_list();
 200
 201         printerr(1, "beginning poll\n");
 202         while (1) {
 203                 while (dir_changed) {
 204                         dir_changed = 0;
 205                         if (update_client_list()) {
 206                                 /* Error msg is already printed */
 207                                 exit(1);
 208                         }
 209                 }
 210                 /* race condition here: dir_changed could be set before we
 211                  * enter the poll, and we'd never notice if it weren't for the
 212                  * timeout. */
 213                 ret = poll(pollarray, pollsize, POLL_MILLISECS);
 214                 if (ret < 0) {
 215                         if (errno != EINTR)
 216                                 printerr(0,
 217                                          "WARNING: error return from poll\n");
 218                 } else if (ret == 0) {
 219                         /* timeout */
 220                 } else { /* ret > 0 */
 221                         scan_poll_results(ret);
 222                 }
 223         }
 224         topdirs_free_list();
 225
 226         return;
 227 }