source: trunk/libtransmission/peer-io.c @ 11913

Last change on this file since 11913 was 11913, checked in by jch, 11 years ago

Shutdown UTP socket on short write.

  • Property svn:keywords set to Date Rev Author Id
File size: 30.5 KB
Line 
1/*
2 * This file Copyright (C) Mnemosyne LLC
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-io.c 11913 2011-02-18 00:24:30Z jch $
11 */
12
13#include <assert.h>
14#include <errno.h>
15#include <limits.h> /* INT_MAX */
16#include <string.h>
17#include <stdio.h>
18#include <unistd.h>
19
20#ifdef WIN32
21 #include <winsock2.h>
22#else
23 #include <arpa/inet.h> /* inet_ntoa */
24#endif
25
26#include <event2/event.h>
27#include <event2/bufferevent.h>
28#include "utp.h"
29
30#include "transmission.h"
31#include "session.h"
32#include "bandwidth.h"
33#include "crypto.h"
34#include "list.h"
35#include "net.h"
36#include "peer-common.h" /* MAX_BLOCK_SIZE */
37#include "peer-io.h"
38#include "trevent.h" /* tr_runInEventThread() */
39#include "utils.h"
40
41#define MAGIC_NUMBER 206745
42
43#ifdef WIN32
44 #define EAGAIN       WSAEWOULDBLOCK
45 #define EINTR        WSAEINTR
46 #define EINPROGRESS  WSAEINPROGRESS
47 #define EPIPE        WSAECONNRESET
48#endif
49
50static size_t
51guessPacketOverhead( size_t d )
52{
53    /**
54     * http://sd.wareonearth.com/~phil/net/overhead/
55     *
56     * TCP over Ethernet:
57     * Assuming no header compression (e.g. not PPP)
58     * Add 20 IPv4 header or 40 IPv6 header (no options)
59     * Add 20 TCP header
60     * Add 12 bytes optional TCP timestamps
61     * Max TCP Payload data rates over ethernet are thus:
62     *  (1500-40)/(38+1500) = 94.9285 %  IPv4, minimal headers
63     *  (1500-52)/(38+1500) = 94.1482 %  IPv4, TCP timestamps
64     *  (1500-52)/(42+1500) = 93.9040 %  802.1q, IPv4, TCP timestamps
65     *  (1500-60)/(38+1500) = 93.6281 %  IPv6, minimal headers
66     *  (1500-72)/(38+1500) = 92.8479 %  IPv6, TCP timestamps
67     *  (1500-72)/(42+1500) = 92.6070 %  802.1q, IPv6, ICP timestamps
68     */
69    const double assumed_payload_data_rate = 94.0;
70
71    return (unsigned int)( d * ( 100.0 / assumed_payload_data_rate ) - d );
72}
73
74/**
75***
76**/
77
78#define dbgmsg( io, ... ) \
79    do { \
80        if( tr_deepLoggingIsActive( ) ) \
81            tr_deepLog( __FILE__, __LINE__, tr_peerIoGetAddrStr( io ), __VA_ARGS__ ); \
82    } while( 0 )
83
84struct tr_datatype
85{
86    tr_bool  isPieceData;
87    size_t   length;
88};
89
90
91/***
92****
93***/
94
95static void
96didWriteWrapper( tr_peerIo * io, unsigned int bytes_transferred )
97{
98     while( bytes_transferred && tr_isPeerIo( io ) )
99     {
100        struct tr_datatype * next = io->outbuf_datatypes->data;
101
102        const unsigned int payload = MIN( next->length, bytes_transferred );
103        const unsigned int overhead = guessPacketOverhead( payload );
104        const uint64_t now = tr_sessionGetTimeMsec( io->session );
105
106        tr_bandwidthUsed( &io->bandwidth, TR_UP, payload, next->isPieceData, now );
107
108        if( overhead > 0 )
109            tr_bandwidthUsed( &io->bandwidth, TR_UP, overhead, FALSE, now );
110
111        if( io->didWrite )
112            io->didWrite( io, payload, next->isPieceData, io->userData );
113
114        if( tr_isPeerIo( io ) )
115        {
116            bytes_transferred -= payload;
117            next->length -= payload;
118            if( !next->length ) {
119                tr_list_pop_front( &io->outbuf_datatypes );
120                tr_free( next );
121            }
122        }
123    }
124}
125
126static void
127canReadWrapper( tr_peerIo * io )
128{
129    tr_bool err = 0;
130    tr_bool done = 0;
131    tr_session * session;
132
133    dbgmsg( io, "canRead" );
134
135    assert( tr_isPeerIo( io ) );
136    assert( tr_isSession( io->session ) );
137    tr_peerIoRef( io );
138
139    session = io->session;
140
141    /* try to consume the input buffer */
142    if( io->canRead )
143    {
144        const uint64_t now = tr_sessionGetTimeMsec( io->session );
145
146        tr_sessionLock( session );
147
148        while( !done && !err )
149        {
150            size_t piece = 0;
151            const size_t oldLen = evbuffer_get_length( io->inbuf );
152            const int ret = io->canRead( io, io->userData, &piece );
153            const size_t used = oldLen - evbuffer_get_length( io->inbuf );
154            const unsigned int overhead = guessPacketOverhead( used );
155
156            assert( tr_isPeerIo( io ) );
157
158            if( piece || (piece!=used) )
159            {
160                if( piece )
161                    tr_bandwidthUsed( &io->bandwidth, TR_DOWN, piece, TRUE, now );
162
163                if( used != piece )
164                    tr_bandwidthUsed( &io->bandwidth, TR_DOWN, used - piece, FALSE, now );
165            }
166
167            if( overhead > 0 )
168                tr_bandwidthUsed( &io->bandwidth, TR_UP, overhead, FALSE, now );
169
170            switch( ret )
171            {
172                case READ_NOW:
173                    if( evbuffer_get_length( io->inbuf ) )
174                        continue;
175                    done = 1;
176                    break;
177
178                case READ_LATER:
179                    done = 1;
180                    break;
181
182                case READ_ERR:
183                    err = 1;
184                    break;
185            }
186
187            assert( tr_isPeerIo( io ) );
188        }
189
190        tr_sessionUnlock( session );
191    }
192
193    assert( tr_isPeerIo( io ) );
194    tr_peerIoUnref( io );
195}
196
197tr_bool
198tr_isPeerIo( const tr_peerIo * io )
199{
200    return ( io != NULL )
201        && ( io->magicNumber == MAGIC_NUMBER )
202        && ( io->refCount >= 0 )
203        && ( tr_isBandwidth( &io->bandwidth ) )
204        && ( tr_isAddress( &io->addr ) );
205}
206
207static void
208event_read_cb( int fd, short event UNUSED, void * vio )
209{
210    int res;
211    int e;
212    tr_peerIo * io = vio;
213
214    /* Limit the input buffer to 256K, so it doesn't grow too large */
215    unsigned int howmuch;
216    unsigned int curlen;
217    const tr_direction dir = TR_DOWN;
218    const unsigned int max = 256 * 1024;
219
220    assert( tr_isPeerIo( io ) );
221    assert( io->socket >= 0 );
222
223    io->pendingEvents &= ~EV_READ;
224
225    curlen = evbuffer_get_length( io->inbuf );
226    howmuch = curlen >= max ? 0 : max - curlen;
227    howmuch = tr_bandwidthClamp( &io->bandwidth, TR_DOWN, howmuch );
228
229    dbgmsg( io, "libevent says this peer is ready to read" );
230
231    /* if we don't have any bandwidth left, stop reading */
232    if( howmuch < 1 ) {
233        tr_peerIoSetEnabled( io, dir, FALSE );
234        return;
235    }
236
237    EVUTIL_SET_SOCKET_ERROR( 0 );
238    res = evbuffer_read( io->inbuf, fd, (int)howmuch );
239    e = EVUTIL_SOCKET_ERROR( );
240
241    if( res > 0 )
242    {
243        tr_peerIoSetEnabled( io, dir, TRUE );
244
245        /* Invoke the user callback - must always be called last */
246        canReadWrapper( io );
247    }
248    else
249    {
250        char errstr[512];
251        short what = BEV_EVENT_READING;
252
253        if( res == 0 ) /* EOF */
254            what |= BEV_EVENT_EOF;
255        else if( res == -1 ) {
256            if( e == EAGAIN || e == EINTR ) {
257                tr_peerIoSetEnabled( io, dir, TRUE );
258                return;
259            }
260            what |= BEV_EVENT_ERROR;
261        }
262
263        tr_net_strerror( errstr, sizeof( errstr ), e );
264        dbgmsg( io, "event_read_cb got an error. res is %d, what is %hd, errno is %d (%s)", res, what, e, errstr );
265
266        if( io->gotError != NULL )
267            io->gotError( io, what, io->userData );
268    }
269}
270
271static int
272tr_evbuffer_write( tr_peerIo * io, int fd, size_t howmuch )
273{
274    int e;
275    int n;
276    char errstr[256];
277
278    EVUTIL_SET_SOCKET_ERROR( 0 );
279    n = evbuffer_write_atmost( io->outbuf, fd, howmuch );
280    e = EVUTIL_SOCKET_ERROR( );
281    dbgmsg( io, "wrote %d to peer (%s)", n, (n==-1?tr_net_strerror(errstr,sizeof(errstr),e):"") );
282
283    return n;
284}
285
286static void
287event_write_cb( int fd, short event UNUSED, void * vio )
288{
289    int res = 0;
290    int e;
291    short what = BEV_EVENT_WRITING;
292    tr_peerIo * io = vio;
293    size_t howmuch;
294    const tr_direction dir = TR_UP;
295
296    assert( tr_isPeerIo( io ) );
297    assert( io->socket >= 0 );
298
299    io->pendingEvents &= ~EV_WRITE;
300
301    dbgmsg( io, "libevent says this peer is ready to write" );
302
303    /* Write as much as possible, since the socket is non-blocking, write() will
304     * return if it can't write any more data without blocking */
305    howmuch = tr_bandwidthClamp( &io->bandwidth, dir, evbuffer_get_length( io->outbuf ) );
306
307    /* if we don't have any bandwidth left, stop writing */
308    if( howmuch < 1 ) {
309        tr_peerIoSetEnabled( io, dir, FALSE );
310        return;
311    }
312
313    EVUTIL_SET_SOCKET_ERROR( 0 );
314    res = tr_evbuffer_write( io, fd, howmuch );
315    e = EVUTIL_SOCKET_ERROR( );
316
317    if (res == -1) {
318        if (!e || e == EAGAIN || e == EINTR || e == EINPROGRESS)
319            goto reschedule;
320        /* error case */
321        what |= BEV_EVENT_ERROR;
322    } else if (res == 0) {
323        /* eof case */
324        what |= BEV_EVENT_EOF;
325    }
326    if (res <= 0)
327        goto error;
328
329    if( evbuffer_get_length( io->outbuf ) )
330        tr_peerIoSetEnabled( io, dir, TRUE );
331
332    didWriteWrapper( io, res );
333    return;
334
335 reschedule:
336    if( evbuffer_get_length( io->outbuf ) )
337        tr_peerIoSetEnabled( io, dir, TRUE );
338    return;
339
340 error:
341
342    dbgmsg( io, "event_write_cb got an error. res is %d, what is %hd, errno is %d (%s)", res, what, e, strerror( e ) );
343
344    if( io->gotError != NULL )
345        io->gotError( io, what, io->userData );
346}
347
348/**
349***
350**/
351
352static void
353maybeSetCongestionAlgorithm( int socket, const char * algorithm )
354{
355    if( algorithm && *algorithm )
356    {
357        const int rc = tr_netSetCongestionControl( socket, algorithm );
358
359        if( rc < 0 )
360            tr_ninf( "Net", "Can't set congestion control algorithm '%s': %s",
361                     algorithm, tr_strerror( errno ));
362    }
363}
364
365/* UTP callbacks */
366
367static void
368utp_on_read(void *closure, const unsigned char *buf, size_t buflen)
369{
370    int rc;
371    tr_peerIo *io = (tr_peerIo *)closure;
372    assert( tr_isPeerIo( io ) );
373
374    tr_ndbg( "UTP", "On read: %ld", (long)buflen );
375
376    rc = evbuffer_add( io->inbuf, buf, buflen );
377    if( rc < 0 ) {
378        tr_nerr( "UTP", "On read evbuffer_add" );
379        UTP_Close( io->utp_socket );
380        return;
381    }
382
383    tr_peerIoSetEnabled( io, TR_DOWN, TRUE );
384    canReadWrapper( io );
385}
386
387static void
388utp_on_write(void *closure, unsigned char *buf, size_t buflen)
389{
390    tr_peerIo *io = (tr_peerIo *)closure;
391    int rc;
392
393    assert( tr_isPeerIo( io ) );
394    tr_ndbg( "UTP", "On write: %ld", (long)buflen );
395
396    rc = evbuffer_remove( io->outbuf, buf, buflen );
397    if( rc < (long)buflen ) {
398        tr_nerr( "UTP", "Short write: %d < %ld", rc, (long)buflen);
399        UTP_Close( io->utp_socket );
400    }
401}
402
403static size_t
404utp_get_rb_size(void *closure)
405{
406    tr_peerIo *io = (tr_peerIo *)closure;
407    assert( tr_isPeerIo( io ) );
408
409    tr_ndbg( "UTP", "Get RB size" );
410    return 0;
411}
412
413static void
414utp_on_state_change(void *closure, int state)
415{
416    tr_peerIo *io = (tr_peerIo *)closure;
417    assert( tr_isPeerIo( io ) );
418
419    tr_ndbg( "UTP", "On state change: %d", state );
420
421    if( state == UTP_STATE_CONNECT || state == UTP_STATE_WRITABLE ) {
422        size_t count = evbuffer_get_length( io->outbuf );
423        if( count > 0 )
424            UTP_Write( io->utp_socket, count );
425    } else if( state == UTP_STATE_EOF ) {
426        if( io->gotError )
427            io->gotError( io, BEV_EVENT_EOF, io->userData );
428    } else if( state == UTP_STATE_DESTROYING ) {
429        tr_nerr( "UTP", "Impossible state UTP_STATE_DESTROYING" );
430        return;
431    } else {
432        tr_nerr( "UTP", "Unknown state %d", state );
433    }
434}
435
436static void
437utp_on_error(void *closure, int errcode)
438{
439    tr_peerIo *io = (tr_peerIo *)closure;
440    assert( tr_isPeerIo( io ) );
441
442    tr_ndbg( "UTP", "Error callback: %s", tr_strerror( errcode ) );
443
444    if( io->gotError ) {
445        errno = errcode;
446        io->gotError( io, BEV_EVENT_ERROR, io->userData );
447    }
448}
449
450static void
451utp_on_overhead(void *closure, bool send, size_t count, int type)
452{
453    tr_peerIo *io = (tr_peerIo *)closure;
454    assert( tr_isPeerIo( io ) );
455
456    tr_ndbg( "UTP", "On overhead: %d %ld %d", (int)send, (long)count, type );
457}
458
459static struct UTPFunctionTable utp_function_table = {
460    .on_read = utp_on_read,
461    .on_write = utp_on_write,
462    .get_rb_size = utp_get_rb_size,
463    .on_state = utp_on_state_change,
464    .on_error = utp_on_error,
465    .on_overhead = utp_on_overhead
466};
467
468/* Dummy UTP callbacks. */
469/* We switch a UTP socket to use these after the associated peerIo has been
470   destroyed -- see io_dtor. */
471
472static void
473dummy_read(void *closure, const unsigned char *buf, size_t buflen)
474{
475    abort();
476}
477
478static void
479dummy_write(void *closure, unsigned char *buf, size_t buflen)
480{
481    abort();
482}
483
484static size_t
485dummy_get_rb_size(void *closure)
486{
487    return 0;
488}
489
490static void
491dummy_on_state_change(void *closure, int state)
492{
493    return;
494}
495
496static void
497dummy_on_error(void *closure, int errcode)
498{
499    return;
500}
501
502static void
503dummy_on_overhead(void *closure, bool send, size_t count, int type)
504{
505}
506
507static struct UTPFunctionTable dummy_utp_function_table = {
508    .on_read = dummy_read,
509    .on_write = dummy_write,
510    .get_rb_size = dummy_get_rb_size,
511    .on_state = dummy_on_state_change,
512    .on_error = dummy_on_error,
513    .on_overhead = dummy_on_overhead
514};
515
516static tr_peerIo*
517tr_peerIoNew( tr_session       * session,
518              tr_bandwidth     * parent,
519              const tr_address * addr,
520              tr_port            port,
521              const uint8_t    * torrentHash,
522              tr_bool            isIncoming,
523              tr_bool            isSeed,
524              int                socket,
525              struct UTPSocket * utp_socket)
526{
527    tr_peerIo * io;
528
529    assert( session != NULL );
530    assert( session->events != NULL );
531    assert( tr_isBool( isIncoming ) );
532    assert( tr_isBool( isSeed ) );
533    assert( tr_amInEventThread( session ) );
534    assert( (socket < 0) == (utp_socket != NULL) );
535
536    if( socket >= 0 ) {
537        tr_netSetTOS( socket, session->peerSocketTOS );
538        maybeSetCongestionAlgorithm( socket, session->peer_congestion_algorithm );
539    }
540
541    io = tr_new0( tr_peerIo, 1 );
542    io->magicNumber = MAGIC_NUMBER;
543    io->refCount = 1;
544    io->crypto = tr_cryptoNew( torrentHash, isIncoming );
545    io->session = session;
546    io->addr = *addr;
547    io->isSeed = isSeed;
548    io->port = port;
549    io->socket = socket;
550    io->utp_socket = utp_socket;
551    io->isIncoming = isIncoming != 0;
552    io->timeCreated = tr_time( );
553    io->inbuf = evbuffer_new( );
554    io->outbuf = evbuffer_new( );
555    tr_bandwidthConstruct( &io->bandwidth, session, parent );
556    tr_bandwidthSetPeer( &io->bandwidth, io );
557    dbgmsg( io, "bandwidth is %p; its parent is %p", &io->bandwidth, parent );
558
559    if( io->socket >= 0 ) {
560        io->event_read = event_new( session->event_base,
561                                    io->socket, EV_READ, event_read_cb, io );
562        io->event_write = event_new( session->event_base,
563                                     io->socket, EV_WRITE, event_write_cb, io );
564    } else {
565        tr_ndbg( "UTP", "New %s connection",
566                 isIncoming ? "incoming" : "outgoing" );
567        UTP_SetCallbacks( utp_socket,
568                          &utp_function_table,
569                          io );
570    }
571
572    return io;
573}
574
575tr_peerIo*
576tr_peerIoNewIncoming( tr_session        * session,
577                      tr_bandwidth      * parent,
578                      const tr_address  * addr,
579                      tr_port             port,
580                      int                 fd,
581                      struct UTPSocket  * utp_socket )
582{
583    assert( session );
584    assert( tr_isAddress( addr ) );
585
586    return tr_peerIoNew( session, parent, addr, port, NULL, TRUE, FALSE, 
587                         fd, utp_socket );
588}
589
590tr_peerIo*
591tr_peerIoNewOutgoing( tr_session        * session,
592                      tr_bandwidth      * parent,
593                      const tr_address  * addr,
594                      tr_port             port,
595                      const uint8_t     * torrentHash,
596                      tr_bool             isSeed )
597{
598    int fd;
599
600    assert( session );
601    assert( tr_isAddress( addr ) );
602    assert( torrentHash );
603
604    fd = tr_netOpenPeerSocket( session, addr, port, isSeed );
605    dbgmsg( NULL, "tr_netOpenPeerSocket returned fd %d", fd );
606
607    return fd < 0 ? NULL
608                  : tr_peerIoNew( session, parent, addr, port,
609                                  torrentHash, FALSE, isSeed, fd, NULL );
610}
611
612/***
613****
614***/
615
616static void
617event_enable( tr_peerIo * io, short event )
618{
619    assert( tr_amInEventThread( io->session ) );
620    assert( io->session != NULL );
621    assert( io->session->events != NULL );
622
623    if( io->socket < 0 )
624        return;
625
626    assert( io->session->events != NULL );
627    assert( event_initialized( io->event_read ) );
628    assert( event_initialized( io->event_write ) );
629
630    if( ( event & EV_READ ) && ! ( io->pendingEvents & EV_READ ) )
631    {
632        dbgmsg( io, "enabling libevent ready-to-read polling" );
633        event_add( io->event_read, NULL );
634        io->pendingEvents |= EV_READ;
635    }
636
637    if( ( event & EV_WRITE ) && ! ( io->pendingEvents & EV_WRITE ) )
638    {
639        dbgmsg( io, "enabling libevent ready-to-write polling" );
640        event_add( io->event_write, NULL );
641        io->pendingEvents |= EV_WRITE;
642    }
643}
644
645static void
646event_disable( struct tr_peerIo * io, short event )
647{
648    assert( tr_amInEventThread( io->session ) );
649    assert( io->session != NULL );
650
651    if( io->socket < 0 )
652        return;
653
654    assert( io->session->events != NULL );
655    assert( event_initialized( io->event_read ) );
656    assert( event_initialized( io->event_write ) );
657
658    if( ( event & EV_READ ) && ( io->pendingEvents & EV_READ ) )
659    {
660        dbgmsg( io, "disabling libevent ready-to-read polling" );
661        event_del( io->event_read );
662        io->pendingEvents &= ~EV_READ;
663    }
664
665    if( ( event & EV_WRITE ) && ( io->pendingEvents & EV_WRITE ) )
666    {
667        dbgmsg( io, "disabling libevent ready-to-write polling" );
668        event_del( io->event_write );
669        io->pendingEvents &= ~EV_WRITE;
670    }
671}
672
673void
674tr_peerIoSetEnabled( tr_peerIo    * io,
675                     tr_direction   dir,
676                     tr_bool        isEnabled )
677{
678    const short event = dir == TR_UP ? EV_WRITE : EV_READ;
679
680    assert( tr_isPeerIo( io ) );
681    assert( tr_isDirection( dir ) );
682    assert( tr_amInEventThread( io->session ) );
683    assert( io->session->events != NULL );
684
685    if( isEnabled )
686        event_enable( io, event );
687    else
688        event_disable( io, event );
689}
690
691/***
692****
693***/
694
695static void
696io_dtor( void * vio )
697{
698    tr_peerIo * io = vio;
699
700    assert( tr_isPeerIo( io ) );
701    assert( tr_amInEventThread( io->session ) );
702    assert( io->session->events != NULL );
703
704    dbgmsg( io, "in tr_peerIo destructor" );
705    event_disable( io, EV_READ | EV_WRITE );
706    tr_bandwidthDestruct( &io->bandwidth );
707    evbuffer_free( io->outbuf );
708    evbuffer_free( io->inbuf );
709    if( io->socket >= 0 ) {
710        event_free( io->event_read );
711        event_free( io->event_write );
712        tr_netClose( io->session, io->socket );
713    }
714    if( io->utp_socket != NULL ) {
715        tr_ndbg( "UTP", "Destroying connection");
716        UTP_SetCallbacks( io->utp_socket,
717                          &dummy_utp_function_table,
718                          NULL );
719        UTP_Close( io->utp_socket );
720    }
721    tr_cryptoFree( io->crypto );
722    tr_list_free( &io->outbuf_datatypes, tr_free );
723
724    memset( io, ~0, sizeof( tr_peerIo ) );
725    tr_free( io );
726}
727
728static void
729tr_peerIoFree( tr_peerIo * io )
730{
731    if( io )
732    {
733        dbgmsg( io, "in tr_peerIoFree" );
734        io->canRead = NULL;
735        io->didWrite = NULL;
736        io->gotError = NULL;
737        tr_runInEventThread( io->session, io_dtor, io );
738    }
739}
740
741void
742tr_peerIoRefImpl( const char * file, int line, tr_peerIo * io )
743{
744    assert( tr_isPeerIo( io ) );
745
746    dbgmsg( io, "%s:%d is incrementing the IO's refcount from %d to %d",
747                file, line, io->refCount, io->refCount+1 );
748
749    ++io->refCount;
750}
751
752void
753tr_peerIoUnrefImpl( const char * file, int line, tr_peerIo * io )
754{
755    assert( tr_isPeerIo( io ) );
756
757    dbgmsg( io, "%s:%d is decrementing the IO's refcount from %d to %d",
758                file, line, io->refCount, io->refCount-1 );
759
760    if( !--io->refCount )
761        tr_peerIoFree( io );
762}
763
764const tr_address*
765tr_peerIoGetAddress( const tr_peerIo * io, tr_port   * port )
766{
767    assert( tr_isPeerIo( io ) );
768
769    if( port )
770        *port = io->port;
771
772    return &io->addr;
773}
774
775const char*
776tr_peerIoAddrStr( const tr_address * addr, tr_port port )
777{
778    static char buf[512];
779
780    if( addr->type == TR_AF_INET )
781        tr_snprintf( buf, sizeof( buf ), "%s:%u", tr_ntop_non_ts( addr ), ntohs( port ) );
782    else
783        tr_snprintf( buf, sizeof( buf ), "[%s]:%u", tr_ntop_non_ts( addr ), ntohs( port ) );
784    return buf;
785}
786
787const char* tr_peerIoGetAddrStr( const tr_peerIo * io )
788{
789    return tr_isPeerIo( io ) ? tr_peerIoAddrStr( &io->addr, io->port ) : "error";
790}
791
792void
793tr_peerIoSetIOFuncs( tr_peerIo        * io,
794                     tr_can_read_cb     readcb,
795                     tr_did_write_cb    writecb,
796                     tr_net_error_cb    errcb,
797                     void             * userData )
798{
799    io->canRead = readcb;
800    io->didWrite = writecb;
801    io->gotError = errcb;
802    io->userData = userData;
803}
804
805void
806tr_peerIoClear( tr_peerIo * io )
807{
808    tr_peerIoSetIOFuncs( io, NULL, NULL, NULL, NULL );
809    tr_peerIoSetEnabled( io, TR_UP, FALSE );
810    tr_peerIoSetEnabled( io, TR_DOWN, FALSE );
811}
812
813int
814tr_peerIoReconnect( tr_peerIo * io )
815{
816    short int pendingEvents;
817    tr_session * session;
818
819    assert( tr_isPeerIo( io ) );
820    assert( !tr_peerIoIsIncoming( io ) );
821
822    session = tr_peerIoGetSession( io );
823
824    pendingEvents = io->pendingEvents;
825    event_disable( io, EV_READ | EV_WRITE );
826
827    if( io->socket >= 0 ) {
828        tr_netClose( session, io->socket );
829        io->socket = -1;
830    }
831    if( io->utp_socket != NULL ) {
832        UTP_Close(io->utp_socket);
833        io->utp_socket = NULL;
834    }
835
836    event_free( io->event_read );
837    event_free( io->event_write );
838    io->socket = tr_netOpenPeerSocket( session, &io->addr, io->port, io->isSeed );
839    io->event_read = event_new( session->event_base, io->socket, EV_READ, event_read_cb, io );
840    io->event_write = event_new( session->event_base, io->socket, EV_WRITE, event_write_cb, io );
841
842    if( io->socket >= 0 )
843    {
844        event_enable( io, pendingEvents );
845        tr_netSetTOS( io->socket, session->peerSocketTOS );
846        maybeSetCongestionAlgorithm( io->socket, session->peer_congestion_algorithm );
847        return 0;
848    }
849
850    return -1;
851}
852
853/**
854***
855**/
856
857void
858tr_peerIoSetTorrentHash( tr_peerIo *     io,
859                         const uint8_t * hash )
860{
861    assert( tr_isPeerIo( io ) );
862
863    tr_cryptoSetTorrentHash( io->crypto, hash );
864}
865
866const uint8_t*
867tr_peerIoGetTorrentHash( tr_peerIo * io )
868{
869    assert( tr_isPeerIo( io ) );
870    assert( io->crypto );
871
872    return tr_cryptoGetTorrentHash( io->crypto );
873}
874
875int
876tr_peerIoHasTorrentHash( const tr_peerIo * io )
877{
878    assert( tr_isPeerIo( io ) );
879    assert( io->crypto );
880
881    return tr_cryptoHasTorrentHash( io->crypto );
882}
883
884/**
885***
886**/
887
888void
889tr_peerIoSetPeersId( tr_peerIo *     io,
890                     const uint8_t * peer_id )
891{
892    assert( tr_isPeerIo( io ) );
893
894    if( ( io->peerIdIsSet = peer_id != NULL ) )
895        memcpy( io->peerId, peer_id, 20 );
896    else
897        memset( io->peerId, 0, 20 );
898}
899
900/**
901***
902**/
903
904static unsigned int
905getDesiredOutputBufferSize( const tr_peerIo * io, uint64_t now )
906{
907    /* this is all kind of arbitrary, but what seems to work well is
908     * being large enough to hold the next 20 seconds' worth of input,
909     * or a few blocks, whichever is bigger.
910     * It's okay to tweak this as needed */
911    const unsigned int currentSpeed_Bps = tr_bandwidthGetPieceSpeed_Bps( &io->bandwidth, now, TR_UP );
912    const unsigned int period = 15u; /* arbitrary */
913    /* the 3 is arbitrary; the .5 is to leave room for messages */
914    static const unsigned int ceiling =  (unsigned int)( MAX_BLOCK_SIZE * 3.5 );
915    return MAX( ceiling, currentSpeed_Bps*period );
916}
917
918size_t
919tr_peerIoGetWriteBufferSpace( const tr_peerIo * io, uint64_t now )
920{
921    const size_t desiredLen = getDesiredOutputBufferSize( io, now );
922    const size_t currentLen = evbuffer_get_length( io->outbuf );
923    size_t freeSpace = 0;
924
925    if( desiredLen > currentLen )
926        freeSpace = desiredLen - currentLen;
927
928    return freeSpace;
929}
930
931/**
932***
933**/
934
935void
936tr_peerIoSetEncryption( tr_peerIo * io, uint32_t encryptionMode )
937{
938    assert( tr_isPeerIo( io ) );
939    assert( encryptionMode == PEER_ENCRYPTION_NONE
940         || encryptionMode == PEER_ENCRYPTION_RC4 );
941
942    io->encryptionMode = encryptionMode;
943}
944
945/**
946***
947**/
948
949static void
950addDatatype( tr_peerIo * io, size_t byteCount, tr_bool isPieceData )
951{
952    struct tr_datatype * d;
953
954    d = tr_new( struct tr_datatype, 1 );
955    d->isPieceData = isPieceData != 0;
956    d->length = byteCount;
957    tr_list_append( &io->outbuf_datatypes, d );
958}
959
960static struct evbuffer_iovec *
961evbuffer_peek_all( struct evbuffer * buf, size_t * setme_vecCount )
962{
963    const size_t byteCount = evbuffer_get_length( buf );
964    const int vecCount = evbuffer_peek( buf, byteCount, NULL, NULL, 0 );
965    struct evbuffer_iovec * iovec = tr_new0( struct evbuffer_iovec, vecCount );
966    const int n = evbuffer_peek( buf, byteCount, NULL, iovec, vecCount );
967    assert( n == vecCount );
968    *setme_vecCount = n;
969    return iovec;
970}
971
972static void
973maybeEncryptBuffer( tr_peerIo * io, struct evbuffer * buf )
974{
975    if( io->encryptionMode == PEER_ENCRYPTION_RC4 )
976    {
977        size_t i, n;
978        struct evbuffer_iovec * iovec = evbuffer_peek_all( buf, &n );
979
980        for( i=0; i<n; ++i )
981            tr_cryptoEncrypt( io->crypto, iovec[i].iov_len, iovec[i].iov_base, iovec[i].iov_base );
982
983        tr_free( iovec );
984    }
985}
986
987void
988tr_peerIoWriteBuf( tr_peerIo * io, struct evbuffer * buf, tr_bool isPieceData )
989{
990    const size_t byteCount = evbuffer_get_length( buf );
991    maybeEncryptBuffer( io, buf );
992    evbuffer_add_buffer( io->outbuf, buf );
993    addDatatype( io, byteCount, isPieceData );
994    if( io->utp_socket )
995        UTP_Write( io->utp_socket, byteCount );
996}
997
998void
999tr_peerIoWriteBytes( tr_peerIo * io, const void * bytes, size_t byteCount, tr_bool isPieceData )
1000{
1001    struct evbuffer * buf = evbuffer_new( );
1002    evbuffer_add( buf, bytes, byteCount );
1003    tr_peerIoWriteBuf( io, buf, isPieceData );
1004    evbuffer_free( buf );
1005}
1006
1007/***
1008****
1009***/
1010
1011void
1012evbuffer_add_uint8( struct evbuffer * outbuf, uint8_t byte )
1013{
1014    evbuffer_add( outbuf, &byte, 1 );
1015}
1016
1017void
1018evbuffer_add_uint16( struct evbuffer * outbuf, uint16_t addme_hs )
1019{
1020    const uint16_t ns = htons( addme_hs );
1021    evbuffer_add( outbuf, &ns, sizeof( ns ) );
1022}
1023
1024void
1025evbuffer_add_uint32( struct evbuffer * outbuf, uint32_t addme_hl )
1026{
1027    const uint32_t nl = htonl( addme_hl );
1028    evbuffer_add( outbuf, &nl, sizeof( nl ) );
1029}
1030
1031/***
1032****
1033***/
1034
1035void
1036tr_peerIoReadBytes( tr_peerIo * io, struct evbuffer * inbuf, void * bytes, size_t byteCount )
1037{
1038    assert( tr_isPeerIo( io ) );
1039    assert( evbuffer_get_length( inbuf )  >= byteCount );
1040
1041    switch( io->encryptionMode )
1042    {
1043        case PEER_ENCRYPTION_NONE:
1044            evbuffer_remove( inbuf, bytes, byteCount );
1045            break;
1046
1047        case PEER_ENCRYPTION_RC4:
1048            evbuffer_remove( inbuf, bytes, byteCount );
1049            tr_cryptoDecrypt( io->crypto, byteCount, bytes, bytes );
1050            break;
1051
1052        default:
1053            assert( 0 );
1054    }
1055}
1056
1057void
1058tr_peerIoReadUint16( tr_peerIo        * io,
1059                     struct evbuffer  * inbuf,
1060                     uint16_t         * setme )
1061{
1062    uint16_t tmp;
1063    tr_peerIoReadBytes( io, inbuf, &tmp, sizeof( uint16_t ) );
1064    *setme = ntohs( tmp );
1065}
1066
1067void tr_peerIoReadUint32( tr_peerIo        * io,
1068                          struct evbuffer  * inbuf,
1069                          uint32_t         * setme )
1070{
1071    uint32_t tmp;
1072    tr_peerIoReadBytes( io, inbuf, &tmp, sizeof( uint32_t ) );
1073    *setme = ntohl( tmp );
1074}
1075
1076void
1077tr_peerIoDrain( tr_peerIo       * io,
1078                struct evbuffer * inbuf,
1079                size_t            byteCount )
1080{
1081    void * buf = tr_sessionGetBuffer( io->session );
1082    const size_t buflen = SESSION_BUFFER_SIZE;
1083
1084    while( byteCount > 0 )
1085    {
1086        const size_t thisPass = MIN( byteCount, buflen );
1087        tr_peerIoReadBytes( io, inbuf, buf, thisPass );
1088        byteCount -= thisPass;
1089    }
1090
1091    tr_sessionReleaseBuffer( io->session );
1092}
1093
1094/***
1095****
1096***/
1097
1098static int
1099tr_peerIoTryRead( tr_peerIo * io, size_t howmuch )
1100{
1101    int res = 0;
1102
1103    if(( howmuch = tr_bandwidthClamp( &io->bandwidth, TR_DOWN, howmuch )))
1104    {
1105        int e;
1106
1107        EVUTIL_SET_SOCKET_ERROR( 0 );
1108        res = evbuffer_read( io->inbuf, io->socket, (int)howmuch );
1109        e = EVUTIL_SOCKET_ERROR( );
1110
1111        dbgmsg( io, "read %d from peer (%s)", res, (res==-1?strerror(e):"") );
1112
1113        if( evbuffer_get_length( io->inbuf ) )
1114            canReadWrapper( io );
1115
1116        if( ( res <= 0 ) && ( io->gotError ) && ( e != EAGAIN ) && ( e != EINTR ) && ( e != EINPROGRESS ) )
1117        {
1118            char errstr[512];
1119            short what = BEV_EVENT_READING | BEV_EVENT_ERROR;
1120            if( res == 0 )
1121                what |= BEV_EVENT_EOF;
1122            tr_net_strerror( errstr, sizeof( errstr ), e );
1123            dbgmsg( io, "tr_peerIoTryRead got an error. res is %d, what is %hd, errno is %d (%s)", res, what, e, errstr );
1124            io->gotError( io, what, io->userData );
1125        }
1126    }
1127
1128    return res;
1129}
1130
1131static int
1132tr_peerIoTryWrite( tr_peerIo * io, size_t howmuch )
1133{
1134    int n = 0;
1135
1136    if(( howmuch = tr_bandwidthClamp( &io->bandwidth, TR_UP, howmuch )))
1137    {
1138        int e;
1139        EVUTIL_SET_SOCKET_ERROR( 0 );
1140        n = tr_evbuffer_write( io, io->socket, howmuch );
1141        e = EVUTIL_SOCKET_ERROR( );
1142
1143        if( n > 0 )
1144            didWriteWrapper( io, n );
1145
1146        if( ( n < 0 ) && ( io->gotError ) && e && ( e != EPIPE ) && ( e != EAGAIN ) && ( e != EINTR ) && ( e != EINPROGRESS ) )
1147        {
1148            char errstr[512];
1149            const short what = BEV_EVENT_WRITING | BEV_EVENT_ERROR;
1150
1151            tr_net_strerror( errstr, sizeof( errstr ), e );
1152            dbgmsg( io, "tr_peerIoTryWrite got an error. res is %d, what is %hd, errno is %d (%s)", n, what, e, errstr );
1153
1154            if( io->gotError != NULL )
1155                io->gotError( io, what, io->userData );
1156        }
1157    }
1158
1159    return n;
1160}
1161
1162int
1163tr_peerIoFlush( tr_peerIo  * io, tr_direction dir, size_t limit )
1164{
1165    int bytesUsed = 0;
1166
1167    assert( tr_isPeerIo( io ) );
1168    assert( tr_isDirection( dir ) );
1169
1170    if( dir == TR_DOWN )
1171        bytesUsed = tr_peerIoTryRead( io, limit );
1172    else
1173        bytesUsed = tr_peerIoTryWrite( io, limit );
1174
1175    dbgmsg( io, "flushing peer-io, direction %d, limit %zu, bytesUsed %d", (int)dir, limit, bytesUsed );
1176    return bytesUsed;
1177}
1178
1179int
1180tr_peerIoFlushOutgoingProtocolMsgs( tr_peerIo * io )
1181{
1182    size_t byteCount = 0;
1183    tr_list * it;
1184
1185    /* count up how many bytes are used by non-piece-data messages
1186       at the front of our outbound queue */
1187    for( it=io->outbuf_datatypes; it!=NULL; it=it->next )
1188    {
1189        struct tr_datatype * d = it->data;
1190
1191        if( d->isPieceData )
1192            break;
1193
1194        byteCount += d->length;
1195    }
1196
1197    return tr_peerIoFlush( io, TR_UP, byteCount );
1198}
Note: See TracBrowser for help on using the repository browser.