1 /*
2 * RADIUS authentication server
3 * Copyright (c) 2005-2009, 2011-2014, Jouni Malinen <j@w1.fi>
4 *
5 * This software may be distributed under the terms of the BSD license.
6 * See README for more details.
7 */
8
9 #include "includes.h"
10 #include <net/if.h>
11 #ifdef CONFIG_SQLITE
12 #include <sqlite3.h>
13 #endif /* CONFIG_SQLITE */
14
15 #include "common.h"
16 #include "radius.h"
17 #include "eloop.h"
18 #include "eap_server/eap.h"
19 #include "ap/ap_config.h"
20 #include "crypto/tls.h"
21 #include "radius_server.h"
22
23 /**
24 * RADIUS_SESSION_TIMEOUT - Session timeout in seconds
25 */
26 #define RADIUS_SESSION_TIMEOUT 60
27
28 /**
29 * RADIUS_MAX_SESSION - Maximum number of active sessions
30 */
31 #define RADIUS_MAX_SESSION 100
32
33 /**
34 * RADIUS_MAX_MSG_LEN - Maximum message length for incoming RADIUS messages
35 */
36 #define RADIUS_MAX_MSG_LEN 3000
37
38 static const struct eapol_callbacks radius_server_eapol_cb;
39
40 struct radius_client;
41 struct radius_server_data;
42
43 /**
44 * struct radius_server_counters - RADIUS server statistics counters
45 */
46 struct radius_server_counters {
47 u32 access_requests;
48 u32 invalid_requests;
49 u32 dup_access_requests;
50 u32 access_accepts;
51 u32 access_rejects;
52 u32 access_challenges;
53 u32 malformed_access_requests;
54 u32 bad_authenticators;
55 u32 packets_dropped;
56 u32 unknown_types;
57
58 u32 acct_requests;
59 u32 invalid_acct_requests;
60 u32 acct_responses;
61 u32 malformed_acct_requests;
62 u32 acct_bad_authenticators;
63 u32 unknown_acct_types;
64 };
65
66 /**
67 * struct radius_session - Internal RADIUS server data for a session
68 */
69 struct radius_session {
70 struct radius_session *next;
71 struct radius_client *client;
72 struct radius_server_data *server;
73 unsigned int sess_id;
74 struct eap_sm *eap;
75 struct eap_eapol_interface *eap_if;
76 char *username; /* from User-Name attribute */
77 char *nas_ip;
78
79 struct radius_msg *last_msg;
80 char *last_from_addr;
81 int last_from_port;
82 struct sockaddr_storage last_from;
83 socklen_t last_fromlen;
84 u8 last_identifier;
85 struct radius_msg *last_reply;
86 u8 last_authenticator[16];
87
88 unsigned int remediation:1;
89 unsigned int macacl:1;
90
91 struct hostapd_radius_attr *accept_attr;
92 };
93
94 /**
95 * struct radius_client - Internal RADIUS server data for a client
96 */
97 struct radius_client {
98 struct radius_client *next;
99 struct in_addr addr;
100 struct in_addr mask;
101 #ifdef CONFIG_IPV6
102 struct in6_addr addr6;
103 struct in6_addr mask6;
104 #endif /* CONFIG_IPV6 */
105 char *shared_secret;
106 int shared_secret_len;
107 struct radius_session *sessions;
108 struct radius_server_counters counters;
109 };
110
111 /**
112 * struct radius_server_data - Internal RADIUS server data
113 */
114 struct radius_server_data {
115 /**
116 * auth_sock - Socket for RADIUS authentication messages
117 */
118 int auth_sock;
119
120 /**
121 * acct_sock - Socket for RADIUS accounting messages
122 */
123 int acct_sock;
124
125 /**
126 * clients - List of authorized RADIUS clients
127 */
128 struct radius_client *clients;
129
130 /**
131 * next_sess_id - Next session identifier
132 */
133 unsigned int next_sess_id;
134
135 /**
136 * conf_ctx - Context pointer for callbacks
137 *
138 * This is used as the ctx argument in get_eap_user() calls.
139 */
140 void *conf_ctx;
141
142 /**
143 * num_sess - Number of active sessions
144 */
145 int num_sess;
146
147 /**
148 * eap_sim_db_priv - EAP-SIM/AKA database context
149 *
150 * This is passed to the EAP-SIM/AKA server implementation as a
151 * callback context.
152 */
153 void *eap_sim_db_priv;
154
155 /**
156 * ssl_ctx - TLS context
157 *
158 * This is passed to the EAP server implementation as a callback
159 * context for TLS operations.
160 */
161 void *ssl_ctx;
162
163 /**
164 * pac_opaque_encr_key - PAC-Opaque encryption key for EAP-FAST
165 *
166 * This parameter is used to set a key for EAP-FAST to encrypt the
167 * PAC-Opaque data. It can be set to %NULL if EAP-FAST is not used. If
168 * set, must point to a 16-octet key.
169 */
170 u8 *pac_opaque_encr_key;
171
172 /**
173 * eap_fast_a_id - EAP-FAST authority identity (A-ID)
174 *
175 * If EAP-FAST is not used, this can be set to %NULL. In theory, this
176 * is a variable length field, but due to some existing implementations
177 * requiring A-ID to be 16 octets in length, it is recommended to use
178 * that length for the field to provide interoperability with deployed
179 * peer implementations.
180 */
181 u8 *eap_fast_a_id;
182
183 /**
184 * eap_fast_a_id_len - Length of eap_fast_a_id buffer in octets
185 */
186 size_t eap_fast_a_id_len;
187
188 /**
189 * eap_fast_a_id_info - EAP-FAST authority identifier information
190 *
191 * This A-ID-Info contains a user-friendly name for the A-ID. For
192 * example, this could be the enterprise and server names in
193 * human-readable format. This field is encoded as UTF-8. If EAP-FAST
194 * is not used, this can be set to %NULL.
195 */
196 char *eap_fast_a_id_info;
197
198 /**
199 * eap_fast_prov - EAP-FAST provisioning modes
200 *
201 * 0 = provisioning disabled, 1 = only anonymous provisioning allowed,
202 * 2 = only authenticated provisioning allowed, 3 = both provisioning
203 * modes allowed.
204 */
205 int eap_fast_prov;
206
207 /**
208 * pac_key_lifetime - EAP-FAST PAC-Key lifetime in seconds
209 *
210 * This is the hard limit on how long a provisioned PAC-Key can be
211 * used.
212 */
213 int pac_key_lifetime;
214
215 /**
216 * pac_key_refresh_time - EAP-FAST PAC-Key refresh time in seconds
217 *
218 * This is a soft limit on the PAC-Key. The server will automatically
219 * generate a new PAC-Key when this number of seconds (or fewer) of the
220 * lifetime remains.
221 */
222 int pac_key_refresh_time;
223
224 /**
225 * eap_sim_aka_result_ind - EAP-SIM/AKA protected success indication
226 *
227 * This controls whether the protected success/failure indication
228 * (AT_RESULT_IND) is used with EAP-SIM and EAP-AKA.
229 */
230 int eap_sim_aka_result_ind;
231
232 /**
233 * tnc - Trusted Network Connect (TNC)
234 *
235 * This controls whether TNC is enabled and will be required before the
236 * peer is allowed to connect. Note: This is only used with EAP-TTLS
237 * and EAP-FAST. If any other EAP method is enabled, the peer will be
238 * allowed to connect without TNC.
239 */
240 int tnc;
241
242 /**
243 * pwd_group - The D-H group assigned for EAP-pwd
244 *
245 * If EAP-pwd is not used it can be set to zero.
246 */
247 u16 pwd_group;
248
249 /**
250 * server_id - Server identity
251 */
252 const char *server_id;
253
254 /**
255 * erp - Whether EAP Re-authentication Protocol (ERP) is enabled
256 *
257 * This controls whether the authentication server derives ERP key
258 * hierarchy (rRK and rIK) from full EAP authentication and allows
259 * these keys to be used to perform ERP to derive rMSK instead of full
260 * EAP authentication to derive MSK.
261 */
262 int erp;
263
264 const char *erp_domain;
265
266 struct dl_list erp_keys; /* struct eap_server_erp_key */
267
268 unsigned int tls_session_lifetime;
269
270 /**
271 * wps - Wi-Fi Protected Setup context
272 *
273 * If WPS is used with an external RADIUS server (which is quite
274 * unlikely configuration), this is used to provide a pointer to WPS
275 * context data. Normally, this can be set to %NULL.
276 */
277 struct wps_context *wps;
278
279 /**
280 * ipv6 - Whether to enable IPv6 support in the RADIUS server
281 */
282 int ipv6;
283
284 /**
285 * start_time - Timestamp of server start
286 */
287 struct os_reltime start_time;
288
289 /**
290 * counters - Statistics counters for server operations
291 *
292 * These counters are the sum over all clients.
293 */
294 struct radius_server_counters counters;
295
296 /**
297 * get_eap_user - Callback for fetching EAP user information
298 * @ctx: Context data from conf_ctx
299 * @identity: User identity
300 * @identity_len: identity buffer length in octets
301 * @phase2: Whether this is for Phase 2 identity
302 * @user: Data structure for filling in the user information
303 * Returns: 0 on success, -1 on failure
304 *
305 * This is used to fetch information from user database. The callback
306 * will fill in information about allowed EAP methods and the user
307 * password. The password field will be an allocated copy of the
308 * password data and RADIUS server will free it after use.
309 */
310 int (*get_eap_user)(void *ctx, const u8 *identity, size_t identity_len,
311 int phase2, struct eap_user *user);
312
313 /**
314 * eap_req_id_text - Optional data for EAP-Request/Identity
315 *
316 * This can be used to configure an optional, displayable message that
317 * will be sent in EAP-Request/Identity. This string can contain an
318 * ASCII-0 character (nul) to separate network infromation per RFC
319 * 4284. The actual string length is explicit provided in
320 * eap_req_id_text_len since nul character will not be used as a string
321 * terminator.
322 */
323 char *eap_req_id_text;
324
325 /**
326 * eap_req_id_text_len - Length of eap_req_id_text buffer in octets
327 */
328 size_t eap_req_id_text_len;
329
330 /*
331 * msg_ctx - Context data for wpa_msg() calls
332 */
333 void *msg_ctx;
334
335 #ifdef CONFIG_RADIUS_TEST
336 char *dump_msk_file;
337 #endif /* CONFIG_RADIUS_TEST */
338
339 char *subscr_remediation_url;
340 u8 subscr_remediation_method;
341
342 #ifdef CONFIG_SQLITE
343 sqlite3 *db;
344 #endif /* CONFIG_SQLITE */
345 };
346
347
348 #define RADIUS_DEBUG(args...) \
349 wpa_printf(MSG_DEBUG, "RADIUS SRV: " args)
350 #define RADIUS_ERROR(args...) \
351 wpa_printf(MSG_ERROR, "RADIUS SRV: " args)
352 #define RADIUS_DUMP(args...) \
353 wpa_hexdump(MSG_MSGDUMP, "RADIUS SRV: " args)
354 #define RADIUS_DUMP_ASCII(args...) \
355 wpa_hexdump_ascii(MSG_MSGDUMP, "RADIUS SRV: " args)
356
357
358 static void radius_server_session_timeout(void *eloop_ctx, void *timeout_ctx);
359 static void radius_server_session_remove_timeout(void *eloop_ctx,
360 void *timeout_ctx);
361
362 void srv_log(struct radius_session *sess, const char *fmt, ...)
363 PRINTF_FORMAT(2, 3);
364
srv_log(struct radius_session * sess,const char * fmt,...)365 void srv_log(struct radius_session *sess, const char *fmt, ...)
366 {
367 va_list ap;
368 char *buf;
369 int buflen;
370
371 va_start(ap, fmt);
372 buflen = vsnprintf(NULL, 0, fmt, ap) + 1;
373 va_end(ap);
374
375 buf = os_malloc(buflen);
376 if (buf == NULL)
377 return;
378 va_start(ap, fmt);
379 vsnprintf(buf, buflen, fmt, ap);
380 va_end(ap);
381
382 RADIUS_DEBUG("[0x%x %s] %s", sess->sess_id, sess->nas_ip, buf);
383
384 #ifdef CONFIG_SQLITE
385 if (sess->server->db) {
386 char *sql;
387 sql = sqlite3_mprintf("INSERT INTO authlog"
388 "(timestamp,session,nas_ip,username,note)"
389 " VALUES ("
390 "strftime('%%Y-%%m-%%d %%H:%%M:%%f',"
391 "'now'),%u,%Q,%Q,%Q)",
392 sess->sess_id, sess->nas_ip,
393 sess->username, buf);
394 if (sql) {
395 if (sqlite3_exec(sess->server->db, sql, NULL, NULL,
396 NULL) != SQLITE_OK) {
397 RADIUS_ERROR("Failed to add authlog entry into sqlite database: %s",
398 sqlite3_errmsg(sess->server->db));
399 }
400 sqlite3_free(sql);
401 }
402 }
403 #endif /* CONFIG_SQLITE */
404
405 os_free(buf);
406 }
407
408
409 static struct radius_client *
radius_server_get_client(struct radius_server_data * data,struct in_addr * addr,int ipv6)410 radius_server_get_client(struct radius_server_data *data, struct in_addr *addr,
411 int ipv6)
412 {
413 struct radius_client *client = data->clients;
414
415 while (client) {
416 #ifdef CONFIG_IPV6
417 if (ipv6) {
418 struct in6_addr *addr6;
419 int i;
420
421 addr6 = (struct in6_addr *) addr;
422 for (i = 0; i < 16; i++) {
423 if ((addr6->s6_addr[i] &
424 client->mask6.s6_addr[i]) !=
425 (client->addr6.s6_addr[i] &
426 client->mask6.s6_addr[i])) {
427 i = 17;
428 break;
429 }
430 }
431 if (i == 16) {
432 break;
433 }
434 }
435 #endif /* CONFIG_IPV6 */
436 if (!ipv6 && (client->addr.s_addr & client->mask.s_addr) ==
437 (addr->s_addr & client->mask.s_addr)) {
438 break;
439 }
440
441 client = client->next;
442 }
443
444 return client;
445 }
446
447
448 static struct radius_session *
radius_server_get_session(struct radius_client * client,unsigned int sess_id)449 radius_server_get_session(struct radius_client *client, unsigned int sess_id)
450 {
451 struct radius_session *sess = client->sessions;
452
453 while (sess) {
454 if (sess->sess_id == sess_id) {
455 break;
456 }
457 sess = sess->next;
458 }
459
460 return sess;
461 }
462
463
radius_server_session_free(struct radius_server_data * data,struct radius_session * sess)464 static void radius_server_session_free(struct radius_server_data *data,
465 struct radius_session *sess)
466 {
467 eloop_cancel_timeout(radius_server_session_timeout, data, sess);
468 eloop_cancel_timeout(radius_server_session_remove_timeout, data, sess);
469 eap_server_sm_deinit(sess->eap);
470 radius_msg_free(sess->last_msg);
471 os_free(sess->last_from_addr);
472 radius_msg_free(sess->last_reply);
473 os_free(sess->username);
474 os_free(sess->nas_ip);
475 os_free(sess);
476 data->num_sess--;
477 }
478
479
radius_server_session_remove(struct radius_server_data * data,struct radius_session * sess)480 static void radius_server_session_remove(struct radius_server_data *data,
481 struct radius_session *sess)
482 {
483 struct radius_client *client = sess->client;
484 struct radius_session *session, *prev;
485
486 eloop_cancel_timeout(radius_server_session_remove_timeout, data, sess);
487
488 prev = NULL;
489 session = client->sessions;
490 while (session) {
491 if (session == sess) {
492 if (prev == NULL) {
493 client->sessions = sess->next;
494 } else {
495 prev->next = sess->next;
496 }
497 radius_server_session_free(data, sess);
498 break;
499 }
500 prev = session;
501 session = session->next;
502 }
503 }
504
505
radius_server_session_remove_timeout(void * eloop_ctx,void * timeout_ctx)506 static void radius_server_session_remove_timeout(void *eloop_ctx,
507 void *timeout_ctx)
508 {
509 struct radius_server_data *data = eloop_ctx;
510 struct radius_session *sess = timeout_ctx;
511 RADIUS_DEBUG("Removing completed session 0x%x", sess->sess_id);
512 radius_server_session_remove(data, sess);
513 }
514
515
radius_server_session_timeout(void * eloop_ctx,void * timeout_ctx)516 static void radius_server_session_timeout(void *eloop_ctx, void *timeout_ctx)
517 {
518 struct radius_server_data *data = eloop_ctx;
519 struct radius_session *sess = timeout_ctx;
520
521 RADIUS_DEBUG("Timing out authentication session 0x%x", sess->sess_id);
522 radius_server_session_remove(data, sess);
523 }
524
525
526 static struct radius_session *
radius_server_new_session(struct radius_server_data * data,struct radius_client * client)527 radius_server_new_session(struct radius_server_data *data,
528 struct radius_client *client)
529 {
530 struct radius_session *sess;
531
532 if (data->num_sess >= RADIUS_MAX_SESSION) {
533 RADIUS_DEBUG("Maximum number of existing session - no room "
534 "for a new session");
535 return NULL;
536 }
537
538 sess = os_zalloc(sizeof(*sess));
539 if (sess == NULL)
540 return NULL;
541
542 sess->server = data;
543 sess->client = client;
544 sess->sess_id = data->next_sess_id++;
545 sess->next = client->sessions;
546 client->sessions = sess;
547 eloop_register_timeout(RADIUS_SESSION_TIMEOUT, 0,
548 radius_server_session_timeout, data, sess);
549 data->num_sess++;
550 return sess;
551 }
552
553
554 #ifdef CONFIG_TESTING_OPTIONS
radius_server_testing_options_tls(struct radius_session * sess,const char * tls,struct eap_config * eap_conf)555 static void radius_server_testing_options_tls(struct radius_session *sess,
556 const char *tls,
557 struct eap_config *eap_conf)
558 {
559 int test = atoi(tls);
560
561 switch (test) {
562 case 1:
563 srv_log(sess, "TLS test - break VerifyData");
564 eap_conf->tls_test_flags = TLS_BREAK_VERIFY_DATA;
565 break;
566 case 2:
567 srv_log(sess, "TLS test - break ServerKeyExchange ServerParams hash");
568 eap_conf->tls_test_flags = TLS_BREAK_SRV_KEY_X_HASH;
569 break;
570 case 3:
571 srv_log(sess, "TLS test - break ServerKeyExchange ServerParams Signature");
572 eap_conf->tls_test_flags = TLS_BREAK_SRV_KEY_X_SIGNATURE;
573 break;
574 case 4:
575 srv_log(sess, "TLS test - RSA-DHE using a short 511-bit prime");
576 eap_conf->tls_test_flags = TLS_DHE_PRIME_511B;
577 break;
578 case 5:
579 srv_log(sess, "TLS test - RSA-DHE using a short 767-bit prime");
580 eap_conf->tls_test_flags = TLS_DHE_PRIME_767B;
581 break;
582 case 6:
583 srv_log(sess, "TLS test - RSA-DHE using a bogus 15 \"prime\"");
584 eap_conf->tls_test_flags = TLS_DHE_PRIME_15;
585 break;
586 case 7:
587 srv_log(sess, "TLS test - RSA-DHE using a short 58-bit prime in long container");
588 eap_conf->tls_test_flags = TLS_DHE_PRIME_58B;
589 break;
590 case 8:
591 srv_log(sess, "TLS test - RSA-DHE using a non-prime");
592 eap_conf->tls_test_flags = TLS_DHE_NON_PRIME;
593 break;
594 default:
595 srv_log(sess, "Unrecognized TLS test");
596 break;
597 }
598 }
599 #endif /* CONFIG_TESTING_OPTIONS */
600
radius_server_testing_options(struct radius_session * sess,struct eap_config * eap_conf)601 static void radius_server_testing_options(struct radius_session *sess,
602 struct eap_config *eap_conf)
603 {
604 #ifdef CONFIG_TESTING_OPTIONS
605 const char *pos;
606
607 pos = os_strstr(sess->username, "@test-");
608 if (pos == NULL)
609 return;
610 pos += 6;
611 if (os_strncmp(pos, "tls-", 4) == 0)
612 radius_server_testing_options_tls(sess, pos + 4, eap_conf);
613 else
614 srv_log(sess, "Unrecognized test: %s", pos);
615 #endif /* CONFIG_TESTING_OPTIONS */
616 }
617
618
619 static struct radius_session *
radius_server_get_new_session(struct radius_server_data * data,struct radius_client * client,struct radius_msg * msg,const char * from_addr)620 radius_server_get_new_session(struct radius_server_data *data,
621 struct radius_client *client,
622 struct radius_msg *msg, const char *from_addr)
623 {
624 u8 *user;
625 size_t user_len;
626 int res;
627 struct radius_session *sess;
628 struct eap_config eap_conf;
629 struct eap_user tmp;
630
631 RADIUS_DEBUG("Creating a new session");
632
633 if (radius_msg_get_attr_ptr(msg, RADIUS_ATTR_USER_NAME, &user,
634 &user_len, NULL) < 0) {
635 RADIUS_DEBUG("Could not get User-Name");
636 return NULL;
637 }
638 RADIUS_DUMP_ASCII("User-Name", user, user_len);
639
640 os_memset(&tmp, 0, sizeof(tmp));
641 res = data->get_eap_user(data->conf_ctx, user, user_len, 0, &tmp);
642 bin_clear_free(tmp.password, tmp.password_len);
643
644 if (res != 0) {
645 RADIUS_DEBUG("User-Name not found from user database");
646 return NULL;
647 }
648
649 RADIUS_DEBUG("Matching user entry found");
650 sess = radius_server_new_session(data, client);
651 if (sess == NULL) {
652 RADIUS_DEBUG("Failed to create a new session");
653 return NULL;
654 }
655 sess->accept_attr = tmp.accept_attr;
656 sess->macacl = tmp.macacl;
657
658 sess->username = os_malloc(user_len * 4 + 1);
659 if (sess->username == NULL) {
660 radius_server_session_free(data, sess);
661 return NULL;
662 }
663 printf_encode(sess->username, user_len * 4 + 1, user, user_len);
664
665 sess->nas_ip = os_strdup(from_addr);
666 if (sess->nas_ip == NULL) {
667 radius_server_session_free(data, sess);
668 return NULL;
669 }
670
671 srv_log(sess, "New session created");
672
673 os_memset(&eap_conf, 0, sizeof(eap_conf));
674 eap_conf.ssl_ctx = data->ssl_ctx;
675 eap_conf.msg_ctx = data->msg_ctx;
676 eap_conf.eap_sim_db_priv = data->eap_sim_db_priv;
677 eap_conf.backend_auth = TRUE;
678 eap_conf.eap_server = 1;
679 eap_conf.pac_opaque_encr_key = data->pac_opaque_encr_key;
680 eap_conf.eap_fast_a_id = data->eap_fast_a_id;
681 eap_conf.eap_fast_a_id_len = data->eap_fast_a_id_len;
682 eap_conf.eap_fast_a_id_info = data->eap_fast_a_id_info;
683 eap_conf.eap_fast_prov = data->eap_fast_prov;
684 eap_conf.pac_key_lifetime = data->pac_key_lifetime;
685 eap_conf.pac_key_refresh_time = data->pac_key_refresh_time;
686 eap_conf.eap_sim_aka_result_ind = data->eap_sim_aka_result_ind;
687 eap_conf.tnc = data->tnc;
688 eap_conf.wps = data->wps;
689 eap_conf.pwd_group = data->pwd_group;
690 eap_conf.server_id = (const u8 *) data->server_id;
691 eap_conf.server_id_len = os_strlen(data->server_id);
692 eap_conf.erp = data->erp;
693 eap_conf.tls_session_lifetime = data->tls_session_lifetime;
694 radius_server_testing_options(sess, &eap_conf);
695 sess->eap = eap_server_sm_init(sess, &radius_server_eapol_cb,
696 &eap_conf);
697 if (sess->eap == NULL) {
698 RADIUS_DEBUG("Failed to initialize EAP state machine for the "
699 "new session");
700 radius_server_session_free(data, sess);
701 return NULL;
702 }
703 sess->eap_if = eap_get_interface(sess->eap);
704 sess->eap_if->eapRestart = TRUE;
705 sess->eap_if->portEnabled = TRUE;
706
707 RADIUS_DEBUG("New session 0x%x initialized", sess->sess_id);
708
709 return sess;
710 }
711
712
713 static struct radius_msg *
radius_server_encapsulate_eap(struct radius_server_data * data,struct radius_client * client,struct radius_session * sess,struct radius_msg * request)714 radius_server_encapsulate_eap(struct radius_server_data *data,
715 struct radius_client *client,
716 struct radius_session *sess,
717 struct radius_msg *request)
718 {
719 struct radius_msg *msg;
720 int code;
721 unsigned int sess_id;
722 struct radius_hdr *hdr = radius_msg_get_hdr(request);
723
724 if (sess->eap_if->eapFail) {
725 sess->eap_if->eapFail = FALSE;
726 code = RADIUS_CODE_ACCESS_REJECT;
727 } else if (sess->eap_if->eapSuccess) {
728 sess->eap_if->eapSuccess = FALSE;
729 code = RADIUS_CODE_ACCESS_ACCEPT;
730 } else {
731 sess->eap_if->eapReq = FALSE;
732 code = RADIUS_CODE_ACCESS_CHALLENGE;
733 }
734
735 msg = radius_msg_new(code, hdr->identifier);
736 if (msg == NULL) {
737 RADIUS_DEBUG("Failed to allocate reply message");
738 return NULL;
739 }
740
741 sess_id = htonl(sess->sess_id);
742 if (code == RADIUS_CODE_ACCESS_CHALLENGE &&
743 !radius_msg_add_attr(msg, RADIUS_ATTR_STATE,
744 (u8 *) &sess_id, sizeof(sess_id))) {
745 RADIUS_DEBUG("Failed to add State attribute");
746 }
747
748 if (sess->eap_if->eapReqData &&
749 !radius_msg_add_eap(msg, wpabuf_head(sess->eap_if->eapReqData),
750 wpabuf_len(sess->eap_if->eapReqData))) {
751 RADIUS_DEBUG("Failed to add EAP-Message attribute");
752 }
753
754 if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->eap_if->eapKeyData) {
755 int len;
756 #ifdef CONFIG_RADIUS_TEST
757 if (data->dump_msk_file) {
758 FILE *f;
759 char buf[2 * 64 + 1];
760 f = fopen(data->dump_msk_file, "a");
761 if (f) {
762 len = sess->eap_if->eapKeyDataLen;
763 if (len > 64)
764 len = 64;
765 len = wpa_snprintf_hex(
766 buf, sizeof(buf),
767 sess->eap_if->eapKeyData, len);
768 buf[len] = '\0';
769 fprintf(f, "%s\n", buf);
770 fclose(f);
771 }
772 }
773 #endif /* CONFIG_RADIUS_TEST */
774 if (sess->eap_if->eapKeyDataLen > 64) {
775 len = 32;
776 } else {
777 len = sess->eap_if->eapKeyDataLen / 2;
778 }
779 if (!radius_msg_add_mppe_keys(msg, hdr->authenticator,
780 (u8 *) client->shared_secret,
781 client->shared_secret_len,
782 sess->eap_if->eapKeyData + len,
783 len, sess->eap_if->eapKeyData,
784 len)) {
785 RADIUS_DEBUG("Failed to add MPPE key attributes");
786 }
787 }
788
789 #ifdef CONFIG_HS20
790 if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->remediation &&
791 data->subscr_remediation_url) {
792 u8 *buf;
793 size_t url_len = os_strlen(data->subscr_remediation_url);
794 buf = os_malloc(1 + url_len);
795 if (buf == NULL) {
796 radius_msg_free(msg);
797 return NULL;
798 }
799 buf[0] = data->subscr_remediation_method;
800 os_memcpy(&buf[1], data->subscr_remediation_url, url_len);
801 if (!radius_msg_add_wfa(
802 msg, RADIUS_VENDOR_ATTR_WFA_HS20_SUBSCR_REMEDIATION,
803 buf, 1 + url_len)) {
804 RADIUS_DEBUG("Failed to add WFA-HS20-SubscrRem");
805 }
806 os_free(buf);
807 } else if (code == RADIUS_CODE_ACCESS_ACCEPT && sess->remediation) {
808 u8 buf[1];
809 if (!radius_msg_add_wfa(
810 msg, RADIUS_VENDOR_ATTR_WFA_HS20_SUBSCR_REMEDIATION,
811 buf, 0)) {
812 RADIUS_DEBUG("Failed to add WFA-HS20-SubscrRem");
813 }
814 }
815 #endif /* CONFIG_HS20 */
816
817 if (radius_msg_copy_attr(msg, request, RADIUS_ATTR_PROXY_STATE) < 0) {
818 RADIUS_DEBUG("Failed to copy Proxy-State attribute(s)");
819 radius_msg_free(msg);
820 return NULL;
821 }
822
823 if (code == RADIUS_CODE_ACCESS_ACCEPT) {
824 struct hostapd_radius_attr *attr;
825 for (attr = sess->accept_attr; attr; attr = attr->next) {
826 if (!radius_msg_add_attr(msg, attr->type,
827 wpabuf_head(attr->val),
828 wpabuf_len(attr->val))) {
829 wpa_printf(MSG_ERROR, "Could not add RADIUS attribute");
830 radius_msg_free(msg);
831 return NULL;
832 }
833 }
834 }
835
836 if (radius_msg_finish_srv(msg, (u8 *) client->shared_secret,
837 client->shared_secret_len,
838 hdr->authenticator) < 0) {
839 RADIUS_DEBUG("Failed to add Message-Authenticator attribute");
840 }
841
842 return msg;
843 }
844
845
846 static struct radius_msg *
radius_server_macacl(struct radius_server_data * data,struct radius_client * client,struct radius_session * sess,struct radius_msg * request)847 radius_server_macacl(struct radius_server_data *data,
848 struct radius_client *client,
849 struct radius_session *sess,
850 struct radius_msg *request)
851 {
852 struct radius_msg *msg;
853 int code;
854 struct radius_hdr *hdr = radius_msg_get_hdr(request);
855 u8 *pw;
856 size_t pw_len;
857
858 code = RADIUS_CODE_ACCESS_ACCEPT;
859
860 if (radius_msg_get_attr_ptr(request, RADIUS_ATTR_USER_PASSWORD, &pw,
861 &pw_len, NULL) < 0) {
862 RADIUS_DEBUG("Could not get User-Password");
863 code = RADIUS_CODE_ACCESS_REJECT;
864 } else {
865 int res;
866 struct eap_user tmp;
867
868 os_memset(&tmp, 0, sizeof(tmp));
869 res = data->get_eap_user(data->conf_ctx, (u8 *) sess->username,
870 os_strlen(sess->username), 0, &tmp);
871 if (res || !tmp.macacl || tmp.password == NULL) {
872 RADIUS_DEBUG("No MAC ACL user entry");
873 bin_clear_free(tmp.password, tmp.password_len);
874 code = RADIUS_CODE_ACCESS_REJECT;
875 } else {
876 u8 buf[128];
877 res = radius_user_password_hide(
878 request, tmp.password, tmp.password_len,
879 (u8 *) client->shared_secret,
880 client->shared_secret_len,
881 buf, sizeof(buf));
882 bin_clear_free(tmp.password, tmp.password_len);
883
884 if (res < 0 || pw_len != (size_t) res ||
885 os_memcmp_const(pw, buf, res) != 0) {
886 RADIUS_DEBUG("Incorrect User-Password");
887 code = RADIUS_CODE_ACCESS_REJECT;
888 }
889 }
890 }
891
892 msg = radius_msg_new(code, hdr->identifier);
893 if (msg == NULL) {
894 RADIUS_DEBUG("Failed to allocate reply message");
895 return NULL;
896 }
897
898 if (radius_msg_copy_attr(msg, request, RADIUS_ATTR_PROXY_STATE) < 0) {
899 RADIUS_DEBUG("Failed to copy Proxy-State attribute(s)");
900 radius_msg_free(msg);
901 return NULL;
902 }
903
904 if (code == RADIUS_CODE_ACCESS_ACCEPT) {
905 struct hostapd_radius_attr *attr;
906 for (attr = sess->accept_attr; attr; attr = attr->next) {
907 if (!radius_msg_add_attr(msg, attr->type,
908 wpabuf_head(attr->val),
909 wpabuf_len(attr->val))) {
910 wpa_printf(MSG_ERROR, "Could not add RADIUS attribute");
911 radius_msg_free(msg);
912 return NULL;
913 }
914 }
915 }
916
917 if (radius_msg_finish_srv(msg, (u8 *) client->shared_secret,
918 client->shared_secret_len,
919 hdr->authenticator) < 0) {
920 RADIUS_DEBUG("Failed to add Message-Authenticator attribute");
921 }
922
923 return msg;
924 }
925
926
radius_server_reject(struct radius_server_data * data,struct radius_client * client,struct radius_msg * request,struct sockaddr * from,socklen_t fromlen,const char * from_addr,int from_port)927 static int radius_server_reject(struct radius_server_data *data,
928 struct radius_client *client,
929 struct radius_msg *request,
930 struct sockaddr *from, socklen_t fromlen,
931 const char *from_addr, int from_port)
932 {
933 struct radius_msg *msg;
934 int ret = 0;
935 struct eap_hdr eapfail;
936 struct wpabuf *buf;
937 struct radius_hdr *hdr = radius_msg_get_hdr(request);
938
939 RADIUS_DEBUG("Reject invalid request from %s:%d",
940 from_addr, from_port);
941
942 msg = radius_msg_new(RADIUS_CODE_ACCESS_REJECT, hdr->identifier);
943 if (msg == NULL) {
944 return -1;
945 }
946
947 os_memset(&eapfail, 0, sizeof(eapfail));
948 eapfail.code = EAP_CODE_FAILURE;
949 eapfail.identifier = 0;
950 eapfail.length = host_to_be16(sizeof(eapfail));
951
952 if (!radius_msg_add_eap(msg, (u8 *) &eapfail, sizeof(eapfail))) {
953 RADIUS_DEBUG("Failed to add EAP-Message attribute");
954 }
955
956 if (radius_msg_copy_attr(msg, request, RADIUS_ATTR_PROXY_STATE) < 0) {
957 RADIUS_DEBUG("Failed to copy Proxy-State attribute(s)");
958 radius_msg_free(msg);
959 return -1;
960 }
961
962 if (radius_msg_finish_srv(msg, (u8 *) client->shared_secret,
963 client->shared_secret_len,
964 hdr->authenticator) <
965 0) {
966 RADIUS_DEBUG("Failed to add Message-Authenticator attribute");
967 }
968
969 if (wpa_debug_level <= MSG_MSGDUMP) {
970 radius_msg_dump(msg);
971 }
972
973 data->counters.access_rejects++;
974 client->counters.access_rejects++;
975 buf = radius_msg_get_buf(msg);
976 if (sendto(data->auth_sock, wpabuf_head(buf), wpabuf_len(buf), 0,
977 (struct sockaddr *) from, sizeof(*from)) < 0) {
978 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s", strerror(errno));
979 ret = -1;
980 }
981
982 radius_msg_free(msg);
983
984 return ret;
985 }
986
987
radius_server_request(struct radius_server_data * data,struct radius_msg * msg,struct sockaddr * from,socklen_t fromlen,struct radius_client * client,const char * from_addr,int from_port,struct radius_session * force_sess)988 static int radius_server_request(struct radius_server_data *data,
989 struct radius_msg *msg,
990 struct sockaddr *from, socklen_t fromlen,
991 struct radius_client *client,
992 const char *from_addr, int from_port,
993 struct radius_session *force_sess)
994 {
995 struct wpabuf *eap = NULL;
996 int res, state_included = 0;
997 u8 statebuf[4];
998 unsigned int state;
999 struct radius_session *sess;
1000 struct radius_msg *reply;
1001 int is_complete = 0;
1002
1003 if (force_sess)
1004 sess = force_sess;
1005 else {
1006 res = radius_msg_get_attr(msg, RADIUS_ATTR_STATE, statebuf,
1007 sizeof(statebuf));
1008 state_included = res >= 0;
1009 if (res == sizeof(statebuf)) {
1010 state = WPA_GET_BE32(statebuf);
1011 sess = radius_server_get_session(client, state);
1012 } else {
1013 sess = NULL;
1014 }
1015 }
1016
1017 if (sess) {
1018 RADIUS_DEBUG("Request for session 0x%x", sess->sess_id);
1019 } else if (state_included) {
1020 RADIUS_DEBUG("State attribute included but no session found");
1021 radius_server_reject(data, client, msg, from, fromlen,
1022 from_addr, from_port);
1023 return -1;
1024 } else {
1025 sess = radius_server_get_new_session(data, client, msg,
1026 from_addr);
1027 if (sess == NULL) {
1028 RADIUS_DEBUG("Could not create a new session");
1029 radius_server_reject(data, client, msg, from, fromlen,
1030 from_addr, from_port);
1031 return -1;
1032 }
1033 }
1034
1035 if (sess->last_from_port == from_port &&
1036 sess->last_identifier == radius_msg_get_hdr(msg)->identifier &&
1037 os_memcmp(sess->last_authenticator,
1038 radius_msg_get_hdr(msg)->authenticator, 16) == 0) {
1039 RADIUS_DEBUG("Duplicate message from %s", from_addr);
1040 data->counters.dup_access_requests++;
1041 client->counters.dup_access_requests++;
1042
1043 if (sess->last_reply) {
1044 struct wpabuf *buf;
1045 buf = radius_msg_get_buf(sess->last_reply);
1046 res = sendto(data->auth_sock, wpabuf_head(buf),
1047 wpabuf_len(buf), 0,
1048 (struct sockaddr *) from, fromlen);
1049 if (res < 0) {
1050 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s",
1051 strerror(errno));
1052 }
1053 return 0;
1054 }
1055
1056 RADIUS_DEBUG("No previous reply available for duplicate "
1057 "message");
1058 return -1;
1059 }
1060
1061 eap = radius_msg_get_eap(msg);
1062 if (eap == NULL && sess->macacl) {
1063 reply = radius_server_macacl(data, client, sess, msg);
1064 if (reply == NULL)
1065 return -1;
1066 goto send_reply;
1067 }
1068 if (eap == NULL) {
1069 RADIUS_DEBUG("No EAP-Message in RADIUS packet from %s",
1070 from_addr);
1071 data->counters.packets_dropped++;
1072 client->counters.packets_dropped++;
1073 return -1;
1074 }
1075
1076 RADIUS_DUMP("Received EAP data", wpabuf_head(eap), wpabuf_len(eap));
1077
1078 /* FIX: if Code is Request, Success, or Failure, send Access-Reject;
1079 * RFC3579 Sect. 2.6.2.
1080 * Include EAP-Response/Nak with no preferred method if
1081 * code == request.
1082 * If code is not 1-4, discard the packet silently.
1083 * Or is this already done by the EAP state machine? */
1084
1085 wpabuf_free(sess->eap_if->eapRespData);
1086 sess->eap_if->eapRespData = eap;
1087 sess->eap_if->eapResp = TRUE;
1088 eap_server_sm_step(sess->eap);
1089
1090 if ((sess->eap_if->eapReq || sess->eap_if->eapSuccess ||
1091 sess->eap_if->eapFail) && sess->eap_if->eapReqData) {
1092 RADIUS_DUMP("EAP data from the state machine",
1093 wpabuf_head(sess->eap_if->eapReqData),
1094 wpabuf_len(sess->eap_if->eapReqData));
1095 } else if (sess->eap_if->eapFail) {
1096 RADIUS_DEBUG("No EAP data from the state machine, but eapFail "
1097 "set");
1098 } else if (eap_sm_method_pending(sess->eap)) {
1099 radius_msg_free(sess->last_msg);
1100 sess->last_msg = msg;
1101 sess->last_from_port = from_port;
1102 os_free(sess->last_from_addr);
1103 sess->last_from_addr = os_strdup(from_addr);
1104 sess->last_fromlen = fromlen;
1105 os_memcpy(&sess->last_from, from, fromlen);
1106 return -2;
1107 } else {
1108 RADIUS_DEBUG("No EAP data from the state machine - ignore this"
1109 " Access-Request silently (assuming it was a "
1110 "duplicate)");
1111 data->counters.packets_dropped++;
1112 client->counters.packets_dropped++;
1113 return -1;
1114 }
1115
1116 if (sess->eap_if->eapSuccess || sess->eap_if->eapFail)
1117 is_complete = 1;
1118 if (sess->eap_if->eapFail)
1119 srv_log(sess, "EAP authentication failed");
1120 else if (sess->eap_if->eapSuccess)
1121 srv_log(sess, "EAP authentication succeeded");
1122
1123 reply = radius_server_encapsulate_eap(data, client, sess, msg);
1124
1125 send_reply:
1126 if (reply) {
1127 struct wpabuf *buf;
1128 struct radius_hdr *hdr;
1129
1130 RADIUS_DEBUG("Reply to %s:%d", from_addr, from_port);
1131 if (wpa_debug_level <= MSG_MSGDUMP) {
1132 radius_msg_dump(reply);
1133 }
1134
1135 switch (radius_msg_get_hdr(reply)->code) {
1136 case RADIUS_CODE_ACCESS_ACCEPT:
1137 srv_log(sess, "Sending Access-Accept");
1138 data->counters.access_accepts++;
1139 client->counters.access_accepts++;
1140 break;
1141 case RADIUS_CODE_ACCESS_REJECT:
1142 srv_log(sess, "Sending Access-Reject");
1143 data->counters.access_rejects++;
1144 client->counters.access_rejects++;
1145 break;
1146 case RADIUS_CODE_ACCESS_CHALLENGE:
1147 data->counters.access_challenges++;
1148 client->counters.access_challenges++;
1149 break;
1150 }
1151 buf = radius_msg_get_buf(reply);
1152 res = sendto(data->auth_sock, wpabuf_head(buf),
1153 wpabuf_len(buf), 0,
1154 (struct sockaddr *) from, fromlen);
1155 if (res < 0) {
1156 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s",
1157 strerror(errno));
1158 }
1159 radius_msg_free(sess->last_reply);
1160 sess->last_reply = reply;
1161 sess->last_from_port = from_port;
1162 hdr = radius_msg_get_hdr(msg);
1163 sess->last_identifier = hdr->identifier;
1164 os_memcpy(sess->last_authenticator, hdr->authenticator, 16);
1165 } else {
1166 data->counters.packets_dropped++;
1167 client->counters.packets_dropped++;
1168 }
1169
1170 if (is_complete) {
1171 RADIUS_DEBUG("Removing completed session 0x%x after timeout",
1172 sess->sess_id);
1173 eloop_cancel_timeout(radius_server_session_remove_timeout,
1174 data, sess);
1175 eloop_register_timeout(10, 0,
1176 radius_server_session_remove_timeout,
1177 data, sess);
1178 }
1179
1180 return 0;
1181 }
1182
1183
radius_server_receive_auth(int sock,void * eloop_ctx,void * sock_ctx)1184 static void radius_server_receive_auth(int sock, void *eloop_ctx,
1185 void *sock_ctx)
1186 {
1187 struct radius_server_data *data = eloop_ctx;
1188 u8 *buf = NULL;
1189 union {
1190 struct sockaddr_storage ss;
1191 struct sockaddr_in sin;
1192 #ifdef CONFIG_IPV6
1193 struct sockaddr_in6 sin6;
1194 #endif /* CONFIG_IPV6 */
1195 } from;
1196 socklen_t fromlen;
1197 int len;
1198 struct radius_client *client = NULL;
1199 struct radius_msg *msg = NULL;
1200 char abuf[50];
1201 int from_port = 0;
1202
1203 buf = os_malloc(RADIUS_MAX_MSG_LEN);
1204 if (buf == NULL) {
1205 goto fail;
1206 }
1207
1208 fromlen = sizeof(from);
1209 len = recvfrom(sock, buf, RADIUS_MAX_MSG_LEN, 0,
1210 (struct sockaddr *) &from.ss, &fromlen);
1211 if (len < 0) {
1212 wpa_printf(MSG_INFO, "recvfrom[radius_server]: %s",
1213 strerror(errno));
1214 goto fail;
1215 }
1216
1217 #ifdef CONFIG_IPV6
1218 if (data->ipv6) {
1219 if (inet_ntop(AF_INET6, &from.sin6.sin6_addr, abuf,
1220 sizeof(abuf)) == NULL)
1221 abuf[0] = '\0';
1222 from_port = ntohs(from.sin6.sin6_port);
1223 RADIUS_DEBUG("Received %d bytes from %s:%d",
1224 len, abuf, from_port);
1225
1226 client = radius_server_get_client(data,
1227 (struct in_addr *)
1228 &from.sin6.sin6_addr, 1);
1229 }
1230 #endif /* CONFIG_IPV6 */
1231
1232 if (!data->ipv6) {
1233 os_strlcpy(abuf, inet_ntoa(from.sin.sin_addr), sizeof(abuf));
1234 from_port = ntohs(from.sin.sin_port);
1235 RADIUS_DEBUG("Received %d bytes from %s:%d",
1236 len, abuf, from_port);
1237
1238 client = radius_server_get_client(data, &from.sin.sin_addr, 0);
1239 }
1240
1241 RADIUS_DUMP("Received data", buf, len);
1242
1243 if (client == NULL) {
1244 RADIUS_DEBUG("Unknown client %s - packet ignored", abuf);
1245 data->counters.invalid_requests++;
1246 goto fail;
1247 }
1248
1249 msg = radius_msg_parse(buf, len);
1250 if (msg == NULL) {
1251 RADIUS_DEBUG("Parsing incoming RADIUS frame failed");
1252 data->counters.malformed_access_requests++;
1253 client->counters.malformed_access_requests++;
1254 goto fail;
1255 }
1256
1257 os_free(buf);
1258 buf = NULL;
1259
1260 if (wpa_debug_level <= MSG_MSGDUMP) {
1261 radius_msg_dump(msg);
1262 }
1263
1264 if (radius_msg_get_hdr(msg)->code != RADIUS_CODE_ACCESS_REQUEST) {
1265 RADIUS_DEBUG("Unexpected RADIUS code %d",
1266 radius_msg_get_hdr(msg)->code);
1267 data->counters.unknown_types++;
1268 client->counters.unknown_types++;
1269 goto fail;
1270 }
1271
1272 data->counters.access_requests++;
1273 client->counters.access_requests++;
1274
1275 if (radius_msg_verify_msg_auth(msg, (u8 *) client->shared_secret,
1276 client->shared_secret_len, NULL)) {
1277 RADIUS_DEBUG("Invalid Message-Authenticator from %s", abuf);
1278 data->counters.bad_authenticators++;
1279 client->counters.bad_authenticators++;
1280 goto fail;
1281 }
1282
1283 if (radius_server_request(data, msg, (struct sockaddr *) &from,
1284 fromlen, client, abuf, from_port, NULL) ==
1285 -2)
1286 return; /* msg was stored with the session */
1287
1288 fail:
1289 radius_msg_free(msg);
1290 os_free(buf);
1291 }
1292
1293
radius_server_receive_acct(int sock,void * eloop_ctx,void * sock_ctx)1294 static void radius_server_receive_acct(int sock, void *eloop_ctx,
1295 void *sock_ctx)
1296 {
1297 struct radius_server_data *data = eloop_ctx;
1298 u8 *buf = NULL;
1299 union {
1300 struct sockaddr_storage ss;
1301 struct sockaddr_in sin;
1302 #ifdef CONFIG_IPV6
1303 struct sockaddr_in6 sin6;
1304 #endif /* CONFIG_IPV6 */
1305 } from;
1306 socklen_t fromlen;
1307 int len, res;
1308 struct radius_client *client = NULL;
1309 struct radius_msg *msg = NULL, *resp = NULL;
1310 char abuf[50];
1311 int from_port = 0;
1312 struct radius_hdr *hdr;
1313 struct wpabuf *rbuf;
1314
1315 buf = os_malloc(RADIUS_MAX_MSG_LEN);
1316 if (buf == NULL) {
1317 goto fail;
1318 }
1319
1320 fromlen = sizeof(from);
1321 len = recvfrom(sock, buf, RADIUS_MAX_MSG_LEN, 0,
1322 (struct sockaddr *) &from.ss, &fromlen);
1323 if (len < 0) {
1324 wpa_printf(MSG_INFO, "recvfrom[radius_server]: %s",
1325 strerror(errno));
1326 goto fail;
1327 }
1328
1329 #ifdef CONFIG_IPV6
1330 if (data->ipv6) {
1331 if (inet_ntop(AF_INET6, &from.sin6.sin6_addr, abuf,
1332 sizeof(abuf)) == NULL)
1333 abuf[0] = '\0';
1334 from_port = ntohs(from.sin6.sin6_port);
1335 RADIUS_DEBUG("Received %d bytes from %s:%d",
1336 len, abuf, from_port);
1337
1338 client = radius_server_get_client(data,
1339 (struct in_addr *)
1340 &from.sin6.sin6_addr, 1);
1341 }
1342 #endif /* CONFIG_IPV6 */
1343
1344 if (!data->ipv6) {
1345 os_strlcpy(abuf, inet_ntoa(from.sin.sin_addr), sizeof(abuf));
1346 from_port = ntohs(from.sin.sin_port);
1347 RADIUS_DEBUG("Received %d bytes from %s:%d",
1348 len, abuf, from_port);
1349
1350 client = radius_server_get_client(data, &from.sin.sin_addr, 0);
1351 }
1352
1353 RADIUS_DUMP("Received data", buf, len);
1354
1355 if (client == NULL) {
1356 RADIUS_DEBUG("Unknown client %s - packet ignored", abuf);
1357 data->counters.invalid_acct_requests++;
1358 goto fail;
1359 }
1360
1361 msg = radius_msg_parse(buf, len);
1362 if (msg == NULL) {
1363 RADIUS_DEBUG("Parsing incoming RADIUS frame failed");
1364 data->counters.malformed_acct_requests++;
1365 client->counters.malformed_acct_requests++;
1366 goto fail;
1367 }
1368
1369 os_free(buf);
1370 buf = NULL;
1371
1372 if (wpa_debug_level <= MSG_MSGDUMP) {
1373 radius_msg_dump(msg);
1374 }
1375
1376 if (radius_msg_get_hdr(msg)->code != RADIUS_CODE_ACCOUNTING_REQUEST) {
1377 RADIUS_DEBUG("Unexpected RADIUS code %d",
1378 radius_msg_get_hdr(msg)->code);
1379 data->counters.unknown_acct_types++;
1380 client->counters.unknown_acct_types++;
1381 goto fail;
1382 }
1383
1384 data->counters.acct_requests++;
1385 client->counters.acct_requests++;
1386
1387 if (radius_msg_verify_acct_req(msg, (u8 *) client->shared_secret,
1388 client->shared_secret_len)) {
1389 RADIUS_DEBUG("Invalid Authenticator from %s", abuf);
1390 data->counters.acct_bad_authenticators++;
1391 client->counters.acct_bad_authenticators++;
1392 goto fail;
1393 }
1394
1395 /* TODO: Write accounting information to a file or database */
1396
1397 hdr = radius_msg_get_hdr(msg);
1398
1399 resp = radius_msg_new(RADIUS_CODE_ACCOUNTING_RESPONSE, hdr->identifier);
1400 if (resp == NULL)
1401 goto fail;
1402
1403 radius_msg_finish_acct_resp(resp, (u8 *) client->shared_secret,
1404 client->shared_secret_len,
1405 hdr->authenticator);
1406
1407 RADIUS_DEBUG("Reply to %s:%d", abuf, from_port);
1408 if (wpa_debug_level <= MSG_MSGDUMP) {
1409 radius_msg_dump(resp);
1410 }
1411 rbuf = radius_msg_get_buf(resp);
1412 data->counters.acct_responses++;
1413 client->counters.acct_responses++;
1414 res = sendto(data->acct_sock, wpabuf_head(rbuf), wpabuf_len(rbuf), 0,
1415 (struct sockaddr *) &from.ss, fromlen);
1416 if (res < 0) {
1417 wpa_printf(MSG_INFO, "sendto[RADIUS SRV]: %s",
1418 strerror(errno));
1419 }
1420
1421 fail:
1422 radius_msg_free(resp);
1423 radius_msg_free(msg);
1424 os_free(buf);
1425 }
1426
1427
radius_server_disable_pmtu_discovery(int s)1428 static int radius_server_disable_pmtu_discovery(int s)
1429 {
1430 int r = -1;
1431 #if defined(IP_MTU_DISCOVER) && defined(IP_PMTUDISC_DONT)
1432 /* Turn off Path MTU discovery on IPv4/UDP sockets. */
1433 int action = IP_PMTUDISC_DONT;
1434 r = setsockopt(s, IPPROTO_IP, IP_MTU_DISCOVER, &action,
1435 sizeof(action));
1436 if (r == -1)
1437 wpa_printf(MSG_ERROR, "Failed to set IP_MTU_DISCOVER: "
1438 "%s", strerror(errno));
1439 #endif
1440 return r;
1441 }
1442
1443
radius_server_open_socket(int port)1444 static int radius_server_open_socket(int port)
1445 {
1446 int s;
1447 struct sockaddr_in addr;
1448
1449 s = socket(PF_INET, SOCK_DGRAM, 0);
1450 if (s < 0) {
1451 wpa_printf(MSG_INFO, "RADIUS: socket: %s", strerror(errno));
1452 return -1;
1453 }
1454
1455 radius_server_disable_pmtu_discovery(s);
1456
1457 os_memset(&addr, 0, sizeof(addr));
1458 addr.sin_family = AF_INET;
1459 addr.sin_port = htons(port);
1460 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
1461 wpa_printf(MSG_INFO, "RADIUS: bind: %s", strerror(errno));
1462 close(s);
1463 return -1;
1464 }
1465
1466 return s;
1467 }
1468
1469
1470 #ifdef CONFIG_IPV6
radius_server_open_socket6(int port)1471 static int radius_server_open_socket6(int port)
1472 {
1473 int s;
1474 struct sockaddr_in6 addr;
1475
1476 s = socket(PF_INET6, SOCK_DGRAM, 0);
1477 if (s < 0) {
1478 wpa_printf(MSG_INFO, "RADIUS: socket[IPv6]: %s",
1479 strerror(errno));
1480 return -1;
1481 }
1482
1483 os_memset(&addr, 0, sizeof(addr));
1484 addr.sin6_family = AF_INET6;
1485 os_memcpy(&addr.sin6_addr, &in6addr_any, sizeof(in6addr_any));
1486 addr.sin6_port = htons(port);
1487 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
1488 wpa_printf(MSG_INFO, "RADIUS: bind: %s", strerror(errno));
1489 close(s);
1490 return -1;
1491 }
1492
1493 return s;
1494 }
1495 #endif /* CONFIG_IPV6 */
1496
1497
radius_server_free_sessions(struct radius_server_data * data,struct radius_session * sessions)1498 static void radius_server_free_sessions(struct radius_server_data *data,
1499 struct radius_session *sessions)
1500 {
1501 struct radius_session *session, *prev;
1502
1503 session = sessions;
1504 while (session) {
1505 prev = session;
1506 session = session->next;
1507 radius_server_session_free(data, prev);
1508 }
1509 }
1510
1511
radius_server_free_clients(struct radius_server_data * data,struct radius_client * clients)1512 static void radius_server_free_clients(struct radius_server_data *data,
1513 struct radius_client *clients)
1514 {
1515 struct radius_client *client, *prev;
1516
1517 client = clients;
1518 while (client) {
1519 prev = client;
1520 client = client->next;
1521
1522 radius_server_free_sessions(data, prev->sessions);
1523 os_free(prev->shared_secret);
1524 os_free(prev);
1525 }
1526 }
1527
1528
1529 static struct radius_client *
radius_server_read_clients(const char * client_file,int ipv6)1530 radius_server_read_clients(const char *client_file, int ipv6)
1531 {
1532 FILE *f;
1533 const int buf_size = 1024;
1534 char *buf, *pos;
1535 struct radius_client *clients, *tail, *entry;
1536 int line = 0, mask, failed = 0, i;
1537 struct in_addr addr;
1538 #ifdef CONFIG_IPV6
1539 struct in6_addr addr6;
1540 #endif /* CONFIG_IPV6 */
1541 unsigned int val;
1542
1543 f = fopen(client_file, "r");
1544 if (f == NULL) {
1545 RADIUS_ERROR("Could not open client file '%s'", client_file);
1546 return NULL;
1547 }
1548
1549 buf = os_malloc(buf_size);
1550 if (buf == NULL) {
1551 fclose(f);
1552 return NULL;
1553 }
1554
1555 clients = tail = NULL;
1556 while (fgets(buf, buf_size, f)) {
1557 /* Configuration file format:
1558 * 192.168.1.0/24 secret
1559 * 192.168.1.2 secret
1560 * fe80::211:22ff:fe33:4455/64 secretipv6
1561 */
1562 line++;
1563 buf[buf_size - 1] = '\0';
1564 pos = buf;
1565 while (*pos != '\0' && *pos != '\n')
1566 pos++;
1567 if (*pos == '\n')
1568 *pos = '\0';
1569 if (*buf == '\0' || *buf == '#')
1570 continue;
1571
1572 pos = buf;
1573 while ((*pos >= '0' && *pos <= '9') || *pos == '.' ||
1574 (*pos >= 'a' && *pos <= 'f') || *pos == ':' ||
1575 (*pos >= 'A' && *pos <= 'F')) {
1576 pos++;
1577 }
1578
1579 if (*pos == '\0') {
1580 failed = 1;
1581 break;
1582 }
1583
1584 if (*pos == '/') {
1585 char *end;
1586 *pos++ = '\0';
1587 mask = strtol(pos, &end, 10);
1588 if ((pos == end) ||
1589 (mask < 0 || mask > (ipv6 ? 128 : 32))) {
1590 failed = 1;
1591 break;
1592 }
1593 pos = end;
1594 } else {
1595 mask = ipv6 ? 128 : 32;
1596 *pos++ = '\0';
1597 }
1598
1599 if (!ipv6 && inet_aton(buf, &addr) == 0) {
1600 failed = 1;
1601 break;
1602 }
1603 #ifdef CONFIG_IPV6
1604 if (ipv6 && inet_pton(AF_INET6, buf, &addr6) <= 0) {
1605 if (inet_pton(AF_INET, buf, &addr) <= 0) {
1606 failed = 1;
1607 break;
1608 }
1609 /* Convert IPv4 address to IPv6 */
1610 if (mask <= 32)
1611 mask += (128 - 32);
1612 os_memset(addr6.s6_addr, 0, 10);
1613 addr6.s6_addr[10] = 0xff;
1614 addr6.s6_addr[11] = 0xff;
1615 os_memcpy(addr6.s6_addr + 12, (char *) &addr.s_addr,
1616 4);
1617 }
1618 #endif /* CONFIG_IPV6 */
1619
1620 while (*pos == ' ' || *pos == '\t') {
1621 pos++;
1622 }
1623
1624 if (*pos == '\0') {
1625 failed = 1;
1626 break;
1627 }
1628
1629 entry = os_zalloc(sizeof(*entry));
1630 if (entry == NULL) {
1631 failed = 1;
1632 break;
1633 }
1634 entry->shared_secret = os_strdup(pos);
1635 if (entry->shared_secret == NULL) {
1636 failed = 1;
1637 os_free(entry);
1638 break;
1639 }
1640 entry->shared_secret_len = os_strlen(entry->shared_secret);
1641 if (!ipv6) {
1642 entry->addr.s_addr = addr.s_addr;
1643 val = 0;
1644 for (i = 0; i < mask; i++)
1645 val |= 1 << (31 - i);
1646 entry->mask.s_addr = htonl(val);
1647 }
1648 #ifdef CONFIG_IPV6
1649 if (ipv6) {
1650 int offset = mask / 8;
1651
1652 os_memcpy(entry->addr6.s6_addr, addr6.s6_addr, 16);
1653 os_memset(entry->mask6.s6_addr, 0xff, offset);
1654 val = 0;
1655 for (i = 0; i < (mask % 8); i++)
1656 val |= 1 << (7 - i);
1657 if (offset < 16)
1658 entry->mask6.s6_addr[offset] = val;
1659 }
1660 #endif /* CONFIG_IPV6 */
1661
1662 if (tail == NULL) {
1663 clients = tail = entry;
1664 } else {
1665 tail->next = entry;
1666 tail = entry;
1667 }
1668 }
1669
1670 if (failed) {
1671 RADIUS_ERROR("Invalid line %d in '%s'", line, client_file);
1672 radius_server_free_clients(NULL, clients);
1673 clients = NULL;
1674 }
1675
1676 os_free(buf);
1677 fclose(f);
1678
1679 return clients;
1680 }
1681
1682
1683 /**
1684 * radius_server_init - Initialize RADIUS server
1685 * @conf: Configuration for the RADIUS server
1686 * Returns: Pointer to private RADIUS server context or %NULL on failure
1687 *
1688 * This initializes a RADIUS server instance and returns a context pointer that
1689 * will be used in other calls to the RADIUS server module. The server can be
1690 * deinitialize by calling radius_server_deinit().
1691 */
1692 struct radius_server_data *
radius_server_init(struct radius_server_conf * conf)1693 radius_server_init(struct radius_server_conf *conf)
1694 {
1695 struct radius_server_data *data;
1696
1697 #ifndef CONFIG_IPV6
1698 if (conf->ipv6) {
1699 wpa_printf(MSG_ERROR, "RADIUS server compiled without IPv6 support");
1700 return NULL;
1701 }
1702 #endif /* CONFIG_IPV6 */
1703
1704 data = os_zalloc(sizeof(*data));
1705 if (data == NULL)
1706 return NULL;
1707
1708 dl_list_init(&data->erp_keys);
1709 os_get_reltime(&data->start_time);
1710 data->conf_ctx = conf->conf_ctx;
1711 data->eap_sim_db_priv = conf->eap_sim_db_priv;
1712 data->ssl_ctx = conf->ssl_ctx;
1713 data->msg_ctx = conf->msg_ctx;
1714 data->ipv6 = conf->ipv6;
1715 if (conf->pac_opaque_encr_key) {
1716 data->pac_opaque_encr_key = os_malloc(16);
1717 if (data->pac_opaque_encr_key) {
1718 os_memcpy(data->pac_opaque_encr_key,
1719 conf->pac_opaque_encr_key, 16);
1720 }
1721 }
1722 if (conf->eap_fast_a_id) {
1723 data->eap_fast_a_id = os_malloc(conf->eap_fast_a_id_len);
1724 if (data->eap_fast_a_id) {
1725 os_memcpy(data->eap_fast_a_id, conf->eap_fast_a_id,
1726 conf->eap_fast_a_id_len);
1727 data->eap_fast_a_id_len = conf->eap_fast_a_id_len;
1728 }
1729 }
1730 if (conf->eap_fast_a_id_info)
1731 data->eap_fast_a_id_info = os_strdup(conf->eap_fast_a_id_info);
1732 data->eap_fast_prov = conf->eap_fast_prov;
1733 data->pac_key_lifetime = conf->pac_key_lifetime;
1734 data->pac_key_refresh_time = conf->pac_key_refresh_time;
1735 data->get_eap_user = conf->get_eap_user;
1736 data->eap_sim_aka_result_ind = conf->eap_sim_aka_result_ind;
1737 data->tnc = conf->tnc;
1738 data->wps = conf->wps;
1739 data->pwd_group = conf->pwd_group;
1740 data->server_id = conf->server_id;
1741 if (conf->eap_req_id_text) {
1742 data->eap_req_id_text = os_malloc(conf->eap_req_id_text_len);
1743 if (data->eap_req_id_text) {
1744 os_memcpy(data->eap_req_id_text, conf->eap_req_id_text,
1745 conf->eap_req_id_text_len);
1746 data->eap_req_id_text_len = conf->eap_req_id_text_len;
1747 }
1748 }
1749 data->erp = conf->erp;
1750 data->erp_domain = conf->erp_domain;
1751 data->tls_session_lifetime = conf->tls_session_lifetime;
1752
1753 if (conf->subscr_remediation_url) {
1754 data->subscr_remediation_url =
1755 os_strdup(conf->subscr_remediation_url);
1756 }
1757 data->subscr_remediation_method = conf->subscr_remediation_method;
1758
1759 #ifdef CONFIG_SQLITE
1760 if (conf->sqlite_file) {
1761 if (sqlite3_open(conf->sqlite_file, &data->db)) {
1762 RADIUS_ERROR("Could not open SQLite file '%s'",
1763 conf->sqlite_file);
1764 radius_server_deinit(data);
1765 return NULL;
1766 }
1767 }
1768 #endif /* CONFIG_SQLITE */
1769
1770 #ifdef CONFIG_RADIUS_TEST
1771 if (conf->dump_msk_file)
1772 data->dump_msk_file = os_strdup(conf->dump_msk_file);
1773 #endif /* CONFIG_RADIUS_TEST */
1774
1775 data->clients = radius_server_read_clients(conf->client_file,
1776 conf->ipv6);
1777 if (data->clients == NULL) {
1778 wpa_printf(MSG_ERROR, "No RADIUS clients configured");
1779 radius_server_deinit(data);
1780 return NULL;
1781 }
1782
1783 #ifdef CONFIG_IPV6
1784 if (conf->ipv6)
1785 data->auth_sock = radius_server_open_socket6(conf->auth_port);
1786 else
1787 #endif /* CONFIG_IPV6 */
1788 data->auth_sock = radius_server_open_socket(conf->auth_port);
1789 if (data->auth_sock < 0) {
1790 wpa_printf(MSG_ERROR, "Failed to open UDP socket for RADIUS authentication server");
1791 radius_server_deinit(data);
1792 return NULL;
1793 }
1794 if (eloop_register_read_sock(data->auth_sock,
1795 radius_server_receive_auth,
1796 data, NULL)) {
1797 radius_server_deinit(data);
1798 return NULL;
1799 }
1800
1801 if (conf->acct_port) {
1802 #ifdef CONFIG_IPV6
1803 if (conf->ipv6)
1804 data->acct_sock = radius_server_open_socket6(
1805 conf->acct_port);
1806 else
1807 #endif /* CONFIG_IPV6 */
1808 data->acct_sock = radius_server_open_socket(conf->acct_port);
1809 if (data->acct_sock < 0) {
1810 wpa_printf(MSG_ERROR, "Failed to open UDP socket for RADIUS accounting server");
1811 radius_server_deinit(data);
1812 return NULL;
1813 }
1814 if (eloop_register_read_sock(data->acct_sock,
1815 radius_server_receive_acct,
1816 data, NULL)) {
1817 radius_server_deinit(data);
1818 return NULL;
1819 }
1820 } else {
1821 data->acct_sock = -1;
1822 }
1823
1824 return data;
1825 }
1826
1827
1828 /**
1829 * radius_server_erp_flush - Flush all ERP keys
1830 * @data: RADIUS server context from radius_server_init()
1831 */
radius_server_erp_flush(struct radius_server_data * data)1832 void radius_server_erp_flush(struct radius_server_data *data)
1833 {
1834 struct eap_server_erp_key *erp;
1835
1836 if (data == NULL)
1837 return;
1838 while ((erp = dl_list_first(&data->erp_keys, struct eap_server_erp_key,
1839 list)) != NULL) {
1840 dl_list_del(&erp->list);
1841 bin_clear_free(erp, sizeof(*erp));
1842 }
1843 }
1844
1845
1846 /**
1847 * radius_server_deinit - Deinitialize RADIUS server
1848 * @data: RADIUS server context from radius_server_init()
1849 */
radius_server_deinit(struct radius_server_data * data)1850 void radius_server_deinit(struct radius_server_data *data)
1851 {
1852 if (data == NULL)
1853 return;
1854
1855 if (data->auth_sock >= 0) {
1856 eloop_unregister_read_sock(data->auth_sock);
1857 close(data->auth_sock);
1858 }
1859
1860 if (data->acct_sock >= 0) {
1861 eloop_unregister_read_sock(data->acct_sock);
1862 close(data->acct_sock);
1863 }
1864
1865 radius_server_free_clients(data, data->clients);
1866
1867 os_free(data->pac_opaque_encr_key);
1868 os_free(data->eap_fast_a_id);
1869 os_free(data->eap_fast_a_id_info);
1870 os_free(data->eap_req_id_text);
1871 #ifdef CONFIG_RADIUS_TEST
1872 os_free(data->dump_msk_file);
1873 #endif /* CONFIG_RADIUS_TEST */
1874 os_free(data->subscr_remediation_url);
1875
1876 #ifdef CONFIG_SQLITE
1877 if (data->db)
1878 sqlite3_close(data->db);
1879 #endif /* CONFIG_SQLITE */
1880
1881 radius_server_erp_flush(data);
1882
1883 os_free(data);
1884 }
1885
1886
1887 /**
1888 * radius_server_get_mib - Get RADIUS server MIB information
1889 * @data: RADIUS server context from radius_server_init()
1890 * @buf: Buffer for returning the MIB data in text format
1891 * @buflen: buf length in octets
1892 * Returns: Number of octets written into buf
1893 */
radius_server_get_mib(struct radius_server_data * data,char * buf,size_t buflen)1894 int radius_server_get_mib(struct radius_server_data *data, char *buf,
1895 size_t buflen)
1896 {
1897 int ret, uptime;
1898 unsigned int idx;
1899 char *end, *pos;
1900 struct os_reltime now;
1901 struct radius_client *cli;
1902
1903 /* RFC 2619 - RADIUS Authentication Server MIB */
1904
1905 if (data == NULL || buflen == 0)
1906 return 0;
1907
1908 pos = buf;
1909 end = buf + buflen;
1910
1911 os_get_reltime(&now);
1912 uptime = (now.sec - data->start_time.sec) * 100 +
1913 ((now.usec - data->start_time.usec) / 10000) % 100;
1914 ret = os_snprintf(pos, end - pos,
1915 "RADIUS-AUTH-SERVER-MIB\n"
1916 "radiusAuthServIdent=hostapd\n"
1917 "radiusAuthServUpTime=%d\n"
1918 "radiusAuthServResetTime=0\n"
1919 "radiusAuthServConfigReset=4\n",
1920 uptime);
1921 if (os_snprintf_error(end - pos, ret)) {
1922 *pos = '\0';
1923 return pos - buf;
1924 }
1925 pos += ret;
1926
1927 ret = os_snprintf(pos, end - pos,
1928 "radiusAuthServTotalAccessRequests=%u\n"
1929 "radiusAuthServTotalInvalidRequests=%u\n"
1930 "radiusAuthServTotalDupAccessRequests=%u\n"
1931 "radiusAuthServTotalAccessAccepts=%u\n"
1932 "radiusAuthServTotalAccessRejects=%u\n"
1933 "radiusAuthServTotalAccessChallenges=%u\n"
1934 "radiusAuthServTotalMalformedAccessRequests=%u\n"
1935 "radiusAuthServTotalBadAuthenticators=%u\n"
1936 "radiusAuthServTotalPacketsDropped=%u\n"
1937 "radiusAuthServTotalUnknownTypes=%u\n"
1938 "radiusAccServTotalRequests=%u\n"
1939 "radiusAccServTotalInvalidRequests=%u\n"
1940 "radiusAccServTotalResponses=%u\n"
1941 "radiusAccServTotalMalformedRequests=%u\n"
1942 "radiusAccServTotalBadAuthenticators=%u\n"
1943 "radiusAccServTotalUnknownTypes=%u\n",
1944 data->counters.access_requests,
1945 data->counters.invalid_requests,
1946 data->counters.dup_access_requests,
1947 data->counters.access_accepts,
1948 data->counters.access_rejects,
1949 data->counters.access_challenges,
1950 data->counters.malformed_access_requests,
1951 data->counters.bad_authenticators,
1952 data->counters.packets_dropped,
1953 data->counters.unknown_types,
1954 data->counters.acct_requests,
1955 data->counters.invalid_acct_requests,
1956 data->counters.acct_responses,
1957 data->counters.malformed_acct_requests,
1958 data->counters.acct_bad_authenticators,
1959 data->counters.unknown_acct_types);
1960 if (os_snprintf_error(end - pos, ret)) {
1961 *pos = '\0';
1962 return pos - buf;
1963 }
1964 pos += ret;
1965
1966 for (cli = data->clients, idx = 0; cli; cli = cli->next, idx++) {
1967 char abuf[50], mbuf[50];
1968 #ifdef CONFIG_IPV6
1969 if (data->ipv6) {
1970 if (inet_ntop(AF_INET6, &cli->addr6, abuf,
1971 sizeof(abuf)) == NULL)
1972 abuf[0] = '\0';
1973 if (inet_ntop(AF_INET6, &cli->mask6, mbuf,
1974 sizeof(mbuf)) == NULL)
1975 mbuf[0] = '\0';
1976 }
1977 #endif /* CONFIG_IPV6 */
1978 if (!data->ipv6) {
1979 os_strlcpy(abuf, inet_ntoa(cli->addr), sizeof(abuf));
1980 os_strlcpy(mbuf, inet_ntoa(cli->mask), sizeof(mbuf));
1981 }
1982
1983 ret = os_snprintf(pos, end - pos,
1984 "radiusAuthClientIndex=%u\n"
1985 "radiusAuthClientAddress=%s/%s\n"
1986 "radiusAuthServAccessRequests=%u\n"
1987 "radiusAuthServDupAccessRequests=%u\n"
1988 "radiusAuthServAccessAccepts=%u\n"
1989 "radiusAuthServAccessRejects=%u\n"
1990 "radiusAuthServAccessChallenges=%u\n"
1991 "radiusAuthServMalformedAccessRequests=%u\n"
1992 "radiusAuthServBadAuthenticators=%u\n"
1993 "radiusAuthServPacketsDropped=%u\n"
1994 "radiusAuthServUnknownTypes=%u\n"
1995 "radiusAccServTotalRequests=%u\n"
1996 "radiusAccServTotalInvalidRequests=%u\n"
1997 "radiusAccServTotalResponses=%u\n"
1998 "radiusAccServTotalMalformedRequests=%u\n"
1999 "radiusAccServTotalBadAuthenticators=%u\n"
2000 "radiusAccServTotalUnknownTypes=%u\n",
2001 idx,
2002 abuf, mbuf,
2003 cli->counters.access_requests,
2004 cli->counters.dup_access_requests,
2005 cli->counters.access_accepts,
2006 cli->counters.access_rejects,
2007 cli->counters.access_challenges,
2008 cli->counters.malformed_access_requests,
2009 cli->counters.bad_authenticators,
2010 cli->counters.packets_dropped,
2011 cli->counters.unknown_types,
2012 cli->counters.acct_requests,
2013 cli->counters.invalid_acct_requests,
2014 cli->counters.acct_responses,
2015 cli->counters.malformed_acct_requests,
2016 cli->counters.acct_bad_authenticators,
2017 cli->counters.unknown_acct_types);
2018 if (os_snprintf_error(end - pos, ret)) {
2019 *pos = '\0';
2020 return pos - buf;
2021 }
2022 pos += ret;
2023 }
2024
2025 return pos - buf;
2026 }
2027
2028
radius_server_get_eap_user(void * ctx,const u8 * identity,size_t identity_len,int phase2,struct eap_user * user)2029 static int radius_server_get_eap_user(void *ctx, const u8 *identity,
2030 size_t identity_len, int phase2,
2031 struct eap_user *user)
2032 {
2033 struct radius_session *sess = ctx;
2034 struct radius_server_data *data = sess->server;
2035 int ret;
2036
2037 ret = data->get_eap_user(data->conf_ctx, identity, identity_len,
2038 phase2, user);
2039 if (ret == 0 && user) {
2040 sess->accept_attr = user->accept_attr;
2041 sess->remediation = user->remediation;
2042 sess->macacl = user->macacl;
2043 }
2044
2045 if (ret) {
2046 RADIUS_DEBUG("%s: User-Name not found from user database",
2047 __func__);
2048 }
2049
2050 return ret;
2051 }
2052
2053
radius_server_get_eap_req_id_text(void * ctx,size_t * len)2054 static const char * radius_server_get_eap_req_id_text(void *ctx, size_t *len)
2055 {
2056 struct radius_session *sess = ctx;
2057 struct radius_server_data *data = sess->server;
2058 *len = data->eap_req_id_text_len;
2059 return data->eap_req_id_text;
2060 }
2061
2062
radius_server_log_msg(void * ctx,const char * msg)2063 static void radius_server_log_msg(void *ctx, const char *msg)
2064 {
2065 struct radius_session *sess = ctx;
2066 srv_log(sess, "EAP: %s", msg);
2067 }
2068
2069
2070 #ifdef CONFIG_ERP
2071
radius_server_get_erp_domain(void * ctx)2072 static const char * radius_server_get_erp_domain(void *ctx)
2073 {
2074 struct radius_session *sess = ctx;
2075 struct radius_server_data *data = sess->server;
2076
2077 return data->erp_domain;
2078 }
2079
2080
2081 static struct eap_server_erp_key *
radius_server_erp_get_key(void * ctx,const char * keyname)2082 radius_server_erp_get_key(void *ctx, const char *keyname)
2083 {
2084 struct radius_session *sess = ctx;
2085 struct radius_server_data *data = sess->server;
2086 struct eap_server_erp_key *erp;
2087
2088 dl_list_for_each(erp, &data->erp_keys, struct eap_server_erp_key,
2089 list) {
2090 if (os_strcmp(erp->keyname_nai, keyname) == 0)
2091 return erp;
2092 }
2093
2094 return NULL;
2095 }
2096
2097
radius_server_erp_add_key(void * ctx,struct eap_server_erp_key * erp)2098 static int radius_server_erp_add_key(void *ctx, struct eap_server_erp_key *erp)
2099 {
2100 struct radius_session *sess = ctx;
2101 struct radius_server_data *data = sess->server;
2102
2103 dl_list_add(&data->erp_keys, &erp->list);
2104 return 0;
2105 }
2106
2107 #endif /* CONFIG_ERP */
2108
2109
2110 static const struct eapol_callbacks radius_server_eapol_cb =
2111 {
2112 .get_eap_user = radius_server_get_eap_user,
2113 .get_eap_req_id_text = radius_server_get_eap_req_id_text,
2114 .log_msg = radius_server_log_msg,
2115 #ifdef CONFIG_ERP
2116 .get_erp_send_reauth_start = NULL,
2117 .get_erp_domain = radius_server_get_erp_domain,
2118 .erp_get_key = radius_server_erp_get_key,
2119 .erp_add_key = radius_server_erp_add_key,
2120 #endif /* CONFIG_ERP */
2121 };
2122
2123
2124 /**
2125 * radius_server_eap_pending_cb - Pending EAP data notification
2126 * @data: RADIUS server context from radius_server_init()
2127 * @ctx: Pending EAP context pointer
2128 *
2129 * This function is used to notify EAP server module that a pending operation
2130 * has been completed and processing of the EAP session can proceed.
2131 */
radius_server_eap_pending_cb(struct radius_server_data * data,void * ctx)2132 void radius_server_eap_pending_cb(struct radius_server_data *data, void *ctx)
2133 {
2134 struct radius_client *cli;
2135 struct radius_session *s, *sess = NULL;
2136 struct radius_msg *msg;
2137
2138 if (data == NULL)
2139 return;
2140
2141 for (cli = data->clients; cli; cli = cli->next) {
2142 for (s = cli->sessions; s; s = s->next) {
2143 if (s->eap == ctx && s->last_msg) {
2144 sess = s;
2145 break;
2146 }
2147 }
2148 if (sess)
2149 break;
2150 }
2151
2152 if (sess == NULL) {
2153 RADIUS_DEBUG("No session matched callback ctx");
2154 return;
2155 }
2156
2157 msg = sess->last_msg;
2158 sess->last_msg = NULL;
2159 eap_sm_pending_cb(sess->eap);
2160 if (radius_server_request(data, msg,
2161 (struct sockaddr *) &sess->last_from,
2162 sess->last_fromlen, cli,
2163 sess->last_from_addr,
2164 sess->last_from_port, sess) == -2)
2165 return; /* msg was stored with the session */
2166
2167 radius_msg_free(msg);
2168 }
2169