Test profile sorting in LDAP

Author: ndptech

src/tests/modules/ldap/module.conf

@@ -277,6 +277,7 @@ ldap {
 		#  will override this setting at run-time.
 		attribute = 'radiusProfileDn'
 		attribute_suspend = "radiusProfileSuspendedDn"
+		sort_by = 'radiusProfilePriority'
 	}
 
 	#

src/tests/modules/ldap/xlat_profile.unlang

@@ -58,4 +58,17 @@ if (!((reply.Framed-IP-Netmask == 255.255.192.0) && \
 control := {}
 reply := {}
 
+# Test profile sort order.
+if (!%ldap.profile('cn=nested,ou=profiles,dc=example,dc=com')) {
+	test_fail
+}
+
+# Reply-Message will be set, overwritten and then unchanged by the
+# profiles, when processed in the correct sequence - leaving this value.
+if (reply.Reply-Message != 'Guten Tag') {
+	test_fail
+}
+
+reply := {}
+
 test_pass

src/tests/salt-test-server/salt/ldap/base.ldif

@@ -117,6 +117,32 @@ objectClass: radiusprofile
 cn: suspended
 radiusReplyAttribute: Reply-Message := 'User-Suspended'
 
+dn: cn=nested,ou=profiles,dc=example,dc=com
+objectClass: freeradiusPolicy
+objectClass: radiusprofile
+cn: nested
+
+dn: cn=child1,cn=nested,ou=profiles,dc=example,dc=com
+objectClass: freeradiusPolicy
+objectClass: radiusprofile
+cn: child1
+radiusAttribute: reply.Reply-Message := 'Guten Tag'
+radiusProfilePriority: 2
+
+dn: cn=child2,cn=nested,ou=profiles,dc=example,dc=com
+objectClass: freeradiusPolicy
+objectClass: radiusprofile
+cn: child2
+radiusAttribute: reply.Reply-Message := 'Good Day'
+radiusProfilePriority: 1
+
+dn: cn=child3,cn=nested,ou=profiles,dc=example,dc=com
+objectClass: freeradiusPolicy
+objectClass: radiusprofile
+cn: child3
+radiusAttribute: reply.Reply-Message = 'Buna Ziua'
+radiusProfilePriority: 3
+
 dn: uid=adminuser,ou=people,dc=example,dc=com
 objectClass: inetOrgPerson
 uid: adminuser