Safe Haskell	None
Language	Haskell2010

Arbor.Albedo.Scan.Metadata

Documentation

newtype Proto Source #

Constructors

Proto
Fields unProto :: Int

Instances

Eq Proto Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods (==) :: Proto -> Proto -> Bool # (/=) :: Proto -> Proto -> Bool #
Show Proto Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods showsPrec :: Int -> Proto -> ShowS # show :: Proto -> String # showList :: [Proto] -> ShowS #
Generic Proto Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Associated Types type Rep Proto :: Type -> Type # Methods from :: Proto -> Rep Proto x # to :: Rep Proto x -> Proto #
ToJSON Proto Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods toJSON :: Proto -> Value # toEncoding :: Proto -> Encoding # toJSONList :: [Proto] -> Value # toEncodingList :: [Proto] -> Encoding #
FromJSON Proto Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods parseJSON :: Value -> Parser Proto # parseJSONList :: Value -> Parser [Proto] #
type Rep Proto Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata type Rep Proto = D1 (MetaData "Proto" "Arbor.Albedo.Scan.Metadata" "scan-metadata-0.2.1.0-MKaeJ1CbSWDfAIOXmVQJB" True) (C1 (MetaCons "Proto" PrefixI True) (S1 (MetaSel (Just "unProto") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)))

data Command Source #

Constructors

Command
Fields name :: Maybe String scanner :: Maybe String probe :: Maybe String probeBanner :: Maybe String probeArgs :: Maybe String port :: Int proto :: Proto destination :: Either FilePath S3Uri cidr :: IpBlock Canonical deadline :: UTCTime banners :: Bool

Instances

Eq Command Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods (==) :: Command -> Command -> Bool # (/=) :: Command -> Command -> Bool #
Show Command Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods showsPrec :: Int -> Command -> ShowS # show :: Command -> String # showList :: [Command] -> ShowS #
Generic Command Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Associated Types type Rep Command :: Type -> Type # Methods from :: Command -> Rep Command x # to :: Rep Command x -> Command #
ToJSON Command Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods toJSON :: Command -> Value # toEncoding :: Command -> Encoding # toJSONList :: [Command] -> Value # toEncodingList :: [Command] -> Encoding #
FromJSON Command Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods parseJSON :: Value -> Parser Command # parseJSONList :: Value -> Parser [Command] #
type Rep Command Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata type Rep Command = D1 (MetaData "Command" "Arbor.Albedo.Scan.Metadata" "scan-metadata-0.2.1.0-MKaeJ1CbSWDfAIOXmVQJB" False) (C1 (MetaCons "Command" PrefixI True) (((S1 (MetaSel (Just "name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :: S1 (MetaSel (Just "scanner") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String))) :: (S1 (MetaSel (Just "probe") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :: (S1 (MetaSel (Just "probeBanner") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :: S1 (MetaSel (Just "probeArgs") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String))))) :: ((S1 (MetaSel (Just "port") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: (S1 (MetaSel (Just "proto") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Proto) :: S1 (MetaSel (Just "destination") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Either FilePath S3Uri)))) :: (S1 (MetaSel (Just "cidr") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (IpBlock Canonical)) :: (S1 (MetaSel (Just "deadline") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 UTCTime) :: S1 (MetaSel (Just "banners") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool))))))

data ScanMetaData Source #

Constructors

ScanMetaData
Fields startAt :: UTCTime stopAt :: UTCTime provenance :: Maybe String scanCmd :: Command digest :: String port :: Int proto :: Proto cidr :: IpBlock Canonical source :: Maybe String data' :: String

Instances

Eq ScanMetaData Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods (==) :: ScanMetaData -> ScanMetaData -> Bool # (/=) :: ScanMetaData -> ScanMetaData -> Bool #
Show ScanMetaData Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods showsPrec :: Int -> ScanMetaData -> ShowS # show :: ScanMetaData -> String # showList :: [ScanMetaData] -> ShowS #
Generic ScanMetaData Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Associated Types type Rep ScanMetaData :: Type -> Type # Methods from :: ScanMetaData -> Rep ScanMetaData x # to :: Rep ScanMetaData x -> ScanMetaData #
ToJSON ScanMetaData Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods toJSON :: ScanMetaData -> Value # toEncoding :: ScanMetaData -> Encoding # toJSONList :: [ScanMetaData] -> Value # toEncodingList :: [ScanMetaData] -> Encoding #
FromJSON ScanMetaData Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata Methods parseJSON :: Value -> Parser ScanMetaData # parseJSONList :: Value -> Parser [ScanMetaData] #
type Rep ScanMetaData Source #
Instance details Defined in Arbor.Albedo.Scan.Metadata type Rep ScanMetaData = D1 (MetaData "ScanMetaData" "Arbor.Albedo.Scan.Metadata" "scan-metadata-0.2.1.0-MKaeJ1CbSWDfAIOXmVQJB" False) (C1 (MetaCons "ScanMetaData" PrefixI True) (((S1 (MetaSel (Just "startAt") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 UTCTime) :: S1 (MetaSel (Just "stopAt") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 UTCTime)) :: (S1 (MetaSel (Just "provenance") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :: (S1 (MetaSel (Just "scanCmd") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Command) :: S1 (MetaSel (Just "digest") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String)))) :: ((S1 (MetaSel (Just "port") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int) :: S1 (MetaSel (Just "proto") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Proto)) :: (S1 (MetaSel (Just "cidr") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (IpBlock Canonical)) :: (S1 (MetaSel (Just "source") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :*: S1 (MetaSel (Just "data'") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String))))))

readDestination :: String -> Parser (Either FilePath S3Uri) Source #

int64ToUTCTime :: Int64 -> UTCTime Source #

utcTimeToInt64 :: UTCTime -> Int64 Source #

loadScanMetadata :: (MonadUnliftIO m, MonadReader r m, HasType Env r) => S3Uri -> m (Maybe ScanMetaData) Source #