move Main executable to app/ closes #18

src/Hash2Pub/Main.hs

@@ -1,32 +0,0 @@
-module Main where
-
-import           Control.Concurrent
-import           Data.IP            (IPv6, toHostAddress6)
-import           System.Environment
-
-import           Hash2Pub.FediChord
-
-main :: IO ()
-main = do
-    -- ToDo: parse and pass config
-    -- probably use `tomland` for that
-    conf <- readConfig
-    -- ToDo: load persisted caches, bootstrapping nodes …
-    (serverSock, thisNode) <- fediChordInit conf
-    print thisNode
-    print serverSock
-    -- currently no masking is necessary, as there is nothing to clean up
-    cacheWriterThread <- forkIO $ cacheWriter thisNode
-    -- idea: list of bootstrapping nodes, try joining within a timeout
-    -- stop main thread from terminating during development
-    getChar
-    pure ()
-
-readConfig :: IO FediChordConf
-readConfig = do
-    confDomainString : ipString : portString : _ <- getArgs
-    pure $ FediChordConf {
-        confDomain = confDomainString
-      , confIP = toHostAddress6 . read $ ipString
-      , confDhtPort = read portString
-                           }