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 "socket.h"
  18 #include "configreader.h"
  19 #include "inspstring.h"
  20 #include "socketengine.h"
  21 #include "inspircd.h"
  22
  23 using irc::sockets::OpenTCPSocket;
  24 using irc::sockets::insp_inaddr;
  25 using irc::sockets::insp_sockaddr;
  26
  27 bool InspSocket::Readable()
  28 {
  29         return ((this->state != I_CONNECTING) && (this->WaitingForWriteEvent == false));
  30 }
  31
  32 InspSocket::InspSocket(InspIRCd* SI)
  33 {
  34         this->state = I_DISCONNECTED;
  35         this->fd = -1;
  36         this->WaitingForWriteEvent = false;
  37         this->Instance = SI;
  38 }
  39
  40 InspSocket::InspSocket(InspIRCd* SI, int newfd, const char* ip)
  41 {
  42         this->fd = newfd;
  43         this->state = I_CONNECTED;
  44         strlcpy(this->IP,ip,MAXBUF);
  45         this->WaitingForWriteEvent = false;
  46         this->Instance = SI;
  47         if (this->fd > -1)
  48                 this->Instance->SE->AddFd(this);
  49 }
  50
  51 InspSocket::InspSocket(InspIRCd* SI, const std::string &ipaddr, int aport, bool listening, unsigned long maxtime)
  52 {
  53         this->fd = -1;
  54         this->Instance = SI;
  55         strlcpy(host,ipaddr.c_str(),MAXBUF);
  56         this->WaitingForWriteEvent = false;
  57         if (listening)
  58         {
  59                 if ((this->fd = OpenTCPSocket()) == ERROR)
  60                 {
  61                         this->fd = -1;
  62                         this->state = I_ERROR;
  63                         this->OnError(I_ERR_SOCKET);
  64                         this->Instance->Log(DEBUG,"OpenTCPSocket() error");
  65                         return;
  66                 }
  67                 else
  68                 {
  69                         if (!SI->BindSocket(this->fd,this->client,this->server,aport,(char*)ipaddr.c_str()))
  70                         {
  71                                 this->Instance->Log(DEBUG,"BindSocket() error %s",strerror(errno));
  72                                 this->Close();
  73                                 this->fd = -1;
  74                                 this->state = I_ERROR;
  75                                 this->OnError(I_ERR_BIND);
  76                                 this->ClosePending = true;
  77                                 return;
  78                         }
  79                         else
  80                         {
  81                                 this->state = I_LISTENING;
  82                                 if (this->fd > -1)
  83                                 {
  84                                         if (!this->Instance->SE->AddFd(this))
  85                                         {
  86                                                 this->Close();
  87                                                 this->state = I_ERROR;
  88                                                 this->OnError(I_ERR_NOMOREFDS);
  89                                         }
  90                                 }
  91                                 this->Instance->Log(DEBUG,"New socket now in I_LISTENING state");
  92                                 return;
  93                         }
  94                 }
  95         }
  96         else
  97         {
  98                 strlcpy(this->host,ipaddr.c_str(),MAXBUF);
  99                 this->port = aport;
 100
 101                 if (insp_aton(host,&addy) < 1)
 102                 {
 103                         this->Instance->Log(DEBUG,"You cannot pass hostnames to InspSocket, resolve them first with Resolver!");
 104                         this->Close();
 105                         this->fd = -1;
 106                         this->state = I_ERROR;
 107                         this->OnError(I_ERR_RESOLVE);
 108                         return;
 109                 }
 110                 else
 111                 {
 112                         this->Instance->Log(DEBUG,"No need to resolve %s",this->host);
 113                         strlcpy(this->IP,host,MAXBUF);
 114                         timeout_val = maxtime;
 115                         this->DoConnect();
 116                 }
 117         }
 118 }
 119
 120 void InspSocket::WantWrite()
 121 {
 122         /** XXX:
 123          * The socket engine may only have each FD in the list ONCE.
 124          * This means we cant watch for write AND read at the same
 125          * time. We have to remove the READ fd, to insert the WRITE
 126          * fd. Once we receive our WRITE event (which WILL ARRIVE,
 127          * pretty much gauranteed) we switch back to watching for
 128          * READ events again.
 129          *
 130          * This behaviour may be fixed in a later version.
 131          */
 132         this->Instance->SE->DelFd(this);
 133         this->WaitingForWriteEvent = true;
 134         if (!this->Instance->SE->AddFd(this))
 135         {
 136                 this->Close();
 137                 this->fd = -1;
 138                 this->state = I_ERROR;
 139                 this->OnError(I_ERR_NOMOREFDS);
 140         }
 141 }
 142
 143 void InspSocket::SetQueues(int nfd)
 144 {
 145         // attempt to increase socket sendq and recvq as high as its possible
 146         int sendbuf = 32768;
 147         int recvbuf = 32768;
 148         setsockopt(nfd,SOL_SOCKET,SO_SNDBUF,(const void *)&sendbuf,sizeof(sendbuf));
 149         setsockopt(nfd,SOL_SOCKET,SO_RCVBUF,(const void *)&recvbuf,sizeof(sendbuf));
 150 }
 151
 152 /* Most irc servers require you to specify the ip you want to bind to.
 153  * If you dont specify an IP, they rather dumbly bind to the first IP
 154  * of the box (e.g. INADDR_ANY). In InspIRCd, we scan thought the IP
 155  * addresses we've bound server ports to, and we try and bind our outbound
 156  * connections to the first usable non-loopback and non-any IP we find.
 157  * This is easier to configure when you have a lot of links and a lot
 158  * of servers to configure.
 159  */
 160 bool InspSocket::BindAddr()
 161 {
 162         insp_inaddr n;
 163         ConfigReader Conf(this->Instance);
 164
 165         this->Instance->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") && (IP != ""))
 173                         {
 174                                 insp_sockaddr s;
 175
 176                                 if (insp_aton(IP.c_str(),&n) > 0)
 177                                 {
 178                                         this->Instance->Log(DEBUG,"Found an IP to bind to: %s",IP.c_str());
 179 #ifdef IPV6
 180                                         s.sin6_addr = n;
 181                                         s.sin6_family = AF_FAMILY;
 182 #else
 183                                         s.sin_addr = n;
 184                                         s.sin_family = AF_FAMILY;
 185 #endif
 186                                         if (bind(this->fd,(struct sockaddr*)&s,sizeof(s)) < 0)
 187                                         {
 188                                                 this->Instance->Log(DEBUG,"Cant bind()");
 189                                                 this->state = I_ERROR;
 190                                                 this->OnError(I_ERR_BIND);
 191                                                 this->fd = -1;
 192                                                 return false;
 193                                         }
 194                                         this->Instance->Log(DEBUG,"bind() reports outbound fd bound to ip %s",IP.c_str());
 195                                         return true;
 196                                 }
 197                                 else
 198                                 {
 199                                         this->Instance->Log(DEBUG,"Address '%s' was not an IP address",IP.c_str());
 200                                 }
 201                         }
 202                 }
 203         }
 204         this->Instance->Log(DEBUG,"Found no suitable IPs to bind, binding INADDR_ANY");
 205         return true;
 206 }
 207
 208 bool InspSocket::DoConnect()
 209 {
 210         this->Instance->Log(DEBUG,"In DoConnect()");
 211         if ((this->fd = socket(AF_FAMILY, SOCK_STREAM, 0)) == -1)
 212         {
 213                 this->Instance->Log(DEBUG,"Cant socket()");
 214                 this->state = I_ERROR;
 215                 this->OnError(I_ERR_SOCKET);
 216                 return false;
 217         }
 218
 219         if ((strstr(this->IP,"::ffff:") != (char*)&this->IP) && (strstr(this->IP,"::FFFF:") != (char*)&this->IP))
 220         {
 221                 if (!this->BindAddr())
 222                         return false;
 223         }
 224
 225         this->Instance->Log(DEBUG,"Part 2 DoConnect() %s",this->IP);
 226         insp_aton(this->IP,&addy);
 227 #ifdef IPV6
 228         addr.sin6_family = AF_FAMILY;
 229         memcpy(&addr.sin6_addr, &addy, sizeof(insp_inaddr));
 230         addr.sin6_port = htons(this->port);
 231 #else
 232         addr.sin_family = AF_FAMILY;
 233         addr.sin_addr = addy;
 234         addr.sin_port = htons(this->port);
 235 #endif
 236
 237         int flags;
 238         flags = fcntl(this->fd, F_GETFL, 0);
 239         fcntl(this->fd, F_SETFL, flags | O_NONBLOCK);
 240
 241         if (connect(this->fd, (sockaddr*)&this->addr,sizeof(this->addr)) == -1)
 242         {
 243                 if (errno != EINPROGRESS)
 244                 {
 245                         this->Instance->Log(DEBUG,"Error connect() %d: %s",this->fd,strerror(errno));
 246                         this->OnError(I_ERR_CONNECT);
 247                         this->Close();
 248                         this->state = I_ERROR;
 249                         return false;
 250                 }
 251
 252                 this->Timeout = new SocketTimeout(this->GetFd(), this->Instance, this, timeout_val, this->Instance->Time());
 253                 this->Instance->Timers->AddTimer(this->Timeout);
 254         }
 255         this->state = I_CONNECTING;
 256         if (this->fd > -1)
 257         {
 258                 if (!this->Instance->SE->AddFd(this))
 259                 {
 260                         this->OnError(I_ERR_NOMOREFDS);
 261                         this->Close();
 262                         this->state = I_ERROR;
 263                         return false;
 264                 }
 265                 this->SetQueues(this->fd);
 266         }
 267         this->Instance->Log(DEBUG,"Returning true from InspSocket::DoConnect");
 268         return true;
 269 }
 270
 271
 272 void InspSocket::Close()
 273 {
 274         if (this->fd > -1)
 275         {
 276                 this->OnClose();
 277                 shutdown(this->fd,2);
 278                 close(this->fd);
 279         }
 280 }
 281
 282 std::string InspSocket::GetIP()
 283 {
 284         return this->IP;
 285 }
 286
 287 char* InspSocket::Read()
 288 {
 289         if ((fd < 0) || (fd > MAX_DESCRIPTORS))
 290                 return NULL;
 291         int n = recv(this->fd,this->ibuf,sizeof(this->ibuf),0);
 292         if ((n > 0) && (n <= (int)sizeof(this->ibuf)))
 293         {
 294                 ibuf[n] = 0;
 295                 return ibuf;
 296         }
 297         else
 298         {
 299                 int err = errno;
 300                 if (err == EAGAIN)
 301                 {
 302                         return "";
 303                 }
 304                 else
 305                 {
 306                         if (!n)
 307                                 this->Instance->Log(DEBUG,"EOF or error on socket: EOF");
 308                         else
 309                                 this->Instance->Log(DEBUG,"EOF or error on socket: %s",strerror(err));
 310                         return NULL;
 311                 }
 312         }
 313 }
 314
 315 void InspSocket::MarkAsClosed()
 316 {
 317         this->Instance->Log(DEBUG,"Marked as closed");
 318 }
 319
 320 // There are two possible outcomes to this function.
 321 // It will either write all of the data, or an undefined amount.
 322 // If an undefined amount is written the connection has failed
 323 // and should be aborted.
 324 int InspSocket::Write(const std::string &data)
 325 {
 326         /* Try and append the data to the back of the queue, and send it on its way
 327          */
 328         outbuffer.push_back(data);
 329         return (!this->FlushWriteBuffer());
 330 }
 331
 332 bool InspSocket::FlushWriteBuffer()
 333 {
 334         if ((this->fd > -1) && (this->state == I_CONNECTED))
 335         {
 336                 if (outbuffer.size())
 337                 {
 338                         int result = write(this->fd,outbuffer[0].c_str(),outbuffer[0].length());
 339                         if (result > 0)
 340                         {
 341                                 if ((unsigned int)result == outbuffer[0].length())
 342                                 {
 343                                         /* The whole block was written (usually a line)
 344                                          * Pop the block off the front of the queue
 345                                          */
 346                                         outbuffer.pop_front();
 347                                 }
 348                                 else
 349                                 {
 350                                         std::string temp = outbuffer[0].substr(result);
 351                                         outbuffer[0] = temp;
 352                                 }
 353                         }
 354                         else if ((result == -1) && (errno != EAGAIN))
 355                         {
 356                                 this->Instance->Log(DEBUG,"Write error on socket: %s",strerror(errno));
 357                                 this->OnError(I_ERR_WRITE);
 358                                 this->state = I_ERROR;
 359                                 this->Instance->SE->DelFd(this);
 360                                 this->Close();
 361                                 return true;
 362                         }
 363                 }
 364         }
 365         return (fd < 0);
 366 }
 367
 368 void SocketTimeout::Tick(time_t now)
 369 {
 370         if (ServerInstance->SE->GetRef(this->sfd) != this->sock)
 371         {
 372                 ServerInstance->Log(DEBUG,"No FD or socket ref");
 373                 return;
 374         }
 375
 376         if (this->sock->state == I_CONNECTING)
 377         {
 378                 ServerInstance->Log(DEBUG,"Timed out, current=%lu",now);
 379                 // for non-listening sockets, the timeout can occur
 380                 // which causes termination of the connection after
 381                 // the given number of seconds without a successful
 382                 // connection.
 383                 this->sock->OnTimeout();
 384                 this->sock->OnError(I_ERR_TIMEOUT);
 385                 this->sock->timeout = true;
 386                 this->sock->state = I_ERROR;
 387                 ServerInstance->SE->DelFd(this->sock);
 388                 this->sock->Close();
 389                 delete this->sock;
 390                 return;
 391         }
 392         this->sock->FlushWriteBuffer();
 393 }
 394
 395 bool InspSocket::Poll()
 396 {
 397         if (this->Instance->SE->GetRef(this->fd) != this)
 398                 return false;
 399
 400         int incoming = -1;
 401         bool n = true;
 402
 403         if ((fd < 0) || (fd > MAX_DESCRIPTORS))
 404                 return false;
 405
 406         switch (this->state)
 407         {
 408                 case I_CONNECTING:
 409                         this->Instance->Log(DEBUG,"State = I_CONNECTING");
 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                                 this->Instance->SE->DelFd(this);
 416                                 this->SetState(I_CONNECTED);
 417                                 if (!this->Instance->SE->AddFd(this))
 418                                         return false;
 419                         }
 420                         return this->OnConnected();
 421                 break;
 422                 case I_LISTENING:
 423                         length = sizeof (client);
 424                         incoming = accept (this->fd, (sockaddr*)&client,&length);
 425                         this->SetQueues(incoming);
 426 #ifdef IPV6
 427                         this->OnIncomingConnection(incoming,(char*)insp_ntoa(client.sin6_addr));
 428 #else
 429                         this->OnIncomingConnection(incoming,(char*)insp_ntoa(client.sin_addr));
 430 #endif
 431                         return true;
 432                 break;
 433                 case I_CONNECTED:
 434
 435                         if (this->WaitingForWriteEvent)
 436                         {
 437                                 /* Switch back to read events */
 438                                 this->Instance->SE->DelFd(this);
 439                                 this->WaitingForWriteEvent = false;
 440                                 if (!this->Instance->SE->AddFd(this))
 441                                         return false;
 442
 443                                 /* Trigger the write event */
 444                                 n = this->OnWriteReady();
 445                         }
 446                         else
 447                         {
 448                                 /* Process the read event */
 449                                 n = this->OnDataReady();
 450                         }
 451                         /* Flush any pending, but not till after theyre done with the event
 452                          * so there are less write calls involved.
 453                          * Both FlushWriteBuffer AND the return result of OnDataReady must
 454                          * return true for this to be ok.
 455                          */
 456                         if (this->FlushWriteBuffer())
 457                                 return false;
 458                         return n;
 459                 break;
 460                 default:
 461                 break;
 462         }
 463         return true;
 464 }
 465
 466 void InspSocket::SetState(InspSocketState s)
 467 {
 468         this->Instance->Log(DEBUG,"Socket state change");
 469         this->state = s;
 470 }
 471
 472 InspSocketState InspSocket::GetState()
 473 {
 474         return this->state;
 475 }
 476
 477 int InspSocket::GetFd()
 478 {
 479         return this->fd;
 480 }
 481
 482 bool InspSocket::OnConnected() { return true; }
 483 void InspSocket::OnError(InspSocketError e) { return; }
 484 int InspSocket::OnDisconnect() { return 0; }
 485 int InspSocket::OnIncomingConnection(int newfd, char* ip) { return 0; }
 486 bool InspSocket::OnDataReady() { return true; }
 487 bool InspSocket::OnWriteReady() { return true; }
 488 void InspSocket::OnTimeout() { return; }
 489 void InspSocket::OnClose() { return; }
 490
 491 InspSocket::~InspSocket()
 492 {
 493         this->Close();
 494 }
 495
 496 void InspSocket::HandleEvent(EventType et)
 497 {
 498         if (!this->Poll())
 499         {
 500                 this->Instance->SE->DelFd(this);
 501                 this->Close();
 502                 delete this;
 503         }
 504 }
 505