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", LOG_DEFAULT, "ERROR in listen(): %s",strerror(errno));
  62                                 return false;
  63                         }
  64                         else
  65                         {
  66                                 this->Logs->Log("SOCKET", LOG_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", LOG_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", LOG_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                                         (*n)->ResetIOHookProvider();
 110
 111                                         skip = true;
 112                                         old_ports.erase(n);
 113                                         break;
 114                                 }
 115                         }
 116                         if (!skip)
 117                         {
 118                                 ListenSocket* ll = new ListenSocket(tag, bindspec);
 119
 120                                 if (ll->GetFd() > -1)
 121                                 {
 122                                         bound++;
 123                                         ports.push_back(ll);
 124                                 }
 125                                 else
 126                                 {
 127                                         failed_ports.push_back(std::make_pair(bind_readable, strerror(errno)));
 128                                         delete ll;
 129                                 }
 130                         }
 131                 }
 132         }
 133
 134         std::vector<ListenSocket*>::iterator n = ports.begin();
 135         for (std::vector<ListenSocket*>::iterator o = old_ports.begin(); o != old_ports.end(); ++o)
 136         {
 137                 while (n != ports.end() && *n != *o)
 138                         n++;
 139                 if (n == ports.end())
 140                 {
 141                         this->Logs->Log("SOCKET", LOG_DEFAULT, "Port bindings slipped out of vector, aborting close!");
 142                         break;
 143                 }
 144
 145                 this->Logs->Log("SOCKET", LOG_DEFAULT, "Port binding %s was removed from the config file, closing.",
 146                         (**n).bind_desc.c_str());
 147                 delete *n;
 148
 149                 // this keeps the iterator valid, pointing to the next element
 150                 n = ports.erase(n);
 151         }
 152
 153         return bound;
 154 }
 155
 156 bool irc::sockets::aptosa(const std::string& addr, int port, irc::sockets::sockaddrs& sa)
 157 {
 158         memset(&sa, 0, sizeof(sa));
 159         if (addr.empty() || addr.c_str()[0] == '*')
 160         {
 161                 if (ServerInstance->Config->WildcardIPv6)
 162                 {
 163                         sa.in6.sin6_family = AF_INET6;
 164                         sa.in6.sin6_port = htons(port);
 165                 }
 166                 else
 167                 {
 168                         sa.in4.sin_family = AF_INET;
 169                         sa.in4.sin_port = htons(port);
 170                 }
 171                 return true;
 172         }
 173         else if (inet_pton(AF_INET, addr.c_str(), &sa.in4.sin_addr) > 0)
 174         {
 175                 sa.in4.sin_family = AF_INET;
 176                 sa.in4.sin_port = htons(port);
 177                 return true;
 178         }
 179         else if (inet_pton(AF_INET6, addr.c_str(), &sa.in6.sin6_addr) > 0)
 180         {
 181                 sa.in6.sin6_family = AF_INET6;
 182                 sa.in6.sin6_port = htons(port);
 183                 return true;
 184         }
 185         return false;
 186 }
 187
 188 int irc::sockets::sockaddrs::port() const
 189 {
 190         if (sa.sa_family == AF_INET)
 191                 return ntohs(in4.sin_port);
 192         if (sa.sa_family == AF_INET6)
 193                 return ntohs(in6.sin6_port);
 194         return -1;
 195 }
 196
 197 std::string irc::sockets::sockaddrs::addr() const
 198 {
 199         char addrv[INET6_ADDRSTRLEN+1];
 200         if (sa.sa_family == AF_INET)
 201         {
 202                 if (!inet_ntop(AF_INET, &in4.sin_addr, addrv, sizeof(addrv)))
 203                         return "";
 204                 return addrv;
 205         }
 206         else if (sa.sa_family == AF_INET6)
 207         {
 208                 if (!inet_ntop(AF_INET6, &in6.sin6_addr, addrv, sizeof(addrv)))
 209                         return "";
 210                 return addrv;
 211         }
 212         return "";
 213 }
 214
 215 bool irc::sockets::satoap(const irc::sockets::sockaddrs& sa, std::string& addr, int &port)
 216 {
 217         port = sa.port();
 218         addr = sa.addr();
 219         return !addr.empty();
 220 }
 221
 222 static const char all_zero[16] = {0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0 };
 223
 224 std::string irc::sockets::sockaddrs::str() const
 225 {
 226         if (sa.sa_family == AF_INET)
 227         {
 228                 char ipaddr[INET_ADDRSTRLEN];
 229                 inet_ntop(AF_INET, &in4.sin_addr, ipaddr, sizeof(ipaddr));
 230                 return InspIRCd::Format("%s:%u", ipaddr, ntohs(in4.sin_port));
 231         }
 232
 233         if (sa.sa_family == AF_INET6)
 234         {
 235                 char ipaddr[INET6_ADDRSTRLEN];
 236                 inet_ntop(AF_INET6, &in6.sin6_addr, ipaddr, sizeof(ipaddr));
 237                 return InspIRCd::Format("[%s]:%u", ipaddr, ntohs(in6.sin6_port));
 238         }
 239
 240         // This should never happen.
 241         return "<unknown>";
 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         unsigned char target_byte;
 268         cidr.type = sa.sa.sa_family;
 269
 270         memset(cidr.bits, 0, sizeof(cidr.bits));
 271
 272         if (cidr.type == AF_INET)
 273         {
 274                 target_byte = sizeof(sa.in4.sin_addr);
 275                 base = (unsigned char*)&sa.in4.sin_addr;
 276                 if (range > 32)
 277                         range = 32;
 278         }
 279         else if (cidr.type == AF_INET6)
 280         {
 281                 target_byte = sizeof(sa.in6.sin6_addr);
 282                 base = (unsigned char*)&sa.in6.sin6_addr;
 283                 if (range > 128)
 284                         range = 128;
 285         }
 286         else
 287         {
 288                 cidr.length = 0;
 289                 return;
 290         }
 291         cidr.length = range;
 292         unsigned int border = range / 8;
 293         unsigned int bitmask = (0xFF00 >> (range & 7)) & 0xFF;
 294         for(unsigned int i=0; i < target_byte; i++)
 295         {
 296                 if (i < border)
 297                         cidr.bits[i] = base[i];
 298                 else if (i == border)
 299                         cidr.bits[i] = base[i] & bitmask;
 300                 else
 301                         return;
 302         }
 303 }
 304
 305 irc::sockets::cidr_mask::cidr_mask(const irc::sockets::sockaddrs& sa, int range)
 306 {
 307         sa2cidr(*this, sa, range);
 308 }
 309
 310 irc::sockets::cidr_mask::cidr_mask(const std::string& mask)
 311 {
 312         std::string::size_type bits_chars = mask.rfind('/');
 313         irc::sockets::sockaddrs sa;
 314
 315         if (bits_chars == std::string::npos)
 316         {
 317                 irc::sockets::aptosa(mask, 0, sa);
 318                 sa2cidr(*this, sa, 128);
 319         }
 320         else
 321         {
 322                 int range = ConvToInt(mask.substr(bits_chars + 1));
 323                 irc::sockets::aptosa(mask.substr(0, bits_chars), 0, sa);
 324                 sa2cidr(*this, sa, range);
 325         }
 326 }
 327
 328 std::string irc::sockets::cidr_mask::str() const
 329 {
 330         irc::sockets::sockaddrs sa;
 331         sa.sa.sa_family = type;
 332         unsigned char* base;
 333         int len;
 334         if (type == AF_INET)
 335         {
 336                 base = (unsigned char*)&sa.in4.sin_addr;
 337                 len = 4;
 338         }
 339         else if (type == AF_INET6)
 340         {
 341                 base = (unsigned char*)&sa.in6.sin6_addr;
 342                 len = 16;
 343         }
 344         else
 345                 return "";
 346         memcpy(base, bits, len);
 347         return sa.addr() + "/" + ConvToStr((int)length);
 348 }
 349
 350 bool irc::sockets::cidr_mask::operator==(const cidr_mask& other) const
 351 {
 352         return type == other.type && length == other.length &&
 353                 0 == memcmp(bits, other.bits, 16);
 354 }
 355
 356 bool irc::sockets::cidr_mask::operator<(const cidr_mask& other) const
 357 {
 358         if (type != other.type)
 359                 return type < other.type;
 360         if (length != other.length)
 361                 return length < other.length;
 362         return memcmp(bits, other.bits, 16) < 0;
 363 }
 364
 365 bool irc::sockets::cidr_mask::match(const irc::sockets::sockaddrs& addr) const
 366 {
 367         if (addr.sa.sa_family != type)
 368                 return false;
 369         irc::sockets::cidr_mask tmp(addr, length);
 370         return tmp == *this;
 371 }
 372