]> git.netwichtig.de Git - user/henk/code/inspircd.git/blobdiff - src/socket.cpp
OOPS! We try again, since I'm smoking craq. LF is 0x0a NOT CR.
[user/henk/code/inspircd.git] / src / socket.cpp
index e0d02a48ad8af6980b98ec3a90a0d8a76dba4e69..31fbffb617cfe5fa99dcae6907d7a63fbba408b6 100644 (file)
@@ -2,31 +2,22 @@
  *       | Inspire Internet Relay Chat Daemon |
  *       +------------------------------------+
  *
- *  InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
- *                       E-mail:
- *                <brain@chatspike.net>
- *               <Craig@chatspike.net>
- *     
- * Written by Craig Edwards, Craig McLure, and others.
+ *  InspIRCd: (C) 2002-2007 InspIRCd Development Team
+ * See: http://www.inspircd.org/wiki/index.php/Credits
+ *
  * This program is free but copyrighted software; see
  *            the file COPYING for details.
  *
  * ---------------------------------------------------
  */
 
+#include "inspircd.h"
 #include <string>
 #include "configreader.h"
 #include "socket.h"
-#include "inspircd.h"
-#include "inspstring.h"
-#include "helperfuncs.h"
 #include "socketengine.h"
 #include "wildcard.h"
 
-extern InspIRCd* ServerInstance;
-extern time_t TIME;
-
-using namespace std;
 using namespace irc::sockets;
 
 /* Used when comparing CIDR masks for the modulus bits left over.
@@ -34,7 +25,7 @@ using namespace irc::sockets;
  * ((-1) << (8 - (mask % 8)))
  * But imho, it sucks in comparison to a nice neat lookup table.
  */
-const char inverted_bits[8] = {        0x00, /* 00000000 - 0 bits - never actually used */
+const unsigned char inverted_bits[8] = {       0x00, /* 00000000 - 0 bits - never actually used */
                                0x80, /* 10000000 - 1 bits */
                                0xC0, /* 11000000 - 2 bits */
                                0xE0, /* 11100000 - 3 bits */
@@ -44,6 +35,99 @@ const char inverted_bits[8] = {      0x00, /* 00000000 - 0 bits - never actually used
                                0xFE  /* 11111110 - 7 bits */
 };
 
+
+ListenSocket::ListenSocket(InspIRCd* Instance, int port, char* addr) : ServerInstance(Instance), desc("plaintext"), bind_addr(addr), bind_port(port)
+{
+       this->SetFd(OpenTCPSocket(addr));
+       if (this->GetFd() > -1)
+       {
+               if (!Instance->BindSocket(this->fd,port,addr))
+                       this->fd = -1;
+#ifdef IPV6
+               if ((!*addr) || (strchr(addr,':')))
+                       this->family = AF_INET6;
+               else
+#endif
+               this->family = AF_INET;
+               Instance->SE->AddFd(this);
+       }
+}
+
+ListenSocket::~ListenSocket()
+{
+       if (this->GetFd() > -1)
+       {
+               ServerInstance->SE->DelFd(this);
+               ServerInstance->Log(DEBUG,"Shut down listener on fd %d", this->fd);
+               if (shutdown(this->fd, 2) || close(this->fd))
+                       ServerInstance->Log(DEBUG,"Failed to cancel listener: %s", strerror(errno));
+               this->fd = -1;
+       }
+}
+
+void ListenSocket::HandleEvent(EventType et, int errornum)
+{
+       sockaddr* sock_us = new sockaddr[2];    // our port number
+       sockaddr* client = new sockaddr[2];
+       socklen_t uslen, length;                // length of our port number
+       int incomingSockfd, in_port;
+
+#ifdef IPV6
+       if (this->family == AF_INET6)
+       {
+               uslen = sizeof(sockaddr_in6);
+               length = sizeof(sockaddr_in6);
+       }
+       else
+#endif
+       {
+               uslen = sizeof(sockaddr_in);
+               length = sizeof(sockaddr_in);
+       }
+
+       incomingSockfd = _accept (this->GetFd(), (sockaddr*)client, &length);
+
+       if ((incomingSockfd > -1) && (!_getsockname(incomingSockfd, sock_us, &uslen)))
+       {
+               char buf[MAXBUF];
+#ifdef IPV6
+               if (this->family == AF_INET6)
+               {
+                       inet_ntop(AF_INET6, &((const sockaddr_in6*)client)->sin6_addr, buf, sizeof(buf));
+                       in_port = ntohs(((sockaddr_in6*)sock_us)->sin6_port);
+               }
+               else
+#endif
+               {
+                       inet_ntop(AF_INET, &((const sockaddr_in*)client)->sin_addr, buf, sizeof(buf));
+                       in_port = ntohs(((sockaddr_in*)sock_us)->sin_port);
+               }
+
+               NonBlocking(incomingSockfd);
+               if (ServerInstance->Config->GetIOHook(in_port))
+               {
+                       try
+                       {
+                               ServerInstance->Config->GetIOHook(in_port)->OnRawSocketAccept(incomingSockfd, buf, in_port);
+                       }
+                       catch (CoreException& modexcept)
+                       {
+                               ServerInstance->Log(DEBUG,"%s threw an exception: %s", modexcept.GetSource(), modexcept.GetReason());
+                       }
+               }
+               ServerInstance->stats->statsAccept++;
+               userrec::AddClient(ServerInstance, incomingSockfd, in_port, false, this->family, client);
+       }
+       else
+       {
+               shutdown(incomingSockfd,2);
+               close(incomingSockfd);
+               ServerInstance->stats->statsRefused++;
+       }
+       delete[] client;
+       delete[] sock_us;
+}
+
 /* Match raw bytes using CIDR bit matching, used by higher level MatchCIDR() */
 bool irc::sockets::MatchCIDRBits(unsigned char* address, unsigned char* mask, unsigned int mask_bits)
 {
@@ -151,6 +235,7 @@ bool irc::sockets::MatchCIDR(const char* address, const char* cidr_mask, bool ma
        else
        {
                /* No 'number of bits' field! */
+               free(mask);
                return false;
        }
 
@@ -210,240 +295,263 @@ bool irc::sockets::MatchCIDR(const char* address, const char* cidr_mask, bool ma
        return MatchCIDRBits(addr_raw, mask_raw, bits);
 }
 
-inline void irc::sockets::Blocking(int s)
+void irc::sockets::Blocking(int s)
 {
+#ifndef WIN32
        int flags = fcntl(s, F_GETFL, 0);
        fcntl(s, F_SETFL, flags ^ O_NONBLOCK);
+#else
+       unsigned long opt = 0;
+       ioctlsocket(s, FIONBIO, &opt);
+#endif
 }
 
-inline void irc::sockets::NonBlocking(int s)
+void irc::sockets::NonBlocking(int s)
 {
+#ifndef WIN32
        int flags = fcntl(s, F_GETFL, 0);
        fcntl(s, F_SETFL, flags | O_NONBLOCK);
+#else
+       unsigned long opt = 1;
+       ioctlsocket(s, FIONBIO, &opt);
+#endif
 }
 
-
 /** This will bind a socket to a port. It works for UDP/TCP.
  * It can only bind to IP addresses, if you wish to bind to hostnames
  * you should first resolve them using class 'Resolver'.
  */ 
-bool irc::sockets::BindSocket(int sockfd, insp_sockaddr client, insp_sockaddr server, int port, char* addr)
+bool InspIRCd::BindSocket(int sockfd, int port, char* addr, bool dolisten)
 {
-       memset(&server,0,sizeof(server));
-       insp_inaddr addy;
+       /* We allocate 2 of these, because sockaddr_in6 is larger than sockaddr (ugh, hax) */
+       sockaddr* server = new sockaddr[2];
+       memset(server,0,sizeof(sockaddr)*2);
+
+       int ret, size;
 
        if (*addr == '*')
                *addr = 0;
 
-       if ((*addr) && (insp_aton(addr,&addy) < 1))
+#ifdef IPV6
+       if (*addr)
        {
-               log(DEBUG,"Invalid IP '%s' given to BindSocket()", addr);
-               return false;;
-       }
+               /* There is an address here. Is it ipv6? */
+               if (strchr(addr,':'))
+               {
+                       /* Yes it is */
+                       in6_addr addy;
+                       if (inet_pton(AF_INET6, addr, &addy) < 1)
+                       {
+                               delete[] server;
+                               return false;
+                       }
 
-#ifdef IPV6
-       server.sin6_family = AF_FAMILY;
-#else
-       server.sin_family = AF_FAMILY;
-#endif
-       if (!*addr)
+                       ((sockaddr_in6*)server)->sin6_family = AF_INET6;
+                       memcpy(&(((sockaddr_in6*)server)->sin6_addr), &addy, sizeof(in6_addr));
+                       ((sockaddr_in6*)server)->sin6_port = htons(port);
+                       size = sizeof(sockaddr_in6);
+               }
+               else
+               {
+                       /* No, its not */
+                       in_addr addy;
+                       if (inet_pton(AF_INET, addr, &addy) < 1)
+                       {
+                               delete[] server;
+                               return false;
+                       }
+
+                       ((sockaddr_in*)server)->sin_family = AF_INET;
+                       ((sockaddr_in*)server)->sin_addr = addy;
+                       ((sockaddr_in*)server)->sin_port = htons(port);
+                       size = sizeof(sockaddr_in);
+               }
+       }
+       else
        {
-#ifdef IPV6
-               memcpy(&addy, &server.sin6_addr, sizeof(in6_addr));
+               if (port == -1)
+               {
+                       /* Port -1: Means UDP IPV4 port binding - Special case
+                        * used by DNS engine.
+                        */
+                       ((sockaddr_in*)server)->sin_family = AF_INET;
+                       ((sockaddr_in*)server)->sin_addr.s_addr = htonl(INADDR_ANY);
+                       ((sockaddr_in*)server)->sin_port = 0;
+                       size = sizeof(sockaddr_in);
+               }
+               else
+               {
+                       /* Theres no address here, default to ipv6 bind to all */
+                       ((sockaddr_in6*)server)->sin6_family = AF_INET6;
+                       memset(&(((sockaddr_in6*)server)->sin6_addr), 0, sizeof(in6_addr));
+                       ((sockaddr_in6*)server)->sin6_port = htons(port);
+                       size = sizeof(sockaddr_in6);
+               }
+       }
 #else
-               server.sin_addr.s_addr = htonl(INADDR_ANY);
-#endif
+       /* If we aren't built with ipv6, the choice becomes simple */
+       ((sockaddr_in*)server)->sin_family = AF_INET;
+       if (*addr)
+       {
+               /* There is an address here. */
+               in_addr addy;
+               if (inet_pton(AF_INET, addr, &addy) < 1)
+               {
+                       delete[] server;
+                       return false;
+               }
+               ((sockaddr_in*)server)->sin_addr = addy;
        }
        else
        {
-#ifdef IPV6
-               memcpy(&addy, &server.sin6_addr, sizeof(in6_addr));
-#else
-               server.sin_addr = addy;
-#endif
+               /* Bind ipv4 to all */
+               ((sockaddr_in*)server)->sin_addr.s_addr = htonl(INADDR_ANY);
        }
-#ifdef IPV6
-       server.sin6_port = htons(port);
-#else
-       server.sin_port = htons(port);
+       /* Bind ipv4 port number */
+       ((sockaddr_in*)server)->sin_port = htons(port);
+       size = sizeof(sockaddr_in);
 #endif
-       if (bind(sockfd,(struct sockaddr*)&server,sizeof(server)) < 0)
+       ret = bind(sockfd, server, size);
+       delete[] server;
+
+       if (ret < 0)
        {
                return false;
        }
        else
        {
-               log(DEBUG,"Bound port %s:%d",*addr ? addr : "*",port);
-               if (listen(sockfd, ServerInstance->Config->MaxConn) == -1)
+               if (dolisten)
                {
-                       log(DEFAULT,"ERROR in listen(): %s",strerror(errno));
-                       return false;
+                       if (listen(sockfd, Config->MaxConn) == -1)
+                       {
+                               this->Log(DEFAULT,"ERROR in listen(): %s",strerror(errno));
+                               return false;
+                       }
+                       else
+                       {
+                               this->Log(DEBUG,"New socket binding for %d with listen: %s:%d", sockfd, addr, port);
+                               NonBlocking(sockfd);
+                               return true;
+                       }
                }
                else
                {
-                       NonBlocking(sockfd);
+                       this->Log(DEBUG,"New socket binding for %d without listen: %s:%d", sockfd, addr, port);
                        return true;
                }
        }
 }
 
-
 // Open a TCP Socket
-int irc::sockets::OpenTCPSocket()
+int irc::sockets::OpenTCPSocket(char* addr, int socktype)
 {
        int sockfd;
        int on = 1;
        struct linger linger = { 0 };
-  
-       if ((sockfd = socket (AF_FAMILY, SOCK_STREAM, 0)) < 0)
+#ifdef IPV6
+       if (strchr(addr,':') || (!*addr))
+               sockfd = socket (PF_INET6, socktype, 0);
+       else
+               sockfd = socket (PF_INET, socktype, 0);
+       if (sockfd < 0)
+#else
+       if ((sockfd = socket (PF_INET, socktype, 0)) < 0)
+#endif
        {
-               log(DEFAULT,"Error creating TCP socket: %s",strerror(errno));
-               return (ERROR);
+               return ERROR;
        }
        else
        {
-               setsockopt(sockfd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
+               setsockopt(sockfd, SOL_SOCKET, SO_REUSEADDR, (char*)&on, sizeof(on));
                /* This is BSD compatible, setting l_onoff to 0 is *NOT* http://web.irc.org/mla/ircd-dev/msg02259.html */
                linger.l_onoff = 1;
                linger.l_linger = 1;
-               setsockopt(sockfd, SOL_SOCKET, SO_LINGER, &linger,sizeof(linger));
+               setsockopt(sockfd, SOL_SOCKET, SO_LINGER, (char*)&linger,sizeof(linger));
                return (sockfd);
        }
 }
 
 /* XXX: Probably belongs in class InspIRCd */
-bool HasPort(int port, char* addr)
-{
-       ServerConfig* Config = ServerInstance->Config;
-       for (unsigned long count = 0; count < ServerInstance->stats->BoundPortCount; count++)
-       {
-               if ((port == Config->ports[count]) && (!strcasecmp(Config->addrs[count],addr)))
-               {
-                       return true;
-               }
-       }
-       return false;
-}
-
-/* XXX: Probably belongs in class InspIRCd */
-int irc::sockets::BindPorts(bool bail)
+int InspIRCd::BindPorts(bool bail, int &ports_found, FailedPortList &failed_ports)
 {
        char configToken[MAXBUF], Addr[MAXBUF], Type[MAXBUF];
-       insp_sockaddr client, server;
-       int clientportcount = 0;
-       int BoundPortCount = 0;
-       ServerConfig* Config = ServerInstance->Config;
+       int bound = 0;
+       bool started_with_nothing = (Config->ports.size() == 0);
+       std::vector<std::pair<std::string, int> > old_ports;
+
+       /* XXX: Make a copy of the old ip/port pairs here */
+       for (std::vector<ListenSocket*>::iterator o = Config->ports.begin(); o != Config->ports.end(); ++o)
+               old_ports.push_back(make_pair((*o)->GetIP(), (*o)->GetPort()));
 
-       if (!bail)
+       for (int count = 0; count < Config->ConfValueEnum(Config->config_data, "bind"); count++)
        {
-               int InitialPortCount = ServerInstance->stats->BoundPortCount;
-               log(DEBUG,"Initial port count: %d",InitialPortCount);
+               Config->ConfValue(Config->config_data, "bind", "port", count, configToken, MAXBUF);
+               Config->ConfValue(Config->config_data, "bind", "address", count, Addr, MAXBUF);
+               Config->ConfValue(Config->config_data, "bind", "type", count, Type, MAXBUF);
 
-               for (int count = 0; count < Config->ConfValueEnum(Config->config_data, "bind"); count++)
+               if ((!*Type) || (!strcmp(Type,"clients")))
                {
-                       Config->ConfValue(Config->config_data, "bind", "port", count, configToken, MAXBUF);
-                       Config->ConfValue(Config->config_data, "bind", "address", count, Addr, MAXBUF);
-                       Config->ConfValue(Config->config_data, "bind", "type", count, Type, MAXBUF);
-
-                       if (((!*Type) || (!strcmp(Type,"clients"))) && (!HasPort(atoi(configToken),Addr)))
+                       irc::portparser portrange(configToken, false);
+                       int portno = -1;
+                       while ((portno = portrange.GetToken()))
                        {
-                               // modules handle server bind types now
-                               Config->ports[clientportcount+InitialPortCount] = atoi(configToken);
                                if (*Addr == '*')
                                        *Addr = 0;
 
-                               strlcpy(Config->addrs[clientportcount+InitialPortCount],Addr,256);
-                               clientportcount++;
-                               log(DEBUG,"NEW binding %s:%s [%s] from config",Addr,configToken, Type);
-                       }
-               }
-               int PortCount = clientportcount;
-               if (PortCount)
-               {
-                       for (int count = InitialPortCount; count < InitialPortCount + PortCount; count++)
-                       {
-                               if ((Config->openSockfd[count] = OpenTCPSocket()) == ERROR)
+                               bool skip = false;
+                               for (std::vector<ListenSocket*>::iterator n = Config->ports.begin(); n != Config->ports.end(); ++n)
                                {
-                                       log(DEBUG,"Bad fd %d binding port [%s:%d]",Config->openSockfd[count],Config->addrs[count],Config->ports[count]);
+                                       if (((*n)->GetIP() == Addr) && ((*n)->GetPort() == portno))
+                                       {
+                                               skip = true;
+                                               /* XXX: Here, erase from our copy of the list */
+                                               for (std::vector<std::pair<std::string, int> >::iterator k = old_ports.begin(); k != old_ports.end(); ++k)
+                                               {
+                                                       if ((k->first == Addr) && (k->second == portno))
+                                                       {
+                                                               old_ports.erase(k);
+                                                               break;
+                                                       }
+                                               }
+                                       }
                                }
-                               else
+                               if (!skip)
                                {
-                                       if (!BindSocket(Config->openSockfd[count],client,server,Config->ports[count],Config->addrs[count]))
+                                       ListenSocket* ll = new ListenSocket(this, portno, Addr);
+                                       if (ll->GetFd() > -1)
                                        {
-                                               log(DEFAULT,"Failed to bind port [%s:%d]: %s",Config->addrs[count],Config->ports[count],strerror(errno));
+                                               bound++;
+                                               Config->ports.push_back(ll);
                                        }
                                        else
                                        {
-                                               /* Associate the new open port with a slot in the socket engine */
-                                               if (Config->openSockfd[count] > -1)
-                                               {
-                                                       if (!ServerInstance->SE->AddFd(Config->openSockfd[count],true,X_LISTEN))
-                                                       {
-                                                               log(DEFAULT,"ERK! Failed to add listening port to socket engine!");
-                                                               shutdown(Config->openSockfd[count],2);
-                                                               close(Config->openSockfd[count]);
-                                                       }
-                                                       else
-                                                               BoundPortCount++;
-                                               }
+                                               failed_ports.push_back(std::make_pair(Addr, portno));
                                        }
+                                       ports_found++;
                                }
                        }
-                       return InitialPortCount + BoundPortCount;
                }
-               else
-               {
-                       log(DEBUG,"There is nothing new to bind!");
-               }
-               return InitialPortCount;
        }
 
-       for (int count = 0; count < Config->ConfValueEnum(Config->config_data, "bind"); count++)
+       /* XXX: Here, anything left in our copy list, close as removed */
+       if (!started_with_nothing)
        {
-               Config->ConfValue(Config->config_data, "bind", "port", count, configToken, MAXBUF);
-               Config->ConfValue(Config->config_data, "bind", "address", count, Addr, MAXBUF);
-               Config->ConfValue(Config->config_data, "bind", "type", count, Type, MAXBUF);
-
-               if ((!*Type) || (!strcmp(Type,"clients")))
-               {
-                       // modules handle server bind types now
-                       Config->ports[clientportcount] = atoi(configToken);
-
-                       // If the client put bind "*", this is an unrealism.
-                       // We don't actually support this as documented, but
-                       // i got fed up of people trying it, so now it converts
-                       // it to an empty string meaning the same 'bind to all'.
-                       if (*Addr == '*')
-                               *Addr = 0;
-
-                       strlcpy(Config->addrs[clientportcount],Addr,256);
-                       clientportcount++;
-                       log(DEBUG,"Binding %s:%s [%s] from config",Addr,configToken, Type);
-               }
-       }
-
-       int PortCount = clientportcount;
-
-       for (int count = 0; count < PortCount; count++)
-       {
-               if ((Config->openSockfd[BoundPortCount] = OpenTCPSocket()) == ERROR)
+               for (size_t k = 0; k < old_ports.size(); ++k)
                {
-                       log(DEBUG,"Bad fd %d binding port [%s:%d]",Config->openSockfd[BoundPortCount],Config->addrs[count],Config->ports[count]);
-               }
-               else
-               {
-                       if (!BindSocket(Config->openSockfd[BoundPortCount],client,server,Config->ports[count],Config->addrs[count]))
+                       for (std::vector<ListenSocket*>::iterator n = Config->ports.begin(); n != Config->ports.end(); ++n)
                        {
-                               log(DEFAULT,"Failed to bind port [%s:%d]: %s",Config->addrs[count],Config->ports[count],strerror(errno));
-                       }
-                       else
-                       {
-                               /* well we at least bound to one socket so we'll continue */
-                               BoundPortCount++;
+                               if (((*n)->GetIP() == old_ports[k].first) && ((*n)->GetPort() == old_ports[k].second))
+                               {
+                                       this->Log(DEFAULT,"Port binding %s:%d was removed from the config file, closing.", old_ports[k].first.c_str(), old_ports[k].second);
+                                       delete *n;
+                                       Config->ports.erase(n);
+                                       break;
+                               }
                        }
                }
        }
-       return BoundPortCount;
+
+       return bound;
 }
 
 const char* irc::sockets::insp_ntoa(insp_inaddr n)