Values.GetFederationTokenResponseSourceContains the response to a successful GetFederationToken request, including temporary Amazon Web Services credentials that can be used to make Amazon Web Services requests.
type getFederationTokenResult = {credentials : Credentials.t option;The temporary security credentials, which include an access key ID, a secret access key, and a security (or session) token. The size of the security token that STS API operations return is not fixed. We strongly recommend that you make no assumptions about the maximum size.
*)federatedUser : FederatedUser.t option;Identifiers for the federated user associated with the credentials (such as arn:aws:sts::123456789012:federated-user/Bob or 123456789012:Bob). You can use the federated user's ARN in your resource-based policies, such as an Amazon S3 bucket policy.
*)packedPolicySize : NonNegativeIntegerType.t option;A percentage value that indicates the packed size of the session policies and session tags combined passed in the request. The request fails if the packed size is greater than 100 percent, which means the policies and tags exceeded the allowed space.
*)}and t = {getFederationTokenResult : getFederationTokenResult;responseMetaData : responseMetaData;}type error = [ | `MalformedPolicyDocumentException of MalformedPolicyDocumentException.t| `PackedPolicyTooLargeException of PackedPolicyTooLargeException.t| `RegionDisabledException of RegionDisabledException.t| `Unknown_operation_error of string * string option ]val error_of_json :
string ->
Yojson.Safe.t ->
[> `MalformedPolicyDocumentException of MalformedPolicyDocumentException.t
| `PackedPolicyTooLargeException of PackedPolicyTooLargeException.t
| `RegionDisabledException of RegionDisabledException.t
| `Unknown_operation_error of string * string option ]val error_of_xml :
string ->
Awso.Xml.t ->
[> `MalformedPolicyDocumentException of MalformedPolicyDocumentException.t
| `PackedPolicyTooLargeException of PackedPolicyTooLargeException.t
| `RegionDisabledException of RegionDisabledException.t
| `Unknown_operation_error of string * string option ]val to_value :
t ->
[> `Structure of
(string
* [> `Structure of
(string
* [> `Integer of NonNegativeIntegerType.t
| `Structure of
(string
* [> `String of AccessKeyIdType.t
| `Timestamp of DateType.t ])
list ])
list ])
list ]