ڃ      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~Safe$05kSimple data type to represent the target of HTTP requests for servant's automatically-generated clients.URI scheme to usehost (eg "haskell.org") port (eg 80) path (eg "ab/c")URI scheme to usehttp:// https://    None 05<=DIRTClientM; is the monad in which client functions run. Contains the  and - used for requests in the reader environment.79Set body and media type of the request being constructed.2The body is set to the given bytestring using the  constructor.8 9Set body and media type of the request being constructed.2The body is set to the given bytestring using the  constructor.9 9Set body and media type of the request being constructed.A.Try clients in order, last error is preserved.1 !"#$%&'()*+,-./012345 param name param value6789:;<=>?@ABCDEF+ !"#$%&'()*+-/0,.123456789:;<=>?@6&'()*+,-./0././1/2FE$%D !"#3456789:;CBA<=>?@ !"#$%&'()*+,-./0././1/23456789:;<=>?@ABCDEFNone9DRQ1Authenticate a request using Basic AuthenticationQQQQNone9DRRhFor better type inference and to avoid usage of a data family, we newtype wrap the combination of some U8 and a function to add authentication data to a request4NOTE: THIS API IS EXPERIMENTAL AND SUBJECT TO CHANGEUFor a resource protected by authentication (e.g. AuthProtect), we need to provide the client with some data used to add authentication data to a request4NOTE: THIS API IS EXPERIMENTAL AND SUBJECT TO CHANGEV>Handy helper to avoid wrapping datatypes in tuples everywhere.4NOTE: THIS API IS EXPERIMENTAL AND SUBJECT TO CHANGERSTUVRSTUVRSTUVRSTUVNone+,-9:;DQRTW6Singleton type representing a client for an empty API.YThis class lets us define how each API combinator influences the creation of an HTTP request. It's mostly an internal class, you can just use \.\\@ allows you to produce operations to query an API from a client. type MyApi = "books" :> Get '[JSON] [Book] -- GET /books :<|> "books" :> ReqBody '[JSON] Book :> Post '[JSON] Book -- POST /books myApi :: Proxy MyApi myApi = Proxy getAllBooks :: ClientM [Book] postNewBook :: Book -> ClientM Book (getAllBooks :<|> postNewBook) = client myApic"Make the querying function append path to the request path.d If you use a  in one of your endpoints in your API, the corresponding querying function will automatically take an additional argument of the type specified by your g. That function will take care of encoding this argument as JSON and of using it as the request body.(All you need is for your type to have a ToJSON instance.Example: type MyApi = "books" :> ReqBody '[JSON] Book :> Post '[JSON] Book myApi :: Proxy MyApi myApi = Proxy addBook :: Book -> ClientM Book addBook = client myApi -- then you can just use "addBook" to query that endpointePick a MethodK and specify where the server you want to query is. You get back the full .f If you use a s in one of your endpoints in your API, the corresponding querying function will automatically take an additional  argument. If you give ,, nothing will be added to the query string.lOtherwise, this function will insert a value-less query string parameter under the name associated to your .Example: >type MyApi = "books" :> QueryFlag "published" :> Get '[JSON] [Book] myApi :: Proxy MyApi myApi = Proxy getBooks :: Bool -> ClientM [Book] getBooks = client myApi -- then you can just use "getBooks" to query that endpoint. -- 'getBooksBy False' for all books -- 'getBooksBy True' to only get _already published_ booksg If you use a  in one of your endpoints in your API, the corresponding querying function will automatically take an additional argument, a list of values of the type specified by your .EIf you give an empty list, nothing will be added to the query string.Otherwise, this function will take care of inserting a textual representation of your values in the query string, under the same query string parameter name.OYou can control how values for your type are turned into text by specifying a  instance for your type.Example: qtype MyApi = "books" :> QueryParams "authors" Text :> Get '[JSON] [Book] myApi :: Proxy MyApi myApi = Proxy getBooksBy :: [Text] -> ClientM [Book] getBooksBy = client myApi -- then you can just use "getBooksBy" to query that endpoint. -- 'getBooksBy []' for all books -- 'getBooksBy ["Isaac Asimov", "Robert A. Heinlein"]' -- to get all books by Asimov and Heinleinh If you use a  in one of your endpoints in your API, the corresponding querying function will automatically take an additional argument of the type specified by your , enclosed in Maybe.?If you give Nothing, nothing will be added to the query string.If you give a non-n value, this function will take care of inserting a textual representation of this value in the query string.OYou can control how values for your type are turned into text by specifying a  instance for your type.Example: [type MyApi = "books" :> QueryParam "author" Text :> Get '[JSON] [Book] myApi :: Proxy MyApi myApi = Proxy getBooksBy :: Maybe Text -> ClientM [Book] getBooksBy = client myApi -- then you can just use "getBooksBy" to query that endpoint. -- 'getBooksBy Nothing' for all books -- 'getBooksBy (Just "Isaac Asimov")' to get all books by Isaac AsimoviUsing a = combinator in your API doesn't affect the client functions.j If you use a  in one of your endpoints in your API, the corresponding querying function will automatically take an additional argument of the type specified by your , wrapped in Maybe.WThat function will take care of encoding this argument as Text in the request headers.(All you need is for your type to have a  instance.Example: newtype Referer = Referer { referrer :: Text } deriving (Eq, Show, Generic, ToHttpApiData) -- GET /view-my-referer type MyApi = "view-my-referer" :> Header "Referer" Referer :> Get '[JSON] Referer myApi :: Proxy MyApi myApi = Proxy viewReferer :: Maybe Referer -> ClientM Book viewReferer = client myApi -- then you can just use "viewRefer" to query that endpoint -- specifying Nothing or e.g Just "http://haskell.org/" as argumentso If you use a  in one of your endpoints in your API, the corresponding querying function will automatically take an additional argument of a list of the type specified by your |. That function will take care of inserting a textual representation of this value at the right place in the request path.GYou can control how these values are turned into text by specifying a  instance of your type.Example: ]type MyAPI = "src" :> CaptureAll Text -> Get '[JSON] SourceFile myApi :: Proxy myApi = Proxy getSourceFile :: [Text] -> ClientM SourceFile getSourceFile = client myApi -- then you can use "getSourceFile" to query that endpointp If you use a  in one of your endpoints in your API, the corresponding querying function will automatically take an additional argument of the type specified by your |. That function will take care of inserting a textual representation of this value at the right place in the request path.OYou can control how values for this type are turned into text by specifying a  instance for your type.Example: type MyApi = "books" :> Capture "isbn" Text :> Get '[JSON] Book myApi :: Proxy MyApi myApi = Proxy getBook :: Text -> ClientM Book getBook = client myApi -- then you can just use "getBook" to query that endpointqThe client for  is simply W. type MyAPI = "books" :> Get '[JSON] [Book] -- GET /books :<|> "nothing" :> EmptyAPI myApi :: Proxy MyApi myApi = Proxy getAllBooks :: ClientM [Book] (getAllBooks :<|> EmptyClient) = client myApirA client querying function for a  b5 will actually hand you one function for querying a and another one for querying b", stitching them together with #, which really is just like a pair. type MyApi = "books" :> Get '[JSON] [Book] -- GET /books :<|> "books" :> ReqBody '[JSON] Book :> Post Book -- POST /books myApi :: Proxy MyApi myApi = Proxy getAllBooks :: ClientM [Book] postNewBook :: Book -> ClientM Book (getAllBooks :<|> postNewBook) = client myApiWXYZ[\]^_`abcdefghijklmnopqr( &'()*+-/0,.12<RSTUVWXYZ[\!URST\YZ[<V&'()*+,-./0././1/2WXWXYZ[\]^_`abcdefghijklmnopqrNone,69:;<=DQRgMatch client structure with client functions, expanding left-nested API clients in the same structure.mMatch client structure with client functions, regarding left-nested API clients as separate data structures.wTThis class allows us to match client structure with client functions produced with client# without explicit pattern-matching.The client structure needs a  instance.Example: type API = "foo" :> Capture "x" Int :> Get '[JSON] Int :<|> "bar" :> QueryParam "a" Char :> QueryParam "b" String :> Post '[JSON] [Int] :<|> Capture "nested" Int :> NestedAPI type NestedAPI = Get '[JSON] String :<|> "baz" :> QueryParam "c" Char :> Post '[JSON] () data APIClient = APIClient { getFoo :: Int -> ClientM Int , postBar :: Maybe Char -> Maybe String -> ClientM [Int] , mkNestedClient :: Int -> NestedClient } deriving GHC.Generic instance Generics.SOP.Generic APIClient instance (Client API ~ client) => ClientLike client APIClient data NestedClient = NestedClient { getString :: ClientM String , postBaz :: Maybe Char -> ClientM () } deriving GHC.Generic instance Generics.SOP.Generic NestedClient instance (Client NestedAPI ~ client) => ClientLike client NestedClient mkAPIClient :: APIClient mkAPIClient = mkClient (client (Proxy :: Proxy API))2By default, left-nested alternatives are expanded: 2type API1 = "foo" :> Capture "x" Int :> Get '[JSON] Int :<|> "bar" :> QueryParam "a" Char :> Post '[JSON] String type API2 = "baz" :> QueryParam "c" Char :> Post '[JSON] () type API = API1 :<|> API2 data APIClient = APIClient { getFoo :: Int -> ClientM Int , postBar :: Maybe Char -> ClientM String , postBaz :: Maybe Char -> ClientM () } deriving GHC.Generic instance Generics.SOP.Generic APIClient instance (Client API ~ client) => ClientLike client APIClient mkAPIClient :: APIClient mkAPIClient = mkClient (client (Proxy :: Proxy API))!If you want to define client for API1, as a separate data structure, you can use z: Hdata APIClient1 = APIClient1 { getFoo :: Int -> ClientM Int , postBar :: Maybe Char -> ClientM String } deriving GHC.Generic instance Generics.SOP.Generic APIClient1 instance (Client API1 ~ client) => ClientLike client APIClient1 data APIClient = APIClient { mkAPIClient1 :: APIClient1 , postBaz :: Maybe Char -> ClientM () } deriving GHC.Generic instance Generics.SOP.Generic APIClient instance (Client API ~ client) => ClientLike client APIClient where mkClient = genericMkClientP mkAPIClient :: APIClient mkAPIClient = mkClient (client (Proxy :: Proxy API))yXGenerate client structure from client type, expanding left-nested API (done by default).zjGenerate client structure from client type, regarding left-nested API clients as separate data structures.wxyz{|}~wxyzwxxyzwxxyz{|}~      !!"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTTUVWXXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~*servant-client-0.11-4RSSiFzwajNJXShte9KmtCServant.Common.BaseUrlServant.Common.ReqServant.Common.BasicAuth Servant.Client.Experimental.AuthServant.ClientServant.Client.GenericInvalidBaseUrlExceptionBaseUrl baseUrlScheme baseUrlHost baseUrlPort baseUrlPathSchemeHttpHttps showBaseUrl parseBaseUrl"$fExceptionInvalidBaseUrlException $fEqBaseUrl $fShowScheme $fEqScheme $fOrdScheme$fGenericScheme $fShowBaseUrl $fOrdBaseUrl$fGenericBaseUrl$fShowInvalidBaseUrlExceptionClientM runClientM' ClientEnvmanagerbaseUrlReqreqPathqsreqBody reqAcceptheadersUrlReq ServantErrorFailureResponse DecodeFailureUnsupportedContentTypeInvalidContentTypeHeaderConnectionErrorfailingRequestresponseStatusresponseContentType responseBody decodeErrorresponseContentTypeHeaderconnectionErrordefReq appendToPathappendToQueryString addHeader setRQBody setReqBodyLBS setReqBody reqToRequestdisplayHttpRequest runClientMperformRequestperformRequestCTperformRequestNoBodycatchConnectionError $fAltClientM$fMonadBaseControlIOClientM$fMonadBaseIOClientM $fShowUrlReq$fExceptionServantError$fEqServantError$fShowServantError$fFunctorClientM$fApplicativeClientM$fMonadClientM$fMonadIOClientM$fGenericClientM$fMonadReaderClientM$fMonadErrorClientM$fMonadThrowClientM$fMonadCatchClientM basicAuthReqAuthenticateReq unAuthReqAuthClientDatamkAuthenticateReq EmptyClient HasClientClientclientWithRouteclient$fHasClientTYPE:>$fHasClientTYPE:>0$fHasClientTYPEWithNamedContext$fHasClientTYPE:>1$fHasClientTYPE:>2$fHasClientTYPE:>3$fHasClientTYPE:>4$fHasClientTYPE:>5$fHasClientTYPERaw$fHasClientTYPE:>6$fHasClientTYPE:>7$fHasClientTYPE:>8$fHasClientTYPE:>9$fHasClientTYPE:>10$fHasClientTYPEVerb$fHasClientTYPEVerb0$fHasClientTYPEVerb1$fHasClientTYPEVerb2$fHasClientTYPE:>11$fHasClientTYPE:>12$fHasClientTYPEEmptyAPI$fHasClientTYPE:<|>$fEqEmptyClient$fShowEmptyClient$fBoundedEmptyClient$fEnumEmptyClient ClientLikemkClientgenericMkClientLgenericMkClientP$fGClientListclientacc$fGClientList:<|>acc$fGClientLikeL::$fGClientLikeL[][]$fGClientLikePa:$fGClientLikeP:<|>:$fClientLikeClientMClientM$fClientLike(->)(->)*http-client-0.5.6.1-JcO6iZ3VcU558Kh4un1i1nNetwork.HTTP.Client.TypesManagerRequestBodyLBS#servant-0.11-77qE8VReKz19IILdnZSmUwServant.API.ReqBodyReqBodyResponseServant.API.QueryParam QueryFlagghc-prim GHC.TypesBoolFalse QueryParams,http-api-data-0.3.7.1-6bj6dcwYXjxAwVo3ps5GvoWeb.Internal.HttpApiData ToHttpApiData QueryParambaseGHC.BaseNothing'http-types-0.9.1-COjhQ2iwg3pLVlHRwFMXJXNetwork.HTTP.Types.Version HttpVersionServant.API.HeaderHeaderServant.API.Capture CaptureAllCaptureServant.API.EmptyEmptyAPIServant.API.Alternative:<|> GClientLikeL GClientLikeP+generics-sop-0.3.0.0-FWEhOdOpjlQ6CFdmGBqlXKGenerics.SOP.UniverseGeneric GClientList gClientList ClientList gMkClientL gMkClientP