diff options
author | joe <joe@jerkface.net> | 2017-01-22 01:22:18 -0500 |
---|---|---|
committer | joe <joe@jerkface.net> | 2017-01-22 01:22:18 -0500 |
commit | aab30811698a3b97173043e56e97f46cd3a91776 (patch) | |
tree | 1ddf1e98538e420dce12780bdca173fb879ad725 /src/Network/BitTorrent/DHT/Routing.hs | |
parent | 21e1fdde98a2e263bf8dfc34a2545b0635e358c8 (diff) |
Store external port number, as well as IP.
Diffstat (limited to 'src/Network/BitTorrent/DHT/Routing.hs')
-rw-r--r-- | src/Network/BitTorrent/DHT/Routing.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Network/BitTorrent/DHT/Routing.hs b/src/Network/BitTorrent/DHT/Routing.hs index f9d64eea..c230929e 100644 --- a/src/Network/BitTorrent/DHT/Routing.hs +++ b/src/Network/BitTorrent/DHT/Routing.hs | |||
@@ -327,11 +327,11 @@ defaultBucketCount = 20 | |||
327 | data Info ip = Info | 327 | data Info ip = Info |
328 | { myBuckets :: Table ip | 328 | { myBuckets :: Table ip |
329 | , myNodeId :: NodeId | 329 | , myNodeId :: NodeId |
330 | , myAddress :: ip | 330 | , myAddress :: SockAddr |
331 | } | 331 | } |
332 | deriving (Eq, Show, Generic) | 332 | deriving (Eq, Show, Generic) |
333 | 333 | ||
334 | instance (Eq ip, Serialize ip) => Serialize (Info ip) | 334 | -- instance (Eq ip, Serialize ip) => Serialize (Info ip) |
335 | 335 | ||
336 | -- | The routing table covers the entire 'NodeId' space from 0 to 2 ^ | 336 | -- | The routing table covers the entire 'NodeId' space from 0 to 2 ^ |
337 | -- 160. The routing table is subdivided into 'Bucket's that each cover | 337 | -- 160. The routing table is subdivided into 'Bucket's that each cover |