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                                         skip = true;
 109                                         old_ports.erase(n);
 110                                         break;
 111                                 }
 112                         }
 113                         if (!skip)
 114                         {
 115                                 ListenSocket* ll = new ListenSocket(tag, bindspec);
 116
 117                                 if (ll->GetFd() > -1)
 118                                 {
 119                                         bound++;
 120                                         ports.push_back(ll);
 121                                 }
 122                                 else
 123                                 {
 124                                         failed_ports.push_back(std::make_pair(bind_readable, strerror(errno)));
 125                                         delete ll;
 126                                 }
 127                         }
 128                 }
 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",DEFAULT,"Port bindings slipped out of vector, aborting close!");
 139                         break;
 140                 }
 141
 142                 this->Logs->Log("SOCKET",DEFAULT, "Port binding %s was removed from the config file, closing.",
 143                         (**n).bind_desc.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::port() const
 186 {
 187         if (sa.sa_family == AF_INET)
 188                 return ntohs(in4.sin_port);
 189         if (sa.sa_family == AF_INET6)
 190                 return ntohs(in6.sin6_port);
 191         return -1;
 192 }
 193
 194 std::string irc::sockets::sockaddrs::addr() const
 195 {
 196         char addrv[INET6_ADDRSTRLEN+1];
 197         if (sa.sa_family == AF_INET)
 198         {
 199                 if (!inet_ntop(AF_INET, &in4.sin_addr, addrv, sizeof(addrv)))
 200                         return "";
 201                 return addrv;
 202         }
 203         else if (sa.sa_family == AF_INET6)
 204         {
 205                 if (!inet_ntop(AF_INET6, &in6.sin6_addr, addrv, sizeof(addrv)))
 206                         return "";
 207                 return addrv;
 208         }
 209         return "";
 210 }
 211
 212 bool irc::sockets::satoap(const irc::sockets::sockaddrs& sa, std::string& addr, int &port)
 213 {
 214         port = sa.port();
 215         addr = sa.addr();
 216         return !addr.empty();
 217 }
 218
 219 static const char all_zero[16] = {0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0 };
 220
 221 std::string irc::sockets::sockaddrs::str() const
 222 {
 223         char buffer[MAXBUF];
 224         if (sa.sa_family == AF_INET)
 225         {
 226                 const uint8_t* bits = reinterpret_cast<const uint8_t*>(&in4.sin_addr);
 227                 sprintf(buffer, "%d.%d.%d.%d:%u", bits[0], bits[1], bits[2], bits[3], ntohs(in4.sin_port));
 228         }
 229         else if (sa.sa_family == AF_INET6)
 230         {
 231                 buffer[0] = '[';
 232                 if (!inet_ntop(AF_INET6, &in6.sin6_addr, buffer+1, MAXBUF - 10))
 233                         return "<unknown>"; // should never happen, buffer is large enough
 234                 int len = strlen(buffer);
 235                 // no need for snprintf, buffer has at least 9 chars left, max short len = 5
 236                 sprintf(buffer + len, "]:%u", ntohs(in6.sin6_port));
 237         }
 238         else
 239                 return "<unknown>";
 240         return std::string(buffer);
 241 }
 242
 243 int irc::sockets::sockaddrs::sa_size() const
 244 {
 245         if (sa.sa_family == AF_INET)
 246                 return sizeof(in4);
 247         if (sa.sa_family == AF_INET6)
 248                 return sizeof(in6);
 249         return 0;
 250 }
 251
 252 bool irc::sockets::sockaddrs::operator==(const irc::sockets::sockaddrs& other) const
 253 {
 254         if (sa.sa_family != other.sa.sa_family)
 255                 return false;
 256         if (sa.sa_family == AF_INET)
 257                 return (in4.sin_port == other.in4.sin_port) && (in4.sin_addr.s_addr == other.in4.sin_addr.s_addr);
 258         if (sa.sa_family == AF_INET6)
 259                 return (in6.sin6_port == other.in6.sin6_port) && !memcmp(in6.sin6_addr.s6_addr, other.in6.sin6_addr.s6_addr, 16);
 260         return !memcmp(this, &other, sizeof(*this));
 261 }
 262
 263 static void sa2cidr(irc::sockets::cidr_mask& cidr, const irc::sockets::sockaddrs& sa, int range)
 264 {
 265         const unsigned char* base;
 266         cidr.type = sa.sa.sa_family;
 267         if (cidr.type == AF_INET)
 268         {
 269                 base = (unsigned char*)&sa.in4.sin_addr;
 270                 if (range > 32)
 271                         range = 32;
 272         }
 273         else if (cidr.type == AF_INET6)
 274         {
 275                 base = (unsigned char*)&sa.in6.sin6_addr;
 276                 if (range > 128)
 277                         range = 128;
 278         }
 279         else
 280         {
 281                 base = (unsigned char*)"";
 282                 range = 0;
 283         }
 284         cidr.length = range;
 285         unsigned int border = range / 8;
 286         unsigned int bitmask = (0xFF00 >> (range & 7)) & 0xFF;
 287         for(unsigned int i=0; i < 16; i++)
 288         {
 289                 if (i < border)
 290                         cidr.bits[i] = base[i];
 291                 else if (i == border)
 292                         cidr.bits[i] = base[i] & bitmask;
 293                 else
 294                         cidr.bits[i] = 0;
 295         }
 296 }
 297
 298 irc::sockets::cidr_mask::cidr_mask(const irc::sockets::sockaddrs& sa, int range)
 299 {
 300         sa2cidr(*this, sa, range);
 301 }
 302
 303 irc::sockets::cidr_mask::cidr_mask(const std::string& mask)
 304 {
 305         std::string::size_type bits_chars = mask.rfind('/');
 306         irc::sockets::sockaddrs sa;
 307
 308         if (bits_chars == std::string::npos)
 309         {
 310                 irc::sockets::aptosa(mask, 0, sa);
 311                 sa2cidr(*this, sa, 128);
 312         }
 313         else
 314         {
 315                 int range = atoi(mask.substr(bits_chars + 1).c_str());
 316                 irc::sockets::aptosa(mask.substr(0, bits_chars), 0, sa);
 317                 sa2cidr(*this, sa, range);
 318         }
 319 }
 320
 321 std::string irc::sockets::cidr_mask::str() const
 322 {
 323         irc::sockets::sockaddrs sa;
 324         sa.sa.sa_family = type;
 325         unsigned char* base;
 326         int len;
 327         if (type == AF_INET)
 328         {
 329                 base = (unsigned char*)&sa.in4.sin_addr;
 330                 len = 4;
 331         }
 332         else if (type == AF_INET6)
 333         {
 334                 base = (unsigned char*)&sa.in6.sin6_addr;
 335                 len = 16;
 336         }
 337         else
 338                 return "";
 339         memcpy(base, bits, len);
 340         return sa.addr() + "/" + ConvToStr((int)length);
 341 }
 342
 343 bool irc::sockets::cidr_mask::operator==(const cidr_mask& other) const
 344 {
 345         return type == other.type && length == other.length &&
 346                 0 == memcmp(bits, other.bits, 16);
 347 }
 348
 349 bool irc::sockets::cidr_mask::operator<(const cidr_mask& other) const
 350 {
 351         if (type != other.type)
 352                 return type < other.type;
 353         if (length != other.length)
 354                 return length < other.length;
 355         return memcmp(bits, other.bits, 16) < 0;
 356 }
 357
 358 bool irc::sockets::cidr_mask::match(const irc::sockets::sockaddrs& addr) const
 359 {
 360         if (addr.sa.sa_family != type)
 361                 return false;
 362         irc::sockets::cidr_mask tmp(addr, length);
 363         return tmp == *this;
 364 }
 365