Safe Haskell	None
Language	Haskell2010

Web.Exhentai.API.Gallery

Synopsis

data GalleryInfo = GalleryInfo {
- title :: Text
- previewLink :: Text
- category :: GalleryCat
- jaTitle :: Text
- uploader :: Text
- rating :: Float
- ratingCount :: Int
- favoriteCount :: Int
- tags :: [(TagCategory, [Text])]
- uploadTime :: UTCTime
- newer :: Maybe Gallery
- parent :: Maybe Gallery
- visibility :: Visibility
- language :: Text
- length :: Int
- archiverLink :: Text
}
data Visibility
- = Visible
- | Replaced
- | Expunged
- | Unknown Text
fetchGalleryInfo :: MonadHttpState m => Gallery -> m GalleryInfo
parseGallery :: Document -> Maybe GalleryInfo

Documentation

data GalleryInfo Source #

Information about a gallery

Constructors

GalleryInfo
Fields title :: Text previewLink :: Text category :: GalleryCat jaTitle :: Text uploader :: Text rating :: Float ratingCount :: Int favoriteCount :: Int tags :: [(TagCategory, [Text])] uploadTime :: UTCTime newer :: Maybe Gallery parent :: Maybe Gallery visibility :: Visibility language :: Text length :: Int archiverLink :: Text

Instances

Instances details

Eq GalleryInfo Source #
Instance details Defined in Web.Exhentai.API.Gallery Methods (==) :: GalleryInfo -> GalleryInfo -> Bool # (/=) :: GalleryInfo -> GalleryInfo -> Bool #
Show GalleryInfo Source #
Instance details Defined in Web.Exhentai.API.Gallery Methods showsPrec :: Int -> GalleryInfo -> ShowS # show :: GalleryInfo -> String # showList :: [GalleryInfo] -> ShowS #
Generic GalleryInfo Source #
Instance details Defined in Web.Exhentai.API.Gallery Associated Types type Rep GalleryInfo :: Type -> Type # Methods from :: GalleryInfo -> Rep GalleryInfo x # to :: Rep GalleryInfo x -> GalleryInfo #
type Rep GalleryInfo Source #
Instance details Defined in Web.Exhentai.API.Gallery type Rep GalleryInfo = D1 ('MetaData "GalleryInfo" "Web.Exhentai.API.Gallery" "exh-0.1.0-inplace" 'False) (C1 ('MetaCons "GalleryInfo" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "title") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :: S1 ('MetaSel ('Just "previewLink") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text)) :: (S1 ('MetaSel ('Just "category") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 GalleryCat) :: S1 ('MetaSel ('Just "jaTitle") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))) :: ((S1 ('MetaSel ('Just "uploader") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :: S1 ('MetaSel ('Just "rating") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Float)) :: (S1 ('MetaSel ('Just "ratingCount") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :: S1 ('MetaSel ('Just "favoriteCount") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Int)))) :: (((S1 ('MetaSel ('Just "tags") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [(TagCategory, [Text])]) :: S1 ('MetaSel ('Just "uploadTime") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 UTCTime)) :: (S1 ('MetaSel ('Just "newer") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Gallery)) :: S1 ('MetaSel ('Just "parent") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Gallery)))) :: ((S1 ('MetaSel ('Just "visibility") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Visibility) :: S1 ('MetaSel ('Just "language") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text)) :: (S1 ('MetaSel ('Just "length") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :*: S1 ('MetaSel ('Just "archiverLink") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))))))

data Visibility Source #

Constructors

Visible
Replaced
Expunged
Unknown Text

Instances

Instances details

Eq Visibility Source #
Instance details Defined in Web.Exhentai.API.Gallery Methods (==) :: Visibility -> Visibility -> Bool # (/=) :: Visibility -> Visibility -> Bool #
Show Visibility Source #
Instance details Defined in Web.Exhentai.API.Gallery Methods showsPrec :: Int -> Visibility -> ShowS # show :: Visibility -> String # showList :: [Visibility] -> ShowS #
Generic Visibility Source #
Instance details Defined in Web.Exhentai.API.Gallery Associated Types type Rep Visibility :: Type -> Type # Methods from :: Visibility -> Rep Visibility x # to :: Rep Visibility x -> Visibility #
type Rep Visibility Source #
Instance details Defined in Web.Exhentai.API.Gallery type Rep Visibility = D1 ('MetaData "Visibility" "Web.Exhentai.API.Gallery" "exh-0.1.0-inplace" 'False) ((C1 ('MetaCons "Visible" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Replaced" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Expunged" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Unknown" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))))

fetchGalleryInfo :: MonadHttpState m => Gallery -> m GalleryInfo Source #

Fetch a gallery's GalleryInfo

parseGallery :: Document -> Maybe GalleryInfo Source #

Extract all gallery informations from a document