Print transmitted bytes for debugging purposes

PSU-Capstone-Team24 · Mar 9, 2024 · 3feb9da · 3feb9da
1 parent 93cae0e
commit 3feb9da
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/eRINA_STM32F7/src/net/stm32/net-interfaces-stm32.adb b/eRINA_STM32F7/src/net/stm32/net-interfaces-stm32.adb
@@ -28,6 +28,8 @@ with STM32_SVD.Ethernet;
 with HAL;
 with Cortex_M.Cache;
 with Debug;
+with Net.Buffers; use Net.Buffers;
+with Buffers; use Buffers;
 
 package body Net.Interfaces.STM32 is
 
@@ -144,6 +146,18 @@ package body Net.Interfaces.STM32 is
            (Debug.Info,
             "Ethernet frame transmitted with" & Buf.Get_Length'Image &
             " Bytes");
+
+            declare
+               Buf_Raw :
+                  Byte_Buffer
+                     (1 .. Integer (Buf.Get_Data_Size (Net.Buffers.RAW_PACKET))) with
+                  Address =>
+                     Buf.Get_Data_Address
+                     (Net.Buffers.Offsets (Net.Buffers.RAW_PACKET));
+            begin
+               Debug.Print (Debug.Info, Buffer_To_Byte_String (Buf_Raw));
+            end;
+
          Transmit_Queue.Send (Buf);
       exception
          when E : others =>