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