bad define ssize_t
[novacoin.git] / src / netbase.cpp
1 // Copyright (c) 2009-2010 Satoshi Nakamoto
2 // Copyright (c) 2009-2012 The Bitcoin developers
3 // Distributed under the MIT/X11 software license, see the accompanying
4 // file COPYING or http://www.opensource.org/licenses/mit-license.php.
5
6 #include "netbase.h"
7 #include "util.h"
8 #include "sync.h"
9 #include "hash.h"
10
11 #ifndef WIN32
12 #include <sys/fcntl.h>
13 #endif
14
15 #ifdef _MSC_VER
16 #include <BaseTsd.h>
17 typedef SSIZE_T ssize_t;
18 #endif
19
20 #include "strlcpy.h"
21 #include <boost/algorithm/string/case_conv.hpp> // for to_lower()
22
23 using namespace std;
24
25 // Settings
26 static proxyType proxyInfo[NET_MAX];
27 static proxyType nameproxyInfo;
28 static CCriticalSection cs_proxyInfos;
29 int nConnectTimeout = 5000;
30 bool fNameLookup = false;
31
32 static const unsigned char pchIPv4[12] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xff, 0xff };
33
34 enum Network ParseNetwork(std::string net) {
35     boost::to_lower(net);
36     if (net == "ipv4") return NET_IPV4;
37     if (net == "ipv6") return NET_IPV6;
38     if (net == "tor")  return NET_TOR;
39     if (net == "i2p")  return NET_I2P;
40     return NET_UNROUTABLE;
41 }
42
43 void SplitHostPort(std::string in, int &portOut, std::string &hostOut) {
44     size_t colon = in.find_last_of(':');
45     // if a : is found, and it either follows a [...], or no other : is in the string, treat it as port separator
46     bool fHaveColon = colon != in.npos;
47     bool fBracketed = fHaveColon && (in[0]=='[' && in[colon-1]==']'); // if there is a colon, and in[0]=='[', colon is not 0, so in[colon-1] is safe
48     bool fMultiColon = fHaveColon && (in.find_last_of(':',colon-1) != in.npos);
49     if (fHaveColon && (colon==0 || fBracketed || !fMultiColon)) {
50         char *endp = NULL;
51         int n = strtol(in.c_str() + colon + 1, &endp, 10);
52         if (endp && *endp == 0 && n >= 0) {
53             in = in.substr(0, colon);
54             if (n > 0 && n < 0x10000)
55                 portOut = n;
56         }
57     }
58     if (in.size()>0 && in[0] == '[' && in[in.size()-1] == ']')
59         hostOut = in.substr(1, in.size()-2);
60     else
61         hostOut = in;
62 }
63
64 bool static LookupIntern(const char *pszName, std::vector<CNetAddr>& vIP, unsigned int nMaxSolutions, bool fAllowLookup)
65 {
66     vIP.clear();
67
68     {
69         CNetAddr addr;
70         if (addr.SetSpecial(std::string(pszName))) {
71             vIP.push_back(addr);
72             return true;
73         }
74     }
75
76     struct addrinfo aiHint;
77     memset(&aiHint, 0, sizeof(struct addrinfo));
78
79     aiHint.ai_socktype = SOCK_STREAM;
80     aiHint.ai_protocol = IPPROTO_TCP;
81 #ifdef WIN32
82 #  ifdef USE_IPV6
83     aiHint.ai_family = AF_UNSPEC;
84 #  else
85     aiHint.ai_family = AF_INET;
86 #  endif
87     aiHint.ai_flags = fAllowLookup ? 0 : AI_NUMERICHOST;
88 #else
89 #  ifdef USE_IPV6
90     aiHint.ai_family = AF_UNSPEC;
91 #  else
92     aiHint.ai_family = AF_INET;
93 #  endif
94     aiHint.ai_flags = fAllowLookup ? AI_ADDRCONFIG : AI_NUMERICHOST;
95 #endif
96     struct addrinfo *aiRes = NULL;
97     int nErr = getaddrinfo(pszName, NULL, &aiHint, &aiRes);
98     if (nErr)
99         return false;
100
101     struct addrinfo *aiTrav = aiRes;
102     while (aiTrav != NULL && (nMaxSolutions == 0 || vIP.size() < nMaxSolutions))
103     {
104         if (aiTrav->ai_family == AF_INET)
105         {
106             assert(aiTrav->ai_addrlen >= sizeof(sockaddr_in));
107             vIP.push_back(CNetAddr(((struct sockaddr_in*)(aiTrav->ai_addr))->sin_addr));
108         }
109
110 #ifdef USE_IPV6
111         if (aiTrav->ai_family == AF_INET6)
112         {
113             assert(aiTrav->ai_addrlen >= sizeof(sockaddr_in6));
114             vIP.push_back(CNetAddr(((struct sockaddr_in6*)(aiTrav->ai_addr))->sin6_addr));
115         }
116 #endif
117
118         aiTrav = aiTrav->ai_next;
119     }
120
121     freeaddrinfo(aiRes);
122
123     return (vIP.size() > 0);
124 }
125
126 bool LookupHost(const char *pszName, std::vector<CNetAddr>& vIP, unsigned int nMaxSolutions, bool fAllowLookup)
127 {
128     if (pszName[0] == 0)
129         return false;
130     char psz[256];
131     char *pszHost = psz;
132     strlcpy(psz, pszName, sizeof(psz));
133     if (psz[0] == '[' && psz[strlen(psz)-1] == ']')
134     {
135         pszHost = psz+1;
136         psz[strlen(psz)-1] = 0;
137     }
138
139     return LookupIntern(pszHost, vIP, nMaxSolutions, fAllowLookup);
140 }
141
142 bool LookupHostNumeric(const char *pszName, std::vector<CNetAddr>& vIP, unsigned int nMaxSolutions)
143 {
144     return LookupHost(pszName, vIP, nMaxSolutions, false);
145 }
146
147 bool Lookup(const char *pszName, std::vector<CService>& vAddr, int portDefault, bool fAllowLookup, unsigned int nMaxSolutions)
148 {
149     if (pszName[0] == 0)
150         return false;
151     int port = portDefault;
152     std::string hostname = "";
153     SplitHostPort(std::string(pszName), port, hostname);
154
155     std::vector<CNetAddr> vIP;
156     bool fRet = LookupIntern(hostname.c_str(), vIP, nMaxSolutions, fAllowLookup);
157     if (!fRet)
158         return false;
159     vAddr.resize(vIP.size());
160     for (unsigned int i = 0; i < vIP.size(); i++)
161         vAddr[i] = CService(vIP[i], port);
162     return true;
163 }
164
165 bool Lookup(const char *pszName, CService& addr, int portDefault, bool fAllowLookup)
166 {
167     std::vector<CService> vService;
168     bool fRet = Lookup(pszName, vService, portDefault, fAllowLookup, 1);
169     if (!fRet)
170         return false;
171     addr = vService[0];
172     return true;
173 }
174
175 bool LookupNumeric(const char *pszName, CService& addr, int portDefault)
176 {
177     return Lookup(pszName, addr, portDefault, false);
178 }
179
180 bool static Socks4(const CService &addrDest, SOCKET& hSocket)
181 {
182     printf("SOCKS4 connecting %s\n", addrDest.ToString().c_str());
183     if (!addrDest.IsIPv4())
184     {
185         closesocket(hSocket);
186         return error("Proxy destination is not IPv4");
187     }
188     char pszSocks4IP[] = "\4\1\0\0\0\0\0\0user";
189     struct sockaddr_in addr;
190     socklen_t len = sizeof(addr);
191     if (!addrDest.GetSockAddr((struct sockaddr*)&addr, &len) || addr.sin_family != AF_INET)
192     {
193         closesocket(hSocket);
194         return error("Cannot get proxy destination address");
195     }
196     memcpy(pszSocks4IP + 2, &addr.sin_port, 2);
197     memcpy(pszSocks4IP + 4, &addr.sin_addr, 4);
198     char* pszSocks4 = pszSocks4IP;
199     int nSize = sizeof(pszSocks4IP);
200
201     int ret = send(hSocket, pszSocks4, nSize, MSG_NOSIGNAL);
202     if (ret != nSize)
203     {
204         closesocket(hSocket);
205         return error("Error sending to proxy");
206     }
207     char pchRet[8];
208     if (recv(hSocket, pchRet, 8, 0) != 8)
209     {
210         closesocket(hSocket);
211         return error("Error reading proxy response");
212     }
213     if (pchRet[1] != 0x5a)
214     {
215         closesocket(hSocket);
216         if (pchRet[1] != 0x5b)
217             printf("ERROR: Proxy returned error %d\n", pchRet[1]);
218         return false;
219     }
220     printf("SOCKS4 connected %s\n", addrDest.ToString().c_str());
221     return true;
222 }
223
224 bool static Socks5(string strDest, int port, SOCKET& hSocket)
225 {
226     printf("SOCKS5 connecting %s\n", strDest.c_str());
227     if (strDest.size() > 255)
228     {
229         closesocket(hSocket);
230         return error("Hostname too long");
231     }
232     char pszSocks5Init[] = "\5\1\0";
233     char *pszSocks5 = pszSocks5Init;
234     ssize_t nSize = sizeof(pszSocks5Init) - 1;
235
236     ssize_t ret = send(hSocket, pszSocks5, nSize, MSG_NOSIGNAL);
237     if (ret != nSize)
238     {
239         closesocket(hSocket);
240         return error("Error sending to proxy");
241     }
242     char pchRet1[2];
243     if (recv(hSocket, pchRet1, 2, 0) != 2)
244     {
245         closesocket(hSocket);
246         return error("Error reading proxy response");
247     }
248     if (pchRet1[0] != 0x05 || pchRet1[1] != 0x00)
249     {
250         closesocket(hSocket);
251         return error("Proxy failed to initialize");
252     }
253     string strSocks5("\5\1");
254     strSocks5 += '\000'; strSocks5 += '\003';
255     strSocks5 += static_cast<char>(std::min((int)strDest.size(), 255));
256     strSocks5 += strDest;
257     strSocks5 += static_cast<char>((port >> 8) & 0xFF);
258     strSocks5 += static_cast<char>((port >> 0) & 0xFF);
259     ret = send(hSocket, strSocks5.c_str(), strSocks5.size(), MSG_NOSIGNAL);
260     if (ret != (ssize_t)strSocks5.size())
261     {
262         closesocket(hSocket);
263         return error("Error sending to proxy");
264     }
265     char pchRet2[4];
266     if (recv(hSocket, pchRet2, 4, 0) != 4)
267     {
268         closesocket(hSocket);
269         return error("Error reading proxy response");
270     }
271     if (pchRet2[0] != 0x05)
272     {
273         closesocket(hSocket);
274         return error("Proxy failed to accept request");
275     }
276     if (pchRet2[1] != 0x00)
277     {
278         closesocket(hSocket);
279         switch (pchRet2[1])
280         {
281             case 0x01: return error("Proxy error: general failure");
282             case 0x02: return error("Proxy error: connection not allowed");
283             case 0x03: return error("Proxy error: network unreachable");
284             case 0x04: return error("Proxy error: host unreachable");
285             case 0x05: return error("Proxy error: connection refused");
286             case 0x06: return error("Proxy error: TTL expired");
287             case 0x07: return error("Proxy error: protocol error");
288             case 0x08: return error("Proxy error: address type not supported");
289             default:   return error("Proxy error: unknown");
290         }
291     }
292     if (pchRet2[2] != 0x00)
293     {
294         closesocket(hSocket);
295         return error("Error: malformed proxy response");
296     }
297     char pchRet3[256];
298     switch (pchRet2[3])
299     {
300         case 0x01: ret = recv(hSocket, pchRet3, 4, 0) != 4; break;
301         case 0x04: ret = recv(hSocket, pchRet3, 16, 0) != 16; break;
302         case 0x03:
303         {
304             ret = recv(hSocket, pchRet3, 1, 0) != 1;
305             if (ret)
306                 return error("Error reading from proxy");
307             int nRecv = pchRet3[0];
308             ret = recv(hSocket, pchRet3, nRecv, 0) != nRecv;
309             break;
310         }
311         default: closesocket(hSocket); return error("Error: malformed proxy response");
312     }
313     if (ret)
314     {
315         closesocket(hSocket);
316         return error("Error reading from proxy");
317     }
318     if (recv(hSocket, pchRet3, 2, 0) != 2)
319     {
320         closesocket(hSocket);
321         return error("Error reading from proxy");
322     }
323     printf("SOCKS5 connected %s\n", strDest.c_str());
324     return true;
325 }
326
327 bool static ConnectSocketDirectly(const CService &addrConnect, SOCKET& hSocketRet, int nTimeout)
328 {
329     hSocketRet = INVALID_SOCKET;
330
331 #ifdef USE_IPV6
332     struct sockaddr_storage sockaddr;
333 #else
334     struct sockaddr sockaddr;
335 #endif
336     socklen_t len = sizeof(sockaddr);
337     if (!addrConnect.GetSockAddr((struct sockaddr*)&sockaddr, &len)) {
338         printf("Cannot connect to %s: unsupported network\n", addrConnect.ToString().c_str());
339         return false;
340     }
341
342     SOCKET hSocket = socket(((struct sockaddr*)&sockaddr)->sa_family, SOCK_STREAM, IPPROTO_TCP);
343     if (hSocket == INVALID_SOCKET)
344         return false;
345 #ifdef SO_NOSIGPIPE
346     int set = 1;
347     setsockopt(hSocket, SOL_SOCKET, SO_NOSIGPIPE, (void*)&set, sizeof(int));
348 #endif
349
350 #ifdef WIN32
351     u_long fNonblock = 1;
352     if (ioctlsocket(hSocket, FIONBIO, &fNonblock) == SOCKET_ERROR)
353 #else
354     int fFlags = fcntl(hSocket, F_GETFL, 0);
355     if (fcntl(hSocket, F_SETFL, fFlags | O_NONBLOCK) == -1)
356 #endif
357     {
358         closesocket(hSocket);
359         return false;
360     }
361
362     if (connect(hSocket, (struct sockaddr*)&sockaddr, len) == SOCKET_ERROR)
363     {
364         // WSAEINVAL is here because some legacy version of winsock uses it
365         if (WSAGetLastError() == WSAEINPROGRESS || WSAGetLastError() == WSAEWOULDBLOCK || WSAGetLastError() == WSAEINVAL)
366         {
367             struct timeval timeout;
368             timeout.tv_sec  = nTimeout / 1000;
369             timeout.tv_usec = (nTimeout % 1000) * 1000;
370
371             fd_set fdset;
372             FD_ZERO(&fdset);
373             FD_SET(hSocket, &fdset);
374             int nRet = select(hSocket + 1, NULL, &fdset, NULL, &timeout);
375             if (nRet == 0)
376             {
377                 printf("connection timeout\n");
378                 closesocket(hSocket);
379                 return false;
380             }
381             if (nRet == SOCKET_ERROR)
382             {
383                 printf("select() for connection failed: %i\n",WSAGetLastError());
384                 closesocket(hSocket);
385                 return false;
386             }
387             socklen_t nRetSize = sizeof(nRet);
388 #ifdef WIN32
389             if (getsockopt(hSocket, SOL_SOCKET, SO_ERROR, (char*)(&nRet), &nRetSize) == SOCKET_ERROR)
390 #else
391             if (getsockopt(hSocket, SOL_SOCKET, SO_ERROR, &nRet, &nRetSize) == SOCKET_ERROR)
392 #endif
393             {
394                 printf("getsockopt() for connection failed: %i\n",WSAGetLastError());
395                 closesocket(hSocket);
396                 return false;
397             }
398             if (nRet != 0)
399             {
400                 printf("connect() failed after select(): %s\n",strerror(nRet));
401                 closesocket(hSocket);
402                 return false;
403             }
404         }
405 #ifdef WIN32
406         else if (WSAGetLastError() != WSAEISCONN)
407 #else
408         else
409 #endif
410         {
411             printf("connect() failed: %i\n",WSAGetLastError());
412             closesocket(hSocket);
413             return false;
414         }
415     }
416
417     // this isn't even strictly necessary
418     // CNode::ConnectNode immediately turns the socket back to non-blocking
419     // but we'll turn it back to blocking just in case
420 #ifdef WIN32
421     fNonblock = 0;
422     if (ioctlsocket(hSocket, FIONBIO, &fNonblock) == SOCKET_ERROR)
423 #else
424     fFlags = fcntl(hSocket, F_GETFL, 0);
425     if (fcntl(hSocket, F_SETFL, fFlags & !O_NONBLOCK) == SOCKET_ERROR)
426 #endif
427     {
428         closesocket(hSocket);
429         return false;
430     }
431
432     hSocketRet = hSocket;
433     return true;
434 }
435
436 bool SetProxy(enum Network net, CService addrProxy, int nSocksVersion) {
437     assert(net >= 0 && net < NET_MAX);
438     if (nSocksVersion != 0 && nSocksVersion != 4 && nSocksVersion != 5)
439         return false;
440     if (nSocksVersion != 0 && !addrProxy.IsValid())
441         return false;
442     LOCK(cs_proxyInfos);
443     proxyInfo[net] = std::make_pair(addrProxy, nSocksVersion);
444     return true;
445 }
446
447 bool GetProxy(enum Network net, proxyType &proxyInfoOut) {
448     assert(net >= 0 && net < NET_MAX);
449     LOCK(cs_proxyInfos);
450     if (!proxyInfo[net].second)
451         return false;
452     proxyInfoOut = proxyInfo[net];
453     return true;
454 }
455
456 bool SetNameProxy(CService addrProxy, int nSocksVersion) {
457     if (nSocksVersion != 0 && nSocksVersion != 5)
458         return false;
459     if (nSocksVersion != 0 && !addrProxy.IsValid())
460         return false;
461     LOCK(cs_proxyInfos);
462     nameproxyInfo = std::make_pair(addrProxy, nSocksVersion);
463     return true;
464 }
465
466 bool GetNameProxy(proxyType &nameproxyInfoOut) {
467     LOCK(cs_proxyInfos);
468     if (!nameproxyInfo.second)
469         return false;
470     nameproxyInfoOut = nameproxyInfo;
471     return true;
472 }
473
474 bool HaveNameProxy() {
475     LOCK(cs_proxyInfos);
476     return nameproxyInfo.second != 0;
477 }
478
479 bool IsProxy(const CNetAddr &addr) {
480     LOCK(cs_proxyInfos);
481     for (int i = 0; i < NET_MAX; i++) {
482         if (proxyInfo[i].second && (addr == (CNetAddr)proxyInfo[i].first))
483             return true;
484     }
485     return false;
486 }
487
488 bool ConnectSocket(const CService &addrDest, SOCKET& hSocketRet, int nTimeout)
489 {
490     proxyType proxy;
491
492     // no proxy needed
493     if (!GetProxy(addrDest.GetNetwork(), proxy))
494         return ConnectSocketDirectly(addrDest, hSocketRet, nTimeout);
495
496     SOCKET hSocket = INVALID_SOCKET;
497
498     // first connect to proxy server
499     if (!ConnectSocketDirectly(proxy.first, hSocket, nTimeout))
500         return false;
501
502     // do socks negotiation
503     switch (proxy.second) {
504     case 4:
505         if (!Socks4(addrDest, hSocket))
506             return false;
507         break;
508     case 5:
509         if (!Socks5(addrDest.ToStringIP(), addrDest.GetPort(), hSocket))
510             return false;
511         break;
512     default:
513         return false;
514     }
515
516     hSocketRet = hSocket;
517     return true;
518 }
519
520 bool ConnectSocketByName(CService &addr, SOCKET& hSocketRet, const char *pszDest, int portDefault, int nTimeout)
521 {
522     string strDest;
523     int port = portDefault;
524     SplitHostPort(string(pszDest), port, strDest);
525
526     SOCKET hSocket = INVALID_SOCKET;
527
528     proxyType nameproxy;
529     GetNameProxy(nameproxy);
530
531     CService addrResolved(CNetAddr(strDest, fNameLookup && !nameproxy.second), port);
532     if (addrResolved.IsValid()) {
533         addr = addrResolved;
534         return ConnectSocket(addr, hSocketRet, nTimeout);
535     }
536     addr = CService("0.0.0.0:0");
537     if (!nameproxy.second)
538         return false;
539     if (!ConnectSocketDirectly(nameproxy.first, hSocket, nTimeout))
540         return false;
541
542     switch(nameproxy.second) {
543         default:
544         case 4: return false;
545         case 5:
546             if (!Socks5(strDest, port, hSocket))
547                 return false;
548             break;
549     }
550
551     hSocketRet = hSocket;
552     return true;
553 }
554
555 void CNetAddr::Init()
556 {
557     memset(ip, 0, 16);
558 }
559
560 void CNetAddr::SetIP(const CNetAddr& ipIn)
561 {
562     memcpy(ip, ipIn.ip, sizeof(ip));
563 }
564
565 static const unsigned char pchOnionCat[] = {0xFD,0x87,0xD8,0x7E,0xEB,0x43};
566 static const unsigned char pchGarliCat[] = {0xFD,0x60,0xDB,0x4D,0xDD,0xB5};
567
568 bool CNetAddr::SetSpecial(const std::string &strName)
569 {
570     if (strName.size()>6 && strName.substr(strName.size() - 6, 6) == ".onion") {
571         std::vector<unsigned char> vchAddr = DecodeBase32(strName.substr(0, strName.size() - 6).c_str());
572         if (vchAddr.size() != 16-sizeof(pchOnionCat))
573             return false;
574         memcpy(ip, pchOnionCat, sizeof(pchOnionCat));
575         for (unsigned int i=0; i<16-sizeof(pchOnionCat); i++)
576             ip[i + sizeof(pchOnionCat)] = vchAddr[i];
577         return true;
578     }
579     if (strName.size()>11 && strName.substr(strName.size() - 11, 11) == ".oc.b32.i2p") {
580         std::vector<unsigned char> vchAddr = DecodeBase32(strName.substr(0, strName.size() - 11).c_str());
581         if (vchAddr.size() != 16-sizeof(pchGarliCat))
582             return false;
583         memcpy(ip, pchOnionCat, sizeof(pchGarliCat));
584         for (unsigned int i=0; i<16-sizeof(pchGarliCat); i++)
585             ip[i + sizeof(pchGarliCat)] = vchAddr[i];
586         return true;
587     }
588     return false;
589 }
590
591 CNetAddr::CNetAddr()
592 {
593     Init();
594 }
595
596 CNetAddr::CNetAddr(const struct in_addr& ipv4Addr)
597 {
598     memcpy(ip,    pchIPv4, 12);
599     memcpy(ip+12, &ipv4Addr, 4);
600 }
601
602 #ifdef USE_IPV6
603 CNetAddr::CNetAddr(const struct in6_addr& ipv6Addr)
604 {
605     memcpy(ip, &ipv6Addr, 16);
606 }
607 #endif
608
609 CNetAddr::CNetAddr(const char *pszIp, bool fAllowLookup)
610 {
611     Init();
612     std::vector<CNetAddr> vIP;
613     if (LookupHost(pszIp, vIP, 1, fAllowLookup))
614         *this = vIP[0];
615 }
616
617 CNetAddr::CNetAddr(const std::string &strIp, bool fAllowLookup)
618 {
619     Init();
620     std::vector<CNetAddr> vIP;
621     if (LookupHost(strIp.c_str(), vIP, 1, fAllowLookup))
622         *this = vIP[0];
623 }
624
625 unsigned int CNetAddr::GetByte(int n) const
626 {
627     return ip[15-n];
628 }
629
630 bool CNetAddr::IsIPv4() const
631 {
632     return (memcmp(ip, pchIPv4, sizeof(pchIPv4)) == 0);
633 }
634
635 bool CNetAddr::IsIPv6() const
636 {
637     return (!IsIPv4() && !IsTor() && !IsI2P());
638 }
639
640 bool CNetAddr::IsRFC1918() const
641 {
642     return IsIPv4() && (
643         GetByte(3) == 10 ||
644         (GetByte(3) == 192 && GetByte(2) == 168) ||
645         (GetByte(3) == 172 && (GetByte(2) >= 16 && GetByte(2) <= 31)));
646 }
647
648 bool CNetAddr::IsRFC3927() const
649 {
650     return IsIPv4() && (GetByte(3) == 169 && GetByte(2) == 254);
651 }
652
653 bool CNetAddr::IsRFC3849() const
654 {
655     return GetByte(15) == 0x20 && GetByte(14) == 0x01 && GetByte(13) == 0x0D && GetByte(12) == 0xB8;
656 }
657
658 bool CNetAddr::IsRFC3964() const
659 {
660     return (GetByte(15) == 0x20 && GetByte(14) == 0x02);
661 }
662
663 bool CNetAddr::IsRFC6052() const
664 {
665     static const unsigned char pchRFC6052[] = {0,0x64,0xFF,0x9B,0,0,0,0,0,0,0,0};
666     return (memcmp(ip, pchRFC6052, sizeof(pchRFC6052)) == 0);
667 }
668
669 bool CNetAddr::IsRFC4380() const
670 {
671     return (GetByte(15) == 0x20 && GetByte(14) == 0x01 && GetByte(13) == 0 && GetByte(12) == 0);
672 }
673
674 bool CNetAddr::IsRFC4862() const
675 {
676     static const unsigned char pchRFC4862[] = {0xFE,0x80,0,0,0,0,0,0};
677     return (memcmp(ip, pchRFC4862, sizeof(pchRFC4862)) == 0);
678 }
679
680 bool CNetAddr::IsRFC4193() const
681 {
682     return ((GetByte(15) & 0xFE) == 0xFC);
683 }
684
685 bool CNetAddr::IsRFC6145() const
686 {
687     static const unsigned char pchRFC6145[] = {0,0,0,0,0,0,0,0,0xFF,0xFF,0,0};
688     return (memcmp(ip, pchRFC6145, sizeof(pchRFC6145)) == 0);
689 }
690
691 bool CNetAddr::IsRFC4843() const
692 {
693     return (GetByte(15) == 0x20 && GetByte(14) == 0x01 && GetByte(13) == 0x00 && (GetByte(12) & 0xF0) == 0x10);
694 }
695
696 bool CNetAddr::IsTor() const
697 {
698     return (memcmp(ip, pchOnionCat, sizeof(pchOnionCat)) == 0);
699 }
700
701 bool CNetAddr::IsI2P() const
702 {
703     return (memcmp(ip, pchGarliCat, sizeof(pchGarliCat)) == 0);
704 }
705
706 bool CNetAddr::IsLocal() const
707 {
708     // IPv4 loopback
709    if (IsIPv4() && (GetByte(3) == 127 || GetByte(3) == 0))
710        return true;
711
712    // IPv6 loopback (::1/128)
713    static const unsigned char pchLocal[16] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1};
714    if (memcmp(ip, pchLocal, 16) == 0)
715        return true;
716
717    return false;
718 }
719
720 bool CNetAddr::IsMulticast() const
721 {
722     return    (IsIPv4() && (GetByte(3) & 0xF0) == 0xE0)
723            || (GetByte(15) == 0xFF);
724 }
725
726 bool CNetAddr::IsValid() const
727 {
728     // Cleanup 3-byte shifted addresses caused by garbage in size field
729     // of addr messages from versions before 0.2.9 checksum.
730     // Two consecutive addr messages look like this:
731     // header20 vectorlen3 addr26 addr26 addr26 header20 vectorlen3 addr26 addr26 addr26...
732     // so if the first length field is garbled, it reads the second batch
733     // of addr misaligned by 3 bytes.
734     if (memcmp(ip, pchIPv4+3, sizeof(pchIPv4)-3) == 0)
735         return false;
736
737     // unspecified IPv6 address (::/128)
738     unsigned char ipNone[16] = {};
739     if (memcmp(ip, ipNone, 16) == 0)
740         return false;
741
742     // documentation IPv6 address
743     if (IsRFC3849())
744         return false;
745
746     if (IsIPv4())
747     {
748         // INADDR_NONE
749         uint32_t ipNone = INADDR_NONE;
750         if (memcmp(ip+12, &ipNone, 4) == 0)
751             return false;
752
753         // 0
754         ipNone = 0;
755         if (memcmp(ip+12, &ipNone, 4) == 0)
756             return false;
757     }
758
759     return true;
760 }
761
762 bool CNetAddr::IsRoutable() const
763 {
764     return IsValid() && !(IsRFC1918() || IsRFC3927() || IsRFC4862() || (IsRFC4193() && !IsTor() && !IsI2P()) || IsRFC4843() || IsLocal());
765 }
766
767 enum Network CNetAddr::GetNetwork() const
768 {
769     if (!IsRoutable())
770         return NET_UNROUTABLE;
771
772     if (IsIPv4())
773         return NET_IPV4;
774
775     if (IsTor())
776         return NET_TOR;
777
778     if (IsI2P())
779         return NET_I2P;
780
781     return NET_IPV6;
782 }
783
784 std::string CNetAddr::ToStringIP() const
785 {
786     if (IsTor())
787         return EncodeBase32(&ip[6], 10) + ".onion";
788     if (IsI2P())
789         return EncodeBase32(&ip[6], 10) + ".oc.b32.i2p";
790     CService serv(*this, 0);
791 #ifdef USE_IPV6
792     struct sockaddr_storage sockaddr;
793 #else
794     struct sockaddr sockaddr;
795 #endif
796     socklen_t socklen = sizeof(sockaddr);
797     if (serv.GetSockAddr((struct sockaddr*)&sockaddr, &socklen)) {
798         char name[1025] = "";
799         if (!getnameinfo((const struct sockaddr*)&sockaddr, socklen, name, sizeof(name), NULL, 0, NI_NUMERICHOST))
800             return std::string(name);
801     }
802     if (IsIPv4())
803         return strprintf("%u.%u.%u.%u", GetByte(3), GetByte(2), GetByte(1), GetByte(0));
804     else
805         return strprintf("%x:%x:%x:%x:%x:%x:%x:%x",
806                          GetByte(15) << 8 | GetByte(14), GetByte(13) << 8 | GetByte(12),
807                          GetByte(11) << 8 | GetByte(10), GetByte(9) << 8 | GetByte(8),
808                          GetByte(7) << 8 | GetByte(6), GetByte(5) << 8 | GetByte(4),
809                          GetByte(3) << 8 | GetByte(2), GetByte(1) << 8 | GetByte(0));
810 }
811
812 std::string CNetAddr::ToString() const
813 {
814     return ToStringIP();
815 }
816
817 bool operator==(const CNetAddr& a, const CNetAddr& b)
818 {
819     return (memcmp(a.ip, b.ip, 16) == 0);
820 }
821
822 bool operator!=(const CNetAddr& a, const CNetAddr& b)
823 {
824     return (memcmp(a.ip, b.ip, 16) != 0);
825 }
826
827 bool operator<(const CNetAddr& a, const CNetAddr& b)
828 {
829     return (memcmp(a.ip, b.ip, 16) < 0);
830 }
831
832 bool CNetAddr::GetInAddr(struct in_addr* pipv4Addr) const
833 {
834     if (!IsIPv4())
835         return false;
836     memcpy(pipv4Addr, ip+12, 4);
837     return true;
838 }
839
840 #ifdef USE_IPV6
841 bool CNetAddr::GetIn6Addr(struct in6_addr* pipv6Addr) const
842 {
843     memcpy(pipv6Addr, ip, 16);
844     return true;
845 }
846 #endif
847
848 // get canonical identifier of an address' group
849 // no two connections will be attempted to addresses with the same group
850 std::vector<unsigned char> CNetAddr::GetGroup() const
851 {
852     std::vector<unsigned char> vchRet;
853     int nClass = NET_IPV6;
854     int nStartByte = 0;
855     int nBits = 16;
856
857     // all local addresses belong to the same group
858     if (IsLocal())
859     {
860         nClass = 255;
861         nBits = 0;
862     }
863
864     // all unroutable addresses belong to the same group
865     if (!IsRoutable())
866     {
867         nClass = NET_UNROUTABLE;
868         nBits = 0;
869     }
870     // for IPv4 addresses, '1' + the 16 higher-order bits of the IP
871     // includes mapped IPv4, SIIT translated IPv4, and the well-known prefix
872     else if (IsIPv4() || IsRFC6145() || IsRFC6052())
873     {
874         nClass = NET_IPV4;
875         nStartByte = 12;
876     }
877     // for 6to4 tunnelled addresses, use the encapsulated IPv4 address
878     else if (IsRFC3964())
879     {
880         nClass = NET_IPV4;
881         nStartByte = 2;
882     }
883     // for Teredo-tunnelled IPv6 addresses, use the encapsulated IPv4 address
884     else if (IsRFC4380())
885     {
886         vchRet.push_back(NET_IPV4);
887         vchRet.push_back(GetByte(3) ^ 0xFF);
888         vchRet.push_back(GetByte(2) ^ 0xFF);
889         return vchRet;
890     }
891     else if (IsTor())
892     {
893         nClass = NET_TOR;
894         nStartByte = 6;
895         nBits = 4;
896     }
897     else if (IsI2P())
898     {
899         nClass = NET_I2P;
900         nStartByte = 6;
901         nBits = 4;
902     }
903     // for he.net, use /36 groups
904     else if (GetByte(15) == 0x20 && GetByte(14) == 0x11 && GetByte(13) == 0x04 && GetByte(12) == 0x70)
905         nBits = 36;
906     // for the rest of the IPv6 network, use /32 groups
907     else
908         nBits = 32;
909
910     vchRet.push_back(nClass);
911     while (nBits >= 8)
912     {
913         vchRet.push_back(GetByte(15 - nStartByte));
914         nStartByte++;
915         nBits -= 8;
916     }
917     if (nBits > 0)
918         vchRet.push_back(GetByte(15 - nStartByte) | ((1 << nBits) - 1));
919
920     return vchRet;
921 }
922
923 uint64 CNetAddr::GetHash() const
924 {
925     uint256 hash = Hash(&ip[0], &ip[16]);
926     uint64 nRet;
927     memcpy(&nRet, &hash, sizeof(nRet));
928     return nRet;
929 }
930
931 void CNetAddr::print() const
932 {
933     printf("CNetAddr(%s)\n", ToString().c_str());
934 }
935
936 // private extensions to enum Network, only returned by GetExtNetwork,
937 // and only used in GetReachabilityFrom
938 static const int NET_UNKNOWN = NET_MAX + 0;
939 static const int NET_TEREDO  = NET_MAX + 1;
940 int static GetExtNetwork(const CNetAddr *addr)
941 {
942     if (addr == NULL)
943         return NET_UNKNOWN;
944     if (addr->IsRFC4380())
945         return NET_TEREDO;
946     return addr->GetNetwork();
947 }
948
949 /** Calculates a metric for how reachable (*this) is from a given partner */
950 int CNetAddr::GetReachabilityFrom(const CNetAddr *paddrPartner) const
951 {
952     enum Reachability {
953         REACH_UNREACHABLE,
954         REACH_DEFAULT,
955         REACH_TEREDO,
956         REACH_IPV6_WEAK,
957         REACH_IPV4,
958         REACH_IPV6_STRONG,
959         REACH_PRIVATE
960     };
961
962     if (!IsRoutable())
963         return REACH_UNREACHABLE;
964
965     int ourNet = GetExtNetwork(this);
966     int theirNet = GetExtNetwork(paddrPartner);
967     bool fTunnel = IsRFC3964() || IsRFC6052() || IsRFC6145();
968
969     switch(theirNet) {
970     case NET_IPV4:
971         switch(ourNet) {
972         default:       return REACH_DEFAULT;
973         case NET_IPV4: return REACH_IPV4;
974         }
975     case NET_IPV6:
976         switch(ourNet) {
977         default:         return REACH_DEFAULT;
978         case NET_TEREDO: return REACH_TEREDO;
979         case NET_IPV4:   return REACH_IPV4;
980         case NET_IPV6:   return fTunnel ? REACH_IPV6_WEAK : REACH_IPV6_STRONG; // only prefer giving our IPv6 address if it's not tunnelled
981         }
982     case NET_TOR:
983         switch(ourNet) {
984         default:         return REACH_DEFAULT;
985         case NET_IPV4:   return REACH_IPV4; // Tor users can connect to IPv4 as well
986         case NET_TOR:    return REACH_PRIVATE;
987         }
988     case NET_I2P:
989         switch(ourNet) {
990         default:         return REACH_DEFAULT;
991         case NET_I2P:    return REACH_PRIVATE;
992         }
993     case NET_TEREDO:
994         switch(ourNet) {
995         default:          return REACH_DEFAULT;
996         case NET_TEREDO:  return REACH_TEREDO;
997         case NET_IPV6:    return REACH_IPV6_WEAK;
998         case NET_IPV4:    return REACH_IPV4;
999         }
1000     case NET_UNKNOWN:
1001     case NET_UNROUTABLE:
1002     default:
1003         switch(ourNet) {
1004         default:          return REACH_DEFAULT;
1005         case NET_TEREDO:  return REACH_TEREDO;
1006         case NET_IPV6:    return REACH_IPV6_WEAK;
1007         case NET_IPV4:    return REACH_IPV4;
1008         case NET_I2P:     return REACH_PRIVATE; // assume connections from unroutable addresses are
1009         case NET_TOR:     return REACH_PRIVATE; // either from Tor/I2P, or don't care about our address
1010         }
1011     }
1012 }
1013
1014 void CService::Init()
1015 {
1016     port = 0;
1017 }
1018
1019 CService::CService()
1020 {
1021     Init();
1022 }
1023
1024 CService::CService(const CNetAddr& cip, unsigned short portIn) : CNetAddr(cip), port(portIn)
1025 {
1026 }
1027
1028 CService::CService(const struct in_addr& ipv4Addr, unsigned short portIn) : CNetAddr(ipv4Addr), port(portIn)
1029 {
1030 }
1031
1032 #ifdef USE_IPV6
1033 CService::CService(const struct in6_addr& ipv6Addr, unsigned short portIn) : CNetAddr(ipv6Addr), port(portIn)
1034 {
1035 }
1036 #endif
1037
1038 CService::CService(const struct sockaddr_in& addr) : CNetAddr(addr.sin_addr), port(ntohs(addr.sin_port))
1039 {
1040     assert(addr.sin_family == AF_INET);
1041 }
1042
1043 #ifdef USE_IPV6
1044 CService::CService(const struct sockaddr_in6 &addr) : CNetAddr(addr.sin6_addr), port(ntohs(addr.sin6_port))
1045 {
1046    assert(addr.sin6_family == AF_INET6);
1047 }
1048 #endif
1049
1050 bool CService::SetSockAddr(const struct sockaddr *paddr)
1051 {
1052     switch (paddr->sa_family) {
1053     case AF_INET:
1054         *this = CService(*(const struct sockaddr_in*)paddr);
1055         return true;
1056 #ifdef USE_IPV6
1057     case AF_INET6:
1058         *this = CService(*(const struct sockaddr_in6*)paddr);
1059         return true;
1060 #endif
1061     default:
1062         return false;
1063     }
1064 }
1065
1066 CService::CService(const char *pszIpPort, bool fAllowLookup)
1067 {
1068     Init();
1069     CService ip;
1070     if (Lookup(pszIpPort, ip, 0, fAllowLookup))
1071         *this = ip;
1072 }
1073
1074 CService::CService(const char *pszIpPort, int portDefault, bool fAllowLookup)
1075 {
1076     Init();
1077     CService ip;
1078     if (Lookup(pszIpPort, ip, portDefault, fAllowLookup))
1079         *this = ip;
1080 }
1081
1082 CService::CService(const std::string &strIpPort, bool fAllowLookup)
1083 {
1084     Init();
1085     CService ip;
1086     if (Lookup(strIpPort.c_str(), ip, 0, fAllowLookup))
1087         *this = ip;
1088 }
1089
1090 CService::CService(const std::string &strIpPort, int portDefault, bool fAllowLookup)
1091 {
1092     Init();
1093     CService ip;
1094     if (Lookup(strIpPort.c_str(), ip, portDefault, fAllowLookup))
1095         *this = ip;
1096 }
1097
1098 unsigned short CService::GetPort() const
1099 {
1100     return port;
1101 }
1102
1103 bool operator==(const CService& a, const CService& b)
1104 {
1105     return (CNetAddr)a == (CNetAddr)b && a.port == b.port;
1106 }
1107
1108 bool operator!=(const CService& a, const CService& b)
1109 {
1110     return (CNetAddr)a != (CNetAddr)b || a.port != b.port;
1111 }
1112
1113 bool operator<(const CService& a, const CService& b)
1114 {
1115     return (CNetAddr)a < (CNetAddr)b || ((CNetAddr)a == (CNetAddr)b && a.port < b.port);
1116 }
1117
1118 bool CService::GetSockAddr(struct sockaddr* paddr, socklen_t *addrlen) const
1119 {
1120     if (IsIPv4()) {
1121         if (*addrlen < (socklen_t)sizeof(struct sockaddr_in))
1122             return false;
1123         *addrlen = sizeof(struct sockaddr_in);
1124         struct sockaddr_in *paddrin = (struct sockaddr_in*)paddr;
1125         memset(paddrin, 0, *addrlen);
1126         if (!GetInAddr(&paddrin->sin_addr))
1127             return false;
1128         paddrin->sin_family = AF_INET;
1129         paddrin->sin_port = htons(port);
1130         return true;
1131     }
1132 #ifdef USE_IPV6
1133     if (IsIPv6()) {
1134         if (*addrlen < (socklen_t)sizeof(struct sockaddr_in6))
1135             return false;
1136         *addrlen = sizeof(struct sockaddr_in6);
1137         struct sockaddr_in6 *paddrin6 = (struct sockaddr_in6*)paddr;
1138         memset(paddrin6, 0, *addrlen);
1139         if (!GetIn6Addr(&paddrin6->sin6_addr))
1140             return false;
1141         paddrin6->sin6_family = AF_INET6;
1142         paddrin6->sin6_port = htons(port);
1143         return true;
1144     }
1145 #endif
1146     return false;
1147 }
1148
1149 std::vector<unsigned char> CService::GetKey() const
1150 {
1151      std::vector<unsigned char> vKey;
1152      vKey.resize(18);
1153      memcpy(&vKey[0], ip, 16);
1154      vKey[16] = port / 0x100;
1155      vKey[17] = port & 0x0FF;
1156      return vKey;
1157 }
1158
1159 std::string CService::ToStringPort() const
1160 {
1161     return strprintf("%u", port);
1162 }
1163
1164 std::string CService::ToStringIPPort() const
1165 {
1166     if (IsIPv4() || IsTor() || IsI2P()) {
1167         return ToStringIP() + ":" + ToStringPort();
1168     } else {
1169         return "[" + ToStringIP() + "]:" + ToStringPort();
1170     }
1171 }
1172
1173 std::string CService::ToString() const
1174 {
1175     return ToStringIPPort();
1176 }
1177
1178 void CService::print() const
1179 {
1180     printf("CService(%s)\n", ToString().c_str());
1181 }
1182
1183 void CService::SetPort(unsigned short portIn)
1184 {
1185     port = portIn;
1186 }