PureBasic / MongoDB Atlas / Create One Advanced Cluster MultiCloud
Back to Collection Items
IncludeFile "CkJsonObject.pb"
IncludeFile "CkHttp.pb"
IncludeFile "CkHttpResponse.pb"
Procedure ChilkatExample()
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success.i
CkHttp::setCkDigestAuth(http, 1)
CkHttp::setCkLogin(http, "username")
CkHttp::setCkPassword(http, "password")
; Use this online tool to generate code from sample JSON: Generate Code to Create JSON
; The following JSON is sent in the request body.
; {
; "clusterType": "REPLICASET",
; "name": "tenantCluster",
; "replicationSpecs": [
; {
; "regionConfigs": [
; {
; "electableSpecs": {
; "instanceSize": "M5"
; },
; "providerName": "TENANT",
; "backingProviderName": "AWS",
; "regionName": "US_EAST_1"
; }
; ]
; }
; ]
; }
json.i = CkJsonObject::ckCreate()
If json.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckUpdateString(json,"clusterType","REPLICASET")
CkJsonObject::ckUpdateString(json,"name","tenantCluster")
CkJsonObject::ckUpdateString(json,"replicationSpecs[0].regionConfigs[0].electableSpecs.instanceSize","M5")
CkJsonObject::ckUpdateString(json,"replicationSpecs[0].regionConfigs[0].providerName","TENANT")
CkJsonObject::ckUpdateString(json,"replicationSpecs[0].regionConfigs[0].backingProviderName","AWS")
CkJsonObject::ckUpdateString(json,"replicationSpecs[0].regionConfigs[0].regionName","US_EAST_1")
CkHttp::ckSetRequestHeader(http,"Content-Type","application/json")
resp.i = CkHttp::ckPostJson3(http,"https://domain.com/api/atlas/v1.5/groups/{{ProjectID}}/clusters/","application/json",json)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
ProcedureReturn
EndIf
Debug Str(CkHttpResponse::ckStatusCode(resp))
Debug CkHttpResponse::ckBodyStr(resp)
CkHttpResponse::ckDispose(resp)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
ProcedureReturn
EndProcedure
Curl Command
curl -X POST
--digest -u 'username:password'
-H "Content-Type: application/json"
-d '{
"clusterType": "REPLICASET",
"name": "tenantCluster",
"replicationSpecs": [
{
"regionConfigs": [
{
"electableSpecs": {
"instanceSize": "M5"
},
"providerName": "TENANT",
"backingProviderName": "AWS",
"regionName": "US_EAST_1"
}
]
}
]
}'
https://domain.com/api/atlas/v1.5/groups/{{ProjectID}}/clusters/
Postman Collection Item JSON
{
"name": "Create One Advanced Cluster MultiCloud",
"request": {
"method": "POST",
"header": [
{
"key": "Content-Type",
"value": "application/json",
"type": "text"
}
],
"body": {
"mode": "raw",
"raw": "{\n \"clusterType\": \"REPLICASET\",\n \"name\": \"tenantCluster\",\n \"replicationSpecs\": [\n {\n \"regionConfigs\": [\n {\n \"electableSpecs\": {\n \"instanceSize\": \"M5\"\n },\n \"providerName\": \"TENANT\",\n \"backingProviderName\": \"AWS\",\n \"regionName\": \"US_EAST_1\"\n }\n ]\n }\n ]\n}"
},
"url": {
"raw": "{{base_url}}/api/atlas/v1.5/groups/{{ProjectID}}/clusters/",
"host": [
"{{base_url}}"
],
"path": [
"api",
"atlas",
"v1.5",
"groups",
"{{ProjectID}}",
"clusters",
""
]
},
"description": "https://docs.atlas.mongodb.com/reference/api/cluster-advanced/create-one-cluster-advanced/"
},
"response": [
]
}