src/inspsocket.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 #include <string>
  18 #include <sstream>
  19 #include <iostream>
  20 #include <fstream>
  21 #include <stdexcept>
  22 #include "inspircd_config.h"
  23 #include "socket.h"
  24 #include "inspircd.h"
  25 #include "configreader.h"
  26 #include "inspstring.h"
  27 #include "helperfuncs.h"
  28 #include "socketengine.h"
  29
  30
  31 extern InspIRCd* ServerInstance;
  32 extern ServerConfig* Config;
  33 extern time_t TIME;
  34
  35 InspSocket* socket_ref[MAX_DESCRIPTORS];
  36
  37 InspSocket::InspSocket()
  38 {
  39         this->state = I_DISCONNECTED;
  40         this->fd = -1;
  41         this->ClosePending = false;
  42 }
  43
  44 InspSocket::InspSocket(int newfd, char* ip)
  45 {
  46         this->fd = newfd;
  47         this->state = I_CONNECTED;
  48         strlcpy(this->IP,ip,MAXBUF);
  49         this->ClosePending = false;
  50         if (this->fd > -1)
  51         {
  52                 ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
  53                 socket_ref[this->fd] = this;
  54         }
  55 }
  56
  57 InspSocket::InspSocket(const std::string &ahost, int aport, bool listening, unsigned long maxtime) : fd(-1)
  58 {
  59         strlcpy(host,ahost.c_str(),MAXBUF);
  60         this->ClosePending = false;
  61         if (listening) {
  62                 if ((this->fd = OpenTCPSocket()) == ERROR)
  63                 {
  64                         this->fd = -1;
  65                         this->state = I_ERROR;
  66                         this->OnError(I_ERR_SOCKET);
  67                         this->ClosePending = true;
  68                         log(DEBUG,"OpenTCPSocket() error");
  69                         return;
  70                 }
  71                 else
  72                 {
  73                         if (!BindSocket(this->fd,this->client,this->server,aport,(char*)ahost.c_str()))
  74                         {
  75                                 this->Close();
  76                                 this->fd = -1;
  77                                 this->state = I_ERROR;
  78                                 this->OnError(I_ERR_BIND);
  79                                 this->ClosePending = true;
  80                                 log(DEBUG,"BindSocket() error %s",strerror(errno));
  81                                 return;
  82                         }
  83                         else
  84                         {
  85                                 this->state = I_LISTENING;
  86                                 if (this->fd > -1)
  87                                 {
  88                                         ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
  89                                         socket_ref[this->fd] = this;
  90                                 }
  91                                 log(DEBUG,"New socket now in I_LISTENING state");
  92                                 return;
  93                         }
  94                 }
  95         }
  96         else
  97         {
  98                 strlcpy(this->host,ahost.c_str(),MAXBUF);
  99                 this->port = aport;
 100
 101                 if (!inet_aton(host,&addy))
 102                 {
 103                         log(DEBUG,"Attempting to resolve %s",this->host);
 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);
 115                         strlcpy(this->IP,host,MAXBUF);
 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                         strlcpy(this->IP,res_ip.c_str(),MAXBUF);
 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                         this->fd = -1;
 151                         this->ClosePending = true;
 152                         return false;
 153                 }
 154                 return this->DoConnect();
 155         }
 156         log(DEBUG,"No result for socket yet!");
 157         return true;
 158 }
 159
 160 bool InspSocket::BindAddr()
 161 {
 162         insp_inaddr n;
 163         ConfigReader Conf;
 164
 165         log(DEBUG,"In InspSocket::BindAddr()");
 166         for (int j =0; j < Conf.Enumerate("bind"); j++)
 167         {
 168                 std::string Type = Conf.ReadValue("bind","type",j);
 169                 std::string IP = Conf.ReadValue("bind","address",j);
 170                 if (Type == "servers")
 171                 {
 172                         if ((IP != "*") && (IP != "127.0.0.1"))
 173                         {
 174                                 insp_sockaddr s;
 175
 176                                 if (inet_aton(IP.c_str(),&n))
 177                                 {
 178                                         log(DEBUG,"Found an IP to bind to: %s",IP.c_str());
 179                                         s.sin_addr = n;
 180                                         s.sin_family = AF_INET;
 181                                         if (bind(this->fd,(struct sockaddr*)&s,sizeof(s)) < 0)
 182                                         {
 183                                                 log(DEBUG,"Cant bind()");
 184                                                 this->state = I_ERROR;
 185                                                 this->OnError(I_ERR_BIND);
 186                                                 this->fd = -1;
 187                                                 return false;
 188                                         }
 189                                         log(DEBUG,"bind() reports outbound fd bound to ip %s",IP.c_str());
 190                                         return true;
 191                                 }
 192                                 else
 193                                 {
 194                                         log(DEBUG,"Address '%s' was not an IP address",IP.c_str());
 195                                 }
 196                         }
 197                 }
 198         }
 199         log(DEBUG,"Found no suitable IPs to bind, binding INADDR_ANY");
 200         return true;
 201 }
 202
 203 bool InspSocket::DoConnect()
 204 {
 205         log(DEBUG,"In DoConnect()");
 206         if ((this->fd = socket(AF_INET, SOCK_STREAM, 0)) == -1)
 207         {
 208                 log(DEBUG,"Cant socket()");
 209                 this->state = I_ERROR;
 210                 this->OnError(I_ERR_SOCKET);
 211                 this->fd = -1;
 212                 return false;
 213         }
 214
 215         if (!this->BindAddr())
 216                 return false;
 217
 218         log(DEBUG,"Part 2 DoConnect() %s",this->IP);
 219         inet_aton(this->IP,&addy);
 220         addr.sin_family = AF_INET;
 221         addr.sin_addr = addy;
 222         addr.sin_port = htons(this->port);
 223
 224         int flags;
 225         flags = fcntl(this->fd, F_GETFL, 0);
 226         fcntl(this->fd, F_SETFL, flags | O_NONBLOCK);
 227
 228         if (connect(this->fd, (sockaddr*)&this->addr,sizeof(this->addr)) == -1)
 229         {
 230                 if (errno != EINPROGRESS)
 231                 {
 232                         log(DEBUG,"Error connect() %d: %s",this->fd,strerror(errno));
 233                         this->OnError(I_ERR_CONNECT);
 234                         this->Close();
 235                         this->state = I_ERROR;
 236                         this->fd = -1;
 237                         this->ClosePending = true;
 238                         return false;
 239                 }
 240         }
 241         this->state = I_CONNECTING;
 242         if (this->fd > -1)
 243         {
 244                 ServerInstance->SE->AddFd(this->fd,false,X_ESTAB_MODULE);
 245                 socket_ref[this->fd] = this;
 246                 this->SetQueues(this->fd);
 247         }
 248         log(DEBUG,"Returning true from InspSocket::DoConnect");
 249         return true;
 250 }
 251
 252
 253 void InspSocket::Close()
 254 {
 255         if (this->fd != -1)
 256         {
 257                 this->OnClose();
 258                 shutdown(this->fd,2);
 259                 close(this->fd);
 260                 socket_ref[this->fd] = NULL;
 261                 this->ClosePending = true;
 262                 this->fd = -1;
 263         }
 264 }
 265
 266 std::string InspSocket::GetIP()
 267 {
 268         return this->IP;
 269 }
 270
 271 char* InspSocket::Read()
 272 {
 273         if ((fd < 0) || (fd > MAX_DESCRIPTORS))
 274                 return NULL;
 275         int n = recv(this->fd,this->ibuf,sizeof(this->ibuf),0);
 276         if ((n > 0) && (n <= (int)sizeof(this->ibuf)))
 277         {
 278                 ibuf[n] = 0;
 279                 return ibuf;
 280         }
 281         else
 282         {
 283                 if (errno == EAGAIN)
 284                 {
 285                         return "";
 286                 }
 287                 else
 288                 {
 289                         log(DEBUG,"EOF or error on socket: %s",strerror(errno));
 290                         return NULL;
 291                 }
 292         }
 293 }
 294
 295 void InspSocket::MarkAsClosed()
 296 {
 297         log(DEBUG,"Marked as closed");
 298         this->ClosePending = true;
 299 }
 300
 301 // There are two possible outcomes to this function.
 302 // It will either write all of the data, or an undefined amount.
 303 // If an undefined amount is written the connection has failed
 304 // and should be aborted.
 305 int InspSocket::Write(const std::string &data)
 306 {
 307         if (this->ClosePending)
 308                 return false;
 309
 310         /*int result = write(this->fd,data.c_str(),data.length());
 311         if (result < 1)
 312                 return false;
 313         return true;*/
 314
 315         /* Try and append the data to the back of the queue, and send it on its way
 316          */
 317         outbuffer.push_back(data);
 318         return (!this->FlushWriteBuffer());
 319 }
 320
 321 bool InspSocket::FlushWriteBuffer()
 322 {
 323         if (this->ClosePending)
 324                 return true;
 325
 326         if ((this->fd > -1) && (this->state == I_CONNECTED))
 327         {
 328                 if (outbuffer.size())
 329                 {
 330                         int result = write(this->fd,outbuffer[0].c_str(),outbuffer[0].length());
 331                         if (result > 0)
 332                         {
 333                                 if ((unsigned int)result == outbuffer[0].length())
 334                                 {
 335                                         /* The whole block was written (usually a line)
 336                                          * Pop the block off the front of the queue
 337                                          */
 338                                         outbuffer.pop_front();
 339                                 }
 340                                 else
 341                                 {
 342                                         std::string temp = outbuffer[0].substr(result);
 343                                         outbuffer[0] = temp;
 344                                 }
 345                         }
 346                         else if ((result == -1) && (errno != EAGAIN))
 347                         {
 348                                 log(DEBUG,"Write error on socket: %s",strerror(errno));
 349                                 this->OnError(I_ERR_WRITE);
 350                                 this->state = I_ERROR;
 351                                 this->ClosePending = true;
 352                                 return true;
 353                         }
 354                 }
 355         }
 356         return (fd < 0);
 357 }
 358
 359 bool InspSocket::Timeout(time_t current)
 360 {
 361         if (!socket_ref[this->fd] || !ServerInstance->SE->HasFd(this->fd))
 362         {
 363                 log(DEBUG,"No FD or socket ref");
 364                 return false;
 365         }
 366
 367         if (this->ClosePending)
 368         {
 369                 log(DEBUG,"Close is pending");
 370                 return true;
 371         }
 372
 373         if (((this->state == I_RESOLVING) || (this->state == I_CONNECTING)) && (current > timeout_end))
 374         {
 375                 log(DEBUG,"Timed out, current=%lu timeout_end=%lu");
 376                 // for non-listening sockets, the timeout can occur
 377                 // which causes termination of the connection after
 378                 // the given number of seconds without a successful
 379                 // connection.
 380                 this->OnTimeout();
 381                 this->OnError(I_ERR_TIMEOUT);
 382                 timeout = true;
 383                 this->state = I_ERROR;
 384                 this->ClosePending = true;
 385                 return true;
 386         }
 387         return this->FlushWriteBuffer();
 388 }
 389
 390 bool InspSocket::Poll()
 391 {
 392         if (!socket_ref[this->fd] || !ServerInstance->SE->HasFd(this->fd))
 393                 return false;
 394
 395         int incoming = -1;
 396         bool n = true;
 397
 398         if ((fd < 0) || (fd > MAX_DESCRIPTORS) || (this->ClosePending))
 399                 return false;
 400
 401         switch (this->state)
 402         {
 403                 case I_RESOLVING:
 404                         log(DEBUG,"State = I_RESOLVING, calling DoResolve()");
 405                         return this->DoResolve();
 406                 break;
 407                 case I_CONNECTING:
 408                         log(DEBUG,"State = I_CONNECTING");
 409                         this->SetState(I_CONNECTED);
 410                         /* Our socket was in write-state, so delete it and re-add it
 411                          * in read-state.
 412                          */
 413                         if (this->fd > -1)
 414                         {
 415                                 ServerInstance->SE->DelFd(this->fd);
 416                                 ServerInstance->SE->AddFd(this->fd,true,X_ESTAB_MODULE);
 417                         }
 418                         return this->OnConnected();
 419                 break;
 420                 case I_LISTENING:
 421                         length = sizeof (client);
 422                         incoming = accept (this->fd, (sockaddr*)&client,&length);
 423                         this->SetQueues(incoming);
 424                         this->OnIncomingConnection(incoming,inet_ntoa(client.sin_addr));
 425                         return true;
 426                 break;
 427                 case I_CONNECTED:
 428                         n = this->OnDataReady();
 429                         /* Flush any pending, but not till after theyre done with the event
 430                          * so there are less write calls involved.
 431                          * Both FlushWriteBuffer AND the return result of OnDataReady must
 432                          * return true for this to be ok.
 433                          */
 434                         if (this->FlushWriteBuffer())
 435                                 return false;
 436                         return n;
 437                 break;
 438                 default:
 439                 break;
 440         }
 441         return true;
 442 }
 443
 444 void InspSocket::SetState(InspSocketState s)
 445 {
 446         log(DEBUG,"Socket state change");
 447         this->state = s;
 448 }
 449
 450 InspSocketState InspSocket::GetState()
 451 {
 452         return this->state;
 453 }
 454
 455 int InspSocket::GetFd()
 456 {
 457         return this->fd;
 458 }
 459
 460 bool InspSocket::OnConnected() { return true; }
 461 void InspSocket::OnError(InspSocketError e) { return; }
 462 int InspSocket::OnDisconnect() { return 0; }
 463 int InspSocket::OnIncomingConnection(int newfd, char* ip) { return 0; }
 464 bool InspSocket::OnDataReady() { return true; }
 465 void InspSocket::OnTimeout() { return; }
 466 void InspSocket::OnClose() { return; }
 467
 468 InspSocket::~InspSocket()
 469 {
 470         this->Close();
 471 }