summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/DHT/Routing.hs
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2017-01-22 01:22:18 -0500
committerjoe <joe@jerkface.net>2017-01-22 01:22:18 -0500
commitaab30811698a3b97173043e56e97f46cd3a91776 (patch)
tree1ddf1e98538e420dce12780bdca173fb879ad725 /src/Network/BitTorrent/DHT/Routing.hs
parent21e1fdde98a2e263bf8dfc34a2545b0635e358c8 (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.hs4
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
327data Info ip = Info 327data 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
334instance (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