-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | Start and stop a temporary postgres for testing
--   
--   This module provides functions greating a temporary postgres instance
--   on a random port for testing.
--   
--   <pre>
--   result &lt;- 'start' []
--   case result of
--     Left err -&gt; print err
--     Right tempDB -&gt; do
--       -- Do stuff
--       'stop' tempDB
--   </pre>
--   
--   @
--   
--   The are few different methods for starting <tt>postgres</tt> which
--   provide different methods of dealing with <tt>stdout</tt> and
--   <tt>stderr</tt>.
--   
--   The start methods use a config based on the one used by <a>pg_tmp</a>,
--   but can be overriden by in different values to the first argument of
--   the start functions.
@package tmp-postgres
@version 0.1.0.1

module Database.Postgres.Temp.Internal
openFreePort :: IO Int
waitForDB :: FilePath -> Int -> IO ()
data DB
DB :: FilePath -> String -> ProcessHandle -> DB

-- | Temporary directory where the unix socket, logs and data directory
--   live.
[mainDir] :: DB -> FilePath

-- | PostgreSQL connection string.
[connectionString] :: DB -> String

-- | The process handle for the <tt>postgres</tt> process.
[pid] :: DB -> ProcessHandle

-- | start postgres and use the current processes stdout and stderr
start :: [(String, String)] -> IO (Either StartError DB)
fourth :: (a, b, c, d) -> d
shellWith :: Handle -> Handle -> String -> CreateProcess
config :: FilePath -> String
data StartError
InitDBFailed :: ExitCode -> StartError
CreateDBFailed :: ExitCode -> StartError
throwIfError :: (ExitCode -> StartError) -> ExitCode -> IO ()
pidString :: ProcessHandle -> IO String
runProcessWith :: Handle -> Handle -> String -> String -> IO ExitCode

-- | Start postgres and pass in handles for stdout and stderr
startWithHandles :: [(String, String)] -> Handle -> Handle -> IO (Either StartError DB)
startWithHandlesAndDir :: [(String, String)] -> FilePath -> Handle -> Handle -> IO (Either StartError DB)
data Event
InitDB :: Event
WriteConfig :: Event
FreePort :: Event
StartPostgres :: Event
WaitForDB :: Event
CreateDB :: Event
Finished :: Event
rmDirIgnoreErrors :: FilePath -> IO ()
startWithLogger :: (Event -> IO ()) -> [(String, String)] -> FilePath -> Handle -> Handle -> IO (Either StartError DB)

-- | Start postgres and log it's all stdout to {<a>mainDir</a>}/output.txt
--   and {<a>mainDir</a>}/error.txt
startAndLogToTmp :: [(String, String)] -> IO (Either StartError DB)

-- | Stop postgres and clean up the temporary database folder.
stop :: DB -> IO ExitCode
instance GHC.Classes.Ord Database.Postgres.Temp.Internal.Event
instance GHC.Enum.Bounded Database.Postgres.Temp.Internal.Event
instance GHC.Enum.Enum Database.Postgres.Temp.Internal.Event
instance GHC.Classes.Eq Database.Postgres.Temp.Internal.Event
instance GHC.Show.Show Database.Postgres.Temp.Internal.Event
instance GHC.Classes.Eq Database.Postgres.Temp.Internal.StartError
instance GHC.Show.Show Database.Postgres.Temp.Internal.StartError
instance GHC.Exception.Exception Database.Postgres.Temp.Internal.StartError


-- | This module provides functions greating a temporary postgres instance
--   on a random port for testing.
--   
--   <pre>
--   result &lt;- <a>start</a> []
--   case result of
--     Left err -&gt; print err
--     Right tempDB -&gt; do
--        -- Do stuff
--        <a>stop</a> tempDB
--   </pre>
--   
--   The are few different methods for starting <tt>postgres</tt> which
--   provide different methods of dealing with <tt>stdout</tt> and
--   <tt>stderr</tt>.
--   
--   The start methods use a config based on the one used by <a>pg_tmp</a>,
--   but can be overriden by in different values to the first argument of
--   the start functions.
module Database.Postgres.Temp
data DB
DB :: FilePath -> String -> ProcessHandle -> DB

-- | Temporary directory where the unix socket, logs and data directory
--   live.
[mainDir] :: DB -> FilePath

-- | PostgreSQL connection string.
[connectionString] :: DB -> String

-- | The process handle for the <tt>postgres</tt> process.
[pid] :: DB -> ProcessHandle
data StartError
InitDBFailed :: ExitCode -> StartError
CreateDBFailed :: ExitCode -> StartError

-- | start postgres and use the current processes stdout and stderr
start :: [(String, String)] -> IO (Either StartError DB)

-- | Start postgres and log it's all stdout to {<a>mainDir</a>}/output.txt
--   and {<a>mainDir</a>}/error.txt
startAndLogToTmp :: [(String, String)] -> IO (Either StartError DB)

-- | Start postgres and pass in handles for stdout and stderr
startWithHandles :: [(String, String)] -> Handle -> Handle -> IO (Either StartError DB)

-- | Stop postgres and clean up the temporary database folder.
stop :: DB -> IO ExitCode