* - By John Hodge (thePowersGang)
*/
#define DEBUG 0
-#define VERSION ((0<<8)|50)
+#define VERSION ((0<<8)|20)
#include <acess.h>
#include <modules.h>
#include <fs_devfs.h>
#include <drv_pci.h>
#include <tpl_drv_network.h>
+#include <semaphore.h>
// === CONSTANTS ===
+#define VENDOR_ID 0x10EC
+#define DEVICE_ID 0x8139
+
enum eRTL8139_Regs
{
+ // MAC Address
MAC0, MAC1, MAC2,
MAC3, MAC4, MAC5,
- MAR0 = 0x08,
- MAR1, MAR2, MAR3,
+
+ // Multicast Registers
+ MAR0 = 0x08, MAR1, MAR2, MAR3,
MAR4, MAR5, MAR6, MAR7,
+ // Transmit status of descriptors 0 - 3
+ TSD0 = 0x10, TSD1 = 0x14,
+ TSD2 = 0x18, TSD3 = 0x1C,
+ // Transmit start addresses
+ TSAD0 = 0x20, TSAD1 = 0x24,
+ TSAD2 = 0x28, TSAD3 = 0x2C,
+
RBSTART = 0x30, //!< Recieve Buffer Start (DWord)
- // 0x31, 0x32, 0x33
+ // Early Recieve Byte Count
+ ERBCR = 0x34, // 16-bits
+ // Early RX Status Register
+ ERSR = 0x36,
// ??, ??, ??, RST, RE, TE, ??, ??
CMD = 0x37,
- IMR = 0x3C,
- ISR = 0x3E,
- RCR = 0x44,
+ CAPR = 0x38, // Current address of packet read
+ CBA = 0x3A, // Current Buffer Address - Total byte count in RX buffer
+
+ IMR = 0x3C, // Interrupt mask register
+ ISR = 0x3E, // Interrupt status register
+
+ TCR = 0x40, // Transmit Configuration Register
+ RCR = 0x44, // Recieve Configuration Register
+ TCTR = 0x48, // 32-bit timer (count)
+ MPC = 0x4C, // Missed packet count (due to RX overflow)
+
+ CR_9346 = 0x50,
+ CONFIG0 = 0x51,
+ CONFIG1 = 0x52,
+ // 0x53 resvd
+ TIMERINT = 0x54, // Fires a timeout when TCTR equals this value
- CONFIG1 = 0x52
};
+#define FLAG_ISR_TOK 0x04
+#define FLAG_ISR_ROK 0x01
+
// === TYPES ===
typedef struct sCard
{
int NumWaitingPackets;
- void *ReceiveBuffer;
+ char *ReceiveBuffer;
tPAddr PhysReceiveBuffer;
+ int ReceiveBufferLength;
+ int SeenOfs; //!< End of the most recently seen packet (by IRQ)
+ tMutex ReadMutex;
+ tSemaphore ReadSemaphore;
+
+ char *TransmitBuffers[4];
+ tPAddr PhysTransmitBuffers[4];
+ BOOL TransmitInUse; // Flags for each transmit descriptor
+ int CurTXDecscriptor;
char Name[2];
tVFS_Node Node;
int RTL8139_RootIOCtl(tVFS_Node *Node, int ID, void *Arg);
Uint64 RTL8139_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
Uint64 RTL8139_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
+ int RTL8139_IOCtl(tVFS_Node *Node, int ID, void *Arg);
void RTL8139_IRQHandler(int Num);
// === GLOBALS ===
}
};
int giRTL8139_CardCount;
-tCard *gpRTL8139_Cards;
+tCard *gaRTL8139_Cards;
// === CODE ===
/**
int id = -1;
int i = 0;
Uint16 base;
+ tCard *card;
- giRTL8139_CardCount = PCI_CountDevices( 0x10EC, 0x8139, 0 );
+ giRTL8139_CardCount = PCI_CountDevices(VENDOR_ID, DEVICE_ID);
+ Log_Debug("RTL8139", "%i cards", giRTL8139_CardCount);
- gpRTL8139_Cards = calloc( giRTL8139_CardCount, sizeof(tCard) );
+ if( giRTL8139_CardCount == 0 ) return MODULE_ERR_NOTNEEDED;
+ gaRTL8139_Cards = calloc( giRTL8139_CardCount, sizeof(tCard) );
- while( (id = PCI_GetDevice(0x10EC, 0x8139, 0, id)) != -1 )
+ //while( (id = PCI_GetDevice(0x10EC, 0x8139, 0, id)) != -1 )
+ while( (id = PCI_GetDevice(VENDOR_ID, DEVICE_ID, i)) != -1 )
{
- base = PCI_AssignPort( id, 0, 0x100 );
- gpRTL8139_Cards[i].IOBase = base;
- gpRTL8139_Cards[i].IRQ = PCI_GetIRQ( id );
+ card = &gaRTL8139_Cards[i];
+ base = PCI_GetBAR( id, 0 );
+ if( !(base & 1) ) {
+ Log_Warning("RTL8139", "Driver does not support MMIO, skipping card");
+ card->IOBase = 0;
+ card->IRQ = 0;
+ continue ;
+ }
+ base &= ~1;
+ card->IOBase = base;
+ card->IRQ = PCI_GetIRQ( id );
// Install IRQ Handler
- IRQ_AddHandler(gpRTL8139_Cards[ k ].IRQ, RTL8136_IRQHandler);
+ IRQ_AddHandler(card->IRQ, RTL8139_IRQHandler);
// Power on
outb( base + CONFIG1, 0x00 );
// Set up recieve buffer
// - Allocate 3 pages below 4GiB for the recieve buffer (Allows 8k+16+1500)
- gpRTL8139_Cards[i].ReceiveBuffer = MM_AllocDMA( 3, 32, &gpRTL8139_Cards[i].PhysReceiveBuffer );
- outl(base + RBSTART, (Uint32)gpRTL8139_Cards[i].PhysReceiveBuffer);
+ card->ReceiveBuffer = (void*)MM_AllocDMA( 3, 32, &card->PhysReceiveBuffer );
+ card->ReceiveBufferLength = 8*1024+16;
+ outd(base + RBSTART, (Uint32)card->PhysReceiveBuffer);
+ outd(base + CBA, 0);
+ outd(base + CAPR, 0);
// Set IMR to Transmit OK and Receive OK
outw(base + IMR, 0x5);
+ // Set up transmit buffers
+ // - 2 non-contiguous pages (each page can fit 2 1500 byte packets)
+ card->TransmitBuffers[0] = (void*)MM_AllocDMA( 1, 32, &card->PhysTransmitBuffers[0] );
+ card->TransmitBuffers[1] = card->TransmitBuffers[0] + 0x800;
+ card->PhysTransmitBuffers[1] = card->PhysTransmitBuffers[0] + 0x800;
+
+ card->TransmitBuffers[2] = (void*)MM_AllocDMA( 1, 32, &card->PhysTransmitBuffers[2] );
+ card->TransmitBuffers[3] = card->TransmitBuffers[2] + 0x800;
+ card->PhysTransmitBuffers[3] = card->PhysTransmitBuffers[2] + 0x800;
+
+ outd(base + TSAD0, card->PhysTransmitBuffers[0]);
+ outd(base + TSAD1, card->PhysTransmitBuffers[1]);
+ outd(base + TSAD2, card->PhysTransmitBuffers[2]);
+ outd(base + TSAD3, card->PhysTransmitBuffers[3]);
+
// Set recieve buffer size and recieve mask
// - Bit 7 being unset tells the card to overflow the recieve buffer if needed
// (i.e. when the packet starts at the end of the bufffer, it overflows up
// to 1500 bytes)
- outl(base + RCR, 0x0F);
+ outd(base + RCR, 0x0F);
// Recive Enable and Transmit Enable
outb(base + CMD, 0x0C);
// Get the card's MAC address
- gpRTL8139_Cards[ i ].MacAddr[0] = inb(base+MAC0);
- gpRTL8139_Cards[ i ].MacAddr[1] = inb(base+MAC1);
- gpRTL8139_Cards[ i ].MacAddr[2] = inb(base+MAC2);
- gpRTL8139_Cards[ i ].MacAddr[3] = inb(base+MAC3);
- gpRTL8139_Cards[ i ].MacAddr[4] = inb(base+MAC4);
- gpRTL8139_Cards[ i ].MacAddr[5] = inb(base+MAC5);
+ card->MacAddr[0] = inb(base+MAC0);
+ card->MacAddr[1] = inb(base+MAC1);
+ card->MacAddr[2] = inb(base+MAC2);
+ card->MacAddr[3] = inb(base+MAC3);
+ card->MacAddr[4] = inb(base+MAC4);
+ card->MacAddr[5] = inb(base+MAC5);
// Set VFS Node
- gpRTL8139_Cards[ i ].Name[0] = '0'+i;
- gpRTL8139_Cards[ i ].Name[1] = '\0';
- gpRTL8139_Cards[ i ].Node.ImplPtr = &gpRTL8139_Cards[ i ];
- gpRTL8139_Cards[ i ].Node.NumACLs = 0;
- gpRTL8139_Cards[ i ].Node.CTime = now();
- gpRTL8139_Cards[ i ].Node.Write = RTL8139_Write;
- gpRTL8139_Cards[ i ].Node.Read = RTL8139_Read;
- gpRTL8139_Cards[ i ].Node.IOCtl = RTL8139_IOCtl;
+ card->Name[0] = '0'+i;
+ card->Name[1] = '\0';
+ card->Node.ImplPtr = card;
+ card->Node.NumACLs = 0;
+ card->Node.CTime = now();
+ card->Node.Write = RTL8139_Write;
+ card->Node.Read = RTL8139_Read;
+ card->Node.IOCtl = RTL8139_IOCtl;
- Log_Log("RTL8139", "Card %i 0x%04x %02x:%02x:%02x:%02x:%02x:%02x",
- i, base,
- gpRTL8139_Cards[ i ].MacAddr[0], gpRTL8139_Cards[ i ].MacAddr[1],
- gpRTL8139_Cards[ i ].MacAddr[2], gpRTL8139_Cards[ i ].MacAddr[3],
- gpRTL8139_Cards[ i ].MacAddr[4], gpRTL8139_Cards[ i ].MacAddr[5]
+ Log_Log("RTL8139", "Card %i 0x%04x, IRQ %i %02x:%02x:%02x:%02x:%02x:%02x",
+ i, card->IOBase, card->IRQ,
+ card->MacAddr[0], card->MacAddr[1], card->MacAddr[2],
+ card->MacAddr[3], card->MacAddr[4], card->MacAddr[5]
);
i ++;
}
+
+ gRTL8139_DriverInfo.RootNode.Size = giRTL8139_CardCount;
+ DevFS_AddDevice( &gRTL8139_DriverInfo );
+
return MODULE_ERR_OK;
}
// --- Root Functions ---
char *RTL8139_ReadDir(tVFS_Node *Node, int Pos)
{
- if( Pos < 0 || Pos > giRTL8139_CardCount ) return NULL;
+ if( Pos < 0 || Pos >= giRTL8139_CardCount ) return NULL;
- return strdup( gpRTL8139_Cards[Pos].Name );
+ return strdup( gaRTL8139_Cards[Pos].Name );
}
tVFS_Node *RTL8139_FindDir(tVFS_Node *Node, const char *Filename)
{
//TODO: It might be an idea to supprt >10 cards
- if(Filename[0] == '\0' || Filename[0] != '\0') return NULL;
+ if(Filename[0] == '\0' || Filename[1] != '\0') return NULL;
if(Filename[0] < '0' || Filename[0] > '9') return NULL;
- return &gpRTL8139_Cards[ Filename[0]-'0' ].Node;
+ return &gaRTL8139_Cards[ Filename[0]-'0' ].Node;
}
const char *csaRTL8139_RootIOCtls[] = {DRV_IOCTLNAMES, NULL};
-int RTL8139_RootIOCtl(tVFS_Node *Node, int ID, void *Arg)
+int RTL8139_RootIOCtl(tVFS_Node *Node, int ID, void *Data)
{
+ ENTER("pNode iID pData", Node, ID, Data);
switch(ID)
{
BASE_IOCTLS(DRV_TYPE_NETWORK, "RTL8139", VERSION, csaRTL8139_RootIOCtls);
}
+ LEAVE('i', 0);
return 0;
}
// --- File Functions ---
Uint64 RTL8139_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
{
- return 0;
+ tCard *card = Node->ImplPtr;
+ Uint16 read_ofs, pkt_length;
+ int new_read_ofs;
+
+ ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
+
+retry:
+ if( Semaphore_Wait( &card->ReadSemaphore, 1 ) != 1 )
+ {
+ LEAVE_RET('i', 0);
+ }
+
+ Mutex_Acquire( &card->ReadMutex );
+
+ read_ofs = (inw( card->IOBase + CAPR ) + 0x10) & 0xFFFF;
+ LOG("read_ofs = %i", read_ofs);
+
+ pkt_length = *(Uint16*)&card->ReceiveBuffer[read_ofs+2];
+
+ // Calculate new read offset
+ new_read_ofs = read_ofs + pkt_length + 4;
+ new_read_ofs = (new_read_ofs + 3) & ~3; // Align
+ if(new_read_ofs > card->ReceiveBufferLength) new_read_ofs = 0;
+ new_read_ofs -= 0x10; // I dunno
+
+ // Check for errors
+ if( *(Uint16*)&card->ReceiveBuffer[read_ofs] & 0x1E ) {
+ // Update CAPR
+ outd(card->IOBase + CAPR, new_read_ofs);
+ Mutex_Release( &card->ReadMutex );
+ goto retry; // I feel evil
+ }
+
+ // Get packet
+ if( Length > pkt_length ) Length = pkt_length;
+ memcpy(Buffer, &card->ReceiveBuffer[read_ofs+4], Length);
+
+ // Update CAPR
+ outw(card->IOBase + CAPR, new_read_ofs);
+
+ Mutex_Release( &card->ReadMutex );
+
+ LEAVE('i', Length);
+
+ return Length;
}
Uint64 RTL8139_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
{
- return 0;
+ int td;
+ Uint32 status;
+ tCard *card = Node->ImplPtr;
+
+ if( Length > 1500 ) return 0; // MTU exceeded
+
+ ENTER("pNode XLength pBuffer", Node, Length, Buffer);
+
+ // TODO: Implement a semaphore for avaliable transmit buffers
+
+ td = card->CurTXDecscriptor;
+
+ // Find an avaliable descriptor
+ while( card->TransmitInUse & (1 << td) )
+ Threads_Yield();
+
+ LOG("td = %i", td);
+
+ // Transmit using descriptor `td`
+ LOG("card->PhysTransmitBuffers[td] = %P", card->PhysTransmitBuffers[td]);
+ card->TransmitInUse |= (1 << td);
+ outd(card->IOBase + TSAD0 + td*4, card->PhysTransmitBuffers[td]);
+ LOG("card->TransmitBuffers[td] = %p", card->TransmitBuffers[td]);
+ // Copy to buffer
+ memcpy(card->TransmitBuffers[td], Buffer, Length);
+ // Start
+ status = 0;
+ status |= Length & 0x1FFF; // 0-12: Length
+ status |= 0 << 13; // 13: OWN bit
+ status |= (0 & 0x3F) << 16; // 16-21: Early TX threshold (zero atm, TODO: check)
+ LOG("status = 0x%08x", status);
+ outd(card->IOBase + TSD0 + td*4, status);
+
+ card->CurTXDecscriptor ++;
+ card->CurTXDecscriptor %= 4;
+
+ LEAVE('i', (int)Length);
+
+ return Length;
}
const char *csaRTL8139_NodeIOCtls[] = {DRV_IOCTLNAMES, NULL};
-int RTL8139_IOCtl(tVFS_Node *Node, int ID, void *Arg)
+int RTL8139_IOCtl(tVFS_Node *Node, int ID, void *Data)
{
+ tCard *card = Node->ImplPtr;
+ ENTER("pNode iID pData", Node, ID, Data);
switch(ID)
{
BASE_IOCTLS(DRV_TYPE_NETWORK, "RTL8139", VERSION, csaRTL8139_NodeIOCtls);
+ case NET_IOCTL_GETMAC:
+ if( !CheckMem(Data, 6) ) {
+ LEAVE('i', -1);
+ return -1;
+ }
+ memcpy( Data, card->MacAddr, 6 );
+ LEAVE('i', 1);
+ return 1;
}
+ LEAVE('i', 0);
return 0;
}
+
+void RTL8139_IRQHandler(int Num)
+{
+ int i, j;
+ tCard *card;
+ Uint16 status;
+
+ LOG("Num = %i", Num);
+
+ for( i = 0; i < giRTL8139_CardCount; i ++ )
+ {
+ card = &gaRTL8139_Cards[i];
+ if( Num != card->IRQ ) break;
+
+ status = inw(card->IOBase + ISR);
+ LOG("status = 0x%02x", status);
+
+ // Transmit OK, a transmit descriptor is now free
+ if( status & FLAG_ISR_TOK )
+ {
+ for( j = 0; j < 4; j ++ )
+ {
+ if( ind(card->IOBase + TSD0 + j*4) & 0x8000 ) { // TSD TOK
+ card->TransmitInUse &= ~(1 << j);
+ // TODO: Update semaphore once implemented
+ }
+ }
+ outw(card->IOBase + ISR, FLAG_ISR_TOK);
+ }
+
+ // Recieve OK, inform read
+ if( status & FLAG_ISR_ROK )
+ {
+ int read_ofs, end_ofs;
+ int packet_count = 0;
+
+ // Scan recieve buffer for packets
+ end_ofs = inw(card->IOBase + CBA);
+ read_ofs = card->SeenOfs;
+ LOG("read_ofs = %i, end_ofs = %i", read_ofs, end_ofs);
+ if( read_ofs > end_ofs )
+ {
+ while( read_ofs < card->ReceiveBufferLength )
+ {
+ packet_count ++;
+ LOG("%i 0x%x Pkt Hdr: 0x%04x, len: 0x%04x",
+ packet_count, read_ofs,
+ *(Uint16*)&card->ReceiveBuffer[read_ofs],
+ *(Uint16*)&card->ReceiveBuffer[read_ofs+2]
+ );
+ read_ofs += *(Uint16*)&card->ReceiveBuffer[read_ofs+2] + 4;
+ read_ofs = (read_ofs + 3) & ~3; // Align
+
+ }
+ read_ofs = 0;
+ }
+ while( read_ofs < end_ofs )
+ {
+ LOG("%i 0x%x Pkt Hdr: 0x%04x, len: 0x%04x",
+ packet_count, read_ofs,
+ *(Uint16*)&card->ReceiveBuffer[read_ofs],
+ *(Uint16*)&card->ReceiveBuffer[read_ofs+2]
+ );
+ packet_count ++;
+ read_ofs += *(Uint16*)&card->ReceiveBuffer[read_ofs+2] + 4;
+ read_ofs = (read_ofs + 3) & ~3; // Align
+ }
+ card->SeenOfs = read_ofs;
+
+ LOG("packet_count = %i, read_ofs = 0x%x", packet_count, read_ofs);
+
+ if( packet_count )
+ {
+ if( Semaphore_Signal( &card->ReadSemaphore, packet_count ) != packet_count ) {
+ // Oops?
+ }
+ VFS_MarkAvaliable( &card->Node, 1 );
+ }
+
+ outw(card->IOBase + ISR, FLAG_ISR_ROK);
+ }
+ }
+}