src/listensocket.cpp

   1 /*
   2  * InspIRCd -- Internet Relay Chat Daemon
   3  *
   4  *   Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
   5  *   Copyright (C) 2008 Robin Burchell <robin+git@viroteck.net>
   6  *
   7  * This file is part of InspIRCd.  InspIRCd is free software: you can
   8  * redistribute it and/or modify it under the terms of the GNU General Public
   9  * License as published by the Free Software Foundation, version 2.
  10  *
  11  * This program is distributed in the hope that it will be useful, but WITHOUT
  12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  13  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
  14  * details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20
  21 #include "inspircd.h"
  22 #include "iohook.h"
  23
  24 #ifndef _WIN32
  25 #include <netinet/tcp.h>
  26 #endif
  27
  28 ListenSocket::ListenSocket(ConfigTag* tag, const irc::sockets::sockaddrs& bind_to)
  29         : bind_tag(tag)
  30         , bind_sa(bind_to)
  31 {
  32         fd = socket(bind_to.family(), SOCK_STREAM, 0);
  33
  34         if (this->fd == -1)
  35                 return;
  36
  37 #ifdef IPV6_V6ONLY
  38         /* This OS supports IPv6 sockets that can also listen for IPv4
  39          * connections. If our address is "*" or empty, enable both v4 and v6 to
  40          * allow for simpler configuration on dual-stack hosts. Otherwise, if it
  41          * is "::" or an IPv6 address, disable support so that an IPv4 bind will
  42          * work on the port (by us or another application).
  43          */
  44         if (bind_to.family() == AF_INET6)
  45         {
  46                 std::string addr = tag->getString("address");
  47                 /* This must be >= sizeof(DWORD) on Windows */
  48                 const int enable = (addr.empty() || addr == "*") ? 0 : 1;
  49                 /* This must be before bind() */
  50                 setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, reinterpret_cast<const char *>(&enable), sizeof(enable));
  51                 // errors ignored intentionally
  52         }
  53 #endif
  54
  55         if (tag->getBool("free"))
  56         {
  57                 socklen_t enable = 1;
  58 #if defined IP_FREEBIND // Linux 2.4+
  59                 setsockopt(fd, SOL_IP, IP_FREEBIND, &enable, sizeof(enable));
  60 #elif defined IP_BINDANY // FreeBSD
  61                 setsockopt(fd, IPPROTO_IP, IP_BINDANY, &enable, sizeof(enable));
  62 #elif defined SO_BINDANY // NetBSD/OpenBSD
  63                 setsockopt(fd, SOL_SOCKET, SO_BINDANY, &enable, sizeof(enable));
  64 #else
  65                 (void)enable;
  66 #endif
  67         }
  68
  69         SocketEngine::SetReuse(fd);
  70         int rv = SocketEngine::Bind(this->fd, bind_to);
  71         if (rv >= 0)
  72                 rv = SocketEngine::Listen(this->fd, ServerInstance->Config->MaxConn);
  73
  74         // Default defer to on for TLS listeners because in TLS the client always speaks first
  75         int timeout = tag->getDuration("defer", (tag->getString("ssl").empty() ? 0 : 3));
  76         if (timeout && !rv)
  77         {
  78 #if defined TCP_DEFER_ACCEPT
  79                 setsockopt(fd, IPPROTO_TCP, TCP_DEFER_ACCEPT, &timeout, sizeof(timeout));
  80 #elif defined SO_ACCEPTFILTER
  81                 struct accept_filter_arg afa;
  82                 memset(&afa, 0, sizeof(afa));
  83                 strcpy(afa.af_name, "dataready");
  84                 setsockopt(fd, SOL_SOCKET, SO_ACCEPTFILTER, &afa, sizeof(afa));
  85 #endif
  86         }
  87
  88         if (rv < 0)
  89         {
  90                 int errstore = errno;
  91                 SocketEngine::Shutdown(this, 2);
  92                 SocketEngine::Close(this->GetFd());
  93                 this->fd = -1;
  94                 errno = errstore;
  95         }
  96         else
  97         {
  98                 SocketEngine::NonBlocking(this->fd);
  99                 SocketEngine::AddFd(this, FD_WANT_POLL_READ | FD_WANT_NO_WRITE);
 100
 101                 this->ResetIOHookProvider();
 102         }
 103 }
 104
 105 ListenSocket::~ListenSocket()
 106 {
 107         if (this->GetFd() > -1)
 108         {
 109                 ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "Shut down listener on fd %d", this->fd);
 110                 SocketEngine::Shutdown(this, 2);
 111
 112                 if (SocketEngine::Close(this) != 0)
 113                         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "Failed to cancel listener: %s", strerror(errno));
 114
 115                 if (bind_sa.family() == AF_UNIX && unlink(bind_sa.un.sun_path))
 116                         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "Failed to unlink UNIX socket: %s", strerror(errno));
 117         }
 118 }
 119
 120 void ListenSocket::OnEventHandlerRead()
 121 {
 122         irc::sockets::sockaddrs client;
 123         irc::sockets::sockaddrs server(bind_sa);
 124
 125         socklen_t length = sizeof(client);
 126         int incomingSockfd = SocketEngine::Accept(this, &client.sa, &length);
 127
 128         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "Accepting connection on socket %s fd %d", bind_sa.str().c_str(), incomingSockfd);
 129         if (incomingSockfd < 0)
 130         {
 131                 ServerInstance->stats.Refused++;
 132                 return;
 133         }
 134
 135         socklen_t sz = sizeof(server);
 136         if (getsockname(incomingSockfd, &server.sa, &sz))
 137         {
 138                 ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "Can't get peername: %s", strerror(errno));
 139         }
 140
 141         if (client.family() == AF_INET6)
 142         {
 143                 /*
 144                  * This case is the be all and end all patch to catch and nuke 4in6
 145                  * instead of special-casing shit all over the place and wreaking merry
 146                  * havoc with crap, instead, we just recreate sockaddr and strip ::ffff: prefix
 147                  * if it's a 4in6 IP.
 148                  *
 149                  * This is, of course, much improved over the older way of handling this
 150                  * (pretend it doesn't exist + hack around it -- yes, both were done!)
 151                  *
 152                  * Big, big thanks to danieldg for his work on this.
 153                  * -- w00t
 154                  */
 155                 static const unsigned char prefix4in6[12] = { 0,0,0,0, 0,0,0,0, 0,0,0xFF,0xFF };
 156                 if (!memcmp(prefix4in6, &client.in6.sin6_addr, 12))
 157                 {
 158                         // recreate as a sockaddr_in using the IPv4 IP
 159                         uint16_t sport = client.in6.sin6_port;
 160                         client.in4.sin_family = AF_INET;
 161                         client.in4.sin_port = sport;
 162                         memcpy(&client.in4.sin_addr.s_addr, client.in6.sin6_addr.s6_addr + 12, sizeof(uint32_t));
 163
 164                         sport = server.in6.sin6_port;
 165                         server.in4.sin_family = AF_INET;
 166                         server.in4.sin_port = sport;
 167                         memcpy(&server.in4.sin_addr.s_addr, server.in6.sin6_addr.s6_addr + 12, sizeof(uint32_t));
 168                 }
 169         }
 170         else if (client.family() == AF_UNIX)
 171         {
 172                 // Clients connecting via UNIX sockets don't have paths so give them
 173                 // the server path as defined in RFC 1459 section 8.1.1.
 174                 //
 175                 // strcpy is safe here because sizeof(sockaddr_un.sun_path) is equal on both.
 176                 strcpy(client.un.sun_path, server.un.sun_path);
 177         }
 178
 179         SocketEngine::NonBlocking(incomingSockfd);
 180
 181         ModResult res;
 182         FIRST_MOD_RESULT(OnAcceptConnection, res, (incomingSockfd, this, &client, &server));
 183         if (res == MOD_RES_PASSTHRU)
 184         {
 185                 std::string type = bind_tag->getString("type", "clients");
 186                 if (stdalgo::string::equalsci(type, "clients"))
 187                 {
 188                         ServerInstance->Users->AddUser(incomingSockfd, this, &client, &server);
 189                         res = MOD_RES_ALLOW;
 190                 }
 191         }
 192         if (res == MOD_RES_ALLOW)
 193         {
 194                 ServerInstance->stats.Accept++;
 195         }
 196         else
 197         {
 198                 ServerInstance->stats.Refused++;
 199                 ServerInstance->Logs->Log("SOCKET", LOG_DEFAULT, "Refusing connection on %s - %s",
 200                         bind_sa.str().c_str(), res == MOD_RES_DENY ? "Connection refused by module" : "Module for this port not found");
 201                 SocketEngine::Close(incomingSockfd);
 202         }
 203 }
 204
 205 void ListenSocket::ResetIOHookProvider()
 206 {
 207         iohookprovs[0].SetProvider(bind_tag->getString("hook"));
 208
 209         // Check that all non-last hooks support being in the middle
 210         for (IOHookProvList::iterator i = iohookprovs.begin(); i != iohookprovs.end()-1; ++i)
 211         {
 212                 IOHookProvRef& curr = *i;
 213                 // Ignore if cannot be in the middle
 214                 if ((curr) && (!curr->IsMiddle()))
 215                         curr.SetProvider(std::string());
 216         }
 217
 218         std::string provname = bind_tag->getString("ssl");
 219         if (!provname.empty())
 220                 provname.insert(0, "ssl/");
 221
 222         // SSL should be the last
 223         iohookprovs.back().SetProvider(provname);
 224 }