2 files changed, 19 insertions, 0 deletions

diff --git a/bittorrent.cabal b/bittorrent.cabal
index cc45e4c6..c9e04909 100644
--- a/bittorrent.cabal
+++ b/bittorrent.cabal
@@ -63,6 +63,7 @@ library
                        Network.BitTorrent.Core.PeerId
                        Network.BitTorrent.Core.PeerAddr
                        Network.BitTorrent.DHT
+                       Network.BitTorrent.DHT.ContactInfo
                        Network.BitTorrent.DHT.Message
                        Network.BitTorrent.DHT.Query
                        Network.BitTorrent.DHT.Routing
diff --git a/src/Network/BitTorrent/DHT/ContactInfo.hs b/src/Network/BitTorrent/DHT/ContactInfo.hs
new file mode 100644
index 00000000..06d2dac0
--- /dev/null
+++ b/src/Network/BitTorrent/DHT/ContactInfo.hs
@@ -0,0 +1,18 @@
+module Network.BitTorrent.DHT.ContactInfo () where
+import Data.HashMap.Strict as HM
+
+import Data.Torrent.InfoHash
+import Network.BitTorrent.Core
+
+-- increase prefix when table is too large
+-- decrease prefix when table is too small
+-- filter outdated peers
+
+data ContactInfo ip = PeerStore
+  { maxSize    :: Int
+  , prefixSize :: Int
+  , thisNodeId :: NodeId
+
+  , count      :: Int  -- ^ Cached size of the 'peerSet'
+  , peerSet    :: HashMap InfoHash [PeerAddr ip]
+  }