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 using irc::sockets::sockaddrs;
  27
  28 /** This will bind a socket to a port. It works for UDP/TCP.
  29  * It can only bind to IP addresses, if you wish to bind to hostnames
  30  * you should first resolve them using class 'Resolver'.
  31  */
  32 bool InspIRCd::BindSocket(int sockfd, int port, const char* addr, bool dolisten)
  33 {
  34         sockaddrs servaddr;
  35         int ret;
  36
  37         if ((*addr == '*' || *addr == '\0') && port == -1)
  38         {
  39                 /* Port -1: Means UDP IPV4 port binding - Special case
  40                  * used by DNS engine.
  41                  */
  42                 memset(&servaddr, 0, sizeof(servaddr));
  43                 servaddr.in4.sin_family = AF_INET;
  44         }
  45         else if (!irc::sockets::aptosa(addr, port, servaddr))
  46                 return false;
  47
  48         ret = SocketEngine::Bind(sockfd, servaddr);
  49
  50         if (ret < 0)
  51         {
  52                 return false;
  53         }
  54         else
  55         {
  56                 if (dolisten)
  57                 {
  58                         if (SocketEngine::Listen(sockfd, Config->MaxConn) == -1)
  59                         {
  60                                 this->Logs->Log("SOCKET", LOG_DEFAULT, "ERROR in listen(): %s",strerror(errno));
  61                                 return false;
  62                         }
  63                         else
  64                         {
  65                                 this->Logs->Log("SOCKET", LOG_DEBUG, "New socket binding for %d with listen: %s:%d", sockfd, addr, port);
  66                                 SocketEngine::NonBlocking(sockfd);
  67                                 return true;
  68                         }
  69                 }
  70                 else
  71                 {
  72                         this->Logs->Log("SOCKET", LOG_DEBUG, "New socket binding for %d without listen: %s:%d", sockfd, addr, port);
  73                         return true;
  74                 }
  75         }
  76 }
  77
  78 int InspIRCd::BindPorts(FailedPortList &failed_ports)
  79 {
  80         int bound = 0;
  81         std::vector<ListenSocket*> old_ports(ports.begin(), ports.end());
  82
  83         ConfigTagList tags = ServerInstance->Config->ConfTags("bind");
  84         for(ConfigIter i = tags.first; i != tags.second; ++i)
  85         {
  86                 ConfigTag* tag = i->second;
  87                 std::string porttag = tag->getString("port");
  88                 std::string Addr = tag->getString("address");
  89
  90                 if (strncasecmp(Addr.c_str(), "::ffff:", 7) == 0)
  91                         this->Logs->Log("SOCKET", LOG_DEFAULT, "Using 4in6 (::ffff:) isn't recommended. You should bind IPv4 addresses directly instead.");
  92
  93                 irc::portparser portrange(porttag, false);
  94                 int portno = -1;
  95                 while (0 != (portno = portrange.GetToken()))
  96                 {
  97                         irc::sockets::sockaddrs bindspec;
  98                         if (!irc::sockets::aptosa(Addr, portno, bindspec))
  99                                 continue;
 100                         std::string bind_readable = bindspec.str();
 101
 102                         bool skip = false;
 103                         for (std::vector<ListenSocket*>::iterator n = old_ports.begin(); n != old_ports.end(); ++n)
 104                         {
 105                                 if ((**n).bind_desc == bind_readable)
 106                                 {
 107                                         (*n)->bind_tag = tag; // Replace tag, we know addr and port match, but other info (type, ssl) may not
 108                                         (*n)->ResetIOHookProvider();
 109
 110                                         skip = true;
 111                                         old_ports.erase(n);
 112                                         break;
 113                                 }
 114                         }
 115                         if (!skip)
 116                         {
 117                                 ListenSocket* ll = new ListenSocket(tag, bindspec);
 118
 119                                 if (ll->GetFd() > -1)
 120                                 {
 121                                         bound++;
 122                                         ports.push_back(ll);
 123                                 }
 124                                 else
 125                                 {
 126                                         failed_ports.push_back(std::make_pair(bind_readable, strerror(errno)));
 127                                         delete ll;
 128                                 }
 129                         }
 130                 }
 131         }
 132
 133         std::vector<ListenSocket*>::iterator n = ports.begin();
 134         for (std::vector<ListenSocket*>::iterator o = old_ports.begin(); o != old_ports.end(); ++o)
 135         {
 136                 while (n != ports.end() && *n != *o)
 137                         n++;
 138                 if (n == ports.end())
 139                 {
 140                         this->Logs->Log("SOCKET", LOG_DEFAULT, "Port bindings slipped out of vector, aborting close!");
 141                         break;
 142                 }
 143
 144                 this->Logs->Log("SOCKET", LOG_DEFAULT, "Port binding %s was removed from the config file, closing.",
 145                         (**n).bind_desc.c_str());
 146                 delete *n;
 147
 148                 // this keeps the iterator valid, pointing to the next element
 149                 n = ports.erase(n);
 150         }
 151
 152         return bound;
 153 }
 154
 155 bool irc::sockets::aptosa(const std::string& addr, int port, irc::sockets::sockaddrs& sa)
 156 {
 157         memset(&sa, 0, sizeof(sa));
 158         if (addr.empty() || addr.c_str()[0] == '*')
 159         {
 160                 if (ServerInstance->Config->WildcardIPv6)
 161                 {
 162                         sa.in6.sin6_family = AF_INET6;
 163                         sa.in6.sin6_port = htons(port);
 164                 }
 165                 else
 166                 {
 167                         sa.in4.sin_family = AF_INET;
 168                         sa.in4.sin_port = htons(port);
 169                 }
 170                 return true;
 171         }
 172         else if (inet_pton(AF_INET, addr.c_str(), &sa.in4.sin_addr) > 0)
 173         {
 174                 sa.in4.sin_family = AF_INET;
 175                 sa.in4.sin_port = htons(port);
 176                 return true;
 177         }
 178         else if (inet_pton(AF_INET6, addr.c_str(), &sa.in6.sin6_addr) > 0)
 179         {
 180                 sa.in6.sin6_family = AF_INET6;
 181                 sa.in6.sin6_port = htons(port);
 182                 return true;
 183         }
 184         return false;
 185 }
 186
 187 int irc::sockets::sockaddrs::port() const
 188 {
 189         if (sa.sa_family == AF_INET)
 190                 return ntohs(in4.sin_port);
 191         if (sa.sa_family == AF_INET6)
 192                 return ntohs(in6.sin6_port);
 193         return -1;
 194 }
 195
 196 std::string irc::sockets::sockaddrs::addr() const
 197 {
 198         char addrv[INET6_ADDRSTRLEN+1];
 199         if (sa.sa_family == AF_INET)
 200         {
 201                 if (!inet_ntop(AF_INET, &in4.sin_addr, addrv, sizeof(addrv)))
 202                         return "";
 203                 return addrv;
 204         }
 205         else if (sa.sa_family == AF_INET6)
 206         {
 207                 if (!inet_ntop(AF_INET6, &in6.sin6_addr, addrv, sizeof(addrv)))
 208                         return "";
 209                 return addrv;
 210         }
 211         return "";
 212 }
 213
 214 bool irc::sockets::satoap(const irc::sockets::sockaddrs& sa, std::string& addr, int &port)
 215 {
 216         port = sa.port();
 217         addr = sa.addr();
 218         return !addr.empty();
 219 }
 220
 221 std::string irc::sockets::sockaddrs::str() const
 222 {
 223         if (sa.sa_family == AF_INET)
 224         {
 225                 char ipaddr[INET_ADDRSTRLEN];
 226                 inet_ntop(AF_INET, &in4.sin_addr, ipaddr, sizeof(ipaddr));
 227                 return InspIRCd::Format("%s:%u", ipaddr, ntohs(in4.sin_port));
 228         }
 229
 230         if (sa.sa_family == AF_INET6)
 231         {
 232                 char ipaddr[INET6_ADDRSTRLEN];
 233                 inet_ntop(AF_INET6, &in6.sin6_addr, ipaddr, sizeof(ipaddr));
 234                 return InspIRCd::Format("[%s]:%u", ipaddr, ntohs(in6.sin6_port));
 235         }
 236
 237         // This should never happen.
 238         return "<unknown>";
 239 }
 240
 241 int irc::sockets::sockaddrs::sa_size() const
 242 {
 243         if (sa.sa_family == AF_INET)
 244                 return sizeof(in4);
 245         if (sa.sa_family == AF_INET6)
 246                 return sizeof(in6);
 247         return 0;
 248 }
 249
 250 bool irc::sockets::sockaddrs::operator==(const irc::sockets::sockaddrs& other) const
 251 {
 252         if (sa.sa_family != other.sa.sa_family)
 253                 return false;
 254         if (sa.sa_family == AF_INET)
 255                 return (in4.sin_port == other.in4.sin_port) && (in4.sin_addr.s_addr == other.in4.sin_addr.s_addr);
 256         if (sa.sa_family == AF_INET6)
 257                 return (in6.sin6_port == other.in6.sin6_port) && !memcmp(in6.sin6_addr.s6_addr, other.in6.sin6_addr.s6_addr, 16);
 258         return !memcmp(this, &other, sizeof(*this));
 259 }
 260
 261 static void sa2cidr(irc::sockets::cidr_mask& cidr, const irc::sockets::sockaddrs& sa, int range)
 262 {
 263         const unsigned char* base;
 264         unsigned char target_byte;
 265         cidr.type = sa.sa.sa_family;
 266
 267         memset(cidr.bits, 0, sizeof(cidr.bits));
 268
 269         if (cidr.type == AF_INET)
 270         {
 271                 target_byte = sizeof(sa.in4.sin_addr);
 272                 base = (unsigned char*)&sa.in4.sin_addr;
 273                 if (range > 32)
 274                         range = 32;
 275         }
 276         else if (cidr.type == AF_INET6)
 277         {
 278                 target_byte = sizeof(sa.in6.sin6_addr);
 279                 base = (unsigned char*)&sa.in6.sin6_addr;
 280                 if (range > 128)
 281                         range = 128;
 282         }
 283         else
 284         {
 285                 cidr.length = 0;
 286                 return;
 287         }
 288         cidr.length = range;
 289         unsigned int border = range / 8;
 290         unsigned int bitmask = (0xFF00 >> (range & 7)) & 0xFF;
 291         for(unsigned int i=0; i < target_byte; i++)
 292         {
 293                 if (i < border)
 294                         cidr.bits[i] = base[i];
 295                 else if (i == border)
 296                         cidr.bits[i] = base[i] & bitmask;
 297                 else
 298                         return;
 299         }
 300 }
 301
 302 irc::sockets::cidr_mask::cidr_mask(const irc::sockets::sockaddrs& sa, int range)
 303 {
 304         sa2cidr(*this, sa, range);
 305 }
 306
 307 irc::sockets::cidr_mask::cidr_mask(const std::string& mask)
 308 {
 309         std::string::size_type bits_chars = mask.rfind('/');
 310         irc::sockets::sockaddrs sa;
 311
 312         if (bits_chars == std::string::npos)
 313         {
 314                 irc::sockets::aptosa(mask, 0, sa);
 315                 sa2cidr(*this, sa, 128);
 316         }
 317         else
 318         {
 319                 int range = ConvToInt(mask.substr(bits_chars + 1));
 320                 irc::sockets::aptosa(mask.substr(0, bits_chars), 0, sa);
 321                 sa2cidr(*this, sa, range);
 322         }
 323 }
 324
 325 std::string irc::sockets::cidr_mask::str() const
 326 {
 327         irc::sockets::sockaddrs sa;
 328         sa.sa.sa_family = type;
 329         unsigned char* base;
 330         int len;
 331         if (type == AF_INET)
 332         {
 333                 base = (unsigned char*)&sa.in4.sin_addr;
 334                 len = 4;
 335         }
 336         else if (type == AF_INET6)
 337         {
 338                 base = (unsigned char*)&sa.in6.sin6_addr;
 339                 len = 16;
 340         }
 341         else
 342                 return "";
 343         memcpy(base, bits, len);
 344         return sa.addr() + "/" + ConvToStr((int)length);
 345 }
 346
 347 bool irc::sockets::cidr_mask::operator==(const cidr_mask& other) const
 348 {
 349         return type == other.type && length == other.length &&
 350                 0 == memcmp(bits, other.bits, 16);
 351 }
 352
 353 bool irc::sockets::cidr_mask::operator<(const cidr_mask& other) const
 354 {
 355         if (type != other.type)
 356                 return type < other.type;
 357         if (length != other.length)
 358                 return length < other.length;
 359         return memcmp(bits, other.bits, 16) < 0;
 360 }
 361
 362 bool irc::sockets::cidr_mask::match(const irc::sockets::sockaddrs& addr) const
 363 {
 364         if (addr.sa.sa_family != type)
 365                 return false;
 366         irc::sockets::cidr_mask tmp(addr, length);
 367         return tmp == *this;
 368 }