mirror of
https://github.com/simplex-chat/simplexmq.git
synced 2026-03-31 20:36:22 +00:00
bccef0ba47
* Files: main, env, stats, storeLog * Better + transport * Executable * Env * Update Client.hs, Server.hs, and 4 more files... * Answer on request * Delay * Temp file * Bypass cert check * update package.yml, rename * update store log * extend HTTP2 transport * refactor caStore * HTTP2 body * update server stats * file server/client framework * verify server commands * process FNEW command, CLI test works * simple XFTP server test (fails) * fix test, refactor * upload chunk works * receive file chunk in the client * remove transport handshake * typo Co-authored-by: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com> * fix names --------- Co-authored-by: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com> Co-authored-by: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com>
19 lines
419 B
Haskell
19 lines
419 B
Haskell
module Main where
|
|
|
|
import Control.Logger.Simple
|
|
import Simplex.FileTransfer.Server.Main
|
|
|
|
cfgPath :: FilePath
|
|
cfgPath = "/etc/opt/simplex-xftp"
|
|
|
|
logPath :: FilePath
|
|
logPath = "/var/opt/simplex-xftp"
|
|
|
|
logCfg :: LogConfig
|
|
logCfg = LogConfig {lc_file = Nothing, lc_stderr = True}
|
|
|
|
main :: IO ()
|
|
main = do
|
|
setLogLevel LogDebug -- change to LogError in production
|
|
withGlobalLogging logCfg $ xftpServerCLI cfgPath logPath
|