Up  

Module GapiConversation.Session

module Session: sig .. end
Defines the session that stores the current state of a conversation.
type oauth1_context = {
   token : string; (*
OAuth1 authorized token.
*)
   secret : string; (*
OAuth1 secret associated with the authorized token.
*)
}
Current OAuth1 context.
val token : (oauth1_context, string) GapiLens.t
OAuth1 token lens.
val secret : (oauth1_context, string) GapiLens.t
OAuth1 secret lens.
type oauth2_context = {
   oauth2_token : string; (*
OAuth2 authorized token.
*)
   refresh_token : string; (*
OAuth2 refresh token.
*)
}
Current OAuth2 context.
val oauth2_token : (oauth2_context, string) GapiLens.t
OAuth2 token lens.
val refresh_token : (oauth2_context, string) GapiLens.t
OAuth2 refresh token lens.
type auth_context =
| NoAuth (*
No authorization.
*)
| ClientLogin of string (*
Client Login authorized token.
*)
| OAuth1 of oauth1_context (*
OAuth1 context.
*)
| OAuth2 of oauth2_context (*
OAuth2 context.
*)
Current authorization context.
val no_auth : (auth_context, unit option) GapiLens.t
No authorization lens.
val client_login : (auth_context, string option) GapiLens.t
Client Login token lens.
val oauth1 : (auth_context,
        oauth1_context option)
       GapiLens.t
OAuth1 context lens.
val oauth2 : (auth_context,
        oauth2_context option)
       GapiLens.t
OAuth2 context lens.
type t = {
   curl : [ `Created ] GapiCurl.t; (*
Curl state.
*)
   config : GapiConfig.t; (*
Library configuration.
*)
   auth : auth_context; (*
Current authorization context.
*)
   cookies : string list; (*
Cookies received from the server.
*)
   etag : string; (*
Current resource ETag (received from the server).
*)
}
Session type.
val curl : (t, [ `Created ] GapiCurl.t) GapiLens.t
Curl state lens.
val config : (t, GapiConfig.t) GapiLens.t
Configuration lens.
val auth : (t, auth_context)
       GapiLens.t
Authorization lens.
val cookies : (t, string list) GapiLens.t
Cookies lens.
val etag : (t, string) GapiLens.t
ETag lens.