PureBasic / MongoDB Atlas / Save One LDAP Configuration
Back to Collection Items
IncludeFile "CkJsonObject.pb"
IncludeFile "CkStringBuilder.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.
; {
; "ldap": {
; "authenticationEnabled": true,
; "authorizationEnabled": true,
; "hostname": "atlas-ldaps-01.ldap.myteam.com",
; "port": 636,
; "bindUsername": "CN=Administrator,CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com",
; "bindPassword": "MyldapPassWord",
; "authzQueryTemplate": "{USER}?memberOf?base",
; "userToDNMapping": [
; {
; "match": "(.*)",
; "substitution": "CN={0},CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com"
; }
; ]
; }
; }
json.i = CkJsonObject::ckCreate()
If json.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckUpdateBool(json,"ldap.authenticationEnabled",1)
CkJsonObject::ckUpdateBool(json,"ldap.authorizationEnabled",1)
CkJsonObject::ckUpdateString(json,"ldap.hostname","atlas-ldaps-01.ldap.myteam.com")
CkJsonObject::ckUpdateInt(json,"ldap.port",636)
CkJsonObject::ckUpdateString(json,"ldap.bindUsername","CN=Administrator,CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com")
CkJsonObject::ckUpdateString(json,"ldap.bindPassword","MyldapPassWord")
CkJsonObject::ckUpdateString(json,"ldap.authzQueryTemplate","{USER}?memberOf?base")
CkJsonObject::ckUpdateString(json,"ldap.userToDNMapping[0].match","(.*)")
CkJsonObject::ckUpdateString(json,"ldap.userToDNMapping[0].substitution","CN={0},CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com")
sbRequestBody.i = CkStringBuilder::ckCreate()
If sbRequestBody.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckEmitSb(json,sbRequestBody)
resp.i = CkHttp::ckPTextSb(http,"PATCH","https://domain.com/api/atlas/{{version}}/groups/{{ProjectID}}/userSecurity",sbRequestBody,"utf-8","application/json",0,0)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
CkStringBuilder::ckDispose(sbRequestBody)
ProcedureReturn
EndIf
Debug Str(CkHttpResponse::ckStatusCode(resp))
Debug CkHttpResponse::ckBodyStr(resp)
CkHttpResponse::ckDispose(resp)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
CkStringBuilder::ckDispose(sbRequestBody)
ProcedureReturn
EndProcedure
Curl Command
curl -X PATCH
--digest -u 'username:password'
-d '{
"ldap": {
"authenticationEnabled": true,
"authorizationEnabled": true,
"hostname": "atlas-ldaps-01.ldap.myteam.com",
"port": 636,
"bindUsername": "CN=Administrator,CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com",
"bindPassword": "MyldapPassWord",
"authzQueryTemplate": "{USER}?memberOf?base",
"userToDNMapping": [
{
"match": "(.*)",
"substitution": "CN={0},CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com"
}
]
}
}'
https://domain.com/api/atlas/{{version}}/groups/{{ProjectID}}/userSecurity
Postman Collection Item JSON
{
"name": "Save One LDAP Configuration",
"request": {
"method": "PATCH",
"header": [
],
"body": {
"mode": "raw",
"raw": "{\n \"ldap\": {\n \"authenticationEnabled\": true,\n \"authorizationEnabled\": true,\n \"hostname\": \"atlas-ldaps-01.ldap.myteam.com\",\n \"port\": 636,\n \"bindUsername\": \"CN=Administrator,CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com\",\n \"bindPassword\": \"MyldapPassWord\",\n \"authzQueryTemplate\": \"{USER}?memberOf?base\",\n \"userToDNMapping\": [\n {\n \"match\": \"(.*)\",\n \"substitution\": \"CN={0},CN=Users,DC=atlas-ldaps-01,DC=myteam,DC=com\"\n }\n ]\n }\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{base_url}}/api/atlas/{{version}}/groups/{{ProjectID}}/userSecurity",
"host": [
"{{base_url}}"
],
"path": [
"api",
"atlas",
"{{version}}",
"groups",
"{{ProjectID}}",
"userSecurity"
]
},
"description": "https://docs.atlas.mongodb.com/reference/api/ldaps-configuration-save/"
},
"response": [
]
}