bus/dir-watch-kqueue.c

   1 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
   2 /* dir-watch-kqueue.c  OS specific directory change notification for message bus
   3  *
   4  * Copyright (C) 2003 Red Hat, Inc.
   5  *
   6  * Licensed under the Academic Free License version 2.1
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  21  *
  22  */
  23
  24 #include <config.h>
  25
  26 #include <sys/types.h>
  27 #include <sys/event.h>
  28 #include <sys/time.h>
  29 #include <signal.h>
  30 #include <fcntl.h>
  31 #include <unistd.h>
  32 #ifdef HAVE_ERRNO_H
  33 #include <errno.h>
  34 #endif
  35
  36 #include "bus.h"
  37 #include <dbus/dbus-watch.h>
  38
  39 #include <dbus/dbus-internals.h>
  40 #include <dbus/dbus-list.h>
  41 #include "dir-watch.h"
  42
  43 #define MAX_DIRS_TO_WATCH 128
  44
  45 static int kq = -1;
  46 static int fds[MAX_DIRS_TO_WATCH];
  47 static char *dirs[MAX_DIRS_TO_WATCH];
  48 static int num_fds = 0;
  49 static DBusWatch *watch = NULL;
  50 static DBusLoop *loop = NULL;
  51
  52 static dbus_bool_t
  53 _kqueue_watch_callback (DBusWatch *watch, unsigned int condition, void *data)
  54 {
  55   return dbus_watch_handle (watch, condition);
  56 }
  57
  58 static dbus_bool_t
  59 _handle_kqueue_watch (DBusWatch *watch, unsigned int flags, void *data)
  60 {
  61   struct kevent ev;
  62   struct timespec nullts = { 0, 0 };
  63   int res;
  64   pid_t pid;
  65
  66   res = kevent (kq, NULL, 0, &ev, 1, &nullts);
  67
  68   /* Sleep for half a second to avoid a race when files are install(1)'d
  69    * to system.d. */
  70   usleep(500000);
  71
  72   if (res > 0)
  73     {
  74       pid = getpid ();
  75       _dbus_verbose ("Sending SIGHUP signal on reception of a kevent\n");
  76       (void) kill (pid, SIGHUP);
  77     }
  78   else if (res < 0 && errno == EBADF)
  79     {
  80       kq = -1;
  81       if (watch != NULL)
  82         {
  83           _dbus_loop_remove_watch (loop, watch, _kqueue_watch_callback, NULL);
  84           _dbus_watch_invalidate (watch);
  85           _dbus_watch_unref (watch);
  86           watch = NULL;
  87         }
  88       pid = getpid ();
  89       _dbus_verbose ("Sending SIGHUP signal since kqueue has been closed\n");
  90       (void) kill (pid, SIGHUP);
  91     }
  92
  93   return TRUE;
  94 }
  95
  96 static int
  97 _init_kqueue (BusContext *context)
  98 {
  99   int ret = 0;
 100
 101   if (kq < 0)
 102     {
 103
 104       kq = kqueue ();
 105       if (kq < 0)
 106         {
 107           _dbus_warn ("Cannot create kqueue; error '%s'\n", _dbus_strerror (errno));
 108           goto out;
 109         }
 110
 111         loop = bus_context_get_loop (context);
 112
 113         watch = _dbus_watch_new (kq, DBUS_WATCH_READABLE, TRUE,
 114                                  _handle_kqueue_watch, NULL, NULL);
 115
 116         if (watch == NULL)
 117           {
 118             _dbus_warn ("Unable to create kqueue watch\n");
 119             close (kq);
 120             kq = -1;
 121             goto out;
 122           }
 123
 124         if (!_dbus_loop_add_watch (loop, watch, _kqueue_watch_callback,
 125                                    NULL, NULL))
 126           {
 127             _dbus_warn ("Unable to add reload watch to main loop");
 128             _dbus_watch_invalidate (watch);
 129             _dbus_watch_unref (watch);
 130             watch = NULL;
 131             close (kq);
 132             kq = -1;
 133             goto out;
 134           }
 135     }
 136
 137   ret = 1;
 138
 139 out:
 140   return ret;
 141 }
 142
 143 void
 144 bus_set_watched_dirs (BusContext *context, DBusList **directories)
 145 {
 146   int new_fds[MAX_DIRS_TO_WATCH];
 147   char *new_dirs[MAX_DIRS_TO_WATCH];
 148   DBusList *link;
 149   int i, j, f, fd;
 150   struct kevent ev;
 151
 152   if (!_init_kqueue (context))
 153     goto out;
 154
 155   for (i = 0; i < MAX_DIRS_TO_WATCH; i++)
 156     {
 157       new_fds[i] = -1;
 158       new_dirs[i] = NULL;
 159     }
 160
 161   i = 0;
 162   link = _dbus_list_get_first_link (directories);
 163   while (link != NULL)
 164     {
 165       new_dirs[i++] = (char *)link->data;
 166       link = _dbus_list_get_next_link (directories, link);
 167     }
 168
 169   /* Look for directories in both the old and new sets, if
 170    * we find one, move its data into the new set.
 171    */
 172   for (i = 0; new_dirs[i]; i++)
 173     {
 174       for (j = 0; j < num_fds; j++)
 175         {
 176           if (dirs[j] && strcmp (new_dirs[i], dirs[j]) == 0)
 177             {
 178               new_fds[i] = fds[j];
 179               new_dirs[i] = dirs[j];
 180               fds[j] = -1;
 181               dirs[j] = NULL;
 182               break;
 183             }
 184         }
 185     }
 186
 187   /* Any directory we find in "fds" with a nonzero fd must
 188    * not be in the new set, so perform cleanup now.
 189    */
 190   for (j = 0; j < num_fds; j++)
 191     {
 192       if (fds[j] != -1)
 193         {
 194           close (fds[j]);
 195           dbus_free (dirs[j]);
 196           fds[j] = -1;
 197           dirs[j] = NULL;
 198         }
 199     }
 200
 201   for (i = 0; new_dirs[i]; i++)
 202     {
 203       if (new_fds[i] == -1)
 204         {
 205           /* FIXME - less lame error handling for failing to add a watch;
 206            * we may need to sleep.
 207            */
 208           fd = open (new_dirs[i], O_RDONLY);
 209           if (fd < 0)
 210             {
 211               if (errno != ENOENT)
 212                 {
 213                   _dbus_warn ("Cannot open directory '%s'; error '%s'\n", new_dirs[i], _dbus_strerror (errno));
 214                   goto out;
 215                 }
 216               else
 217                 {
 218                   new_fds[i] = -1;
 219                   new_dirs[i] = NULL;
 220                   continue;
 221                 }
 222             }
 223
 224           EV_SET (&ev, fd, EVFILT_VNODE, EV_ADD | EV_ENABLE | EV_CLEAR,
 225                   NOTE_DELETE | NOTE_EXTEND | NOTE_WRITE | NOTE_RENAME, 0, 0);
 226           if (kevent (kq, &ev, 1, NULL, 0, NULL) == -1)
 227             {
 228               _dbus_warn ("Cannot setup a kevent for '%s'; error '%s'\n", new_dirs[i], _dbus_strerror (errno));
 229               close (fd);
 230               goto out;
 231             }
 232
 233           new_fds[i] = fd;
 234           new_dirs[i] = _dbus_strdup (new_dirs[i]);
 235           if (!new_dirs[i])
 236             {
 237               /* FIXME have less lame handling for OOM, we just silently fail to
 238                * watch.  (In reality though, the whole OOM handling in dbus is
 239                * stupid but we won't go into that in this comment =) )
 240                */
 241               close (fd);
 242               new_fds[i] = -1;
 243             }
 244         }
 245     }
 246
 247   num_fds = i;
 248
 249   for (i = 0; i < MAX_DIRS_TO_WATCH; i++)
 250     {
 251       fds[i] = new_fds[i];
 252       dirs[i] = new_dirs[i];
 253     }
 254
 255  out:
 256   ;
 257 }