From a5292514927b3854230772cac66ae58091134f72 Mon Sep 17 00:00:00 2001
From: Martin Willi <martin@revosec.ch>
Date: Thu, 6 Sep 2012 18:30:24 +0200
Subject: [PATCH] Send PEAP Failure result TLV if SoH check failed

---
 src/libcharon/plugins/eap_peap/eap_peap_server.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/libcharon/plugins/eap_peap/eap_peap_server.c b/src/libcharon/plugins/eap_peap/eap_peap_server.c
index 2ef2994b3f..5fcffd6907 100644
--- a/src/libcharon/plugins/eap_peap/eap_peap_server.c
+++ b/src/libcharon/plugins/eap_peap/eap_peap_server.c
@@ -233,6 +233,9 @@ static status_t process_soh(private_eap_peap_server_t *this, eap_payload_t *in)
 		default:
 			DBG1(DBG_IKE, "EAP-%M method failed",
 				 eap_type_get_names, &vendor, type);
+			this->ph2->destroy(this->ph2);
+			this->ph2 = NULL;
+			this->state = FAILED;
 			break;
 	}
 	in->destroy(in);
-- 
2.47.2