ITS#7357 set NAS-Identifier in request

contrib/slapd-modules/passwd/radius.c

@@ -26,6 +26,7 @@
 
 #include <radlib.h>
 
+extern char *global_host;	/* from slapd */
 static LUTIL_PASSWD_CHK_FUNC chk_radius;
 static const struct berval scheme = BER_BVC("{RADIUS}");
 static char *config_filename;
@@ -87,6 +88,10 @@ chk_radius(
 		goto done;
 	}
 
+	if ( rad_put_string( h, RAD_NAS_IDENTIFIER, global_host ) != 0 ) {
+		goto done;
+	}
+
 	switch ( rad_send_request( h ) ) {
 	case RAD_ACCESS_ACCEPT:
 		rc = LUTIL_PASSWD_OK;