import GoldenTest (runGoldenTest)
import System.Info (os)
import Test.Tasty (TestTree, defaultMain, testGroup)
import Tests.WaspBuildTest (waspBuild)
import Tests.WaspCompileTest (waspCompile)
import Tests.WaspJobTest (waspJob)
import Tests.WaspMigrateTest (waspMigrate)
import Tests.WaspNewTest (waspNew)

main :: IO ()
main = do
  if os == "mingw32"
    then putStrLn "Skipping end-to-end tests on Windows due to tests using *nix-only commands"
    else tests >>= defaultMain

-- TODO: Add more tests to simulate full Todo app tutorial.
--       Some of this requires waspStart and stdout parsing.
-- TODO: Investigate automatically discovering the tests.
tests :: IO TestTree
tests = do
  testGroup "All Golden Dir Tests"
    <$> mapM
      runGoldenTest
      [ waspNew,
        waspCompile,
        waspMigrate,
        waspBuild,
        waspJob
      ]