Safe Haskell	None
Language	Haskell2010

Web.UAParser

Contents

Parsing browser (user agent)
Parsing OS
Parsing Dev

Synopsis

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 #
Methods (==) :: UAResult -> UAResult -> Bool # (/=) :: UAResult -> UAResult -> Bool #
Data UAResult #
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 #
Methods readsPrec :: Int -> ReadS UAResult # readList :: ReadS [UAResult] # readPrec :: ReadPrec UAResult # readListPrec :: ReadPrec [UAResult] #
Show UAResult #
Methods showsPrec :: Int -> UAResult -> ShowS # show :: UAResult -> String # showList :: [UAResult] -> ShowS #
Generic UAResult #
Associated Types type Rep UAResult :: * -> * # Methods from :: UAResult -> Rep UAResult x # to :: Rep UAResult x -> UAResult #
Default UAResult #
Methods def :: UAResult #
type Rep UAResult #
type Rep UAResult = D1 (MetaData "UAResult" "Web.UAParser" "ua-parser-0.7.4-9hLAzbHOUgMYhGMhzQhds" False) (C1 (MetaCons "UAResult" PrefixI True) ((::) ((::) (S1 (MetaSel (Just Symbol "uarFamily") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) (S1 (MetaSel (Just Symbol "uarV1") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))) ((:*:) (S1 (MetaSel (Just Symbol "uarV2") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) (S1 (MetaSel (Just Symbol "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 #
Methods (==) :: OSResult -> OSResult -> Bool # (/=) :: OSResult -> OSResult -> Bool #
Data OSResult #
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 #
Methods readsPrec :: Int -> ReadS OSResult # readList :: ReadS [OSResult] # readPrec :: ReadPrec OSResult # readListPrec :: ReadPrec [OSResult] #
Show OSResult #
Methods showsPrec :: Int -> OSResult -> ShowS # show :: OSResult -> String # showList :: [OSResult] -> ShowS #
Generic OSResult #
Associated Types type Rep OSResult :: * -> * # Methods from :: OSResult -> Rep OSResult x # to :: Rep OSResult x -> OSResult #
Default OSResult #
Methods def :: OSResult #
type Rep OSResult #
type Rep OSResult = D1 (MetaData "OSResult" "Web.UAParser" "ua-parser-0.7.4-9hLAzbHOUgMYhGMhzQhds" False) (C1 (MetaCons "OSResult" PrefixI True) ((::) ((::) (S1 (MetaSel (Just Symbol "osrFamily") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) (S1 (MetaSel (Just Symbol "osrV1") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text)))) ((::) (S1 (MetaSel (Just Symbol "osrV2") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) ((::) (S1 (MetaSel (Just Symbol "osrV3") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) (S1 (MetaSel (Just Symbol "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 #
Methods (==) :: DevResult -> DevResult -> Bool # (/=) :: DevResult -> DevResult -> Bool #
Data DevResult #
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 #
Methods readsPrec :: Int -> ReadS DevResult # readList :: ReadS [DevResult] # readPrec :: ReadPrec DevResult # readListPrec :: ReadPrec [DevResult] #
Show DevResult #
Methods showsPrec :: Int -> DevResult -> ShowS # show :: DevResult -> String # showList :: [DevResult] -> ShowS #
Generic DevResult #
Associated Types type Rep DevResult :: * -> * # Methods from :: DevResult -> Rep DevResult x # to :: Rep DevResult x -> DevResult #
Default DevResult #
Methods def :: DevResult #
type Rep DevResult #
type Rep DevResult = D1 (MetaData "DevResult" "Web.UAParser" "ua-parser-0.7.4-9hLAzbHOUgMYhGMhzQhds" False) (C1 (MetaCons "DevResult" PrefixI True) ((::) (S1 (MetaSel (Just Symbol "drFamily") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Text)) ((::) (S1 (MetaSel (Just Symbol "drBrand") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))) (S1 (MetaSel (Just Symbol "drModel") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Text))))))