diff options
Diffstat (limited to 'src/Network')
-rw-r--r-- | src/Network/BitTorrent/DHT/Query.hs | 2 | ||||
-rw-r--r-- | src/Network/BitTorrent/DHT/Session.hs | 2 | ||||
-rw-r--r-- | src/Network/BitTorrent/DHT/Token.hs | 2 | ||||
-rw-r--r-- | src/Network/DHT/Mainline.hs (renamed from src/Network/BitTorrent/DHT/Message.hs) | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/src/Network/BitTorrent/DHT/Query.hs b/src/Network/BitTorrent/DHT/Query.hs index edc238e6..ae072db0 100644 --- a/src/Network/BitTorrent/DHT/Query.hs +++ b/src/Network/BitTorrent/DHT/Query.hs | |||
@@ -86,7 +86,7 @@ import Network.KRPC.Method as KRPC | |||
86 | import Network.DatagramServer.Mainline (ReflectedIP(..)) | 86 | import Network.DatagramServer.Mainline (ReflectedIP(..)) |
87 | import Network.DatagramServer (QueryFailure(..)) | 87 | import Network.DatagramServer (QueryFailure(..)) |
88 | import Data.Torrent | 88 | import Data.Torrent |
89 | import Network.BitTorrent.DHT.Message | 89 | import Network.DHT.Mainline |
90 | import Network.DHT.Routing as R | 90 | import Network.DHT.Routing as R |
91 | import Network.BitTorrent.DHT.Session | 91 | import Network.BitTorrent.DHT.Session |
92 | import Control.Concurrent.STM | 92 | import Control.Concurrent.STM |
diff --git a/src/Network/BitTorrent/DHT/Session.hs b/src/Network/BitTorrent/DHT/Session.hs index e205add4..2d290a95 100644 --- a/src/Network/BitTorrent/DHT/Session.hs +++ b/src/Network/BitTorrent/DHT/Session.hs | |||
@@ -116,7 +116,7 @@ import Network.DatagramServer.Tox as Tox | |||
116 | import Network.Address | 116 | import Network.Address |
117 | import Network.BitTorrent.DHT.ContactInfo (PeerStore) | 117 | import Network.BitTorrent.DHT.ContactInfo (PeerStore) |
118 | import qualified Network.BitTorrent.DHT.ContactInfo as P | 118 | import qualified Network.BitTorrent.DHT.ContactInfo as P |
119 | import Network.BitTorrent.DHT.Message | 119 | import Network.DHT.Mainline |
120 | import Network.DHT.Routing as R | 120 | import Network.DHT.Routing as R |
121 | import Network.BitTorrent.DHT.Token as T | 121 | import Network.BitTorrent.DHT.Token as T |
122 | 122 | ||
diff --git a/src/Network/BitTorrent/DHT/Token.hs b/src/Network/BitTorrent/DHT/Token.hs index 75eadd1a..e3a6b1f6 100644 --- a/src/Network/BitTorrent/DHT/Token.hs +++ b/src/Network/BitTorrent/DHT/Token.hs | |||
@@ -109,7 +109,7 @@ lookup addr TokenMap {..} = makeToken addr curSecret | |||
109 | 109 | ||
110 | -- | Check if token is valid. | 110 | -- | Check if token is valid. |
111 | -- | 111 | -- |
112 | -- Typically used to handle 'Network.BitTorrent.DHT.Message.Announce' | 112 | -- Typically used to handle 'Network.DHT.Mainline.Announce' |
113 | -- query. If token is invalid the 'Network.KRPC.ProtocolError' should | 113 | -- query. If token is invalid the 'Network.KRPC.ProtocolError' should |
114 | -- be sent back to the malicious node. | 114 | -- be sent back to the malicious node. |
115 | member :: Hashable a => NodeAddr a -> Token -> TokenMap -> Bool | 115 | member :: Hashable a => NodeAddr a -> Token -> TokenMap -> Bool |
diff --git a/src/Network/BitTorrent/DHT/Message.hs b/src/Network/DHT/Mainline.hs index e21e0e70..a5f4f606 100644 --- a/src/Network/BitTorrent/DHT/Message.hs +++ b/src/Network/DHT/Mainline.hs | |||
@@ -62,7 +62,7 @@ | |||
62 | {-# LANGUAGE UndecidableInstances #-} | 62 | {-# LANGUAGE UndecidableInstances #-} |
63 | {-# LANGUAGE ScopedTypeVariables #-} | 63 | {-# LANGUAGE ScopedTypeVariables #-} |
64 | {-# LANGUAGE TypeFamilies #-} | 64 | {-# LANGUAGE TypeFamilies #-} |
65 | module Network.BitTorrent.DHT.Message | 65 | module Network.DHT.Mainline |
66 | ( -- * Envelopes | 66 | ( -- * Envelopes |
67 | Query (..) | 67 | Query (..) |
68 | , Response (..) | 68 | , Response (..) |