Synthetics.Canary
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-synthetics-canary.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-s3encryption.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-schedule.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-basescreenshot.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html
and run_config = {
timeout_in_seconds : int option;
environment_variables : string Stdlib__Map.Make(Stdlib.String).t option;
memory_in_mb : int option;
active_tracing : bool option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-runconfig.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-vpcconfig.html
and code = {
script : string option;
s3_object_version : string option;
s3_bucket : string option;
s3_key : string option;
handler : string;
source_location_arn : string option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-code.html
and visual_reference = {
base_screenshots : base_screenshot list option;
base_canary_run_id : string;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-visualreference.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-synthetics-canary-artifactconfig.html
type properties = {
visual_reference : visual_reference option;
artifact_config : artifact_config option;
success_retention_period : int option;
runtime_version : string;
vpc_config : vpc_config option;
run_config : run_config option;
failure_retention_period : int option;
code : code;
name : string;
execution_role_arn : string;
schedule : schedule;
artifact_s3_location : string;
start_canary_after_creation : bool option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-synthetics-canary.html;
val make_properties :
?visual_reference:visual_reference ->
?artifact_config:artifact_config ->
?success_retention_period:int ->
runtime_version:string ->
?vpc_config:vpc_config ->
?run_config:run_config ->
?failure_retention_period:int ->
code:code ->
name:string ->
execution_role_arn:string ->
schedule:schedule ->
artifact_s3_location:string ->
?tags:tag list ->
?start_canary_after_creation:bool ->
unit ->
properties
val make_s3_encryption :
?kms_key_arn:string ->
?encryption_mode:string ->
unit ->
s3_encryption
val make_schedule :
?duration_in_seconds:string ->
expression:string ->
unit ->
schedule
val make_base_screenshot :
?ignore_coordinates:string list ->
screenshot_name:string ->
unit ->
base_screenshot
val make_tag : value:string -> key:string -> unit -> tag
val make_run_config :
?timeout_in_seconds:int ->
?environment_variables:string Stdlib__Map.Make(Stdlib.String).t ->
?memory_in_mb:int ->
?active_tracing:bool ->
unit ->
run_config
val make_vpc_config :
?vpc_id:string ->
subnet_ids:string list ->
security_group_ids:string list ->
unit ->
vpc_config
val make_code :
?script:string ->
?s3_object_version:string ->
?s3_bucket:string ->
?s3_key:string ->
handler:string ->
?source_location_arn:string ->
unit ->
code
val make_visual_reference :
?base_screenshots:base_screenshot list ->
base_canary_run_id:string ->
unit ->
visual_reference
val make_artifact_config :
?s3_encryption:s3_encryption ->
unit ->
artifact_config
val yojson_of_s3_encryption : s3_encryption -> Yojson.Safe.t
val yojson_of_schedule :
schedule ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_base_screenshot : base_screenshot -> Yojson.Safe.t
val yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_run_config :
run_config ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_vpc_config :
vpc_config ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_code : code -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_visual_reference :
visual_reference ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_artifact_config :
artifact_config ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val create_attributes : string -> attributes