source: branches/1.5x/libtransmission/peer-msgs.c @ 7771

Last change on this file since 7771 was 7771, checked in by charles, 13 years ago

(1.5x) backport #1734 to 1.5x

  • Property svn:keywords set to Date Rev Author Id
File size: 62.7 KB
Line 
1/*
2 * This file Copyright (C) 2007-2009 Charles Kerr <charles@transmissionbt.com>
3 *
4 * This file is licensed by the GPL version 2.  Works owned by the
5 * Transmission project are granted a special exemption to clause 2(b)
6 * so that the bulk of its code can remain under the MIT license.
7 * This exemption does not extend to derived works not owned by
8 * the Transmission project.
9 *
10 * $Id: peer-msgs.c 7771 2009-01-22 15:00:29Z charles $
11 */
12
13#include <assert.h>
14#include <errno.h>
15#include <limits.h> /* INT_MAX */
16#include <stdio.h>
17#include <stdlib.h>
18#include <string.h>
19
20#include <event.h>
21
22#include "transmission.h"
23#include "session.h"
24#include "bencode.h"
25#include "completion.h"
26#include "crypto.h"
27#include "inout.h"
28#ifdef WIN32
29#include "net.h" /* for ECONN */
30#endif
31#include "peer-io.h"
32#include "peer-mgr.h"
33#include "peer-msgs.h"
34#include "platform.h" /* MAX_STACK_ARRAY_SIZE */
35#include "ratecontrol.h"
36#include "request-list.h"
37#include "stats.h"
38#include "torrent.h"
39#include "trevent.h"
40#include "utils.h"
41
42/**
43***
44**/
45
46enum
47{
48    BT_CHOKE                = 0,
49    BT_UNCHOKE              = 1,
50    BT_INTERESTED           = 2,
51    BT_NOT_INTERESTED       = 3,
52    BT_HAVE                 = 4,
53    BT_BITFIELD             = 5,
54    BT_REQUEST              = 6,
55    BT_PIECE                = 7,
56    BT_CANCEL               = 8,
57    BT_PORT                 = 9,
58
59    BT_FEXT_SUGGEST         = 13,
60    BT_FEXT_HAVE_ALL        = 14,
61    BT_FEXT_HAVE_NONE       = 15,
62    BT_FEXT_REJECT          = 16,
63    BT_FEXT_ALLOWED_FAST    = 17,
64
65    BT_LTEP                 = 20,
66
67    LTEP_HANDSHAKE          = 0,
68
69    TR_LTEP_PEX             = 1,
70
71
72
73    MIN_CHOKE_PERIOD_SEC    = ( 10 ),
74
75    /* idle seconds before we send a keepalive */
76    KEEPALIVE_INTERVAL_SECS = 100,
77
78    PEX_INTERVAL            = ( 90 * 1000 ), /* msec between sendPex() calls */
79
80
81    MAX_BLOCK_SIZE          = ( 1024 * 16 ),
82
83
84    /* how long an unsent request can stay queued before it's returned
85       back to the peer-mgr's pool of requests */
86    QUEUED_REQUEST_TTL_SECS = 20,
87
88    /* how long a sent request can stay queued before it's returned
89       back to the peer-mgr's pool of requests */
90    SENT_REQUEST_TTL_SECS = 240,
91
92    /* used in lowering the outMessages queue period */
93    IMMEDIATE_PRIORITY_INTERVAL_SECS = 0,
94    HIGH_PRIORITY_INTERVAL_SECS = 2,
95    LOW_PRIORITY_INTERVAL_SECS = 20,
96
97    /* number of pieces to remove from the bitfield when
98     * lazy bitfields are turned on */
99    LAZY_PIECE_COUNT = 26,
100
101    /* number of pieces we'll allow in our fast set */
102    MAX_FAST_SET_SIZE = 3
103};
104
105enum
106{
107    AWAITING_BT_LENGTH,
108    AWAITING_BT_ID,
109    AWAITING_BT_MESSAGE,
110    AWAITING_BT_PIECE
111};
112
113/**
114***
115**/
116
117/* this is raw, unchanged data from the peer regarding
118 * the current message that it's sending us. */
119struct tr_incoming
120{
121    uint8_t                id;
122    uint32_t               length; /* includes the +1 for id length */
123    struct peer_request    blockReq; /* metadata for incoming blocks */
124    struct evbuffer *      block; /* piece data for incoming blocks */
125};
126
127/**
128 * Low-level communication state information about a connected peer.
129 *
130 * This structure remembers the low-level protocol states that we're
131 * in with this peer, such as active requests, pex messages, and so on.
132 * Its fields are all private to peer-msgs.c.
133 *
134 * Data not directly involved with sending & receiving messages is
135 * stored in tr_peer, where it can be accessed by both peermsgs and
136 * the peer manager.
137 *
138 * @see struct peer_atom
139 * @see tr_peer
140 */
141struct tr_peermsgs
142{
143    tr_bool         peerSupportsPex;
144    tr_bool         clientSentLtepHandshake;
145    tr_bool         peerSentLtepHandshake;
146    tr_bool         haveFastSet;
147
148    uint8_t         state;
149    uint8_t         ut_pex_id;
150    uint16_t        pexCount;
151    uint16_t        pexCount6;
152    uint16_t        maxActiveRequests;
153
154    size_t                 fastsetSize;
155    tr_piece_index_t       fastset[MAX_FAST_SET_SIZE];
156
157    /* how long the outMessages batch should be allowed to grow before
158     * it's flushed -- some messages (like requests >:) should be sent
159     * very quickly; others aren't as urgent. */
160    int                    outMessagesBatchPeriod;
161
162    tr_peer *              peer;
163
164    tr_session *           session;
165    tr_torrent *           torrent;
166
167    tr_publisher           publisher;
168
169    struct evbuffer *      outMessages; /* all the non-piece messages */
170
171    struct request_list    peerAskedFor;
172    struct request_list    clientAskedFor;
173    struct request_list    clientWillAskFor;
174
175    tr_timer             * pexTimer;
176    tr_pex               * pex;
177    tr_pex               * pex6;
178
179    time_t                 clientSentPexAt;
180    time_t                 clientSentAnythingAt;
181
182    /* when we started batching the outMessages */
183    time_t                outMessagesBatchedAt;
184
185    struct tr_incoming    incoming;
186
187    /* if the peer supports the Extension Protocol in BEP 10 and
188       supplied a reqq argument, it's stored here.  otherwise the
189       value is zero and should be ignored. */
190    int64_t               reqq;
191};
192
193/**
194***
195**/
196
197static void
198myDebug( const char * file, int line,
199         const struct tr_peermsgs * msgs,
200         const char * fmt, ... )
201{
202    FILE * fp = tr_getLog( );
203
204    if( fp )
205    {
206        va_list           args;
207        char              timestr[64];
208        struct evbuffer * buf = tr_getBuffer( );
209        char *            base = tr_basename( file );
210
211        evbuffer_add_printf( buf, "[%s] %s - %s [%s]: ",
212                             tr_getLogTimeStr( timestr, sizeof( timestr ) ),
213                             msgs->torrent->info.name,
214                             tr_peerIoGetAddrStr( msgs->peer->io ),
215                             msgs->peer->client );
216        va_start( args, fmt );
217        evbuffer_add_vprintf( buf, fmt, args );
218        va_end( args );
219        evbuffer_add_printf( buf, " (%s:%d)\n", base, line );
220        fwrite( EVBUFFER_DATA( buf ), 1, EVBUFFER_LENGTH( buf ), fp );
221
222        tr_free( base );
223        tr_releaseBuffer( buf );
224    }
225}
226
227#define dbgmsg( msgs, ... ) \
228    do { \
229        if( tr_deepLoggingIsActive( ) ) \
230            myDebug( __FILE__, __LINE__, msgs, __VA_ARGS__ ); \
231    } while( 0 )
232
233/**
234***
235**/
236
237static void
238pokeBatchPeriod( tr_peermsgs * msgs,
239                 int           interval )
240{
241    if( msgs->outMessagesBatchPeriod > interval )
242    {
243        msgs->outMessagesBatchPeriod = interval;
244        dbgmsg( msgs, "lowering batch interval to %d seconds", interval );
245    }
246}
247
248static TR_INLINE void
249dbgOutMessageLen( tr_peermsgs * msgs )
250{
251    dbgmsg( msgs, "outMessage size is now %zu", EVBUFFER_LENGTH( msgs->outMessages ) );
252}
253
254static void
255protocolSendReject( tr_peermsgs * msgs, const struct peer_request * req )
256{
257    tr_peerIo       * io  = msgs->peer->io;
258    struct evbuffer * out = msgs->outMessages;
259
260    assert( tr_peerIoSupportsFEXT( msgs->peer->io ) );
261
262    tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) + 3 * sizeof( uint32_t ) );
263    tr_peerIoWriteUint8 ( io, out, BT_FEXT_REJECT );
264    tr_peerIoWriteUint32( io, out, req->index );
265    tr_peerIoWriteUint32( io, out, req->offset );
266    tr_peerIoWriteUint32( io, out, req->length );
267
268    dbgmsg( msgs, "rejecting %u:%u->%u...", req->index, req->offset, req->length );
269    dbgOutMessageLen( msgs );
270}
271
272static void
273protocolSendRequest( tr_peermsgs               * msgs,
274                     const struct peer_request * req )
275{
276    tr_peerIo       * io  = msgs->peer->io;
277    struct evbuffer * out = msgs->outMessages;
278
279    tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) + 3 * sizeof( uint32_t ) );
280    tr_peerIoWriteUint8 ( io, out, BT_REQUEST );
281    tr_peerIoWriteUint32( io, out, req->index );
282    tr_peerIoWriteUint32( io, out, req->offset );
283    tr_peerIoWriteUint32( io, out, req->length );
284
285    dbgmsg( msgs, "requesting %u:%u->%u...", req->index, req->offset, req->length );
286    dbgOutMessageLen( msgs );
287    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
288}
289
290static void
291protocolSendCancel( tr_peermsgs               * msgs,
292                    const struct peer_request * req )
293{
294    tr_peerIo       * io  = msgs->peer->io;
295    struct evbuffer * out = msgs->outMessages;
296
297    tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) + 3 * sizeof( uint32_t ) );
298    tr_peerIoWriteUint8 ( io, out, BT_CANCEL );
299    tr_peerIoWriteUint32( io, out, req->index );
300    tr_peerIoWriteUint32( io, out, req->offset );
301    tr_peerIoWriteUint32( io, out, req->length );
302
303    dbgmsg( msgs, "cancelling %u:%u->%u...", req->index, req->offset, req->length );
304    dbgOutMessageLen( msgs );
305    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
306}
307
308static void
309protocolSendHave( tr_peermsgs * msgs,
310                  uint32_t      index )
311{
312    tr_peerIo       * io  = msgs->peer->io;
313    struct evbuffer * out = msgs->outMessages;
314
315    tr_peerIoWriteUint32( io, out, sizeof(uint8_t) + sizeof(uint32_t) );
316    tr_peerIoWriteUint8 ( io, out, BT_HAVE );
317    tr_peerIoWriteUint32( io, out, index );
318
319    dbgmsg( msgs, "sending Have %u", index );
320    dbgOutMessageLen( msgs );
321    pokeBatchPeriod( msgs, LOW_PRIORITY_INTERVAL_SECS );
322}
323
324#if 0
325static void
326protocolSendAllowedFast( tr_peermsgs * msgs, uint32_t pieceIndex )
327{
328    tr_peerIo       * io  = msgs->peer->io;
329    struct evbuffer * out = msgs->outMessages;
330
331    assert( tr_peerIoSupportsFEXT( msgs->peer->io ) );
332
333    tr_peerIoWriteUint32( io, out, sizeof(uint8_t) + sizeof(uint32_t) );
334    tr_peerIoWriteUint8 ( io, out, BT_FEXT_ALLOWED_FAST );
335    tr_peerIoWriteUint32( io, out, pieceIndex );
336
337    dbgmsg( msgs, "sending Allowed Fast %u...", pieceIndex );
338    dbgOutMessageLen( msgs );
339}
340#endif
341
342static void
343protocolSendChoke( tr_peermsgs * msgs,
344                   int           choke )
345{
346    tr_peerIo       * io  = msgs->peer->io;
347    struct evbuffer * out = msgs->outMessages;
348
349    tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) );
350    tr_peerIoWriteUint8 ( io, out, choke ? BT_CHOKE : BT_UNCHOKE );
351
352    dbgmsg( msgs, "sending %s...", choke ? "Choke" : "Unchoke" );
353    dbgOutMessageLen( msgs );
354    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
355}
356
357static void
358protocolSendHaveAll( tr_peermsgs * msgs )
359{
360    tr_peerIo       * io  = msgs->peer->io;
361    struct evbuffer * out = msgs->outMessages;
362
363    assert( tr_peerIoSupportsFEXT( msgs->peer->io ) );
364
365    tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) );
366    tr_peerIoWriteUint8 ( io, out, BT_FEXT_HAVE_ALL );
367
368    dbgmsg( msgs, "sending HAVE_ALL..." );
369    dbgOutMessageLen( msgs );
370    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
371}
372
373static void
374protocolSendHaveNone( tr_peermsgs * msgs )
375{
376    tr_peerIo       * io  = msgs->peer->io;
377    struct evbuffer * out = msgs->outMessages;
378
379    assert( tr_peerIoSupportsFEXT( msgs->peer->io ) );
380
381    tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) );
382    tr_peerIoWriteUint8 ( io, out, BT_FEXT_HAVE_NONE );
383
384    dbgmsg( msgs, "sending HAVE_NONE..." );
385    dbgOutMessageLen( msgs );
386    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
387}
388
389/**
390***  EVENTS
391**/
392
393static const tr_peer_event blankEvent = { 0, 0, 0, 0, 0.0f, 0, 0, 0 };
394
395static void
396publish( tr_peermsgs * msgs, tr_peer_event * e )
397{
398    assert( msgs->peer );
399    assert( msgs->peer->msgs == msgs );
400
401    tr_publisherPublish( &msgs->publisher, msgs->peer, e );
402}
403
404static void
405fireError( tr_peermsgs * msgs, int err )
406{
407    tr_peer_event e = blankEvent;
408    e.eventType = TR_PEER_ERROR;
409    e.err = err;
410    publish( msgs, &e );
411}
412
413static void
414fireUploadOnly( tr_peermsgs * msgs, tr_bool uploadOnly )
415{
416    tr_peer_event e = blankEvent;
417    e.eventType = TR_PEER_UPLOAD_ONLY;
418    e.uploadOnly = uploadOnly;
419    publish( msgs, &e );
420}
421
422static void
423fireNeedReq( tr_peermsgs * msgs )
424{
425    tr_peer_event e = blankEvent;
426    e.eventType = TR_PEER_NEED_REQ;
427    publish( msgs, &e );
428}
429
430static void
431firePeerProgress( tr_peermsgs * msgs )
432{
433    tr_peer_event e = blankEvent;
434    e.eventType = TR_PEER_PEER_PROGRESS;
435    e.progress = msgs->peer->progress;
436    publish( msgs, &e );
437}
438
439static void
440fireGotBlock( tr_peermsgs * msgs, const struct peer_request * req )
441{
442    tr_peer_event e = blankEvent;
443    e.eventType = TR_PEER_CLIENT_GOT_BLOCK;
444    e.pieceIndex = req->index;
445    e.offset = req->offset;
446    e.length = req->length;
447    publish( msgs, &e );
448}
449
450static void
451fireClientGotData( tr_peermsgs * msgs,
452                   uint32_t      length,
453                   int           wasPieceData )
454{
455    tr_peer_event e = blankEvent;
456
457    e.length = length;
458    e.eventType = TR_PEER_CLIENT_GOT_DATA;
459    e.wasPieceData = wasPieceData;
460    publish( msgs, &e );
461}
462
463static void
464fireClientGotSuggest( tr_peermsgs * msgs, uint32_t pieceIndex )
465{
466    tr_peer_event e = blankEvent;
467    e.eventType = TR_PEER_CLIENT_GOT_SUGGEST;
468    e.pieceIndex = pieceIndex;
469    publish( msgs, &e );
470}
471
472static void
473fireClientGotAllowedFast( tr_peermsgs * msgs, uint32_t pieceIndex )
474{
475    tr_peer_event e = blankEvent;
476    e.eventType = TR_PEER_CLIENT_GOT_ALLOWED_FAST;
477    e.pieceIndex = pieceIndex;
478    publish( msgs, &e );
479}
480
481static void
482firePeerGotData( tr_peermsgs  * msgs,
483                 uint32_t       length,
484                 int            wasPieceData )
485{
486    tr_peer_event e = blankEvent;
487
488    e.length = length;
489    e.eventType = TR_PEER_PEER_GOT_DATA;
490    e.wasPieceData = wasPieceData;
491
492    publish( msgs, &e );
493}
494
495static void
496fireCancelledReq( tr_peermsgs * msgs, const struct peer_request * req )
497{
498    tr_peer_event e = blankEvent;
499    e.eventType = TR_PEER_CANCEL;
500    e.pieceIndex = req->index;
501    e.offset = req->offset;
502    e.length = req->length;
503    publish( msgs, &e );
504}
505
506/**
507***  ALLOWED FAST SET
508***  For explanation, see http://www.bittorrent.org/beps/bep_0006.html
509**/
510
511size_t
512tr_generateAllowedSet( tr_piece_index_t * setmePieces,
513                       size_t             desiredSetSize,
514                       size_t             pieceCount,
515                       const uint8_t    * infohash,
516                       const tr_address * addr )
517{
518    size_t setSize = 0;
519
520    assert( setmePieces );
521    assert( desiredSetSize <= pieceCount );
522    assert( desiredSetSize );
523    assert( pieceCount );
524    assert( infohash );
525    assert( addr );
526
527    if( addr->type == TR_AF_INET )
528    {
529        uint8_t w[SHA_DIGEST_LENGTH + 4];
530        uint8_t x[SHA_DIGEST_LENGTH];
531
532        *(uint32_t*)w = ntohl( htonl( addr->addr.addr4.s_addr ) & 0xffffff00 );   /* (1) */
533        memcpy( w + 4, infohash, SHA_DIGEST_LENGTH );                /* (2) */
534        tr_sha1( x, w, sizeof( w ), NULL );                          /* (3) */
535
536        while( setSize<desiredSetSize )
537        {
538            int i;
539            for( i=0; i<5 && setSize<desiredSetSize; ++i )           /* (4) */
540            {
541                size_t k;
542                uint32_t j = i * 4;                                  /* (5) */
543                uint32_t y = ntohl( *( uint32_t* )( x + j ) );       /* (6) */
544                uint32_t index = y % pieceCount;                     /* (7) */
545
546                for( k=0; k<setSize; ++k )                           /* (8) */
547                    if( setmePieces[k] == index )
548                        break;
549
550                if( k == setSize )
551                    setmePieces[setSize++] = index;                  /* (9) */
552            }
553
554            tr_sha1( x, x, sizeof( x ), NULL );                      /* (3) */
555        }
556    }
557
558    return setSize;
559}
560
561static void
562updateFastSet( tr_peermsgs * msgs UNUSED )
563{
564#if 0
565    const tr_bool fext = tr_peerIoSupportsFEXT( msgs->peer->io );
566    const int peerIsNeedy = msgs->peer->progress < 0.10;
567
568    if( fext && peerIsNeedy && !msgs->haveFastSet )
569    {
570        size_t i;
571        const struct tr_address * addr = tr_peerIoGetAddress( msgs->peer->io, NULL );
572        const tr_info * inf = &msgs->torrent->info;
573        const size_t numwant = MIN( MAX_FAST_SET_SIZE, inf->pieceCount );
574
575        /* build the fast set */
576        msgs->fastsetSize = tr_generateAllowedSet( msgs->fastset, numwant, inf->pieceCount, inf->hash, addr );
577        msgs->haveFastSet = 1;
578
579        /* send it to the peer */
580        for( i=0; i<msgs->fastsetSize; ++i )
581            protocolSendAllowedFast( msgs, msgs->fastset[i] );
582    }
583#endif
584}
585
586/**
587***  INTEREST
588**/
589
590static int
591isPieceInteresting( const tr_peermsgs * msgs,
592                    tr_piece_index_t    piece )
593{
594    const tr_torrent * torrent = msgs->torrent;
595
596    return ( !torrent->info.pieces[piece].dnd )                 /* we want it */
597          && ( !tr_cpPieceIsComplete( &torrent->completion, piece ) ) /* !have */
598          && ( tr_bitfieldHas( msgs->peer->have, piece ) );    /* peer has it */
599}
600
601/* "interested" means we'll ask for piece data if they unchoke us */
602static int
603isPeerInteresting( const tr_peermsgs * msgs )
604{
605    tr_piece_index_t    i;
606    const tr_torrent *  torrent;
607    const tr_bitfield * bitfield;
608    const int           clientIsSeed = tr_torrentIsSeed( msgs->torrent );
609
610    if( clientIsSeed )
611        return FALSE;
612
613    if( !tr_torrentIsPieceTransferAllowed( msgs->torrent, TR_PEER_TO_CLIENT ) )
614        return FALSE;
615
616    torrent = msgs->torrent;
617    bitfield = tr_cpPieceBitfield( &torrent->completion );
618
619    if( !msgs->peer->have )
620        return TRUE;
621
622    assert( bitfield->byteCount == msgs->peer->have->byteCount );
623
624    for( i = 0; i < torrent->info.pieceCount; ++i )
625        if( isPieceInteresting( msgs, i ) )
626            return TRUE;
627
628    return FALSE;
629}
630
631static void
632sendInterest( tr_peermsgs * msgs,
633              int           weAreInterested )
634{
635    struct evbuffer * out = msgs->outMessages;
636
637    assert( msgs );
638    assert( weAreInterested == 0 || weAreInterested == 1 );
639
640    msgs->peer->clientIsInterested = weAreInterested;
641    dbgmsg( msgs, "Sending %s", weAreInterested ? "Interested" : "Not Interested" );
642    tr_peerIoWriteUint32( msgs->peer->io, out, sizeof( uint8_t ) );
643    tr_peerIoWriteUint8 ( msgs->peer->io, out, weAreInterested ? BT_INTERESTED : BT_NOT_INTERESTED );
644
645    pokeBatchPeriod( msgs, HIGH_PRIORITY_INTERVAL_SECS );
646    dbgOutMessageLen( msgs );
647}
648
649static void
650updateInterest( tr_peermsgs * msgs )
651{
652    const int i = isPeerInteresting( msgs );
653
654    if( i != msgs->peer->clientIsInterested )
655        sendInterest( msgs, i );
656    if( i )
657        fireNeedReq( msgs );
658}
659
660static int
661popNextRequest( tr_peermsgs *         msgs,
662                struct peer_request * setme )
663{
664    return reqListPop( &msgs->peerAskedFor, setme );
665}
666
667static void
668cancelAllRequestsToClient( tr_peermsgs * msgs )
669{
670    struct peer_request req;
671    const int mustSendCancel = tr_peerIoSupportsFEXT( msgs->peer->io );
672
673    while( popNextRequest( msgs, &req ) )
674        if( mustSendCancel )
675            protocolSendReject( msgs, &req );
676}
677
678void
679tr_peerMsgsSetChoke( tr_peermsgs * msgs,
680                     int           choke )
681{
682    const time_t now = time( NULL );
683    const time_t fibrillationTime = now - MIN_CHOKE_PERIOD_SEC;
684
685    assert( msgs );
686    assert( msgs->peer );
687    assert( choke == 0 || choke == 1 );
688
689    if( msgs->peer->chokeChangedAt > fibrillationTime )
690    {
691        dbgmsg( msgs, "Not changing choke to %d to avoid fibrillation", choke );
692    }
693    else if( msgs->peer->peerIsChoked != choke )
694    {
695        msgs->peer->peerIsChoked = choke;
696        if( choke )
697            cancelAllRequestsToClient( msgs );
698        protocolSendChoke( msgs, choke );
699        msgs->peer->chokeChangedAt = now;
700    }
701}
702
703/**
704***
705**/
706
707void
708tr_peerMsgsHave( tr_peermsgs * msgs,
709                 uint32_t      index )
710{
711    protocolSendHave( msgs, index );
712
713    /* since we have more pieces now, we might not be interested in this peer */
714    updateInterest( msgs );
715}
716
717/**
718***
719**/
720
721static int
722reqIsValid( const tr_peermsgs * peer,
723            uint32_t            index,
724            uint32_t            offset,
725            uint32_t            length )
726{
727    return tr_torrentReqIsValid( peer->torrent, index, offset, length );
728}
729
730static int
731requestIsValid( const tr_peermsgs * msgs, const struct peer_request * req )
732{
733    return reqIsValid( msgs, req->index, req->offset, req->length );
734}
735
736static void
737expireFromList( tr_peermsgs          * msgs,
738                struct request_list  * list,
739                const time_t           oldestAllowed )
740{
741    size_t i;
742    struct request_list tmp = REQUEST_LIST_INIT;
743
744    /* since the fifo list is sorted by time, the oldest will be first */
745    if( !list->len || ( list->fifo[0].time_requested >= oldestAllowed ) )
746        return;
747
748    /* if we found one too old, start pruning them */
749    reqListCopy( &tmp, list );
750    for( i=0; i<tmp.len; ++i ) {
751        const struct peer_request * req = &tmp.fifo[i];
752        if( req->time_requested >= oldestAllowed )
753            break;
754        tr_peerMsgsCancel( msgs, req->index, req->offset, req->length );
755    }
756    reqListClear( &tmp );
757}
758
759static void
760expireOldRequests( tr_peermsgs * msgs, const time_t now  )
761{
762    time_t oldestAllowed;
763    const tr_bool fext = tr_peerIoSupportsFEXT( msgs->peer->io );
764    dbgmsg( msgs, "entering `expire old requests' block" );
765
766    /* cancel requests that have been queued for too long */
767    oldestAllowed = now - QUEUED_REQUEST_TTL_SECS;
768    expireFromList( msgs, &msgs->clientWillAskFor, oldestAllowed );
769
770    /* if the peer doesn't support "Reject Request",
771     * cancel requests that were sent too long ago. */
772    if( !fext ) {
773        oldestAllowed = now - SENT_REQUEST_TTL_SECS;
774        expireFromList( msgs, &msgs->clientAskedFor, oldestAllowed );
775    }
776
777    dbgmsg( msgs, "leaving `expire old requests' block" );
778}
779
780static void
781pumpRequestQueue( tr_peermsgs * msgs, const time_t now )
782{
783    const int           max = msgs->maxActiveRequests;
784    int                 sent = 0;
785    int                 len = msgs->clientAskedFor.len;
786    struct peer_request req;
787
788    dbgmsg( msgs, "clientIsChoked %d, download allowed %d, len %d, max %d, msgs->clientWillAskFor.len %d",
789            (int)msgs->peer->clientIsChoked,
790            (int)tr_torrentIsPieceTransferAllowed( msgs->torrent, TR_PEER_TO_CLIENT ),
791            len, max, msgs->clientWillAskFor.len );
792
793    if( msgs->peer->clientIsChoked )
794        return;
795    if( !tr_torrentIsPieceTransferAllowed( msgs->torrent, TR_PEER_TO_CLIENT ) )
796        return;
797
798    while( ( len < max ) && reqListPop( &msgs->clientWillAskFor, &req ) )
799    {
800        const tr_block_index_t block = _tr_block( msgs->torrent, req.index, req.offset );
801
802        assert( requestIsValid( msgs, &req ) );
803        assert( tr_bitfieldHas( msgs->peer->have, req.index ) );
804
805        /* don't ask for it if we've already got it... this block may have
806         * come in from a different peer after we cancelled a request for it */
807        if( !tr_cpBlockIsComplete( &msgs->torrent->completion, block ) )
808        {
809            protocolSendRequest( msgs, &req );
810            req.time_requested = now;
811            reqListAppend( &msgs->clientAskedFor, &req );
812
813            ++len;
814            ++sent;
815        }
816        else dbgmsg( msgs, "not asking for it because we've already got it..." );
817    }
818
819    if( sent )
820        dbgmsg( msgs, "pump sent %d requests, now have %d active and %d queued",
821                sent, msgs->clientAskedFor.len, msgs->clientWillAskFor.len );
822
823    if( len < max )
824        fireNeedReq( msgs );
825}
826
827static TR_INLINE int
828requestQueueIsFull( const tr_peermsgs * msgs )
829{
830    const int req_max = msgs->maxActiveRequests;
831    return msgs->clientWillAskFor.len >= (size_t)req_max;
832}
833
834tr_addreq_t
835tr_peerMsgsAddRequest( tr_peermsgs *    msgs,
836                       uint32_t         index,
837                       uint32_t         offset,
838                       uint32_t         length )
839{
840    struct peer_request req;
841
842    assert( msgs );
843    assert( msgs->torrent );
844    assert( reqIsValid( msgs, index, offset, length ) );
845
846    /**
847    ***  Reasons to decline the request
848    **/
849
850    /* don't send requests to choked clients */
851    if( msgs->peer->clientIsChoked ) {
852        dbgmsg( msgs, "declining request because they're choking us" );
853        return TR_ADDREQ_CLIENT_CHOKED;
854    }
855
856    /* peer doesn't have this piece */
857    if( !tr_bitfieldHas( msgs->peer->have, index ) )
858        return TR_ADDREQ_MISSING;
859
860    /* peer's queue is full */
861    if( requestQueueIsFull( msgs ) ) {
862        dbgmsg( msgs, "declining request because we're full" );
863        return TR_ADDREQ_FULL;
864    }
865
866    /* have we already asked for this piece? */
867    req.index = index;
868    req.offset = offset;
869    req.length = length;
870    if( reqListHas( &msgs->clientAskedFor, &req ) ) {
871        dbgmsg( msgs, "declining because it's a duplicate" );
872        return TR_ADDREQ_DUPLICATE;
873    }
874    if( reqListHas( &msgs->clientWillAskFor, &req ) ) {
875        dbgmsg( msgs, "declining because it's a duplicate" );
876        return TR_ADDREQ_DUPLICATE;
877    }
878
879    /**
880    ***  Accept this request
881    **/
882
883    dbgmsg( msgs, "adding req for %"PRIu32":%"PRIu32"->%"PRIu32" to our `will request' list",
884            index, offset, length );
885    req.time_requested = time( NULL );
886    reqListAppend( &msgs->clientWillAskFor, &req );
887    return TR_ADDREQ_OK;
888}
889
890static void
891cancelAllRequestsToPeer( tr_peermsgs * msgs, tr_bool sendCancel )
892{
893    size_t i;
894    struct request_list a = msgs->clientWillAskFor;
895    struct request_list b = msgs->clientAskedFor;
896    dbgmsg( msgs, "cancelling all requests to peer" );
897
898    msgs->clientAskedFor = REQUEST_LIST_INIT;
899    msgs->clientWillAskFor = REQUEST_LIST_INIT;
900
901    for( i=0; i<a.len; ++i )
902        fireCancelledReq( msgs, &a.fifo[i] );
903
904    for( i = 0; i < b.len; ++i ) {
905        fireCancelledReq( msgs, &b.fifo[i] );
906        if( sendCancel )
907            protocolSendCancel( msgs, &b.fifo[i] );
908    }
909
910    reqListClear( &a );
911    reqListClear( &b );
912}
913
914void
915tr_peerMsgsCancel( tr_peermsgs * msgs,
916                   uint32_t      pieceIndex,
917                   uint32_t      offset,
918                   uint32_t      length )
919{
920    struct peer_request req;
921
922    assert( msgs != NULL );
923    assert( length > 0 );
924
925
926    /* have we asked the peer for this piece? */
927    req.index = pieceIndex;
928    req.offset = offset;
929    req.length = length;
930
931    /* if it's only in the queue and hasn't been sent yet, free it */
932    if( reqListRemove( &msgs->clientWillAskFor, &req ) ) {
933        dbgmsg( msgs, "cancelling %"PRIu32":%"PRIu32"->%"PRIu32, pieceIndex, offset, length );
934        fireCancelledReq( msgs, &req );
935    }
936
937    /* if it's already been sent, send a cancel message too */
938    if( reqListRemove( &msgs->clientAskedFor, &req ) ) {
939        dbgmsg( msgs, "cancelling %"PRIu32":%"PRIu32"->%"PRIu32, pieceIndex, offset, length );
940        protocolSendCancel( msgs, &req );
941        fireCancelledReq( msgs, &req );
942    }
943}
944
945
946/**
947***
948**/
949
950static void
951sendLtepHandshake( tr_peermsgs * msgs )
952{
953    tr_benc val, *m;
954    char * buf;
955    int len;
956    int pex;
957    struct evbuffer * out = msgs->outMessages;
958
959    if( msgs->clientSentLtepHandshake )
960        return;
961
962    dbgmsg( msgs, "sending an ltep handshake" );
963    msgs->clientSentLtepHandshake = 1;
964
965    /* decide if we want to advertise pex support */
966    if( !tr_torrentAllowsPex( msgs->torrent ) )
967        pex = 0;
968    else if( msgs->peerSentLtepHandshake )
969        pex = msgs->peerSupportsPex ? 1 : 0;
970    else
971        pex = 1;
972
973    tr_bencInitDict( &val, 5 );
974    tr_bencDictAddInt( &val, "e", msgs->session->encryptionMode != TR_CLEAR_PREFERRED );
975    tr_bencDictAddInt( &val, "p", tr_sessionGetPeerPort( msgs->session ) );
976    tr_bencDictAddInt( &val, "upload_only", tr_torrentIsSeed( msgs->torrent ) );
977    tr_bencDictAddStr( &val, "v", TR_NAME " " USERAGENT_PREFIX );
978    m  = tr_bencDictAddDict( &val, "m", 1 );
979    if( pex )
980        tr_bencDictAddInt( m, "ut_pex", TR_LTEP_PEX );
981    buf = tr_bencSave( &val, &len );
982
983    tr_peerIoWriteUint32( msgs->peer->io, out, 2 * sizeof( uint8_t ) + len );
984    tr_peerIoWriteUint8 ( msgs->peer->io, out, BT_LTEP );
985    tr_peerIoWriteUint8 ( msgs->peer->io, out, LTEP_HANDSHAKE );
986    tr_peerIoWriteBytes ( msgs->peer->io, out, buf, len );
987    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
988    dbgOutMessageLen( msgs );
989
990    /* cleanup */
991    tr_bencFree( &val );
992    tr_free( buf );
993}
994
995static void
996parseLtepHandshake( tr_peermsgs *     msgs,
997                    int               len,
998                    struct evbuffer * inbuf )
999{
1000    int64_t   i;
1001    tr_benc   val, * sub;
1002    uint8_t * tmp = tr_new( uint8_t, len );
1003
1004    tr_peerIoReadBytes( msgs->peer->io, inbuf, tmp, len );
1005    msgs->peerSentLtepHandshake = 1;
1006
1007    if( tr_bencLoad( tmp, len, &val, NULL ) || !tr_bencIsDict( &val ) )
1008    {
1009        dbgmsg( msgs, "GET  extended-handshake, couldn't get dictionary" );
1010        tr_free( tmp );
1011        return;
1012    }
1013
1014    dbgmsg( msgs, "here is the handshake: [%*.*s]", len, len,  tmp );
1015
1016    /* does the peer prefer encrypted connections? */
1017    if( tr_bencDictFindInt( &val, "e", &i ) )
1018        msgs->peer->encryption_preference = i ? ENCRYPTION_PREFERENCE_YES
1019                                              : ENCRYPTION_PREFERENCE_NO;
1020
1021    /* check supported messages for utorrent pex */
1022    msgs->peerSupportsPex = 0;
1023    if( tr_bencDictFindDict( &val, "m", &sub ) ) {
1024        if( tr_bencDictFindInt( sub, "ut_pex", &i ) ) {
1025            msgs->ut_pex_id = (uint8_t) i;
1026            msgs->peerSupportsPex = msgs->ut_pex_id == 0 ? 0 : 1;
1027            dbgmsg( msgs, "msgs->ut_pex is %d", (int)msgs->ut_pex_id );
1028        }
1029    }
1030
1031    /* look for upload_only (BEP 21) */
1032    if( tr_bencDictFindInt( &val, "upload_only", &i ) )
1033        fireUploadOnly( msgs, i!=0 );
1034
1035    /* get peer's listening port */
1036    if( tr_bencDictFindInt( &val, "p", &i ) ) {
1037        msgs->peer->port = htons( (uint16_t)i );
1038        dbgmsg( msgs, "msgs->port is now %hu", msgs->peer->port );
1039    }
1040
1041    /* get peer's maximum request queue size */
1042    if( tr_bencDictFindInt( &val, "reqq", &i ) )
1043        msgs->reqq = i;
1044
1045    tr_bencFree( &val );
1046    tr_free( tmp );
1047}
1048
1049static void
1050parseUtPex( tr_peermsgs * msgs, int msglen, struct evbuffer * inbuf )
1051{
1052    int loaded = 0;
1053    uint8_t * tmp = tr_new( uint8_t, msglen );
1054    tr_benc val;
1055    tr_torrent * tor = msgs->torrent;
1056    const uint8_t * added;
1057    size_t added_len;
1058
1059    tr_peerIoReadBytes( msgs->peer->io, inbuf, tmp, msglen );
1060
1061    if( tr_torrentAllowsPex( tor )
1062      && ( ( loaded = !tr_bencLoad( tmp, msglen, &val, NULL ) ) ) )
1063    {
1064        if( tr_bencDictFindRaw( &val, "added", &added, &added_len ) )
1065        {
1066            const uint8_t * added_f = NULL;
1067            tr_pex *        pex;
1068            size_t          i, n;
1069            size_t          added_f_len = 0;
1070            tr_bencDictFindRaw( &val, "added.f", &added_f, &added_f_len );
1071            pex =
1072                tr_peerMgrCompactToPex( added, added_len, added_f, added_f_len,
1073                                        &n );
1074            for( i = 0; i < n; ++i )
1075                tr_peerMgrAddPex( tor, TR_PEER_FROM_PEX, pex + i );
1076            tr_free( pex );
1077        }
1078       
1079        if( tr_bencDictFindRaw( &val, "added6", &added, &added_len ) )
1080        {
1081            const uint8_t * added_f = NULL;
1082            tr_pex *        pex;
1083            size_t          i, n;
1084            size_t          added_f_len = 0;
1085            tr_bencDictFindRaw( &val, "added6.f", &added_f, &added_f_len );
1086            pex =
1087                tr_peerMgrCompact6ToPex( added, added_len, added_f, added_f_len,
1088                                         &n );
1089            for( i = 0; i < n; ++i )
1090                tr_peerMgrAddPex( tor, TR_PEER_FROM_PEX, pex + i );
1091            tr_free( pex );
1092        }
1093       
1094    }
1095
1096    if( loaded )
1097        tr_bencFree( &val );
1098    tr_free( tmp );
1099}
1100
1101static void sendPex( tr_peermsgs * msgs );
1102
1103static void
1104parseLtep( tr_peermsgs *     msgs,
1105           int               msglen,
1106           struct evbuffer * inbuf )
1107{
1108    uint8_t ltep_msgid;
1109
1110    tr_peerIoReadUint8( msgs->peer->io, inbuf, &ltep_msgid );
1111    msglen--;
1112
1113    if( ltep_msgid == LTEP_HANDSHAKE )
1114    {
1115        dbgmsg( msgs, "got ltep handshake" );
1116        parseLtepHandshake( msgs, msglen, inbuf );
1117        if( tr_peerIoSupportsLTEP( msgs->peer->io ) )
1118        {
1119            sendLtepHandshake( msgs );
1120            sendPex( msgs );
1121        }
1122    }
1123    else if( ltep_msgid == TR_LTEP_PEX )
1124    {
1125        dbgmsg( msgs, "got ut pex" );
1126        msgs->peerSupportsPex = 1;
1127        parseUtPex( msgs, msglen, inbuf );
1128    }
1129    else
1130    {
1131        dbgmsg( msgs, "skipping unknown ltep message (%d)", (int)ltep_msgid );
1132        evbuffer_drain( inbuf, msglen );
1133    }
1134}
1135
1136static int
1137readBtLength( tr_peermsgs *     msgs,
1138              struct evbuffer * inbuf,
1139              size_t            inlen )
1140{
1141    uint32_t len;
1142
1143    if( inlen < sizeof( len ) )
1144        return READ_LATER;
1145
1146    tr_peerIoReadUint32( msgs->peer->io, inbuf, &len );
1147
1148    if( len == 0 ) /* peer sent us a keepalive message */
1149        dbgmsg( msgs, "got KeepAlive" );
1150    else
1151    {
1152        msgs->incoming.length = len;
1153        msgs->state = AWAITING_BT_ID;
1154    }
1155
1156    return READ_NOW;
1157}
1158
1159static int readBtMessage( tr_peermsgs *     msgs,
1160                          struct evbuffer * inbuf,
1161                          size_t            inlen );
1162
1163static int
1164readBtId( tr_peermsgs *     msgs,
1165          struct evbuffer * inbuf,
1166          size_t            inlen )
1167{
1168    uint8_t id;
1169
1170    if( inlen < sizeof( uint8_t ) )
1171        return READ_LATER;
1172
1173    tr_peerIoReadUint8( msgs->peer->io, inbuf, &id );
1174    msgs->incoming.id = id;
1175    dbgmsg( msgs, "msgs->incoming.id is now %d; msgs->incoming.length is %zu", id, (size_t)msgs->incoming.length );
1176
1177    if( id == BT_PIECE )
1178    {
1179        msgs->state = AWAITING_BT_PIECE;
1180        return READ_NOW;
1181    }
1182    else if( msgs->incoming.length != 1 )
1183    {
1184        msgs->state = AWAITING_BT_MESSAGE;
1185        return READ_NOW;
1186    }
1187    else return readBtMessage( msgs, inbuf, inlen - 1 );
1188}
1189
1190static void
1191updatePeerProgress( tr_peermsgs * msgs )
1192{
1193    msgs->peer->progress = tr_bitfieldCountTrueBits( msgs->peer->have ) / (float)msgs->torrent->info.pieceCount;
1194    dbgmsg( msgs, "peer progress is %f", msgs->peer->progress );
1195    updateFastSet( msgs );
1196    updateInterest( msgs );
1197    firePeerProgress( msgs );
1198}
1199
1200static void
1201peerMadeRequest( tr_peermsgs *               msgs,
1202                 const struct peer_request * req )
1203{
1204    const tr_bool fext = tr_peerIoSupportsFEXT( msgs->peer->io );
1205    const int reqIsValid = requestIsValid( msgs, req );
1206    const int clientHasPiece = reqIsValid && tr_cpPieceIsComplete( &msgs->torrent->completion, req->index );
1207    const int peerIsChoked = msgs->peer->peerIsChoked;
1208
1209    int allow = FALSE;
1210
1211    if( !reqIsValid )
1212        dbgmsg( msgs, "rejecting an invalid request." );
1213    else if( !clientHasPiece )
1214        dbgmsg( msgs, "rejecting request for a piece we don't have." );
1215    else if( peerIsChoked )
1216        dbgmsg( msgs, "rejecting request from choked peer" );
1217    else
1218        allow = TRUE;
1219
1220    if( allow )
1221        reqListAppend( &msgs->peerAskedFor, req );
1222    else if( fext )
1223        protocolSendReject( msgs, req );
1224}
1225
1226static int
1227messageLengthIsCorrect( const tr_peermsgs * msg, uint8_t id, uint32_t len )
1228{
1229    switch( id )
1230    {
1231        case BT_CHOKE:
1232        case BT_UNCHOKE:
1233        case BT_INTERESTED:
1234        case BT_NOT_INTERESTED:
1235        case BT_FEXT_HAVE_ALL:
1236        case BT_FEXT_HAVE_NONE:
1237            return len == 1;
1238
1239        case BT_HAVE:
1240        case BT_FEXT_SUGGEST:
1241        case BT_FEXT_ALLOWED_FAST:
1242            return len == 5;
1243
1244        case BT_BITFIELD:
1245            return len == ( msg->torrent->info.pieceCount + 7u ) / 8u + 1u;
1246
1247        case BT_REQUEST:
1248        case BT_CANCEL:
1249        case BT_FEXT_REJECT:
1250            return len == 13;
1251
1252        case BT_PIECE:
1253            return len > 9 && len <= 16393;
1254
1255        case BT_PORT:
1256            return len == 3;
1257
1258        case BT_LTEP:
1259            return len >= 2;
1260
1261        default:
1262            return FALSE;
1263    }
1264}
1265
1266static int clientGotBlock( tr_peermsgs *               msgs,
1267                           const uint8_t *             block,
1268                           const struct peer_request * req );
1269
1270static int
1271readBtPiece( tr_peermsgs      * msgs,
1272             struct evbuffer  * inbuf,
1273             size_t             inlen,
1274             size_t           * setme_piece_bytes_read )
1275{
1276    struct peer_request * req = &msgs->incoming.blockReq;
1277
1278    assert( EVBUFFER_LENGTH( inbuf ) >= inlen );
1279    dbgmsg( msgs, "In readBtPiece" );
1280
1281    if( !req->length )
1282    {
1283        if( inlen < 8 )
1284            return READ_LATER;
1285
1286        tr_peerIoReadUint32( msgs->peer->io, inbuf, &req->index );
1287        tr_peerIoReadUint32( msgs->peer->io, inbuf, &req->offset );
1288        req->length = msgs->incoming.length - 9;
1289        dbgmsg( msgs, "got incoming block header %u:%u->%u", req->index, req->offset, req->length );
1290        return READ_NOW;
1291    }
1292    else
1293    {
1294        int err;
1295
1296        /* read in another chunk of data */
1297        const size_t nLeft = req->length - EVBUFFER_LENGTH( msgs->incoming.block );
1298        size_t n = MIN( nLeft, inlen );
1299        size_t i = n;
1300
1301        while( i > 0 )
1302        {
1303            uint8_t buf[MAX_STACK_ARRAY_SIZE];
1304            const size_t thisPass = MIN( i, sizeof( buf ) );
1305            tr_peerIoReadBytes( msgs->peer->io, inbuf, buf, thisPass );
1306            evbuffer_add( msgs->incoming.block, buf, thisPass );
1307            i -= thisPass;
1308        }
1309
1310        fireClientGotData( msgs, n, TRUE );
1311        *setme_piece_bytes_read += n;
1312        dbgmsg( msgs, "got %zu bytes for block %u:%u->%u ... %d remain",
1313               n, req->index, req->offset, req->length,
1314               (int)( req->length - EVBUFFER_LENGTH( msgs->incoming.block ) ) );
1315        if( EVBUFFER_LENGTH( msgs->incoming.block ) < req->length )
1316            return READ_LATER;
1317
1318        /* we've got the whole block ... process it */
1319        err = clientGotBlock( msgs, EVBUFFER_DATA( msgs->incoming.block ), req );
1320
1321        /* cleanup */
1322        evbuffer_drain( msgs->incoming.block, EVBUFFER_LENGTH( msgs->incoming.block ) );
1323        req->length = 0;
1324        msgs->state = AWAITING_BT_LENGTH;
1325        if( !err )
1326            return READ_NOW;
1327        else {
1328            fireError( msgs, err );
1329            return READ_ERR;
1330        }
1331    }
1332}
1333
1334static int
1335readBtMessage( tr_peermsgs * msgs, struct evbuffer * inbuf, size_t inlen )
1336{
1337    uint32_t      ui32;
1338    uint32_t      msglen = msgs->incoming.length;
1339    const uint8_t id = msgs->incoming.id;
1340    const size_t  startBufLen = EVBUFFER_LENGTH( inbuf );
1341    const tr_bool fext = tr_peerIoSupportsFEXT( msgs->peer->io );
1342
1343    --msglen; /* id length */
1344
1345    dbgmsg( msgs, "got BT id %d, len %d, buffer size is %zu", (int)id, (int)msglen, inlen );
1346
1347    if( inlen < msglen )
1348        return READ_LATER;
1349
1350    if( !messageLengthIsCorrect( msgs, id, msglen + 1 ) )
1351    {
1352        dbgmsg( msgs, "bad packet - BT message #%d with a length of %d", (int)id, (int)msglen );
1353        fireError( msgs, EMSGSIZE );
1354        return READ_ERR;
1355    }
1356
1357    switch( id )
1358    {
1359        case BT_CHOKE:
1360            dbgmsg( msgs, "got Choke" );
1361            msgs->peer->clientIsChoked = 1;
1362            if( !fext )
1363                cancelAllRequestsToPeer( msgs, FALSE );
1364            break;
1365
1366        case BT_UNCHOKE:
1367            dbgmsg( msgs, "got Unchoke" );
1368            msgs->peer->clientIsChoked = 0;
1369            fireNeedReq( msgs );
1370            break;
1371
1372        case BT_INTERESTED:
1373            dbgmsg( msgs, "got Interested" );
1374            msgs->peer->peerIsInterested = 1;
1375            break;
1376
1377        case BT_NOT_INTERESTED:
1378            dbgmsg( msgs, "got Not Interested" );
1379            msgs->peer->peerIsInterested = 0;
1380            break;
1381
1382        case BT_HAVE:
1383            tr_peerIoReadUint32( msgs->peer->io, inbuf, &ui32 );
1384            dbgmsg( msgs, "got Have: %u", ui32 );
1385            if( tr_bitfieldAdd( msgs->peer->have, ui32 ) ) {
1386                fireError( msgs, ERANGE );
1387                return READ_ERR;
1388            }
1389            updatePeerProgress( msgs );
1390            tr_rcTransferred( &msgs->torrent->swarmSpeed,
1391                              msgs->torrent->info.pieceSize );
1392            break;
1393
1394        case BT_BITFIELD:
1395        {
1396            dbgmsg( msgs, "got a bitfield" );
1397            tr_peerIoReadBytes( msgs->peer->io, inbuf, msgs->peer->have->bits, msglen );
1398            updatePeerProgress( msgs );
1399            fireNeedReq( msgs );
1400            break;
1401        }
1402
1403        case BT_REQUEST:
1404        {
1405            struct peer_request r;
1406            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.index );
1407            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.offset );
1408            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.length );
1409            dbgmsg( msgs, "got Request: %u:%u->%u", r.index, r.offset, r.length );
1410            peerMadeRequest( msgs, &r );
1411            break;
1412        }
1413
1414        case BT_CANCEL:
1415        {
1416            struct peer_request r;
1417            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.index );
1418            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.offset );
1419            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.length );
1420            dbgmsg( msgs, "got a Cancel %u:%u->%u", r.index, r.offset, r.length );
1421            if( reqListRemove( &msgs->peerAskedFor, &r ) && fext )
1422                protocolSendReject( msgs, &r );
1423            break;
1424        }
1425
1426        case BT_PIECE:
1427            assert( 0 ); /* handled elsewhere! */
1428            break;
1429
1430        case BT_PORT:
1431            dbgmsg( msgs, "Got a BT_PORT" );
1432            tr_peerIoReadUint16( msgs->peer->io, inbuf, &msgs->peer->port );
1433            break;
1434
1435        case BT_FEXT_SUGGEST:
1436            dbgmsg( msgs, "Got a BT_FEXT_SUGGEST" );
1437            tr_peerIoReadUint32( msgs->peer->io, inbuf, &ui32 );
1438            if( fext )
1439                fireClientGotSuggest( msgs, ui32 );
1440            else {
1441                fireError( msgs, EMSGSIZE );
1442                return READ_ERR;
1443            }
1444            break;
1445
1446        case BT_FEXT_ALLOWED_FAST:
1447            dbgmsg( msgs, "Got a BT_FEXT_ALLOWED_FAST" );
1448            tr_peerIoReadUint32( msgs->peer->io, inbuf, &ui32 );
1449            if( fext )
1450                fireClientGotAllowedFast( msgs, ui32 );
1451            else {
1452                fireError( msgs, EMSGSIZE );
1453                return READ_ERR;
1454            }
1455            break;
1456
1457        case BT_FEXT_HAVE_ALL:
1458            dbgmsg( msgs, "Got a BT_FEXT_HAVE_ALL" );
1459            if( fext ) {
1460                tr_bitfieldAddRange( msgs->peer->have, 0, msgs->torrent->info.pieceCount );
1461                updatePeerProgress( msgs );
1462            } else {
1463                fireError( msgs, EMSGSIZE );
1464                return READ_ERR;
1465            }
1466            break;
1467
1468        case BT_FEXT_HAVE_NONE:
1469            dbgmsg( msgs, "Got a BT_FEXT_HAVE_NONE" );
1470            if( fext ) {
1471                tr_bitfieldClear( msgs->peer->have );
1472                updatePeerProgress( msgs );
1473            } else {
1474                fireError( msgs, EMSGSIZE );
1475                return READ_ERR;
1476            }
1477            break;
1478
1479        case BT_FEXT_REJECT:
1480        {
1481            struct peer_request r;
1482            dbgmsg( msgs, "Got a BT_FEXT_REJECT" );
1483            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.index );
1484            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.offset );
1485            tr_peerIoReadUint32( msgs->peer->io, inbuf, &r.length );
1486            if( fext )
1487                reqListRemove( &msgs->clientAskedFor, &r );
1488            else {
1489                fireError( msgs, EMSGSIZE );
1490                return READ_ERR;
1491            }
1492            break;
1493        }
1494
1495        case BT_LTEP:
1496            dbgmsg( msgs, "Got a BT_LTEP" );
1497            parseLtep( msgs, msglen, inbuf );
1498            break;
1499
1500        default:
1501            dbgmsg( msgs, "peer sent us an UNKNOWN: %d", (int)id );
1502            tr_peerIoDrain( msgs->peer->io, inbuf, msglen );
1503            break;
1504    }
1505
1506    assert( msglen + 1 == msgs->incoming.length );
1507    assert( EVBUFFER_LENGTH( inbuf ) == startBufLen - msglen );
1508
1509    msgs->state = AWAITING_BT_LENGTH;
1510    return READ_NOW;
1511}
1512
1513static TR_INLINE void
1514decrementDownloadedCount( tr_peermsgs * msgs, uint32_t byteCount )
1515{
1516    tr_torrent * tor = msgs->torrent;
1517
1518    tor->downloadedCur -= MIN( tor->downloadedCur, byteCount );
1519}
1520
1521static TR_INLINE void
1522clientGotUnwantedBlock( tr_peermsgs * msgs, const struct peer_request * req )
1523{
1524    decrementDownloadedCount( msgs, req->length );
1525}
1526
1527static void
1528addPeerToBlamefield( tr_peermsgs * msgs, uint32_t index )
1529{
1530    if( !msgs->peer->blame )
1531         msgs->peer->blame = tr_bitfieldNew( msgs->torrent->info.pieceCount );
1532    tr_bitfieldAdd( msgs->peer->blame, index );
1533}
1534
1535/* returns 0 on success, or an errno on failure */
1536static int
1537clientGotBlock( tr_peermsgs *               msgs,
1538                const uint8_t *             data,
1539                const struct peer_request * req )
1540{
1541    int err;
1542    tr_torrent * tor = msgs->torrent;
1543    const tr_block_index_t block = _tr_block( tor, req->index, req->offset );
1544
1545    assert( msgs );
1546    assert( req );
1547
1548    if( req->length != tr_torBlockCountBytes( msgs->torrent, block ) ) {
1549        dbgmsg( msgs, "wrong block size -- expected %u, got %d",
1550                tr_torBlockCountBytes( msgs->torrent, block ), req->length );
1551        return EMSGSIZE;
1552    }
1553
1554    /* save the block */
1555    dbgmsg( msgs, "got block %u:%u->%u", req->index, req->offset, req->length );
1556
1557    /**
1558    *** Remove the block from our `we asked for this' list
1559    **/
1560
1561    if( !reqListRemove( &msgs->clientAskedFor, req ) ) {
1562        clientGotUnwantedBlock( msgs, req );
1563        dbgmsg( msgs, "we didn't ask for this message..." );
1564        return 0;
1565    }
1566
1567    dbgmsg( msgs, "peer has %d more blocks we've asked for",
1568            msgs->clientAskedFor.len );
1569
1570    /**
1571    *** Error checks
1572    **/
1573
1574    if( tr_cpBlockIsComplete( &tor->completion, block ) ) {
1575        dbgmsg( msgs, "we have this block already..." );
1576        clientGotUnwantedBlock( msgs, req );
1577        return 0;
1578    }
1579
1580    /**
1581    ***  Save the block
1582    **/
1583
1584    if(( err = tr_ioWrite( tor, req->index, req->offset, req->length, data )))
1585        return err;
1586
1587    addPeerToBlamefield( msgs, req->index );
1588    fireGotBlock( msgs, req );
1589    return 0;
1590}
1591
1592static int peerPulse( void * vmsgs );
1593
1594static void
1595didWrite( tr_peerIo * io UNUSED, size_t bytesWritten, int wasPieceData, void * vmsgs )
1596{
1597    tr_peermsgs * msgs = vmsgs;
1598    firePeerGotData( msgs, bytesWritten, wasPieceData );
1599    peerPulse( msgs );
1600}
1601
1602static ReadState
1603canRead( tr_peerIo * io, void * vmsgs, size_t * piece )
1604{
1605    ReadState         ret;
1606    tr_peermsgs *     msgs = vmsgs;
1607    struct evbuffer * in = tr_peerIoGetReadBuffer( io );
1608    const size_t      inlen = EVBUFFER_LENGTH( in );
1609
1610    dbgmsg( msgs, "canRead: inlen is %zu, msgs->state is %d", inlen, msgs->state );
1611
1612    if( !inlen )
1613    {
1614        ret = READ_LATER;
1615    }
1616    else if( msgs->state == AWAITING_BT_PIECE )
1617    {
1618        ret = inlen ? readBtPiece( msgs, in, inlen, piece ) : READ_LATER;
1619    }
1620    else switch( msgs->state )
1621    {
1622        case AWAITING_BT_LENGTH:
1623            ret = readBtLength ( msgs, in, inlen ); break;
1624
1625        case AWAITING_BT_ID:
1626            ret = readBtId     ( msgs, in, inlen ); break;
1627
1628        case AWAITING_BT_MESSAGE:
1629            ret = readBtMessage( msgs, in, inlen ); break;
1630
1631        default:
1632            ret = READ_ERR;
1633            assert( 0 );
1634    }
1635
1636    dbgmsg( msgs, "canRead: ret is %d", (int)ret );
1637
1638    /* log the raw data that was read */
1639    if( ( ret != READ_ERR ) && ( EVBUFFER_LENGTH( in ) != inlen ) )
1640        fireClientGotData( msgs, inlen - EVBUFFER_LENGTH( in ), FALSE );
1641
1642    return ret;
1643}
1644
1645/**
1646***
1647**/
1648
1649static int
1650ratePulse( tr_peermsgs * msgs, uint64_t now )
1651{
1652    const double rateToClient = tr_peerGetPieceSpeed( msgs->peer, now, TR_PEER_TO_CLIENT );
1653    const int seconds = 10;
1654    const int floor = 8;
1655    const int estimatedBlocksInPeriod = ( rateToClient * seconds * 1024 ) / msgs->torrent->blockSize;
1656
1657    msgs->maxActiveRequests = floor + estimatedBlocksInPeriod;
1658
1659    if( msgs->reqq > 0 )
1660        msgs->maxActiveRequests = MIN( msgs->maxActiveRequests, msgs->reqq );
1661
1662    return TRUE;
1663}
1664
1665static size_t
1666fillOutputBuffer( tr_peermsgs * msgs, time_t now )
1667{
1668    size_t bytesWritten = 0;
1669    struct peer_request req;
1670    const tr_bool haveMessages = EVBUFFER_LENGTH( msgs->outMessages ) != 0;
1671    const tr_bool fext = tr_peerIoSupportsFEXT( msgs->peer->io );
1672
1673    /**
1674    ***  Protocol messages
1675    **/
1676
1677    if( haveMessages && !msgs->outMessagesBatchedAt ) /* fresh batch */
1678    {
1679        dbgmsg( msgs, "started an outMessages batch (length is %zu)", EVBUFFER_LENGTH( msgs->outMessages ) );
1680        msgs->outMessagesBatchedAt = now;
1681    }
1682    else if( haveMessages && ( ( now - msgs->outMessagesBatchedAt ) >= msgs->outMessagesBatchPeriod ) )
1683    {
1684        const size_t len = EVBUFFER_LENGTH( msgs->outMessages );
1685        /* flush the protocol messages */
1686        dbgmsg( msgs, "flushing outMessages... to %p (length is %zu)", msgs->peer->io, len );
1687        tr_peerIoWriteBuf( msgs->peer->io, msgs->outMessages, FALSE );
1688        msgs->clientSentAnythingAt = now;
1689        msgs->outMessagesBatchedAt = 0;
1690        msgs->outMessagesBatchPeriod = LOW_PRIORITY_INTERVAL_SECS;
1691        bytesWritten +=  len;
1692    }
1693
1694    /**
1695    ***  Blocks
1696    **/
1697
1698    if( ( tr_peerIoGetWriteBufferSpace( msgs->peer->io, now ) >= msgs->torrent->blockSize )
1699        && popNextRequest( msgs, &req ) )
1700    {
1701        if( requestIsValid( msgs, &req )
1702            && tr_cpPieceIsComplete( &msgs->torrent->completion, req.index ) )
1703        {
1704            int err;
1705            static uint8_t buf[MAX_BLOCK_SIZE];
1706
1707            /* send a block */
1708            if(( err = tr_ioRead( msgs->torrent, req.index, req.offset, req.length, buf ))) {
1709                fireError( msgs, err );
1710                bytesWritten = 0;
1711                msgs = NULL;
1712            } else {
1713                tr_peerIo * io = msgs->peer->io;
1714                struct evbuffer * out = tr_getBuffer( );
1715                dbgmsg( msgs, "sending block %u:%u->%u", req.index, req.offset, req.length );
1716                tr_peerIoWriteUint32( io, out, sizeof( uint8_t ) + 2 * sizeof( uint32_t ) + req.length );
1717                tr_peerIoWriteUint8 ( io, out, BT_PIECE );
1718                tr_peerIoWriteUint32( io, out, req.index );
1719                tr_peerIoWriteUint32( io, out, req.offset );
1720                tr_peerIoWriteBytes ( io, out, buf, req.length );
1721                tr_peerIoWriteBuf( io, out, TRUE );
1722                bytesWritten += EVBUFFER_LENGTH( out );
1723                msgs->clientSentAnythingAt = now;
1724                tr_releaseBuffer( out );
1725            }
1726        }
1727        else if( fext ) /* peer needs a reject message */
1728        {
1729            protocolSendReject( msgs, &req );
1730        }
1731    }
1732
1733    /**
1734    ***  Keepalive
1735    **/
1736
1737    if( ( msgs != NULL )
1738        && ( msgs->clientSentAnythingAt != 0 )
1739        && ( ( now - msgs->clientSentAnythingAt ) > KEEPALIVE_INTERVAL_SECS ) )
1740    {
1741        dbgmsg( msgs, "sending a keepalive message" );
1742        tr_peerIoWriteUint32( msgs->peer->io, msgs->outMessages, 0 );
1743        pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
1744    }
1745
1746    return bytesWritten;
1747}
1748
1749static int
1750peerPulse( void * vmsgs )
1751{
1752    tr_peermsgs * msgs = vmsgs;
1753    const time_t  now = time( NULL );
1754
1755    ratePulse( msgs, now );
1756
1757    pumpRequestQueue( msgs, now );
1758    expireOldRequests( msgs, now );
1759
1760    for( ;; )
1761        if( fillOutputBuffer( msgs, now ) < 1 )
1762            break;
1763
1764    return TRUE; /* loop forever */
1765}
1766
1767void
1768tr_peerMsgsPulse( tr_peermsgs * msgs )
1769{
1770    if( msgs != NULL )
1771        peerPulse( msgs );
1772}
1773
1774static void
1775gotError( tr_peerIo  * io UNUSED,
1776          short        what,
1777          void       * vmsgs )
1778{
1779    if( what & EVBUFFER_TIMEOUT )
1780        dbgmsg( vmsgs, "libevent got a timeout, what=%hd", what );
1781    if( what & ( EVBUFFER_EOF | EVBUFFER_ERROR ) )
1782        dbgmsg( vmsgs, "libevent got an error! what=%hd, errno=%d (%s)",
1783               what, errno, tr_strerror( errno ) );
1784    fireError( vmsgs, ENOTCONN );
1785}
1786
1787static void
1788sendBitfield( tr_peermsgs * msgs )
1789{
1790    struct evbuffer * out = msgs->outMessages;
1791    tr_bitfield *     field;
1792    tr_piece_index_t  lazyPieces[LAZY_PIECE_COUNT];
1793    size_t            i;
1794    size_t            lazyCount = 0;
1795
1796    field = tr_bitfieldDup( tr_cpPieceBitfield( &msgs->torrent->completion ) );
1797
1798    if( tr_sessionIsLazyBitfieldEnabled( msgs->session ) )
1799    {
1800        /** Lazy bitfields aren't a high priority or secure, so I'm opting for
1801            speed over a truly random sample -- let's limit the pool size to
1802            the first 1000 pieces so large torrents don't bog things down */
1803        size_t poolSize;
1804        const size_t maxPoolSize = MIN( msgs->torrent->info.pieceCount, 1000 );
1805        tr_piece_index_t * pool = tr_new( tr_piece_index_t, maxPoolSize );
1806
1807        /* build the pool */
1808        for( i=poolSize=0; i<maxPoolSize; ++i )
1809            if( tr_bitfieldHas( field, i ) )
1810                pool[poolSize++] = i;
1811
1812        /* pull random piece indices from the pool */
1813        while( ( poolSize > 0 ) && ( lazyCount < LAZY_PIECE_COUNT ) )
1814        {
1815            const int pos = tr_cryptoWeakRandInt( poolSize );
1816            const tr_piece_index_t piece = pool[pos];
1817            tr_bitfieldRem( field, piece );
1818            lazyPieces[lazyCount++] = piece;
1819            pool[pos] = pool[--poolSize];
1820        }
1821
1822        /* cleanup */
1823        tr_free( pool );
1824    }
1825
1826    tr_peerIoWriteUint32( msgs->peer->io, out,
1827                          sizeof( uint8_t ) + field->byteCount );
1828    tr_peerIoWriteUint8 ( msgs->peer->io, out, BT_BITFIELD );
1829    tr_peerIoWriteBytes ( msgs->peer->io, out, field->bits, field->byteCount );
1830    dbgmsg( msgs, "sending bitfield... outMessage size is now %zu",
1831            EVBUFFER_LENGTH( out ) );
1832    pokeBatchPeriod( msgs, IMMEDIATE_PRIORITY_INTERVAL_SECS );
1833
1834    for( i = 0; i < lazyCount; ++i )
1835        protocolSendHave( msgs, lazyPieces[i] );
1836
1837    tr_bitfieldFree( field );
1838}
1839
1840static void
1841tellPeerWhatWeHave( tr_peermsgs * msgs )
1842{
1843    const tr_bool fext = tr_peerIoSupportsFEXT( msgs->peer->io );
1844
1845    if( fext && ( tr_cpGetStatus( &msgs->torrent->completion ) == TR_SEED ) )
1846    {
1847        protocolSendHaveAll( msgs );
1848    }
1849    else if( fext && ( tr_cpHaveValid( &msgs->torrent->completion ) == 0 ) )
1850    {
1851        protocolSendHaveNone( msgs );
1852    }
1853    else
1854    {
1855        sendBitfield( msgs );
1856    }
1857}
1858
1859/**
1860***
1861**/
1862
1863/* some peers give us error messages if we send
1864   more than this many peers in a single pex message
1865   http://wiki.theory.org/BitTorrentPeerExchangeConventions */
1866#define MAX_PEX_ADDED 50
1867#define MAX_PEX_DROPPED 50
1868
1869typedef struct
1870{
1871    tr_pex *  added;
1872    tr_pex *  dropped;
1873    tr_pex *  elements;
1874    int       addedCount;
1875    int       droppedCount;
1876    int       elementCount;
1877}
1878PexDiffs;
1879
1880static void
1881pexAddedCb( void * vpex,
1882            void * userData )
1883{
1884    PexDiffs * diffs = userData;
1885    tr_pex *   pex = vpex;
1886
1887    if( diffs->addedCount < MAX_PEX_ADDED )
1888    {
1889        diffs->added[diffs->addedCount++] = *pex;
1890        diffs->elements[diffs->elementCount++] = *pex;
1891    }
1892}
1893
1894static TR_INLINE void
1895pexDroppedCb( void * vpex,
1896              void * userData )
1897{
1898    PexDiffs * diffs = userData;
1899    tr_pex *   pex = vpex;
1900
1901    if( diffs->droppedCount < MAX_PEX_DROPPED )
1902    {
1903        diffs->dropped[diffs->droppedCount++] = *pex;
1904    }
1905}
1906
1907static TR_INLINE void
1908pexElementCb( void * vpex,
1909              void * userData )
1910{
1911    PexDiffs * diffs = userData;
1912    tr_pex * pex = vpex;
1913
1914    diffs->elements[diffs->elementCount++] = *pex;
1915}
1916
1917static void
1918sendPex( tr_peermsgs * msgs )
1919{
1920    if( msgs->peerSupportsPex && tr_torrentAllowsPex( msgs->torrent ) )
1921    {
1922        PexDiffs diffs;
1923        PexDiffs diffs6;
1924        tr_pex * newPex = NULL;
1925        tr_pex * newPex6 = NULL;
1926        const int newCount = tr_peerMgrGetPeers( msgs->torrent, &newPex, TR_AF_INET );
1927        const int newCount6 = tr_peerMgrGetPeers( msgs->torrent, &newPex6, TR_AF_INET6 );
1928
1929        /* build the diffs */
1930        diffs.added = tr_new( tr_pex, newCount );
1931        diffs.addedCount = 0;
1932        diffs.dropped = tr_new( tr_pex, msgs->pexCount );
1933        diffs.droppedCount = 0;
1934        diffs.elements = tr_new( tr_pex, newCount + msgs->pexCount );
1935        diffs.elementCount = 0;
1936        tr_set_compare( msgs->pex, msgs->pexCount,
1937                        newPex, newCount,
1938                        tr_pexCompare, sizeof( tr_pex ),
1939                        pexDroppedCb, pexAddedCb, pexElementCb, &diffs );
1940        diffs6.added = tr_new( tr_pex, newCount6 );
1941        diffs6.addedCount = 0;
1942        diffs6.dropped = tr_new( tr_pex, msgs->pexCount6 );
1943        diffs6.droppedCount = 0;
1944        diffs6.elements = tr_new( tr_pex, newCount6 + msgs->pexCount6 );
1945        diffs6.elementCount = 0;
1946        tr_set_compare( msgs->pex6, msgs->pexCount6,
1947                        newPex6, newCount6,
1948                        tr_pexCompare, sizeof( tr_pex ),
1949                        pexDroppedCb, pexAddedCb, pexElementCb, &diffs6 );
1950        dbgmsg(
1951            msgs,
1952            "pex: old peer count %d, new peer count %d, added %d, removed %d",
1953            msgs->pexCount, newCount + newCount6,
1954            diffs.addedCount + diffs6.addedCount,
1955            diffs.droppedCount + diffs6.droppedCount );
1956
1957        if( !diffs.addedCount && !diffs.droppedCount && !diffs6.addedCount &&
1958            !diffs6.droppedCount )
1959        {
1960            tr_free( diffs.elements );
1961            tr_free( diffs6.elements );
1962        }
1963        else
1964        {
1965            int  i;
1966            tr_benc val;
1967            char * benc;
1968            int bencLen;
1969            uint8_t * tmp, *walk;
1970            tr_peerIo       * io  = msgs->peer->io;
1971            struct evbuffer * out = msgs->outMessages;
1972
1973            /* update peer */
1974            tr_free( msgs->pex );
1975            msgs->pex = diffs.elements;
1976            msgs->pexCount = diffs.elementCount;
1977            tr_free( msgs->pex6 );
1978            msgs->pex6 = diffs6.elements;
1979            msgs->pexCount6 = diffs6.elementCount;
1980
1981            /* build the pex payload */
1982            tr_bencInitDict( &val, 3 ); /* ipv6 support: left as 3:
1983                                         * speed vs. likelihood? */
1984
1985            /* "added" */
1986            tmp = walk = tr_new( uint8_t, diffs.addedCount * 6 );
1987            for( i = 0; i < diffs.addedCount; ++i )
1988            {
1989                tr_suspectAddress( &diffs.added[i].addr, "pex" );
1990                memcpy( walk, &diffs.added[i].addr.addr, 4 ); walk += 4;
1991                memcpy( walk, &diffs.added[i].port, 2 ); walk += 2;
1992            }
1993            assert( ( walk - tmp ) == diffs.addedCount * 6 );
1994            tr_bencDictAddRaw( &val, "added", tmp, walk - tmp );
1995            tr_free( tmp );
1996
1997            /* "added.f" */
1998            tmp = walk = tr_new( uint8_t, diffs.addedCount );
1999            for( i = 0; i < diffs.addedCount; ++i )
2000                *walk++ = diffs.added[i].flags;
2001            assert( ( walk - tmp ) == diffs.addedCount );
2002            tr_bencDictAddRaw( &val, "added.f", tmp, walk - tmp );
2003            tr_free( tmp );
2004
2005            /* "dropped" */
2006            tmp = walk = tr_new( uint8_t, diffs.droppedCount * 6 );
2007            for( i = 0; i < diffs.droppedCount; ++i )
2008            {
2009                memcpy( walk, &diffs.dropped[i].addr.addr, 4 ); walk += 4;
2010                memcpy( walk, &diffs.dropped[i].port, 2 ); walk += 2;
2011            }
2012            assert( ( walk - tmp ) == diffs.droppedCount * 6 );
2013            tr_bencDictAddRaw( &val, "dropped", tmp, walk - tmp );
2014            tr_free( tmp );
2015           
2016            /* "added6" */
2017            tmp = walk = tr_new( uint8_t, diffs6.addedCount * 18 );
2018            for( i = 0; i < diffs6.addedCount; ++i )
2019            {
2020                tr_suspectAddress( &diffs6.added[i].addr, "pex6" );
2021                memcpy( walk, &diffs6.added[i].addr.addr.addr6.s6_addr, 16 );
2022                walk += 16;
2023                memcpy( walk, &diffs6.added[i].port, 2 );
2024                walk += 2;
2025            }
2026            assert( ( walk - tmp ) == diffs6.addedCount * 18 );
2027            tr_bencDictAddRaw( &val, "added6", tmp, walk - tmp );
2028            tr_free( tmp );
2029           
2030            /* "added6.f" */
2031            tmp = walk = tr_new( uint8_t, diffs6.addedCount );
2032            for( i = 0; i < diffs6.addedCount; ++i )
2033                *walk++ = diffs6.added[i].flags;
2034            assert( ( walk - tmp ) == diffs6.addedCount );
2035            tr_bencDictAddRaw( &val, "added6.f", tmp, walk - tmp );
2036            tr_free( tmp );
2037           
2038            /* "dropped6" */
2039            tmp = walk = tr_new( uint8_t, diffs6.droppedCount * 18 );
2040            for( i = 0; i < diffs6.droppedCount; ++i )
2041            {
2042                memcpy( walk, &diffs6.dropped[i].addr.addr.addr6.s6_addr, 16 );
2043                walk += 16;
2044                memcpy( walk, &diffs6.dropped[i].port, 2 );
2045                walk += 2;
2046            }
2047            assert( ( walk - tmp ) == diffs6.droppedCount * 18);
2048            tr_bencDictAddRaw( &val, "dropped6", tmp, walk - tmp );
2049            tr_free( tmp );
2050
2051            /* write the pex message */
2052            benc = tr_bencSave( &val, &bencLen );
2053            tr_peerIoWriteUint32( io, out, 2 * sizeof( uint8_t ) + bencLen );
2054            tr_peerIoWriteUint8 ( io, out, BT_LTEP );
2055            tr_peerIoWriteUint8 ( io, out, msgs->ut_pex_id );
2056            tr_peerIoWriteBytes ( io, out, benc, bencLen );
2057            pokeBatchPeriod( msgs, HIGH_PRIORITY_INTERVAL_SECS );
2058            dbgmsg( msgs, "sending a pex message; outMessage size is now %zu", EVBUFFER_LENGTH( out ) );
2059            dbgOutMessageLen( msgs );
2060
2061            tr_free( benc );
2062            tr_bencFree( &val );
2063        }
2064
2065        /* cleanup */
2066        tr_free( diffs.added );
2067        tr_free( diffs.dropped );
2068        tr_free( newPex );
2069        tr_free( diffs6.added );
2070        tr_free( diffs6.dropped );
2071        tr_free( newPex6 );
2072
2073        msgs->clientSentPexAt = time( NULL );
2074    }
2075}
2076
2077static TR_INLINE int
2078pexPulse( void * vpeer )
2079{
2080    sendPex( vpeer );
2081    return TRUE;
2082}
2083
2084/**
2085***
2086**/
2087
2088tr_peermsgs*
2089tr_peerMsgsNew( struct tr_torrent * torrent,
2090                struct tr_peer    * peer,
2091                tr_delivery_func    func,
2092                void              * userData,
2093                tr_publisher_tag  * setme )
2094{
2095    tr_peermsgs * m;
2096
2097    assert( peer );
2098    assert( peer->io );
2099
2100    m = tr_new0( tr_peermsgs, 1 );
2101    m->publisher = TR_PUBLISHER_INIT;
2102    m->peer = peer;
2103    m->session = torrent->session;
2104    m->torrent = torrent;
2105    m->peer->clientIsChoked = 1;
2106    m->peer->peerIsChoked = 1;
2107    m->peer->clientIsInterested = 0;
2108    m->peer->peerIsInterested = 0;
2109    m->peer->have = tr_bitfieldNew( torrent->info.pieceCount );
2110    m->state = AWAITING_BT_LENGTH;
2111    m->pexTimer = tr_timerNew( m->session, pexPulse, m, PEX_INTERVAL );
2112    m->outMessages = evbuffer_new( );
2113    m->outMessagesBatchedAt = 0;
2114    m->outMessagesBatchPeriod = LOW_PRIORITY_INTERVAL_SECS;
2115    m->incoming.block = evbuffer_new( );
2116    m->peerAskedFor = REQUEST_LIST_INIT;
2117    m->clientAskedFor = REQUEST_LIST_INIT;
2118    m->clientWillAskFor = REQUEST_LIST_INIT;
2119    peer->msgs = m;
2120
2121    *setme = tr_publisherSubscribe( &m->publisher, func, userData );
2122
2123    if( tr_peerIoSupportsLTEP( peer->io ) )
2124        sendLtepHandshake( m );
2125
2126    tellPeerWhatWeHave( m );
2127
2128    tr_peerIoSetIOFuncs( m->peer->io, canRead, didWrite, gotError, m );
2129    ratePulse( m, tr_date() );
2130
2131    return m;
2132}
2133
2134void
2135tr_peerMsgsFree( tr_peermsgs* msgs )
2136{
2137    if( msgs )
2138    {
2139        tr_timerFree( &msgs->pexTimer );
2140        tr_publisherDestruct( &msgs->publisher );
2141        reqListClear( &msgs->clientWillAskFor );
2142        reqListClear( &msgs->clientAskedFor );
2143        reqListClear( &msgs->peerAskedFor );
2144
2145        evbuffer_free( msgs->incoming.block );
2146        evbuffer_free( msgs->outMessages );
2147        tr_free( msgs->pex6 );
2148        tr_free( msgs->pex );
2149
2150        memset( msgs, ~0, sizeof( tr_peermsgs ) );
2151        tr_free( msgs );
2152    }
2153}
2154
2155void
2156tr_peerMsgsUnsubscribe( tr_peermsgs *    peer,
2157                        tr_publisher_tag tag )
2158{
2159    tr_publisherUnsubscribe( &peer->publisher, tag );
2160}
2161
Note: See TracBrowser for help on using the repository browser.