source: trunk/libtransmission/net.c @ 8217

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

(trunk libT) more speed tweaks from valgrind

  • Property svn:keywords set to Date Rev Author Id
File size: 13.9 KB
Line 
1/******************************************************************************
2 * $Id: net.c 8217 2009-04-12 14:52:17Z charles $
3 *
4 * Copyright (c) 2005-2008 Transmission authors and contributors
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the "Software"),
8 * to deal in the Software without restriction, including without limitation
9 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
10 * and/or sell copies of the Software, and to permit persons to whom the
11 * Software is furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
21 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22 * DEALINGS IN THE SOFTWARE.
23 *****************************************************************************/
24
25#include <errno.h>
26#include <stdio.h>
27#include <stdlib.h>
28#include <string.h>
29#include <assert.h>
30
31#include <sys/types.h>
32
33#ifdef WIN32
34 #include <winsock2.h> /* inet_addr */
35 #include <WS2tcpip.h>
36#else
37 #include <arpa/inet.h> /* inet_addr */
38 #include <netdb.h>
39 #include <fcntl.h>
40#endif
41
42#include <evutil.h>
43
44#include "transmission.h"
45#include "fdlimit.h"
46#include "natpmp.h"
47#include "net.h"
48#include "peer-io.h"
49#include "platform.h"
50#include "utils.h"
51
52#ifndef IN_MULTICAST
53#define IN_MULTICAST( a ) ( ( ( a ) & 0xf0000000 ) == 0xe0000000 )
54#endif
55
56const tr_address tr_in6addr_any = { TR_AF_INET6, { IN6ADDR_ANY_INIT } }; 
57const tr_address tr_inaddr_any = { TR_AF_INET, 
58    { { { { INADDR_ANY, 0x00, 0x00, 0x00 } } } } }; 
59
60#ifdef WIN32
61static const char *
62inet_ntop(int af, const void *src, char *dst, socklen_t cnt)
63{
64    if (af == AF_INET)
65    {
66        struct sockaddr_in in;
67        memset(&in, 0, sizeof(in));
68        in.sin_family = AF_INET;
69        memcpy(&in.sin_addr, src, sizeof(struct in_addr));
70        getnameinfo((struct sockaddr *)&in, sizeof(struct
71            sockaddr_in), dst, cnt, NULL, 0, NI_NUMERICHOST);
72        return dst;
73    }
74    else if (af == AF_INET6)
75    {
76        struct sockaddr_in6 in;
77        memset(&in, 0, sizeof(in));
78        in.sin6_family = AF_INET6;
79        memcpy(&in.sin6_addr, src, sizeof(struct in_addr6));
80        getnameinfo((struct sockaddr *)&in, sizeof(struct
81            sockaddr_in6), dst, cnt, NULL, 0, NI_NUMERICHOST);
82        return dst;
83    }
84    return NULL;
85}
86
87static int
88inet_pton(int af, const char *src, void *dst)
89{
90    struct addrinfo hints;
91    struct addrinfo *res;
92    struct addrinfo *ressave;
93
94    memset(&hints, 0, sizeof(struct addrinfo));
95    hints.ai_family = af;
96
97    if (getaddrinfo(src, NULL, &hints, &res) != 0)
98        return -1;
99
100    ressave = res;
101
102    while (res)
103    {
104        memcpy(dst, res->ai_addr, res->ai_addrlen);
105        res = res->ai_next;
106    }
107
108    freeaddrinfo(ressave);
109    return 0;
110}
111
112#endif
113
114
115void
116tr_netInit( void )
117{
118    static int initialized = FALSE;
119
120    if( !initialized )
121    {
122#ifdef WIN32
123        WSADATA wsaData;
124        WSAStartup( MAKEWORD( 2, 2 ), &wsaData );
125#endif
126        initialized = TRUE;
127    }
128}
129
130const char * 
131tr_ntop( const tr_address * src, char * dst, int size ) 
132{
133    assert( tr_isAddress( src ) );
134
135    if( src->type == TR_AF_INET ) 
136        return inet_ntop( AF_INET, &src->addr, dst, size ); 
137    else 
138        return inet_ntop( AF_INET6, &src->addr, dst, size ); 
139} 
140
141/*
142 * Non-threadsafe version of tr_ntop, which uses a static memory area for a buffer.
143 * This function is suitable to be called from libTransmission's networking code,
144 * which is single-threaded.
145 */ 
146const char * 
147tr_ntop_non_ts( const tr_address * src ) 
148{ 
149    static char buf[INET6_ADDRSTRLEN]; 
150    return tr_ntop( src, buf, sizeof( buf ) ); 
151} 
152
153tr_address * 
154tr_pton( const char * src, tr_address * dst ) 
155{ 
156    int retval = inet_pton( AF_INET, src, &dst->addr ); 
157    if( retval < 0 ) 
158        return NULL; 
159    else if( retval == 0 ) 
160        retval = inet_pton( AF_INET6, src, &dst->addr ); 
161    else
162    { 
163        dst->type = TR_AF_INET; 
164        return dst; 
165    } 
166
167    if( retval < 1 ) 
168        return NULL; 
169    dst->type = TR_AF_INET6; 
170    return dst; 
171}
172
173/*
174 * Compare two tr_address structures.
175 * Returns:
176 * <0 if a < b
177 * >0 if a > b
178 * 0  if a == b
179 */ 
180int
181tr_compareAddresses( const tr_address * a, const tr_address * b)
182{
183    static const int sizes[2] = { sizeof(struct in_addr), sizeof(struct in6_addr) };
184
185    assert( tr_isAddress( a ) );
186    assert( tr_isAddress( b ) );
187
188    /* IPv6 addresses are always "greater than" IPv4 */ 
189    if( a->type != b->type )
190        return a->type == TR_AF_INET ? 1 : -1;
191
192    return memcmp( &a->addr, &b->addr, sizes[a->type] );
193} 
194
195tr_bool
196tr_net_hasIPv6( tr_port port )
197{
198    static tr_bool alreadyDone = FALSE;
199    static tr_bool result      = FALSE;
200    int s;
201    if( alreadyDone )
202        return result;
203    s = tr_netBindTCP( &tr_in6addr_any, port, TRUE );
204    if( s >= 0 || -s != EAFNOSUPPORT ) /* we support ipv6 */
205    {
206        result = TRUE;
207        tr_netClose( s );
208    }
209    alreadyDone = TRUE;
210    return result;
211}
212
213/***********************************************************************
214 * Socket list housekeeping
215 **********************************************************************/
216struct tr_socketList
217{
218    int             socket;
219    tr_address      addr;
220    tr_socketList * next;
221};
222
223tr_socketList *
224tr_socketListAppend( tr_socketList * const head,
225                     const tr_address * const addr )
226{
227    tr_socketList * tmp;
228
229    assert( head );
230    assert( tr_isAddress( addr ) );
231
232    for( tmp = head; tmp->next; tmp = tmp->next );
233    tmp->next = tr_socketListNew( addr );
234    return tmp->next;
235}
236
237tr_socketList *
238tr_socketListNew( const tr_address * const addr )
239{
240    tr_socketList * tmp;
241
242    assert( tr_isAddress( addr ) );
243
244    tmp = tr_new( tr_socketList, 1 );
245    tmp->socket = -1;
246    tmp->addr = *addr;
247    tmp->next = NULL;
248    return tmp;
249}
250
251void
252tr_socketListFree( tr_socketList * const head )
253{
254    assert( head );
255
256    if( head->next )
257        tr_socketListFree( head->next );
258    tr_free( head );
259}
260
261void
262tr_socketListRemove( tr_socketList * const head,
263                     tr_socketList * const el)
264{
265    tr_socketList * tmp;
266
267    assert( head );
268    assert( el );
269
270    for( tmp = head; tmp->next && tmp->next != el; tmp = tmp->next );
271    tmp->next = el->next;
272    el->next = NULL;
273    tr_socketListFree(el);
274}
275
276void
277tr_socketListTruncate( tr_socketList * const head,
278                       tr_socketList * const start )
279{
280    tr_socketList * tmp;
281
282    assert( head );
283    assert( start );
284
285    for( tmp = head; tmp->next && tmp->next != start; tmp = tmp->next );
286    tr_socketListFree( start );
287    tmp->next = NULL;
288}
289
290#if 0
291int
292tr_socketListGetSocket( const tr_socketList * const el )
293{
294    assert( el );
295
296    return el->socket;
297}
298
299const tr_address *
300tr_socketListGetAddress( const tr_socketList * const el )
301{
302    assert( el );
303    return &el->addr;
304}
305#endif
306
307void
308tr_socketListForEach( tr_socketList * const head,
309                      void ( * cb ) ( int * const,
310                                      tr_address * const,
311                                      void * const),
312                      void * const userData )
313{
314    tr_socketList * tmp;
315    for( tmp = head; tmp; tmp = tmp->next )
316        cb( &tmp->socket, &tmp->addr, userData );
317}
318
319/***********************************************************************
320 * TCP sockets
321 **********************************************************************/
322
323int
324tr_netSetTOS( int s, int tos )
325{
326#ifdef IP_TOS
327    return setsockopt( s, IPPROTO_IP, IP_TOS, (char*)&tos, sizeof( tos ) );
328#else
329    return 0;
330#endif
331}
332
333static int
334makeSocketNonBlocking( int fd )
335{
336    if( fd >= 0 )
337    {
338        if( evutil_make_socket_nonblocking( fd ) )
339        {
340            int tmperrno;
341            tr_err( _( "Couldn't create socket: %s" ),
342                   tr_strerror( sockerrno ) );
343            tmperrno = sockerrno;
344            tr_netClose( fd );
345            fd = -tmperrno;
346        }
347    }
348
349    return fd;
350}
351
352static int
353createSocket( int domain, int type )
354{
355    return makeSocketNonBlocking( tr_fdSocketCreate( domain, type ) );
356}
357
358static void
359setSndBuf( tr_session * session UNUSED, int fd UNUSED )
360{
361#if 0
362    if( fd >= 0 )
363    {
364        const int sndbuf = session->so_sndbuf;
365        const int rcvbuf = session->so_rcvbuf;
366        setsockopt( fd, SOL_SOCKET, SO_SNDBUF, &sndbuf, sizeof( sndbuf ) );
367        setsockopt( fd, SOL_SOCKET, SO_RCVBUF, &rcvbuf, sizeof( rcvbuf ) );
368    }
369#endif
370}
371
372static socklen_t
373setup_sockaddr( const tr_address        * addr,
374                tr_port                   port,
375                struct sockaddr_storage * sockaddr)
376{
377    struct sockaddr_in  sock4;
378    struct sockaddr_in6 sock6;
379
380    assert( tr_isAddress( addr ) );
381
382    if( addr->type == TR_AF_INET )
383    {
384        memset( &sock4, 0, sizeof( sock4 ) );
385        sock4.sin_family      = AF_INET;
386        sock4.sin_addr.s_addr = addr->addr.addr4.s_addr;
387        sock4.sin_port        = port;
388        memcpy( sockaddr, &sock4, sizeof( sock4 ) );
389        return sizeof( struct sockaddr_in );
390    }
391    else
392    {
393        memset( &sock6, 0, sizeof( sock6 ) );
394        sock6.sin6_family = AF_INET6;
395        sock6.sin6_port = port;
396        sock6.sin6_flowinfo = 0;
397        sock6.sin6_addr = addr->addr.addr6;
398        memcpy( sockaddr, &sock6, sizeof( sock6 ) );
399        return sizeof( struct sockaddr_in6 );
400    }
401}
402
403static tr_bool
404isMulticastAddress( const tr_address * addr )
405{
406    if( addr->type == TR_AF_INET && IN_MULTICAST( htonl( addr->addr.addr4.s_addr ) ) )
407        return TRUE;
408
409    if( addr->type == TR_AF_INET6 && ( addr->addr.addr6.s6_addr[0] == 0xff ) )
410        return TRUE;
411
412    return FALSE;
413}
414
415static TR_INLINE tr_bool
416isIPv4MappedOrCompatAddress( const tr_address * addr )
417{
418    if( addr->type == TR_AF_INET6 )
419    {
420        if( IN6_IS_ADDR_V4MAPPED( &addr->addr.addr6 ) ||
421            IN6_IS_ADDR_V4COMPAT( &addr->addr.addr6 ) )
422            return TRUE;
423    }
424    return FALSE;
425}
426
427static TR_INLINE tr_bool
428isIPv6LinkLocalAddress( const tr_address * addr )
429{
430    if( addr->type == TR_AF_INET6 &&
431        IN6_IS_ADDR_LINKLOCAL( &addr->addr.addr6 ) )
432        return TRUE;
433    return FALSE;
434}
435
436tr_bool
437tr_isValidPeerAddress( const tr_address * addr, tr_port port )
438{
439    if( isMulticastAddress( addr ) || isIPv6LinkLocalAddress( addr ) ||
440        isIPv4MappedOrCompatAddress( addr ) )
441        return FALSE;
442
443    if( port == 0 )
444        return FALSE;
445
446    return TRUE;
447}
448
449int
450tr_netOpenTCP( tr_session        * session,
451               const tr_address  * addr,
452               tr_port             port )
453{
454    int                     s;
455    struct sockaddr_storage sock;
456    const int               type = SOCK_STREAM;
457    socklen_t               addrlen;
458
459    assert( tr_isAddress( addr ) );
460
461    if( isMulticastAddress( addr ) || isIPv6LinkLocalAddress( addr ) )
462        return -EINVAL;
463
464    if( ( s = createSocket( ( addr->type == TR_AF_INET ? AF_INET : AF_INET6 ), type ) ) < 0 )
465        return s;
466
467    setSndBuf( session, s );
468
469    addrlen = setup_sockaddr( addr, port, &sock );
470
471    if( ( connect( s, (struct sockaddr *) &sock,
472                  addrlen ) < 0 )
473#ifdef WIN32
474      && ( sockerrno != WSAEWOULDBLOCK )
475#endif
476      && ( sockerrno != EINPROGRESS ) )
477    {
478        int tmperrno;
479        tmperrno = sockerrno;
480        if( ( tmperrno != ENETUNREACH && tmperrno != EHOSTUNREACH )
481                || addr->type == TR_AF_INET )
482            tr_err( _( "Couldn't connect socket %d to %s, port %d (errno %d - %s)" ),
483                    s, tr_ntop_non_ts( addr ), (int)port, tmperrno,
484                    tr_strerror( tmperrno ) );
485        tr_netClose( s );
486        s = -tmperrno;
487    }
488
489    tr_deepLog( __FILE__, __LINE__, NULL, "New OUTGOING connection %d (%s)",
490               s, tr_peerIoAddrStr( addr, port ) );
491
492    return s;
493}
494
495int
496tr_netBindTCP( const tr_address * addr, tr_port port, tr_bool suppressMsgs )
497{
498    int                     s;
499    struct sockaddr_storage sock;
500    const int               type = SOCK_STREAM;
501    int                     addrlen;
502    int                     retval;
503
504#if defined( SO_REUSEADDR ) || defined( SO_REUSEPORT ) || defined( IPV6_V6ONLY )
505    int                optval = 1;
506#endif
507
508    assert( tr_isAddress( addr ) );
509
510    if( ( s = createSocket( ( addr->type == TR_AF_INET ? AF_INET : AF_INET6 ),
511                            type ) ) < 0 )
512        return s;
513
514#ifdef SO_REUSEADDR
515    setsockopt( s, SOL_SOCKET, SO_REUSEADDR, (char*)&optval, sizeof( optval ) );
516#endif
517
518#ifdef IPV6_V6ONLY
519    if( addr->type == TR_AF_INET6 && 
520        ( retval = setsockopt( s, IPPROTO_IPV6, IPV6_V6ONLY, &optval,
521                             sizeof( optval ) ) ) == -1 ) {
522        /* the kernel may not support this. if not, ignore it */
523        if( errno != ENOPROTOOPT )
524            return -errno;
525    }
526#endif
527
528    addrlen = setup_sockaddr( addr, htons( port ), &sock );
529
530    if( bind( s, (struct sockaddr *) &sock,
531             addrlen ) )
532    {
533        int tmperrno;
534        if( !suppressMsgs )
535            tr_err( _( "Couldn't bind port %d on %s: %s" ), port,
536                    tr_ntop_non_ts( addr ), tr_strerror( sockerrno ) );
537        tmperrno = sockerrno;
538        tr_netClose( s );
539        return -tmperrno;
540    }
541    if( !suppressMsgs )
542        tr_dbg(  "Bound socket %d to port %d on %s",
543                 s, port, tr_ntop_non_ts( addr ) );
544    return s;
545}
546
547int
548tr_netAccept( tr_session  * session,
549              int           b,
550              tr_address  * addr,
551              tr_port     * port )
552{
553    int fd;
554
555    fd = makeSocketNonBlocking( tr_fdSocketAccept( b, addr, port ) );
556    setSndBuf( session, fd );
557    return fd;
558}
559
560void
561tr_netClose( int s )
562{
563    tr_fdSocketClose( s );
564}
Note: See TracBrowser for help on using the repository browser.