Copyright	(c) David Johnson 2016
Maintainer	djohnson.m@gmail.com
Stability	experimental
Portability	POSIX
Safe Haskell	None
Language	Haskell2010

Web.Google.Translate

Contents

Functions
API
Types

Description

Synopsis

Functions

detect :: Manager -> Key -> Body -> IO (Either ServantError DetectionResponse) #

Detect target language

getLanguages :: Manager -> Key -> Maybe Target -> IO (Either ServantError LanguageResponse) #

Retrieve all languages If Target specified, return langauge name in Target langauge.

translate :: Manager -> Key -> Maybe Source -> Target -> Body -> IO (Either ServantError TranslationResponse) #

Perform translation from Source language to Target langauge. If Source not specified, attempt detection of Lang

API

type GoogleTranslateAPI = ("language" :> ("translate" :> ("v2" :> (QueryParam "key" Key :> (QueryParam "source" Source :> (QueryParam "target" Target :> (QueryParam "q" Body :> Get '[JSON] TranslationResponse))))))) :<|> (("language" :> ("translate" :> ("v2" :> ("detect" :> (QueryParam "key" Key :> (QueryParam "q" Body :> Get '[JSON] DetectionResponse)))))) :<|> ("language" :> ("translate" :> ("v2" :> ("languages" :> (QueryParam "key" Key :> (QueryParam "target" Target :> Get '[JSON] LanguageResponse))))))) #

Google Translate API

api :: Proxy GoogleTranslateAPI #

API type

Types

newtype Key #

API Key

Constructors

Key Text

Instances

Eq Key #
Methods (==) :: Key -> Key -> Bool # (/=) :: Key -> Key -> Bool #
Ord Key #
Methods compare :: Key -> Key -> Ordering # (<) :: Key -> Key -> Bool # (<=) :: Key -> Key -> Bool # (>) :: Key -> Key -> Bool # (>=) :: Key -> Key -> Bool # max :: Key -> Key -> Key # min :: Key -> Key -> Key #
Show Key #
Methods showsPrec :: Int -> Key -> ShowS # show :: Key -> String # showList :: [Key] -> ShowS #
ToHttpApiData Key #
Methods toUrlPiece :: Key -> Text # toEncodedUrlPiece :: Key -> Builder # toHeader :: Key -> ByteString # toQueryParam :: Key -> Text #
FromHttpApiData Key #
Methods parseUrlPiece :: Text -> Either Text Key # parseHeader :: ByteString -> Either Text Key # parseQueryParam :: Text -> Either Text Key #

newtype Source #

Source Language

Constructors

Source Lang

Instances

Eq Source #
Methods (==) :: Source -> Source -> Bool # (/=) :: Source -> Source -> Bool #
Ord Source #
Methods compare :: Source -> Source -> Ordering # (<) :: Source -> Source -> Bool # (<=) :: Source -> Source -> Bool # (>) :: Source -> Source -> Bool # (>=) :: Source -> Source -> Bool # max :: Source -> Source -> Source # min :: Source -> Source -> Source #
Show Source #
Methods showsPrec :: Int -> Source -> ShowS # show :: Source -> String # showList :: [Source] -> ShowS #
ToHttpApiData Source #
Methods toUrlPiece :: Source -> Text # toEncodedUrlPiece :: Source -> Builder # toHeader :: Source -> ByteString # toQueryParam :: Source -> Text #

newtype Target #

Target Language

Constructors

Target Lang

Instances

Eq Target #
Methods (==) :: Target -> Target -> Bool # (/=) :: Target -> Target -> Bool #
Ord Target #
Methods compare :: Target -> Target -> Ordering # (<) :: Target -> Target -> Bool # (<=) :: Target -> Target -> Bool # (>) :: Target -> Target -> Bool # (>=) :: Target -> Target -> Bool # max :: Target -> Target -> Target # min :: Target -> Target -> Target #
Show Target #
Methods showsPrec :: Int -> Target -> ShowS # show :: Target -> String # showList :: [Target] -> ShowS #
ToHttpApiData Target #
Methods toUrlPiece :: Target -> Text # toEncodedUrlPiece :: Target -> Builder # toHeader :: Target -> ByteString # toQueryParam :: Target -> Text #

newtype Body #

Text for translation

Constructors

Body Text

Instances

Eq Body #
Methods (==) :: Body -> Body -> Bool # (/=) :: Body -> Body -> Bool #
Ord Body #
Methods compare :: Body -> Body -> Ordering # (<) :: Body -> Body -> Bool # (<=) :: Body -> Body -> Bool # (>) :: Body -> Body -> Bool # (>=) :: Body -> Body -> Bool # max :: Body -> Body -> Body # min :: Body -> Body -> Body #
Show Body #
Methods showsPrec :: Int -> Body -> ShowS # show :: Body -> String # showList :: [Body] -> ShowS #
ToHttpApiData Body #
Methods toUrlPiece :: Body -> Text # toEncodedUrlPiece :: Body -> Builder # toHeader :: Body -> ByteString # toQueryParam :: Body -> Text #
FromHttpApiData Body #
Methods parseUrlPiece :: Text -> Either Text Body # parseHeader :: ByteString -> Either Text Body # parseQueryParam :: Text -> Either Text Body #

data Lang #

Languages for translation

Constructors

Afrikaans
Albanian
Arabic
Armenian
Azerbaijani
Basque
Belarusian
Bengali
Bosnian
Bulgarian
Catalan
Cebuano
Chichewa
ChineseSimplified
ChineseTraditional
Croatian
Czech
Danish
Dutch
English
Esperanto
Estonian
Filipino
Finnish
French
Galician
Georgian
German
Greek
Gujarati
HaitianCreole
Hausa
Hebrew
Hindi
Hmong
Hungarian
Icelandic
Igbo
Indonesian
Irish
Italian
Japanese
Javanese
Kannada
Kazakh
Khmer
Korean
Lao
Latin
Latvian
Lithuanian
Macedonian
Malagasy
Malay
Malayalam
Maltese
Maori
Marathi
Mongolian
MyanmarBurmese
Nepali
Norwegian
Persian
Polish
Portuguese
Punjabi
Romanian
Russian
Serbian
Sesotho
Sinhala
Slovak
Slovenian
Somali
Spanish
Sundanese
Swahili
Swedish
Tajik
Tamil
Telugu
Thai
Turkish
Ukrainian
Urdu
Uzbek
Vietnamese
Welsh
Yiddish
Yoruba
Zulu

Instances

Eq Lang #
Methods (==) :: Lang -> Lang -> Bool # (/=) :: Lang -> Lang -> Bool #
Ord Lang #
Methods compare :: Lang -> Lang -> Ordering # (<) :: Lang -> Lang -> Bool # (<=) :: Lang -> Lang -> Bool # (>) :: Lang -> Lang -> Bool # (>=) :: Lang -> Lang -> Bool # max :: Lang -> Lang -> Lang # min :: Lang -> Lang -> Lang #
Show Lang #
Methods showsPrec :: Int -> Lang -> ShowS # show :: Lang -> String # showList :: [Lang] -> ShowS #
ToJSON Lang #
Methods toJSON :: Lang -> Value # toEncoding :: Lang -> Encoding # toJSONList :: [Lang] -> Value # toEncodingList :: [Lang] -> Encoding #
FromJSON Lang #
Methods parseJSON :: Value -> Parser Lang # parseJSONList :: Value -> Parser [Lang] #
ToHttpApiData Lang #
Methods toUrlPiece :: Lang -> Text # toEncodedUrlPiece :: Lang -> Builder # toHeader :: Lang -> ByteString # toQueryParam :: Lang -> Text #

newtype Confidence #

Confidence

Constructors

Confidence Double

Instances

Eq Confidence #
Methods (==) :: Confidence -> Confidence -> Bool # (/=) :: Confidence -> Confidence -> Bool #
Ord Confidence #
Methods compare :: Confidence -> Confidence -> Ordering # (<) :: Confidence -> Confidence -> Bool # (<=) :: Confidence -> Confidence -> Bool # (>) :: Confidence -> Confidence -> Bool # (>=) :: Confidence -> Confidence -> Bool # max :: Confidence -> Confidence -> Confidence # min :: Confidence -> Confidence -> Confidence #
Show Confidence #
Methods showsPrec :: Int -> Confidence -> ShowS # show :: Confidence -> String # showList :: [Confidence] -> ShowS #
FromJSON Confidence #
Methods parseJSON :: Value -> Parser Confidence # parseJSONList :: Value -> Parser [Confidence] #

newtype IsReliable #

IsReliable

Constructors

IsReliable Bool

Instances

Eq IsReliable #
Methods (==) :: IsReliable -> IsReliable -> Bool # (/=) :: IsReliable -> IsReliable -> Bool #
Ord IsReliable #
Methods compare :: IsReliable -> IsReliable -> Ordering # (<) :: IsReliable -> IsReliable -> Bool # (<=) :: IsReliable -> IsReliable -> Bool # (>) :: IsReliable -> IsReliable -> Bool # (>=) :: IsReliable -> IsReliable -> Bool # max :: IsReliable -> IsReliable -> IsReliable # min :: IsReliable -> IsReliable -> IsReliable #
Show IsReliable #
Methods showsPrec :: Int -> IsReliable -> ShowS # show :: IsReliable -> String # showList :: [IsReliable] -> ShowS #
FromJSON IsReliable #
Methods parseJSON :: Value -> Parser IsReliable # parseJSONList :: Value -> Parser [IsReliable] #

newtype TranslatedText #

Translated Text

Constructors

TranslatedText Text

Instances

Eq TranslatedText #
Methods (==) :: TranslatedText -> TranslatedText -> Bool # (/=) :: TranslatedText -> TranslatedText -> Bool #
Ord TranslatedText #
Methods compare :: TranslatedText -> TranslatedText -> Ordering # (<) :: TranslatedText -> TranslatedText -> Bool # (<=) :: TranslatedText -> TranslatedText -> Bool # (>) :: TranslatedText -> TranslatedText -> Bool # (>=) :: TranslatedText -> TranslatedText -> Bool # max :: TranslatedText -> TranslatedText -> TranslatedText # min :: TranslatedText -> TranslatedText -> TranslatedText #
Show TranslatedText #
Methods showsPrec :: Int -> TranslatedText -> ShowS # show :: TranslatedText -> String # showList :: [TranslatedText] -> ShowS #
FromJSON TranslatedText #
Methods parseJSON :: Value -> Parser TranslatedText # parseJSONList :: Value -> Parser [TranslatedText] #
ToHttpApiData TranslatedText #
Methods toUrlPiece :: TranslatedText -> Text # toEncodedUrlPiece :: TranslatedText -> Builder # toHeader :: TranslatedText -> ByteString # toQueryParam :: TranslatedText -> Text #
FromHttpApiData TranslatedText #
Methods parseUrlPiece :: Text -> Either Text TranslatedText # parseHeader :: ByteString -> Either Text TranslatedText # parseQueryParam :: Text -> Either Text TranslatedText #

data TranslationResponse #

Translation Reponse

Constructors

TranslationResponse
Fields translations :: [Translation]

Instances

Eq TranslationResponse #
Methods (==) :: TranslationResponse -> TranslationResponse -> Bool # (/=) :: TranslationResponse -> TranslationResponse -> Bool #
Ord TranslationResponse #
Methods compare :: TranslationResponse -> TranslationResponse -> Ordering # (<) :: TranslationResponse -> TranslationResponse -> Bool # (<=) :: TranslationResponse -> TranslationResponse -> Bool # (>) :: TranslationResponse -> TranslationResponse -> Bool # (>=) :: TranslationResponse -> TranslationResponse -> Bool # max :: TranslationResponse -> TranslationResponse -> TranslationResponse # min :: TranslationResponse -> TranslationResponse -> TranslationResponse #
Show TranslationResponse #
Methods showsPrec :: Int -> TranslationResponse -> ShowS # show :: TranslationResponse -> String # showList :: [TranslationResponse] -> ShowS #
Generic TranslationResponse #
Associated Types type Rep TranslationResponse :: * -> * # Methods from :: TranslationResponse -> Rep TranslationResponse x # to :: Rep TranslationResponse x -> TranslationResponse #
FromJSON TranslationResponse #
Methods parseJSON :: Value -> Parser TranslationResponse # parseJSONList :: Value -> Parser [TranslationResponse] #
type Rep TranslationResponse #
type Rep TranslationResponse = D1 (MetaData "TranslationResponse" "Web.Google.Translate" "google-translate-0.4.1-5YA0ziVyKgD9UBwEfTSFHK" False) (C1 (MetaCons "TranslationResponse" PrefixI True) (S1 (MetaSel (Just Symbol "translations") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Translation])))

data Translation #

Translation

Constructors

Translation
Fields translatedText :: TranslatedText detectedSourceLanguage :: Maybe Lang

Instances

Eq Translation #
Methods (==) :: Translation -> Translation -> Bool # (/=) :: Translation -> Translation -> Bool #
Ord Translation #
Methods compare :: Translation -> Translation -> Ordering # (<) :: Translation -> Translation -> Bool # (<=) :: Translation -> Translation -> Bool # (>) :: Translation -> Translation -> Bool # (>=) :: Translation -> Translation -> Bool # max :: Translation -> Translation -> Translation # min :: Translation -> Translation -> Translation #
Show Translation #
Methods showsPrec :: Int -> Translation -> ShowS # show :: Translation -> String # showList :: [Translation] -> ShowS #
Generic Translation #
Associated Types type Rep Translation :: * -> * # Methods from :: Translation -> Rep Translation x # to :: Rep Translation x -> Translation #
FromJSON Translation #
Methods parseJSON :: Value -> Parser Translation # parseJSONList :: Value -> Parser [Translation] #
type Rep Translation #
type Rep Translation = D1 (MetaData "Translation" "Web.Google.Translate" "google-translate-0.4.1-5YA0ziVyKgD9UBwEfTSFHK" False) (C1 (MetaCons "Translation" PrefixI True) ((:*:) (S1 (MetaSel (Just Symbol "translatedText") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TranslatedText)) (S1 (MetaSel (Just Symbol "detectedSourceLanguage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Lang)))))

data DetectionResponse #

Detection Response

Constructors

DetectionResponse
Fields detections :: [[Detection]]

Instances

Eq DetectionResponse #
Methods (==) :: DetectionResponse -> DetectionResponse -> Bool # (/=) :: DetectionResponse -> DetectionResponse -> Bool #
Ord DetectionResponse #
Methods compare :: DetectionResponse -> DetectionResponse -> Ordering # (<) :: DetectionResponse -> DetectionResponse -> Bool # (<=) :: DetectionResponse -> DetectionResponse -> Bool # (>) :: DetectionResponse -> DetectionResponse -> Bool # (>=) :: DetectionResponse -> DetectionResponse -> Bool # max :: DetectionResponse -> DetectionResponse -> DetectionResponse # min :: DetectionResponse -> DetectionResponse -> DetectionResponse #
Show DetectionResponse #
Methods showsPrec :: Int -> DetectionResponse -> ShowS # show :: DetectionResponse -> String # showList :: [DetectionResponse] -> ShowS #
Generic DetectionResponse #
Associated Types type Rep DetectionResponse :: * -> * # Methods from :: DetectionResponse -> Rep DetectionResponse x # to :: Rep DetectionResponse x -> DetectionResponse #
FromJSON DetectionResponse #
Methods parseJSON :: Value -> Parser DetectionResponse # parseJSONList :: Value -> Parser [DetectionResponse] #
type Rep DetectionResponse #
type Rep DetectionResponse = D1 (MetaData "DetectionResponse" "Web.Google.Translate" "google-translate-0.4.1-5YA0ziVyKgD9UBwEfTSFHK" False) (C1 (MetaCons "DetectionResponse" PrefixI True) (S1 (MetaSel (Just Symbol "detections") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [[Detection]])))

data Detection #

Detection

Constructors

Detection
Fields language :: Lang isReliable :: IsReliable confidence :: Confidence

Instances

Eq Detection #
Methods (==) :: Detection -> Detection -> Bool # (/=) :: Detection -> Detection -> Bool #
Ord Detection #
Methods compare :: Detection -> Detection -> Ordering # (<) :: Detection -> Detection -> Bool # (<=) :: Detection -> Detection -> Bool # (>) :: Detection -> Detection -> Bool # (>=) :: Detection -> Detection -> Bool # max :: Detection -> Detection -> Detection # min :: Detection -> Detection -> Detection #
Show Detection #
Methods showsPrec :: Int -> Detection -> ShowS # show :: Detection -> String # showList :: [Detection] -> ShowS #
Generic Detection #
Associated Types type Rep Detection :: * -> * # Methods from :: Detection -> Rep Detection x # to :: Rep Detection x -> Detection #
FromJSON Detection #
Methods parseJSON :: Value -> Parser Detection # parseJSONList :: Value -> Parser [Detection] #
type Rep Detection #
type Rep Detection = D1 (MetaData "Detection" "Web.Google.Translate" "google-translate-0.4.1-5YA0ziVyKgD9UBwEfTSFHK" False) (C1 (MetaCons "Detection" PrefixI True) ((::) (S1 (MetaSel (Just Symbol "language") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Lang)) ((::) (S1 (MetaSel (Just Symbol "isReliable") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 IsReliable)) (S1 (MetaSel (Just Symbol "confidence") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Confidence)))))

data LanguageResponse #

Language Response

Constructors

LanguageResponse
Fields languages :: [Language]

Instances

Eq LanguageResponse #
Methods (==) :: LanguageResponse -> LanguageResponse -> Bool # (/=) :: LanguageResponse -> LanguageResponse -> Bool #
Ord LanguageResponse #
Methods compare :: LanguageResponse -> LanguageResponse -> Ordering # (<) :: LanguageResponse -> LanguageResponse -> Bool # (<=) :: LanguageResponse -> LanguageResponse -> Bool # (>) :: LanguageResponse -> LanguageResponse -> Bool # (>=) :: LanguageResponse -> LanguageResponse -> Bool # max :: LanguageResponse -> LanguageResponse -> LanguageResponse # min :: LanguageResponse -> LanguageResponse -> LanguageResponse #
Show LanguageResponse #
Methods showsPrec :: Int -> LanguageResponse -> ShowS # show :: LanguageResponse -> String # showList :: [LanguageResponse] -> ShowS #
Generic LanguageResponse #
Associated Types type Rep LanguageResponse :: * -> * # Methods from :: LanguageResponse -> Rep LanguageResponse x # to :: Rep LanguageResponse x -> LanguageResponse #
FromJSON LanguageResponse #
Methods parseJSON :: Value -> Parser LanguageResponse # parseJSONList :: Value -> Parser [LanguageResponse] #
type Rep LanguageResponse #
type Rep LanguageResponse = D1 (MetaData "LanguageResponse" "Web.Google.Translate" "google-translate-0.4.1-5YA0ziVyKgD9UBwEfTSFHK" False) (C1 (MetaCons "LanguageResponse" PrefixI True) (S1 (MetaSel (Just Symbol "languages") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Language])))

newtype LanguageName #

Language Name

Constructors

LanguageName Text

Instances

Eq LanguageName #
Methods (==) :: LanguageName -> LanguageName -> Bool # (/=) :: LanguageName -> LanguageName -> Bool #
Ord LanguageName #
Methods compare :: LanguageName -> LanguageName -> Ordering # (<) :: LanguageName -> LanguageName -> Bool # (<=) :: LanguageName -> LanguageName -> Bool # (>) :: LanguageName -> LanguageName -> Bool # (>=) :: LanguageName -> LanguageName -> Bool # max :: LanguageName -> LanguageName -> LanguageName # min :: LanguageName -> LanguageName -> LanguageName #
Show LanguageName #
Methods showsPrec :: Int -> LanguageName -> ShowS # show :: LanguageName -> String # showList :: [LanguageName] -> ShowS #
FromJSON LanguageName #
Methods parseJSON :: Value -> Parser LanguageName # parseJSONList :: Value -> Parser [LanguageName] #

data Language #

Language

Constructors

Language
Fields lang :: Lang name :: Maybe LanguageName

Instances

Eq Language #
Methods (==) :: Language -> Language -> Bool # (/=) :: Language -> Language -> Bool #
Ord Language #
Methods compare :: Language -> Language -> Ordering # (<) :: Language -> Language -> Bool # (<=) :: Language -> Language -> Bool # (>) :: Language -> Language -> Bool # (>=) :: Language -> Language -> Bool # max :: Language -> Language -> Language # min :: Language -> Language -> Language #
Show Language #
Methods showsPrec :: Int -> Language -> ShowS # show :: Language -> String # showList :: [Language] -> ShowS #
Generic Language #
Associated Types type Rep Language :: * -> * # Methods from :: Language -> Rep Language x # to :: Rep Language x -> Language #
FromJSON Language #
Methods parseJSON :: Value -> Parser Language # parseJSONList :: Value -> Parser [Language] #
type Rep Language #
type Rep Language = D1 (MetaData "Language" "Web.Google.Translate" "google-translate-0.4.1-5YA0ziVyKgD9UBwEfTSFHK" False) (C1 (MetaCons "Language" PrefixI True) ((:*:) (S1 (MetaSel (Just Symbol "lang") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Lang)) (S1 (MetaSel (Just Symbol "name") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe LanguageName)))))