Source file cli.ml

(* generated by: awso-codegen generate-all --botocore-data vendor/botocore/botocore/data -o aws --runtime-dir lib/runtime/awso --cli-dir awso-cli *)
open Core
open Async
let json_arg = Command.Arg_type.create Yojson.Safe.from_string
let call ?endpoint_url ?profile ?region f m result_to_json error_to_json =
  let region =
    match region with
    | Some region -> Some (Awso.Region.of_string region)
    | None -> None in
  (Awso_async.Cfg.get_exn ?profile ?region ()) >>=
    (fun cfg ->
       (f ?endpoint_url ?cfg:(Some cfg) m) >>=
         (fun result ->
            match result with
            | Error err ->
                (match error_to_json with
                 | None ->
                     failwithf
                       "endpoint error, but no error values defined in boto"
                       ()
                 | Some to_json ->
                     let s = (err |> to_json) |> Yojson.Safe.to_string in
                     failwithf "AWS error: %s" s ())
            | Ok result ->
                ((match result_to_json with
                  | None -> print_endline "ok response from endpoint"
                  | Some to_json ->
                      ((result |> to_json) |> Yojson.Safe.to_string) |>
                        print_endline);
                 return ())))
let create_assistant =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING ClientToken"
       and description =
         flag "description" (optional string) ~doc:"STRING Description"
       and serverSideEncryptionConfiguration =
         flag "server-side-encryption-configuration" (optional json_arg)
           ~doc:"JSON ServerSideEncryptionConfiguration"
       and tags = flag "tags" (optional json_arg) ~doc:"JSON Tags"
       and name = flag "name" (required string) ~doc:"STRING Name"
       and type_ = flag "type-" (required json_arg) ~doc:"JSON AssistantType" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.create_assistant
           (Values.CreateAssistantRequest.make ?clientToken ?description
              ?serverSideEncryptionConfiguration:(Option.map
                                                    ~f:Values.ServerSideEncryptionConfiguration.of_json
                                                    serverSideEncryptionConfiguration)
              ?tags:(Option.map ~f:Values.Tags.of_json tags) ~name
              ~type_:(Values.AssistantType.of_json type_) ())
           (Some Values.CreateAssistantResponse.to_json)
           (Some Values.CreateAssistantResponse.error_to_json)])
let create_assistant_association =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING ClientToken"
       and tags = flag "tags" (optional json_arg) ~doc:"JSON Tags"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and association =
         flag "association" (required json_arg)
           ~doc:"JSON AssistantAssociationInputData"
       and associationType =
         flag "association-type" (required json_arg)
           ~doc:"JSON AssociationType" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.create_assistant_association
           (Values.CreateAssistantAssociationRequest.make ?clientToken
              ?tags:(Option.map ~f:Values.Tags.of_json tags) ~assistantId
              ~association:(Values.AssistantAssociationInputData.of_json
                              association)
              ~associationType:(Values.AssociationType.of_json
                                  associationType) ())
           (Some Values.CreateAssistantAssociationResponse.to_json)
           (Some Values.CreateAssistantAssociationResponse.error_to_json)])
let create_content =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING NonEmptyString"
       and metadata =
         flag "metadata" (optional json_arg) ~doc:"JSON ContentMetadata"
       and overrideLinkOutUri =
         flag "override-link-out-uri" (optional string) ~doc:"STRING Uri"
       and tags = flag "tags" (optional json_arg) ~doc:"JSON Tags"
       and title = flag "title" (optional string) ~doc:"STRING ContentTitle"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and name = flag "name" (required string) ~doc:"STRING Name"
       and uploadId =
         flag "upload-id" (required string) ~doc:"STRING UploadId" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.create_content
           (Values.CreateContentRequest.make ?clientToken
              ?metadata:(Option.map ~f:Values.ContentMetadata.of_json
                           metadata) ?overrideLinkOutUri
              ?tags:(Option.map ~f:Values.Tags.of_json tags) ?title
              ~knowledgeBaseId ~name ~uploadId ())
           (Some Values.CreateContentResponse.to_json)
           (Some Values.CreateContentResponse.error_to_json)])
let create_knowledge_base =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING NonEmptyString"
       and description =
         flag "description" (optional string) ~doc:"STRING Description"
       and renderingConfiguration =
         flag "rendering-configuration" (optional json_arg)
           ~doc:"JSON RenderingConfiguration"
       and serverSideEncryptionConfiguration =
         flag "server-side-encryption-configuration" (optional json_arg)
           ~doc:"JSON ServerSideEncryptionConfiguration"
       and sourceConfiguration =
         flag "source-configuration" (optional json_arg)
           ~doc:"JSON SourceConfiguration"
       and tags = flag "tags" (optional json_arg) ~doc:"JSON Tags"
       and knowledgeBaseType =
         flag "knowledge-base-type" (required json_arg)
           ~doc:"JSON KnowledgeBaseType"
       and name = flag "name" (required string) ~doc:"STRING Name" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.create_knowledge_base
           (Values.CreateKnowledgeBaseRequest.make ?clientToken ?description
              ?renderingConfiguration:(Option.map
                                         ~f:Values.RenderingConfiguration.of_json
                                         renderingConfiguration)
              ?serverSideEncryptionConfiguration:(Option.map
                                                    ~f:Values.ServerSideEncryptionConfiguration.of_json
                                                    serverSideEncryptionConfiguration)
              ?sourceConfiguration:(Option.map
                                      ~f:Values.SourceConfiguration.of_json
                                      sourceConfiguration)
              ?tags:(Option.map ~f:Values.Tags.of_json tags)
              ~knowledgeBaseType:(Values.KnowledgeBaseType.of_json
                                    knowledgeBaseType) ~name ())
           (Some Values.CreateKnowledgeBaseResponse.to_json)
           (Some Values.CreateKnowledgeBaseResponse.error_to_json)])
let create_quick_response =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and channels =
         flag "channels" (optional json_arg) ~doc:"JSON Channels"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING NonEmptyString"
       and contentType =
         flag "content-type" (optional string)
           ~doc:"STRING QuickResponseType"
       and description =
         flag "description" (optional string)
           ~doc:"STRING QuickResponseDescription"
       and groupingConfiguration =
         flag "grouping-configuration" (optional json_arg)
           ~doc:"JSON GroupingConfiguration"
       and isActive = flag "is-active" (optional bool) ~doc:"BOOL Boolean"
       and language =
         flag "language" (optional string) ~doc:"STRING LanguageCode"
       and shortcutKey =
         flag "shortcut-key" (optional string) ~doc:"STRING ShortCutKey"
       and tags = flag "tags" (optional json_arg) ~doc:"JSON Tags"
       and content =
         flag "content" (required json_arg)
           ~doc:"JSON QuickResponseDataProvider"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and name =
         flag "name" (required string) ~doc:"STRING QuickResponseName" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.create_quick_response
           (Values.CreateQuickResponseRequest.make
              ?channels:(Option.map ~f:Values.Channels.of_json channels)
              ?clientToken ?contentType ?description
              ?groupingConfiguration:(Option.map
                                        ~f:Values.GroupingConfiguration.of_json
                                        groupingConfiguration) ?isActive
              ?language ?shortcutKey
              ?tags:(Option.map ~f:Values.Tags.of_json tags)
              ~content:(Values.QuickResponseDataProvider.of_json content)
              ~knowledgeBaseId ~name ())
           (Some Values.CreateQuickResponseResponse.to_json)
           (Some Values.CreateQuickResponseResponse.error_to_json)])
let create_session =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING ClientToken"
       and description =
         flag "description" (optional string) ~doc:"STRING Description"
       and tags = flag "tags" (optional json_arg) ~doc:"JSON Tags"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and name = flag "name" (required string) ~doc:"STRING Name" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.create_session
           (Values.CreateSessionRequest.make ?clientToken ?description
              ?tags:(Option.map ~f:Values.Tags.of_json tags) ~assistantId
              ~name ()) (Some Values.CreateSessionResponse.to_json)
           (Some Values.CreateSessionResponse.error_to_json)])
let delete_assistant =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.delete_assistant
           (Values.DeleteAssistantRequest.make ~assistantId ())
           (Some Values.DeleteAssistantResponse.to_json)
           (Some Values.DeleteAssistantResponse.error_to_json)])
let delete_assistant_association =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and assistantAssociationId =
         flag "assistant-association-id" (required string)
           ~doc:"STRING UuidOrArn"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.delete_assistant_association
           (Values.DeleteAssistantAssociationRequest.make
              ~assistantAssociationId ~assistantId ())
           (Some Values.DeleteAssistantAssociationResponse.to_json)
           (Some Values.DeleteAssistantAssociationResponse.error_to_json)])
let delete_content =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and contentId =
         flag "content-id" (required string) ~doc:"STRING UuidOrArn"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.delete_content
           (Values.DeleteContentRequest.make ~contentId ~knowledgeBaseId ())
           (Some Values.DeleteContentResponse.to_json)
           (Some Values.DeleteContentResponse.error_to_json)])
let delete_import_job =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and importJobId =
         flag "import-job-id" (required string) ~doc:"STRING Uuid"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.delete_import_job
           (Values.DeleteImportJobRequest.make ~importJobId ~knowledgeBaseId
              ()) (Some Values.DeleteImportJobResponse.to_json)
           (Some Values.DeleteImportJobResponse.error_to_json)])
let delete_knowledge_base =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.delete_knowledge_base
           (Values.DeleteKnowledgeBaseRequest.make ~knowledgeBaseId ())
           (Some Values.DeleteKnowledgeBaseResponse.to_json)
           (Some Values.DeleteKnowledgeBaseResponse.error_to_json)])
let delete_quick_response =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and quickResponseId =
         flag "quick-response-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.delete_quick_response
           (Values.DeleteQuickResponseRequest.make ~knowledgeBaseId
              ~quickResponseId ())
           (Some Values.DeleteQuickResponseResponse.to_json)
           (Some Values.DeleteQuickResponseResponse.error_to_json)])
let get_assistant =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_assistant (Values.GetAssistantRequest.make ~assistantId ())
           (Some Values.GetAssistantResponse.to_json)
           (Some Values.GetAssistantResponse.error_to_json)])
let get_assistant_association =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and assistantAssociationId =
         flag "assistant-association-id" (required string)
           ~doc:"STRING UuidOrArn"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_assistant_association
           (Values.GetAssistantAssociationRequest.make
              ~assistantAssociationId ~assistantId ())
           (Some Values.GetAssistantAssociationResponse.to_json)
           (Some Values.GetAssistantAssociationResponse.error_to_json)])
let get_content =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and contentId =
         flag "content-id" (required string) ~doc:"STRING UuidOrArn"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_content
           (Values.GetContentRequest.make ~contentId ~knowledgeBaseId ())
           (Some Values.GetContentResponse.to_json)
           (Some Values.GetContentResponse.error_to_json)])
let get_content_summary =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and contentId =
         flag "content-id" (required string) ~doc:"STRING UuidOrArn"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_content_summary
           (Values.GetContentSummaryRequest.make ~contentId ~knowledgeBaseId
              ()) (Some Values.GetContentSummaryResponse.to_json)
           (Some Values.GetContentSummaryResponse.error_to_json)])
let get_import_job =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and importJobId =
         flag "import-job-id" (required string) ~doc:"STRING Uuid"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_import_job
           (Values.GetImportJobRequest.make ~importJobId ~knowledgeBaseId ())
           (Some Values.GetImportJobResponse.to_json)
           (Some Values.GetImportJobResponse.error_to_json)])
let get_knowledge_base =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_knowledge_base
           (Values.GetKnowledgeBaseRequest.make ~knowledgeBaseId ())
           (Some Values.GetKnowledgeBaseResponse.to_json)
           (Some Values.GetKnowledgeBaseResponse.error_to_json)])
let get_quick_response =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and quickResponseId =
         flag "quick-response-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_quick_response
           (Values.GetQuickResponseRequest.make ~knowledgeBaseId
              ~quickResponseId ())
           (Some Values.GetQuickResponseResponse.to_json)
           (Some Values.GetQuickResponseResponse.error_to_json)])
let get_recommendations =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and waitTimeSeconds =
         flag "wait-time-seconds" (optional int) ~doc:"INT WaitTimeSeconds"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and sessionId =
         flag "session-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_recommendations
           (Values.GetRecommendationsRequest.make ?maxResults
              ?waitTimeSeconds ~assistantId ~sessionId ())
           (Some Values.GetRecommendationsResponse.to_json)
           (Some Values.GetRecommendationsResponse.error_to_json)])
let get_session =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and sessionId =
         flag "session-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.get_session
           (Values.GetSessionRequest.make ~assistantId ~sessionId ())
           (Some Values.GetSessionResponse.to_json)
           (Some Values.GetSessionResponse.error_to_json)])
let list_assistant_associations =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NextToken"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_assistant_associations
           (Values.ListAssistantAssociationsRequest.make ?maxResults
              ?nextToken ~assistantId ())
           (Some Values.ListAssistantAssociationsResponse.to_json)
           (Some Values.ListAssistantAssociationsResponse.error_to_json)])
let list_assistants =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NextToken" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_assistants
           (Values.ListAssistantsRequest.make ?maxResults ?nextToken ())
           (Some Values.ListAssistantsResponse.to_json)
           (Some Values.ListAssistantsResponse.error_to_json)])
let list_contents =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NextToken"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_contents
           (Values.ListContentsRequest.make ?maxResults ?nextToken
              ~knowledgeBaseId ()) (Some Values.ListContentsResponse.to_json)
           (Some Values.ListContentsResponse.error_to_json)])
let list_import_jobs =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NonEmptyString"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_import_jobs
           (Values.ListImportJobsRequest.make ?maxResults ?nextToken
              ~knowledgeBaseId ())
           (Some Values.ListImportJobsResponse.to_json)
           (Some Values.ListImportJobsResponse.error_to_json)])
let list_knowledge_bases =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NonEmptyString" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_knowledge_bases
           (Values.ListKnowledgeBasesRequest.make ?maxResults ?nextToken ())
           (Some Values.ListKnowledgeBasesResponse.to_json)
           (Some Values.ListKnowledgeBasesResponse.error_to_json)])
let list_quick_responses =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NonEmptyString"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_quick_responses
           (Values.ListQuickResponsesRequest.make ?maxResults ?nextToken
              ~knowledgeBaseId ())
           (Some Values.ListQuickResponsesResponse.to_json)
           (Some Values.ListQuickResponsesResponse.error_to_json)])
let list_tags_for_resource =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and resourceArn =
         flag "resource-arn" (required string) ~doc:"STRING Arn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.list_tags_for_resource
           (Values.ListTagsForResourceRequest.make ~resourceArn ())
           (Some Values.ListTagsForResourceResponse.to_json)
           (Some Values.ListTagsForResourceResponse.error_to_json)])
let notify_recommendations_received =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and recommendationIds =
         flag "recommendation-ids" (required json_arg)
           ~doc:"JSON RecommendationIdList"
       and sessionId =
         flag "session-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.notify_recommendations_received
           (Values.NotifyRecommendationsReceivedRequest.make ~assistantId
              ~recommendationIds:(Values.RecommendationIdList.of_json
                                    recommendationIds) ~sessionId ())
           (Some Values.NotifyRecommendationsReceivedResponse.to_json)
           (Some Values.NotifyRecommendationsReceivedResponse.error_to_json)])
let query_assistant =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NextToken"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and queryText =
         flag "query-text" (required string) ~doc:"STRING QueryText" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.query_assistant
           (Values.QueryAssistantRequest.make ?maxResults ?nextToken
              ~assistantId ~queryText ())
           (Some Values.QueryAssistantResponse.to_json)
           (Some Values.QueryAssistantResponse.error_to_json)])
let remove_knowledge_base_template_uri =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.remove_knowledge_base_template_uri
           (Values.RemoveKnowledgeBaseTemplateUriRequest.make
              ~knowledgeBaseId ())
           (Some Values.RemoveKnowledgeBaseTemplateUriResponse.to_json)
           (Some Values.RemoveKnowledgeBaseTemplateUriResponse.error_to_json)])
let search_content =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NextToken"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and searchExpression =
         flag "search-expression" (required json_arg)
           ~doc:"JSON SearchExpression" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.search_content
           (Values.SearchContentRequest.make ?maxResults ?nextToken
              ~knowledgeBaseId
              ~searchExpression:(Values.SearchExpression.of_json
                                   searchExpression) ())
           (Some Values.SearchContentResponse.to_json)
           (Some Values.SearchContentResponse.error_to_json)])
let search_quick_responses =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and attributes =
         flag "attributes" (optional json_arg) ~doc:"JSON ContactAttributes"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NonEmptyString"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and searchExpression =
         flag "search-expression" (required json_arg)
           ~doc:"JSON QuickResponseSearchExpression" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.search_quick_responses
           (Values.SearchQuickResponsesRequest.make
              ?attributes:(Option.map ~f:Values.ContactAttributes.of_json
                             attributes) ?maxResults ?nextToken
              ~knowledgeBaseId
              ~searchExpression:(Values.QuickResponseSearchExpression.of_json
                                   searchExpression) ())
           (Some Values.SearchQuickResponsesResponse.to_json)
           (Some Values.SearchQuickResponsesResponse.error_to_json)])
let search_sessions =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and maxResults =
         flag "max-results" (optional int) ~doc:"INT MaxResults"
       and nextToken =
         flag "next-token" (optional string) ~doc:"STRING NextToken"
       and assistantId =
         flag "assistant-id" (required string) ~doc:"STRING UuidOrArn"
       and searchExpression =
         flag "search-expression" (required json_arg)
           ~doc:"JSON SearchExpression" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.search_sessions
           (Values.SearchSessionsRequest.make ?maxResults ?nextToken
              ~assistantId
              ~searchExpression:(Values.SearchExpression.of_json
                                   searchExpression) ())
           (Some Values.SearchSessionsResponse.to_json)
           (Some Values.SearchSessionsResponse.error_to_json)])
let start_content_upload =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and presignedUrlTimeToLive =
         flag "presigned-url-time-to-live" (optional int)
           ~doc:"INT TimeToLive"
       and contentType =
         flag "content-type" (required string) ~doc:"STRING ContentType"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.start_content_upload
           (Values.StartContentUploadRequest.make ?presignedUrlTimeToLive
              ~contentType ~knowledgeBaseId ())
           (Some Values.StartContentUploadResponse.to_json)
           (Some Values.StartContentUploadResponse.error_to_json)])
let start_import_job =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and clientToken =
         flag "client-token" (optional string) ~doc:"STRING NonEmptyString"
       and externalSourceConfiguration =
         flag "external-source-configuration" (optional json_arg)
           ~doc:"JSON ExternalSourceConfiguration"
       and metadata =
         flag "metadata" (optional json_arg) ~doc:"JSON ContentMetadata"
       and importJobType =
         flag "import-job-type" (required json_arg) ~doc:"JSON ImportJobType"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and uploadId =
         flag "upload-id" (required string) ~doc:"STRING UploadId" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.start_import_job
           (Values.StartImportJobRequest.make ?clientToken
              ?externalSourceConfiguration:(Option.map
                                              ~f:Values.ExternalSourceConfiguration.of_json
                                              externalSourceConfiguration)
              ?metadata:(Option.map ~f:Values.ContentMetadata.of_json
                           metadata)
              ~importJobType:(Values.ImportJobType.of_json importJobType)
              ~knowledgeBaseId ~uploadId ())
           (Some Values.StartImportJobResponse.to_json)
           (Some Values.StartImportJobResponse.error_to_json)])
let tag_resource =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and resourceArn =
         flag "resource-arn" (required string) ~doc:"STRING Arn"
       and tags = flag "tags" (required json_arg) ~doc:"JSON Tags" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.tag_resource
           (Values.TagResourceRequest.make ~resourceArn
              ~tags:(Values.Tags.of_json tags) ())
           (Some Values.TagResourceResponse.to_json)
           (Some Values.TagResourceResponse.error_to_json)])
let untag_resource =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and resourceArn =
         flag "resource-arn" (required string) ~doc:"STRING Arn"
       and tagKeys =
         flag "tag-keys" (required json_arg) ~doc:"JSON TagKeyList" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.untag_resource
           (Values.UntagResourceRequest.make ~resourceArn
              ~tagKeys:(Values.TagKeyList.of_json tagKeys) ())
           (Some Values.UntagResourceResponse.to_json)
           (Some Values.UntagResourceResponse.error_to_json)])
let update_content =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and metadata =
         flag "metadata" (optional json_arg) ~doc:"JSON ContentMetadata"
       and overrideLinkOutUri =
         flag "override-link-out-uri" (optional string) ~doc:"STRING Uri"
       and removeOverrideLinkOutUri =
         flag "remove-override-link-out-uri" (optional bool)
           ~doc:"BOOL Boolean"
       and revisionId =
         flag "revision-id" (optional string) ~doc:"STRING NonEmptyString"
       and title = flag "title" (optional string) ~doc:"STRING ContentTitle"
       and uploadId =
         flag "upload-id" (optional string) ~doc:"STRING UploadId"
       and contentId =
         flag "content-id" (required string) ~doc:"STRING UuidOrArn"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.update_content
           (Values.UpdateContentRequest.make
              ?metadata:(Option.map ~f:Values.ContentMetadata.of_json
                           metadata) ?overrideLinkOutUri
              ?removeOverrideLinkOutUri ?revisionId ?title ?uploadId
              ~contentId ~knowledgeBaseId ())
           (Some Values.UpdateContentResponse.to_json)
           (Some Values.UpdateContentResponse.error_to_json)])
let update_knowledge_base_template_uri =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and templateUri =
         flag "template-uri" (required string) ~doc:"STRING Uri" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.update_knowledge_base_template_uri
           (Values.UpdateKnowledgeBaseTemplateUriRequest.make
              ~knowledgeBaseId ~templateUri ())
           (Some Values.UpdateKnowledgeBaseTemplateUriResponse.to_json)
           (Some Values.UpdateKnowledgeBaseTemplateUriResponse.error_to_json)])
let update_quick_response =
  Command.async ~summary:""
    ([%map_open.Command
       let cli_profile =
         flag "-cli-profile" (optional string) ~doc:"NAME aws profile to use"
       and cli_region =
         flag "-cli-region" (optional string) ~doc:"REGION override region"
       and endpoint_url =
         flag "-endpoint-url" (optional string)
           ~doc:"URL override endpoint url"
       and channels =
         flag "channels" (optional json_arg) ~doc:"JSON Channels"
       and content =
         flag "content" (optional json_arg)
           ~doc:"JSON QuickResponseDataProvider"
       and contentType =
         flag "content-type" (optional string)
           ~doc:"STRING QuickResponseType"
       and description =
         flag "description" (optional string)
           ~doc:"STRING QuickResponseDescription"
       and groupingConfiguration =
         flag "grouping-configuration" (optional json_arg)
           ~doc:"JSON GroupingConfiguration"
       and isActive = flag "is-active" (optional bool) ~doc:"BOOL Boolean"
       and language =
         flag "language" (optional string) ~doc:"STRING LanguageCode"
       and name =
         flag "name" (optional string) ~doc:"STRING QuickResponseName"
       and removeDescription =
         flag "remove-description" (optional bool) ~doc:"BOOL Boolean"
       and removeGroupingConfiguration =
         flag "remove-grouping-configuration" (optional bool)
           ~doc:"BOOL Boolean"
       and removeShortcutKey =
         flag "remove-shortcut-key" (optional bool) ~doc:"BOOL Boolean"
       and shortcutKey =
         flag "shortcut-key" (optional string) ~doc:"STRING ShortCutKey"
       and knowledgeBaseId =
         flag "knowledge-base-id" (required string) ~doc:"STRING UuidOrArn"
       and quickResponseId =
         flag "quick-response-id" (required string) ~doc:"STRING UuidOrArn" in
       fun () ->
         call ?endpoint_url ?profile:cli_profile ?region:cli_region
           Io.update_quick_response
           (Values.UpdateQuickResponseRequest.make
              ?channels:(Option.map ~f:Values.Channels.of_json channels)
              ?content:(Option.map
                          ~f:Values.QuickResponseDataProvider.of_json content)
              ?contentType ?description
              ?groupingConfiguration:(Option.map
                                        ~f:Values.GroupingConfiguration.of_json
                                        groupingConfiguration) ?isActive
              ?language ?name ?removeDescription ?removeGroupingConfiguration
              ?removeShortcutKey ?shortcutKey ~knowledgeBaseId
              ~quickResponseId ())
           (Some Values.UpdateQuickResponseResponse.to_json)
           (Some Values.UpdateQuickResponseResponse.error_to_json)])
let main =
  Command.group
    ~summary:((Awso.Service.to_string Values.service) ^ " commands")
    [("create-assistant", create_assistant);
    ("create-assistant-association", create_assistant_association);
    ("create-content", create_content);
    ("create-knowledge-base", create_knowledge_base);
    ("create-quick-response", create_quick_response);
    ("create-session", create_session);
    ("delete-assistant", delete_assistant);
    ("delete-assistant-association", delete_assistant_association);
    ("delete-content", delete_content);
    ("delete-import-job", delete_import_job);
    ("delete-knowledge-base", delete_knowledge_base);
    ("delete-quick-response", delete_quick_response);
    ("get-assistant", get_assistant);
    ("get-assistant-association", get_assistant_association);
    ("get-content", get_content);
    ("get-content-summary", get_content_summary);
    ("get-import-job", get_import_job);
    ("get-knowledge-base", get_knowledge_base);
    ("get-quick-response", get_quick_response);
    ("get-recommendations", get_recommendations);
    ("get-session", get_session);
    ("list-assistant-associations", list_assistant_associations);
    ("list-assistants", list_assistants);
    ("list-contents", list_contents);
    ("list-import-jobs", list_import_jobs);
    ("list-knowledge-bases", list_knowledge_bases);
    ("list-quick-responses", list_quick_responses);
    ("list-tags-for-resource", list_tags_for_resource);
    ("notify-recommendations-received", notify_recommendations_received);
    ("query-assistant", query_assistant);
    ("remove-knowledge-base-template-uri",
      remove_knowledge_base_template_uri);
    ("search-content", search_content);
    ("search-quick-responses", search_quick_responses);
    ("search-sessions", search_sessions);
    ("start-content-upload", start_content_upload);
    ("start-import-job", start_import_job);
    ("tag-resource", tag_resource);
    ("untag-resource", untag_resource);
    ("update-content", update_content);
    ("update-knowledge-base-template-uri",
      update_knowledge_base_template_uri);
    ("update-quick-response", update_quick_response)]