From 5c863c606bfc2dfa1db77cb6455021a87eb42aba Mon Sep 17 00:00:00 2001 From: Mason Ticehurst Date: Tue, 13 Feb 2024 19:25:31 -0500 Subject: [PATCH] Remove check for protocol length in ARP header --- eRINA_STM32F7/src/net/net-protos-arp.adb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/eRINA_STM32F7/src/net/net-protos-arp.adb b/eRINA_STM32F7/src/net/net-protos-arp.adb index 4ccf319..eb28d03 100644 --- a/eRINA_STM32F7/src/net/net-protos-arp.adb +++ b/eRINA_STM32F7/src/net/net-protos-arp.adb @@ -331,13 +331,13 @@ package body Net.Protos.Arp is is Req : constant Net.Headers.Arp_Packet_Access := Packet.Arp; begin - -- Check for valid hardware length, protocol length, hardware type and protocol type. + -- Check for valid hardware length, hardware type and protocol type. if Req.Arp.Ea_Hdr.Ar_Hln /= Ifnet.Mac'Length or - Req.Arp.Ea_Hdr.Ar_Pln /= Ifnet.Ip'Length or Req.Arp.Ea_Hdr.Ar_Hdr /= Net.Headers.To_Network (ARPOP_REQUEST) or Req.Arp.Ea_Hdr.Ar_Pro /= Net.Headers.To_Network (ETHERTYPE_RINA) -- (ETHERTYPE_IP) then + -- Ignore any future processing of this ARP message if it's not RINA-related Ifnet.Rx_Stats.Ignored := Ifnet.Rx_Stats.Ignored + 1; return; end if;