syncthing-hs-0.1.0.0: Network/Syncthing/Types/Common.hs

{-# LANGUAGE OverloadedStrings #-}

module Network.Syncthing.Types.Common
    (
      Server
    , Device
    , FolderName
    , Path
    , Host
    , Port
    , Addr
    , defaultFolder
    ) where

import           Data.Text (Text)


-- | Use the SERVER:PORT format for specifying servers.
type Server     = Text

type Device     = Text

type FolderName = Text

type Path       = Text

type Host       = Text

type Port       = Int

type Addr       = (Host, Maybe Port)

-- | The default folder name.
defaultFolder :: FolderName
defaultFolder = "default"