* Acess2 IP Stack
* - Address Resolution Protocol
*/
+#define DEBUG 0
#include "ipstack.h"
#include "arp.h"
#include "link.h"
void ARP_int_GetPacket(tAdapter *Adapter, tMacAddr From, int Length, void *Buffer);
// === GLOBALS ===
-struct sARP_Cache {
+struct sARP_Cache4 {
+ tIPv4 IP;
tMacAddr MAC;
- tIPv4 IP4;
- tIPv6 IP6;
Sint64 LastUpdate;
Sint64 LastUsed;
-} *gaARP_Cache;
- int giARP_CacheSpace;
+} *gaARP_Cache4;
+ int giARP_Cache4Space;
+tSpinlock glARP_Cache4;
+struct sARP_Cache6 {
+ tIPv6 IP;
+ tMacAddr MAC;
+ Sint64 LastUpdate;
+ Sint64 LastUsed;
+} *gaARP_Cache6;
+ int giARP_Cache6Space;
+tSpinlock glARP_Cache6;
int giARP_LastUpdateID = 0;
-tSpinlock glARP_Cache;
// === CODE ===
/**
*/
int ARP_Initialise()
{
- gaARP_Cache = malloc( ARP_CACHE_SIZE * sizeof(*gaARP_Cache) );
- memset( gaARP_Cache, 0, ARP_CACHE_SIZE * sizeof(*gaARP_Cache) );
- giARP_CacheSpace = ARP_CACHE_SIZE;
+ gaARP_Cache4 = malloc( ARP_CACHE_SIZE * sizeof(struct sARP_Cache4) );
+ memset( gaARP_Cache4, 0, ARP_CACHE_SIZE * sizeof(struct sARP_Cache4) );
+ giARP_Cache4Space = ARP_CACHE_SIZE;
+
+ gaARP_Cache6 = malloc( ARP_CACHE_SIZE * sizeof(struct sARP_Cache6) );
+ memset( gaARP_Cache6, 0, ARP_CACHE_SIZE * sizeof(struct sARP_Cache6) );
+ giARP_Cache6Space = ARP_CACHE_SIZE;
Link_RegisterType(0x0806, ARP_int_GetPacket);
return 1;
int lastID;
int i;
- LOCK( &glARP_Cache );
- for( i = 0; i < giARP_CacheSpace; i++ )
+ ENTER("pInterface xAddress", Interface, Address);
+
+ LOCK( &glARP_Cache4 );
+ for( i = 0; i < giARP_Cache4Space; i++ )
{
- if(gaARP_Cache[i].IP4.L != Address.L) continue;
+ if(gaARP_Cache4[i].IP.L != Address.L) continue;
// Check if the entry needs to be refreshed
- if( now() - gaARP_Cache[i].LastUpdate > ARP_MAX_AGE ) break;
+ if( now() - gaARP_Cache4[i].LastUpdate > ARP_MAX_AGE ) break;
- RELEASE( &glARP_Cache );
- return gaARP_Cache[i].MAC;
+ RELEASE( &glARP_Cache4 );
+ LOG("Return %x:%x:%x:%x:%x:%x",
+ gaARP_Cache4[i].MAC.B[0], gaARP_Cache4[i].MAC.B[1],
+ gaARP_Cache4[i].MAC.B[2], gaARP_Cache4[i].MAC.B[3],
+ gaARP_Cache4[i].MAC.B[4], gaARP_Cache4[i].MAC.B[5]
+ );
+ LEAVE('-');
+ return gaARP_Cache4[i].MAC;
}
- RELEASE( &glARP_Cache );
+ RELEASE( &glARP_Cache4 );
lastID = giARP_LastUpdateID;
ARP_int_Resolve4(Interface, Address);
for(;;)
{
while(lastID == giARP_LastUpdateID) Threads_Yield();
+ lastID = giARP_LastUpdateID;
- LOCK( &glARP_Cache );
- for( i = 0; i < giARP_CacheSpace; i++ )
+ LOCK( &glARP_Cache4 );
+ for( i = 0; i < giARP_Cache4Space; i++ )
{
- if(gaARP_Cache[i].IP4.L != Address.L) continue;
+ if(gaARP_Cache4[i].IP.L != Address.L) continue;
- RELEASE( &glARP_Cache );
- return gaARP_Cache[i].MAC;
+ RELEASE( &glARP_Cache4 );
+ return gaARP_Cache4[i].MAC;
}
- RELEASE( &glARP_Cache );
+ RELEASE( &glARP_Cache4 );
}
}
{
struct sArpRequest4 req;
+ Log("[ARP4 ] Asking for address %i.%i.%i.%i",
+ Address.B[0], Address.B[1], Address.B[2], Address.B[3]
+ );
req.HWType = htons(0x100); // Ethernet
req.Type = htons(0x0800);
req.HWSize = 6;
return 0;
}
+/**
+ * \brief Updates the ARP Cache entry for an IPv4 Address
+ */
+void ARP_UpdateCache4(tIPv4 SWAddr, tMacAddr HWAddr)
+{
+ int i;
+ int free = -1;
+ int oldest = 0;
+
+ // Find an entry for the IP address in the cache
+ LOCK(&glARP_Cache4);
+ for( i = giARP_Cache4Space; i--; )
+ {
+ if(gaARP_Cache4[oldest].LastUpdate > gaARP_Cache4[i].LastUpdate) {
+ oldest = i;
+ }
+ if( gaARP_Cache4[i].IP.L == SWAddr.L ) break;
+ if( gaARP_Cache4[i].LastUpdate == 0 && free == -1 ) free = i;
+ }
+ // If there was no match, we need to make one
+ if(i == -1) {
+ if(free != -1)
+ i = free;
+ else
+ i = oldest;
+ gaARP_Cache4[i].IP = SWAddr;
+ }
+
+ gaARP_Cache4[i].MAC = HWAddr;
+ gaARP_Cache4[i].LastUpdate = now();
+ RELEASE(&glARP_Cache4);
+}
+
+/**
+ * \brief Updates the ARP Cache entry for an IPv6 Address
+ */
+void ARP_UpdateCache6(tIPv6 SWAddr, tMacAddr HWAddr)
+{
+ int i;
+ int free = -1;
+ int oldest = 0;
+
+ // Find an entry for the MAC address in the cache
+ LOCK(&glARP_Cache6);
+ for( i = giARP_Cache6Space; i--; )
+ {
+ if(gaARP_Cache6[oldest].LastUpdate > gaARP_Cache6[i].LastUpdate) {
+ oldest = i;
+ }
+ if( MAC_EQU(gaARP_Cache6[i].MAC, HWAddr) ) break;
+ if( gaARP_Cache6[i].LastUpdate == 0 && free == -1 ) free = i;
+ }
+ // If there was no match, we need to make one
+ if(i == -1) {
+ if(free != -1)
+ i = free;
+ else
+ i = oldest;
+ gaARP_Cache6[i].MAC = HWAddr;
+ }
+
+ gaARP_Cache6[i].IP = SWAddr;
+ gaARP_Cache6[i].LastUpdate = now();
+ RELEASE(&glARP_Cache6);
+}
+
/**
* \fn void ARP_int_GetPacket(tAdapter *Adapter, tMacAddr From, int Length, void *Buffer)
* \brief Called when an ARP packet is recieved
*/
void ARP_int_GetPacket(tAdapter *Adapter, tMacAddr From, int Length, void *Buffer)
{
- int i, free = -1;
- int oldest = 0;
tArpRequest4 *req4 = Buffer;
tArpRequest6 *req6 = Buffer;
tInterface *iface;
iface = IPv4_GetInterface(Adapter, req4->DestIP, 0);
if( iface )
{
+ Log("[ARP ] Caching sender's IP Address");
+ ARP_UpdateCache4(req4->SourceIP, req4->SourceMac);
+
req4->DestIP = req4->SourceIP;
req4->DestMac = req4->SourceMac;
req4->SourceIP = iface->IP4.Address;
break;
- case 2: // Ooh! A response!
- // Find an entry for the MAC address in the cache
- LOCK(&glARP_Cache);
- for( i = giARP_CacheSpace; i--; )
- {
- if(gaARP_Cache[oldest].LastUpdate > gaARP_Cache[i].LastUpdate) {
- oldest = i;
- }
- if( MAC_EQU(gaARP_Cache[i].MAC, From) ) break;
- if( gaARP_Cache[i].LastUpdate == 0 && free==-1 ) free = i;
- }
- if(i + 1 == 0) {
- if(free != -1)
- i = free;
- else
- i = oldest;
- }
-
+ case 2: // Ooh! A response!
// Check what type of IP it is
switch( req4->SWSize )
{
case 4:
- gaARP_Cache[i].IP4 = req4->SourceIP;
+ ARP_UpdateCache4( req4->SourceIP, From );
break;
case 6:
if( Length < sizeof(tArpRequest6) ) {
Log("[ARP ] Recieved undersized packet (IPv6)");
return ;
}
- gaARP_Cache[i].IP6 = req6->SourceIP;
+ ARP_UpdateCache6( req6->SourceIP, From );
break;
default:
Log("[ARP ] Unknown Protocol Address size (%i)", req4->SWSize);
- RELEASE(&glARP_Cache);
return ;
}
- gaARP_Cache[i].LastUpdate = now();
- RELEASE(&glARP_Cache);
break;
}
}
{
tICMPHeader *hdr = Buffer;
+ Log("[ICMP ] Length = %i", Length);
Log("[ICMP ] hdr->Type = %i", hdr->Type);
Log("[ICMP ] hdr->Code = %i", hdr->Code);
Log("[ICMP ] hdr->Checksum = 0x%x", ntohs(hdr->Checksum));
switch(hdr->Type)
{
+ // -- 0: Echo Reply
case ICMP_ECHOREPLY:
if(hdr->Code != 0) {
Warning("[ICMP ] Code == %i for ICMP Echo Reply, should be 0", hdr->Code);
}
gICMP_PingSlots[hdr->ID].bArrived = 1;
break;
+
+ // -- 8: Echo Request
+ case ICMP_ECHOREQ:
+ if(hdr->Code != 0) {
+ Warning("[ICMP ] Code == %i for ICMP Echo Request, should be 0", hdr->Code);
+ return ;
+ }
+ Log("[ICMP ] Replying");
+ hdr->Type = ICMP_ECHOREPLY;
+ hdr->Checksum = 0;
+ hdr->Checksum = htons( IPv4_Checksum(hdr, Length) );
+ Log("[ICMP ] Checksum = 0x%04x", hdr->Checksum);
+ IPv4_SendPacket(Interface, *(tIPv4*)Address, 1, ntohs(hdr->Sequence), Length, hdr);
+ break;
}
}
hdr->ID = i;
hdr->Sequence = ~i;
hdr->Checksum = htons( IPv4_Checksum(hdr, sizeof(buf)) );
- IPv4_SendPacket(Interface, Addr, 1, i, 32, buf);
+ IPv4_SendPacket(Interface, Addr, 1, i, sizeof(buf), buf);
return -1;
}
memcpy(&hdr->Options[0], Data, Length);
hdr->Version = 4;
- hdr->HeaderLength = htons( sizeof(tIPv4Header) );
+ hdr->HeaderLength = sizeof(tIPv4Header)/4;
hdr->DiffServices = 0; // TODO: Check
hdr->TotalLength = htons( bufSize );
hdr->Identifcation = htons( ID ); // TODO: Check
//Log("[IPv4 ] Version = %i", hdr->Version);
Log("[IPv4 ] HeaderLength = %i", hdr->HeaderLength);
Log("[IPv4 ] DiffServices = %i", hdr->DiffServices);
- //Log("[IPv4 ] TotalLength = %i", ntohs(hdr->TotalLength) );
+ Log("[IPv4 ] TotalLength = %i", ntohs(hdr->TotalLength) );
//Log("[IPv4 ] Identifcation = %i", ntohs(hdr->Identifcation) );
//Log("[IPv4 ] TTL = %i", hdr->TTL );
Log("[IPv4 ] Protocol = %i", hdr->Protocol );
// Check Packet length
if( ntohs(hdr->TotalLength) > Length) {
- Log("[IPv4 ] hdr->TotalLength(%i) > Length(%i)", hdr->TotalLength, Length);
+ Log("[IPv4 ] hdr->TotalLength(%i) > Length(%i)", ntohs(hdr->TotalLength), Length);
return;
}
// Defragment
//TODO
- dataLength = hdr->TotalLength - sizeof(tIPv4Header);
+ dataLength = ntohs(hdr->TotalLength) - sizeof(tIPv4Header);
data = &hdr->Options[0];
// Send it on
Uint16 *arr = Buf;
int i;
+ Log("IPv4_Checksum: (%p, %i)", Buf, Size);
+
Size = (Size + 1) >> 1;
for(i = 0; i < Size; i++ )
{
sum ++; // Simulate 1's complement
sum += arr[i];
}
- return ~sum;
+ return htons( ~sum );
}
/**
int NextMemPage; //!< Next Card Memory page to use
- Uint8 Buffer[RX_BUF_SIZE];
+ Uint8 Buffer[RX_BUF_SIZE*256];
char Name[2]; // "0"
tVFS_Node Node;
tCard *Card = (tCard*)Node->ImplPtr;
Uint16 *buf = Buffer;
int rem = Length;
+ int page;
ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
// Sanity Check Length
- if(Length > TX_BUF_SIZE) {
+ if(Length > TX_BUF_SIZE*256) {
+ Warning(
+ "Ne2k_Write - Attempting to send over TX_BUF_SIZE(%i) bytes (%i)",
+ TX_BUF_SIZE*256, Length
+ );
LEAVE('i', 0);
return 0;
}
// Set up transfer
outb(Card->IOBase + RSAR0, 0x00); // Page Offset
- outb(Card->IOBase + RSAR1, Ne2k_int_GetWritePage(Card, Length)); // Page Offset
+ page = Ne2k_int_GetWritePage(Card, Length);
+ outb(Card->IOBase + RSAR1, page); // Page Offset
// Start
//outb(Card->IOBase + CMD, 0|0x18|0x4|0x2); // Page 0, Transmit Packet, TXP, Start
outb(Card->IOBase + CMD, 0|0x10|0x2); // Page 0, Remote Write, Start
outb( Card->IOBase + ISR, 0x40 ); // ACK Interrupt
// Send Packet
+ outb(Card->IOBase + TPSR, page);
outb(Card->IOBase + CMD, 0|0x10|0x4|0x2);
// Complete DMA