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(std::string ahost, int aport, bool listening, unsigned long maxtime)
  63 {
  64         this->fd = -1;
  65         this->host = ahost;
  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");
 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(std::string data)
 245 {
 246         try
 247         {
 248                 if ((data != "") && (this->Buffer.length() + data.length() < this->Buffer.max_size()))
 249                         this->Buffer.append(data);
 250         }
 251         catch (std::length_error)
 252         {
 253                 log(DEBUG,"std::length_error exception caught while appending to socket buffer!");
 254                 return 0;
 255         }
 256         return data.length();
 257 }
 258
 259 void InspSocket::FlushWriteBuffer()
 260 {
 261         int result = 0;
 262         if (this->Buffer.length())
 263         {
 264                 result = send(this->fd,this->Buffer.c_str(),this->Buffer.length(),0);
 265                 if (result > 0)
 266                 {
 267                         if (result == (int)this->Buffer.length())
 268                         {
 269                                 this->Buffer = "";
 270                         }
 271                         else
 272                         {
 273                                 /* If we wrote some, advance the buffer forwards */
 274                                 char* n = (char*)this->Buffer.c_str();
 275                                 n += result;
 276                                 this->Buffer = n;
 277                         }
 278                 }
 279         }
 280 }
 281
 282 bool InspSocket::Timeout(time_t current)
 283 {
 284         if (((this->state == I_RESOLVING) || (this->state == I_CONNECTING)) && (current > timeout_end))
 285         {
 286                 log(DEBUG,"Timed out, current=%lu timeout_end=%lu");
 287                 // for non-listening sockets, the timeout can occur
 288                 // which causes termination of the connection after
 289                 // the given number of seconds without a successful
 290                 // connection.
 291                 this->OnTimeout();
 292                 this->OnError(I_ERR_TIMEOUT);
 293                 timeout = true;
 294                 this->state = I_ERROR;
 295                 return true;
 296         }
 297         this->FlushWriteBuffer();
 298         return false;
 299 }
 300
 301 bool InspSocket::Poll()
 302 {
 303         int incoming = -1;
 304         bool n = true;
 305
 306         switch (this->state)
 307         {
 308                 case I_RESOLVING:
 309                         log(DEBUG,"State = I_RESOLVING, calling DoResolve()");
 310                         return this->DoResolve();
 311                 break;
 312                 case I_CONNECTING:
 313                         log(DEBUG,"State = I_CONNECTING");
 314                         this->SetState(I_CONNECTED);
 315                         /* Our socket was in write-state, so delete it and re-add it
 316                          * in read-state.
 317                          */
 318                         ServerInstance->SE->DelFd(this->fd);
 319                         ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
 320                         return this->OnConnected();
 321                 break;
 322                 case I_LISTENING:
 323                         length = sizeof (client);
 324                         incoming = accept (this->fd, (sockaddr*)&client,&length);
 325                         this->SetQueues(incoming);
 326                         this->OnIncomingConnection(incoming,inet_ntoa(client.sin_addr));
 327                         return true;
 328                 break;
 329                 case I_CONNECTED:
 330                         n = this->OnDataReady();
 331                         /* Flush any pending, but not till after theyre done with the event
 332                          * so there are less write calls involved. */
 333                         this->FlushWriteBuffer();
 334                         return n;
 335                 break;
 336                 default:
 337                 break;
 338         }
 339         return true;
 340 }
 341
 342 void InspSocket::SetState(InspSocketState s)
 343 {
 344         log(DEBUG,"Socket state change");
 345         this->state = s;
 346 }
 347
 348 InspSocketState InspSocket::GetState()
 349 {
 350         return this->state;
 351 }
 352
 353 int InspSocket::GetFd()
 354 {
 355         return this->fd;
 356 }
 357
 358 bool InspSocket::OnConnected() { return true; }
 359 void InspSocket::OnError(InspSocketError e) { return; }
 360 int InspSocket::OnDisconnect() { return 0; }
 361 int InspSocket::OnIncomingConnection(int newfd, char* ip) { return 0; }
 362 bool InspSocket::OnDataReady() { return true; }
 363 void InspSocket::OnTimeout() { return; }
 364 void InspSocket::OnClose() { return; }
 365
 366 InspSocket::~InspSocket()
 367 {
 368         this->Close();
 369 }
 370