mirror of https://github.com/voidlizard/hbs2
wiped extra code
This commit is contained in:
parent
0d3036f7be
commit
9346e8311d
|
@ -5,123 +5,21 @@ import HBS2.Prelude
|
||||||
import PeerTypes
|
import PeerTypes
|
||||||
|
|
||||||
import HBS2.Actors.Peer
|
import HBS2.Actors.Peer
|
||||||
import HBS2.Base58
|
|
||||||
import HBS2.Merkle
|
|
||||||
import HBS2.Defaults
|
import HBS2.Defaults
|
||||||
import HBS2.System.Dir (takeDirectory,(</>))
|
|
||||||
import HBS2.Events
|
import HBS2.Events
|
||||||
import HBS2.Hash
|
|
||||||
import HBS2.Data.Types.Refs
|
|
||||||
import HBS2.Data.Types.SignedBox
|
|
||||||
import HBS2.Data.Types
|
|
||||||
import HBS2.Net.Auth.Credentials
|
import HBS2.Net.Auth.Credentials
|
||||||
import HBS2.Net.Auth.Schema()
|
import HBS2.Net.Auth.Schema()
|
||||||
import HBS2.Net.IP.Addr
|
|
||||||
import HBS2.Net.Messaging.UDP
|
import HBS2.Net.Messaging.UDP
|
||||||
import HBS2.Net.Messaging.TCP
|
|
||||||
import HBS2.Net.Messaging.Unix
|
|
||||||
import HBS2.Net.Messaging.Encrypted.ByPass
|
|
||||||
import HBS2.Net.PeerLocator
|
|
||||||
import HBS2.Peer.Proto
|
import HBS2.Peer.Proto
|
||||||
import HBS2.Peer.Proto.RefChan qualified as R
|
|
||||||
import HBS2.Peer.Proto.RefChan.Adapter
|
|
||||||
import HBS2.Net.Proto.Notify
|
|
||||||
import HBS2.Peer.Proto.Mailbox
|
|
||||||
import HBS2.OrDie
|
|
||||||
import HBS2.Storage.Simple
|
|
||||||
import HBS2.Storage.Operations.Missed
|
|
||||||
import HBS2.Data.Detect
|
|
||||||
|
|
||||||
import HBS2.KeyMan.Keys.Direct
|
|
||||||
|
|
||||||
import HBS2.Version
|
|
||||||
import Paths_hbs2_peer qualified as Pkg
|
|
||||||
|
|
||||||
import Brains
|
|
||||||
import BrainyPeerLocator
|
|
||||||
import ByPassWorker
|
|
||||||
import PeerTypes hiding (info)
|
|
||||||
import BlockDownloadNew
|
|
||||||
import CheckBlockAnnounce (checkBlockAnnounce)
|
import CheckBlockAnnounce (checkBlockAnnounce)
|
||||||
import CheckPeer (peerBanned)
|
|
||||||
import PeerInfo
|
|
||||||
import PeerConfig
|
import PeerConfig
|
||||||
import Bootstrap
|
|
||||||
import CheckMetrics
|
|
||||||
import RefLog qualified
|
|
||||||
import RefLog (reflogWorker)
|
|
||||||
import LWWRef (lwwRefWorker)
|
|
||||||
import MailboxProtoWorker
|
|
||||||
import HttpWorker
|
|
||||||
import DispatchProxy
|
|
||||||
import PeerMeta
|
|
||||||
import Watchdogs
|
|
||||||
import CLI.Common
|
|
||||||
import CLI.RefChan
|
|
||||||
import CLI.LWWRef
|
|
||||||
import CLI.Mailbox
|
|
||||||
import RefChan
|
|
||||||
import RefChanNotifyLog
|
|
||||||
import Fetch (fetchHash)
|
|
||||||
import Log hiding (info)
|
|
||||||
|
|
||||||
import HBS2.Misc.PrettyStuff
|
import HBS2.Misc.PrettyStuff
|
||||||
import HBS2.Peer.RPC.Internal.Types()
|
import HBS2.Peer.RPC.Internal.Types()
|
||||||
import HBS2.Peer.RPC.Internal.Storage()
|
import HBS2.Peer.RPC.Internal.Storage()
|
||||||
|
|
||||||
import HBS2.Peer.RPC.API.Storage
|
|
||||||
import HBS2.Peer.RPC.API.Peer
|
|
||||||
import HBS2.Peer.RPC.API.RefLog
|
|
||||||
import HBS2.Peer.RPC.API.RefChan
|
|
||||||
import HBS2.Peer.RPC.API.LWWRef
|
|
||||||
import HBS2.Peer.RPC.API.Mailbox
|
|
||||||
import HBS2.Peer.Notify
|
|
||||||
import HBS2.Peer.RPC.Client.StorageClient
|
|
||||||
|
|
||||||
import HBS2.Peer.Proto.LWWRef.Internal
|
|
||||||
|
|
||||||
import RPC2(RPC2Context(..))
|
|
||||||
|
|
||||||
import Data.Config.Suckless.Script hiding (optional)
|
|
||||||
import Data.Config.Suckless.Almost.RPC
|
|
||||||
|
|
||||||
import Codec.Serialise as Serialise
|
|
||||||
import Control.Concurrent (myThreadId)
|
|
||||||
-- import Control.Concurrent.STM
|
|
||||||
import Control.Exception as Exception
|
|
||||||
import Control.Monad.Reader
|
|
||||||
import Control.Monad.Trans.Maybe
|
|
||||||
import Control.Monad.Trans.Writer.CPS qualified as W
|
|
||||||
import Crypto.Saltine (sodiumInit)
|
|
||||||
import Data.Aeson qualified as Aeson
|
|
||||||
import Data.ByteString.Lazy qualified as LBS
|
|
||||||
import Data.ByteString qualified as BS
|
|
||||||
import Data.Cache qualified as Cache
|
|
||||||
import Data.Coerce
|
import Data.Coerce
|
||||||
import Data.Fixed
|
|
||||||
import Data.List qualified as L
|
|
||||||
import Data.Map (Map)
|
|
||||||
import Data.Map qualified as Map
|
|
||||||
import Data.Maybe
|
|
||||||
import Data.Either
|
|
||||||
import Data.Set qualified as Set
|
|
||||||
import Data.Set (Set)
|
|
||||||
import Data.Text qualified as Text
|
|
||||||
import Data.Text.IO qualified as Text
|
|
||||||
import Data.Time.Clock.POSIX
|
|
||||||
import Data.Time.Format
|
|
||||||
import Lens.Micro.Platform as Lens
|
import Lens.Micro.Platform as Lens
|
||||||
import Network.Socket
|
|
||||||
import Options.Applicative
|
|
||||||
import Prettyprinter.Render.Terminal
|
|
||||||
import System.Directory
|
|
||||||
import System.Environment
|
|
||||||
import System.Exit
|
|
||||||
import System.IO
|
|
||||||
import System.Mem
|
|
||||||
import System.Metrics
|
|
||||||
import System.Posix.Process
|
|
||||||
import System.Posix.Signals
|
|
||||||
import Control.Monad.Trans.Cont
|
import Control.Monad.Trans.Cont
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue