142c8c53eab6e1927f00c938dd69c723061e4cde
[nfs-utils.git] / 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                 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 void
183 gssd_run()
184 {
185         int                     ret;
186         struct sigaction        dn_act = {
187                 .sa_handler = dir_notify_handler
188         };
189         sigset_t                set;
190
191         sigemptyset(&dn_act.sa_mask);
192         sigaction(DNOTIFY_SIGNAL, &dn_act, NULL);
193
194         /* just in case the signal is blocked... */
195         sigemptyset(&set);
196         sigaddset(&set, DNOTIFY_SIGNAL);
197         sigprocmask(SIG_UNBLOCK, &set, NULL);
198
199         if (topdirs_init_list() != 0)
200                 return;
201
202         init_client_list();
203
204         printerr(1, "beginning poll\n");
205         while (1) {
206                 while (dir_changed) {
207                         dir_changed = 0;
208                         if (update_client_list()) {
209                                 /* Error msg is already printed */
210                                 exit(1);
211                         }
212                 }
213                 /* race condition here: dir_changed could be set before we
214                  * enter the poll, and we'd never notice if it weren't for the
215                  * timeout. */
216                 ret = poll(pollarray, pollsize, POLL_MILLISECS);
217                 if (ret < 0) {
218                         if (errno != EINTR)
219                                 printerr(0,
220                                          "WARNING: error return from poll\n");
221                 } else if (ret == 0) {
222                         /* timeout */
223                 } else { /* ret > 0 */
224                         scan_poll_results(ret);
225                 }
226         }
227         topdirs_free_list();
228
229         return;
230 }