Safe Haskell	None
Language	Haskell2010

Web.UAParser

Contents

Parsing browser (user agent)
Parsing OS
Parsing Dev

Synopsis

parseUA :: ByteString -> Maybe UAResult
parseUALenient :: ByteString -> UAResult
data UAResult = UAResult {
- uarFamily :: Text
- uarV1 :: Maybe Text
- uarV2 :: Maybe Text
- uarV3 :: Maybe Text
}
uarVersion :: UAResult -> Text
parseOS :: ByteString -> Maybe OSResult
parseOSLenient :: ByteString -> OSResult
data OSResult = OSResult {
- osrFamily :: Text
- osrV1 :: Maybe Text
- osrV2 :: Maybe Text
- osrV3 :: Maybe Text
- osrV4 :: Maybe Text
}
osrVersion :: OSResult -> Text
parseDev :: ByteString -> Maybe DevResult
parseDevLenient :: ByteString -> DevResult
data DevResult = DevResult {
- drFamily :: Text
- drBrand :: Maybe Text
- drModel :: Maybe Text
}

Parsing browser (user agent)

parseUA :: ByteString -> Maybe UAResult #

Parse a given User-Agent string

parseUALenient :: ByteString -> UAResult #

Parser that, upon failure to match a pattern returns a result of family Other with all other fields blank. This is mainly for compatibility with the uap-core test suite

data UAResult #

Results datatype for the parsed User-Agent

Constructors

UAResult
Fields uarFamily :: Text uarV1 :: Maybe Text uarV2 :: Maybe Text uarV3 :: Maybe Text

Instances

Eq UAResult #
Instance details Defined in Web.UAParser Methods (==) :: UAResult -> UAResult -> Bool # (/=) :: UAResult -> UAResult -> Bool #
Data UAResult #
Instance details Defined in Web.UAParser Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> UAResult -> c UAResult # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c UAResult # toConstr :: UAResult -> Constr # dataTypeOf :: UAResult -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c UAResult) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UAResult) # gmapT :: (forall b. Data b => b -> b) -> UAResult -> UAResult # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UAResult -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UAResult -> r # gmapQ :: (forall d. Data d => d -> u) -> UAResult -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> UAResult -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> UAResult -> m UAResult # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> UAResult -> m UAResult # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> UAResult -> m UAResult #
Read UAResult #
Instance details Defined in Web.UAParser Methods readsPrec :: Int -> ReadS UAResult # readList :: ReadS [UAResult] # readPrec :: ReadPrec UAResult # readListPrec :: ReadPrec [UAResult] #
Show UAResult #
Instance details Defined in Web.UAParser Methods showsPrec :: Int -> UAResult -> ShowS # show :: UAResult -> String # showList :: [UAResult] -> ShowS #
Generic UAResult #
Instance details Defined in Web.UAParser Associated Types type Rep UAResult :: Type -> Type # Methods from :: UAResult -> Rep UAResult x # to :: Rep UAResult x -> UAResult #
Default UAResult #
Instance details Defined in Web.UAParser Methods def :: UAResult #
type Rep UAResult #
Instance details Defined in Web.UAParser type Rep UAResult = D1 (MetaData "UAResult" "Web.UAParser" "ua-parser-0.7.5.1-1WiuhVpDgIx8IDiWxBKNif" False) (C1 (MetaCons "UAResult" PrefixI True) ((S1 (MetaSel (Just "uarFamily") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "uarV1") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "uarV2") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :*: S1 (MetaSel (Just "uarV3") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))))

uarVersion :: UAResult -> Text #

Construct a browser version-string from UAResult

Parsing OS

parseOS :: ByteString -> Maybe OSResult #

Parse OS from given User-Agent string

parseOSLenient :: ByteString -> OSResult #

Parser that, upon failure to match a pattern returns a result of family Other with all other fields blank. This is mainly for compatibility with the uap-core test suite

data OSResult #

Result type for parseOS

Constructors

OSResult
Fields osrFamily :: Text osrV1 :: Maybe Text osrV2 :: Maybe Text osrV3 :: Maybe Text osrV4 :: Maybe Text

Instances

Eq OSResult #
Instance details Defined in Web.UAParser Methods (==) :: OSResult -> OSResult -> Bool # (/=) :: OSResult -> OSResult -> Bool #
Data OSResult #
Instance details Defined in Web.UAParser Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> OSResult -> c OSResult # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c OSResult # toConstr :: OSResult -> Constr # dataTypeOf :: OSResult -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c OSResult) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c OSResult) # gmapT :: (forall b. Data b => b -> b) -> OSResult -> OSResult # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> OSResult -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> OSResult -> r # gmapQ :: (forall d. Data d => d -> u) -> OSResult -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> OSResult -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> OSResult -> m OSResult # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> OSResult -> m OSResult # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> OSResult -> m OSResult #
Read OSResult #
Instance details Defined in Web.UAParser Methods readsPrec :: Int -> ReadS OSResult # readList :: ReadS [OSResult] # readPrec :: ReadPrec OSResult # readListPrec :: ReadPrec [OSResult] #
Show OSResult #
Instance details Defined in Web.UAParser Methods showsPrec :: Int -> OSResult -> ShowS # show :: OSResult -> String # showList :: [OSResult] -> ShowS #
Generic OSResult #
Instance details Defined in Web.UAParser Associated Types type Rep OSResult :: Type -> Type # Methods from :: OSResult -> Rep OSResult x # to :: Rep OSResult x -> OSResult #
Default OSResult #
Instance details Defined in Web.UAParser Methods def :: OSResult #
type Rep OSResult #
Instance details Defined in Web.UAParser type Rep OSResult = D1 (MetaData "OSResult" "Web.UAParser" "ua-parser-0.7.5.1-1WiuhVpDgIx8IDiWxBKNif" False) (C1 (MetaCons "OSResult" PrefixI True) ((S1 (MetaSel (Just "osrFamily") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: S1 (MetaSel (Just "osrV1") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) :: (S1 (MetaSel (Just "osrV2") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: (S1 (MetaSel (Just "osrV3") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "osrV4") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))

osrVersion :: OSResult -> Text #

Construct a version string from OSResult

Parsing Dev

parseDev :: ByteString -> Maybe DevResult #

parseDevLenient :: ByteString -> DevResult #

Parser that, upon failure to match a pattern returns a result of family Other with all other fields blank. This is mainly for compatibility with the uap-core test suite

data DevResult #

Result type for parseDev

Constructors

DevResult
Fields drFamily :: Text drBrand :: Maybe Text drModel :: Maybe Text

Instances

Eq DevResult #
Instance details Defined in Web.UAParser Methods (==) :: DevResult -> DevResult -> Bool # (/=) :: DevResult -> DevResult -> Bool #
Data DevResult #
Instance details Defined in Web.UAParser Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> DevResult -> c DevResult # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c DevResult # toConstr :: DevResult -> Constr # dataTypeOf :: DevResult -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c DevResult) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c DevResult) # gmapT :: (forall b. Data b => b -> b) -> DevResult -> DevResult # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> DevResult -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> DevResult -> r # gmapQ :: (forall d. Data d => d -> u) -> DevResult -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> DevResult -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> DevResult -> m DevResult # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> DevResult -> m DevResult # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> DevResult -> m DevResult #
Read DevResult #
Instance details Defined in Web.UAParser Methods readsPrec :: Int -> ReadS DevResult # readList :: ReadS [DevResult] # readPrec :: ReadPrec DevResult # readListPrec :: ReadPrec [DevResult] #
Show DevResult #
Instance details Defined in Web.UAParser Methods showsPrec :: Int -> DevResult -> ShowS # show :: DevResult -> String # showList :: [DevResult] -> ShowS #
Generic DevResult #
Instance details Defined in Web.UAParser Associated Types type Rep DevResult :: Type -> Type # Methods from :: DevResult -> Rep DevResult x # to :: Rep DevResult x -> DevResult #
Default DevResult #
Instance details Defined in Web.UAParser Methods def :: DevResult #
type Rep DevResult #
Instance details Defined in Web.UAParser type Rep DevResult = D1 (MetaData "DevResult" "Web.UAParser" "ua-parser-0.7.5.1-1WiuhVpDgIx8IDiWxBKNif" False) (C1 (MetaCons "DevResult" PrefixI True) (S1 (MetaSel (Just "drFamily") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text) :: (S1 (MetaSel (Just "drBrand") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)) :: S1 (MetaSel (Just "drModel") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))))