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