#!/usr/share/ucs-test/runner bash
# shellcheck shell=bash
## desc: "Move an AD-user into the User-Ignore-Subtree in read-mode"
## exposure: dangerous
## packages:
## - univention-s4-connector
## versions:
##  3.0-0: skip
## bugs:
##  - 18504

# shellcheck source=../../lib/base.sh
. "$TESTLIBPATH/base.sh" || exit 137
# shellcheck source=../../lib/udm.sh
. "$TESTLIBPATH/udm.sh" || exit 137
# shellcheck source=../../lib/random.sh
. "$TESTLIBPATH/random.sh" || exit 137


. "s4connector.sh" || exit 137
test -n "$connector_s4_ldap_host" || exit 137
connector_running_on_this_host || exit 137

UDM_users_user_username="$(random_chars)"
AD_USER_DN="CN=$UDM_users_user_username,CN=Users,$(ad_get_base)"

SYNCMODE="$(ad_get_sync_mode)"

ad_set_sync_mode "sync"

section "Create new container"

UDM_container_cn_name="$(random_chars)"
ad_container_create "$UDM_container_cn_name" || fail_test 110
ad_wait_for_synchronization; fail_bool 0 110

ad_exists "CN=$UDM_container_cn_name,$(ad_get_base)"; fail_bool 0 110
udm_exists "container/cn"; fail_bool 0 110

section "Modify User-Ignore-Subtree"

invoke-rc.d univention-s4-connector stop



connector_mapping_adjust 'user' "CN=$UDM_container_cn_name,$ldap_base"

ad_set_sync_mode "read"
invoke-rc.d univention-s4-connector start

section "Create user"

ad_createuser "$UDM_users_user_username" || fail_test 110
ad_wait_for_synchronization; fail_bool 0 110

udm_exists "users/user"; fail_bool 0 110
ad_exists "$AD_USER_DN"; fail_bool 0 110

section "Move user to ignored subtree"

ad_move "$AD_USER_DN" "CN=$UDM_users_user_username,CN=$UDM_container_cn_name,$(ad_get_base)" || fail_test 110
ad_wait_for_synchronization; fail_bool 0 110

udm_exists "users/user"; fail_bool 1 121 "See #18504"
udm_exists "users/user" "" "" "cn=$UDM_container_cn_name,$ldap_base"; fail_bool 1 110
ad_exists "CN=$UDM_users_user_username,CN=$UDM_container_cn_name,$(ad_get_base)"; fail_bool 0 110
ad_exists "$AD_USER_DN"; fail_bool 1 110

section "Clean up"

ad_delete "CN=$UDM_users_user_username,CN=$UDM_container_cn_name,$(ad_get_base)" || fail_test 110
ad_wait_for_synchronization; fail_bool 0 110

ad_exists "$AD_USER_DN"; fail_bool 1 110
ad_exists "CN=$UDM_users_user_username,CN=$UDM_container_cn_name,$(ad_get_base)"; fail_bool 1 110
udm_exists "users/user" "" "" "cn=$UDM_container_cn_name,$ldap_base"; fail_bool 1 110
udm_exists "users/user"; fail_bool 1 110

ad_delete "CN=$UDM_container_cn_name,$(ad_get_base)"

invoke-rc.d univention-s4-connector stop
connector_mapping_restore
ad_set_sync_mode "$SYNCMODE"
invoke-rc.d univention-s4-connector start

exit "$RETVAL"
