# these attributes.
#
ATTRIBUTE WiMAX-MN-NAI 1900 string
-ATTRIBUTE WiMAX-FA-IP-Address 1901 ipaddr
-ATTRIBUTE WiMAX-MN-FA 1902 octets
ATTRIBUTE TLS-Cert-Serial 1910 string
ATTRIBUTE TLS-Cert-Expiration 1911 string
}
/*
- * Generate MN-FA = H(FA-RK, "MN FA" | FA-IP | MN-NAI)
- */
- ip = pairfind(request->reply->vps, 1901, 0);
- if (fa_rk && ip && mn_nai) {
- HMAC_Init_ex(&hmac, fa_rk->vp_octets, fa_rk->length,
- EVP_sha1(), NULL);
-
- HMAC_Update(&hmac, (const uint8_t *) "MN FA", 5);
- HMAC_Update(&hmac, (const uint8_t *) &ip->vp_ipaddr, 4);
- HMAC_Update(&hmac, (const uint8_t *) &mn_nai->vp_strvalue, mn_nai->length);
-
- HMAC_Final(&hmac, &mip_rk_1[0], &rk1_len);
-
- vp = radius_paircreate(request, &request->reply->vps,
- 1902, 0, PW_TYPE_OCTETS);
- if (!vp) {
- RDEBUG("WARNING: Failed creating WiMAX-MN-FA");
- } else {
- memcpy(vp->vp_octets, &mip_rk_1[0], rk1_len);
- vp->length = rk1_len;
- }
- }
-
- /*
* Give additional information about requests && responses
*
* WiMAX-RRQ-MN-HA-SPI