src/socket.cpp

   1 /*
   2  * InspIRCd -- Internet Relay Chat Daemon
   3  *
   4  *   Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
   5  *   Copyright (C) 2007-2008 Robin Burchell <robin+git@viroteck.net>
   6  *   Copyright (C) 2005-2008 Craig Edwards <craigedwards@brainbox.cc>
   7  *   Copyright (C) 2007 Dennis Friis <peavey@inspircd.org>
   8  *   Copyright (C) 2006 Oliver Lupton <oliverlupton@gmail.com>
   9  *
  10  * This file is part of InspIRCd.  InspIRCd is free software: you can
  11  * redistribute it and/or modify it under the terms of the GNU General Public
  12  * License as published by the Free Software Foundation, version 2.
  13  *
  14  * This program is distributed in the hope that it will be useful, but WITHOUT
  15  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  16  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
  17  * details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  21  */
  22
  23
  24 #include "inspircd.h"
  25
  26 bool InspIRCd::BindPort(ConfigTag* tag, const irc::sockets::sockaddrs& sa, std::vector<ListenSocket*>& old_ports)
  27 {
  28         for (std::vector<ListenSocket*>::iterator n = old_ports.begin(); n != old_ports.end(); ++n)
  29         {
  30                 if ((**n).bind_sa == sa)
  31                 {
  32                         // Replace tag, we know addr and port match, but other info (type, ssl) may not.
  33                         ServerInstance->Logs->Log("SOCKET", LOG_DEFAULT, "Replacing listener on %s from old tag at %s with new tag from %s",
  34                                 sa.str().c_str(), (*n)->bind_tag->getTagLocation().c_str(), tag->getTagLocation().c_str());
  35                         (*n)->bind_tag = tag;
  36                         (*n)->ResetIOHookProvider();
  37
  38                         old_ports.erase(n);
  39                         return true;
  40                 }
  41         }
  42
  43         ListenSocket* ll = new ListenSocket(tag, sa);
  44         if (ll->GetFd() < 0)
  45         {
  46                 ServerInstance->Logs->Log("SOCKET", LOG_DEFAULT, "Failed to listen on %s from tag at %s: %s",
  47                         sa.str().c_str(), tag->getTagLocation().c_str(), strerror(errno));
  48                 delete ll;
  49                 return false;
  50         }
  51
  52         ServerInstance->Logs->Log("SOCKET", LOG_DEFAULT, "Added a listener on %s from tag at %s", sa.str().c_str(), tag->getTagLocation().c_str());
  53         ports.push_back(ll);
  54         return true;
  55 }
  56
  57 int InspIRCd::BindPorts(FailedPortList& failed_ports)
  58 {
  59         int bound = 0;
  60         std::vector<ListenSocket*> old_ports(ports.begin(), ports.end());
  61
  62         ConfigTagList tags = ServerInstance->Config->ConfTags("bind");
  63         for (ConfigIter i = tags.first; i != tags.second; ++i)
  64         {
  65                 ConfigTag* tag = i->second;
  66
  67                 // Are we creating a TCP/IP listener?
  68                 const std::string address = tag->getString("address");
  69                 const std::string portlist = tag->getString("port");
  70                 if (!address.empty() || !portlist.empty())
  71                 {
  72                         // InspIRCd supports IPv4 and IPv6 natively; no 4in6 required.
  73                         if (strncasecmp(address.c_str(), "::ffff:", 7) == 0)
  74                                 this->Logs->Log("SOCKET", LOG_DEFAULT, "Using 4in6 (::ffff:) isn't recommended. You should bind IPv4 addresses directly instead.");
  75
  76                         // A TCP listener with no ports is not very useful.
  77                         if (portlist.empty())
  78                                 this->Logs->Log("SOCKET", LOG_DEFAULT, "TCP listener on %s at %s has no ports specified!",
  79                                         address.empty() ? "*" : address.c_str(), tag->getTagLocation().c_str());
  80
  81                         irc::portparser portrange(portlist, false);
  82                         for (int port; (port = portrange.GetToken()); )
  83                         {
  84                                 irc::sockets::sockaddrs bindspec;
  85                                 if (!irc::sockets::aptosa(address, port, bindspec))
  86                                         continue;
  87
  88                                 if (!BindPort(tag, bindspec, old_ports))
  89                                         failed_ports.push_back(std::make_pair(bindspec, errno));
  90                                 else
  91                                         bound++;
  92                         }
  93                         continue;
  94                 }
  95
  96 #ifndef _WIN32
  97                 // Are we creating a UNIX listener?
  98                 const std::string path = tag->getString("path");
  99                 if (!path.empty())
 100                 {
 101                         // UNIX socket paths are length limited to less than PATH_MAX.
 102                         irc::sockets::sockaddrs bindspec;
 103                         if (path.length() > std::min(ServerInstance->Config->Limits.MaxHost, sizeof(bindspec.un.sun_path)))
 104                         {
 105                                 this->Logs->Log("SOCKET", LOG_DEFAULT, "UNIX listener on %s at %s specified a path that is too long!",
 106                                         path.c_str(), tag->getTagLocation().c_str());
 107                                 continue;
 108                         }
 109
 110                         // Check for characters which are problematic in the IRC message format.
 111                         if (path.find_first_of("\n\r\t!@: ") != std::string::npos)
 112                         {
 113                                 this->Logs->Log("SOCKET", LOG_DEFAULT, "UNIX listener on %s at %s specified a path containing invalid characters!",
 114                                         path.c_str(), tag->getTagLocation().c_str());
 115                                 continue;
 116                         }
 117
 118                         // Create the bindspec manually (aptosa doesn't work with AF_UNIX yet).
 119                         memset(&bindspec, 0, sizeof(bindspec));
 120                         bindspec.un.sun_family = AF_UNIX;
 121                         memcpy(&bindspec.un.sun_path, path.c_str(), sizeof(bindspec.un.sun_path));
 122
 123                         if (!BindPort(tag, bindspec, old_ports))
 124                                 failed_ports.push_back(std::make_pair(bindspec, errno));
 125                         else
 126                                 bound++;
 127                 }
 128 #endif
 129         }
 130
 131         std::vector<ListenSocket*>::iterator n = ports.begin();
 132         for (std::vector<ListenSocket*>::iterator o = old_ports.begin(); o != old_ports.end(); ++o)
 133         {
 134                 while (n != ports.end() && *n != *o)
 135                         n++;
 136                 if (n == ports.end())
 137                 {
 138                         this->Logs->Log("SOCKET", LOG_DEFAULT, "Port bindings slipped out of vector, aborting close!");
 139                         break;
 140                 }
 141
 142                 this->Logs->Log("SOCKET", LOG_DEFAULT, "Port binding %s was removed from the config file, closing.",
 143                         (**n).bind_sa.str().c_str());
 144                 delete *n;
 145
 146                 // this keeps the iterator valid, pointing to the next element
 147                 n = ports.erase(n);
 148         }
 149
 150         return bound;
 151 }
 152
 153 bool irc::sockets::aptosa(const std::string& addr, int port, irc::sockets::sockaddrs& sa)
 154 {
 155         memset(&sa, 0, sizeof(sa));
 156         if (addr.empty() || addr.c_str()[0] == '*')
 157         {
 158                 if (ServerInstance->Config->WildcardIPv6)
 159                 {
 160                         sa.in6.sin6_family = AF_INET6;
 161                         sa.in6.sin6_port = htons(port);
 162                 }
 163                 else
 164                 {
 165                         sa.in4.sin_family = AF_INET;
 166                         sa.in4.sin_port = htons(port);
 167                 }
 168                 return true;
 169         }
 170         else if (inet_pton(AF_INET, addr.c_str(), &sa.in4.sin_addr) > 0)
 171         {
 172                 sa.in4.sin_family = AF_INET;
 173                 sa.in4.sin_port = htons(port);
 174                 return true;
 175         }
 176         else if (inet_pton(AF_INET6, addr.c_str(), &sa.in6.sin6_addr) > 0)
 177         {
 178                 sa.in6.sin6_family = AF_INET6;
 179                 sa.in6.sin6_port = htons(port);
 180                 return true;
 181         }
 182         return false;
 183 }
 184
 185 int irc::sockets::sockaddrs::family() const
 186 {
 187         return sa.sa_family;
 188 }
 189
 190 int irc::sockets::sockaddrs::port() const
 191 {
 192         switch (family())
 193         {
 194                 case AF_INET:
 195                         return ntohs(in4.sin_port);
 196
 197                 case AF_INET6:
 198                         return ntohs(in6.sin6_port);
 199
 200                 case AF_UNIX:
 201                         return 0;
 202         }
 203
 204         // If we have reached this point then we have encountered a bug.
 205         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: irc::sockets::sockaddrs::port(): socket type %d is unknown!", family());
 206         return 0;
 207 }
 208
 209 std::string irc::sockets::sockaddrs::addr() const
 210 {
 211         switch (family())
 212         {
 213                 case AF_INET:
 214                         char ip4addr[INET_ADDRSTRLEN];
 215                         if (!inet_ntop(AF_INET, (void*)&in4.sin_addr, ip4addr, sizeof(ip4addr)))
 216                                 return "0.0.0.0";
 217                         return ip4addr;
 218
 219                 case AF_INET6:
 220                         char ip6addr[INET6_ADDRSTRLEN];
 221                         if (!inet_ntop(AF_INET6, (void*)&in6.sin6_addr, ip6addr, sizeof(ip6addr)))
 222                                 return "0:0:0:0:0:0:0:0";
 223                         return ip6addr;
 224
 225                 case AF_UNIX:
 226                         return un.sun_path;
 227         }
 228
 229         // If we have reached this point then we have encountered a bug.
 230         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: irc::sockets::sockaddrs::addr(): socket type %d is unknown!", family());
 231         return "<unknown>";
 232 }
 233
 234 std::string irc::sockets::sockaddrs::str() const
 235 {
 236         switch (family())
 237         {
 238                 case AF_INET:
 239                         char ip4addr[INET_ADDRSTRLEN];
 240                         if (!inet_ntop(AF_INET, (void*)&in4.sin_addr, ip4addr, sizeof(ip4addr)))
 241                                 strcpy(ip4addr, "0.0.0.0");
 242                         return InspIRCd::Format("%s:%u", ip4addr, ntohs(in4.sin_port));
 243
 244                 case AF_INET6:
 245                         char ip6addr[INET6_ADDRSTRLEN];
 246                         if (!inet_ntop(AF_INET6, (void*)&in6.sin6_addr, ip6addr, sizeof(ip6addr)))
 247                                 strcpy(ip6addr, "0:0:0:0:0:0:0:0");
 248                         return InspIRCd::Format("[%s]:%u", ip6addr, ntohs(in6.sin6_port));
 249
 250                 case AF_UNIX:
 251                         return un.sun_path;
 252         }
 253
 254         // If we have reached this point then we have encountered a bug.
 255         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: irc::sockets::sockaddrs::str(): socket type %d is unknown!", family());
 256         return "<unknown>";
 257 }
 258
 259 socklen_t irc::sockets::sockaddrs::sa_size() const
 260 {
 261         switch (family())
 262         {
 263                 case AF_INET:
 264                         return sizeof(in4);
 265
 266                 case AF_INET6:
 267                         return sizeof(in6);
 268
 269                 case AF_UNIX:
 270                         return sizeof(un);
 271         }
 272
 273         // If we have reached this point then we have encountered a bug.
 274         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: irc::sockets::sockaddrs::sa_size(): socket type %d is unknown!", family());
 275         return 0;
 276 }
 277
 278 bool irc::sockets::sockaddrs::operator==(const irc::sockets::sockaddrs& other) const
 279 {
 280         if (family() != other.family())
 281                 return false;
 282
 283         switch (family())
 284         {
 285                 case AF_INET:
 286                         return (in4.sin_port == other.in4.sin_port) && (in4.sin_addr.s_addr == other.in4.sin_addr.s_addr);
 287
 288                 case AF_INET6:
 289                         return (in6.sin6_port == other.in6.sin6_port) && !memcmp(in6.sin6_addr.s6_addr, other.in6.sin6_addr.s6_addr, 16);
 290
 291                 case AF_UNIX:
 292                         return !strcmp(un.sun_path, other.un.sun_path);
 293         }
 294
 295         // If we have reached this point then we have encountered a bug.
 296         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: irc::sockets::sockaddrs::operator==(): socket type %d is unknown!", family());
 297         return !memcmp(this, &other, sizeof(*this));
 298 }
 299
 300 static void sa2cidr(irc::sockets::cidr_mask& cidr, const irc::sockets::sockaddrs& sa, unsigned char range)
 301 {
 302         const unsigned char* base;
 303         unsigned char target_byte;
 304
 305         memset(cidr.bits, 0, sizeof(cidr.bits));
 306
 307         cidr.type = sa.family();
 308         switch (cidr.type)
 309         {
 310                 case AF_UNIX:
 311                         // XXX: UNIX sockets don't support CIDR. This fix is non-ideal but I can't
 312                         // really think of another way to handle it.
 313                         cidr.length = 0;
 314                         return;
 315
 316                 case AF_INET:
 317                         cidr.length = range > 32 ? 32 : range;
 318                         target_byte = sizeof(sa.in4.sin_addr);
 319                         base = (unsigned char*)&sa.in4.sin_addr;
 320                         break;
 321
 322                 case AF_INET6:
 323                         cidr.length = range > 128 ? 128 : range;
 324                         target_byte = sizeof(sa.in6.sin6_addr);
 325                         base = (unsigned char*)&sa.in6.sin6_addr;
 326                         break;
 327
 328                 default:
 329                         // If we have reached this point then we have encountered a bug.
 330                         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: sa2cidr(): socket type %d is unknown!", cidr.type);
 331                         cidr.length = 0;
 332                         return;
 333         }
 334
 335         unsigned int border = cidr.length / 8;
 336         unsigned int bitmask = (0xFF00 >> (range & 7)) & 0xFF;
 337         for(unsigned int i=0; i < target_byte; i++)
 338         {
 339                 if (i < border)
 340                         cidr.bits[i] = base[i];
 341                 else if (i == border)
 342                         cidr.bits[i] = base[i] & bitmask;
 343                 else
 344                         return;
 345         }
 346 }
 347
 348 irc::sockets::cidr_mask::cidr_mask(const irc::sockets::sockaddrs& sa, unsigned char range)
 349 {
 350         sa2cidr(*this, sa, range);
 351 }
 352
 353 irc::sockets::cidr_mask::cidr_mask(const std::string& mask)
 354 {
 355         std::string::size_type bits_chars = mask.rfind('/');
 356         irc::sockets::sockaddrs sa;
 357
 358         if (bits_chars == std::string::npos)
 359         {
 360                 irc::sockets::aptosa(mask, 0, sa);
 361                 sa2cidr(*this, sa, 128);
 362         }
 363         else
 364         {
 365                 unsigned char range = ConvToNum<unsigned char>(mask.substr(bits_chars + 1));
 366                 irc::sockets::aptosa(mask.substr(0, bits_chars), 0, sa);
 367                 sa2cidr(*this, sa, range);
 368         }
 369 }
 370
 371 std::string irc::sockets::cidr_mask::str() const
 372 {
 373         irc::sockets::sockaddrs sa;
 374         sa.sa.sa_family = type;
 375
 376         unsigned char* base;
 377         size_t len;
 378         switch (type)
 379         {
 380                 case AF_INET:
 381                         base = (unsigned char*)&sa.in4.sin_addr;
 382                         len = 4;
 383                         break;
 384
 385                 case AF_INET6:
 386                         base = (unsigned char*)&sa.in6.sin6_addr;
 387                         len = 16;
 388                         break;
 389
 390                 case AF_UNIX:
 391                         return sa.un.sun_path;
 392
 393                 default:
 394                         // If we have reached this point then we have encountered a bug.
 395                         ServerInstance->Logs->Log("SOCKET", LOG_DEBUG, "BUG: irc::sockets::cidr_mask::str(): socket type %d is unknown!", type);
 396                         return "<unknown>";
 397         }
 398
 399         memcpy(base, bits, len);
 400         return sa.addr() + "/" + ConvToStr((int)length);
 401 }
 402
 403 bool irc::sockets::cidr_mask::operator==(const cidr_mask& other) const
 404 {
 405         return type == other.type && length == other.length &&
 406                 0 == memcmp(bits, other.bits, 16);
 407 }
 408
 409 bool irc::sockets::cidr_mask::operator<(const cidr_mask& other) const
 410 {
 411         if (type != other.type)
 412                 return type < other.type;
 413         if (length != other.length)
 414                 return length < other.length;
 415         return memcmp(bits, other.bits, 16) < 0;
 416 }
 417
 418 bool irc::sockets::cidr_mask::match(const irc::sockets::sockaddrs& addr) const
 419 {
 420         if (addr.family() != type)
 421                 return false;
 422         irc::sockets::cidr_mask tmp(addr, length);
 423         return tmp == *this;
 424 }