anchor.diff:  
   	    case ergw_aaa_session:get(Session, 'EAP-Data') of
   		{ok, EAPData} ->
  -		    <<_Code:8, Id:8, _/binary>> = EAPData,
   		    send_eapol_packet(EAPData, State);
   		_ ->
   		    ok
  
positive.code:     case ergw_aaa_session:authenticate(Session, to_session(Opts)) of
  	success ->
  	    lager:info("AuthResult: success"),
  	    State;
  
  	challenge ->
  	    lager:info("AuthResult: challenge"),
  
negative.code:     send_eapol_key([pairwise, ack], <<>>,
  		   State#state{eapol_state = init,
  			       eapol_retransmit = 0,
  			       rekey_running = ptk,
  			       cipher_state = CipherState});
  
  rsna_4way_handshake(rekey, State = #state{eapol_state = installed,
  