src/socketengines/socketengine_kqueue.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd: (C) 2002-2009 InspIRCd Development Team
   6  * See: http://wiki.inspircd.org/Credits
   7  *
   8  * This program is free but copyrighted software; see
   9  *          the file COPYING for details.
  10  *
  11  * ---------------------------------------------------
  12  */
  13
  14 #include "inspircd.h"
  15 #include "exitcodes.h"
  16 #include <sys/types.h>
  17 #include <sys/event.h>
  18 #include <sys/time.h>
  19 #include "socketengines/socketengine_kqueue.h"
  20 #include <sys/sysctl.h>
  21
  22 KQueueEngine::KQueueEngine()
  23 {
  24         MAX_DESCRIPTORS = 0;
  25         this->RecoverFromFork();
  26         ke_list = new struct kevent[GetMaxFds()];
  27         ref = new EventHandler* [GetMaxFds()];
  28         memset(ref, 0, GetMaxFds() * sizeof(EventHandler*));
  29 }
  30
  31 void KQueueEngine::RecoverFromFork()
  32 {
  33         /*
  34          * The only bad thing about kqueue is that its fd cant survive a fork and is not inherited.
  35          * BUM HATS.
  36          *
  37          */
  38         EngineHandle = kqueue();
  39         if (EngineHandle == -1)
  40         {
  41                 ServerInstance->Logs->Log("SOCKET",DEFAULT, "ERROR: Could not initialize socket engine. Your kernel probably does not have the proper features.");
  42                 ServerInstance->Logs->Log("SOCKET",DEFAULT, "ERROR: this is a fatal error, exiting now.");
  43                 printf("ERROR: Could not initialize socket engine. Your kernel probably does not have the proper features.\n");
  44                 printf("ERROR: this is a fatal error, exiting now.\n");
  45                 ServerInstance->Exit(EXIT_STATUS_SOCKETENGINE);
  46         }
  47         CurrentSetSize = 0;
  48 }
  49
  50 KQueueEngine::~KQueueEngine()
  51 {
  52         this->Close(EngineHandle);
  53         delete[] ref;
  54         delete[] ke_list;
  55 }
  56
  57 bool KQueueEngine::AddFd(EventHandler* eh, int event_mask)
  58 {
  59         int fd = eh->GetFd();
  60
  61         if ((fd < 0) || (fd > GetMaxFds() - 1))
  62                 return false;
  63
  64         if (ref[fd])
  65                 return false;
  66
  67         // We always want to read from the socket...
  68         struct kevent ke;
  69         EV_SET(&ke, fd, EVFILT_READ, EV_ADD, 0, 0, NULL);
  70
  71         int i = kevent(EngineHandle, &ke, 1, 0, 0, NULL);
  72         if (i == -1)
  73         {
  74                 ServerInstance->Logs->Log("SOCKET",DEFAULT,"Failed to add fd: %d %s",
  75                                           fd, strerror(errno));
  76                 return false;
  77         }
  78
  79         if (event_mask & (FD_WANT_POLL_WRITE | FD_WANT_FAST_WRITE | FD_WANT_SINGLE_WRITE)) {
  80                 // ...and sometimes want to write
  81                 WantWrite(eh);
  82         }
  83
  84         ref[fd] = eh;
  85         SocketEngine::SetEventMask(eh, event_mask);
  86         CurrentSetSize++;
  87
  88         ServerInstance->Logs->Log("SOCKET",DEBUG,"New file descriptor: %d", fd);
  89         return true;
  90 }
  91
  92 bool KQueueEngine::DelFd(EventHandler* eh, bool force)
  93 {
  94         int fd = eh->GetFd();
  95
  96         if ((fd < 0) || (fd > GetMaxFds() - 1))
  97         {
  98                 ServerInstance->Logs->Log("SOCKET",DEFAULT,"DelFd() on invalid fd: %d", fd);
  99                 return false;
 100         }
 101
 102         struct kevent ke;
 103
 104         // First remove the write filter ignoring errors, since we can't be
 105         // sure if there are actually any write filters registered.
 106         EV_SET(&ke, eh->GetFd(), EVFILT_WRITE, EV_DELETE, 0, 0, NULL);
 107         kevent(EngineHandle, &ke, 1, 0, 0, NULL);
 108
 109         // Then remove the read filter.
 110         EV_SET(&ke, eh->GetFd(), EVFILT_READ, EV_DELETE, 0, 0, NULL);
 111         int j = kevent(EngineHandle, &ke, 1, 0, 0, NULL);
 112
 113         if ((j < 0) && !force)
 114         {
 115                 ServerInstance->Logs->Log("SOCKET",DEFAULT,"Failed to remove fd: %d %s",
 116                                           fd, strerror(errno));
 117                 return false;
 118         }
 119
 120         CurrentSetSize--;
 121         ref[fd] = NULL;
 122
 123         ServerInstance->Logs->Log("SOCKET",DEBUG,"Remove file descriptor: %d", fd);
 124         return true;
 125 }
 126
 127 void KQueueEngine::OnSetEvent(EventHandler* eh, int old_mask, int new_mask)
 128 {
 129         if ((new_mask & FD_WANT_POLL_WRITE) && !(old_mask & FD_WANT_POLL_WRITE))
 130         {
 131                 // new poll-style write
 132                 struct kevent ke;
 133                 EV_SET(&ke, eh->GetFd(), EVFILT_WRITE, EV_ADD, 0, 0, NULL);
 134                 int i = kevent(EngineHandle, &ke, 1, 0, 0, NULL);
 135                 if (i < 0) {
 136                         ServerInstance->Logs->Log("SOCKET",DEFAULT,"Failed to mark for writing: %d %s",
 137                                                   eh->GetFd(), strerror(errno));
 138                 }
 139         }
 140         else if ((old_mask & FD_WANT_POLL_WRITE) && !(new_mask & FD_WANT_POLL_WRITE))
 141         {
 142                 // removing poll-style write
 143                 struct kevent ke;
 144                 EV_SET(&ke, eh->GetFd(), EVFILT_WRITE, EV_DELETE, 0, 0, NULL);
 145                 int i = kevent(EngineHandle, &ke, 1, 0, 0, NULL);
 146                 if (i < 0) {
 147                         ServerInstance->Logs->Log("SOCKET",DEFAULT,"Failed to mark for writing: %d %s",
 148                                                   eh->GetFd(), strerror(errno));
 149                 }
 150         }
 151         if ((new_mask & (FD_WANT_FAST_WRITE | FD_WANT_SINGLE_WRITE)) && !(old_mask & (FD_WANT_FAST_WRITE | FD_WANT_SINGLE_WRITE)))
 152         {
 153                 // new one-shot write
 154                 struct kevent ke;
 155                 EV_SET(&ke, eh->GetFd(), EVFILT_WRITE, EV_ADD | EV_ONESHOT, 0, 0, NULL);
 156                 int i = kevent(EngineHandle, &ke, 1, 0, 0, NULL);
 157                 if (i < 0) {
 158                         ServerInstance->Logs->Log("SOCKET",DEFAULT,"Failed to mark for writing: %d %s",
 159                                                   eh->GetFd(), strerror(errno));
 160                 }
 161         }
 162 }
 163
 164 int KQueueEngine::DispatchEvents()
 165 {
 166         ts.tv_nsec = 0;
 167         ts.tv_sec = 1;
 168
 169         int i = kevent(EngineHandle, NULL, 0, &ke_list[0], GetMaxFds(), &ts);
 170
 171         TotalEvents += i;
 172
 173         for (int j = 0; j < i; j++)
 174         {
 175                 EventHandler* eh = ref[ke_list[j].ident];
 176                 if (!eh)
 177                         continue;
 178                 if (ke_list[j].flags & EV_EOF)
 179                 {
 180                         ErrorEvents++;
 181                         eh->HandleEvent(EVENT_ERROR, ke_list[j].fflags);
 182                         continue;
 183                 }
 184                 if (ke_list[j].filter == EVFILT_WRITE)
 185                 {
 186                         WriteEvents++;
 187                         /* When mask is FD_WANT_FAST_WRITE or FD_WANT_SINGLE_WRITE,
 188                          * we set a one-shot write, so we need to clear that bit
 189                          * to detect when it set again.
 190                          */
 191                         const int bits_to_clr = FD_WANT_SINGLE_WRITE | FD_WANT_FAST_WRITE | FD_WRITE_WILL_BLOCK;
 192                         SetEventMask(eh, eh->GetEventMask() & ~bits_to_clr);
 193                         eh->HandleEvent(EVENT_WRITE);
 194                 }
 195                 if (ke_list[j].filter == EVFILT_READ)
 196                 {
 197                         ReadEvents++;
 198                         SetEventMask(eh, eh->GetEventMask() & ~FD_READ_WILL_BLOCK);
 199                         eh->HandleEvent(EVENT_READ);
 200                 }
 201         }
 202
 203         return i;
 204 }
 205
 206 std::string KQueueEngine::GetName()
 207 {
 208         return "kqueue";
 209 }