import Prelude hiding (log, length, readFile, getContents)
import Control.Concurrent (forkIO, killThread)
-import Control.Monad.State (liftIO)
import Control.Concurrent.MVar (readMVar)
import Data.ByteString.Char8 (ByteString, getContents, readFile)
import qualified FuncTorrent.FileSystem as FS (createMsgChannel, pieceMapFromFile, run)