Aws.hs

module Cloudy.Cmd.Aws where

import Cloudy.LocalConfFile (LocalConfFileOpts)
import Cloudy.Cli (AwsCliOpts (..))
import Cloudy.Cli.Aws (AwsCreateCliOpts (..), AwsListInstanceTypesCliOpts (..))

runAws :: LocalConfFileOpts -> AwsCliOpts -> IO ()
runAws localConfFileOpts = \case
  AwsCreate awsCreateCliOpts -> runAwsCreate localConfFileOpts awsCreateCliOpts
  AwsListInstanceTypes awsListInstanceTypesCliOpts -> runAwsListInstanceTypes localConfFileOpts awsListInstanceTypesCliOpts

runAwsCreate :: LocalConfFileOpts -> AwsCreateCliOpts -> IO ()
runAwsCreate _localConfFileOpts _createCliOpts = undefined

runAwsListInstanceTypes :: LocalConfFileOpts -> AwsListInstanceTypesCliOpts -> IO ()
runAwsListInstanceTypes _localConfFileOpts _listInstanceTypesCliOpts = undefined