src/connection.cpp

   1 /*
   2 Minetest
   3 Copyright (C) 2013 celeron55, Perttu Ahola <celeron55@gmail.com>
   4
   5 This program is free software; you can redistribute it and/or modify
   6 it under the terms of the GNU Lesser General Public License as published by
   7 the Free Software Foundation; either version 2.1 of the License, or
   8 (at your option) any later version.
   9
  10 This program is distributed in the hope that it will be useful,
  11 but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 GNU Lesser General Public License for more details.
  14
  15 You should have received a copy of the GNU Lesser General Public License along
  16 with this program; if not, write to the Free Software Foundation, Inc.,
  17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 */
  19
  20 #include <iomanip>
  21 #include <errno.h>
  22 #include "connection.h"
  23 #include "main.h"
  24 #include "serialization.h"
  25 #include "log.h"
  26 #include "porting.h"
  27 #include "util/serialize.h"
  28 #include "util/numeric.h"
  29 #include "util/string.h"
  30 #include "settings.h"
  31 #include "profiler.h"
  32 #include "main.h" // for profiling
  33
  34 namespace con
  35 {
  36
  37 /******************************************************************************/
  38 /* defines used for debugging and profiling                                   */
  39 /******************************************************************************/
  40 #ifdef NDEBUG
  41 #define LOG(a) a
  42 #define PROFILE(a)
  43 #undef DEBUG_CONNECTION_KBPS
  44 #else
  45 /* this mutex is used to achieve log message consistency */
  46 JMutex log_message_mutex;
  47 #define LOG(a)                                                                 \
  48         {                                                                          \
  49         JMutexAutoLock loglock(log_message_mutex);                                 \
  50         a;                                                                         \
  51         }
  52 #define PROFILE(a) a
  53 //#define DEBUG_CONNECTION_KBPS
  54 #undef DEBUG_CONNECTION_KBPS
  55 #endif
  56
  57
  58 static inline float CALC_DTIME(unsigned int lasttime, unsigned int curtime) {
  59         float value = ( curtime - lasttime) / 1000.0;
  60         return MYMAX(MYMIN(value,0.1),0.0);
  61 }
  62
  63 /* maximum window size to use, 0xFFFF is theoretical maximum  don't think about
  64  * touching it, the less you're away from it the more likely data corruption
  65  * will occur
  66  */
  67 #define MAX_RELIABLE_WINDOW_SIZE 0x8000
  68  /* starting value for window size */
  69 #define MIN_RELIABLE_WINDOW_SIZE 0x40
  70
  71 #define MAX_UDP_PEERS 65535
  72
  73 #define PING_TIMEOUT 5.0
  74
  75 static u16 readPeerId(u8 *packetdata)
  76 {
  77         return readU16(&packetdata[4]);
  78 }
  79 static u8 readChannel(u8 *packetdata)
  80 {
  81         return readU8(&packetdata[6]);
  82 }
  83
  84 BufferedPacket makePacket(Address &address, u8 *data, u32 datasize,
  85                 u32 protocol_id, u16 sender_peer_id, u8 channel)
  86 {
  87         u32 packet_size = datasize + BASE_HEADER_SIZE;
  88         BufferedPacket p(packet_size);
  89         p.address = address;
  90
  91         writeU32(&p.data[0], protocol_id);
  92         writeU16(&p.data[4], sender_peer_id);
  93         writeU8(&p.data[6], channel);
  94
  95         memcpy(&p.data[BASE_HEADER_SIZE], data, datasize);
  96
  97         return p;
  98 }
  99
 100 BufferedPacket makePacket(Address &address, SharedBuffer<u8> &data,
 101                 u32 protocol_id, u16 sender_peer_id, u8 channel)
 102 {
 103         return makePacket(address, *data, data.getSize(),
 104                         protocol_id, sender_peer_id, channel);
 105 }
 106
 107 SharedBuffer<u8> makeOriginalPacket(
 108                 SharedBuffer<u8> data)
 109 {
 110         u32 header_size = 1;
 111         u32 packet_size = data.getSize() + header_size;
 112         SharedBuffer<u8> b(packet_size);
 113
 114         writeU8(&b[0], TYPE_ORIGINAL);
 115
 116         memcpy(&b[header_size], *data, data.getSize());
 117
 118         return b;
 119 }
 120
 121 std::list<SharedBuffer<u8> > makeSplitPacket(
 122                 SharedBuffer<u8> data,
 123                 u32 chunksize_max,
 124                 u16 seqnum)
 125 {
 126         // Chunk packets, containing the TYPE_SPLIT header
 127         std::list<SharedBuffer<u8> > chunks;
 128
 129         u32 chunk_header_size = 7;
 130         u32 maximum_data_size = chunksize_max - chunk_header_size;
 131         u32 start = 0;
 132         u32 end = 0;
 133         u32 chunk_num = 0;
 134         u16 chunk_count = 0;
 135         do{
 136                 end = start + maximum_data_size - 1;
 137                 if(end > data.getSize() - 1)
 138                         end = data.getSize() - 1;
 139
 140                 u32 payload_size = end - start + 1;
 141                 u32 packet_size = chunk_header_size + payload_size;
 142
 143                 SharedBuffer<u8> chunk(packet_size);
 144
 145                 writeU8(&chunk[0], TYPE_SPLIT);
 146                 writeU16(&chunk[1], seqnum);
 147                 // [3] u16 chunk_count is written at next stage
 148                 writeU16(&chunk[5], chunk_num);
 149                 memcpy(&chunk[chunk_header_size], &data[start], payload_size);
 150
 151                 chunks.push_back(chunk);
 152                 chunk_count++;
 153
 154                 start = end + 1;
 155                 chunk_num++;
 156         }
 157         while(end != data.getSize() - 1);
 158
 159         for(std::list<SharedBuffer<u8> >::iterator i = chunks.begin();
 160                 i != chunks.end(); ++i)
 161         {
 162                 // Write chunk_count
 163                 writeU16(&((*i)[3]), chunk_count);
 164         }
 165
 166         return chunks;
 167 }
 168
 169 std::list<SharedBuffer<u8> > makeAutoSplitPacket(
 170                 SharedBuffer<u8> data,
 171                 u32 chunksize_max,
 172                 u16 &split_seqnum)
 173 {
 174         u32 original_header_size = 1;
 175         std::list<SharedBuffer<u8> > list;
 176         if(data.getSize() + original_header_size > chunksize_max)
 177         {
 178                 list = makeSplitPacket(data, chunksize_max, split_seqnum);
 179                 split_seqnum++;
 180                 return list;
 181         }
 182         else
 183         {
 184                 list.push_back(makeOriginalPacket(data));
 185         }
 186         return list;
 187 }
 188
 189 SharedBuffer<u8> makeReliablePacket(
 190                 SharedBuffer<u8> data,
 191                 u16 seqnum)
 192 {
 193         /*dstream<<"BEGIN SharedBuffer<u8> makeReliablePacket()"<<std::endl;
 194         dstream<<"data.getSize()="<<data.getSize()<<", data[0]="
 195                         <<((unsigned int)data[0]&0xff)<<std::endl;*/
 196         u32 header_size = 3;
 197         u32 packet_size = data.getSize() + header_size;
 198         SharedBuffer<u8> b(packet_size);
 199
 200         writeU8(&b[0], TYPE_RELIABLE);
 201         writeU16(&b[1], seqnum);
 202
 203         memcpy(&b[header_size], *data, data.getSize());
 204
 205         /*dstream<<"data.getSize()="<<data.getSize()<<", data[0]="
 206                         <<((unsigned int)data[0]&0xff)<<std::endl;*/
 207         //dstream<<"END SharedBuffer<u8> makeReliablePacket()"<<std::endl;
 208         return b;
 209 }
 210
 211 /*
 212         ReliablePacketBuffer
 213 */
 214
 215 ReliablePacketBuffer::ReliablePacketBuffer(): m_list_size(0) {}
 216
 217 void ReliablePacketBuffer::print()
 218 {
 219         JMutexAutoLock listlock(m_list_mutex);
 220         LOG(dout_con<<"Dump of ReliablePacketBuffer:" << std::endl);
 221         unsigned int index = 0;
 222         for(std::list<BufferedPacket>::iterator i = m_list.begin();
 223                 i != m_list.end();
 224                 ++i)
 225         {
 226                 u16 s = readU16(&(i->data[BASE_HEADER_SIZE+1]));
 227                 LOG(dout_con<<index<< ":" << s << std::endl);
 228                 index++;
 229         }
 230 }
 231 bool ReliablePacketBuffer::empty()
 232 {
 233         JMutexAutoLock listlock(m_list_mutex);
 234         return m_list.empty();
 235 }
 236
 237 u32 ReliablePacketBuffer::size()
 238 {
 239         return m_list_size;
 240 }
 241
 242 bool ReliablePacketBuffer::containsPacket(u16 seqnum)
 243 {
 244         return !(findPacket(seqnum) == m_list.end());
 245 }
 246
 247 RPBSearchResult ReliablePacketBuffer::findPacket(u16 seqnum)
 248 {
 249         std::list<BufferedPacket>::iterator i = m_list.begin();
 250         for(; i != m_list.end(); ++i)
 251         {
 252                 u16 s = readU16(&(i->data[BASE_HEADER_SIZE+1]));
 253                 /*dout_con<<"findPacket(): finding seqnum="<<seqnum
 254                                 <<", comparing to s="<<s<<std::endl;*/
 255                 if(s == seqnum)
 256                         break;
 257         }
 258         return i;
 259 }
 260 RPBSearchResult ReliablePacketBuffer::notFound()
 261 {
 262         return m_list.end();
 263 }
 264 bool ReliablePacketBuffer::getFirstSeqnum(u16& result)
 265 {
 266         JMutexAutoLock listlock(m_list_mutex);
 267         if(m_list.empty())
 268                 return false;
 269         BufferedPacket p = *m_list.begin();
 270         result = readU16(&p.data[BASE_HEADER_SIZE+1]);
 271         return true;
 272 }
 273
 274 BufferedPacket ReliablePacketBuffer::popFirst()
 275 {
 276         JMutexAutoLock listlock(m_list_mutex);
 277         if(m_list.empty())
 278                 throw NotFoundException("Buffer is empty");
 279         BufferedPacket p = *m_list.begin();
 280         m_list.erase(m_list.begin());
 281         --m_list_size;
 282
 283         if (m_list_size == 0)
 284         { m_oldest_non_answered_ack = 0; }
 285         else
 286         { m_oldest_non_answered_ack = readU16(&(*m_list.begin()).data[BASE_HEADER_SIZE+1]);     }
 287         return p;
 288 }
 289 BufferedPacket ReliablePacketBuffer::popSeqnum(u16 seqnum)
 290 {
 291         JMutexAutoLock listlock(m_list_mutex);
 292         RPBSearchResult r = findPacket(seqnum);
 293         if(r == notFound()){
 294                 LOG(dout_con<<"Sequence number: " << seqnum << " not found in reliable buffer"<<std::endl);
 295                 throw NotFoundException("seqnum not found in buffer");
 296         }
 297         BufferedPacket p = *r;
 298
 299
 300         RPBSearchResult next = r;
 301         next++;
 302         if (next != notFound()) {
 303                 u16 s = readU16(&(next->data[BASE_HEADER_SIZE+1]));
 304                 m_oldest_non_answered_ack = s;
 305         }
 306
 307         m_list.erase(r);
 308         --m_list_size;
 309
 310         if (m_list_size == 0)
 311         { m_oldest_non_answered_ack = 0; }
 312         else
 313         { m_oldest_non_answered_ack = readU16(&(*m_list.begin()).data[BASE_HEADER_SIZE+1]);     }
 314         return p;
 315 }
 316 void ReliablePacketBuffer::insert(BufferedPacket &p,u16 next_expected)
 317 {
 318         JMutexAutoLock listlock(m_list_mutex);
 319         assert(p.data.getSize() >= BASE_HEADER_SIZE+3);
 320         u8 type = readU8(&p.data[BASE_HEADER_SIZE+0]);
 321         assert(type == TYPE_RELIABLE);
 322         u16 seqnum = readU16(&p.data[BASE_HEADER_SIZE+1]);
 323
 324         assert(seqnum_in_window(seqnum,next_expected,MAX_RELIABLE_WINDOW_SIZE));
 325         assert(seqnum != next_expected);
 326
 327         ++m_list_size;
 328         assert(m_list_size <= SEQNUM_MAX+1);
 329
 330         // Find the right place for the packet and insert it there
 331         // If list is empty, just add it
 332         if(m_list.empty())
 333         {
 334                 m_list.push_back(p);
 335                 m_oldest_non_answered_ack = seqnum;
 336                 // Done.
 337                 return;
 338         }
 339
 340         // Otherwise find the right place
 341         std::list<BufferedPacket>::iterator i = m_list.begin();
 342         // Find the first packet in the list which has a higher seqnum
 343         u16 s = readU16(&(i->data[BASE_HEADER_SIZE+1]));
 344
 345         /* case seqnum is smaller then next_expected seqnum */
 346         /* this is true e.g. on wrap around */
 347         if (seqnum < next_expected) {
 348                 while(((s < seqnum) || (s >= next_expected)) && (i != m_list.end())) {
 349                         i++;
 350                         if (i != m_list.end())
 351                                 s = readU16(&(i->data[BASE_HEADER_SIZE+1]));
 352                 }
 353         }
 354         /* non wrap around case (at least for incoming and next_expected */
 355         else
 356         {
 357                 while(((s < seqnum) && (s >= next_expected)) && (i != m_list.end())) {
 358                         i++;
 359                         if (i != m_list.end())
 360                                 s = readU16(&(i->data[BASE_HEADER_SIZE+1]));
 361                 }
 362         }
 363
 364         if (s == seqnum) {
 365                 if (
 366                         (readU16(&(i->data[BASE_HEADER_SIZE+1])) != seqnum) ||
 367                         (i->data.getSize() != p.data.getSize()) ||
 368                         (i->address != p.address)
 369                         )
 370                 {
 371                         /* if this happens your maximum transfer window may be to big */
 372                         fprintf(stderr, "Duplicated seqnum %d non matching packet detected:\n",seqnum);
 373                         fprintf(stderr, "Old: seqnum: %05d size: %04d, address: %s\n",
 374                                         readU16(&(i->data[BASE_HEADER_SIZE+1])),i->data.getSize(), i->address.serializeString().c_str());
 375                         fprintf(stderr, "New: seqnum: %05d size: %04d, address: %s\n",
 376                                         readU16(&(p.data[BASE_HEADER_SIZE+1])),p.data.getSize(), p.address.serializeString().c_str());
 377                         throw IncomingDataCorruption("duplicated packet isn't same as original one");
 378                 }
 379
 380                 assert(readU16(&(i->data[BASE_HEADER_SIZE+1])) == seqnum);
 381                 assert(i->data.getSize() == p.data.getSize());
 382                 assert(i->address == p.address);
 383
 384                 /* nothing to do this seems to be a resent packet */
 385                 /* for paranoia reason data should be compared */
 386                 --m_list_size;
 387         }
 388         /* insert or push back */
 389         else if (i != m_list.end()) {
 390                 m_list.insert(i, p);
 391         }
 392         else {
 393                 m_list.push_back(p);
 394         }
 395
 396         /* update last packet number */
 397         m_oldest_non_answered_ack = readU16(&(*m_list.begin()).data[BASE_HEADER_SIZE+1]);
 398 }
 399
 400 void ReliablePacketBuffer::incrementTimeouts(float dtime)
 401 {
 402         JMutexAutoLock listlock(m_list_mutex);
 403         for(std::list<BufferedPacket>::iterator i = m_list.begin();
 404                 i != m_list.end(); ++i)
 405         {
 406                 i->time += dtime;
 407                 i->totaltime += dtime;
 408         }
 409 }
 410
 411 std::list<BufferedPacket> ReliablePacketBuffer::getTimedOuts(float timeout,
 412                                                                                                         unsigned int max_packets)
 413 {
 414         JMutexAutoLock listlock(m_list_mutex);
 415         std::list<BufferedPacket> timed_outs;
 416         for(std::list<BufferedPacket>::iterator i = m_list.begin();
 417                 i != m_list.end(); ++i)
 418         {
 419                 if(i->time >= timeout) {
 420                         timed_outs.push_back(*i);
 421
 422                         //this packet will be sent right afterwards reset timeout here
 423                         i->time = 0.0;
 424                         if (timed_outs.size() >= max_packets)
 425                                 break;
 426                 }
 427         }
 428         return timed_outs;
 429 }
 430
 431 /*
 432         IncomingSplitBuffer
 433 */
 434
 435 IncomingSplitBuffer::~IncomingSplitBuffer()
 436 {
 437         JMutexAutoLock listlock(m_map_mutex);
 438         for(std::map<u16, IncomingSplitPacket*>::iterator i = m_buf.begin();
 439                 i != m_buf.end(); ++i)
 440         {
 441                 delete i->second;
 442         }
 443 }
 444 /*
 445         This will throw a GotSplitPacketException when a full
 446         split packet is constructed.
 447 */
 448 SharedBuffer<u8> IncomingSplitBuffer::insert(BufferedPacket &p, bool reliable)
 449 {
 450         JMutexAutoLock listlock(m_map_mutex);
 451         u32 headersize = BASE_HEADER_SIZE + 7;
 452         assert(p.data.getSize() >= headersize);
 453         u8 type = readU8(&p.data[BASE_HEADER_SIZE+0]);
 454         assert(type == TYPE_SPLIT);
 455         u16 seqnum = readU16(&p.data[BASE_HEADER_SIZE+1]);
 456         u16 chunk_count = readU16(&p.data[BASE_HEADER_SIZE+3]);
 457         u16 chunk_num = readU16(&p.data[BASE_HEADER_SIZE+5]);
 458
 459         // Add if doesn't exist
 460         if(m_buf.find(seqnum) == m_buf.end())
 461         {
 462                 IncomingSplitPacket *sp = new IncomingSplitPacket();
 463                 sp->chunk_count = chunk_count;
 464                 sp->reliable = reliable;
 465                 m_buf[seqnum] = sp;
 466         }
 467
 468         IncomingSplitPacket *sp = m_buf[seqnum];
 469
 470         // TODO: These errors should be thrown or something? Dunno.
 471         if(chunk_count != sp->chunk_count)
 472                 LOG(derr_con<<"Connection: WARNING: chunk_count="<<chunk_count
 473                                 <<" != sp->chunk_count="<<sp->chunk_count
 474                                 <<std::endl);
 475         if(reliable != sp->reliable)
 476                 LOG(derr_con<<"Connection: WARNING: reliable="<<reliable
 477                                 <<" != sp->reliable="<<sp->reliable
 478                                 <<std::endl);
 479
 480         // If chunk already exists, ignore it.
 481         // Sometimes two identical packets may arrive when there is network
 482         // lag and the server re-sends stuff.
 483         if(sp->chunks.find(chunk_num) != sp->chunks.end())
 484                 return SharedBuffer<u8>();
 485
 486         // Cut chunk data out of packet
 487         u32 chunkdatasize = p.data.getSize() - headersize;
 488         SharedBuffer<u8> chunkdata(chunkdatasize);
 489         memcpy(*chunkdata, &(p.data[headersize]), chunkdatasize);
 490
 491         // Set chunk data in buffer
 492         sp->chunks[chunk_num] = chunkdata;
 493
 494         // If not all chunks are received, return empty buffer
 495         if(sp->allReceived() == false)
 496                 return SharedBuffer<u8>();
 497
 498         // Calculate total size
 499         u32 totalsize = 0;
 500         for(std::map<u16, SharedBuffer<u8> >::iterator i = sp->chunks.begin();
 501                 i != sp->chunks.end(); ++i)
 502         {
 503                 totalsize += i->second.getSize();
 504         }
 505
 506         SharedBuffer<u8> fulldata(totalsize);
 507
 508         // Copy chunks to data buffer
 509         u32 start = 0;
 510         for(u32 chunk_i=0; chunk_i<sp->chunk_count;
 511                         chunk_i++)
 512         {
 513                 SharedBuffer<u8> buf = sp->chunks[chunk_i];
 514                 u16 chunkdatasize = buf.getSize();
 515                 memcpy(&fulldata[start], *buf, chunkdatasize);
 516                 start += chunkdatasize;;
 517         }
 518
 519         // Remove sp from buffer
 520         m_buf.erase(seqnum);
 521         delete sp;
 522
 523         return fulldata;
 524 }
 525 void IncomingSplitBuffer::removeUnreliableTimedOuts(float dtime, float timeout)
 526 {
 527         std::list<u16> remove_queue;
 528         {
 529                 JMutexAutoLock listlock(m_map_mutex);
 530                 for(std::map<u16, IncomingSplitPacket*>::iterator i = m_buf.begin();
 531                         i != m_buf.end(); ++i)
 532                 {
 533                         IncomingSplitPacket *p = i->second;
 534                         // Reliable ones are not removed by timeout
 535                         if(p->reliable == true)
 536                                 continue;
 537                         p->time += dtime;
 538                         if(p->time >= timeout)
 539                                 remove_queue.push_back(i->first);
 540                 }
 541         }
 542         for(std::list<u16>::iterator j = remove_queue.begin();
 543                 j != remove_queue.end(); ++j)
 544         {
 545                 JMutexAutoLock listlock(m_map_mutex);
 546                 LOG(dout_con<<"NOTE: Removing timed out unreliable split packet"<<std::endl);
 547                 delete m_buf[*j];
 548                 m_buf.erase(*j);
 549         }
 550 }
 551
 552 /*
 553         Channel
 554 */
 555
 556 Channel::Channel() :
 557                 window_size(MIN_RELIABLE_WINDOW_SIZE),
 558                 next_incoming_seqnum(SEQNUM_INITIAL),
 559                 next_outgoing_seqnum(SEQNUM_INITIAL),
 560                 next_outgoing_split_seqnum(SEQNUM_INITIAL),
 561                 current_packet_loss(0),
 562                 current_packet_too_late(0),
 563                 packet_loss_counter(0),
 564                 current_bytes_transfered(0),
 565                 current_bytes_lost(0),
 566                 max_kbps(0.0),
 567                 cur_kbps(0.0),
 568                 avg_kbps(0.0),
 569                 max_kbps_lost(0.0),
 570                 cur_kbps_lost(0.0),
 571                 avg_kbps_lost(0.0),
 572                 bpm_counter(0.0)
 573 {
 574 }
 575
 576 Channel::~Channel()
 577 {
 578 }
 579
 580 u16 Channel::readNextIncomingSeqNum()
 581 {
 582         JMutexAutoLock internal(m_internal_mutex);
 583         return next_incoming_seqnum;
 584 }
 585
 586 u16 Channel::incNextIncomingSeqNum()
 587 {
 588         JMutexAutoLock internal(m_internal_mutex);
 589         u16 retval = next_incoming_seqnum;
 590         next_incoming_seqnum++;
 591         return retval;
 592 }
 593
 594 u16 Channel::readNextSplitSeqNum()
 595 {
 596         JMutexAutoLock internal(m_internal_mutex);
 597         return next_outgoing_split_seqnum;
 598 }
 599 void Channel::setNextSplitSeqNum(u16 seqnum)
 600 {
 601         JMutexAutoLock internal(m_internal_mutex);
 602         next_outgoing_split_seqnum = seqnum;
 603 }
 604
 605 u16 Channel::getOutgoingSequenceNumber(bool& successfull)
 606 {
 607         JMutexAutoLock internal(m_internal_mutex);
 608         u16 retval = next_outgoing_seqnum;
 609         u16 lowest_unacked_seqnumber;
 610
 611         /* shortcut if there ain't any packet in outgoing list */
 612         if (outgoing_reliables_sent.empty())
 613         {
 614                 next_outgoing_seqnum++;
 615                 return retval;
 616         }
 617
 618         if (outgoing_reliables_sent.getFirstSeqnum(lowest_unacked_seqnumber))
 619         {
 620                 if (lowest_unacked_seqnumber < next_outgoing_seqnum) {
 621                         // ugly cast but this one is required in order to tell compiler we
 622                         // know about difference of two unsigned may be negative in general
 623                         // but we already made sure it won't happen in this case
 624                         if (((u16)(next_outgoing_seqnum - lowest_unacked_seqnumber)) > window_size) {
 625                                 successfull = false;
 626                                 return 0;
 627                         }
 628                 }
 629                 else {
 630                         // ugly cast but this one is required in order to tell compiler we
 631                         // know about difference of two unsigned may be negative in general
 632                         // but we already made sure it won't happen in this case
 633                         if ((next_outgoing_seqnum + (u16)(SEQNUM_MAX - lowest_unacked_seqnumber)) >
 634                                 window_size) {
 635                                 successfull = false;
 636                                 return 0;
 637                         }
 638                 }
 639         }
 640
 641         next_outgoing_seqnum++;
 642         return retval;
 643 }
 644
 645 u16 Channel::readOutgoingSequenceNumber()
 646 {
 647         JMutexAutoLock internal(m_internal_mutex);
 648         return next_outgoing_seqnum;
 649 }
 650
 651 bool Channel::putBackSequenceNumber(u16 seqnum)
 652 {
 653         if (((seqnum + 1) % (SEQNUM_MAX+1)) == next_outgoing_seqnum) {
 654
 655                 next_outgoing_seqnum = seqnum;
 656                 return true;
 657         }
 658         return false;
 659 }
 660
 661 void Channel::UpdateBytesSent(unsigned int bytes, unsigned int packets)
 662 {
 663         JMutexAutoLock internal(m_internal_mutex);
 664         current_bytes_transfered += bytes;
 665         current_packet_successfull += packets;
 666 }
 667
 668 void Channel::UpdateBytesLost(unsigned int bytes)
 669 {
 670         JMutexAutoLock internal(m_internal_mutex);
 671         current_bytes_lost += bytes;
 672 }
 673
 674
 675 void Channel::UpdatePacketLossCounter(unsigned int count)
 676 {
 677         JMutexAutoLock internal(m_internal_mutex);
 678         current_packet_loss += count;
 679 }
 680
 681 void Channel::UpdatePacketTooLateCounter()
 682 {
 683         JMutexAutoLock internal(m_internal_mutex);
 684         current_packet_too_late++;
 685 }
 686
 687 void Channel::UpdateTimers(float dtime)
 688 {
 689         bpm_counter += dtime;
 690         packet_loss_counter += dtime;
 691
 692         if (packet_loss_counter > 1.0)
 693         {
 694                 packet_loss_counter -= 1.0;
 695
 696                 unsigned int packet_loss = 11; /* use a neutral value for initialization */
 697                 unsigned int packets_successfull = 0;
 698                 unsigned int packet_too_late = 0;
 699
 700                 bool reasonable_amount_of_data_transmitted = false;
 701
 702                 {
 703                         JMutexAutoLock internal(m_internal_mutex);
 704                         packet_loss = current_packet_loss;
 705                         packet_too_late = current_packet_too_late;
 706                         packets_successfull = current_packet_successfull;
 707
 708                         if (current_bytes_transfered > (window_size*512/2))
 709                         {
 710                                 reasonable_amount_of_data_transmitted = true;
 711                         }
 712                         current_packet_loss = 0;
 713                         current_packet_too_late = 0;
 714                         current_packet_successfull = 0;
 715                 }
 716
 717                 float successfull_to_lost_ratio = 0.0;
 718                 bool done = false;
 719
 720                 if (packets_successfull > 0) {
 721                         successfull_to_lost_ratio = packet_loss/packets_successfull;
 722                 }
 723                 else if (packet_loss > 0)
 724                 {
 725                         window_size = MYMAX(
 726                                                                                 (window_size - 10),
 727                                                                                 MIN_RELIABLE_WINDOW_SIZE);
 728                         done = true;
 729                 }
 730
 731                 if (!done)
 732                 {
 733                         if ((successfull_to_lost_ratio < 0.01) &&
 734                                 (window_size < MAX_RELIABLE_WINDOW_SIZE))
 735                         {
 736                                 /* don't even think about increasing if we didn't even
 737                                  * use major parts of our window */
 738                                 if (reasonable_amount_of_data_transmitted)
 739                                         window_size = MYMIN(
 740                                                                                         (window_size + 100),
 741                                                                                         MAX_RELIABLE_WINDOW_SIZE);
 742                         }
 743                         else if ((successfull_to_lost_ratio < 0.05) &&
 744                                         (window_size < MAX_RELIABLE_WINDOW_SIZE))
 745                         {
 746                                 /* don't even think about increasing if we didn't even
 747                                  * use major parts of our window */
 748                                 if (reasonable_amount_of_data_transmitted)
 749                                         window_size = MYMIN(
 750                                                                                         (window_size + 50),
 751                                                                                         MAX_RELIABLE_WINDOW_SIZE);
 752                         }
 753                         else if (successfull_to_lost_ratio > 0.15)
 754                         {
 755                                 window_size = MYMAX(
 756                                                                                         (window_size - 100),
 757                                                                                         MIN_RELIABLE_WINDOW_SIZE);
 758                         }
 759                         else if (successfull_to_lost_ratio > 0.1)
 760                         {
 761                                 window_size = MYMAX(
 762                                                                                         (window_size - 50),
 763                                                                                         MIN_RELIABLE_WINDOW_SIZE);
 764                         }
 765                 }
 766         }
 767
 768         if (bpm_counter > 10.0)
 769         {
 770                 {
 771                         JMutexAutoLock internal(m_internal_mutex);
 772                         cur_kbps = (current_bytes_transfered/bpm_counter)/1024;
 773                         current_bytes_transfered = 0;
 774                         cur_kbps_lost = (current_bytes_lost/bpm_counter)/1024;
 775                         current_bytes_lost = 0;
 776                         bpm_counter = 0;
 777                 }
 778
 779                 if (cur_kbps > max_kbps)
 780                 {
 781                         max_kbps = cur_kbps;
 782                 }
 783
 784                 if (cur_kbps_lost > max_kbps_lost)
 785                 {
 786                         max_kbps_lost = cur_kbps_lost;
 787                 }
 788
 789                 avg_kbps = avg_kbps * 0.9 + cur_kbps * 0.1;
 790                 avg_kbps_lost = avg_kbps_lost * 0.9 + cur_kbps_lost * 0.1;
 791         }
 792 }
 793
 794
 795 /*
 796         Peer
 797 */
 798
 799 PeerHelper::PeerHelper() :
 800         m_peer(0)
 801 {
 802 }
 803
 804 PeerHelper::PeerHelper(Peer* peer) :
 805         m_peer(peer)
 806 {
 807         if (peer != NULL)
 808         {
 809                 if (!peer->IncUseCount())
 810                 {
 811                         m_peer = 0;
 812                 }
 813         }
 814 }
 815
 816 PeerHelper::~PeerHelper()
 817 {
 818         if (m_peer != 0)
 819                 m_peer->DecUseCount();
 820
 821         m_peer = 0;
 822 }
 823
 824 PeerHelper& PeerHelper::operator=(Peer* peer)
 825 {
 826         m_peer = peer;
 827         if (peer != NULL)
 828         {
 829                 if (!peer->IncUseCount())
 830                 {
 831                         m_peer = 0;
 832                 }
 833         }
 834         return *this;
 835 }
 836
 837 Peer* PeerHelper::operator->() const
 838 {
 839         return m_peer;
 840 }
 841
 842 Peer* PeerHelper::operator&() const
 843 {
 844         return m_peer;
 845 }
 846
 847 bool PeerHelper::operator!() {
 848         return ! m_peer;
 849 }
 850
 851 bool PeerHelper::operator!=(void* ptr)
 852 {
 853         return ((void*) m_peer != ptr);
 854 }
 855
 856 bool Peer::IncUseCount()
 857 {
 858         JMutexAutoLock lock(m_exclusive_access_mutex);
 859
 860         if (!m_pending_deletion)
 861         {
 862                 this->m_usage++;
 863                 return true;
 864         }
 865
 866         return false;
 867 }
 868
 869 void Peer::DecUseCount()
 870 {
 871         {
 872                 JMutexAutoLock lock(m_exclusive_access_mutex);
 873                 assert(m_usage > 0);
 874                 m_usage--;
 875
 876                 if (!((m_pending_deletion) && (m_usage == 0)))
 877                         return;
 878         }
 879         delete this;
 880 }
 881
 882 void Peer::RTTStatistics(float rtt,
 883                                                 std::string profiler_id,
 884                                                 unsigned int num_samples) {
 885
 886         if (m_last_rtt > 0) {
 887                 /* set min max values */
 888                 if (rtt < m_rtt.min_rtt)
 889                         m_rtt.min_rtt = rtt;
 890                 if (rtt >= m_rtt.max_rtt)
 891                         m_rtt.max_rtt = rtt;
 892
 893                 /* do average calculation */
 894                 if(m_rtt.avg_rtt < 0.0)
 895                         m_rtt.avg_rtt  = rtt;
 896                 else
 897                         m_rtt.avg_rtt  = m_rtt.avg_rtt * (num_samples/(num_samples-1)) +
 898                                                                 rtt * (1/num_samples);
 899
 900                 /* do jitter calculation */
 901
 902                 //just use some neutral value at beginning
 903                 float jitter = m_rtt.jitter_min;
 904
 905                 if (rtt > m_last_rtt)
 906                         jitter = rtt-m_last_rtt;
 907
 908                 if (rtt <= m_last_rtt)
 909                         jitter = m_last_rtt - rtt;
 910
 911                 if (jitter < m_rtt.jitter_min)
 912                         m_rtt.jitter_min = jitter;
 913                 if (jitter >= m_rtt.jitter_max)
 914                         m_rtt.jitter_max = jitter;
 915
 916                 if(m_rtt.jitter_avg < 0.0)
 917                         m_rtt.jitter_avg  = jitter;
 918                 else
 919                         m_rtt.jitter_avg  = m_rtt.jitter_avg * (num_samples/(num_samples-1)) +
 920                                                                 jitter * (1/num_samples);
 921
 922                 if (profiler_id != "")
 923                 {
 924                         g_profiler->graphAdd(profiler_id + "_rtt", rtt);
 925                         g_profiler->graphAdd(profiler_id + "_jitter", jitter);
 926                 }
 927         }
 928         /* save values required for next loop */
 929         m_last_rtt = rtt;
 930 }
 931
 932 bool Peer::isTimedOut(float timeout)
 933 {
 934         JMutexAutoLock lock(m_exclusive_access_mutex);
 935         u32 current_time = porting::getTimeMs();
 936
 937         float dtime = CALC_DTIME(m_last_timeout_check,current_time);
 938         m_last_timeout_check = current_time;
 939
 940         m_timeout_counter += dtime;
 941
 942         return m_timeout_counter > timeout;
 943 }
 944
 945 void Peer::Drop()
 946 {
 947         {
 948                 JMutexAutoLock usage_lock(m_exclusive_access_mutex);
 949                 m_pending_deletion = true;
 950                 if (m_usage != 0)
 951                         return;
 952         }
 953
 954         PROFILE(std::stringstream peerIdentifier1);
 955         PROFILE(peerIdentifier1 << "runTimeouts[" << m_connection->getDesc() << ";" << id << ";RELIABLE]");
 956         PROFILE(g_profiler->remove(peerIdentifier1.str()));
 957         PROFILE(std::stringstream peerIdentifier2);
 958         PROFILE(peerIdentifier2 << "sendPackets[" << m_connection->getDesc() << ";" << id << ";RELIABLE]");
 959         PROFILE(ScopeProfiler peerprofiler(g_profiler, peerIdentifier2.str(), SPT_AVG));
 960
 961         delete this;
 962 }
 963
 964 UDPPeer::UDPPeer(u16 a_id, Address a_address, Connection* connection) :
 965         Peer(a_address,a_id,connection),
 966         m_pending_disconnect(false),
 967         resend_timeout(0.5),
 968         m_legacy_peer(true)
 969 {
 970 }
 971
 972 bool UDPPeer::getAddress(MTProtocols type,Address& toset)
 973 {
 974         if ((type == UDP) || (type == MINETEST_RELIABLE_UDP) || (type == PRIMARY))
 975         {
 976                 toset = address;
 977                 return true;
 978         }
 979
 980         return false;
 981 }
 982
 983 void UDPPeer::setNonLegacyPeer()
 984 {
 985         m_legacy_peer = false;
 986         for(unsigned int i=0; i< CHANNEL_COUNT; i++)
 987         {
 988                 channels->setWindowSize(g_settings->getU16("max_packets_per_iteration"));
 989         }
 990 }
 991
 992 void UDPPeer::reportRTT(float rtt)
 993 {
 994         if (rtt < 0.0) {
 995                 return;
 996         }
 997         RTTStatistics(rtt,"rudp",MAX_RELIABLE_WINDOW_SIZE*10);
 998
 999         float timeout = getStat(AVG_RTT) * RESEND_TIMEOUT_FACTOR;
1000         if(timeout < RESEND_TIMEOUT_MIN)
1001                 timeout = RESEND_TIMEOUT_MIN;
1002         if(timeout > RESEND_TIMEOUT_MAX)
1003                 timeout = RESEND_TIMEOUT_MAX;
1004
1005         JMutexAutoLock usage_lock(m_exclusive_access_mutex);
1006         resend_timeout = timeout;
1007 }
1008
1009 bool UDPPeer::Ping(float dtime,SharedBuffer<u8>& data)
1010 {
1011         m_ping_timer += dtime;
1012         if(m_ping_timer >= PING_TIMEOUT)
1013         {
1014                 // Create and send PING packet
1015                 writeU8(&data[0], TYPE_CONTROL);
1016                 writeU8(&data[1], CONTROLTYPE_PING);
1017                 m_ping_timer = 0.0;
1018                 return true;
1019         }
1020         return false;
1021 }
1022
1023 void UDPPeer::PutReliableSendCommand(ConnectionCommand &c,
1024                 unsigned int max_packet_size)
1025 {
1026         if (m_pending_disconnect)
1027                 return;
1028
1029         if ( channels[c.channelnum].queued_commands.empty() &&
1030                         /* don't queue more packets then window size */
1031                         (channels[c.channelnum].queued_reliables.size()
1032                         < (channels[c.channelnum].getWindowSize()/2)))
1033         {
1034                 LOG(dout_con<<m_connection->getDesc()
1035                                 <<" processing reliable command for peer id: " << c.peer_id
1036                                 <<" data size: " << c.data.getSize() << std::endl);
1037                 if (!processReliableSendCommand(c,max_packet_size))
1038                 {
1039                         channels[c.channelnum].queued_commands.push_back(c);
1040                 }
1041         }
1042         else
1043         {
1044                 LOG(dout_con<<m_connection->getDesc()
1045                                 <<" Queueing reliable command for peer id: " << c.peer_id
1046                                 <<" data size: " << c.data.getSize() <<std::endl);
1047                 channels[c.channelnum].queued_commands.push_back(c);
1048         }
1049 }
1050
1051 bool UDPPeer::processReliableSendCommand(
1052                                 ConnectionCommand &c,
1053                                 unsigned int max_packet_size)
1054 {
1055         if (m_pending_disconnect)
1056                 return true;
1057
1058         u32 chunksize_max = max_packet_size
1059                                                         - BASE_HEADER_SIZE
1060                                                         - RELIABLE_HEADER_SIZE;
1061
1062         assert(c.data.getSize() < MAX_RELIABLE_WINDOW_SIZE*512);
1063
1064         std::list<SharedBuffer<u8> > originals;
1065         u16 split_sequence_number = channels[c.channelnum].readNextSplitSeqNum();
1066
1067         if (c.raw)
1068         {
1069                 originals.push_back(c.data);
1070         }
1071         else {
1072                 originals = makeAutoSplitPacket(c.data, chunksize_max,split_sequence_number);
1073                 channels[c.channelnum].setNextSplitSeqNum(split_sequence_number);
1074         }
1075
1076         bool have_sequence_number = true;
1077         bool have_initial_sequence_number = false;
1078         Queue<BufferedPacket> toadd;
1079         volatile u16 initial_sequence_number = 0;
1080
1081         for(std::list<SharedBuffer<u8> >::iterator i = originals.begin();
1082                 i != originals.end(); ++i)
1083         {
1084                 u16 seqnum = channels[c.channelnum].getOutgoingSequenceNumber(have_sequence_number);
1085
1086                 /* oops, we don't have enough sequence numbers to send this packet */
1087                 if (!have_sequence_number)
1088                         break;
1089
1090                 if (!have_initial_sequence_number)
1091                 {
1092                         initial_sequence_number = seqnum;
1093                         have_initial_sequence_number = true;
1094                 }
1095
1096                 SharedBuffer<u8> reliable = makeReliablePacket(*i, seqnum);
1097
1098                 // Add base headers and make a packet
1099                 BufferedPacket p = con::makePacket(address, reliable,
1100                                 m_connection->GetProtocolID(), m_connection->GetPeerID(),
1101                                 c.channelnum);
1102
1103                 toadd.push_back(p);
1104         }
1105
1106         if (have_sequence_number) {
1107                 volatile u16 pcount = 0;
1108                 while(toadd.size() > 0) {
1109                         BufferedPacket p = toadd.pop_front();
1110 //                      LOG(dout_con<<connection->getDesc()
1111 //                                      << " queuing reliable packet for peer_id: " << c.peer_id
1112 //                                      << " channel: " << (c.channelnum&0xFF)
1113 //                                      << " seqnum: " << readU16(&p.data[BASE_HEADER_SIZE+1])
1114 //                                      << std::endl)
1115                         channels[c.channelnum].queued_reliables.push_back(p);
1116                         pcount++;
1117                 }
1118                 assert(channels[c.channelnum].queued_reliables.size() < 0xFFFF);
1119                 return true;
1120         }
1121         else {
1122                 volatile u16 packets_available = toadd.size();
1123                 /* we didn't get a single sequence number no need to fill queue */
1124                 if (!have_initial_sequence_number)
1125                 {
1126                         return false;
1127                 }
1128                 while(toadd.size() > 0) {
1129                         /* remove packet */
1130                         toadd.pop_front();
1131
1132                         bool successfully_put_back_sequence_number
1133                                 = channels[c.channelnum].putBackSequenceNumber(
1134                                         (initial_sequence_number+toadd.size() % (SEQNUM_MAX+1)));
1135
1136                         assert(successfully_put_back_sequence_number);
1137                 }
1138                 LOG(dout_con<<m_connection->getDesc()
1139                                 << " Windowsize exceeded on reliable sending " << c.data.getSize() << " bytes"
1140                                 << std::endl << "\t\tinitial_sequence_number: " << initial_sequence_number
1141                                 << std::endl << "\t\tgot at most            : " << packets_available << " packets"
1142                                 << std::endl << "\t\tpackets queued         : " << channels[c.channelnum].outgoing_reliables_sent.size()
1143                                 << std::endl);
1144                 return false;
1145         }
1146 }
1147
1148 void UDPPeer::RunCommandQueues(
1149                                                         unsigned int max_packet_size,
1150                                                         unsigned int maxcommands,
1151                                                         unsigned int maxtransfer)
1152 {
1153
1154         for (unsigned int i = 0; i < CHANNEL_COUNT; i++)
1155         {
1156                 unsigned int commands_processed = 0;
1157
1158                 if ((channels[i].queued_commands.size() > 0) &&
1159                                 (channels[i].queued_reliables.size() < maxtransfer) &&
1160                                 (commands_processed < maxcommands))
1161                 {
1162                         try {
1163                                 ConnectionCommand c = channels[i].queued_commands.pop_front();
1164                                 LOG(dout_con<<m_connection->getDesc()
1165                                                 <<" processing queued reliable command "<<std::endl);
1166                                 if (!processReliableSendCommand(c,max_packet_size)) {
1167                                         LOG(dout_con<<m_connection->getDesc()
1168                                                         << " Failed to queue packets for peer_id: " << c.peer_id
1169                                                         << ", delaying sending of " << c.data.getSize() << " bytes" << std::endl);
1170                                         channels[i].queued_commands.push_front(c);
1171                                 }
1172                         }
1173                         catch (ItemNotFoundException &e) {
1174                                 // intentionally empty
1175                         }
1176                 }
1177         }
1178 }
1179
1180 u16 UDPPeer::getNextSplitSequenceNumber(u8 channel)
1181 {
1182         assert(channel < CHANNEL_COUNT);
1183         return channels[channel].readNextIncomingSeqNum();
1184 }
1185
1186 void UDPPeer::setNextSplitSequenceNumber(u8 channel, u16 seqnum)
1187 {
1188         assert(channel < CHANNEL_COUNT);
1189         channels[channel].setNextSplitSeqNum(seqnum);
1190 }
1191
1192 SharedBuffer<u8> UDPPeer::addSpiltPacket(u8 channel,
1193                                                                                         BufferedPacket toadd,
1194                                                                                         bool reliable)
1195 {
1196         assert(channel < CHANNEL_COUNT);
1197         return channels[channel].incoming_splits.insert(toadd,reliable);
1198 }
1199
1200 /******************************************************************************/
1201 /* Connection Threads                                                         */
1202 /******************************************************************************/
1203
1204 ConnectionSendThread::ConnectionSendThread(Connection* parent,
1205                                                                                         unsigned int max_packet_size,
1206                                                                                         float timeout) :
1207         m_connection(parent),
1208         m_max_packet_size(max_packet_size),
1209         m_timeout(timeout),
1210         m_max_commands_per_iteration(1),
1211         m_max_data_packets_per_iteration(g_settings->getU16("max_packets_per_iteration")),
1212         m_max_packets_requeued(256)
1213 {
1214 }
1215
1216 void * ConnectionSendThread::Thread()
1217 {
1218         ThreadStarted();
1219         log_register_thread("ConnectionSend");
1220
1221         LOG(dout_con<<m_connection->getDesc()
1222                         <<"ConnectionSend thread started"<<std::endl);
1223
1224         u32 curtime = porting::getTimeMs();
1225         u32 lasttime = curtime;
1226
1227         PROFILE(std::stringstream ThreadIdentifier);
1228         PROFILE(ThreadIdentifier << "ConnectionSend: [" << m_connection->getDesc() << "]");
1229
1230         porting::setThreadName("ConnectionSend");
1231
1232         /* if stop is requested don't stop immediately but try to send all        */
1233         /* packets first */
1234         while(!StopRequested() || packetsQueued()) {
1235                 BEGIN_DEBUG_EXCEPTION_HANDLER
1236                 PROFILE(ScopeProfiler sp(g_profiler, ThreadIdentifier.str(), SPT_AVG));
1237
1238                 m_iteration_packets_avaialble = m_max_data_packets_per_iteration;
1239
1240                 /* wait for trigger or timeout */
1241                 m_send_sleep_semaphore.Wait(50);
1242
1243                 /* remove all triggers */
1244                 while(m_send_sleep_semaphore.Wait(0)) {}
1245
1246                 lasttime = curtime;
1247                 curtime = porting::getTimeMs();
1248                 float dtime = CALC_DTIME(lasttime,curtime);
1249
1250                 /* first do all the reliable stuff */
1251                 runTimeouts(dtime);
1252
1253                 /* translate commands to packets */
1254                 ConnectionCommand c = m_connection->m_command_queue.pop_frontNoEx(0);
1255                 while(c.type != CONNCMD_NONE)
1256                                 {
1257                         if (c.reliable)
1258                                 processReliableCommand(c);
1259                         else
1260                                 processNonReliableCommand(c);
1261
1262                         c = m_connection->m_command_queue.pop_frontNoEx(0);
1263                 }
1264
1265                 /* send non reliable packets */
1266                 sendPackets(dtime);
1267
1268                 END_DEBUG_EXCEPTION_HANDLER(derr_con);
1269         }
1270
1271         PROFILE(g_profiler->remove(ThreadIdentifier.str()));
1272         return NULL;
1273 }
1274
1275 void ConnectionSendThread::Trigger()
1276 {
1277         m_send_sleep_semaphore.Post();
1278 }
1279
1280 bool ConnectionSendThread::packetsQueued()
1281 {
1282         std::list<u16> peerIds = m_connection->getPeerIDs();
1283
1284         if ((this->m_outgoing_queue.size() > 0) && (peerIds.size() > 0))
1285                 return true;
1286
1287         for(std::list<u16>::iterator j = peerIds.begin();
1288                         j != peerIds.end(); ++j)
1289         {
1290                 PeerHelper peer = m_connection->getPeerNoEx(*j);
1291
1292                 if (!peer)
1293                         continue;
1294
1295                 if (dynamic_cast<UDPPeer*>(&peer) == 0)
1296                         continue;
1297
1298                 for(u16 i=0; i<CHANNEL_COUNT; i++)
1299                 {
1300                         Channel *channel = &(dynamic_cast<UDPPeer*>(&peer))->channels[i];
1301
1302                         if (channel->queued_commands.size() > 0)
1303                         {
1304                                 return true;
1305                         }
1306                 }
1307         }
1308
1309
1310         return false;
1311 }
1312
1313 void ConnectionSendThread::runTimeouts(float dtime)
1314 {
1315         std::list<u16> timeouted_peers;
1316         std::list<u16> peerIds = m_connection->getPeerIDs();
1317
1318         for(std::list<u16>::iterator j = peerIds.begin();
1319                 j != peerIds.end(); ++j)
1320         {
1321                 PeerHelper peer = m_connection->getPeerNoEx(*j);
1322
1323                 if (!peer)
1324                         continue;
1325
1326                 if(dynamic_cast<UDPPeer*>(&peer) == 0)
1327                         continue;
1328
1329                 PROFILE(std::stringstream peerIdentifier);
1330                 PROFILE(peerIdentifier << "runTimeouts[" << m_connection->getDesc() << ";" << *j << ";RELIABLE]");
1331                 PROFILE(ScopeProfiler peerprofiler(g_profiler, peerIdentifier.str(), SPT_AVG));
1332
1333                 SharedBuffer<u8> data(2); // data for sending ping, required here because of goto
1334
1335                 /*
1336                         Check peer timeout
1337                 */
1338                 if(peer->isTimedOut(m_timeout))
1339                 {
1340                         LOG(derr_con<<m_connection->getDesc()
1341                                         <<"RunTimeouts(): Peer "<<peer->id
1342                                         <<" has timed out."
1343                                         <<" (source=peer->timeout_counter)"
1344                                         <<std::endl);
1345                         // Add peer to the list
1346                         timeouted_peers.push_back(peer->id);
1347                         // Don't bother going through the buffers of this one
1348                         continue;
1349                 }
1350
1351                 float resend_timeout = dynamic_cast<UDPPeer*>(&peer)->getResendTimeout();
1352                 for(u16 i=0; i<CHANNEL_COUNT; i++)
1353                 {
1354                         std::list<BufferedPacket> timed_outs;
1355                         Channel *channel = &(dynamic_cast<UDPPeer*>(&peer))->channels[i];
1356
1357                         if (dynamic_cast<UDPPeer*>(&peer)->getLegacyPeer())
1358                                 channel->setWindowSize(g_settings->getU16("workaround_window_size"));
1359
1360                         // Remove timed out incomplete unreliable split packets
1361                         channel->incoming_splits.removeUnreliableTimedOuts(dtime, m_timeout);
1362
1363                         // Increment reliable packet times
1364                         channel->outgoing_reliables_sent.incrementTimeouts(dtime);
1365
1366                         unsigned int numpeers = m_connection->m_peers.size();
1367
1368                         if (numpeers == 0)
1369                                 return;
1370
1371                         // Re-send timed out outgoing reliables
1372                         timed_outs = channel->
1373                                         outgoing_reliables_sent.getTimedOuts(resend_timeout,
1374                                                         (m_max_data_packets_per_iteration/numpeers));
1375
1376                         channel->UpdatePacketLossCounter(timed_outs.size());
1377
1378                         m_iteration_packets_avaialble -= timed_outs.size();
1379
1380                         for(std::list<BufferedPacket>::iterator j = timed_outs.begin();
1381                                 j != timed_outs.end(); ++j)
1382                         {
1383                                 u16 peer_id = readPeerId(*(j->data));
1384                                 u8 channelnum  = readChannel(*(j->data));
1385                                 u16 seqnum  = readU16(&(j->data[BASE_HEADER_SIZE+1]));
1386
1387                                 channel->UpdateBytesLost(j->data.getSize());
1388
1389                                 LOG(derr_con<<m_connection->getDesc()
1390                                                 <<"RE-SENDING timed-out RELIABLE to "
1391                                                 << j->address.serializeString()
1392                                                 << "(t/o="<<resend_timeout<<"): "
1393                                                 <<"from_peer_id="<<peer_id
1394                                                 <<", channel="<<((int)channelnum&0xff)
1395                                                 <<", seqnum="<<seqnum
1396                                                 <<std::endl);
1397
1398                                 rawSend(*j);
1399
1400                                 // do not handle rtt here as we can't decide if this packet was
1401                                 // lost or really takes more time to transmit
1402                         }
1403
1404                         if (!dynamic_cast<UDPPeer*>(&peer)->getLegacyPeer())
1405                                 channel->UpdateTimers(dtime);
1406                 }
1407
1408                 /* send ping if necessary */
1409                 if (dynamic_cast<UDPPeer*>(&peer)->Ping(dtime,data)) {
1410                         LOG(dout_con<<m_connection->getDesc()
1411                                         <<"Sending ping for peer_id: "
1412                                         << dynamic_cast<UDPPeer*>(&peer)->id <<std::endl);
1413                         /* this may fail if there ain't a sequence number left */
1414                         if (!rawSendAsPacket(dynamic_cast<UDPPeer*>(&peer)->id, 0, data, true))
1415                         {
1416                                 //retrigger with reduced ping interval
1417                                 dynamic_cast<UDPPeer*>(&peer)->Ping(4.0,data);
1418                         }
1419                 }
1420
1421                 dynamic_cast<UDPPeer*>(&peer)->RunCommandQueues(m_max_packet_size,
1422                                                                 m_max_commands_per_iteration,
1423                                                                 m_max_packets_requeued);
1424         }
1425
1426         // Remove timed out peers
1427         for(std::list<u16>::iterator i = timeouted_peers.begin();
1428                 i != timeouted_peers.end(); ++i)
1429         {
1430                 LOG(derr_con<<m_connection->getDesc()
1431                                 <<"RunTimeouts(): Removing peer "<<(*i)<<std::endl);
1432                 m_connection->deletePeer(*i, true);
1433         }
1434 }
1435
1436 void ConnectionSendThread::rawSend(const BufferedPacket &packet)
1437 {
1438         try{
1439                 m_connection->m_udpSocket.Send(packet.address, *packet.data, packet.data.getSize());
1440                 LOG(dout_con <<m_connection->getDesc()
1441                                 << " rawSend: " << packet.data.getSize() << " bytes sent" << std::endl);
1442         } catch(SendFailedException &e){
1443                 LOG(derr_con<<m_connection->getDesc()
1444                                 <<"Connection::rawSend(): SendFailedException: "
1445                                 <<packet.address.serializeString()<<std::endl);
1446         }
1447 }
1448
1449 void ConnectionSendThread::sendAsPacketReliable(BufferedPacket& p, Channel* channel)
1450 {
1451         try{
1452                 p.absolute_send_time = porting::getTimeMs();
1453                 // Buffer the packet
1454                 channel->outgoing_reliables_sent.insert(p,
1455                         (channel->readOutgoingSequenceNumber() - MAX_RELIABLE_WINDOW_SIZE) % (MAX_RELIABLE_WINDOW_SIZE+1));
1456         }
1457         catch(AlreadyExistsException &e)
1458         {
1459                 LOG(derr_con<<m_connection->getDesc()
1460                                 <<"WARNING: Going to send a reliable packet"
1461                                 <<" in outgoing buffer" <<std::endl);
1462                 //assert(0);
1463         }
1464
1465         // Send the packet
1466         rawSend(p);
1467 }
1468
1469 bool ConnectionSendThread::rawSendAsPacket(u16 peer_id, u8 channelnum,
1470                 SharedBuffer<u8> data, bool reliable)
1471 {
1472         PeerHelper peer = m_connection->getPeerNoEx(peer_id);
1473         if(!peer) {
1474                 LOG(dout_con<<m_connection->getDesc()
1475                                 <<" INFO: dropped packet for non existent peer_id: " << peer_id << std::endl);
1476                 assert(reliable && "trying to send raw packet reliable but no peer found!");
1477                 return false;
1478         }
1479         Channel *channel = &(dynamic_cast<UDPPeer*>(&peer)->channels[channelnum]);
1480
1481         if(reliable)
1482         {
1483                 bool have_sequence_number_for_raw_packet = true;
1484                 u16 seqnum = channel->getOutgoingSequenceNumber(have_sequence_number_for_raw_packet);
1485
1486                 if (!have_sequence_number_for_raw_packet)
1487                         return false;
1488
1489                 SharedBuffer<u8> reliable = makeReliablePacket(data, seqnum);
1490                 Address peer_address;
1491                 peer->getAddress(MINETEST_RELIABLE_UDP,peer_address);
1492
1493                 // Add base headers and make a packet
1494                 BufferedPacket p = con::makePacket(peer_address, reliable,
1495                                 m_connection->GetProtocolID(), m_connection->GetPeerID(),
1496                                 channelnum);
1497
1498                 // first check if our send window is already maxed out
1499                 if (channel->outgoing_reliables_sent.size()
1500                                 < channel->getWindowSize()) {
1501                         LOG(dout_con<<m_connection->getDesc()
1502                                         <<" INFO: sending a reliable packet to peer_id " << peer_id
1503                                         <<" channel: " << channelnum
1504                                         <<" seqnum: " << seqnum << std::endl);
1505                         sendAsPacketReliable(p,channel);
1506                         return true;
1507                 }
1508                 else {
1509                         LOG(dout_con<<m_connection->getDesc()
1510                                         <<" INFO: queueing reliable packet for peer_id: " << peer_id
1511                                         <<" channel: " << channelnum
1512                                         <<" seqnum: " << seqnum << std::endl);
1513                         channel->queued_reliables.push_back(p);
1514                         return false;
1515                 }
1516         }
1517         else
1518         {
1519                 Address peer_address;
1520
1521                 if (peer->getAddress(UDP,peer_address))
1522                 {
1523                         // Add base headers and make a packet
1524                         BufferedPacket p = con::makePacket(peer_address, data,
1525                                         m_connection->GetProtocolID(), m_connection->GetPeerID(),
1526                                         channelnum);
1527
1528                         // Send the packet
1529                         rawSend(p);
1530                         return true;
1531                 }
1532                 else {
1533                         LOG(dout_con<<m_connection->getDesc()
1534                                         <<" INFO: dropped unreliable packet for peer_id: " << peer_id
1535                                         <<" because of (yet) missing udp address" << std::endl);
1536                         return false;
1537                 }
1538         }
1539
1540         //never reached
1541         return false;
1542 }
1543
1544 void ConnectionSendThread::processReliableCommand(ConnectionCommand &c)
1545 {
1546         assert(c.reliable);
1547
1548         switch(c.type){
1549         case CONNCMD_NONE:
1550                 LOG(dout_con<<m_connection->getDesc()<<"UDP processing reliable CONNCMD_NONE"<<std::endl);
1551                 return;
1552
1553         case CONNCMD_SEND:
1554                 LOG(dout_con<<m_connection->getDesc()<<"UDP processing reliable CONNCMD_SEND"<<std::endl);
1555                 sendReliable(c);
1556                 return;
1557
1558         case CONNCMD_SEND_TO_ALL:
1559                 LOG(dout_con<<m_connection->getDesc()<<"UDP processing CONNCMD_SEND_TO_ALL"<<std::endl);
1560                 sendToAllReliable(c);
1561                 return;
1562
1563         case CONCMD_CREATE_PEER:
1564                 LOG(dout_con<<m_connection->getDesc()<<"UDP processing reliable CONCMD_CREATE_PEER"<<std::endl);
1565                 if (!rawSendAsPacket(c.peer_id,c.channelnum,c.data,c.reliable))
1566                 {
1567                         /* put to queue if we couldn't send it immediately */
1568                         sendReliable(c);
1569                 }
1570                 return;
1571
1572         case CONCMD_DISABLE_LEGACY:
1573                 LOG(dout_con<<m_connection->getDesc()<<"UDP processing reliable CONCMD_DISABLE_LEGACY"<<std::endl);
1574                 if (!rawSendAsPacket(c.peer_id,c.channelnum,c.data,c.reliable))
1575                 {
1576                         /* put to queue if we couldn't send it immediately */
1577                         sendReliable(c);
1578                 }
1579                 return;
1580
1581         case CONNCMD_SERVE:
1582         case CONNCMD_CONNECT:
1583         case CONNCMD_DISCONNECT:
1584         case CONCMD_ACK:
1585                 assert("Got command that shouldn't be reliable as reliable command" == 0);
1586         default:
1587                 LOG(dout_con<<m_connection->getDesc()<<" Invalid reliable command type: " << c.type <<std::endl);
1588         }
1589 }
1590
1591
1592 void ConnectionSendThread::processNonReliableCommand(ConnectionCommand &c)
1593 {
1594         assert(!c.reliable);
1595
1596         switch(c.type){
1597         case CONNCMD_NONE:
1598                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_NONE"<<std::endl);
1599                 return;
1600         case CONNCMD_SERVE:
1601                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_SERVE port="
1602                                 <<c.address.serializeString()<<std::endl);
1603                 serve(c.address);
1604                 return;
1605         case CONNCMD_CONNECT:
1606                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_CONNECT"<<std::endl);
1607                 connect(c.address);
1608                 return;
1609         case CONNCMD_DISCONNECT:
1610                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_DISCONNECT"<<std::endl);
1611                 disconnect();
1612                 return;
1613         case CONNCMD_DISCONNECT_PEER:
1614                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_DISCONNECT_PEER"<<std::endl);
1615                 disconnect_peer(c.peer_id);
1616                 return;
1617         case CONNCMD_SEND:
1618                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_SEND"<<std::endl);
1619                 send(c.peer_id, c.channelnum, c.data);
1620                 return;
1621         case CONNCMD_SEND_TO_ALL:
1622                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONNCMD_SEND_TO_ALL"<<std::endl);
1623                 sendToAll(c.channelnum, c.data);
1624                 return;
1625         case CONCMD_ACK:
1626                 LOG(dout_con<<m_connection->getDesc()<<" UDP processing CONCMD_ACK"<<std::endl);
1627                 sendAsPacket(c.peer_id,c.channelnum,c.data,true);
1628                 return;
1629         case CONCMD_CREATE_PEER:
1630                 assert("Got command that should be reliable as unreliable command" == 0);
1631         default:
1632                 LOG(dout_con<<m_connection->getDesc()<<" Invalid command type: " << c.type <<std::endl);
1633         }
1634 }
1635
1636 void ConnectionSendThread::serve(Address bind_address)
1637 {
1638         LOG(dout_con<<m_connection->getDesc()
1639                         <<"UDP serving at port " << bind_address.serializeString() <<std::endl);
1640         try{
1641                 m_connection->m_udpSocket.Bind(bind_address);
1642                 m_connection->SetPeerID(PEER_ID_SERVER);
1643         }
1644         catch(SocketException &e){
1645                 // Create event
1646                 ConnectionEvent ce;
1647                 ce.bindFailed();
1648                 m_connection->putEvent(ce);
1649         }
1650 }
1651
1652 void ConnectionSendThread::connect(Address address)
1653 {
1654         LOG(dout_con<<m_connection->getDesc()<<" connecting to "<<address.serializeString()
1655                         <<":"<<address.getPort()<<std::endl);
1656
1657         UDPPeer *peer = m_connection->createServerPeer(address);
1658
1659         // Create event
1660         ConnectionEvent e;
1661         e.peerAdded(peer->id, peer->address);
1662         m_connection->putEvent(e);
1663
1664         Address bind_addr;
1665
1666         if (address.isIPv6())
1667                 bind_addr.setAddress((IPv6AddressBytes*) NULL);
1668         else
1669                 bind_addr.setAddress(0,0,0,0);
1670
1671         m_connection->m_udpSocket.Bind(bind_addr);
1672
1673         // Send a dummy packet to server with peer_id = PEER_ID_INEXISTENT
1674         m_connection->SetPeerID(PEER_ID_INEXISTENT);
1675         SharedBuffer<u8> data(0);
1676         m_connection->Send(PEER_ID_SERVER, 0, data, true);
1677 }
1678
1679 void ConnectionSendThread::disconnect()
1680 {
1681         LOG(dout_con<<m_connection->getDesc()<<" disconnecting"<<std::endl);
1682
1683         // Create and send DISCO packet
1684         SharedBuffer<u8> data(2);
1685         writeU8(&data[0], TYPE_CONTROL);
1686         writeU8(&data[1], CONTROLTYPE_DISCO);
1687
1688
1689         // Send to all
1690         std::list<u16> peerids = m_connection->getPeerIDs();
1691
1692         for (std::list<u16>::iterator i = peerids.begin();
1693                         i != peerids.end();
1694                         i++)
1695         {
1696                 sendAsPacket(*i, 0,data,false);
1697         }
1698 }
1699
1700 void ConnectionSendThread::disconnect_peer(u16 peer_id)
1701 {
1702         LOG(dout_con<<m_connection->getDesc()<<" disconnecting peer"<<std::endl);
1703
1704         // Create and send DISCO packet
1705         SharedBuffer<u8> data(2);
1706         writeU8(&data[0], TYPE_CONTROL);
1707         writeU8(&data[1], CONTROLTYPE_DISCO);
1708         sendAsPacket(peer_id, 0,data,false);
1709
1710         PeerHelper peer = m_connection->getPeerNoEx(peer_id);
1711
1712         if (!peer)
1713                 return;
1714
1715         if (dynamic_cast<UDPPeer*>(&peer) == 0)
1716         {
1717                 return;
1718         }
1719
1720         dynamic_cast<UDPPeer*>(&peer)->m_pending_disconnect = true;
1721 }
1722
1723 void ConnectionSendThread::send(u16 peer_id, u8 channelnum,
1724                 SharedBuffer<u8> data)
1725 {
1726         assert(channelnum < CHANNEL_COUNT);
1727
1728         PeerHelper peer = m_connection->getPeerNoEx(peer_id);
1729         if(!peer)
1730         {
1731                 LOG(dout_con<<m_connection->getDesc()<<" peer: peer_id="<<peer_id
1732                                 << ">>>NOT<<< found on sending packet"
1733                                 << ", channel " << (channelnum % 0xFF)
1734                                 << ", size: " << data.getSize() <<std::endl);
1735                 return;
1736         }
1737
1738         LOG(dout_con<<m_connection->getDesc()<<" sending to peer_id="<<peer_id
1739                         << ", channel " << (channelnum % 0xFF)
1740                         << ", size: " << data.getSize() <<std::endl);
1741
1742         u16 split_sequence_number = peer->getNextSplitSequenceNumber(channelnum);
1743
1744         u32 chunksize_max = m_max_packet_size - BASE_HEADER_SIZE;
1745         std::list<SharedBuffer<u8> > originals;
1746
1747         originals = makeAutoSplitPacket(data, chunksize_max,split_sequence_number);
1748
1749         peer->setNextSplitSequenceNumber(channelnum,split_sequence_number);
1750
1751         for(std::list<SharedBuffer<u8> >::iterator i = originals.begin();
1752                 i != originals.end(); ++i)
1753         {
1754                 SharedBuffer<u8> original = *i;
1755                 sendAsPacket(peer_id, channelnum, original);
1756         }
1757 }
1758
1759 void ConnectionSendThread::sendReliable(ConnectionCommand &c)
1760 {
1761         PeerHelper peer = m_connection->getPeerNoEx(c.peer_id);
1762         if (!peer)
1763                 return;
1764
1765         peer->PutReliableSendCommand(c,m_max_packet_size);
1766 }
1767
1768 void ConnectionSendThread::sendToAll(u8 channelnum, SharedBuffer<u8> data)
1769 {
1770         std::list<u16> peerids = m_connection->getPeerIDs();
1771
1772         for (std::list<u16>::iterator i = peerids.begin();
1773                         i != peerids.end();
1774                         i++)
1775         {
1776                 send(*i, channelnum, data);
1777         }
1778 }
1779
1780 void ConnectionSendThread::sendToAllReliable(ConnectionCommand &c)
1781 {
1782         std::list<u16> peerids = m_connection->getPeerIDs();
1783
1784         for (std::list<u16>::iterator i = peerids.begin();
1785                         i != peerids.end();
1786                         i++)
1787         {
1788                 PeerHelper peer = m_connection->getPeerNoEx(*i);
1789
1790                 if (!peer)
1791                         continue;
1792
1793                 peer->PutReliableSendCommand(c,m_max_packet_size);
1794         }
1795 }
1796
1797 void ConnectionSendThread::sendPackets(float dtime)
1798 {
1799         std::list<u16> peerIds = m_connection->getPeerIDs();
1800         std::list<u16> pendingDisconnect;
1801         std::map<u16,bool> pending_unreliable;
1802
1803         for(std::list<u16>::iterator
1804                         j = peerIds.begin();
1805                         j != peerIds.end(); ++j)
1806         {
1807                 PeerHelper peer = m_connection->getPeerNoEx(*j);
1808                 //peer may have been removed
1809                 if (!peer) {
1810                         LOG(dout_con<<m_connection->getDesc()<< " Peer not found: peer_id=" << *j << std::endl);
1811                         continue;
1812                 }
1813                 peer->m_increment_packets_remaining = m_iteration_packets_avaialble/m_connection->m_peers.size();
1814
1815                 if (dynamic_cast<UDPPeer*>(&peer) == 0)
1816                 {
1817                         continue;
1818                 }
1819
1820                 if (dynamic_cast<UDPPeer*>(&peer)->m_pending_disconnect)
1821                 {
1822                         pendingDisconnect.push_back(*j);
1823                 }
1824
1825                 PROFILE(std::stringstream peerIdentifier);
1826                 PROFILE(peerIdentifier << "sendPackets[" << m_connection->getDesc() << ";" << *j << ";RELIABLE]");
1827                 PROFILE(ScopeProfiler peerprofiler(g_profiler, peerIdentifier.str(), SPT_AVG));
1828
1829                 LOG(dout_con<<m_connection->getDesc()
1830                                 << " Handle per peer queues: peer_id=" << *j
1831                                 << " packet quota: " << peer->m_increment_packets_remaining << std::endl);
1832                 // first send queued reliable packets for all peers (if possible)
1833                 for (unsigned int i=0; i < CHANNEL_COUNT; i++)
1834                 {
1835                         u16 next_to_ack = 0;
1836                         dynamic_cast<UDPPeer*>(&peer)->channels[i].outgoing_reliables_sent.getFirstSeqnum(next_to_ack);
1837                         u16 next_to_receive = 0;
1838                         dynamic_cast<UDPPeer*>(&peer)->channels[i].incoming_reliables.getFirstSeqnum(next_to_receive);
1839
1840                         LOG(dout_con<<m_connection->getDesc()<< "\t channel: "
1841                                                 << i << ", peer quota:"
1842                                                 << peer->m_increment_packets_remaining
1843                                                 << std::endl
1844                                         << "\t\t\treliables on wire: "
1845                                                 << dynamic_cast<UDPPeer*>(&peer)->channels[i].outgoing_reliables_sent.size()
1846                                                 << ", waiting for ack for " << next_to_ack
1847                                                 << std::endl
1848                                         << "\t\t\tincoming_reliables: "
1849                                                 << dynamic_cast<UDPPeer*>(&peer)->channels[i].incoming_reliables.size()
1850                                                 << ", next reliable packet: "
1851                                                 << dynamic_cast<UDPPeer*>(&peer)->channels[i].readNextIncomingSeqNum()
1852                                                 << ", next queued: " << next_to_receive
1853                                                 << std::endl
1854                                         << "\t\t\treliables queued : "
1855                                                 << dynamic_cast<UDPPeer*>(&peer)->channels[i].queued_reliables.size()
1856                                                 << std::endl
1857                                         << "\t\t\tqueued commands  : "
1858                                                 << dynamic_cast<UDPPeer*>(&peer)->channels[i].queued_commands.size()
1859                                                 << std::endl);
1860
1861                         while ((dynamic_cast<UDPPeer*>(&peer)->channels[i].queued_reliables.size() > 0) &&
1862                                         (dynamic_cast<UDPPeer*>(&peer)->channels[i].outgoing_reliables_sent.size()
1863                                                         < dynamic_cast<UDPPeer*>(&peer)->channels[i].getWindowSize())&&
1864                                                         (peer->m_increment_packets_remaining > 0))
1865                         {
1866                                 BufferedPacket p = dynamic_cast<UDPPeer*>(&peer)->channels[i].queued_reliables.pop_front();
1867                                 Channel* channel = &(dynamic_cast<UDPPeer*>(&peer)->channels[i]);
1868                                 LOG(dout_con<<m_connection->getDesc()
1869                                                 <<" INFO: sending a queued reliable packet "
1870                                                 <<" channel: " << i
1871                                                 <<", seqnum: " << readU16(&p.data[BASE_HEADER_SIZE+1])
1872                                                 << std::endl);
1873                                 sendAsPacketReliable(p,channel);
1874                                 peer->m_increment_packets_remaining--;
1875                         }
1876                 }
1877         }
1878
1879         if (m_outgoing_queue.size())
1880         {
1881                 LOG(dout_con<<m_connection->getDesc()
1882                                 << " Handle non reliable queue ("
1883                                 << m_outgoing_queue.size() << " pkts)" << std::endl);
1884         }
1885
1886         unsigned int initial_queuesize = m_outgoing_queue.size();
1887         /* send non reliable packets*/
1888         for(unsigned int i=0;i < initial_queuesize;i++) {
1889                 OutgoingPacket packet = m_outgoing_queue.pop_front();
1890
1891                 assert(!packet.reliable &&
1892                         "reliable packets are not allowed in outgoing queue!");
1893
1894                 PeerHelper peer = m_connection->getPeerNoEx(packet.peer_id);
1895                 if(!peer) {
1896                         LOG(dout_con<<m_connection->getDesc()
1897                                                         <<" Outgoing queue: peer_id="<<packet.peer_id
1898                                                         << ">>>NOT<<< found on sending packet"
1899                                                         << ", channel " << (packet.channelnum % 0xFF)
1900                                                         << ", size: " << packet.data.getSize() <<std::endl);
1901                         continue;
1902                 }
1903                 /* send acks immediately */
1904                 else if (packet.ack)
1905                 {
1906                         rawSendAsPacket(packet.peer_id, packet.channelnum,
1907                                                                 packet.data, packet.reliable);
1908                         peer->m_increment_packets_remaining =
1909                                         MYMIN(0,peer->m_increment_packets_remaining--);
1910                 }
1911                 else if (
1912                         ( peer->m_increment_packets_remaining > 0) ||
1913                         (StopRequested())){
1914                         rawSendAsPacket(packet.peer_id, packet.channelnum,
1915                                         packet.data, packet.reliable);
1916                         peer->m_increment_packets_remaining--;
1917                 }
1918                 else {
1919                         m_outgoing_queue.push_back(packet);
1920                         pending_unreliable[packet.peer_id] = true;
1921                 }
1922         }
1923
1924         for(std::list<u16>::iterator
1925                                 k = pendingDisconnect.begin();
1926                                 k != pendingDisconnect.end(); ++k)
1927         {
1928                 if (!pending_unreliable[*k])
1929                 {
1930                         m_connection->deletePeer(*k,false);
1931                 }
1932         }
1933 }
1934
1935 void ConnectionSendThread::sendAsPacket(u16 peer_id, u8 channelnum,
1936                 SharedBuffer<u8> data, bool ack)
1937 {
1938         OutgoingPacket packet(peer_id, channelnum, data, false, ack);
1939         m_outgoing_queue.push_back(packet);
1940 }
1941
1942 ConnectionReceiveThread::ConnectionReceiveThread(Connection* parent,
1943                                                                                                 unsigned int max_packet_size) :
1944         m_connection(parent)
1945 {
1946 }
1947
1948 void * ConnectionReceiveThread::Thread()
1949 {
1950         ThreadStarted();
1951         log_register_thread("ConnectionReceive");
1952
1953         LOG(dout_con<<m_connection->getDesc()
1954                         <<"ConnectionReceive thread started"<<std::endl);
1955
1956         PROFILE(std::stringstream ThreadIdentifier);
1957         PROFILE(ThreadIdentifier << "ConnectionReceive: [" << m_connection->getDesc() << "]");
1958
1959         porting::setThreadName("ConnectionReceive");
1960
1961 #ifdef DEBUG_CONNECTION_KBPS
1962         u32 curtime = porting::getTimeMs();
1963         u32 lasttime = curtime;
1964         float debug_print_timer = 0.0;
1965 #endif
1966
1967         while(!StopRequested()) {
1968                 BEGIN_DEBUG_EXCEPTION_HANDLER
1969                 PROFILE(ScopeProfiler sp(g_profiler, ThreadIdentifier.str(), SPT_AVG));
1970
1971 #ifdef DEBUG_CONNECTION_KBPS
1972                 lasttime = curtime;
1973                 curtime = porting::getTimeMs();
1974                 float dtime = CALC_DTIME(lasttime,curtime);
1975 #endif
1976
1977                 /* receive packets */
1978                 receive();
1979
1980 #ifdef DEBUG_CONNECTION_KBPS
1981                 debug_print_timer += dtime;
1982                 if (debug_print_timer > 20.0) {
1983                         debug_print_timer -= 20.0;
1984
1985                         std::list<u16> peerids = m_connection->getPeerIDs();
1986
1987                         for (std::list<u16>::iterator i = peerids.begin();
1988                                         i != peerids.end();
1989                                         i++)
1990                         {
1991                                 PeerHelper peer = m_connection->getPeerNoEx(*i);
1992                                 if (!peer)
1993                                         continue;
1994
1995                                 float peer_current = 0.0;
1996                                 float peer_loss = 0.0;
1997                                 float avg_rate = 0.0;
1998                                 float avg_loss = 0.0;
1999
2000                                 for(u16 j=0; j<CHANNEL_COUNT; j++)
2001                                 {
2002                                         peer_current +=peer->channels[j].getCurrentDownloadRateKB();
2003                                         peer_loss += peer->channels[j].getCurrentLossRateKB();
2004                                         avg_rate += peer->channels[j].getAvgDownloadRateKB();
2005                                         avg_loss += peer->channels[j].getAvgLossRateKB();
2006                                 }
2007
2008                                 std::stringstream output;
2009                                 output << std::fixed << std::setprecision(1);
2010                                 output << "OUT to Peer " << *i << " RATES (good / loss) " << std::endl;
2011                                 output << "\tcurrent (sum): " << peer_current << "kb/s "<< peer_loss << "kb/s" << std::endl;
2012                                 output << "\taverage (sum): " << avg_rate << "kb/s "<< avg_loss << "kb/s" << std::endl;
2013                                 output << std::setfill(' ');
2014                                 for(u16 j=0; j<CHANNEL_COUNT; j++)
2015                                 {
2016                                         output << "\tcha " << j << ":"
2017                                                 << " CUR: " << std::setw(6) << peer->channels[j].getCurrentDownloadRateKB() <<"kb/s"
2018                                                 << " AVG: " << std::setw(6) << peer->channels[j].getAvgDownloadRateKB() <<"kb/s"
2019                                                 << " MAX: " << std::setw(6) << peer->channels[j].getMaxDownloadRateKB() <<"kb/s"
2020                                                 << " /"
2021                                                 << " CUR: " << std::setw(6) << peer->channels[j].getCurrentLossRateKB() <<"kb/s"
2022                                                 << " AVG: " << std::setw(6) << peer->channels[j].getAvgLossRateKB() <<"kb/s"
2023                                                 << " MAX: " << std::setw(6) << peer->channels[j].getMaxLossRateKB() <<"kb/s"
2024                                                 << " / WS: " << peer->channels[j].getWindowSize()
2025                                                 << std::endl;
2026                                 }
2027
2028                                 fprintf(stderr,"%s\n",output.str().c_str());
2029                         }
2030                 }
2031 #endif
2032                 END_DEBUG_EXCEPTION_HANDLER(derr_con);
2033         }
2034         PROFILE(g_profiler->remove(ThreadIdentifier.str()));
2035         return NULL;
2036 }
2037
2038 // Receive packets from the network and buffers and create ConnectionEvents
2039 void ConnectionReceiveThread::receive()
2040 {
2041         // use IPv6 minimum allowed MTU as receive buffer size as this is
2042         // theoretical reliable upper boundary of a udp packet for all IPv6 enabled
2043         // infrastructure
2044         unsigned int packet_maxsize = 1500;
2045         SharedBuffer<u8> packetdata(packet_maxsize);
2046
2047         bool packet_queued = true;
2048
2049         unsigned int loop_count = 0;
2050
2051         /* first of all read packets from socket */
2052         /* check for incoming data available */
2053         while( (loop_count < 10) &&
2054                         (m_connection->m_udpSocket.WaitData(50)))
2055         {
2056                 loop_count++;
2057         try{
2058                 if (packet_queued)
2059                 {
2060                         bool no_data_left = false;
2061                         u16 peer_id;
2062                         SharedBuffer<u8> resultdata;
2063                         while(!no_data_left)
2064                         {
2065                                 try {
2066                                         no_data_left = !getFromBuffers(peer_id, resultdata);
2067                                         if (!no_data_left) {
2068                                                 ConnectionEvent e;
2069                                                 e.dataReceived(peer_id, resultdata);
2070                                                 m_connection->putEvent(e);
2071                                         }
2072                                 }
2073                                 catch(ProcessedSilentlyException &e) {
2074                                         /* try reading again */
2075                                 }
2076                         }
2077                         packet_queued = false;
2078                 }
2079
2080                 Address sender;
2081                 s32 received_size = m_connection->m_udpSocket.Receive(sender, *packetdata, packet_maxsize);
2082
2083                 if ((received_size < 0) ||
2084                         (received_size < BASE_HEADER_SIZE) ||
2085                         (readU32(&packetdata[0]) != m_connection->GetProtocolID()))
2086                 {
2087                         LOG(derr_con<<m_connection->getDesc()
2088                                         <<"Receive(): Invalid incoming packet, "
2089                                         <<"size: " << received_size
2090                                         <<", protocol: " << readU32(&packetdata[0]) <<std::endl);
2091                         continue;
2092                 }
2093
2094                 u16 peer_id          = readPeerId(*packetdata);
2095                 u8 channelnum        = readChannel(*packetdata);
2096
2097                 if(channelnum > CHANNEL_COUNT-1){
2098                         LOG(derr_con<<m_connection->getDesc()
2099                                         <<"Receive(): Invalid channel "<<channelnum<<std::endl);
2100                         throw InvalidIncomingDataException("Channel doesn't exist");
2101                 }
2102
2103                 /* preserve original peer_id for later usage */
2104                 u16 packet_peer_id   = peer_id;
2105
2106                 /* Try to identify peer by sender address (may happen on join) */
2107                 if(peer_id == PEER_ID_INEXISTENT)
2108                 {
2109                         peer_id = m_connection->lookupPeer(sender);
2110                 }
2111
2112                 /* The peer was not found in our lists. Add it. */
2113                 if(peer_id == PEER_ID_INEXISTENT)
2114                 {
2115                         peer_id = m_connection->createPeer(sender,MINETEST_RELIABLE_UDP,0);
2116                 }
2117
2118                 PeerHelper peer = m_connection->getPeerNoEx(peer_id);
2119
2120                 if (!peer) {
2121                         LOG(dout_con<<m_connection->getDesc()
2122                                         <<" got packet from unknown peer_id: "
2123                                         <<peer_id<<" Ignoring."<<std::endl);
2124                         continue;
2125                 }
2126
2127                 // Validate peer address
2128
2129                 Address peer_address;
2130
2131                 if (peer->getAddress(UDP,peer_address)) {
2132                         if (peer_address != sender) {
2133                                 LOG(derr_con<<m_connection->getDesc()
2134                                                 <<m_connection->getDesc()
2135                                                 <<" Peer "<<peer_id<<" sending from different address."
2136                                                 " Ignoring."<<std::endl);
2137                                 continue;
2138                         }
2139                 }
2140                 else {
2141
2142                         bool invalid_address = true;
2143                         if (invalid_address) {
2144                                 LOG(derr_con<<m_connection->getDesc()
2145                                                 <<m_connection->getDesc()
2146                                                 <<" Peer "<<peer_id<<" unknown."
2147                                                 " Ignoring."<<std::endl);
2148                                 continue;
2149                         }
2150                 }
2151
2152
2153                 /* mark peer as seen with id */
2154                 if (!(packet_peer_id == PEER_ID_INEXISTENT))
2155                         peer->setSentWithID();
2156
2157                 peer->ResetTimeout();
2158
2159                 Channel *channel = 0;
2160
2161                 if (dynamic_cast<UDPPeer*>(&peer) != 0)
2162                 {
2163                         channel = &(dynamic_cast<UDPPeer*>(&peer)->channels[channelnum]);
2164                 }
2165
2166                 // Throw the received packet to channel->processPacket()
2167
2168                 // Make a new SharedBuffer from the data without the base headers
2169                 SharedBuffer<u8> strippeddata(received_size - BASE_HEADER_SIZE);
2170                 memcpy(*strippeddata, &packetdata[BASE_HEADER_SIZE],
2171                                 strippeddata.getSize());
2172
2173                 try{
2174                         // Process it (the result is some data with no headers made by us)
2175                         SharedBuffer<u8> resultdata = processPacket
2176                                         (channel, strippeddata, peer_id, channelnum, false);
2177
2178                         LOG(dout_con<<m_connection->getDesc()
2179                                         <<" ProcessPacket from peer_id: " << peer_id
2180                                         << ",channel: " << (channelnum & 0xFF) << ", returned "
2181                                         << resultdata.getSize() << " bytes" <<std::endl);
2182
2183                         ConnectionEvent e;
2184                         e.dataReceived(peer_id, resultdata);
2185                         m_connection->putEvent(e);
2186                 }catch(ProcessedSilentlyException &e){
2187                 }catch(ProcessedQueued &e){
2188                         packet_queued = true;
2189                 }
2190         }catch(InvalidIncomingDataException &e){
2191         }
2192         catch(ProcessedSilentlyException &e){
2193         }
2194         }
2195 }
2196
2197 bool ConnectionReceiveThread::getFromBuffers(u16 &peer_id, SharedBuffer<u8> &dst)
2198 {
2199         std::list<u16> peerids = m_connection->getPeerIDs();
2200
2201         for(std::list<u16>::iterator j = peerids.begin();
2202                 j != peerids.end(); ++j)
2203         {
2204                 PeerHelper peer = m_connection->getPeerNoEx(*j);
2205                 if (!peer)
2206                         continue;
2207
2208                 if(dynamic_cast<UDPPeer*>(&peer) == 0)
2209                         continue;
2210
2211                 for(u16 i=0; i<CHANNEL_COUNT; i++)
2212                 {
2213                         Channel *channel = &(dynamic_cast<UDPPeer*>(&peer))->channels[i];
2214
2215                         SharedBuffer<u8> resultdata;
2216                         bool got = checkIncomingBuffers(channel, peer_id, resultdata);
2217                         if(got){
2218                                 dst = resultdata;
2219                                 return true;
2220                         }
2221                 }
2222         }
2223         return false;
2224 }
2225
2226 bool ConnectionReceiveThread::checkIncomingBuffers(Channel *channel, u16 &peer_id,
2227                 SharedBuffer<u8> &dst)
2228 {
2229         u16 firstseqnum = 0;
2230         if (channel->incoming_reliables.getFirstSeqnum(firstseqnum))
2231         {
2232                 if(firstseqnum == channel->readNextIncomingSeqNum())
2233                 {
2234                         BufferedPacket p = channel->incoming_reliables.popFirst();
2235                         peer_id = readPeerId(*p.data);
2236                         u8 channelnum = readChannel(*p.data);
2237                         u16 seqnum = readU16(&p.data[BASE_HEADER_SIZE+1]);
2238
2239                         LOG(dout_con<<m_connection->getDesc()
2240                                         <<"UNBUFFERING TYPE_RELIABLE"
2241                                         <<" seqnum="<<seqnum
2242                                         <<" peer_id="<<peer_id
2243                                         <<" channel="<<((int)channelnum&0xff)
2244                                         <<std::endl);
2245
2246                         channel->incNextIncomingSeqNum();
2247
2248                         u32 headers_size = BASE_HEADER_SIZE + RELIABLE_HEADER_SIZE;
2249                         // Get out the inside packet and re-process it
2250                         SharedBuffer<u8> payload(p.data.getSize() - headers_size);
2251                         memcpy(*payload, &p.data[headers_size], payload.getSize());
2252
2253                         dst = processPacket(channel, payload, peer_id, channelnum, true);
2254                         return true;
2255                 }
2256         }
2257         return false;
2258 }
2259
2260 SharedBuffer<u8> ConnectionReceiveThread::processPacket(Channel *channel,
2261                 SharedBuffer<u8> packetdata, u16 peer_id,
2262                 u8 channelnum, bool reliable)
2263 {
2264         PeerHelper peer = m_connection->getPeer(peer_id);
2265
2266         if(packetdata.getSize() < 1)
2267                 throw InvalidIncomingDataException("packetdata.getSize() < 1");
2268
2269         u8 type = readU8(&packetdata[0]);
2270
2271         if(type == TYPE_CONTROL)
2272         {
2273                 if(packetdata.getSize() < 2)
2274                         throw InvalidIncomingDataException("packetdata.getSize() < 2");
2275
2276                 u8 controltype = readU8(&packetdata[1]);
2277
2278                 if( (controltype == CONTROLTYPE_ACK)
2279                                 && (peer_id <= MAX_UDP_PEERS))
2280                 {
2281                         assert(channel != 0);
2282                         if(packetdata.getSize() < 4)
2283                                 throw InvalidIncomingDataException
2284                                                 ("packetdata.getSize() < 4 (ACK header size)");
2285
2286                         u16 seqnum = readU16(&packetdata[2]);
2287                         LOG(dout_con<<m_connection->getDesc()
2288                                         <<" [ CONTROLTYPE_ACK: channelnum="
2289                                         <<((int)channelnum&0xff)<<", peer_id="<<peer_id
2290                                         <<", seqnum="<<seqnum<< " ]"<<std::endl);
2291
2292                         try{
2293                                 BufferedPacket p =
2294                                                 channel->outgoing_reliables_sent.popSeqnum(seqnum);
2295                                 // Get round trip time
2296                                 unsigned int current_time = porting::getTimeMs();
2297
2298                                 if (current_time > p.absolute_send_time)
2299                                 {
2300                                         float rtt = (current_time - p.absolute_send_time) / 1000.0;
2301
2302                                         // Let peer calculate stuff according to it
2303                                         // (avg_rtt and resend_timeout)
2304                                         dynamic_cast<UDPPeer*>(&peer)->reportRTT(rtt);
2305                                 }
2306                                 else if (p.totaltime > 0)
2307                                 {
2308                                         float rtt = p.totaltime;
2309
2310                                         // Let peer calculate stuff according to it
2311                                         // (avg_rtt and resend_timeout)
2312                                         dynamic_cast<UDPPeer*>(&peer)->reportRTT(rtt);
2313                                 }
2314                                 //put bytes for max bandwidth calculation
2315                                 channel->UpdateBytesSent(p.data.getSize(),1);
2316                                 if (channel->outgoing_reliables_sent.size() == 0)
2317                                 {
2318                                         m_connection->TriggerSend();
2319                                 }
2320                         }
2321                         catch(NotFoundException &e){
2322                                 LOG(derr_con<<m_connection->getDesc()
2323                                                 <<"WARNING: ACKed packet not "
2324                                                 "in outgoing queue"
2325                                                 <<std::endl);
2326                                 channel->UpdatePacketTooLateCounter();
2327                         }
2328                         throw ProcessedSilentlyException("Got an ACK");
2329                 }
2330                 else if((controltype == CONTROLTYPE_SET_PEER_ID)
2331                                 && (peer_id <= MAX_UDP_PEERS))
2332                 {
2333                         // Got a packet to set our peer id
2334                         if(packetdata.getSize() < 4)
2335                                 throw InvalidIncomingDataException
2336                                                 ("packetdata.getSize() < 4 (SET_PEER_ID header size)");
2337                         u16 peer_id_new = readU16(&packetdata[2]);
2338                         LOG(dout_con<<m_connection->getDesc()
2339                                         <<"Got new peer id: "<<peer_id_new<<"... "<<std::endl);
2340
2341                         if(m_connection->GetPeerID() != PEER_ID_INEXISTENT)
2342                         {
2343                                 LOG(derr_con<<m_connection->getDesc()
2344                                                 <<"WARNING: Not changing"
2345                                                 " existing peer id."<<std::endl);
2346                         }
2347                         else
2348                         {
2349                                 LOG(dout_con<<m_connection->getDesc()<<"changing own peer id"<<std::endl);
2350                                 m_connection->SetPeerID(peer_id_new);
2351                         }
2352
2353                         ConnectionCommand cmd;
2354
2355                         SharedBuffer<u8> reply(2);
2356                         writeU8(&reply[0], TYPE_CONTROL);
2357                         writeU8(&reply[1], CONTROLTYPE_ENABLE_BIG_SEND_WINDOW);
2358                         cmd.disableLegacy(PEER_ID_SERVER,reply);
2359                         m_connection->putCommand(cmd);
2360
2361                         throw ProcessedSilentlyException("Got a SET_PEER_ID");
2362                 }
2363                 else if((controltype == CONTROLTYPE_PING)
2364                                 && (peer_id <= MAX_UDP_PEERS))
2365                 {
2366                         // Just ignore it, the incoming data already reset
2367                         // the timeout counter
2368                         LOG(dout_con<<m_connection->getDesc()<<"PING"<<std::endl);
2369                         throw ProcessedSilentlyException("Got a PING");
2370                 }
2371                 else if(controltype == CONTROLTYPE_DISCO)
2372                 {
2373                         // Just ignore it, the incoming data already reset
2374                         // the timeout counter
2375                         LOG(dout_con<<m_connection->getDesc()
2376                                         <<"DISCO: Removing peer "<<(peer_id)<<std::endl);
2377
2378                         if(m_connection->deletePeer(peer_id, false) == false)
2379                         {
2380                                 derr_con<<m_connection->getDesc()
2381                                                 <<"DISCO: Peer not found"<<std::endl;
2382                         }
2383
2384                         throw ProcessedSilentlyException("Got a DISCO");
2385                 }
2386                 else if((controltype == CONTROLTYPE_ENABLE_BIG_SEND_WINDOW)
2387                                 && (peer_id <= MAX_UDP_PEERS))
2388                 {
2389                         dynamic_cast<UDPPeer*>(&peer)->setNonLegacyPeer();
2390                         throw ProcessedSilentlyException("Got non legacy control");
2391                 }
2392                 else{
2393                         LOG(derr_con<<m_connection->getDesc()
2394                                         <<"INVALID TYPE_CONTROL: invalid controltype="
2395                                         <<((int)controltype&0xff)<<std::endl);
2396                         throw InvalidIncomingDataException("Invalid control type");
2397                 }
2398         }
2399         else if(type == TYPE_ORIGINAL)
2400         {
2401                 if(packetdata.getSize() < ORIGINAL_HEADER_SIZE)
2402                         throw InvalidIncomingDataException
2403                                         ("packetdata.getSize() < ORIGINAL_HEADER_SIZE");
2404                 LOG(dout_con<<m_connection->getDesc()
2405                                 <<"RETURNING TYPE_ORIGINAL to user"
2406                                 <<std::endl);
2407                 // Get the inside packet out and return it
2408                 SharedBuffer<u8> payload(packetdata.getSize() - ORIGINAL_HEADER_SIZE);
2409                 memcpy(*payload, &packetdata[ORIGINAL_HEADER_SIZE], payload.getSize());
2410                 return payload;
2411         }
2412         else if(type == TYPE_SPLIT)
2413         {
2414                 Address peer_address;
2415
2416                 if (peer->getAddress(UDP,peer_address)) {
2417
2418                         // We have to create a packet again for buffering
2419                         // This isn't actually too bad an idea.
2420                         BufferedPacket packet = makePacket(
2421                                         peer_address,
2422                                         packetdata,
2423                                         m_connection->GetProtocolID(),
2424                                         peer_id,
2425                                         channelnum);
2426
2427                         // Buffer the packet
2428                         SharedBuffer<u8> data =
2429                                         peer->addSpiltPacket(channelnum,packet,reliable);
2430
2431                         if(data.getSize() != 0)
2432                         {
2433                                 LOG(dout_con<<m_connection->getDesc()
2434                                                 <<"RETURNING TYPE_SPLIT: Constructed full data, "
2435                                                 <<"size="<<data.getSize()<<std::endl);
2436                                 return data;
2437                         }
2438                         LOG(dout_con<<m_connection->getDesc()<<"BUFFERED TYPE_SPLIT"<<std::endl);
2439                         throw ProcessedSilentlyException("Buffered a split packet chunk");
2440                 }
2441                 else {
2442                         //TODO throw some error
2443                 }
2444         }
2445         else if((peer_id <= MAX_UDP_PEERS) && (type == TYPE_RELIABLE))
2446         {
2447                 assert(channel != 0);
2448                 // Recursive reliable packets not allowed
2449                 if(reliable)
2450                         throw InvalidIncomingDataException("Found nested reliable packets");
2451
2452                 if(packetdata.getSize() < RELIABLE_HEADER_SIZE)
2453                         throw InvalidIncomingDataException
2454                                         ("packetdata.getSize() < RELIABLE_HEADER_SIZE");
2455
2456                 u16 seqnum = readU16(&packetdata[1]);
2457                 bool is_future_packet = false;
2458                 bool is_old_packet = false;
2459
2460                 /* packet is within our receive window send ack */
2461                 if (seqnum_in_window(seqnum, channel->readNextIncomingSeqNum(),MAX_RELIABLE_WINDOW_SIZE))
2462                 {
2463                         m_connection->sendAck(peer_id,channelnum,seqnum);
2464                 }
2465                 else {
2466                         is_future_packet = seqnum_higher(seqnum, channel->readNextIncomingSeqNum());
2467                         is_old_packet    = seqnum_higher(channel->readNextIncomingSeqNum(), seqnum);
2468
2469
2470                         /* packet is not within receive window, don't send ack.           *
2471                          * if this was a valid packet it's gonna be retransmitted         */
2472                         if (is_future_packet)
2473                         {
2474                                 throw ProcessedSilentlyException("Received packet newer then expected, not sending ack");
2475                         }
2476
2477                         /* seems like our ack was lost, send another one for a old packet */
2478                         if (is_old_packet)
2479                         {
2480                                 LOG(dout_con<<m_connection->getDesc()
2481                                                 << "RE-SENDING ACK: peer_id: " << peer_id
2482                                                 << ", channel: " << (channelnum&0xFF)
2483                                                 << ", seqnum: " << seqnum << std::endl;)
2484                                 m_connection->sendAck(peer_id,channelnum,seqnum);
2485
2486                                 // we already have this packet so this one was on wire at least
2487                                 // the current timeout
2488                                 dynamic_cast<UDPPeer*>(&peer)->reportRTT(dynamic_cast<UDPPeer*>(&peer)->getResendTimeout());
2489
2490                                 throw ProcessedSilentlyException("Retransmitting ack for old packet");
2491                         }
2492                 }
2493
2494                 if (seqnum != channel->readNextIncomingSeqNum())
2495                 {
2496                         Address peer_address;
2497
2498                         // this is a reliable packet so we have a udp address for sure
2499                         peer->getAddress(MINETEST_RELIABLE_UDP,peer_address);
2500                         // This one comes later, buffer it.
2501                         // Actually we have to make a packet to buffer one.
2502                         // Well, we have all the ingredients, so just do it.
2503                         BufferedPacket packet = con::makePacket(
2504                                         peer_address,
2505                                         packetdata,
2506                                         m_connection->GetProtocolID(),
2507                                         peer_id,
2508                                         channelnum);
2509                         try{
2510                                 channel->incoming_reliables.insert(packet,channel->readNextIncomingSeqNum());
2511
2512                                 LOG(dout_con<<m_connection->getDesc()
2513                                                 << "BUFFERING, TYPE_RELIABLE peer_id: " << peer_id
2514                                                 << ", channel: " << (channelnum&0xFF)
2515                                                 << ", seqnum: " << seqnum << std::endl;)
2516
2517                                 throw ProcessedQueued("Buffered future reliable packet");
2518                         }
2519                         catch(AlreadyExistsException &e)
2520                         {
2521                         }
2522                         catch(IncomingDataCorruption &e)
2523                         {
2524                                 ConnectionCommand discon;
2525                                 discon.disconnect_peer(peer_id);
2526                                 m_connection->putCommand(discon);
2527
2528                                 LOG(derr_con<<m_connection->getDesc()
2529                                                 << "INVALID, TYPE_RELIABLE peer_id: " << peer_id
2530                                                 << ", channel: " << (channelnum&0xFF)
2531                                                 << ", seqnum: " << seqnum
2532                                                 << "DROPPING CLIENT!" << std::endl;)
2533                         }
2534                 }
2535
2536                 /* we got a packet to process right now */
2537                 LOG(dout_con<<m_connection->getDesc()
2538                                 << "RECURSIVE, TYPE_RELIABLE peer_id: " << peer_id
2539                                 << ", channel: " << (channelnum&0xFF)
2540                                 << ", seqnum: " << seqnum << std::endl;)
2541
2542
2543                 /* check for resend case */
2544                 u16 queued_seqnum = 0;
2545                 if (channel->incoming_reliables.getFirstSeqnum(queued_seqnum))
2546                 {
2547                         if (queued_seqnum == seqnum)
2548                         {
2549                                 BufferedPacket queued_packet = channel->incoming_reliables.popFirst();
2550                                 /** TODO find a way to verify the new against the old packet */
2551                         }
2552                 }
2553
2554                 channel->incNextIncomingSeqNum();
2555
2556                 // Get out the inside packet and re-process it
2557                 SharedBuffer<u8> payload(packetdata.getSize() - RELIABLE_HEADER_SIZE);
2558                 memcpy(*payload, &packetdata[RELIABLE_HEADER_SIZE], payload.getSize());
2559
2560                 return processPacket(channel, payload, peer_id, channelnum, true);
2561         }
2562         else
2563         {
2564                 derr_con<<m_connection->getDesc()
2565                                 <<"Got invalid type="<<((int)type&0xff)<<std::endl;
2566                 throw InvalidIncomingDataException("Invalid packet type");
2567         }
2568
2569         // We should never get here.
2570         // If you get here, add an exception or a return to some of the
2571         // above conditionals.
2572         assert(0);
2573         throw BaseException("Error in Channel::ProcessPacket()");
2574 }
2575
2576 /*
2577         Connection
2578 */
2579
2580 Connection::Connection(u32 protocol_id, u32 max_packet_size, float timeout,
2581                 bool ipv6):
2582         m_udpSocket(ipv6),
2583         m_command_queue(),
2584         m_event_queue(),
2585         m_peer_id(0),
2586         m_protocol_id(protocol_id),
2587         m_sendThread(this, max_packet_size, timeout),
2588         m_receiveThread(this, max_packet_size),
2589         m_info_mutex(),
2590         m_bc_peerhandler(0),
2591         m_bc_receive_timeout(0),
2592         m_shutting_down(false),
2593         m_next_remote_peer_id(2)
2594 {
2595         m_udpSocket.setTimeoutMs(5);
2596
2597         m_sendThread.Start();
2598         m_receiveThread.Start();
2599 }
2600
2601 Connection::Connection(u32 protocol_id, u32 max_packet_size, float timeout,
2602                 bool ipv6, PeerHandler *peerhandler):
2603         m_udpSocket(ipv6),
2604         m_command_queue(),
2605         m_event_queue(),
2606         m_peer_id(0),
2607         m_protocol_id(protocol_id),
2608         m_sendThread(this, max_packet_size, timeout),
2609         m_receiveThread(this, max_packet_size),
2610         m_info_mutex(),
2611         m_bc_peerhandler(peerhandler),
2612         m_bc_receive_timeout(0),
2613         m_shutting_down(false),
2614         m_next_remote_peer_id(2)
2615
2616 {
2617         m_udpSocket.setTimeoutMs(5);
2618
2619         m_sendThread.Start();
2620         m_receiveThread.Start();
2621
2622 }
2623
2624
2625 Connection::~Connection()
2626 {
2627         m_shutting_down = true;
2628         // request threads to stop
2629         m_sendThread.Stop();
2630         m_receiveThread.Stop();
2631
2632         //TODO for some unkonwn reason send/receive threads do not exit as they're
2633         // supposed to be but wait on peer timeout. To speed up shutdown we reduce
2634         // timeout to half a second.
2635         m_sendThread.setPeerTimeout(0.5);
2636
2637         // wait for threads to finish
2638         m_sendThread.Wait();
2639         m_receiveThread.Wait();
2640
2641         // Delete peers
2642         for(std::map<u16, Peer*>::iterator
2643                         j = m_peers.begin();
2644                         j != m_peers.end(); ++j)
2645         {
2646                 delete j->second;
2647         }
2648 }
2649
2650 /* Internal stuff */
2651 void Connection::putEvent(ConnectionEvent &e)
2652 {
2653         assert(e.type != CONNEVENT_NONE);
2654         m_event_queue.push_back(e);
2655 }
2656
2657 PeerHelper Connection::getPeer(u16 peer_id)
2658 {
2659         JMutexAutoLock peerlock(m_peers_mutex);
2660         std::map<u16, Peer*>::iterator node = m_peers.find(peer_id);
2661
2662         if(node == m_peers.end()){
2663                 throw PeerNotFoundException("GetPeer: Peer not found (possible timeout)");
2664         }
2665
2666         // Error checking
2667         assert(node->second->id == peer_id);
2668
2669         return PeerHelper(node->second);
2670 }
2671
2672 PeerHelper Connection::getPeerNoEx(u16 peer_id)
2673 {
2674         JMutexAutoLock peerlock(m_peers_mutex);
2675         std::map<u16, Peer*>::iterator node = m_peers.find(peer_id);
2676
2677         if(node == m_peers.end()){
2678                 return PeerHelper(NULL);
2679         }
2680
2681         // Error checking
2682         assert(node->second->id == peer_id);
2683
2684         return PeerHelper(node->second);
2685 }
2686
2687 /* find peer_id for address */
2688 u16 Connection::lookupPeer(Address& sender)
2689 {
2690         JMutexAutoLock peerlock(m_peers_mutex);
2691         std::map<u16, Peer*>::iterator j;
2692         j = m_peers.begin();
2693         for(; j != m_peers.end(); ++j)
2694         {
2695                 Peer *peer = j->second;
2696                 if(peer->isActive())
2697                         continue;
2698
2699                 Address tocheck;
2700
2701                 if ((peer->getAddress(MINETEST_RELIABLE_UDP,tocheck)) && (tocheck == sender))
2702                         return peer->id;
2703
2704                 if ((peer->getAddress(UDP,tocheck)) && (tocheck == sender))
2705                         return peer->id;
2706         }
2707
2708         return PEER_ID_INEXISTENT;
2709 }
2710
2711 std::list<Peer*> Connection::getPeers()
2712 {
2713         std::list<Peer*> list;
2714         for(std::map<u16, Peer*>::iterator j = m_peers.begin();
2715                 j != m_peers.end(); ++j)
2716         {
2717                 Peer *peer = j->second;
2718                 list.push_back(peer);
2719         }
2720         return list;
2721 }
2722
2723 bool Connection::deletePeer(u16 peer_id, bool timeout)
2724 {
2725         Peer *peer = 0;
2726
2727         /* lock list as short as possible */
2728         {
2729                 JMutexAutoLock peerlock(m_peers_mutex);
2730                 if(m_peers.find(peer_id) == m_peers.end())
2731                         return false;
2732                 peer = m_peers[peer_id];
2733                 m_peers.erase(peer_id);
2734         }
2735
2736         Address peer_address;
2737         //any peer has a primary address this never fails!
2738         peer->getAddress(PRIMARY,peer_address);
2739         // Create event
2740         ConnectionEvent e;
2741         e.peerRemoved(peer_id, timeout, peer_address);
2742         putEvent(e);
2743
2744
2745         peer->Drop();
2746         return true;
2747 }
2748
2749 /* Interface */
2750
2751 ConnectionEvent Connection::getEvent()
2752 {
2753         if(m_event_queue.empty()){
2754                 ConnectionEvent e;
2755                 e.type = CONNEVENT_NONE;
2756                 return e;
2757         }
2758         return m_event_queue.pop_frontNoEx();
2759 }
2760
2761 ConnectionEvent Connection::waitEvent(u32 timeout_ms)
2762 {
2763         try{
2764                 return m_event_queue.pop_front(timeout_ms);
2765         } catch(ItemNotFoundException &ex){
2766                 ConnectionEvent e;
2767                 e.type = CONNEVENT_NONE;
2768                 return e;
2769         }
2770 }
2771
2772 void Connection::putCommand(ConnectionCommand &c)
2773 {
2774         if (!m_shutting_down)
2775         {
2776                 m_command_queue.push_back(c);
2777                 m_sendThread.Trigger();
2778         }
2779 }
2780
2781 void Connection::Serve(Address bind_addr)
2782 {
2783         ConnectionCommand c;
2784         c.serve(bind_addr);
2785         putCommand(c);
2786 }
2787
2788 void Connection::Connect(Address address)
2789 {
2790         ConnectionCommand c;
2791         c.connect(address);
2792         putCommand(c);
2793 }
2794
2795 bool Connection::Connected()
2796 {
2797         JMutexAutoLock peerlock(m_peers_mutex);
2798
2799         if(m_peers.size() != 1)
2800                 return false;
2801
2802         std::map<u16, Peer*>::iterator node = m_peers.find(PEER_ID_SERVER);
2803         if(node == m_peers.end())
2804                 return false;
2805
2806         if(m_peer_id == PEER_ID_INEXISTENT)
2807                 return false;
2808
2809         return true;
2810 }
2811
2812 void Connection::Disconnect()
2813 {
2814         ConnectionCommand c;
2815         c.disconnect();
2816         putCommand(c);
2817 }
2818
2819 u32 Connection::Receive(u16 &peer_id, SharedBuffer<u8> &data)
2820 {
2821         for(;;){
2822                 ConnectionEvent e = waitEvent(m_bc_receive_timeout);
2823                 if(e.type != CONNEVENT_NONE)
2824                         LOG(dout_con<<getDesc()<<": Receive: got event: "
2825                                         <<e.describe()<<std::endl);
2826                 switch(e.type){
2827                 case CONNEVENT_NONE:
2828                         throw NoIncomingDataException("No incoming data");
2829                 case CONNEVENT_DATA_RECEIVED:
2830                         peer_id = e.peer_id;
2831                         data = SharedBuffer<u8>(e.data);
2832                         return e.data.getSize();
2833                 case CONNEVENT_PEER_ADDED: {
2834                         UDPPeer tmp(e.peer_id, e.address, this);
2835                         if(m_bc_peerhandler)
2836                                 m_bc_peerhandler->peerAdded(&tmp);
2837                         continue; }
2838                 case CONNEVENT_PEER_REMOVED: {
2839                         UDPPeer tmp(e.peer_id, e.address, this);
2840                         if(m_bc_peerhandler)
2841                                 m_bc_peerhandler->deletingPeer(&tmp, e.timeout);
2842                         continue; }
2843                 case CONNEVENT_BIND_FAILED:
2844                         throw ConnectionBindFailed("Failed to bind socket "
2845                                         "(port already in use?)");
2846                 }
2847         }
2848         throw NoIncomingDataException("No incoming data");
2849 }
2850
2851 void Connection::SendToAll(u8 channelnum, SharedBuffer<u8> data, bool reliable)
2852 {
2853         assert(channelnum < CHANNEL_COUNT);
2854
2855         ConnectionCommand c;
2856         c.sendToAll(channelnum, data, reliable);
2857         putCommand(c);
2858 }
2859
2860 void Connection::Send(u16 peer_id, u8 channelnum,
2861                 SharedBuffer<u8> data, bool reliable)
2862 {
2863         assert(channelnum < CHANNEL_COUNT);
2864
2865         ConnectionCommand c;
2866         c.send(peer_id, channelnum, data, reliable);
2867         putCommand(c);
2868 }
2869
2870 Address Connection::GetPeerAddress(u16 peer_id)
2871 {
2872         PeerHelper peer = getPeerNoEx(peer_id);
2873
2874         if (!peer)
2875                 throw PeerNotFoundException("No address for peer found!");
2876         Address peer_address;
2877         peer->getAddress(PRIMARY,peer_address);
2878         return peer_address;
2879 }
2880
2881 float Connection::getPeerStat(u16 peer_id, rtt_stat_type type)
2882 {
2883         PeerHelper peer = getPeerNoEx(peer_id);
2884         if (!peer) return -1;
2885         return peer->getStat(type);
2886 }
2887
2888 u16 Connection::createPeer(Address& sender, MTProtocols protocol, int fd)
2889 {
2890         // Somebody wants to make a new connection
2891
2892         // Get a unique peer id (2 or higher)
2893         u16 peer_id_new = m_next_remote_peer_id;
2894         u16 overflow =  MAX_UDP_PEERS;
2895
2896         /*
2897                 Find an unused peer id
2898         */
2899         {
2900         JMutexAutoLock lock(m_peers_mutex);
2901                 bool out_of_ids = false;
2902                 for(;;)
2903                 {
2904                         // Check if exists
2905                         if(m_peers.find(peer_id_new) == m_peers.end())
2906                                 break;
2907                         // Check for overflow
2908                         if(peer_id_new == overflow){
2909                                 out_of_ids = true;
2910                                 break;
2911                         }
2912                         peer_id_new++;
2913                 }
2914                 if(out_of_ids){
2915                         errorstream<<getDesc()<<" ran out of peer ids"<<std::endl;
2916                         return PEER_ID_INEXISTENT;
2917                 }
2918
2919                 // Create a peer
2920                 Peer *peer = 0;
2921                 peer = new UDPPeer(peer_id_new, sender, this);
2922
2923                 m_peers[peer->id] = peer;
2924         }
2925
2926         m_next_remote_peer_id = (peer_id_new +1) % MAX_UDP_PEERS;
2927
2928         LOG(dout_con<<getDesc()
2929                         <<"createPeer(): giving peer_id="<<peer_id_new<<std::endl);
2930
2931         ConnectionCommand cmd;
2932         SharedBuffer<u8> reply(4);
2933         writeU8(&reply[0], TYPE_CONTROL);
2934         writeU8(&reply[1], CONTROLTYPE_SET_PEER_ID);
2935         writeU16(&reply[2], peer_id_new);
2936         cmd.createPeer(peer_id_new,reply);
2937         this->putCommand(cmd);
2938
2939         // Create peer addition event
2940         ConnectionEvent e;
2941         e.peerAdded(peer_id_new, sender);
2942         putEvent(e);
2943
2944         // We're now talking to a valid peer_id
2945         return peer_id_new;
2946 }
2947
2948 void Connection::PrintInfo(std::ostream &out)
2949 {
2950         m_info_mutex.Lock();
2951         out<<getDesc()<<": ";
2952         m_info_mutex.Unlock();
2953 }
2954
2955 void Connection::PrintInfo()
2956 {
2957         PrintInfo(dout_con);
2958 }
2959
2960 const std::string Connection::getDesc()
2961 {
2962         return std::string("con(")+itos(m_udpSocket.GetHandle())+"/"+itos(m_peer_id)+")";
2963 }
2964
2965 void Connection::DisconnectPeer(u16 peer_id)
2966 {
2967         ConnectionCommand discon;
2968         discon.disconnect_peer(peer_id);
2969         putCommand(discon);
2970 }
2971
2972 void Connection::sendAck(u16 peer_id, u8 channelnum, u16 seqnum) {
2973
2974         assert(channelnum < CHANNEL_COUNT);
2975
2976         LOG(dout_con<<getDesc()
2977                         <<" Queuing ACK command to peer_id: " << peer_id <<
2978                         " channel: " << (channelnum & 0xFF) <<
2979                         " seqnum: " << seqnum << std::endl);
2980
2981         ConnectionCommand c;
2982         SharedBuffer<u8> ack(4);
2983         writeU8(&ack[0], TYPE_CONTROL);
2984         writeU8(&ack[1], CONTROLTYPE_ACK);
2985         writeU16(&ack[2], seqnum);
2986
2987         c.ack(peer_id, channelnum, ack);
2988         putCommand(c);
2989         m_sendThread.Trigger();
2990 }
2991
2992 UDPPeer* Connection::createServerPeer(Address& address)
2993 {
2994         if (getPeerNoEx(PEER_ID_SERVER) != 0)
2995         {
2996                 throw ConnectionException("Already connected to a server");
2997         }
2998
2999         UDPPeer *peer = new UDPPeer(PEER_ID_SERVER, address, this);
3000
3001         {
3002                 JMutexAutoLock lock(m_peers_mutex);
3003                 m_peers[peer->id] = peer;
3004         }
3005
3006         return peer;
3007 }
3008
3009 std::list<u16> Connection::getPeerIDs()
3010 {
3011         std::list<u16> retval;
3012
3013         JMutexAutoLock lock(m_peers_mutex);
3014         for(std::map<u16, Peer*>::iterator j = m_peers.begin();
3015                 j != m_peers.end(); ++j)
3016         {
3017                 retval.push_back(j->first);
3018         }
3019         return retval;
3020 }
3021
3022 } // namespace
3023