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 std::string irc::sockets::sockaddrs::str() const
 221 {
 222         char buffer[MAXBUF];
 223         if (sa.sa_family == AF_INET)
 224         {
 225                 const uint8_t* bits = reinterpret_cast<const uint8_t*>(&in4.sin_addr);
 226                 sprintf(buffer, "%d.%d.%d.%d:%u", bits[0], bits[1], bits[2], bits[3], ntohs(in4.sin_port));
 227         }
 228         else if (sa.sa_family == AF_INET6)
 229         {
 230                 buffer[0] = '[';
 231                 if (!inet_ntop(AF_INET6, &in6.sin6_addr, buffer+1, MAXBUF - 10))
 232                         return "<unknown>"; // should never happen, buffer is large enough
 233                 int len = strlen(buffer);
 234                 // no need for snprintf, buffer has at least 9 chars left, max short len = 5
 235                 sprintf(buffer + len, "]:%u", ntohs(in6.sin6_port));
 236         }
 237         else
 238                 return "<unknown>";
 239         return std::string(buffer);
 240 }
 241
 242 int irc::sockets::sockaddrs::sa_size() const
 243 {
 244         if (sa.sa_family == AF_INET)
 245                 return sizeof(in4);
 246         if (sa.sa_family == AF_INET6)
 247                 return sizeof(in6);
 248         return 0;
 249 }
 250
 251 bool irc::sockets::sockaddrs::operator==(const irc::sockets::sockaddrs& other) const
 252 {
 253         if (sa.sa_family != other.sa.sa_family)
 254                 return false;
 255         if (sa.sa_family == AF_INET)
 256                 return (in4.sin_port == other.in4.sin_port) && (in4.sin_addr.s_addr == other.in4.sin_addr.s_addr);
 257         if (sa.sa_family == AF_INET6)
 258                 return (in6.sin6_port == other.in6.sin6_port) && !memcmp(in6.sin6_addr.s6_addr, other.in6.sin6_addr.s6_addr, 16);
 259         return !memcmp(this, &other, sizeof(*this));
 260 }
 261
 262 static void sa2cidr(irc::sockets::cidr_mask& cidr, const irc::sockets::sockaddrs& sa, int range)
 263 {
 264         const unsigned char* base;
 265         unsigned char target_byte;
 266         cidr.type = sa.sa.sa_family;
 267
 268         memset(cidr.bits, 0, sizeof(cidr.bits));
 269
 270         if (cidr.type == AF_INET)
 271         {
 272                 target_byte = sizeof(sa.in4.sin_addr);
 273                 base = (unsigned char*)&sa.in4.sin_addr;
 274                 if (range > 32)
 275                         range = 32;
 276         }
 277         else if (cidr.type == AF_INET6)
 278         {
 279                 target_byte = sizeof(sa.in6.sin6_addr);
 280                 base = (unsigned char*)&sa.in6.sin6_addr;
 281                 if (range > 128)
 282                         range = 128;
 283         }
 284         else
 285         {
 286                 cidr.length = 0;
 287                 return;
 288         }
 289         cidr.length = range;
 290         unsigned int border = range / 8;
 291         unsigned int bitmask = (0xFF00 >> (range & 7)) & 0xFF;
 292         for(unsigned int i=0; i < target_byte; i++)
 293         {
 294                 if (i < border)
 295                         cidr.bits[i] = base[i];
 296                 else if (i == border)
 297                         cidr.bits[i] = base[i] & bitmask;
 298                 else
 299                         return;
 300         }
 301 }
 302
 303 irc::sockets::cidr_mask::cidr_mask(const irc::sockets::sockaddrs& sa, int range)
 304 {
 305         sa2cidr(*this, sa, range);
 306 }
 307
 308 irc::sockets::cidr_mask::cidr_mask(const std::string& mask)
 309 {
 310         std::string::size_type bits_chars = mask.rfind('/');
 311         irc::sockets::sockaddrs sa;
 312
 313         if (bits_chars == std::string::npos)
 314         {
 315                 irc::sockets::aptosa(mask, 0, sa);
 316                 sa2cidr(*this, sa, 128);
 317         }
 318         else
 319         {
 320                 int range = ConvToInt(mask.substr(bits_chars + 1));
 321                 irc::sockets::aptosa(mask.substr(0, bits_chars), 0, sa);
 322                 sa2cidr(*this, sa, range);
 323         }
 324 }
 325
 326 std::string irc::sockets::cidr_mask::str() const
 327 {
 328         irc::sockets::sockaddrs sa;
 329         sa.sa.sa_family = type;
 330         unsigned char* base;
 331         int len;
 332         if (type == AF_INET)
 333         {
 334                 base = (unsigned char*)&sa.in4.sin_addr;
 335                 len = 4;
 336         }
 337         else if (type == AF_INET6)
 338         {
 339                 base = (unsigned char*)&sa.in6.sin6_addr;
 340                 len = 16;
 341         }
 342         else
 343                 return "";
 344         memcpy(base, bits, len);
 345         return sa.addr() + "/" + ConvToStr((int)length);
 346 }
 347
 348 bool irc::sockets::cidr_mask::operator==(const cidr_mask& other) const
 349 {
 350         return type == other.type && length == other.length &&
 351                 0 == memcmp(bits, other.bits, 16);
 352 }
 353
 354 bool irc::sockets::cidr_mask::operator<(const cidr_mask& other) const
 355 {
 356         if (type != other.type)
 357                 return type < other.type;
 358         if (length != other.length)
 359                 return length < other.length;
 360         return memcmp(bits, other.bits, 16) < 0;
 361 }
 362
 363 bool irc::sockets::cidr_mask::match(const irc::sockets::sockaddrs& addr) const
 364 {
 365         if (addr.sa.sa_family != type)
 366                 return false;
 367         irc::sockets::cidr_mask tmp(addr, length);
 368         return tmp == *this;
 369 }
 370