LoggingStatus (u.7f14852b978d6c0e0cad237e28f876a0.awso.0.9.1.doc.awso.redshift.Awso

Sourcetype describeLoggingStatusResult = {

loggingEnabled : Boolean.t option;
(*
true if logging is on, false if logging is off.
*)
bucketName : String_.t option;
(*
The name of the S3 bucket where the log files are stored.
*)
s3KeyPrefix : S3KeyPrefixValue.t option;
(*
The prefix applied to the log file names.
*)
lastSuccessfulDeliveryTime : TStamp.t option;
(*
The last time that logs were delivered.
*)
lastFailureTime : TStamp.t option;
(*
The last time when logs failed to be delivered.
*)
lastFailureMessage : String_.t option;
(*
The message indicating that logs failed to be delivered.
*)
logDestinationType : LogDestinationType.t option;
(*
The log destination type. An enum with possible values of s3 and cloudwatch.
*)
logExports : LogTypeList.t option;
(*
The collection of exported log types. Possible values are connectionlog, useractivitylog, and userlog.
*)

}

Sourceand responseMetaData = unit

Sourceand t = {

describeLoggingStatusResult : describeLoggingStatusResult;
responseMetaData : responseMetaData;

}

Sourcetype error = [

| `ClusterNotFoundFault of ClusterNotFoundFault.t
| `UnsupportedOperationFault of UnsupportedOperationFault.t
| `Unknown_operation_error of string * string option

]

Sourceval context_ : string

Source

val make : 
  ?loggingEnabled:??? ->
  ?bucketName:??? ->
  ?s3KeyPrefix:??? ->
  ?lastSuccessfulDeliveryTime:??? ->
  ?lastFailureTime:??? ->
  ?lastFailureMessage:??? ->
  ?logDestinationType:??? ->
  ?logExports:??? ->
  unit ->
  t

Source

val error_of_json : 
  string ->
  Yojson.Safe.t ->
  [> `ClusterNotFoundFault of unit
  | `Unknown_operation_error of string * string option
  | `UnsupportedOperationFault of unit ]

Source

val error_of_xml : 
  string ->
  Awso.Xml.t ->
  [> `ClusterNotFoundFault of unit
  | `Unknown_operation_error of string * string option
  | `UnsupportedOperationFault of unit ]

Sourceval error_to_json : error -> Yojson.Safe.t

Source

val to_value : 
  t ->
  [> `Structure of
       (string
        * [> `Structure of
               (string
                * [> `Boolean of Boolean.t
                  | `Enum of string
                  | `List of [> `String of String_.t ] list
                  | `String of String_.t
                  | `Timestamp of TStamp.t ])
                 list ])
         list ]

Sourceval to_query : t -> Awso.Client.Query.t

Sourceval of_xml : Awso.Xml.t -> t

Sourceval of_string : string -> t

Sourceval of_json : Yojson.Safe.t -> t

Sourceval to_json : t -> Yojson.Safe.t