Module Values.CreateOriginAccessControlResultSource

Creates a new origin access control in CloudFront. After you create an origin access control, you can add it to an origin in a CloudFront distribution so that CloudFront sends authenticated (signed) requests to the origin. This makes it possible to block public access to the origin, allowing viewers (users) to access the origin's content only through CloudFront. For more information about using a CloudFront origin access control, see Restricting access to an Amazon Web Services origin in the Amazon CloudFront Developer Guide.

Sourcetype nonrec t = {
  1. originAccessControl : OriginAccessControl.t option;
    (*

    Contains an origin access control.

    *)
  2. location : String_.t option;
    (*

    The URL of the origin access control.

    *)
  3. eTag : String_.t option;
    (*

    The version identifier for the current version of the origin access control.

    *)
}
Sourcetype nonrec error = [
  1. | `InvalidArgument of InvalidArgument.t
  2. | `OriginAccessControlAlreadyExists of OriginAccessControlAlreadyExists.t
  3. | `TooManyOriginAccessControls of TooManyOriginAccessControls.t
  4. | `Unknown_operation_error of string * string option
]
Sourceval make : ?originAccessControl:??? -> ?location:??? -> ?eTag:??? -> unit -> t
Sourceval error_of_json : string -> Yojson.Safe.t -> [> `InvalidArgument of InvalidArgument.t | `OriginAccessControlAlreadyExists of OriginAccessControlAlreadyExists.t | `TooManyOriginAccessControls of TooManyOriginAccessControls.t | `Unknown_operation_error of string * string option ]
Sourceval error_of_xml : string -> Awso.Xml.t -> [> `InvalidArgument of InvalidArgument.t | `OriginAccessControlAlreadyExists of OriginAccessControlAlreadyExists.t | `TooManyOriginAccessControls of TooManyOriginAccessControls.t | `Unknown_operation_error of string * string option ]
Sourceval error_to_json : error -> Yojson.Safe.t
Sourceval of_header_and_body : ((string, String_.t) Awso.Import.List.Assoc.t * OriginAccessControl.t) -> t
Sourceval to_value : t -> [> `Structure of (string * [> `String of String_.t | `Structure of (string * [> `String of String_.t | `Structure of (string * [> `Enum of string | `String of String_.t ]) list ]) 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