graphql-engine/server/tests-dc-api/Test/HealthSpec.hs

18 lines
727 B
Haskell
Raw Normal View History

module Test.HealthSpec (spec) where
import Hasura.Backends.DataConnector.API (Config, Routes (..), SourceName)
import Servant.API (NamedRoutes, NoContent (..))
import Servant.Client (Client, (//))
import Test.Hspec (Spec, describe, it, shouldBe)
import Prelude
spec :: Client IO (NamedRoutes Routes) -> SourceName -> Config -> Spec
spec api sourceName config = describe "health API" $ do
it "returns a successful HTTP status code for a plain healthcheck" $ do
response <- (api // _health) Nothing Nothing
response `shouldBe` NoContent
it "returns a successful HTTP status code for a data source healthcheck" $ do
response <- (api // _health) (Just sourceName) (Just config)
response `shouldBe` NoContent