Functonal webserver with supporting code changes. WIP COMMIT
[akaros.git] / kern / arch / i386 / rl8168.c
1 /** @filec
2  * @brief RL8168 Driver       
3  *
4  * EXPERIMENTAL. DO NOT USE IF YOU DONT KNOW WHAT YOU ARE DOING
5  *
6  * See Info below 
7  *
8  * @author Paul Pearce <pearce@eecs.berkeley.edu>
9  *
10  */
11
12 #ifdef __SHARC__
13 #pragma nosharc
14 #endif
15
16 #include <arch/mmu.h>
17 #include <arch/x86.h>
18 #include <arch/smp.h>
19 #include <arch/apic.h>
20 #include <arch/pci.h>
21 #include <arch/rl8168.h>
22
23 #include <ros/memlayout.h>
24
25 #include <atomic.h>
26 #include <stdio.h>
27 #include <string.h>
28 #include <trap.h>
29 #include <kmalloc.h>
30
31 #include <pmap.h>
32
33 /** @file
34  * @brief Realtek RL8168 Driver
35  *
36  * EXPERIMENTAL. DO NOT USE IF YOU DONT KNOW WHAT YOU ARE DOING
37  *
38  * This is a function rl8168 driver, that uses some really ugly hacks to achieve
39  * UDP communication with a remote syscall server, without a network stack.
40  *
41  * To enable use, define __NETWORK__ in your Makelocal
42  *
43  * @author Paul Pearce <pearce@eecs.berkeley.edu>
44  *
45  * @todo Move documention below into doxygen format.
46  * @todo See list in code
47  */
48
49
50 /* RealTek 8168d (8111d) NIC Driver
51  *
52  * Written by Paul Pearce.
53  *
54  * This is a really rough "driver". Really, its not a driver, just a kernel hack to give
55  * the kernel a way to receive and send packets. The basis of the init code is the OSDEV
56  * page on the 8169 chipset, which is a varient of this chipset (most 8169 drivers work 
57  * on the 8168d). http://wiki.osdev.org/RTL8169
58  * 
59  * Basic ideas (although no direct code) were gleamed from the OpenBSD re(4) driver,
60  * which can be found in sys/dev/ic/re.c. sys/dev/ic/rtl81x9reg.h is needed to make
61  * sense of the constants used in re.c.
62  *
63  * This is an ongoing work in progress. Main thing is we need a kernel interface for PCI
64  * devices and network devices, that we can hook into, instead of providing arbitary functions
65  * 
66  * TODO: Remove hacky syscall hack stuff (once we get a real stack).
67  * TODO: Jumbo frame support
68  * TODO: Use high priority transmit ring for syscall stuff.
69  * TODO: Discuss panic conditions.
70  * TODO: Shutdown cleanup kfrees()
71  * TODO: Use onboard timer interrupt to check for packets, instead of writing a bit each time we have a packet.
72  * TODO: CONCURRENCY!
73  */
74
75 struct Descriptor
76 {
77     unsigned int command,  /* command/status dword */
78                  vlan,     /* currently unused */
79                  low_buf,  /* low 32-bits of physical buffer address */
80                  high_buf; /* high 32-bits of physical buffer address */
81 };
82
83
84 uint32_t rl8168_io_base_addr = 0;
85 uint32_t rl8168_irq = 0;
86 char device_mac[6];
87
88 struct Descriptor *CT(NUM_RX_DESCRIPTORS) rx_des_kva;
89 unsigned long rx_des_pa;
90
91 struct Descriptor *CT(NUM_TX_DESCRIPTORS) tx_des_kva;
92 unsigned long tx_des_pa;
93
94 uint32_t rx_des_cur = 0;
95 uint32_t tx_des_cur = 0;
96
97 extern int eth_up;
98 extern uint32_t packet_buffer_count;
99 extern char* packet_buffer[PACKET_BUFFER_SIZE];
100 extern uint32_t packet_buffer_sizes[PACKET_BUFFER_SIZE];
101 extern uint32_t packet_buffer_head;
102 extern uint32_t packet_buffer_tail;
103 spinlock_t packet_buffer_lock;
104
105 extern char *CT(PACKET_HEADER_SIZE + len) (*packet_wrap)(const char *CT(len) data, size_t len);
106 extern int (*send_frame)(const char *CT(len) data, size_t len);
107
108
109 void rl8168_init() {
110
111         if (rl8168_scan_pci() < 0) return;
112         rl8168_read_mac();
113         rl8168_setup_descriptors();
114         rl8168_configure();
115         rl8168_setup_interrupts();
116         packet_wrap = &rl8168_packet_wrap;
117         send_frame = &rl8168_send_frame;
118
119         eth_up = 1;
120         
121         //Trigger sw based nic interrupt
122 /*      cprintf("Generating interrupt...\n");
123         outb(rl8168_io_base_addr + 0x38, 0x1);
124         cprintf("sleeping\n");
125         udelay(3000000);
126         cprintf("done\n");
127 */
128         return;
129 }
130
131
132 int rl8168_scan_pci() {
133         
134         extern pci_dev_entry_t pci_dev_map[PCI_MAX_BUS][PCI_MAX_DEV][PCI_MAX_FUNC];
135         extern uint16_t pci_irq_map[PCI_MAX_BUS][PCI_MAX_DEV][PCI_MAX_FUNC];
136
137         cprintf("Searching for RealTek 8168 Network device...");
138
139         for (int i = 0; i < PCI_MAX_BUS; i++)
140                 for (int j = 0; j < PCI_MAX_DEV; j++)
141                         for (int k = 0; k < PCI_MAX_FUNC; k++) {
142                                 uint32_t address;
143                                 uint32_t bus = i;
144                                 uint32_t dev = j;
145                                 uint32_t func = k;
146                                 uint32_t reg = 0; 
147                                 uint32_t result  = 0;
148         
149                                 uint16_t dev_id = pci_dev_map[i][j][k].dev_id;
150                                 uint16_t ven_id = pci_dev_map[i][j][k].ven_id;
151
152                                 // Vender DNE
153                                 if (ven_id == INVALID_VENDOR_ID) 
154                                         continue;
155
156                                 // Ignore non RealTek 8168 Devices
157                                 if (ven_id != REALTEK_VENDOR_ID || dev_id != REALTEK_DEV_ID)
158                                         continue;
159                                 cprintf(" found on BUS %x DEV %x\n", i, j);
160
161                                 // Find the IRQ
162                                 rl8168_irq = pci_irq_map[i][j][k];
163                                 rl8168_debug("-->IRQ: %u\n", rl8168_irq);
164
165                                 // Loop over the BARs
166                                 for (int k = 0; k <= 5; k++) {
167                                         reg = 4 + k;
168                                         address = MK_CONFIG_ADDR(bus, dev, func, reg << 2);     
169                                 outl(PCI_CONFIG_ADDR, address);
170                                 result = inl(PCI_CONFIG_DATA);
171                                         
172                                         if (result == 0) // (0 denotes no valid data)
173                                                 continue;
174
175                                         // Read the bottom bit of the BAR. 
176                                         if (result & PCI_BAR_IO_MASK) {
177                                                 result = result & PCI_IO_MASK;
178                                                 rl8168_debug("-->BAR%u: %s --> %x\n", k, "IO", result);
179                                         } else {
180                                                 result = result & PCI_MEM_MASK;
181                                                 rl8168_debug("-->BAR%u: %s --> %x\n", k, "MEM", result);
182                                         }
183                         
184                                         // TODO Switch to memory mapped instead of IO?
185                                         if (k == 0) // BAR0 denotes the IO Addr for the device
186                                                 rl8168_io_base_addr = result;                                           
187                                 }
188                 
189                 rl8168_debug("-->hwrev: %x\n", inl(rl8168_io_base_addr + RL_HWREV_REG) & RL_HWREV_MASK);
190                 
191                 return 0;
192         }
193         cprintf(" not found. No device configured.\n");
194         
195         return -1;
196 }
197
198 void rl8168_read_mac() {
199         
200         for (int i = 0; i < 6; i++)
201            device_mac[i] = inb(rl8168_io_base_addr + RL_MAC_OFFSET + i); 
202         
203         rl8168_debug("-->DEVICE MAC: %02x:%02x:%02x:%02x:%02x:%02x\n", 0xFF & device_mac[0], 0xFF & device_mac[1],      
204                                                                     0xFF & device_mac[2], 0xFF & device_mac[3], 
205                                                                 0xFF & device_mac[4], 0xFF & device_mac[5]);
206         return;
207 }
208
209 void rl8168_setup_descriptors() {
210         
211         rl8168_debug("-->Setting up tx/rx descriptors.\n");
212                         
213         // Allocate room for the buffers. 
214         // Buffers need to be on 256 byte boundries.
215         // Note: We use get_cont_pages to force page alignment, and thus 256 byte aligned
216
217         uint32_t num_rx_pages = ROUNDUP(NUM_RX_DESCRIPTORS * sizeof(struct Descriptor), PGSIZE) / PGSIZE;
218         uint32_t num_tx_pages = ROUNDUP(NUM_TX_DESCRIPTORS * sizeof(struct Descriptor), PGSIZE) / PGSIZE;
219         
220         rx_des_kva = get_cont_pages(LOG2_UP(num_rx_pages), 0);
221         tx_des_kva = get_cont_pages(LOG2_UP(num_tx_pages), 0);
222
223         if (rx_des_kva == NULL) panic("Can't allocate page for RX Ring");
224         if (tx_des_kva == NULL) panic("Can't allocate page for TX Ring");
225         
226         rx_des_pa = PADDR(rx_des_kva);
227         tx_des_pa = PADDR(tx_des_kva);
228         
229     for (int i = 0; i < NUM_RX_DESCRIPTORS; i++) 
230                 rl8168_set_rx_descriptor(i, TRUE); // Allocate memory for the descriptor
231                 
232         for (int i = 0; i < NUM_TX_DESCRIPTORS; i++) 
233                 rl8168_set_tx_descriptor(i);
234                 
235         return;
236 }
237
238
239 void rl8168_set_rx_descriptor(uint32_t des_num, uint8_t reset_buffer) {
240         
241         // Set the OWN bit on all descriptors. Also set the buffer size.
242         rx_des_kva[des_num].command = (DES_OWN_MASK | (RL_RX_MAX_BUFFER_SIZE & DES_RX_SIZE_MASK));
243         
244         if (des_num == (NUM_RX_DESCRIPTORS - 1)) 
245                 rx_des_kva[des_num].command = rx_des_kva[des_num].command | DES_EOR_MASK;
246         
247         if (reset_buffer) {
248                 // Must be aligned on 8 byte boundries. Taken care of by kmalloc.
249                 char *rx_buffer = kmalloc(RL_RX_MAX_BUFFER_SIZE, 0);
250         
251                 if (rx_buffer == NULL) panic ("Can't allocate page for RX Buffer");
252
253                 rx_des_kva[des_num].low_buf = PADDR(rx_buffer);
254                 //.high_buf used if we do 64bit.
255         }
256         
257         return;
258 }
259
260 void rl8168_set_tx_descriptor(uint32_t des_num) {
261         
262         // Clear the command bits.
263         tx_des_kva[des_num].command = 0;
264         
265         // Set EOR bit on last descriptor
266         if (des_num == (NUM_TX_DESCRIPTORS - 1))
267                 tx_des_kva[des_num].command = DES_EOR_MASK;     
268                 
269         char *tx_buffer = kmalloc(RL_TX_MAX_BUFFER_SIZE, 0);
270
271         if (tx_buffer == NULL) panic ("Can't allocate page for TX Buffer");
272
273         tx_des_kva[des_num].low_buf = PADDR(tx_buffer);
274         //.high_buf used if we do 64bit.
275                 
276         return;
277 }
278
279 void rl8168_configure() {
280         
281         // TODO: Weigh resetting the nic. Not really needed. Remove?
282         // TODO Check ordering of what we set.
283         // TODO Remove C+ register setting?
284         
285         rl8168_debug("-->Configuring Device.\n");
286         rl8168_reset();
287
288         // Magic to handle the C+ register. Completely undocumented, ripped from the BSE RE driver.
289         outl(rl8168_io_base_addr + RL_CP_CTRL_REG, RL_CP_MAGIC_MASK);
290
291         // Unlock EPPROM CTRL REG
292         outb(rl8168_io_base_addr + RL_EP_CTRL_REG, RL_EP_CTRL_UL_MASK);         
293         
294         // Set max RX Packet Size
295     outw(rl8168_io_base_addr + RL_RX_MXPKT_REG, RL_RX_MAX_SIZE);        
296                 
297         // Set max TX Packet Size
298     outb(rl8168_io_base_addr + RL_TX_MXPKT_REG, RL_TX_MAX_SIZE);                        
299
300         // Set TX Des Ring Start Addr
301     outl(rl8168_io_base_addr + RL_TX_DES_REG, (unsigned long)tx_des_pa); 
302         
303         // Set RX Des Ring Start Addr
304     outl(rl8168_io_base_addr + RL_RX_DES_REG, (unsigned long)rx_des_pa);        
305
306         // Configure TX
307         outl(rl8168_io_base_addr + RL_TX_CFG_REG, RL_TX_CFG_MASK); 
308         
309         // Configure RX
310         outl(rl8168_io_base_addr + RL_TX_CFG_REG, RL_RX_CFG_MASK);                      
311
312         // Enable RX and TX in the CTRL Reg
313         outb(rl8168_io_base_addr + RL_CTRL_REG, RL_CTRL_RXTX_MASK);                     
314
315         // Lock the EPPROM Ctrl REG
316     outl(rl8168_io_base_addr + RL_EP_CTRL_REG, RL_EP_CTRL_L_MASK);              
317         
318         return;
319 }
320
321 void rl8168_reset() {
322         
323         rl8168_debug("-->Resetting device..... ");
324         outb(rl8168_io_base_addr + RL_CTRL_REG, RL_CTRL_RESET_MASK);
325         
326         // Wait for NIC to answer "done resetting" before continuing on
327         while (inb(rl8168_io_base_addr + RL_CTRL_REG) & RL_CTRL_RESET_MASK);
328         rl8168_debug(" done.\n");
329         
330         return;
331 }
332
333 void rl8168_setup_interrupts() {
334         
335         extern handler_t interrupt_handlers[];
336         
337         rl8168_debug("-->Setting interrupts.\n");
338         
339         // Enable NIC interrupts
340         outw(rl8168_io_base_addr + RL_IM_REG, RL_INTERRUPT_MASK);
341         
342         //Clear the current interrupts.
343         outw(rl8168_io_base_addr + RL_IS_REG, RL_INTRRUPT_CLEAR);
344         
345         // Kernel based interrupt stuff
346 #ifdef __IVY__
347         register_interrupt_handler(interrupt_handlers, KERNEL_IRQ_OFFSET + rl8168_irq, rl8168_interrupt_handler, (void *)0);
348 #else
349         register_interrupt_handler(interrupt_handlers, KERNEL_IRQ_OFFSET + rl8168_irq, rl8168_interrupt_handler, 0);
350 #endif
351         ioapic_route_irq(rl8168_irq, NE2K_IRQ_CPU);     
352         
353         return;
354 }
355
356 // We need to evaluate this routine in terms of concurrency.
357 // We also need to figure out whats up with different core interrupts
358 void rl8168_interrupt_handler(trapframe_t *tf, void* data) {
359
360         rl8168_interrupt_debug("\nNic interrupt on core %u!\n", lapic_get_id());
361                                 
362         // Read the offending interrupt(s)
363         uint16_t interrupt_status = inw(rl8168_io_base_addr + RL_IS_REG);
364
365         // Clear interrupts immediately so we can get the flag raised again.
366         outw(rl8168_io_base_addr + RL_IS_REG, interrupt_status);
367         
368         // Loop to deal with TOCTOU 
369         while (interrupt_status != 0x0000) {
370                 // We can have multiple interrupts fire at once. I've personally seen this.
371                 // This means we need to handle this as a series of independent if's
372                 if (interrupt_status & RL_INT_ROK) {
373                         rl8168_interrupt_debug("-->RX OK\n");
374                         rl8168_handle_rx_packet();
375                 }       
376         
377                 if (interrupt_status & RL_INT_RERR) {
378                         rl8168_interrupt_debug("-->RX ERR\n");                  
379                 }
380         
381                 if (interrupt_status & RL_INT_TOK) {
382                         rl8168_interrupt_debug("-->TX OK\n");
383                 }
384         
385                 if (interrupt_status & RL_INT_TERR) {
386                         rl8168_interrupt_debug("-->TX ERR\n");                  
387                 }
388         
389                 if (interrupt_status & RL_INT_RDU) {
390                         rl8168_interrupt_debug("-->RX Descriptor Unavailable\n");                       
391                 }
392         
393                 if (interrupt_status & RL_INT_LINKCHG) {
394                         rl8168_interrupt_debug("-->Link Status Changed\n");                     
395                 }
396         
397                 if (interrupt_status & RL_INT_FOVW) {
398                         rl8168_interrupt_debug("-->RX Fifo Overflow\n");                        
399                 }
400         
401                 if (interrupt_status & RL_INT_TDU) {
402                         rl8168_interrupt_debug("-->TX Descriptor Unavailable\n");                       
403                 }
404         
405                 if (interrupt_status & RL_INT_SWINT) {
406                         rl8168_interrupt_debug("-->Software Generated Interrupt\n");
407                 }
408         
409                 if (interrupt_status & RL_INT_TIMEOUT) {
410                         rl8168_interrupt_debug("-->Timer Expired\n");
411                 }
412         
413                 if (interrupt_status & RL_INT_SERR) {
414                         rl8168_interrupt_debug("-->PCI Bus System Error\n");                    
415                 }
416         
417                 rl8168_interrupt_debug("\n");
418                 
419                 // Clear interrupts     
420                 interrupt_status = inw(rl8168_io_base_addr + RL_IS_REG);
421                 outw(rl8168_io_base_addr + RL_IS_REG, interrupt_status);
422         }
423         
424         // In the event that we got really unlucky and more data arrived after we set 
425         //  set the bit last, try one more check
426         rl8168_handle_rx_packet();
427
428         return;
429 }
430
431 // TODO: Does a packet too large get dropped or just set the error bits in the descriptor? Find out.
432 // TODO: Should we move on to look for the next descriptor? is it safe? TOCTOU
433 void rl8168_handle_rx_packet() {
434         
435         uint32_t current_command = rx_des_kva[rx_des_cur].command;
436         uint16_t packet_size;
437         
438         if (current_command & DES_OWN_MASK) {
439                 rl8168_frame_debug("-->Nothing to process. Returning.");
440                 return;
441         }
442                 
443         rl8168_frame_debug("-->RX Des: %u\n", rx_des_cur);
444         
445         // Make sure we are processing from the start of a packet segment
446         if (!(current_command & DES_FS_MASK)) {
447                 rl8168_frame_debug("-->ERR: Current RX descriptor not marked with FS mask. Panic!");
448                 panic("RX Descriptor Ring FS out of sync");
449         }
450         
451         // NOTE: We are currently configured that the max packet size is large enough to fit inside 1 descriptor buffer,
452         // So we should never be in a situation where a packet spans multiple descriptors.
453         // When we change this, this should operate in a loop until the LS mask is found
454         // Loop would begin here.
455         
456         uint32_t rx_des_loop_cur = rx_des_cur;
457         uint32_t frame_size = 0;
458         uint32_t fragment_size = 0;
459         uint32_t num_frags = 0;
460         
461         char *rx_buffer = kmalloc(MAX_FRAME_SIZE, 0);
462         
463         if (rx_buffer == NULL) panic ("Can't allocate page for incoming packet.");
464         
465         do {
466                 current_command =  rx_des_kva[rx_des_loop_cur].command;
467                 fragment_size = rx_des_kva[rx_des_loop_cur].command & DES_RX_SIZE_MASK;
468                 
469                 // If we've looped through the entire ring and not found a terminating packet, bad nic state.
470                 // Panic or clear all descriptors? This is a nic hardware error. 
471                 if (num_frags && (rx_des_loop_cur == rx_des_cur)) {
472                         //for (int i = 0; i < NUM_RX_DESCRIPTORS; i++) 
473                         //      set_rx_descriptor(i, FALSE); // Dont reallocate memory for the descriptor
474                         // rx_des_cur = 0;
475                         // return;
476                         rl8168_frame_debug("-->ERR: No ending segment found in RX buffer.\n");
477                         panic("RX Descriptor Ring out of sync.");
478                 }
479                 
480                 num_frags++;
481                 
482                 
483                 // Make sure we own the current packet. Kernel ownership is denoted by a 0. Nic by a 1.
484                 if (current_command & DES_OWN_MASK) {
485                         rl8168_frame_debug("-->ERR: Current RX descriptor not owned by kernel. Panic!");
486                         panic("RX Descriptor Ring OWN out of sync");
487                 }
488                 
489                 // Make sure if we are at the end of the buffer, the des is marked as end
490                 if ((rx_des_loop_cur == (NUM_RX_DESCRIPTORS - 1)) && !(current_command & DES_EOR_MASK)) {
491                         rl8168_frame_debug("-->ERR: Last RX descriptor not marked with EOR mask. Panic!\n");
492                         panic("RX Descriptor Ring EOR Missing");
493                 }
494                 
495                 // We set a max frame size and the nic violated that. 
496                 // Panic or clear all desriptors?
497                 if ((frame_size + fragment_size) > MAX_FRAME_SIZE) {
498                         //for (int i = 0; i < NUM_RX_DESCRIPTORS; i++) 
499                         //      set_rx_descriptor(i, FALSE); // Dont reallocate memory for the descriptor
500                         // rx_des_cur = 0;
501                         // return;
502                         rl8168_frame_debug("-->ERR: Nic sent %u byte packet. Max is %u\n", frame_size, MAX_FRAME_SIZE);
503                         panic("NIC Sent packets larger than configured.");
504                 }
505                 
506                 // Move the fragment data into the buffer
507                 memcpy(rx_buffer + frame_size, KADDR(rx_des_kva[rx_des_loop_cur].low_buf), fragment_size);
508                 
509                 // Reset the descriptor. No reuse buffer.
510                 rl8168_set_rx_descriptor(rx_des_loop_cur, FALSE);
511                 
512                 // Note: We mask out fragment sizes at 0x3FFFF. There can be at most 1024 of them.
513                 // This can not overflow the uint32_t we allocated for frame size, so
514                 // we dont need to worry about mallocing too little then overflowing when we read.
515                 frame_size = frame_size + fragment_size;
516                 
517                 // Advance to the next descriptor
518                 rx_des_loop_cur = (rx_des_loop_cur + 1) % NUM_RX_DESCRIPTORS;
519                 
520         } while (!(current_command & DES_LS_MASK));
521         
522
523         spin_lock(&packet_buffer_lock);
524
525         if (packet_buffer_count >= PACKET_BUFFER_SIZE) {
526                 printk("WARNING: DROPPING PACKET!\n");
527                 spin_unlock(&packet_buffer_lock);
528                 kfree(rx_buffer);
529                 return;
530         }
531
532         packet_buffer[packet_buffer_tail] = rx_buffer;
533         packet_buffer_sizes[packet_buffer_tail] = frame_size;
534                 
535         packet_buffer_tail = (packet_buffer_tail + 1) % PACKET_BUFFER_SIZE;
536         packet_buffer_count = packet_buffer_count + 1;
537
538         spin_unlock(&packet_buffer_lock);
539                                 
540         rx_des_cur = rx_des_loop_cur;
541                                 
542         // Chew on the frame data. Command bits should be the same for all frags.
543         rl8168_process_frame(rx_buffer, frame_size, current_command);
544         
545         return;
546 }
547
548 // This is really more of a debug level function. Will probably go away once we get a stack going.
549 void rl8168_process_frame(char *frame_buffer, uint32_t frame_size, uint32_t command) {
550                 
551         rl8168_frame_debug("-->Command: %x\n", command);
552         rl8168_frame_debug("-->Size: %u\n", frame_size);
553         
554         if (frame_buffer == NULL)
555                 return;
556         
557         // This is hacky. Once we know what our stack will look like, change this.
558         // Once remove check for 0 size.
559         if (frame_size < MINIMUM_PACKET_SIZE) {
560                 rl8168_frame_debug("-->Packet too small. Discarding.\n");
561                 return;
562         }
563         
564         char dest_mac[6];
565         char source_mac[6];
566         char eth_type[2];
567         
568         for (int i = 0; i < 6; i++) {
569                 dest_mac[i] = frame_buffer[i];
570         }
571         
572         for (int i = 0; i < 6; i++) {
573                 source_mac[i] = frame_buffer[i+6];
574         }
575         
576         eth_type[0] = frame_buffer[12];
577         eth_type[1] = frame_buffer[13];
578         
579         if (command & DES_MAR_MASK) {
580                 rl8168_frame_debug("-->Multicast Packet.\n");
581         }
582         
583         if (command & DES_PAM_MASK) {
584                 rl8168_frame_debug("-->Physical Address Matched.\n");
585         }
586         
587         if (command & DES_BAR_MASK) {
588                 rl8168_frame_debug("-->Broadcast Packet.\n");
589         }
590         
591         // Note: DEST comes before SRC in the ethernet frame, but that 
592         
593         rl8168_frame_debug("-->DEST   MAC: %02x:%02x:%02x:%02x:%02x:%02x\n", 0xFF & dest_mac[0], 0xFF & dest_mac[1],    
594                                                                              0xFF & dest_mac[2], 0xFF & dest_mac[3],    
595                                                                              0xFF & dest_mac[4], 0xFF & dest_mac[5]);
596         
597         rl8168_frame_debug("-->SOURCE MAC: %02x:%02x:%02x:%02x:%02x:%02x\n", 0xFF & source_mac[0], 0xFF & source_mac[1],        
598                                                                              0xFF & source_mac[2], 0xFF & source_mac[3],        
599                                                                              0xFF & source_mac[4], 0xFF & source_mac[5]);
600
601         rl8168_frame_debug("-->ETHR MODE: %02x%02x\n", 0xFF & eth_type[0], 0xFF & eth_type[1]);
602                 
603         return;
604 }
605
606 // Main routine to send a frame. Just sends it and goes.
607 // Card supports sending across multiple fragments.
608 // Would we want to write a function that takes a larger packet and generates fragments?
609 // This seems like the stacks responsibility. Leave this for now. may in future
610 // Remove the max size cap and generate multiple packets.
611 int rl8168_send_frame(const char *data, size_t len) {
612
613         if (data == NULL)
614                 return -1;
615         if (len == 0)
616                 return 0;
617
618         if (tx_des_kva[tx_des_cur].command & DES_OWN_MASK) {
619                 rl8168_frame_debug("-->TX Ring Buffer Full!\n");
620                 return -1;
621         }
622         
623         if (len > MAX_FRAME_SIZE) {
624                 rl8168_frame_debug("-->Frame Too Large!\n");
625                 return -1;
626         }
627         
628         memcpy(KADDR(tx_des_kva[tx_des_cur].low_buf), data, len);
629
630         tx_des_kva[tx_des_cur].command = tx_des_kva[tx_des_cur].command | len | DES_OWN_MASK | DES_FS_MASK | DES_LS_MASK;
631
632         // For this revision of the NIC, the checksum bits get set in the vlan field not the command field.
633         // THIS IS A HACK: Need to reach inside the frame we are sending and detect if its of type ip/udp/tcp and set right flag
634         // For now, for the syscall hack, force ip checksum on. (we dont care about udp checksum).
635         // Add an argument to function to specify packet type?
636         //tx_des_kva[tx_des_cur].vlan = DES_TX_IP_CHK_MASK;
637         tx_des_kva[tx_des_cur].vlan = 0;
638
639
640         tx_des_cur = (tx_des_cur + 1) % NUM_TX_DESCRIPTORS;
641         
642         //rl8168_frame_debug("-->Sent packet.\n");
643         
644         outb(rl8168_io_base_addr + RL_TX_CTRL_REG, RL_TX_SEND_MASK);
645         
646         return len;
647 }
648
649 // This function is a complete hack for syscalls until we get a stack.
650 // the day I delete this monstrosity of code I will be a happy man --Paul
651 char *CT(PACKET_HEADER_SIZE + len) rl8168_packet_wrap(const char* data, size_t len) {
652         
653         #define htons(A) ((((uint16_t)(A) & 0xff00) >> 8) | \
654                             (((uint16_t)(A) & 0x00ff) << 8))
655         #define htonl(A) ((((uint32_t)(A) & 0xff000000) >> 24) | \
656                             (((uint32_t)(A) & 0x00ff0000) >> 8)  | \
657                             (((uint32_t)(A) & 0x0000ff00) << 8)  | \
658                             (((uint32_t)(A) & 0x000000ff) << 24))
659
660         #define ntohs  htons
661         #define ntohl  htohl
662
663         if ((len == 0) || (data == NULL))
664                 return NULL;
665
666         // Hard coded to paul's laptop's mac
667         //Format for Makelocal file: -DUSER_MAC_ADDRESS="{0x00, 0x23, 0x32, 0xd5, 0xae, 0x82}"
668         char dest_mac_address[6] = USER_MAC_ADDRESS;
669         
670         
671         uint32_t source_ip = 0xC0A8000A; // 192.168.0.10
672         uint32_t dest_ip   = 0xC0A8000B; // 192.168.0.11
673  
674         
675         if (len > MAX_PACKET_DATA) {
676                 rl8168_frame_debug("Bad packet size for packet wrapping");
677                 return NULL;
678         }
679         
680         struct eth_packet* wrap_buffer = kmalloc(MAX_PACKET_SIZE, 0);
681         
682         if (wrap_buffer == NULL) {
683                 rl8168_frame_debug("Can't allocate page for packet wrapping");
684                 return NULL;
685         }
686         
687
688         struct ETH_Header *eth_header = &wrap_buffer->eth_head.eth_head;
689         struct IP_Header *ip_header = &wrap_buffer->eth_head.ip_head;
690         struct UDP_Header *udp_header = &wrap_buffer->eth_head.udp_head;
691         
692         // Setup eth data
693         for (int i = 0; i < 6; i++) 
694                 eth_header->dest_mac[i] = dest_mac_address[i];
695                 
696         for (int i = 0; i < 6; i++) 
697                 eth_header->source_mac[i] = device_mac[i];
698                 
699         eth_header->eth_type = htons(0x0800);
700         
701         // Setup IP data
702         ip_header->ip_opts0 = htonl((4<<28) | (5 << 24) | (len + 28));
703         ip_header->ip_opts1 = 0;
704         ip_header->ip_opts2 = 0x00110a;
705         ip_header->source_ip = htonl(source_ip);
706         ip_header->dest_ip = htonl(dest_ip);
707         
708         // Setup UDP Data
709         udp_header->source_port = htons(44443);
710         udp_header->dest_port = htons(44444);
711         udp_header->length = htons(8 + len);
712         udp_header->checksum = 0;
713         
714         memcpy (&wrap_buffer->data[0], data, len);
715         
716         return (char *CT(PACKET_HEADER_SIZE + len))wrap_buffer; 
717 }