Source file api.ml

open Slack_t

(** APIs signatures--necessary to split the actual implementation in api_remote.ml and mock
    implementation in api_local.ml *)
module type S = sig
  (* messaging *)
  val send_chat_unfurl : ctx:Context.t -> req:chat_unfurl_req -> unit slack_response Lwt.t
  val send_message : ctx:Context.t -> msg:post_message_req -> post_message_res slack_response Lwt.t
  val send_message_webhook : ctx:Context.t -> url:string -> msg:post_message_req -> unit slack_response Lwt.t
  val update_message : ctx:Context.t -> msg:update_message_req -> update_message_res slack_response Lwt.t
  val upload_file : ctx:Context.t -> file:files_upload_req -> files_upload_res slack_response Lwt.t

  (* conversations *)
  val get_replies :
     ctx:Context.t ->
    conversation:conversations_replies_req ->
    conversations_replies_res slack_response Lwt.t

  val get_conversations_info :
     ctx:Context.t ->
    conversation:conversations_info_req ->
    conversations_info_res slack_response Lwt.t

  val join_conversation : ctx:Context.t -> channel:conversations_join_req -> conversations_join_res slack_response Lwt.t

  (* usergroups *)
  val update_usergroup_users :
     ctx:Context.t ->
    usergroup:update_usergroups_users_req ->
    update_usergroups_users_res slack_response Lwt.t

  val list_usergroups : ctx:Context.t -> req:list_usergroups_req -> list_usergroups_res slack_response Lwt.t

  val list_usergroup_users :
     ctx:Context.t ->
    usergroup:list_usergroup_users_req ->
    list_usergroup_users_res slack_response Lwt.t

  (* users *)
  val get_user : ctx:Context.t -> user:user_info_req -> user_info_res slack_response Lwt.t
  val list_users : ctx:Context.t -> req:list_users_req -> list_users_res slack_response Lwt.t

  (* misc *)
  val send_auth_test : ctx:Context.t -> unit -> auth_test_res slack_response Lwt.t
end