AWS.EC2.Util

Documentation

list :: Monad m => EC2 m (ResumableSource m a) -> EC2 m [a]

head :: Monad m => EC2 m (ResumableSource m a) -> EC2 m (Maybe a)

each :: Monad m => (a -> m b) -> EC2 m (ResumableSource m a) -> EC2 m ()

eachp :: Monad m => (a -> m b) -> EC2 m (ResumableSource m a) -> EC2 m ()

parallel each

wait

Arguments

:: (MonadIO m, Functor m)

=> (a -> Bool)

condition

-> (Text -> EC2 m [a])

DescribeResources

-> Text

Resource Id

-> EC2 m a

Wait for condition.

 import AWS.EC2
 import AWS.EC2.Types
 import AWS.EC2.Util (asList, wait)
 
 waitForAvailable :: (MonadIO m, Functor m)
     => Text -- ^ ImageId
     -> EC2 m a
 waitForAvailable = wait
     (\img -> imageImageState img == ImageAvailable)
     (\imgId -> asList (describeImages [imgId] [] [] []))

count :: Monad m => EC2 m (ResumableSource m a) -> EC2 m Int

Count resources.

findTag

Arguments

:: Text

resourceKey

-> [ResourceTag]

TagSet

-> Maybe ResourceTag

sleep :: MonadIO m => Int -> EC2 m ()

retry

Arguments

:: forall m a . (MonadBaseControl IO m, MonadResource m)

=> Int

sleep count

-> Int

number of retry

-> EC2 m a

-> EC2 m a