Fiddling with usermode PCI dump
[tpg/acess2.git] / Modules / IPStack / ipv4.c
index 9723d8d..aff593a 100644 (file)
@@ -6,14 +6,22 @@
 #include "link.h"
 #include "ipv4.h"
 
+#define DEFAULT_TTL    32
+
 // === IMPORTS ===
 extern tInterface      *gIP_Interfaces;
+extern void    ICMP_Initialise();
+extern  int    ICMP_Ping(tInterface *Interface, tIPv4 Addr);
+extern tMacAddr        ARP_Resolve4(tInterface *Interface, tIPv4 Address);
 
 // === PROTOTYPES ===
  int   IPv4_Initialise();
+ int   IPv4_RegisterCallback(int ID, tIPCallback Callback);
 void   IPv4_int_GetPacket(tAdapter *Interface, tMacAddr From, int Length, void *Buffer);
 tInterface     *IPv4_GetInterface(tAdapter *Adapter, tIPv4 Address, int Broadcast);
 Uint32 IPv4_Netmask(int FixedBits);
+Uint16 IPv4_Checksum(void *Buf, int Size);
+ int   IPv4_Ping(tInterface *Iface, tIPv4 Addr);
 
 // === GLOBALS ===
 tIPCallback    gaIPv4_Callbacks[256];
@@ -24,10 +32,65 @@ tIPCallback gaIPv4_Callbacks[256];
  */
 int IPv4_Initialise()
 {
+       ICMP_Initialise();
        Link_RegisterType(IPV4_ETHERNET_ID, IPv4_int_GetPacket);
        return 1;
 }
 
+/**
+ * \fn int IPv4_RegisterCallback( int ID, tIPCallback Callback )
+ * \brief Registers a callback
+ */
+int IPv4_RegisterCallback(int ID, tIPCallback Callback)
+{
+       if( ID < 0 || ID > 255 )        return 0;
+       if( gaIPv4_Callbacks[ID] )      return 0;
+       gaIPv4_Callbacks[ID] = Callback;
+       return 1;
+}
+
+/**
+ * \brief Creates and sends an IPv4 Packet
+ * \param Iface        Interface
+ * \param Address      Destination IP
+ * \param Protocol     Protocol ID
+ * \param ID   Some random ID number
+ * \param Length       Data Length
+ * \param Data Packet Data
+ */
+int IPv4_SendPacket(tInterface *Iface, tIPv4 Address, int Protocol, int ID, int Length, void *Data)
+{
+       tMacAddr        to = ARP_Resolve4(Iface, Address);
+        int    bufSize = sizeof(tIPv4Header) + Length;
+       char    buf[bufSize];
+       tIPv4Header     *hdr = (void*)buf;
+       
+       memcpy(&hdr->Options[0], Data, Length);
+       hdr->Version = 4;
+       hdr->HeaderLength = sizeof(tIPv4Header)/4;
+       hdr->DiffServices = 0;  // TODO: Check
+       
+       hdr->Reserved = 0;
+       hdr->DontFragment = 0;
+       hdr->MoreFragments = 0;
+       hdr->FragOffLow = 0;
+       hdr->FragOffHi = 0;
+       
+       hdr->TotalLength = htons( bufSize );
+       hdr->Identifcation = htons( ID );       // TODO: Check
+       hdr->TTL = DEFAULT_TTL;
+       hdr->Protocol = Protocol;
+       hdr->HeaderChecksum = 0;        // Will be set later
+       hdr->Source = Iface->IP4.Address;
+       hdr->Destination = Address;
+       hdr->HeaderChecksum = IPv4_Checksum(hdr, sizeof(tIPv4Header));
+       
+       Log_Log("IPv4", "Sending packet to %i.%i.%i.%i",
+               Address.B[0], Address.B[1], Address.B[2], Address.B[3]);
+       Link_SendPacket(Iface->Adapter, IPV4_ETHERNET_ID, to, bufSize, buf);
+       return 1;
+}
+
 /**
  * \fn void IPv4_int_GetPacket(tInterface *Adapter, tMacAddr From, int Length, void *Buffer)
  * \brief Process an IPv4 Packet
@@ -40,27 +103,55 @@ void IPv4_int_GetPacket(tAdapter *Adapter, tMacAddr From, int Length, void *Buff
         int    dataLength;
        if(Length < sizeof(tIPv4Header))        return;
        
+       #if 0
+       //Log_Log("IPv4", "Version = %i", hdr->Version);
+       //Log_Log("IPv4", "HeaderLength = %i", hdr->HeaderLength);
+       //Log_Log("IPv4", "DiffServices = %i", hdr->DiffServices);
+       Log_Log("IPv4", "TotalLength = %i", ntohs(hdr->TotalLength) );
+       //Log_Log("IPv4", "Identifcation = %i", ntohs(hdr->Identifcation) );
+       //Log_Log("IPv4", "TTL = %i", hdr->TTL );
+       Log_Log("IPv4", "Protocol = %i", hdr->Protocol );
+       //Log_Log("IPv4", "HeaderChecksum = 0x%x", ntohs(hdr->HeaderChecksum) );
+       Log_Log("IPv4", "Source = %i.%i.%i.%i",
+               hdr->Source.B[0], hdr->Source.B[1], hdr->Source.B[2], hdr->Source.B[3] );
+       Log_Log("IPv4", "Destination = %i.%i.%i.%i",
+               hdr->Destination.B[0], hdr->Destination.B[1],
+               hdr->Destination.B[2], hdr->Destination.B[3] );
+       #endif  
+
        // Check that the version IS IPv4
-       if(hdr->Version != 4)   return;
+       if(hdr->Version != 4) {
+               Log_Log("IPv4", "hdr->Version(%i) != 4", hdr->Version);
+               return;
+       }
        
        // Check Header checksum
        //TODO
        
        // Check Packet length
-       if(hdr->TotalLength > Length)   return;
+       if( ntohs(hdr->TotalLength) > Length) {
+               Log_Log("IPv4", "hdr->TotalLength(%i) > Length(%i)", ntohs(hdr->TotalLength), Length);
+               return;
+       }
        
        // Get Interface (allowing broadcasts)
-       iface = IPv4_GetInterface(Adapter, hdr->Source, 1);
-       if(!iface)      return; // Not for us? Well, let's ignore it
+       iface = IPv4_GetInterface(Adapter, hdr->Destination, 1);
+       if(!iface) {
+               Log_Log("IPv4", "Ignoring Packet (Not for us)");
+               return; // Not for us? Well, let's ignore it
+       }
        
        // Defragment
        //TODO
        
-       dataLength = hdr->TotalLength - sizeof(tIPv4Header);
+       dataLength = ntohs(hdr->TotalLength) - sizeof(tIPv4Header);
        data = &hdr->Options[0];
        
        // Send it on
-       gaIPv4_Callbacks[hdr->Protocol] (iface, &hdr->Source, dataLength, data);
+       if( gaIPv4_Callbacks[hdr->Protocol] )
+               gaIPv4_Callbacks[hdr->Protocol] (iface, &hdr->Source, dataLength, data);
+       else
+               Log_Log("IPv4", "Unknown Protocol %i", hdr->Protocol);
 }
 
 /**
@@ -71,6 +162,9 @@ tInterface *IPv4_GetInterface(tAdapter *Adapter, tIPv4 Address, int Broadcast)
 {
        tInterface      *iface = NULL;
        Uint32  netmask;
+       Uint32  addr, this;
+       
+       addr = ntohl( Address.L );
        
        for( iface = gIP_Interfaces; iface; iface = iface->Next)
        {
@@ -81,10 +175,20 @@ tInterface *IPv4_GetInterface(tAdapter *Adapter, tIPv4 Address, int Broadcast)
                
                if( !Broadcast )        continue;
                
+               this = ntohl( iface->IP4.Address.L );
+               
                // Check for broadcast
                netmask = IPv4_Netmask(iface->IP4.SubnetBits);
-               if( (Address.L & netmask) == (iface->IP4.Address.L & netmask)
-                && (Address.L & ~netmask) == (0xFFFFFFFF & ~netmask) )
+               
+               //Log("netmask = 0x%08x", netmask);
+               //Log("addr = 0x%08x", addr);
+               //Log("this = 0x%08x", this);
+               //Log("%08x == %08x && %08x == %08x",
+               //      (addr & netmask), (this & netmask),
+               //      (addr & ~netmask), (0xFFFFFFFF & ~netmask)
+               //      );
+               if( (addr & netmask) == (this & netmask)
+                && (addr & ~netmask) == (0xFFFFFFFF & ~netmask) )
                        return iface;
        }
        return NULL;
@@ -100,5 +204,33 @@ Uint32 IPv4_Netmask(int FixedBits)
        Uint32  ret = 0xFFFFFFFF;
        ret >>= (32-FixedBits);
        ret <<= (32-FixedBits);
+       // Returs a little endian netmask
        return ret;
 }
+
+/**
+ * \brief Calculate the IPv4 Checksum
+ */
+Uint16 IPv4_Checksum(void *Buf, int Size)
+{
+       Uint16  sum = 0;
+       Uint16  *arr = Buf;
+        int    i;
+       
+       Size = (Size + 1) >> 1;
+       for(i = 0; i < Size; i++ )
+       {
+               if((int)sum + arr[i] > 0xFFFF)
+                       sum ++; // Simulate 1's complement
+               sum += arr[i];
+       }
+       return ~sum ;
+}
+
+/**
+ * \brief Sends an ICMP Echo and waits for a reply
+ */
+int IPv4_Ping(tInterface *Iface, tIPv4 Addr)
+{
+       return ICMP_Ping(Iface, Addr);
+}

UCC git Repository :: git.ucc.asn.au