4 * See: ~/Sources/bochs/bochs.../iodev/ne2k.cc
7 #define VERSION ((0<<8)|50)
12 #include <tpl_drv_network.h>
13 #include <semaphore.h>
16 #define MEM_START 0x40
18 #define RX_FIRST (MEM_START)
19 #define RX_LAST (MEM_START+RX_BUF_SIZE-1)
20 #define RX_BUF_SIZE 0x40
21 #define TX_FIRST (MEM_START+RX_BUF_SIZE)
22 #define TX_LAST (MEM_END)
23 #define TX_BUF_SIZE 0x40
24 #define MAX_PACKET_QUEUE 10
29 } csaCOMPAT_DEVICES[] = {
30 {0x10EC, 0x8029}, // Realtek 8029
31 {0x10EC, 0x8129} // Realtek 8129
33 #define NUM_COMPAT_DEVICES ((int)(sizeof(csaCOMPAT_DEVICES)/sizeof(csaCOMPAT_DEVICES[0])))
35 enum eNe2k_Page0Read {
36 CMD = 0, //!< the master command register
37 CLDA0, //!< Current Local DMA Address 0
38 CLDA1, //!< Current Local DMA Address 1
39 BNRY, //!< Boundary Pointer (for ringbuffer)
40 TSR, //!< Transmit Status Register
41 NCR, //!< collisions counter
42 FIFO, //!< (for what purpose ??)
43 ISR, //!< Interrupt Status Register
44 CRDA0, //!< Current Remote DMA Address 0
45 CRDA1, //!< Current Remote DMA Address 1
46 RSR = 0xC //!< Receive Status Register
49 enum eNe2k_Page0Write {
50 PSTART = 1, //!< page start (init only)
51 PSTOP, //!< page stop (init only)
52 TPSR = 4, //!< transmit page start address
53 TBCR0, //!< transmit byte count (low)
54 TBCR1, //!< transmit byte count (high)
55 RSAR0 = 8, //!< remote start address (lo)
56 RSAR1, //!< remote start address (hi)
57 RBCR0, //!< remote byte count (lo)
58 RBCR1, //!< remote byte count (hi)
59 RCR, //!< receive config register
60 TCR, //!< transmit config register
61 DCR, //!< data config register (init)
62 IMR //!< interrupt mask register (init)
65 enum eNe2k_Page1Read {
66 CURR = 7 //!< current page
70 typedef struct sNe2k_Card {
71 Uint16 IOBase; //!< IO Port Address from PCI
72 Uint8 IRQ; //!< IRQ Assigned from PCI
74 tSemaphore Semaphore; //!< Semaphore for incoming packets
75 int NextRXPage; //!< Next expected RX page
77 int NextMemPage; //!< Next Card Memory page to use
79 //Uint8 Buffer[RX_BUF_SIZE*256];
82 tVFS_Node Node; //!< VFS Node
83 Uint8 MacAddr[6]; //!< Cached MAC address
87 int Ne2k_Install(char **Arguments);
88 char *Ne2k_ReadDir(tVFS_Node *Node, int Pos);
89 tVFS_Node *Ne2k_FindDir(tVFS_Node *Node, const char *Name);
90 int Ne2k_IOCtl(tVFS_Node *Node, int ID, void *Data);
91 Uint64 Ne2k_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
92 Uint64 Ne2k_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
94 int Ne2k_int_ReadDMA(tCard *Card, int FirstPage, int NumPages, void *Buffer);
95 Uint8 Ne2k_int_GetWritePage(tCard *Card, Uint16 Length);
96 void Ne2k_IRQHandler(int IntNum);
99 MODULE_DEFINE(0, VERSION, Ne2k, Ne2k_Install, NULL, NULL);
100 tDevFS_Driver gNe2k_DriverInfo = {
104 .ACLs = &gVFS_ACL_EveryoneRX,
105 .Flags = VFS_FFLAG_DIRECTORY,
106 .ReadDir = Ne2k_ReadDir,
107 .FindDir = Ne2k_FindDir,
111 Uint16 gNe2k_BaseAddress;
112 int giNe2k_CardCount = 0;
113 tCard *gpNe2k_Cards = NULL;
117 * \fn int Ne2k_Install(char **Options)
118 * \brief Installs the NE2000 Driver
120 int Ne2k_Install(char **Options)
125 // --- Scan PCI Bus ---
127 giNe2k_CardCount = 0;
128 for( i = 0; i < NUM_COMPAT_DEVICES; i ++ )
130 giNe2k_CardCount += PCI_CountDevices( csaCOMPAT_DEVICES[i].Vendor, csaCOMPAT_DEVICES[i].Device, 0 );
133 if( giNe2k_CardCount == 0 ) {
134 Log_Warning("Ne2k", "No cards detected");
135 return MODULE_ERR_NOTNEEDED;
140 gpNe2k_Cards = calloc( giNe2k_CardCount, sizeof(tCard) );
142 for( i = 0; i < NUM_COMPAT_DEVICES; i ++ )
144 count = PCI_CountDevices( csaCOMPAT_DEVICES[i].Vendor, csaCOMPAT_DEVICES[i].Device, 0 );
145 for( j = 0; j < count; j ++,k ++ )
147 id = PCI_GetDevice( csaCOMPAT_DEVICES[i].Vendor, csaCOMPAT_DEVICES[i].Device, 0, j );
149 base = PCI_AssignPort( id, 0, 0x20 );
150 gpNe2k_Cards[ k ].IOBase = base;
151 gpNe2k_Cards[ k ].IRQ = PCI_GetIRQ( id );
152 gpNe2k_Cards[ k ].NextMemPage = 64;
153 gpNe2k_Cards[ k ].NextRXPage = RX_FIRST;
155 // Install IRQ Handler
156 IRQ_AddHandler(gpNe2k_Cards[ k ].IRQ, Ne2k_IRQHandler);
159 outb( base + 0x1F, inb(base + 0x1F) );
160 while( (inb( base+ISR ) & 0x80) == 0 );
161 outb( base + ISR, 0x80 );
164 outb( base + CMD, 0x40|0x21 ); // Page 1, No DMA, Stop
165 outb( base + CURR, RX_FIRST ); // Current RX page
166 outb( base + CMD, 0x21 ); // No DMA and Stop
167 outb( base + DCR, 0x49 ); // Set WORD mode
168 outb( base + IMR, 0x00 ); // Interrupt Mask Register
169 outb( base + ISR, 0xFF );
170 outb( base + RCR, 0x20 ); // Reciever to Monitor
171 outb( base + TCR, 0x02 ); // Transmitter OFF (TCR.LB = 1, Internal Loopback)
172 outb( base + RBCR0, 6*4 ); // Remote Byte Count
173 outb( base + RBCR1, 0 );
174 outb( base + RSAR0, 0 ); // Clear Source Address
175 outb( base + RSAR1, 0 );
176 outb( base + CMD, 0x0A ); // Remote Read, Start
179 gpNe2k_Cards[ k ].MacAddr[0] = inb(base+0x10);// inb(base+0x10);
180 gpNe2k_Cards[ k ].MacAddr[1] = inb(base+0x10);// inb(base+0x10);
181 gpNe2k_Cards[ k ].MacAddr[2] = inb(base+0x10);// inb(base+0x10);
182 gpNe2k_Cards[ k ].MacAddr[3] = inb(base+0x10);// inb(base+0x10);
183 gpNe2k_Cards[ k ].MacAddr[4] = inb(base+0x10);// inb(base+0x10);
184 gpNe2k_Cards[ k ].MacAddr[5] = inb(base+0x10);// inb(base+0x10);
186 outb( base+PSTART, RX_FIRST); // Set Receive Start
187 outb( base+BNRY, RX_LAST-1); // Set Boundary Page
188 outb( base+PSTOP, RX_LAST); // Set Stop Page
189 outb( base+ISR, 0xFF ); // Clear all ints
190 outb( base+CMD, 0x22 ); // No DMA, Start
191 outb( base+IMR, 0x3F ); // Set Interupt Mask
192 outb( base+RCR, 0x0F ); // Set WRAP and allow all packet matches
193 outb( base+TCR, 0x00 ); // Set Normal Transmitter mode
194 outb( base+TPSR, 0x40); // Set Transmit Start
197 Ne2k_WriteReg(base, MAC0, gpNe2k_Cards[ k ].MacAddr[0]);
198 Ne2k_WriteReg(base, MAC1, gpNe2k_Cards[ k ].MacAddr[1]);
199 Ne2k_WriteReg(base, MAC2, gpNe2k_Cards[ k ].MacAddr[2]);
200 Ne2k_WriteReg(base, MAC3, gpNe2k_Cards[ k ].MacAddr[3]);
201 Ne2k_WriteReg(base, MAC4, gpNe2k_Cards[ k ].MacAddr[4]);
202 Ne2k_WriteReg(base, MAC5, gpNe2k_Cards[ k ].MacAddr[5]);
205 Log_Log("Ne2k", "Card %i 0x%04x IRQ%i %02x:%02x:%02x:%02x:%02x:%02x",
206 k, base, gpNe2k_Cards[ k ].IRQ,
207 gpNe2k_Cards[k].MacAddr[0], gpNe2k_Cards[k].MacAddr[1],
208 gpNe2k_Cards[k].MacAddr[2], gpNe2k_Cards[k].MacAddr[3],
209 gpNe2k_Cards[k].MacAddr[4], gpNe2k_Cards[k].MacAddr[5]
213 gpNe2k_Cards[ k ].Name[0] = '0'+k;
214 gpNe2k_Cards[ k ].Name[1] = '\0';
215 gpNe2k_Cards[ k ].Node.ImplPtr = &gpNe2k_Cards[ k ];
216 gpNe2k_Cards[ k ].Node.NumACLs = 0; // Root Only
217 gpNe2k_Cards[ k ].Node.CTime = now();
218 gpNe2k_Cards[ k ].Node.Write = Ne2k_Write;
219 gpNe2k_Cards[ k ].Node.Read = Ne2k_Read;
220 gpNe2k_Cards[ k ].Node.IOCtl = Ne2k_IOCtl;
222 // Initialise packet semaphore
223 // - Start at zero, no max
224 Semaphore_Init( &gpNe2k_Cards[k].Semaphore, 0, 0, "NE2000", gpNe2k_Cards[ k ].Name );
228 gNe2k_DriverInfo.RootNode.Size = giNe2k_CardCount;
229 DevFS_AddDevice( &gNe2k_DriverInfo );
230 return MODULE_ERR_OK;
234 * \fn char *Ne2k_ReadDir(tVFS_Node *Node, int Pos)
236 char *Ne2k_ReadDir(tVFS_Node *Node, int Pos)
239 if(Pos < 0 || Pos >= giNe2k_CardCount) return NULL;
246 * \fn tVFS_Node *Ne2k_FindDir(tVFS_Node *Node, const char *Name)
248 tVFS_Node *Ne2k_FindDir(tVFS_Node *Node, const char *Name)
250 if(Name[0] == '\0' || Name[1] != '\0') return NULL;
252 return &gpNe2k_Cards[ Name[0]-'0' ].Node;
255 static const char *casIOCtls[] = { DRV_IOCTLNAMES, DRV_NETWORK_IOCTLNAMES, NULL };
257 * \fn int Ne2k_IOCtl(tVFS_Node *Node, int ID, void *Data)
258 * \brief IOCtl calls for a network device
260 int Ne2k_IOCtl(tVFS_Node *Node, int ID, void *Data)
262 ENTER("pNode iID pData", Node, ID, Data);
265 BASE_IOCTLS(DRV_TYPE_NETWORK, "NE2000", VERSION, casIOCtls);
268 // If this is the root, return
269 if( Node == &gNe2k_DriverInfo.RootNode ) {
274 // Device specific settings
277 case NET_IOCTL_GETMAC:
278 if( !CheckMem(Data, 6) ) {
282 memcpy( Data, ((tCard*)Node->ImplPtr)->MacAddr, 6 );
291 * \fn Uint64 Ne2k_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
292 * \brief Send a packet from the network card
294 Uint64 Ne2k_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
296 tCard *Card = (tCard*)Node->ImplPtr;
297 Uint16 *buf = Buffer;
301 ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
303 // Sanity Check Length
304 if(Length > TX_BUF_SIZE*256) {
307 "Ne2k_Write - Attempting to send over TX_BUF_SIZE*256 (%i) bytes (%i)",
308 TX_BUF_SIZE*256, Length
314 // Make sure that the card is in page 0
315 outb(Card->IOBase + CMD, 0|0x22); // Page 0, Start, NoDMA
317 // Clear Remote DMA Flag
318 outb(Card->IOBase + ISR, 0x40); // Bit 6
320 // Send Size - Transfer Byte Count Register
321 outb(Card->IOBase + TBCR0, Length & 0xFF);
322 outb(Card->IOBase + TBCR1, Length >> 8);
324 // Send Size - Remote Byte Count Register
325 outb(Card->IOBase + RBCR0, Length & 0xFF);
326 outb(Card->IOBase + RBCR1, Length >> 8);
329 outb(Card->IOBase + RSAR0, 0x00); // Page Offset
330 page = Ne2k_int_GetWritePage(Card, Length);
331 outb(Card->IOBase + RSAR1, page); // Page Offset
333 outb(Card->IOBase + CMD, 0|0x10|0x2); // Page 0, Remote Write, Start
336 for(rem = Length; rem > 0; rem -= 2) {
337 outw(Card->IOBase + 0x10, *buf++);
340 while( !(inb(Card->IOBase + ISR) & 0x40) ) // Wait for Remote DMA Complete
343 outb( Card->IOBase + ISR, 0x40 ); // ACK Interrupt
346 outb(Card->IOBase + TPSR, page);
347 outb(Card->IOBase + CMD, 0|0x10|0x4|0x2);
350 //outb(Card->IOBase + CMD, 0|0x20);
357 * \fn Uint64 Ne2k_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
358 * \brief Wait for and read a packet from the network card
360 Uint64 Ne2k_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
362 tCard *Card = (tCard*)Node->ImplPtr;
367 Uint8 NextPacketPage;
368 Uint16 Length; // Little Endian
371 ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
374 Semaphore_Wait( &Card->Semaphore, 1 );
376 outb(Card->IOBase, 0x22 | (1 << 6)); // Page 6
377 LOG("CURR : 0x%02x", inb(Card->IOBase + CURR));
379 // Get current read page
380 page = Card->NextRXPage;
381 LOG("page = %i", page);
383 Ne2k_int_ReadDMA(Card, page, 1, data);
385 pktHdr = (void*)data;
387 LOG("pktHdr->Status = 0x%x", pktHdr->Status);
388 LOG("pktHdr->NextPacketPage = %i", pktHdr->NextPacketPage);
389 LOG("pktHdr->Length = 0x%03x", pktHdr->Length);
391 // Have we read all the required bytes yet?
392 if(pktHdr->Length < 256 - 4)
394 if(Length > pktHdr->Length)
395 Length = pktHdr->Length;
396 memcpy(Buffer, &data[4], Length);
398 // No? oh damn, now we need to allocate a buffer
401 int pages = pktHdr->NextPacketPage - page;
402 char *buf = malloc( pages*256 );
404 LOG("pktHdr->Length (%i) > 256 - 4, allocated buffer %p", pktHdr->Length, buf);
411 // Copy the already read data
412 memcpy(buf, data, 256);
414 // Read all the needed pages
416 if(page == RX_LAST+1) page = RX_FIRST;
418 if( page + pages > RX_LAST )
420 int first_count = RX_LAST+1 - page;
422 tmp += Ne2k_int_ReadDMA(Card, page, first_count, buf+256);
423 tmp += Ne2k_int_ReadDMA(Card, RX_FIRST, pages-1-first_count, buf+(first_count+1)*256);
424 LOG("composite return count = %i", tmp);
427 Ne2k_int_ReadDMA(Card, page, pages-1, buf+256);
429 // Wrap length to the packet length
430 if(Length > pktHdr->Length)
431 Length = pktHdr->Length;
432 else if( Length < pktHdr->Length ) {
433 Log_Warning("NE2000", "Packet truncated! (%i bytes truncated to %i)",
434 pktHdr->Length, Length);
436 memcpy(Buffer, &buf[4], Length);
441 // Write BNRY (maximum page for incoming packets)
442 if(pktHdr->NextPacketPage == RX_FIRST)
443 outb( Card->IOBase + BNRY, RX_LAST-1 );
445 outb( Card->IOBase + BNRY, pktHdr->NextPacketPage-1 );
446 // Set next RX Page and decrement the waiting list
447 Card->NextRXPage = pktHdr->NextPacketPage;
453 int Ne2k_int_ReadDMA(tCard *Card, int FirstPage, int NumPages, void *Buffer)
458 if( !(0 <= FirstPage && FirstPage < 256) ) {
459 Log_Warning("NE2000", "Ne2k_int_ReadDMA: BUG - FirstPage(%i) not 8-bit", FirstPage);
462 if( !(0 <= NumPages && NumPages < 256) ) {
463 Log_Warning("NE2000", "Ne2k_int_ReadDMA: BUG - NumPages(%i) not 8-bit", NumPages);
467 ENTER("pCard iFirstPage iNumPages pBuffer", Card, FirstPage, NumPages, Buffer);
469 // Make sure that the card is in bank 0
470 outb(Card->IOBase + CMD, 0|0x22); // Bank 0, Start, NoDMA
471 outb(Card->IOBase + ISR, 0x40); // Clear Remote DMA Flag
474 outb(Card->IOBase + RBCR0, 0);
475 outb(Card->IOBase + RBCR1, NumPages); // page count
476 outb(Card->IOBase + RSAR0, 0x00); // Page Offset
477 outb(Card->IOBase + RSAR1, FirstPage); // Page Number
478 outb(Card->IOBase + CMD, 0|0x08|0x2); // Bank 0, Remote Read, Start
480 // TODO: Less expensive
481 //while( !(inb(Card->IOBase + ISR) & 0x40) ) {
483 // LOG("inb(ISR) = 0x%02x", inb(Card->IOBase + ISR));
485 HALT(); // Small delay?
488 for(i = 0; i < 128*NumPages; i ++)
489 ((Uint16*)Buffer)[i] = inw(Card->IOBase + 0x10);
492 outb(Card->IOBase + ISR, 0x40); // Clear Remote DMA Flag
494 LEAVE('i', NumPages);
499 * \fn Uint8 Ne2k_int_GetWritePage(tCard *Card, Uint16 Length)
501 Uint8 Ne2k_int_GetWritePage(tCard *Card, Uint16 Length)
503 Uint8 ret = Card->NextMemPage;
505 Card->NextMemPage += (Length + 0xFF) >> 8;
506 if(Card->NextMemPage >= TX_LAST) {
507 Card->NextMemPage -= TX_BUF_SIZE;
514 * \fn void Ne2k_IRQHandler(int IntNum)
516 void Ne2k_IRQHandler(int IntNum)
520 for( i = 0; i < giNe2k_CardCount; i++ )
522 if(gpNe2k_Cards[i].IRQ == IntNum)
524 byte = inb( gpNe2k_Cards[i].IOBase + ISR );
526 LOG("byte = 0x%02x", byte);
529 // Reset All (save for RDMA), that's polled
530 outb( gpNe2k_Cards[i].IOBase + ISR, 0xFF&(~0x40) );
532 // 0: Packet recieved (no error)
535 //if( gpNe2k_Cards[i].NumWaitingPackets > MAX_PACKET_QUEUE )
536 // gpNe2k_Cards[i].NumWaitingPackets = MAX_PACKET_QUEUE;
537 Semaphore_Signal( &gpNe2k_Cards[i].Semaphore, 1 );
539 // 1: Packet sent (no error)
540 // 2: Recieved with error
541 // 3: Transmission Halted (Excessive Collisions)
542 // 4: Recieve Buffer Exhausted
544 // 6: Remote DMA Complete
550 Log_Warning("Ne2k", "Recieved Unknown IRQ %i", IntNum);