src/socket.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
   6  *                       E-mail:
   7  *                <brain@chatspike.net>
   8  *                <Craig@chatspike.net>
   9  *
  10  * Written by Craig Edwards, Craig McLure, and others.
  11  * This program is free but copyrighted software; see
  12  *            the file COPYING for details.
  13  *
  14  * ---------------------------------------------------
  15  */
  16
  17 using namespace std;
  18
  19 #include "inspircd_config.h"
  20 #include <sys/time.h>
  21 #include <sys/resource.h>
  22 #include <sys/types.h>
  23 #include <sys/socket.h>
  24 #include <netinet/in.h>
  25 #include <string>
  26 #include <unistd.h>
  27 #include <fcntl.h>
  28 #include <poll.h>
  29 #include <sstream>
  30 #include <iostream>
  31 #include <fstream>
  32 #include <stdexcept>
  33 #include "socket.h"
  34 #include "inspircd.h"
  35 #include "inspircd_io.h"
  36 #include "inspstring.h"
  37 #include "helperfuncs.h"
  38 #include "socketengine.h"
  39
  40
  41 extern InspIRCd* ServerInstance;
  42 extern ServerConfig* Config;
  43 extern time_t TIME;
  44
  45 InspSocket* socket_ref[MAX_DESCRIPTORS];
  46
  47 InspSocket::InspSocket()
  48 {
  49         this->state = I_DISCONNECTED;
  50         this->fd = -1;
  51 }
  52
  53 InspSocket::InspSocket(int newfd, char* ip)
  54 {
  55         this->fd = newfd;
  56         this->state = I_CONNECTED;
  57         this->IP = ip;
  58         ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
  59         socket_ref[this->fd] = this;
  60 }
  61
  62 InspSocket::InspSocket(const std::string &ahost, int aport, bool listening, unsigned long maxtime)
  63  : fd(-1), host(ahost)
  64 {
  65         this->outbuffer.clear();
  66         if (listening) {
  67                 if ((this->fd = OpenTCPSocket()) == ERROR)
  68                 {
  69                         this->fd = -1;
  70                         this->state = I_ERROR;
  71                         this->OnError(I_ERR_SOCKET);
  72                         log(DEBUG,"OpenTCPSocket() error");
  73                         return;
  74                 }
  75                 else
  76                 {
  77                         if (BindSocket(this->fd,this->client,this->server,aport,(char*)ahost.c_str()) == ERROR)
  78                         {
  79                                 this->Close();
  80                                 this->fd = -1;
  81                                 this->state = I_ERROR;
  82                                 this->OnError(I_ERR_BIND);
  83                                 log(DEBUG,"BindSocket() error %s",strerror(errno));
  84                                 return;
  85                         }
  86                         else
  87                         {
  88                                 this->state = I_LISTENING;
  89                                 ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
  90                                 socket_ref[this->fd] = this;
  91                                 log(DEBUG,"New socket now in I_LISTENING state");
  92                                 return;
  93                         }
  94                 }
  95         }
  96         else
  97         {
  98                 this->host = ahost;
  99                 this->port = aport;
 100
 101                 if (!inet_aton(host.c_str(),&addy))
 102                 {
 103                         log(DEBUG,"Attempting to resolve %s",this->host.c_str());
 104                         /* Its not an ip, spawn the resolver */
 105                         this->dns.SetNS(std::string(Config->DNSServer));
 106                         this->dns.ForwardLookupWithFD(host,fd);
 107                         timeout_end = time(NULL) + maxtime;
 108                         timeout = false;
 109                         this->state = I_RESOLVING;
 110                         socket_ref[this->fd] = this;
 111                 }
 112                 else
 113                 {
 114                         log(DEBUG,"No need to resolve %s",this->host.c_str());
 115                         this->IP = host;
 116                         timeout_end = time(NULL) + maxtime;
 117                         this->DoConnect();
 118                 }
 119         }
 120 }
 121
 122 void InspSocket::SetQueues(int nfd)
 123 {
 124         // attempt to increase socket sendq and recvq as high as its possible
 125         int sendbuf = 32768;
 126         int recvbuf = 32768;
 127         setsockopt(nfd,SOL_SOCKET,SO_SNDBUF,(const void *)&sendbuf,sizeof(sendbuf));
 128         setsockopt(nfd,SOL_SOCKET,SO_RCVBUF,(const void *)&recvbuf,sizeof(sendbuf));
 129 }
 130
 131 bool InspSocket::DoResolve()
 132 {
 133         log(DEBUG,"In DoResolve(), trying to resolve IP");
 134         if (this->dns.HasResult())
 135         {
 136                 log(DEBUG,"Socket has result");
 137                 std::string res_ip = dns.GetResultIP();
 138                 if (res_ip != "")
 139                 {
 140                         log(DEBUG,"Socket result set to %s",res_ip.c_str());
 141                         this->IP = res_ip;
 142                         socket_ref[this->fd] = NULL;
 143                 }
 144                 else
 145                 {
 146                         log(DEBUG,"Socket DNS failure");
 147                         this->Close();
 148                         this->state = I_ERROR;
 149                         this->OnError(I_ERR_RESOLVE);
 150                         return false;
 151                 }
 152                 return this->DoConnect();
 153         }
 154         log(DEBUG,"No result for socket yet!");
 155         return true;
 156 }
 157
 158 bool InspSocket::DoConnect()
 159 {
 160         log(DEBUG,"In DoConnect()");
 161         if ((this->fd = socket(AF_INET, SOCK_STREAM, 0)) == -1)
 162         {
 163                 log(DEBUG,"Cant socket()");
 164                 this->state = I_ERROR;
 165                 this->OnError(I_ERR_SOCKET);
 166                 return false;
 167         }
 168
 169         log(DEBUG,"Part 2 DoConnect() %s",this->IP.c_str());
 170         inet_aton(this->IP.c_str(),&addy);
 171         addr.sin_family = AF_INET;
 172         addr.sin_addr = addy;
 173         addr.sin_port = htons(this->port);
 174
 175         int flags;
 176         flags = fcntl(this->fd, F_GETFL, 0);
 177         fcntl(this->fd, F_SETFL, flags | O_NONBLOCK);
 178
 179         if (connect(this->fd, (sockaddr*)&this->addr,sizeof(this->addr)) == -1)
 180         {
 181                 if (errno != EINPROGRESS)
 182                 {
 183                         log(DEBUG,"Error connect() %d: %s",this->fd,strerror(errno));
 184                         this->OnError(I_ERR_CONNECT);
 185                         this->state = I_ERROR;
 186                         this->Close();
 187                         return false;
 188                 }
 189         }
 190         this->state = I_CONNECTING;
 191         ServerInstance->SE->AddFd(this->fd,false,X_ESTAB_MODULE);
 192         socket_ref[this->fd] = this;
 193         this->SetQueues(this->fd);
 194         log(DEBUG,"Returning true from InspSocket::DoConnect");
 195         return true;
 196 }
 197
 198
 199 void InspSocket::Close()
 200 {
 201         if (this->fd != -1)
 202         {
 203                 this->OnClose();
 204                 shutdown(this->fd,2);
 205                 close(this->fd);
 206                 socket_ref[this->fd] = NULL;
 207                 this->fd = -1;
 208         }
 209 }
 210
 211 std::string InspSocket::GetIP()
 212 {
 213         return this->IP;
 214 }
 215
 216 char* InspSocket::Read()
 217 {
 218         if ((fd < 0) || (fd > MAX_DESCRIPTORS))
 219                 return NULL;
 220         int n = recv(this->fd,this->ibuf,sizeof(this->ibuf),0);
 221         if ((n > 0) && (n <= (int)sizeof(this->ibuf)))
 222         {
 223                 ibuf[n] = 0;
 224                 return ibuf;
 225         }
 226         else
 227         {
 228                 if (errno == EAGAIN)
 229                 {
 230                         return "";
 231                 }
 232                 else
 233                 {
 234                         log(DEBUG,"EOF or error on socket: %s",strerror(errno));
 235                         return NULL;
 236                 }
 237         }
 238 }
 239
 240 // There are two possible outcomes to this function.
 241 // It will either write all of the data, or an undefined amount.
 242 // If an undefined amount is written the connection has failed
 243 // and should be aborted.
 244 int InspSocket::Write(const std::string &data)
 245 {
 246         /* Try and append the data to the back of the queue, and send it on its way
 247          */
 248         outbuffer.push_back(data);
 249         return (!this->FlushWriteBuffer());
 250 }
 251
 252 bool InspSocket::FlushWriteBuffer()
 253 {
 254         if ((this->fd > -1) && (this->state == I_CONNECTED))
 255         {
 256                 if (outbuffer.size())
 257                 {
 258                         int result = write(this->fd,outbuffer[0].c_str(),outbuffer[0].length());
 259                         if (result > 0)
 260                         {
 261                                 if ((unsigned int)result == outbuffer[0].length())
 262                                 {
 263                                         /* The whole block was written (usually a line)
 264                                          * Pop the block off the front of the queue
 265                                          */
 266                                         outbuffer.pop_front();
 267                                 }
 268                                 else
 269                                 {
 270                                         outbuffer[0] = outbuffer[0].substr(result + 1,outbuffer[0].length());
 271                                 }
 272                         }
 273                         else if ((result == -1) && (errno != EAGAIN))
 274                         {
 275                                 log(DEBUG,"Write error on socket: %s",strerror(errno));
 276                                 this->OnError(I_ERR_WRITE);
 277                                 this->state = I_ERROR;
 278                                 return true;
 279                         }
 280                 }
 281         }
 282         return false;
 283 }
 284
 285 bool InspSocket::Timeout(time_t current)
 286 {
 287         if (((this->state == I_RESOLVING) || (this->state == I_CONNECTING)) && (current > timeout_end))
 288         {
 289                 log(DEBUG,"Timed out, current=%lu timeout_end=%lu");
 290                 // for non-listening sockets, the timeout can occur
 291                 // which causes termination of the connection after
 292                 // the given number of seconds without a successful
 293                 // connection.
 294                 this->OnTimeout();
 295                 this->OnError(I_ERR_TIMEOUT);
 296                 timeout = true;
 297                 this->state = I_ERROR;
 298                 return true;
 299         }
 300         return this->FlushWriteBuffer();
 301 }
 302
 303 bool InspSocket::Poll()
 304 {
 305         int incoming = -1;
 306         bool n = true;
 307
 308         switch (this->state)
 309         {
 310                 case I_RESOLVING:
 311                         log(DEBUG,"State = I_RESOLVING, calling DoResolve()");
 312                         return this->DoResolve();
 313                 break;
 314                 case I_CONNECTING:
 315                         log(DEBUG,"State = I_CONNECTING");
 316                         this->SetState(I_CONNECTED);
 317                         /* Our socket was in write-state, so delete it and re-add it
 318                          * in read-state.
 319                          */
 320                         ServerInstance->SE->DelFd(this->fd);
 321                         ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
 322                         return this->OnConnected();
 323                 break;
 324                 case I_LISTENING:
 325                         length = sizeof (client);
 326                         incoming = accept (this->fd, (sockaddr*)&client,&length);
 327                         this->SetQueues(incoming);
 328                         this->OnIncomingConnection(incoming,inet_ntoa(client.sin_addr));
 329                         return true;
 330                 break;
 331                 case I_CONNECTED:
 332                         n = this->OnDataReady();
 333                         /* Flush any pending, but not till after theyre done with the event
 334                          * so there are less write calls involved.
 335                          * Both FlushWriteBuffer AND the return result of OnDataReady must
 336                          * return true for this to be ok.
 337                          */
 338                         return (n && !this->FlushWriteBuffer());
 339                 break;
 340                 default:
 341                 break;
 342         }
 343         return true;
 344 }
 345
 346 void InspSocket::SetState(InspSocketState s)
 347 {
 348         log(DEBUG,"Socket state change");
 349         this->state = s;
 350 }
 351
 352 InspSocketState InspSocket::GetState()
 353 {
 354         return this->state;
 355 }
 356
 357 int InspSocket::GetFd()
 358 {
 359         return this->fd;
 360 }
 361
 362 bool InspSocket::OnConnected() { return true; }
 363 void InspSocket::OnError(InspSocketError e) { return; }
 364 int InspSocket::OnDisconnect() { return 0; }
 365 int InspSocket::OnIncomingConnection(int newfd, char* ip) { return 0; }
 366 bool InspSocket::OnDataReady() { return true; }
 367 void InspSocket::OnTimeout() { return; }
 368 void InspSocket::OnClose() { return; }
 369
 370 InspSocket::~InspSocket()
 371 {
 372         this->Close();
 373 }