2 * RADIUS authentication server
3 * Copyright (c) 2005-2009, 2011-2019, Jouni Malinen <j@w1.fi>
5 * This software may be distributed under the terms of the BSD license.
6 * See README for more details.
13 #endif /* CONFIG_SQLITE */
18 #include "eap_server/eap.h"
19 #include "ap/ap_config.h"
20 #include "crypto/tls.h"
21 #include "radius_server.h"
24 * RADIUS_SESSION_TIMEOUT - Session timeout in seconds
26 #define RADIUS_SESSION_TIMEOUT 60
29 * RADIUS_SESSION_MAINTAIN - Completed session expiration timeout in seconds
31 #define RADIUS_SESSION_MAINTAIN 5
34 * RADIUS_MAX_SESSION - Maximum number of active sessions
36 #define RADIUS_MAX_SESSION 1000
39 * RADIUS_MAX_MSG_LEN - Maximum message length for incoming RADIUS messages
41 #define RADIUS_MAX_MSG_LEN 3000
43 static const struct eapol_callbacks radius_server_eapol_cb;
46 struct radius_server_data;
49 * struct radius_server_counters - RADIUS server statistics counters
51 struct radius_server_counters {
54 u32 dup_access_requests;
57 u32 access_challenges;
58 u32 malformed_access_requests;
59 u32 bad_authenticators;
64 u32 invalid_acct_requests;
66 u32 malformed_acct_requests;
67 u32 acct_bad_authenticators;
68 u32 unknown_acct_types;
72 * struct radius_session - Internal RADIUS server data for a session
74 struct radius_session {
75 struct radius_session *next;
76 struct radius_client *client;
77 struct radius_server_data *server;
80 struct eap_eapol_interface *eap_if;
81 char *username; /* from User-Name attribute */
83 u8 mac_addr[ETH_ALEN]; /* from Calling-Station-Id attribute */
85 struct radius_msg *last_msg;
88 struct sockaddr_storage last_from;
89 socklen_t last_fromlen;
91 struct radius_msg *last_reply;
92 u8 last_authenticator[16];
94 unsigned int remediation:1;
95 unsigned int macacl:1;
96 unsigned int t_c_filtering:1;
98 struct hostapd_radius_attr *accept_attr;
100 u32 t_c_timestamp; /* Last read T&C timestamp from user DB */
104 * struct radius_client - Internal RADIUS server data for a client
106 struct radius_client {
107 struct radius_client *next;
111 struct in6_addr addr6;
112 struct in6_addr mask6;
113 #endif /* CONFIG_IPV6 */
115 int shared_secret_len;
116 struct radius_session *sessions;
117 struct radius_server_counters counters;
119 u8 next_dac_identifier;
120 struct radius_msg *pending_dac_coa_req;
121 u8 pending_dac_coa_id;
122 u8 pending_dac_coa_addr[ETH_ALEN];
123 struct radius_msg *pending_dac_disconnect_req;
124 u8 pending_dac_disconnect_id;
125 u8 pending_dac_disconnect_addr[ETH_ALEN];
129 * struct radius_server_data - Internal RADIUS server data
131 struct radius_server_data {
133 * auth_sock - Socket for RADIUS authentication messages
138 * acct_sock - Socket for RADIUS accounting messages
143 * clients - List of authorized RADIUS clients
145 struct radius_client *clients;
148 * next_sess_id - Next session identifier
150 unsigned int next_sess_id;
153 * conf_ctx - Context pointer for callbacks
155 * This is used as the ctx argument in get_eap_user() calls.
160 * num_sess - Number of active sessions
165 * eap_sim_db_priv - EAP-SIM/AKA database context
167 * This is passed to the EAP-SIM/AKA server implementation as a
170 void *eap_sim_db_priv;
173 * ssl_ctx - TLS context
175 * This is passed to the EAP server implementation as a callback
176 * context for TLS operations.
181 * pac_opaque_encr_key - PAC-Opaque encryption key for EAP-FAST
183 * This parameter is used to set a key for EAP-FAST to encrypt the
184 * PAC-Opaque data. It can be set to %NULL if EAP-FAST is not used. If
185 * set, must point to a 16-octet key.
187 u8 *pac_opaque_encr_key;
190 * eap_fast_a_id - EAP-FAST authority identity (A-ID)
192 * If EAP-FAST is not used, this can be set to %NULL. In theory, this
193 * is a variable length field, but due to some existing implementations
194 * requiring A-ID to be 16 octets in length, it is recommended to use
195 * that length for the field to provide interoperability with deployed
196 * peer implementations.
201 * eap_fast_a_id_len - Length of eap_fast_a_id buffer in octets
203 size_t eap_fast_a_id_len;
206 * eap_fast_a_id_info - EAP-FAST authority identifier information
208 * This A-ID-Info contains a user-friendly name for the A-ID. For
209 * example, this could be the enterprise and server names in
210 * human-readable format. This field is encoded as UTF-8. If EAP-FAST
211 * is not used, this can be set to %NULL.
213 char *eap_fast_a_id_info;
216 * eap_fast_prov - EAP-FAST provisioning modes
218 * 0 = provisioning disabled, 1 = only anonymous provisioning allowed,
219 * 2 = only authenticated provisioning allowed, 3 = both provisioning
225 * pac_key_lifetime - EAP-FAST PAC-Key lifetime in seconds
227 * This is the hard limit on how long a provisioned PAC-Key can be
230 int pac_key_lifetime;
233 * pac_key_refresh_time - EAP-FAST PAC-Key refresh time in seconds
235 * This is a soft limit on the PAC-Key. The server will automatically
236 * generate a new PAC-Key when this number of seconds (or fewer) of the
239 int pac_key_refresh_time;
242 * eap_sim_aka_result_ind - EAP-SIM/AKA protected success indication
244 * This controls whether the protected success/failure indication
245 * (AT_RESULT_IND) is used with EAP-SIM and EAP-AKA.
247 int eap_sim_aka_result_ind;
250 * tnc - Trusted Network Connect (TNC)
252 * This controls whether TNC is enabled and will be required before the
253 * peer is allowed to connect. Note: This is only used with EAP-TTLS
254 * and EAP-FAST. If any other EAP method is enabled, the peer will be
255 * allowed to connect without TNC.
260 * pwd_group - The D-H group assigned for EAP-pwd
262 * If EAP-pwd is not used it can be set to zero.
267 * server_id - Server identity
269 const char *server_id;
272 * erp - Whether EAP Re-authentication Protocol (ERP) is enabled
274 * This controls whether the authentication server derives ERP key
275 * hierarchy (rRK and rIK) from full EAP authentication and allows
276 * these keys to be used to perform ERP to derive rMSK instead of full
277 * EAP authentication to derive MSK.
281 const char *erp_domain;
283 struct dl_list erp_keys; /* struct eap_server_erp_key */
285 unsigned int tls_session_lifetime;
287 unsigned int tls_flags;
290 * wps - Wi-Fi Protected Setup context
292 * If WPS is used with an external RADIUS server (which is quite
293 * unlikely configuration), this is used to provide a pointer to WPS
294 * context data. Normally, this can be set to %NULL.
296 struct wps_context *wps;
299 * ipv6 - Whether to enable IPv6 support in the RADIUS server
304 * start_time - Timestamp of server start
306 struct os_reltime start_time;
309 * counters - Statistics counters for server operations
311 * These counters are the sum over all clients.
313 struct radius_server_counters counters;
316 * get_eap_user - Callback for fetching EAP user information
317 * @ctx: Context data from conf_ctx
318 * @identity: User identity
319 * @identity_len: identity buffer length in octets
320 * @phase2: Whether this is for Phase 2 identity
321 * @user: Data structure for filling in the user information
322 * Returns: 0 on success, -1 on failure
324 * This is used to fetch information from user database. The callback
325 * will fill in information about allowed EAP methods and the user
326 * password. The password field will be an allocated copy of the
327 * password data and RADIUS server will free it after use.
329 int (*get_eap_user)(void *ctx, const u8 *identity, size_t identity_len,
330 int phase2, struct eap_user *user);
333 * eap_req_id_text - Optional data for EAP-Request/Identity
335 * This can be used to configure an optional, displayable message that
336 * will be sent in EAP-Request/Identity. This string can contain an
337 * ASCII-0 character (nul) to separate network infromation per RFC
338 * 4284. The actual string length is explicit provided in
339 * eap_req_id_text_len since nul character will not be used as a string
342 char *eap_req_id_text;
345 * eap_req_id_text_len - Length of eap_req_id_text buffer in octets
347 size_t eap_req_id_text_len;
350 * msg_ctx - Context data for wpa_msg() calls
354 #ifdef CONFIG_RADIUS_TEST
356 #endif /* CONFIG_RADIUS_TEST */
358 char *subscr_remediation_url;
359 u8 subscr_remediation_method;
360 char *hs20_sim_provisioning_url;
362 char *t_c_server_url;
366 #endif /* CONFIG_SQLITE */
370 #define RADIUS_DEBUG(args...) \
371 wpa_printf(MSG_DEBUG, "RADIUS SRV: " args)
372 #define RADIUS_ERROR(args...) \
373 wpa_printf(MSG_ERROR, "RADIUS SRV: " args)
374 #define RADIUS_DUMP(args...) \
375 wpa_hexdump(MSG_MSGDUMP, "RADIUS SRV: " args)
376 #define RADIUS_DUMP_ASCII(args...) \
377 wpa_hexdump_ascii(MSG_MSGDUMP, "RADIUS SRV: " args)
380 static void radius_server_session_timeout(void *eloop_ctx, void *timeout_ctx);
381 static void radius_server_session_remove_timeout(void *eloop_ctx,
387 static int db_table_exists(sqlite3 *db, const char *name)
391 os_snprintf(cmd, sizeof(cmd), "SELECT 1 FROM %s;", name);
392 return sqlite3_exec(db, cmd, NULL, NULL, NULL) == SQLITE_OK;
396 static int db_table_create_sim_provisioning(sqlite3 *db)
400 "CREATE TABLE sim_provisioning("
401 " mobile_identifier_hash TEXT PRIMARY KEY,"
408 RADIUS_DEBUG("Adding database table for SIM provisioning information");
409 if (sqlite3_exec(db, sql, NULL, NULL, &err) != SQLITE_OK) {
410 RADIUS_ERROR("SQLite error: %s", err);
418 #endif /* CONFIG_HS20 */
419 #endif /* CONFIG_SQLITE */
422 void srv_log(struct radius_session *sess, const char *fmt, ...)
425 void srv_log(struct radius_session *sess, const char *fmt, ...)
432 buflen = vsnprintf(NULL, 0, fmt, ap) + 1;
435 buf = os_malloc(buflen);
439 vsnprintf(buf, buflen, fmt, ap);
442 RADIUS_DEBUG("[0x%x %s] %s", sess->sess_id, sess->nas_ip, buf);
445 if (sess->server->db) {
447 sql = sqlite3_mprintf("INSERT INTO authlog"
448 "(timestamp,session,nas_ip,username,note)"
450 "strftime('%%Y-%%m-%%d %%H:%%M:%%f',"
451 "'now'),%u,%Q,%Q,%Q)",
452 sess->sess_id, sess->nas_ip,
453 sess->username, buf);
455 if (sqlite3_exec(sess->server->db, sql, NULL, NULL,
456 NULL) != SQLITE_OK) {
457 RADIUS_ERROR("Failed to add authlog entry into sqlite database: %s",
458 sqlite3_errmsg(sess->server->db));
463 #endif /* CONFIG_SQLITE */
469 static struct radius_client *
470 radius_server_get_client(struct radius_server_data *data, struct in_addr *addr,
473 struct radius_client *client = data->clients;
478 struct in6_addr *addr6;
481 addr6 = (struct in6_addr *) addr;
482 for (i = 0; i < 16; i++) {
483 if ((addr6->s6_addr[i] &
484 client->mask6.s6_addr[i]) !=
485 (client->addr6.s6_addr[i] &
486 client->mask6.s6_addr[i])) {
495 #endif /* CONFIG_IPV6 */
496 if (!ipv6 && (client->addr.s_addr & client->mask.s_addr) ==
497 (addr->s_addr & client->mask.s_addr)) {
501 client = client->next;
508 static struct radius_session *
509 radius_server_get_session(struct radius_client *client, unsigned int sess_id)
511 struct radius_session *sess = client->sessions;
514 if (sess->sess_id == sess_id) {
524 static void radius_server_session_free(struct radius_server_data *data,
525 struct radius_session *sess)
527 eloop_cancel_timeout(radius_server_session_timeout, data, sess);
528 eloop_cancel_timeout(radius_server_session_remove_timeout, data, sess);
529 eap_server_sm_deinit(sess->eap);
530 radius_msg_free(sess->last_msg);
531 os_free(sess->last_from_addr);
532 radius_msg_free(sess->last_reply);
533 os_free(sess->username);
534 os_free(sess->nas_ip);
540 static void radius_server_session_remove(struct radius_server_data *data,
541 struct radius_session *sess)
543 struct radius_client *client = sess->client;
544 struct radius_session *session, *prev;
546 eloop_cancel_timeout(radius_server_session_remove_timeout, data, sess);
549 session = client->sessions;
551 if (session == sess) {
553 client->sessions = sess->next;
555 prev->next = sess->next;
557 radius_server_session_free(data, sess);
561 session = session->next;
566 static void radius_server_session_remove_timeout(void *eloop_ctx,
569 struct radius_server_data *data = eloop_ctx;
570 struct radius_session *sess = timeout_ctx;
571 RADIUS_DEBUG("Removing completed session 0x%x", sess->sess_id);
572 radius_server_session_remove(data, sess);
576 static void radius_server_session_timeout(void *eloop_ctx, void *timeout_ctx)
578 struct radius_server_data *data = eloop_ctx;
579 struct radius_session *sess = timeout_ctx;
581 RADIUS_DEBUG("Timing out authentication session 0x%x", sess->sess_id);
582 radius_server_session_remove(data, sess);
586 static struct radius_session *
587 radius_server_new_session(struct radius_server_data *data,
588 struct radius_client *client)
590 struct radius_session *sess;
592 if (data->num_sess >= RADIUS_MAX_SESSION) {
593 RADIUS_DEBUG("Maximum number of existing session - no room "
594 "for a new session");
598 sess = os_zalloc(sizeof(*sess));
603 sess->client = client;
604 sess->sess_id = data->next_sess_id++;
605 sess->next = client->sessions;
606 client->sessions = sess;
607 eloop_register_timeout(RADIUS_SESSION_TIMEOUT, 0,
608 radius_server_session_timeout, data, sess);
614 #ifdef CONFIG_TESTING_OPTIONS
615 static void radius_server_testing_options_tls(struct radius_session *sess,
617 struct eap_config *eap_conf)
619 int test = atoi(tls);
623 srv_log(sess, "TLS test - break VerifyData");
624 eap_conf->tls_test_flags = TLS_BREAK_VERIFY_DATA;
627 srv_log(sess, "TLS test - break ServerKeyExchange ServerParams hash");
628 eap_conf->tls_test_flags = TLS_BREAK_SRV_KEY_X_HASH;
631 srv_log(sess, "TLS test - break ServerKeyExchange ServerParams Signature");
632 eap_conf->tls_test_flags = TLS_BREAK_SRV_KEY_X_SIGNATURE;
635 srv_log(sess, "TLS test - RSA-DHE using a short 511-bit prime");
636 eap_conf->tls_test_flags = TLS_DHE_PRIME_511B;
639 srv_log(sess, "TLS test - RSA-DHE using a short 767-bit prime");
640 eap_conf->tls_test_flags = TLS_DHE_PRIME_767B;
643 srv_log(sess, "TLS test - RSA-DHE using a bogus 15 \"prime\"");
644 eap_conf->tls_test_flags = TLS_DHE_PRIME_15;
647 srv_log(sess, "TLS test - RSA-DHE using a short 58-bit prime in long container");
648 eap_conf->tls_test_flags = TLS_DHE_PRIME_58B;
651 srv_log(sess, "TLS test - RSA-DHE using a non-prime");
652 eap_conf->tls_test_flags = TLS_DHE_NON_PRIME;
655 srv_log(sess, "Unrecognized TLS test");
659 #endif /* CONFIG_TESTING_OPTIONS */
661 static void radius_server_testing_options(struct radius_session *sess,
662 struct eap_config *eap_conf)
664 #ifdef CONFIG_TESTING_OPTIONS
667 pos = os_strstr(sess->username, "@test-");
671 if (os_strncmp(pos, "tls-", 4) == 0)
672 radius_server_testing_options_tls(sess, pos + 4, eap_conf);
674 srv_log(sess, "Unrecognized test: %s", pos);
675 #endif /* CONFIG_TESTING_OPTIONS */
680 static struct eap_server_erp_key *
681 radius_server_erp_find_key(struct radius_server_data *data, const char *keyname)
683 struct eap_server_erp_key *erp;
685 dl_list_for_each(erp, &data->erp_keys, struct eap_server_erp_key,
687 if (os_strcmp(erp->keyname_nai, keyname) == 0)
693 #endif /* CONFIG_ERP */
696 static struct radius_session *
697 radius_server_get_new_session(struct radius_server_data *data,
698 struct radius_client *client,
699 struct radius_msg *msg, const char *from_addr)
702 size_t user_len, id_len;
704 struct radius_session *sess;
705 struct eap_config eap_conf;
706 struct eap_user *tmp;
708 RADIUS_DEBUG("Creating a new session");
710 if (radius_msg_get_attr_ptr(msg, RADIUS_ATTR_USER_NAME, &user,
711 &user_len, NULL) < 0) {
712 RADIUS_DEBUG("Could not get User-Name");
715 RADIUS_DUMP_ASCII("User-Name", user, user_len);
717 tmp = os_zalloc(sizeof(*tmp));
721 res = data->get_eap_user(data->conf_ctx, user, user_len, 0, tmp);
723 if (res != 0 && data->erp) {
726 username = os_zalloc(user_len + 1);
728 os_memcpy(username, user, user_len);
729 if (radius_server_erp_find_key(data, username))
734 #endif /* CONFIG_ERP */
736 RADIUS_DEBUG("User-Name not found from user database");
741 RADIUS_DEBUG("Matching user entry found");
742 sess = radius_server_new_session(data, client);
744 RADIUS_DEBUG("Failed to create a new session");
748 sess->accept_attr = tmp->accept_attr;
749 sess->macacl = tmp->macacl;
752 sess->username = os_malloc(user_len * 4 + 1);
753 if (sess->username == NULL) {
754 radius_server_session_remove(data, sess);
757 printf_encode(sess->username, user_len * 4 + 1, user, user_len);
759 sess->nas_ip = os_strdup(from_addr);
760 if (sess->nas_ip == NULL) {
761 radius_server_session_remove(data, sess);
765 if (radius_msg_get_attr_ptr(msg, RADIUS_ATTR_CALLING_STATION_ID, &id,
766 &id_len, NULL) == 0) {
767 char buf[3 * ETH_ALEN];
769 os_memset(buf, 0, sizeof(buf));
770 if (id_len >= sizeof(buf))
771 id_len = sizeof(buf) - 1;
772 os_memcpy(buf, id, id_len);
773 if (hwaddr_aton2(buf, sess->mac_addr) < 0)
774 os_memset(sess->mac_addr, 0, ETH_ALEN);
776 RADIUS_DEBUG("Calling-Station-Id: " MACSTR,
777 MAC2STR(sess->mac_addr));
780 srv_log(sess, "New session created");
782 os_memset(&eap_conf, 0, sizeof(eap_conf));
783 eap_conf.ssl_ctx = data->ssl_ctx;
784 eap_conf.msg_ctx = data->msg_ctx;
785 eap_conf.eap_sim_db_priv = data->eap_sim_db_priv;
786 eap_conf.backend_auth = TRUE;
787 eap_conf.eap_server = 1;
788 eap_conf.pac_opaque_encr_key = data->pac_opaque_encr_key;
789 eap_conf.eap_fast_a_id = data->eap_fast_a_id;
790 eap_conf.eap_fast_a_id_len = data->eap_fast_a_id_len;
791 eap_conf.eap_fast_a_id_info = data->eap_fast_a_id_info;
792 eap_conf.eap_fast_prov = data->eap_fast_prov;
793 eap_conf.pac_key_lifetime = data->pac_key_lifetime;
794 eap_conf.pac_key_refresh_time = data->pac_key_refresh_time;
795 eap_conf.eap_sim_aka_result_ind = data->eap_sim_aka_result_ind;
796 eap_conf.tnc = data->tnc;
797 eap_conf.wps = data->wps;
798 eap_conf.pwd_group = data->pwd_group;
799 eap_conf.server_id = (const u8 *) data->server_id;
800 eap_conf.server_id_len = os_strlen(data->server_id);
801 eap_conf.erp = data->erp;
802 eap_conf.tls_session_lifetime = data->tls_session_lifetime;
803 eap_conf.tls_flags = data->tls_flags;
804 radius_server_testing_options(sess, &eap_conf);
805 sess->eap = eap_server_sm_init(sess, &radius_server_eapol_cb,
807 if (sess->eap == NULL) {
808 RADIUS_DEBUG("Failed to initialize EAP state machine for the "
810 radius_server_session_remove(data, sess);
813 sess->eap_if = eap_get_interface(sess->eap);
814 sess->eap_if->eapRestart = TRUE;
815 sess->eap_if->portEnabled = TRUE;
817 RADIUS_DEBUG("New session 0x%x initialized", sess->sess_id);
824 static void radius_srv_hs20_t_c_pending(struct radius_session *sess)
828 char addr[3 * ETH_ALEN], *id_str;
832 if (!sess->server->db || !sess->eap ||
833 is_zero_ether_addr(sess->mac_addr))
836 os_snprintf(addr, sizeof(addr), MACSTR, MAC2STR(sess->mac_addr));
838 id = eap_get_identity(sess->eap, &id_len);
841 id_str = os_malloc(id_len + 1);
844 os_memcpy(id_str, id, id_len);
845 id_str[id_len] = '\0';
847 sql = sqlite3_mprintf("INSERT OR REPLACE INTO pending_tc (mac_addr,identity) VALUES (%Q,%Q)",
853 if (sqlite3_exec(sess->server->db, sql, NULL, NULL, NULL) !=
855 RADIUS_ERROR("Failed to add pending_tc entry into sqlite database: %s",
856 sqlite3_errmsg(sess->server->db));
859 #endif /* CONFIG_SQLITE */
861 #endif /* CONFIG_HS20 */
864 static void radius_server_add_session(struct radius_session *sess)
868 char addr_txt[ETH_ALEN * 3];
871 if (!sess->server->db)
875 os_snprintf(addr_txt, sizeof(addr_txt), MACSTR,
876 MAC2STR(sess->mac_addr));
879 sql = sqlite3_mprintf("INSERT OR REPLACE INTO current_sessions(mac_addr,identity,start_time,nas,hs20_t_c_filtering) VALUES (%Q,%Q,%d,%Q,%u)",
880 addr_txt, sess->username, now.sec,
881 sess->nas_ip, sess->t_c_filtering);
883 if (sqlite3_exec(sess->server->db, sql, NULL, NULL,
884 NULL) != SQLITE_OK) {
885 RADIUS_ERROR("Failed to add current_sessions entry into sqlite database: %s",
886 sqlite3_errmsg(sess->server->db));
890 #endif /* CONFIG_SQLITE */
894 static void db_update_last_msk(struct radius_session *sess, const char *msk)
896 #ifdef CONFIG_RADIUS_TEST
902 const char *serial_num;
904 if (!sess->server->db)
907 serial_num = eap_get_serial_num(sess->eap);
909 id_len = 5 + os_strlen(serial_num) + 1;
910 id_str = os_malloc(id_len);
913 os_snprintf(id_str, id_len, "cert-%s", serial_num);
915 id = eap_get_identity(sess->eap, &id_len);
918 id_str = os_malloc(id_len + 1);
921 os_memcpy(id_str, id, id_len);
922 id_str[id_len] = '\0';
925 sql = sqlite3_mprintf("UPDATE users SET last_msk=%Q WHERE identity=%Q",
931 if (sqlite3_exec(sess->server->db, sql, NULL, NULL, NULL) !=
933 RADIUS_DEBUG("Failed to update last_msk: %s",
934 sqlite3_errmsg(sess->server->db));
937 #endif /* CONFIG_SQLITE */
938 #endif /* CONFIG_RADIUS_TEST */
944 static int radius_server_is_sim_method(struct radius_session *sess)
948 name = eap_get_method(sess->eap);
950 (os_strcmp(name, "SIM") == 0 ||
951 os_strcmp(name, "AKA") == 0 ||
952 os_strcmp(name, "AKA'") == 0);
956 static int radius_server_hs20_missing_sim_pps(struct radius_msg *request)
958 u8 *buf, *pos, *end, type, sublen;
963 if (radius_msg_get_attr_ptr(request,
964 RADIUS_ATTR_VENDOR_SPECIFIC,
965 &buf, &len, buf) < 0)
971 if (WPA_GET_BE32(pos) != RADIUS_VENDOR_ID_WFA)
978 continue; /* invalid length */
979 sublen -= 2; /* skip header */
980 if (pos + sublen > end)
981 continue; /* invalid WFA VSA */
983 if (type != RADIUS_VENDOR_ATTR_WFA_HS20_STA_VERSION)
986 RADIUS_DUMP("HS2.0 mobile device version", pos, sublen);
990 continue; /* Release 1 STA does not support provisioning
993 /* UpdateIdentifier 0 indicates no PPS MO */
994 return WPA_GET_BE16(pos + 1) == 0;
999 #define HS20_MOBILE_ID_HASH_LEN 16
1001 static int radius_server_sim_provisioning_session(struct radius_session *sess,
1004 #ifdef CONFIG_SQLITE
1006 char addr_txt[ETH_ALEN * 3];
1007 char hash_txt[2 * HS20_MOBILE_ID_HASH_LEN + 1];
1010 const char *imsi, *eap_method;
1012 if (!sess->server->db ||
1013 (!db_table_exists(sess->server->db, "sim_provisioning") &&
1014 db_table_create_sim_provisioning(sess->server->db) < 0))
1017 imsi = eap_get_imsi(sess->eap);
1021 eap_method = eap_get_method(sess->eap);
1025 os_snprintf(addr_txt, sizeof(addr_txt), MACSTR,
1026 MAC2STR(sess->mac_addr));
1027 wpa_snprintf_hex(hash_txt, sizeof(hash_txt), hash,
1028 HS20_MOBILE_ID_HASH_LEN);
1031 sql = sqlite3_mprintf("INSERT INTO sim_provisioning(mobile_identifier_hash,imsi,mac_addr,eap_method,timestamp) VALUES (%Q,%Q,%Q,%Q,%u)",
1032 hash_txt, imsi, addr_txt, eap_method, now.sec);
1036 if (sqlite3_exec(sess->server->db, sql, NULL, NULL, NULL) !=
1038 RADIUS_ERROR("Failed to add SIM provisioning entry into sqlite database: %s",
1039 sqlite3_errmsg(sess->server->db));
1046 #endif /* CONFIG_SQLITE */
1050 #endif /* CONFIG_HS20 */
1053 static struct radius_msg *
1054 radius_server_encapsulate_eap(struct radius_server_data *data,
1055 struct radius_client *client,
1056 struct radius_session *sess,
1057 struct radius_msg *request)
1059 struct radius_msg *msg;
1061 unsigned int sess_id;
1062 struct radius_hdr *hdr = radius_msg_get_hdr(request);
1063 u16 reason = WLAN_REASON_IEEE_802_1X_AUTH_FAILED;
1065 if (sess->eap_if->eapFail) {
1066 sess->eap_if->eapFail = FALSE;
1067 code = RADIUS_CODE_ACCESS_REJECT;
1068 } else if (sess->eap_if->eapSuccess) {
1069 sess->eap_if->eapSuccess = FALSE;
1070 code = RADIUS_CODE_ACCESS_ACCEPT;
1072 sess->eap_if->eapReq = FALSE;
1073 code = RADIUS_CODE_ACCESS_CHALLENGE;
1076 msg = radius_msg_new(code, hdr->identifier);
1078 RADIUS_DEBUG("Failed to allocate reply message");
1082 sess_id = htonl(sess->sess_id);
1083 if (code == RADIUS_CODE_ACCESS_CHALLENGE &&
1084 !radius_msg_add_attr(msg, RADIUS_ATTR_STATE,
1085 (u8 *) &sess_id, sizeof(sess_id))) {
1086 RADIUS_DEBUG("Failed to add State attribute");
1089 if (sess->eap_if->eapReqData &&
1090 !radius_msg_add_eap(msg, wpabuf_head(sess->eap_if->eapReqData),
1091 wpabuf_len(sess->eap_if->eapReqData))) {
1092 RADIUS_DEBUG("Failed to add EAP-Message attribute");
1095 if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->eap_if->eapKeyData) {
1097 #ifdef CONFIG_RADIUS_TEST
1098 char buf[2 * 64 + 1];
1100 len = sess->eap_if->eapKeyDataLen;
1103 len = wpa_snprintf_hex(buf, sizeof(buf),
1104 sess->eap_if->eapKeyData, len);
1107 if (data->dump_msk_file) {
1110 f = fopen(data->dump_msk_file, "a");
1112 len = sess->eap_if->eapKeyDataLen;
1115 len = wpa_snprintf_hex(
1117 sess->eap_if->eapKeyData, len);
1119 fprintf(f, "%s\n", buf);
1124 db_update_last_msk(sess, buf);
1125 #endif /* CONFIG_RADIUS_TEST */
1126 if (sess->eap_if->eapKeyDataLen > 64) {
1129 len = sess->eap_if->eapKeyDataLen / 2;
1131 if (!radius_msg_add_mppe_keys(msg, hdr->authenticator,
1132 (u8 *) client->shared_secret,
1133 client->shared_secret_len,
1134 sess->eap_if->eapKeyData + len,
1135 len, sess->eap_if->eapKeyData,
1137 RADIUS_DEBUG("Failed to add MPPE key attributes");
1142 if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->remediation &&
1143 data->subscr_remediation_url) {
1145 size_t url_len = os_strlen(data->subscr_remediation_url);
1146 buf = os_malloc(1 + url_len);
1148 radius_msg_free(msg);
1151 buf[0] = data->subscr_remediation_method;
1152 os_memcpy(&buf[1], data->subscr_remediation_url, url_len);
1153 if (!radius_msg_add_wfa(
1154 msg, RADIUS_VENDOR_ATTR_WFA_HS20_SUBSCR_REMEDIATION,
1155 buf, 1 + url_len)) {
1156 RADIUS_DEBUG("Failed to add WFA-HS20-SubscrRem");
1159 } else if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->remediation) {
1161 if (!radius_msg_add_wfa(
1162 msg, RADIUS_VENDOR_ATTR_WFA_HS20_SUBSCR_REMEDIATION,
1164 RADIUS_DEBUG("Failed to add WFA-HS20-SubscrRem");
1166 } else if (code == RADIUS_CODE_ACCESS_ACCEPT &&
1167 data->hs20_sim_provisioning_url &&
1168 radius_server_is_sim_method(sess) &&
1169 radius_server_hs20_missing_sim_pps(request)) {
1170 u8 *buf, *pos, hash[HS20_MOBILE_ID_HASH_LEN];
1171 size_t prefix_len, url_len;
1173 RADIUS_DEBUG("Device needs HS 2.0 SIM provisioning");
1175 if (os_get_random(hash, HS20_MOBILE_ID_HASH_LEN) < 0) {
1176 radius_msg_free(msg);
1179 RADIUS_DUMP("hotspot2dot0-mobile-identifier-hash",
1180 hash, HS20_MOBILE_ID_HASH_LEN);
1182 if (radius_server_sim_provisioning_session(sess, hash) < 0) {
1183 radius_msg_free(msg);
1187 prefix_len = os_strlen(data->hs20_sim_provisioning_url);
1188 url_len = prefix_len + 2 * HS20_MOBILE_ID_HASH_LEN;
1189 buf = os_malloc(1 + url_len + 1);
1191 radius_msg_free(msg);
1195 *pos++ = data->subscr_remediation_method;
1196 os_memcpy(pos, data->hs20_sim_provisioning_url, prefix_len);
1198 wpa_snprintf_hex((char *) pos, 2 * HS20_MOBILE_ID_HASH_LEN + 1,
1199 hash, HS20_MOBILE_ID_HASH_LEN);
1200 RADIUS_DEBUG("HS 2.0 subscription remediation URL: %s",
1202 if (!radius_msg_add_wfa(
1203 msg, RADIUS_VENDOR_ATTR_WFA_HS20_SUBSCR_REMEDIATION,
1204 buf, 1 + url_len)) {
1205 RADIUS_DEBUG("Failed to add WFA-HS20-SubscrRem");
1210 if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->t_c_filtering) {
1211 u8 buf[4] = { 0x01, 0x00, 0x00, 0x00 }; /* E=1 */
1212 const char *url = data->t_c_server_url, *pos;
1213 char *url2, *end2, *pos2;
1216 if (!radius_msg_add_wfa(
1217 msg, RADIUS_VENDOR_ATTR_WFA_HS20_T_C_FILTERING,
1218 buf, sizeof(buf))) {
1219 RADIUS_DEBUG("Failed to add WFA-HS20-T-C-Filtering");
1220 radius_msg_free(msg);
1225 RADIUS_DEBUG("No t_c_server_url configured");
1226 radius_msg_free(msg);
1230 pos = os_strstr(url, "@1@");
1232 RADIUS_DEBUG("No @1@ macro in t_c_server_url");
1233 radius_msg_free(msg);
1237 url_len = os_strlen(url) + ETH_ALEN * 3 - 1 - 3;
1238 url2 = os_malloc(url_len + 1);
1240 RADIUS_DEBUG("Failed to allocate room for T&C Server URL");
1242 radius_msg_free(msg);
1246 end2 = url2 + url_len + 1;
1247 os_memcpy(pos2, url, pos - url);
1249 os_snprintf(pos2, end2 - pos2, MACSTR, MAC2STR(sess->mac_addr));
1250 pos2 += ETH_ALEN * 3 - 1;
1251 os_memcpy(pos2, pos + 3, os_strlen(pos + 3));
1252 if (!radius_msg_add_wfa(msg,
1253 RADIUS_VENDOR_ATTR_WFA_HS20_T_C_URL,
1254 (const u8 *) url2, url_len)) {
1255 RADIUS_DEBUG("Failed to add WFA-HS20-T-C-URL");
1257 radius_msg_free(msg);
1262 radius_srv_hs20_t_c_pending(sess);
1264 #endif /* CONFIG_HS20 */
1266 if (radius_msg_copy_attr(msg, request, RADIUS_ATTR_PROXY_STATE) < 0) {
1267 RADIUS_DEBUG("Failed to copy Proxy-State attribute(s)");
1268 radius_msg_free(msg);
1272 if (code == RADIUS_CODE_ACCESS_ACCEPT) {
1273 struct hostapd_radius_attr *attr;
1274 for (attr = sess->accept_attr; attr; attr = attr->next) {
1275 if (!radius_msg_add_attr(msg, attr->type,
1276 wpabuf_head(attr->val),
1277 wpabuf_len(attr->val))) {
1278 wpa_printf(MSG_ERROR, "Could not add RADIUS attribute");
1279 radius_msg_free(msg);
1285 if (code == RADIUS_CODE_ACCESS_REJECT) {
1286 if (radius_msg_add_attr_int32(msg, RADIUS_ATTR_WLAN_REASON_CODE,
1288 RADIUS_DEBUG("Failed to add WLAN-Reason-Code attribute");
1289 radius_msg_free(msg);
1294 if (radius_msg_finish_srv(msg, (u8 *) client->shared_secret,
1295 client->shared_secret_len,
1296 hdr->authenticator) < 0) {
1297 RADIUS_DEBUG("Failed to add Message-Authenticator attribute");
1300 if (code == RADIUS_CODE_ACCESS_ACCEPT)
1301 radius_server_add_session(sess);
1307 static struct radius_msg *
1308 radius_server_macacl(struct radius_server_data *data,
1309 struct radius_client *client,
1310 struct radius_session *sess,
1311 struct radius_msg *request)
1313 struct radius_msg *msg;
1315 struct radius_hdr *hdr = radius_msg_get_hdr(request);
1319 code = RADIUS_CODE_ACCESS_ACCEPT;
1321 if (radius_msg_get_attr_ptr(request, RADIUS_ATTR_USER_PASSWORD, &pw,
1322 &pw_len, NULL) < 0) {
1323 RADIUS_DEBUG("Could not get User-Password");
1324 code = RADIUS_CODE_ACCESS_REJECT;
1327 struct eap_user tmp;
1329 os_memset(&tmp, 0, sizeof(tmp));
1330 res = data->get_eap_user(data->conf_ctx, (u8 *) sess->username,
1331 os_strlen(sess->username), 0, &tmp);
1332 if (res || !tmp.macacl || tmp.password == NULL) {
1333 RADIUS_DEBUG("No MAC ACL user entry");
1334 bin_clear_free(tmp.password, tmp.password_len);
1335 code = RADIUS_CODE_ACCESS_REJECT;
1338 res = radius_user_password_hide(
1339 request, tmp.password, tmp.password_len,
1340 (u8 *) client->shared_secret,
1341 client->shared_secret_len,
1343 bin_clear_free(tmp.password, tmp.password_len);
1345 if (res < 0 || pw_len != (size_t) res ||
1346 os_memcmp_const(pw, buf, res) != 0) {
1347 RADIUS_DEBUG("Incorrect User-Password");
1348 code = RADIUS_CODE_ACCESS_REJECT;
1353 msg = radius_msg_new(code, hdr->identifier);
1355 RADIUS_DEBUG("Failed to allocate reply message");
1359 if (radius_msg_copy_attr(msg, request, RADIUS_ATTR_PROXY_STATE) < 0) {
1360 RADIUS_DEBUG("Failed to copy Proxy-State attribute(s)");
1361 radius_msg_free(msg);
1365 if (code == RADIUS_CODE_ACCESS_ACCEPT) {
1366 struct hostapd_radius_attr *attr;
1367 for (attr = sess->accept_attr; attr; attr = attr->next) {
1368 if (!radius_msg_add_attr(msg, attr->type,
1369 wpabuf_head(attr->val),
1370 wpabuf_len(attr->val))) {
1371 wpa_printf(MSG_ERROR, "Could not add RADIUS attribute");
1372 radius_msg_free(msg);
1378 if (radius_msg_finish_srv(msg, (u8 *) client->shared_secret,
1379 client->shared_secret_len,
1380 hdr->authenticator) < 0) {
1381 RADIUS_DEBUG("Failed to add Message-Authenticator attribute");
1388 static int radius_server_reject(struct radius_server_data *data,
1389 struct radius_client *client,
1390 struct radius_msg *request,
1391 struct sockaddr *from, socklen_t fromlen,
1392 const char *from_addr, int from_port)
1394 struct radius_msg *msg;
1396 struct eap_hdr eapfail;
1398 struct radius_hdr *hdr = radius_msg_get_hdr(request);
1400 RADIUS_DEBUG("Reject invalid request from %s:%d",
1401 from_addr, from_port);
1403 msg = radius_msg_new(RADIUS_CODE_ACCESS_REJECT, hdr->identifier);
1408 os_memset(&eapfail, 0, sizeof(eapfail));
1409 eapfail.code = EAP_CODE_FAILURE;
1410 eapfail.identifier = 0;
1411 eapfail.length = host_to_be16(sizeof(eapfail));
1413 if (!radius_msg_add_eap(msg, (u8 *) &eapfail, sizeof(eapfail))) {
1414 RADIUS_DEBUG("Failed to add EAP-Message attribute");
1417 if (radius_msg_copy_attr(msg, request, RADIUS_ATTR_PROXY_STATE) < 0) {
1418 RADIUS_DEBUG("Failed to copy Proxy-State attribute(s)");
1419 radius_msg_free(msg);
1423 if (radius_msg_finish_srv(msg, (u8 *) client->shared_secret,
1424 client->shared_secret_len,
1425 hdr->authenticator) <
1427 RADIUS_DEBUG("Failed to add Message-Authenticator attribute");
1430 if (wpa_debug_level <= MSG_MSGDUMP) {
1431 radius_msg_dump(msg);
1434 data->counters.access_rejects++;
1435 client->counters.access_rejects++;
1436 buf = radius_msg_get_buf(msg);
1437 if (sendto(data->auth_sock, wpabuf_head(buf), wpabuf_len(buf), 0,
1438 (struct sockaddr *) from, sizeof(*from)) < 0) {
1439 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s", strerror(errno));
1443 radius_msg_free(msg);
1449 static void radius_server_hs20_t_c_check(struct radius_session *sess,
1450 struct radius_msg *msg)
1453 u8 *buf, *pos, *end, type, sublen, *timestamp = NULL;
1458 if (radius_msg_get_attr_ptr(msg, RADIUS_ATTR_VENDOR_SPECIFIC,
1459 &buf, &len, buf) < 0)
1465 if (WPA_GET_BE32(pos) != RADIUS_VENDOR_ID_WFA)
1472 continue; /* invalid length */
1473 sublen -= 2; /* skip header */
1474 if (pos + sublen > end)
1475 continue; /* invalid WFA VSA */
1477 if (type == RADIUS_VENDOR_ATTR_WFA_HS20_TIMESTAMP && len >= 4) {
1485 RADIUS_DEBUG("HS20-Timestamp: %u", WPA_GET_BE32(timestamp));
1486 if (sess->t_c_timestamp != WPA_GET_BE32(timestamp)) {
1487 RADIUS_DEBUG("Last read T&C timestamp does not match HS20-Timestamp --> require filtering");
1488 sess->t_c_filtering = 1;
1490 #endif /* CONFIG_HS20 */
1494 static int radius_server_request(struct radius_server_data *data,
1495 struct radius_msg *msg,
1496 struct sockaddr *from, socklen_t fromlen,
1497 struct radius_client *client,
1498 const char *from_addr, int from_port,
1499 struct radius_session *force_sess)
1501 struct wpabuf *eap = NULL;
1502 int res, state_included = 0;
1505 struct radius_session *sess;
1506 struct radius_msg *reply;
1507 int is_complete = 0;
1512 res = radius_msg_get_attr(msg, RADIUS_ATTR_STATE, statebuf,
1514 state_included = res >= 0;
1515 if (res == sizeof(statebuf)) {
1516 state = WPA_GET_BE32(statebuf);
1517 sess = radius_server_get_session(client, state);
1524 RADIUS_DEBUG("Request for session 0x%x", sess->sess_id);
1525 } else if (state_included) {
1526 RADIUS_DEBUG("State attribute included but no session found");
1527 radius_server_reject(data, client, msg, from, fromlen,
1528 from_addr, from_port);
1531 sess = radius_server_get_new_session(data, client, msg,
1534 RADIUS_DEBUG("Could not create a new session");
1535 radius_server_reject(data, client, msg, from, fromlen,
1536 from_addr, from_port);
1541 if (sess->last_from_port == from_port &&
1542 sess->last_identifier == radius_msg_get_hdr(msg)->identifier &&
1543 os_memcmp(sess->last_authenticator,
1544 radius_msg_get_hdr(msg)->authenticator, 16) == 0) {
1545 RADIUS_DEBUG("Duplicate message from %s", from_addr);
1546 data->counters.dup_access_requests++;
1547 client->counters.dup_access_requests++;
1549 if (sess->last_reply) {
1551 buf = radius_msg_get_buf(sess->last_reply);
1552 res = sendto(data->auth_sock, wpabuf_head(buf),
1554 (struct sockaddr *) from, fromlen);
1556 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s",
1562 RADIUS_DEBUG("No previous reply available for duplicate "
1567 eap = radius_msg_get_eap(msg);
1568 if (eap == NULL && sess->macacl) {
1569 reply = radius_server_macacl(data, client, sess, msg);
1575 RADIUS_DEBUG("No EAP-Message in RADIUS packet from %s",
1577 data->counters.packets_dropped++;
1578 client->counters.packets_dropped++;
1582 RADIUS_DUMP("Received EAP data", wpabuf_head(eap), wpabuf_len(eap));
1584 /* FIX: if Code is Request, Success, or Failure, send Access-Reject;
1585 * RFC3579 Sect. 2.6.2.
1586 * Include EAP-Response/Nak with no preferred method if
1588 * If code is not 1-4, discard the packet silently.
1589 * Or is this already done by the EAP state machine? */
1591 wpabuf_free(sess->eap_if->eapRespData);
1592 sess->eap_if->eapRespData = eap;
1593 sess->eap_if->eapResp = TRUE;
1594 eap_server_sm_step(sess->eap);
1596 if ((sess->eap_if->eapReq || sess->eap_if->eapSuccess ||
1597 sess->eap_if->eapFail) && sess->eap_if->eapReqData) {
1598 RADIUS_DUMP("EAP data from the state machine",
1599 wpabuf_head(sess->eap_if->eapReqData),
1600 wpabuf_len(sess->eap_if->eapReqData));
1601 } else if (sess->eap_if->eapFail) {
1602 RADIUS_DEBUG("No EAP data from the state machine, but eapFail "
1604 } else if (eap_sm_method_pending(sess->eap)) {
1605 radius_msg_free(sess->last_msg);
1606 sess->last_msg = msg;
1607 sess->last_from_port = from_port;
1608 os_free(sess->last_from_addr);
1609 sess->last_from_addr = os_strdup(from_addr);
1610 sess->last_fromlen = fromlen;
1611 os_memcpy(&sess->last_from, from, fromlen);
1614 RADIUS_DEBUG("No EAP data from the state machine - ignore this"
1615 " Access-Request silently (assuming it was a "
1617 data->counters.packets_dropped++;
1618 client->counters.packets_dropped++;
1622 if (sess->eap_if->eapSuccess || sess->eap_if->eapFail)
1624 if (sess->eap_if->eapFail) {
1625 srv_log(sess, "EAP authentication failed");
1626 db_update_last_msk(sess, "FAIL");
1627 } else if (sess->eap_if->eapSuccess) {
1628 srv_log(sess, "EAP authentication succeeded");
1631 if (sess->eap_if->eapSuccess)
1632 radius_server_hs20_t_c_check(sess, msg);
1634 reply = radius_server_encapsulate_eap(data, client, sess, msg);
1639 struct radius_hdr *hdr;
1641 RADIUS_DEBUG("Reply to %s:%d", from_addr, from_port);
1642 if (wpa_debug_level <= MSG_MSGDUMP) {
1643 radius_msg_dump(reply);
1646 switch (radius_msg_get_hdr(reply)->code) {
1647 case RADIUS_CODE_ACCESS_ACCEPT:
1648 srv_log(sess, "Sending Access-Accept");
1649 data->counters.access_accepts++;
1650 client->counters.access_accepts++;
1652 case RADIUS_CODE_ACCESS_REJECT:
1653 srv_log(sess, "Sending Access-Reject");
1654 data->counters.access_rejects++;
1655 client->counters.access_rejects++;
1657 case RADIUS_CODE_ACCESS_CHALLENGE:
1658 data->counters.access_challenges++;
1659 client->counters.access_challenges++;
1662 buf = radius_msg_get_buf(reply);
1663 res = sendto(data->auth_sock, wpabuf_head(buf),
1665 (struct sockaddr *) from, fromlen);
1667 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s",
1670 radius_msg_free(sess->last_reply);
1671 sess->last_reply = reply;
1672 sess->last_from_port = from_port;
1673 hdr = radius_msg_get_hdr(msg);
1674 sess->last_identifier = hdr->identifier;
1675 os_memcpy(sess->last_authenticator, hdr->authenticator, 16);
1677 data->counters.packets_dropped++;
1678 client->counters.packets_dropped++;
1682 RADIUS_DEBUG("Removing completed session 0x%x after timeout",
1684 eloop_cancel_timeout(radius_server_session_remove_timeout,
1686 eloop_register_timeout(RADIUS_SESSION_MAINTAIN, 0,
1687 radius_server_session_remove_timeout,
1696 radius_server_receive_disconnect_resp(struct radius_server_data *data,
1697 struct radius_client *client,
1698 struct radius_msg *msg, int ack)
1700 struct radius_hdr *hdr;
1702 if (!client->pending_dac_disconnect_req) {
1703 RADIUS_DEBUG("Ignore unexpected Disconnect response");
1704 radius_msg_free(msg);
1708 hdr = radius_msg_get_hdr(msg);
1709 if (hdr->identifier != client->pending_dac_disconnect_id) {
1710 RADIUS_DEBUG("Ignore unexpected Disconnect response with unexpected identifier %u (expected %u)",
1712 client->pending_dac_disconnect_id);
1713 radius_msg_free(msg);
1717 if (radius_msg_verify(msg, (const u8 *) client->shared_secret,
1718 client->shared_secret_len,
1719 client->pending_dac_disconnect_req, 0)) {
1720 RADIUS_DEBUG("Ignore Disconnect response with invalid authenticator");
1721 radius_msg_free(msg);
1725 RADIUS_DEBUG("Disconnect-%s received for " MACSTR,
1726 ack ? "ACK" : "NAK",
1727 MAC2STR(client->pending_dac_disconnect_addr));
1729 radius_msg_free(msg);
1730 radius_msg_free(client->pending_dac_disconnect_req);
1731 client->pending_dac_disconnect_req = NULL;
1735 static void radius_server_receive_coa_resp(struct radius_server_data *data,
1736 struct radius_client *client,
1737 struct radius_msg *msg, int ack)
1739 struct radius_hdr *hdr;
1740 #ifdef CONFIG_SQLITE
1741 char addrtxt[3 * ETH_ALEN];
1744 #endif /* CONFIG_SQLITE */
1746 if (!client->pending_dac_coa_req) {
1747 RADIUS_DEBUG("Ignore unexpected CoA response");
1748 radius_msg_free(msg);
1752 hdr = radius_msg_get_hdr(msg);
1753 if (hdr->identifier != client->pending_dac_coa_id) {
1754 RADIUS_DEBUG("Ignore unexpected CoA response with unexpected identifier %u (expected %u)",
1756 client->pending_dac_coa_id);
1757 radius_msg_free(msg);
1761 if (radius_msg_verify(msg, (const u8 *) client->shared_secret,
1762 client->shared_secret_len,
1763 client->pending_dac_coa_req, 0)) {
1764 RADIUS_DEBUG("Ignore CoA response with invalid authenticator");
1765 radius_msg_free(msg);
1769 RADIUS_DEBUG("CoA-%s received for " MACSTR,
1770 ack ? "ACK" : "NAK",
1771 MAC2STR(client->pending_dac_coa_addr));
1773 radius_msg_free(msg);
1774 radius_msg_free(client->pending_dac_coa_req);
1775 client->pending_dac_coa_req = NULL;
1777 #ifdef CONFIG_SQLITE
1781 os_snprintf(addrtxt, sizeof(addrtxt), MACSTR,
1782 MAC2STR(client->pending_dac_coa_addr));
1785 sql = sqlite3_mprintf("UPDATE current_sessions SET hs20_t_c_filtering=0, waiting_coa_ack=0, coa_ack_received=1 WHERE mac_addr=%Q",
1788 sql = sqlite3_mprintf("UPDATE current_sessions SET waiting_coa_ack=0 WHERE mac_addr=%Q",
1794 res = sqlite3_exec(data->db, sql, NULL, NULL, NULL);
1796 if (res != SQLITE_OK) {
1797 RADIUS_ERROR("Failed to update current_sessions entry: %s",
1798 sqlite3_errmsg(data->db));
1801 #endif /* CONFIG_SQLITE */
1805 static void radius_server_receive_auth(int sock, void *eloop_ctx,
1808 struct radius_server_data *data = eloop_ctx;
1811 struct sockaddr_storage ss;
1812 struct sockaddr_in sin;
1814 struct sockaddr_in6 sin6;
1815 #endif /* CONFIG_IPV6 */
1819 struct radius_client *client = NULL;
1820 struct radius_msg *msg = NULL;
1824 buf = os_malloc(RADIUS_MAX_MSG_LEN);
1829 fromlen = sizeof(from);
1830 len = recvfrom(sock, buf, RADIUS_MAX_MSG_LEN, 0,
1831 (struct sockaddr *) &from.ss, &fromlen);
1833 wpa_printf(MSG_INFO, "recvfrom[radius_server]: %s",
1840 if (inet_ntop(AF_INET6, &from.sin6.sin6_addr, abuf,
1841 sizeof(abuf)) == NULL)
1843 from_port = ntohs(from.sin6.sin6_port);
1844 RADIUS_DEBUG("Received %d bytes from %s:%d",
1845 len, abuf, from_port);
1847 client = radius_server_get_client(data,
1849 &from.sin6.sin6_addr, 1);
1851 #endif /* CONFIG_IPV6 */
1854 os_strlcpy(abuf, inet_ntoa(from.sin.sin_addr), sizeof(abuf));
1855 from_port = ntohs(from.sin.sin_port);
1856 RADIUS_DEBUG("Received %d bytes from %s:%d",
1857 len, abuf, from_port);
1859 client = radius_server_get_client(data, &from.sin.sin_addr, 0);
1862 RADIUS_DUMP("Received data", buf, len);
1864 if (client == NULL) {
1865 RADIUS_DEBUG("Unknown client %s - packet ignored", abuf);
1866 data->counters.invalid_requests++;
1870 msg = radius_msg_parse(buf, len);
1872 RADIUS_DEBUG("Parsing incoming RADIUS frame failed");
1873 data->counters.malformed_access_requests++;
1874 client->counters.malformed_access_requests++;
1881 if (wpa_debug_level <= MSG_MSGDUMP) {
1882 radius_msg_dump(msg);
1885 if (radius_msg_get_hdr(msg)->code == RADIUS_CODE_DISCONNECT_ACK) {
1886 radius_server_receive_disconnect_resp(data, client, msg, 1);
1890 if (radius_msg_get_hdr(msg)->code == RADIUS_CODE_DISCONNECT_NAK) {
1891 radius_server_receive_disconnect_resp(data, client, msg, 0);
1895 if (radius_msg_get_hdr(msg)->code == RADIUS_CODE_COA_ACK) {
1896 radius_server_receive_coa_resp(data, client, msg, 1);
1900 if (radius_msg_get_hdr(msg)->code == RADIUS_CODE_COA_NAK) {
1901 radius_server_receive_coa_resp(data, client, msg, 0);
1905 if (radius_msg_get_hdr(msg)->code != RADIUS_CODE_ACCESS_REQUEST) {
1906 RADIUS_DEBUG("Unexpected RADIUS code %d",
1907 radius_msg_get_hdr(msg)->code);
1908 data->counters.unknown_types++;
1909 client->counters.unknown_types++;
1913 data->counters.access_requests++;
1914 client->counters.access_requests++;
1916 if (radius_msg_verify_msg_auth(msg, (u8 *) client->shared_secret,
1917 client->shared_secret_len, NULL)) {
1918 RADIUS_DEBUG("Invalid Message-Authenticator from %s", abuf);
1919 data->counters.bad_authenticators++;
1920 client->counters.bad_authenticators++;
1924 if (radius_server_request(data, msg, (struct sockaddr *) &from,
1925 fromlen, client, abuf, from_port, NULL) ==
1927 return; /* msg was stored with the session */
1930 radius_msg_free(msg);
1935 static void radius_server_receive_acct(int sock, void *eloop_ctx,
1938 struct radius_server_data *data = eloop_ctx;
1941 struct sockaddr_storage ss;
1942 struct sockaddr_in sin;
1944 struct sockaddr_in6 sin6;
1945 #endif /* CONFIG_IPV6 */
1949 struct radius_client *client = NULL;
1950 struct radius_msg *msg = NULL, *resp = NULL;
1953 struct radius_hdr *hdr;
1954 struct wpabuf *rbuf;
1956 buf = os_malloc(RADIUS_MAX_MSG_LEN);
1961 fromlen = sizeof(from);
1962 len = recvfrom(sock, buf, RADIUS_MAX_MSG_LEN, 0,
1963 (struct sockaddr *) &from.ss, &fromlen);
1965 wpa_printf(MSG_INFO, "recvfrom[radius_server]: %s",
1972 if (inet_ntop(AF_INET6, &from.sin6.sin6_addr, abuf,
1973 sizeof(abuf)) == NULL)
1975 from_port = ntohs(from.sin6.sin6_port);
1976 RADIUS_DEBUG("Received %d bytes from %s:%d",
1977 len, abuf, from_port);
1979 client = radius_server_get_client(data,
1981 &from.sin6.sin6_addr, 1);
1983 #endif /* CONFIG_IPV6 */
1986 os_strlcpy(abuf, inet_ntoa(from.sin.sin_addr), sizeof(abuf));
1987 from_port = ntohs(from.sin.sin_port);
1988 RADIUS_DEBUG("Received %d bytes from %s:%d",
1989 len, abuf, from_port);
1991 client = radius_server_get_client(data, &from.sin.sin_addr, 0);
1994 RADIUS_DUMP("Received data", buf, len);
1996 if (client == NULL) {
1997 RADIUS_DEBUG("Unknown client %s - packet ignored", abuf);
1998 data->counters.invalid_acct_requests++;
2002 msg = radius_msg_parse(buf, len);
2004 RADIUS_DEBUG("Parsing incoming RADIUS frame failed");
2005 data->counters.malformed_acct_requests++;
2006 client->counters.malformed_acct_requests++;
2013 if (wpa_debug_level <= MSG_MSGDUMP) {
2014 radius_msg_dump(msg);
2017 if (radius_msg_get_hdr(msg)->code != RADIUS_CODE_ACCOUNTING_REQUEST) {
2018 RADIUS_DEBUG("Unexpected RADIUS code %d",
2019 radius_msg_get_hdr(msg)->code);
2020 data->counters.unknown_acct_types++;
2021 client->counters.unknown_acct_types++;
2025 data->counters.acct_requests++;
2026 client->counters.acct_requests++;
2028 if (radius_msg_verify_acct_req(msg, (u8 *) client->shared_secret,
2029 client->shared_secret_len)) {
2030 RADIUS_DEBUG("Invalid Authenticator from %s", abuf);
2031 data->counters.acct_bad_authenticators++;
2032 client->counters.acct_bad_authenticators++;
2036 /* TODO: Write accounting information to a file or database */
2038 hdr = radius_msg_get_hdr(msg);
2040 resp = radius_msg_new(RADIUS_CODE_ACCOUNTING_RESPONSE, hdr->identifier);
2044 radius_msg_finish_acct_resp(resp, (u8 *) client->shared_secret,
2045 client->shared_secret_len,
2046 hdr->authenticator);
2048 RADIUS_DEBUG("Reply to %s:%d", abuf, from_port);
2049 if (wpa_debug_level <= MSG_MSGDUMP) {
2050 radius_msg_dump(resp);
2052 rbuf = radius_msg_get_buf(resp);
2053 data->counters.acct_responses++;
2054 client->counters.acct_responses++;
2055 res = sendto(data->acct_sock, wpabuf_head(rbuf), wpabuf_len(rbuf), 0,
2056 (struct sockaddr *) &from.ss, fromlen);
2058 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s",
2063 radius_msg_free(resp);
2064 radius_msg_free(msg);
2069 static int radius_server_disable_pmtu_discovery(int s)
2072 #if defined(IP_MTU_DISCOVER) && defined(IP_PMTUDISC_DONT)
2073 /* Turn off Path MTU discovery on IPv4/UDP sockets. */
2074 int action = IP_PMTUDISC_DONT;
2075 r = setsockopt(s, IPPROTO_IP, IP_MTU_DISCOVER, &action,
2078 wpa_printf(MSG_ERROR, "Failed to set IP_MTU_DISCOVER: "
2079 "%s", strerror(errno));
2085 static int radius_server_open_socket(int port)
2088 struct sockaddr_in addr;
2090 s = socket(PF_INET, SOCK_DGRAM, 0);
2092 wpa_printf(MSG_INFO, "RADIUS: socket: %s", strerror(errno));
2096 radius_server_disable_pmtu_discovery(s);
2098 os_memset(&addr, 0, sizeof(addr));
2099 addr.sin_family = AF_INET;
2100 addr.sin_port = htons(port);
2101 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
2102 wpa_printf(MSG_INFO, "RADIUS: bind: %s", strerror(errno));
2112 static int radius_server_open_socket6(int port)
2115 struct sockaddr_in6 addr;
2117 s = socket(PF_INET6, SOCK_DGRAM, 0);
2119 wpa_printf(MSG_INFO, "RADIUS: socket[IPv6]: %s",
2124 os_memset(&addr, 0, sizeof(addr));
2125 addr.sin6_family = AF_INET6;
2126 os_memcpy(&addr.sin6_addr, &in6addr_any, sizeof(in6addr_any));
2127 addr.sin6_port = htons(port);
2128 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
2129 wpa_printf(MSG_INFO, "RADIUS: bind: %s", strerror(errno));
2136 #endif /* CONFIG_IPV6 */
2139 static void radius_server_free_sessions(struct radius_server_data *data,
2140 struct radius_session *sessions)
2142 struct radius_session *session, *prev;
2147 session = session->next;
2148 radius_server_session_free(data, prev);
2153 static void radius_server_free_clients(struct radius_server_data *data,
2154 struct radius_client *clients)
2156 struct radius_client *client, *prev;
2161 client = client->next;
2163 radius_server_free_sessions(data, prev->sessions);
2164 os_free(prev->shared_secret);
2165 radius_msg_free(prev->pending_dac_coa_req);
2166 radius_msg_free(prev->pending_dac_disconnect_req);
2172 static struct radius_client *
2173 radius_server_read_clients(const char *client_file, int ipv6)
2176 const int buf_size = 1024;
2178 struct radius_client *clients, *tail, *entry;
2179 int line = 0, mask, failed = 0, i;
2180 struct in_addr addr;
2182 struct in6_addr addr6;
2183 #endif /* CONFIG_IPV6 */
2186 f = fopen(client_file, "r");
2188 RADIUS_ERROR("Could not open client file '%s'", client_file);
2192 buf = os_malloc(buf_size);
2198 clients = tail = NULL;
2199 while (fgets(buf, buf_size, f)) {
2200 /* Configuration file format:
2201 * 192.168.1.0/24 secret
2202 * 192.168.1.2 secret
2203 * fe80::211:22ff:fe33:4455/64 secretipv6
2206 buf[buf_size - 1] = '\0';
2208 while (*pos != '\0' && *pos != '\n')
2212 if (*buf == '\0' || *buf == '#')
2216 while ((*pos >= '0' && *pos <= '9') || *pos == '.' ||
2217 (*pos >= 'a' && *pos <= 'f') || *pos == ':' ||
2218 (*pos >= 'A' && *pos <= 'F')) {
2230 mask = strtol(pos, &end, 10);
2232 (mask < 0 || mask > (ipv6 ? 128 : 32))) {
2238 mask = ipv6 ? 128 : 32;
2242 if (!ipv6 && inet_aton(buf, &addr) == 0) {
2247 if (ipv6 && inet_pton(AF_INET6, buf, &addr6) <= 0) {
2248 if (inet_pton(AF_INET, buf, &addr) <= 0) {
2252 /* Convert IPv4 address to IPv6 */
2255 os_memset(addr6.s6_addr, 0, 10);
2256 addr6.s6_addr[10] = 0xff;
2257 addr6.s6_addr[11] = 0xff;
2258 os_memcpy(addr6.s6_addr + 12, (char *) &addr.s_addr,
2261 #endif /* CONFIG_IPV6 */
2263 while (*pos == ' ' || *pos == '\t') {
2272 entry = os_zalloc(sizeof(*entry));
2273 if (entry == NULL) {
2277 entry->shared_secret = os_strdup(pos);
2278 if (entry->shared_secret == NULL) {
2283 entry->shared_secret_len = os_strlen(entry->shared_secret);
2285 entry->addr.s_addr = addr.s_addr;
2287 for (i = 0; i < mask; i++)
2288 val |= 1U << (31 - i);
2289 entry->mask.s_addr = htonl(val);
2293 int offset = mask / 8;
2295 os_memcpy(entry->addr6.s6_addr, addr6.s6_addr, 16);
2296 os_memset(entry->mask6.s6_addr, 0xff, offset);
2298 for (i = 0; i < (mask % 8); i++)
2299 val |= 1 << (7 - i);
2301 entry->mask6.s6_addr[offset] = val;
2303 #endif /* CONFIG_IPV6 */
2306 clients = tail = entry;
2314 RADIUS_ERROR("Invalid line %d in '%s'", line, client_file);
2315 radius_server_free_clients(NULL, clients);
2327 * radius_server_init - Initialize RADIUS server
2328 * @conf: Configuration for the RADIUS server
2329 * Returns: Pointer to private RADIUS server context or %NULL on failure
2331 * This initializes a RADIUS server instance and returns a context pointer that
2332 * will be used in other calls to the RADIUS server module. The server can be
2333 * deinitialize by calling radius_server_deinit().
2335 struct radius_server_data *
2336 radius_server_init(struct radius_server_conf *conf)
2338 struct radius_server_data *data;
2342 wpa_printf(MSG_ERROR, "RADIUS server compiled without IPv6 support");
2345 #endif /* CONFIG_IPV6 */
2347 data = os_zalloc(sizeof(*data));
2351 dl_list_init(&data->erp_keys);
2352 os_get_reltime(&data->start_time);
2353 data->conf_ctx = conf->conf_ctx;
2354 data->eap_sim_db_priv = conf->eap_sim_db_priv;
2355 data->ssl_ctx = conf->ssl_ctx;
2356 data->msg_ctx = conf->msg_ctx;
2357 data->ipv6 = conf->ipv6;
2358 if (conf->pac_opaque_encr_key) {
2359 data->pac_opaque_encr_key = os_malloc(16);
2360 if (data->pac_opaque_encr_key) {
2361 os_memcpy(data->pac_opaque_encr_key,
2362 conf->pac_opaque_encr_key, 16);
2365 if (conf->eap_fast_a_id) {
2366 data->eap_fast_a_id = os_malloc(conf->eap_fast_a_id_len);
2367 if (data->eap_fast_a_id) {
2368 os_memcpy(data->eap_fast_a_id, conf->eap_fast_a_id,
2369 conf->eap_fast_a_id_len);
2370 data->eap_fast_a_id_len = conf->eap_fast_a_id_len;
2373 if (conf->eap_fast_a_id_info)
2374 data->eap_fast_a_id_info = os_strdup(conf->eap_fast_a_id_info);
2375 data->eap_fast_prov = conf->eap_fast_prov;
2376 data->pac_key_lifetime = conf->pac_key_lifetime;
2377 data->pac_key_refresh_time = conf->pac_key_refresh_time;
2378 data->get_eap_user = conf->get_eap_user;
2379 data->eap_sim_aka_result_ind = conf->eap_sim_aka_result_ind;
2380 data->tnc = conf->tnc;
2381 data->wps = conf->wps;
2382 data->pwd_group = conf->pwd_group;
2383 data->server_id = conf->server_id;
2384 if (conf->eap_req_id_text) {
2385 data->eap_req_id_text = os_malloc(conf->eap_req_id_text_len);
2386 if (data->eap_req_id_text) {
2387 os_memcpy(data->eap_req_id_text, conf->eap_req_id_text,
2388 conf->eap_req_id_text_len);
2389 data->eap_req_id_text_len = conf->eap_req_id_text_len;
2392 data->erp = conf->erp;
2393 data->erp_domain = conf->erp_domain;
2394 data->tls_session_lifetime = conf->tls_session_lifetime;
2395 data->tls_flags = conf->tls_flags;
2397 if (conf->subscr_remediation_url) {
2398 data->subscr_remediation_url =
2399 os_strdup(conf->subscr_remediation_url);
2401 data->subscr_remediation_method = conf->subscr_remediation_method;
2402 if (conf->hs20_sim_provisioning_url)
2403 data->hs20_sim_provisioning_url =
2404 os_strdup(conf->hs20_sim_provisioning_url);
2406 if (conf->t_c_server_url)
2407 data->t_c_server_url = os_strdup(conf->t_c_server_url);
2409 #ifdef CONFIG_SQLITE
2410 if (conf->sqlite_file) {
2411 if (sqlite3_open(conf->sqlite_file, &data->db)) {
2412 RADIUS_ERROR("Could not open SQLite file '%s'",
2414 radius_server_deinit(data);
2418 #endif /* CONFIG_SQLITE */
2420 #ifdef CONFIG_RADIUS_TEST
2421 if (conf->dump_msk_file)
2422 data->dump_msk_file = os_strdup(conf->dump_msk_file);
2423 #endif /* CONFIG_RADIUS_TEST */
2425 data->clients = radius_server_read_clients(conf->client_file,
2427 if (data->clients == NULL) {
2428 wpa_printf(MSG_ERROR, "No RADIUS clients configured");
2429 radius_server_deinit(data);
2435 data->auth_sock = radius_server_open_socket6(conf->auth_port);
2437 #endif /* CONFIG_IPV6 */
2438 data->auth_sock = radius_server_open_socket(conf->auth_port);
2439 if (data->auth_sock < 0) {
2440 wpa_printf(MSG_ERROR, "Failed to open UDP socket for RADIUS authentication server");
2441 radius_server_deinit(data);
2444 if (eloop_register_read_sock(data->auth_sock,
2445 radius_server_receive_auth,
2447 radius_server_deinit(data);
2451 if (conf->acct_port) {
2454 data->acct_sock = radius_server_open_socket6(
2457 #endif /* CONFIG_IPV6 */
2458 data->acct_sock = radius_server_open_socket(conf->acct_port);
2459 if (data->acct_sock < 0) {
2460 wpa_printf(MSG_ERROR, "Failed to open UDP socket for RADIUS accounting server");
2461 radius_server_deinit(data);
2464 if (eloop_register_read_sock(data->acct_sock,
2465 radius_server_receive_acct,
2467 radius_server_deinit(data);
2471 data->acct_sock = -1;
2479 * radius_server_erp_flush - Flush all ERP keys
2480 * @data: RADIUS server context from radius_server_init()
2482 void radius_server_erp_flush(struct radius_server_data *data)
2484 struct eap_server_erp_key *erp;
2488 while ((erp = dl_list_first(&data->erp_keys, struct eap_server_erp_key,
2490 dl_list_del(&erp->list);
2491 bin_clear_free(erp, sizeof(*erp));
2497 * radius_server_deinit - Deinitialize RADIUS server
2498 * @data: RADIUS server context from radius_server_init()
2500 void radius_server_deinit(struct radius_server_data *data)
2505 if (data->auth_sock >= 0) {
2506 eloop_unregister_read_sock(data->auth_sock);
2507 close(data->auth_sock);
2510 if (data->acct_sock >= 0) {
2511 eloop_unregister_read_sock(data->acct_sock);
2512 close(data->acct_sock);
2515 radius_server_free_clients(data, data->clients);
2517 os_free(data->pac_opaque_encr_key);
2518 os_free(data->eap_fast_a_id);
2519 os_free(data->eap_fast_a_id_info);
2520 os_free(data->eap_req_id_text);
2521 #ifdef CONFIG_RADIUS_TEST
2522 os_free(data->dump_msk_file);
2523 #endif /* CONFIG_RADIUS_TEST */
2524 os_free(data->subscr_remediation_url);
2525 os_free(data->hs20_sim_provisioning_url);
2526 os_free(data->t_c_server_url);
2528 #ifdef CONFIG_SQLITE
2530 sqlite3_close(data->db);
2531 #endif /* CONFIG_SQLITE */
2533 radius_server_erp_flush(data);
2540 * radius_server_get_mib - Get RADIUS server MIB information
2541 * @data: RADIUS server context from radius_server_init()
2542 * @buf: Buffer for returning the MIB data in text format
2543 * @buflen: buf length in octets
2544 * Returns: Number of octets written into buf
2546 int radius_server_get_mib(struct radius_server_data *data, char *buf,
2552 struct os_reltime now;
2553 struct radius_client *cli;
2555 /* RFC 2619 - RADIUS Authentication Server MIB */
2557 if (data == NULL || buflen == 0)
2563 os_get_reltime(&now);
2564 uptime = (now.sec - data->start_time.sec) * 100 +
2565 ((now.usec - data->start_time.usec) / 10000) % 100;
2566 ret = os_snprintf(pos, end - pos,
2567 "RADIUS-AUTH-SERVER-MIB\n"
2568 "radiusAuthServIdent=hostapd\n"
2569 "radiusAuthServUpTime=%d\n"
2570 "radiusAuthServResetTime=0\n"
2571 "radiusAuthServConfigReset=4\n",
2573 if (os_snprintf_error(end - pos, ret)) {
2579 ret = os_snprintf(pos, end - pos,
2580 "radiusAuthServTotalAccessRequests=%u\n"
2581 "radiusAuthServTotalInvalidRequests=%u\n"
2582 "radiusAuthServTotalDupAccessRequests=%u\n"
2583 "radiusAuthServTotalAccessAccepts=%u\n"
2584 "radiusAuthServTotalAccessRejects=%u\n"
2585 "radiusAuthServTotalAccessChallenges=%u\n"
2586 "radiusAuthServTotalMalformedAccessRequests=%u\n"
2587 "radiusAuthServTotalBadAuthenticators=%u\n"
2588 "radiusAuthServTotalPacketsDropped=%u\n"
2589 "radiusAuthServTotalUnknownTypes=%u\n"
2590 "radiusAccServTotalRequests=%u\n"
2591 "radiusAccServTotalInvalidRequests=%u\n"
2592 "radiusAccServTotalResponses=%u\n"
2593 "radiusAccServTotalMalformedRequests=%u\n"
2594 "radiusAccServTotalBadAuthenticators=%u\n"
2595 "radiusAccServTotalUnknownTypes=%u\n",
2596 data->counters.access_requests,
2597 data->counters.invalid_requests,
2598 data->counters.dup_access_requests,
2599 data->counters.access_accepts,
2600 data->counters.access_rejects,
2601 data->counters.access_challenges,
2602 data->counters.malformed_access_requests,
2603 data->counters.bad_authenticators,
2604 data->counters.packets_dropped,
2605 data->counters.unknown_types,
2606 data->counters.acct_requests,
2607 data->counters.invalid_acct_requests,
2608 data->counters.acct_responses,
2609 data->counters.malformed_acct_requests,
2610 data->counters.acct_bad_authenticators,
2611 data->counters.unknown_acct_types);
2612 if (os_snprintf_error(end - pos, ret)) {
2618 for (cli = data->clients, idx = 0; cli; cli = cli->next, idx++) {
2619 char abuf[50], mbuf[50];
2622 if (inet_ntop(AF_INET6, &cli->addr6, abuf,
2623 sizeof(abuf)) == NULL)
2625 if (inet_ntop(AF_INET6, &cli->mask6, mbuf,
2626 sizeof(mbuf)) == NULL)
2629 #endif /* CONFIG_IPV6 */
2631 os_strlcpy(abuf, inet_ntoa(cli->addr), sizeof(abuf));
2632 os_strlcpy(mbuf, inet_ntoa(cli->mask), sizeof(mbuf));
2635 ret = os_snprintf(pos, end - pos,
2636 "radiusAuthClientIndex=%u\n"
2637 "radiusAuthClientAddress=%s/%s\n"
2638 "radiusAuthServAccessRequests=%u\n"
2639 "radiusAuthServDupAccessRequests=%u\n"
2640 "radiusAuthServAccessAccepts=%u\n"
2641 "radiusAuthServAccessRejects=%u\n"
2642 "radiusAuthServAccessChallenges=%u\n"
2643 "radiusAuthServMalformedAccessRequests=%u\n"
2644 "radiusAuthServBadAuthenticators=%u\n"
2645 "radiusAuthServPacketsDropped=%u\n"
2646 "radiusAuthServUnknownTypes=%u\n"
2647 "radiusAccServTotalRequests=%u\n"
2648 "radiusAccServTotalInvalidRequests=%u\n"
2649 "radiusAccServTotalResponses=%u\n"
2650 "radiusAccServTotalMalformedRequests=%u\n"
2651 "radiusAccServTotalBadAuthenticators=%u\n"
2652 "radiusAccServTotalUnknownTypes=%u\n",
2655 cli->counters.access_requests,
2656 cli->counters.dup_access_requests,
2657 cli->counters.access_accepts,
2658 cli->counters.access_rejects,
2659 cli->counters.access_challenges,
2660 cli->counters.malformed_access_requests,
2661 cli->counters.bad_authenticators,
2662 cli->counters.packets_dropped,
2663 cli->counters.unknown_types,
2664 cli->counters.acct_requests,
2665 cli->counters.invalid_acct_requests,
2666 cli->counters.acct_responses,
2667 cli->counters.malformed_acct_requests,
2668 cli->counters.acct_bad_authenticators,
2669 cli->counters.unknown_acct_types);
2670 if (os_snprintf_error(end - pos, ret)) {
2681 static int radius_server_get_eap_user(void *ctx, const u8 *identity,
2682 size_t identity_len, int phase2,
2683 struct eap_user *user)
2685 struct radius_session *sess = ctx;
2686 struct radius_server_data *data = sess->server;
2689 ret = data->get_eap_user(data->conf_ctx, identity, identity_len,
2691 if (ret == 0 && user) {
2692 sess->accept_attr = user->accept_attr;
2693 sess->remediation = user->remediation;
2694 sess->macacl = user->macacl;
2695 sess->t_c_timestamp = user->t_c_timestamp;
2699 RADIUS_DEBUG("%s: User-Name not found from user database",
2707 static const char * radius_server_get_eap_req_id_text(void *ctx, size_t *len)
2709 struct radius_session *sess = ctx;
2710 struct radius_server_data *data = sess->server;
2711 *len = data->eap_req_id_text_len;
2712 return data->eap_req_id_text;
2716 static void radius_server_log_msg(void *ctx, const char *msg)
2718 struct radius_session *sess = ctx;
2719 srv_log(sess, "EAP: %s", msg);
2725 static const char * radius_server_get_erp_domain(void *ctx)
2727 struct radius_session *sess = ctx;
2728 struct radius_server_data *data = sess->server;
2730 return data->erp_domain;
2734 static struct eap_server_erp_key *
2735 radius_server_erp_get_key(void *ctx, const char *keyname)
2737 struct radius_session *sess = ctx;
2738 struct radius_server_data *data = sess->server;
2740 return radius_server_erp_find_key(data, keyname);
2744 static int radius_server_erp_add_key(void *ctx, struct eap_server_erp_key *erp)
2746 struct radius_session *sess = ctx;
2747 struct radius_server_data *data = sess->server;
2749 dl_list_add(&data->erp_keys, &erp->list);
2753 #endif /* CONFIG_ERP */
2756 static const struct eapol_callbacks radius_server_eapol_cb =
2758 .get_eap_user = radius_server_get_eap_user,
2759 .get_eap_req_id_text = radius_server_get_eap_req_id_text,
2760 .log_msg = radius_server_log_msg,
2762 .get_erp_send_reauth_start = NULL,
2763 .get_erp_domain = radius_server_get_erp_domain,
2764 .erp_get_key = radius_server_erp_get_key,
2765 .erp_add_key = radius_server_erp_add_key,
2766 #endif /* CONFIG_ERP */
2771 * radius_server_eap_pending_cb - Pending EAP data notification
2772 * @data: RADIUS server context from radius_server_init()
2773 * @ctx: Pending EAP context pointer
2775 * This function is used to notify EAP server module that a pending operation
2776 * has been completed and processing of the EAP session can proceed.
2778 void radius_server_eap_pending_cb(struct radius_server_data *data, void *ctx)
2780 struct radius_client *cli;
2781 struct radius_session *s, *sess = NULL;
2782 struct radius_msg *msg;
2787 for (cli = data->clients; cli; cli = cli->next) {
2788 for (s = cli->sessions; s; s = s->next) {
2789 if (s->eap == ctx && s->last_msg) {
2799 RADIUS_DEBUG("No session matched callback ctx");
2803 msg = sess->last_msg;
2804 sess->last_msg = NULL;
2805 eap_sm_pending_cb(sess->eap);
2806 if (radius_server_request(data, msg,
2807 (struct sockaddr *) &sess->last_from,
2808 sess->last_fromlen, cli,
2809 sess->last_from_addr,
2810 sess->last_from_port, sess) == -2)
2811 return; /* msg was stored with the session */
2813 radius_msg_free(msg);
2817 #ifdef CONFIG_SQLITE
2819 struct db_session_fields {
2822 int hs20_t_c_filtering;
2823 int waiting_coa_ack;
2824 int coa_ack_received;
2828 static int get_db_session_fields(void *ctx, int argc, char *argv[], char *col[])
2830 struct db_session_fields *fields = ctx;
2833 for (i = 0; i < argc; i++) {
2837 RADIUS_DEBUG("Session DB: %s=%s", col[i], argv[i]);
2839 if (os_strcmp(col[i], "identity") == 0) {
2840 os_free(fields->identity);
2841 fields->identity = os_strdup(argv[i]);
2842 } else if (os_strcmp(col[i], "nas") == 0) {
2843 os_free(fields->nas);
2844 fields->nas = os_strdup(argv[i]);
2845 } else if (os_strcmp(col[i], "hs20_t_c_filtering") == 0) {
2846 fields->hs20_t_c_filtering = atoi(argv[i]);
2847 } else if (os_strcmp(col[i], "waiting_coa_ack") == 0) {
2848 fields->waiting_coa_ack = atoi(argv[i]);
2849 } else if (os_strcmp(col[i], "coa_ack_received") == 0) {
2850 fields->coa_ack_received = atoi(argv[i]);
2858 static void free_db_session_fields(struct db_session_fields *fields)
2860 os_free(fields->identity);
2861 fields->identity = NULL;
2862 os_free(fields->nas);
2866 #endif /* CONFIG_SQLITE */
2869 int radius_server_dac_request(struct radius_server_data *data, const char *req)
2871 #ifdef CONFIG_SQLITE
2875 const char *pos = req;
2877 char addrtxt[3 * ETH_ALEN];
2879 struct db_session_fields fields;
2880 struct sockaddr_in das;
2881 struct radius_client *client;
2882 struct radius_msg *msg;
2890 /* req: <disconnect|coa> <MAC Address> [t_c_clear] */
2892 if (os_strncmp(pos, "disconnect ", 11) == 0) {
2895 } else if (os_strncmp(req, "coa ", 4) == 0) {
2902 if (hwaddr_aton(pos, addr))
2904 pos = os_strchr(pos, ' ');
2906 if (os_strstr(pos, "t_c_clear"))
2910 if (!disconnect && !t_c_clear) {
2911 RADIUS_ERROR("DAC request for CoA without any authorization change");
2916 RADIUS_ERROR("SQLite database not in use");
2920 os_snprintf(addrtxt, sizeof(addrtxt), MACSTR, MAC2STR(addr));
2922 sql = sqlite3_mprintf("SELECT * FROM current_sessions WHERE mac_addr=%Q",
2927 os_memset(&fields, 0, sizeof(fields));
2928 res = sqlite3_exec(data->db, sql, get_db_session_fields, &fields, NULL);
2930 if (res != SQLITE_OK) {
2931 RADIUS_ERROR("Failed to find matching current_sessions entry from sqlite database: %s",
2932 sqlite3_errmsg(data->db));
2933 free_db_session_fields(&fields);
2938 RADIUS_ERROR("No NAS information found from current_sessions");
2939 free_db_session_fields(&fields);
2943 os_memset(&das, 0, sizeof(das));
2944 das.sin_family = AF_INET;
2945 das.sin_addr.s_addr = inet_addr(fields.nas);
2946 das.sin_port = htons(3799);
2948 free_db_session_fields(&fields);
2950 client = radius_server_get_client(data, &das.sin_addr, 0);
2952 RADIUS_ERROR("No NAS information available to protect the packet");
2956 identifier = client->next_dac_identifier++;
2958 msg = radius_msg_new(disconnect ? RADIUS_CODE_DISCONNECT_REQUEST :
2959 RADIUS_CODE_COA_REQUEST, identifier);
2963 os_snprintf(addrtxt, sizeof(addrtxt), RADIUS_802_1X_ADDR_FORMAT,
2965 if (!radius_msg_add_attr(msg, RADIUS_ATTR_CALLING_STATION_ID,
2966 (u8 *) addrtxt, os_strlen(addrtxt))) {
2967 RADIUS_ERROR("Could not add Calling-Station-Id");
2968 radius_msg_free(msg);
2972 if (!disconnect && t_c_clear) {
2973 u8 val[4] = { 0x00, 0x00, 0x00, 0x00 }; /* E=0 */
2975 if (!radius_msg_add_wfa(
2976 msg, RADIUS_VENDOR_ATTR_WFA_HS20_T_C_FILTERING,
2977 val, sizeof(val))) {
2978 RADIUS_DEBUG("Failed to add WFA-HS20-T-C-Filtering");
2979 radius_msg_free(msg);
2985 if (!radius_msg_add_attr_int32(msg, RADIUS_ATTR_EVENT_TIMESTAMP,
2987 RADIUS_ERROR("Failed to add Event-Timestamp attribute");
2988 radius_msg_free(msg);
2992 radius_msg_finish_acct(msg, (u8 *) client->shared_secret,
2993 client->shared_secret_len);
2995 if (wpa_debug_level <= MSG_MSGDUMP)
2996 radius_msg_dump(msg);
2998 buf = radius_msg_get_buf(msg);
2999 if (sendto(data->auth_sock, wpabuf_head(buf), wpabuf_len(buf), 0,
3000 (struct sockaddr *) &das, sizeof(das)) < 0) {
3001 RADIUS_ERROR("Failed to send packet - sendto: %s",
3003 radius_msg_free(msg);
3008 radius_msg_free(client->pending_dac_disconnect_req);
3009 client->pending_dac_disconnect_req = msg;
3010 client->pending_dac_disconnect_id = identifier;
3011 os_memcpy(client->pending_dac_disconnect_addr, addr, ETH_ALEN);
3013 radius_msg_free(client->pending_dac_coa_req);
3014 client->pending_dac_coa_req = msg;
3015 client->pending_dac_coa_id = identifier;
3016 os_memcpy(client->pending_dac_coa_addr, addr, ETH_ALEN);
3020 #else /* CONFIG_SQLITE */
3022 #endif /* CONFIG_SQLITE */