[PATCH] ibmveth lockless TX
[deliverable/linux.git] / drivers / net / ibmveth.c
1 /**************************************************************************/
2 /* */
3 /* IBM eServer i/pSeries Virtual Ethernet Device Driver */
4 /* Copyright (C) 2003 IBM Corp. */
5 /* Originally written by Dave Larson (larson1@us.ibm.com) */
6 /* Maintained by Santiago Leon (santil@us.ibm.com) */
7 /* */
8 /* This program is free software; you can redistribute it and/or modify */
9 /* it under the terms of the GNU General Public License as published by */
10 /* the Free Software Foundation; either version 2 of the License, or */
11 /* (at your option) any later version. */
12 /* */
13 /* This program is distributed in the hope that it will be useful, */
14 /* but WITHOUT ANY WARRANTY; without even the implied warranty of */
15 /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
16 /* GNU General Public License for more details. */
17 /* */
18 /* You should have received a copy of the GNU General Public License */
19 /* along with this program; if not, write to the Free Software */
20 /* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 */
21 /* USA */
22 /* */
23 /* This module contains the implementation of a virtual ethernet device */
24 /* for use with IBM i/pSeries LPAR Linux. It utilizes the logical LAN */
25 /* option of the RS/6000 Platform Architechture to interface with virtual */
26 /* ethernet NICs that are presented to the partition by the hypervisor. */
27 /* */
28 /**************************************************************************/
29 /*
30 TODO:
31 - remove frag processing code - no longer needed
32 - add support for sysfs
33 - possibly remove procfs support
34 */
35
36 #include <linux/config.h>
37 #include <linux/module.h>
38 #include <linux/version.h>
39 #include <linux/types.h>
40 #include <linux/errno.h>
41 #include <linux/ioport.h>
42 #include <linux/dma-mapping.h>
43 #include <linux/kernel.h>
44 #include <linux/netdevice.h>
45 #include <linux/etherdevice.h>
46 #include <linux/skbuff.h>
47 #include <linux/init.h>
48 #include <linux/delay.h>
49 #include <linux/mm.h>
50 #include <linux/ethtool.h>
51 #include <linux/proc_fs.h>
52 #include <asm/semaphore.h>
53 #include <asm/hvcall.h>
54 #include <asm/atomic.h>
55 #include <asm/iommu.h>
56 #include <asm/vio.h>
57 #include <asm/uaccess.h>
58 #include <linux/seq_file.h>
59
60 #include "ibmveth.h"
61
62 #define DEBUG 1
63
64 #define ibmveth_printk(fmt, args...) \
65 printk(KERN_INFO "%s: " fmt, __FILE__, ## args)
66
67 #define ibmveth_error_printk(fmt, args...) \
68 printk(KERN_ERR "(%s:%3.3d ua:%x) ERROR: " fmt, __FILE__, __LINE__ , adapter->vdev->unit_address, ## args)
69
70 #ifdef DEBUG
71 #define ibmveth_debug_printk_no_adapter(fmt, args...) \
72 printk(KERN_DEBUG "(%s:%3.3d): " fmt, __FILE__, __LINE__ , ## args)
73 #define ibmveth_debug_printk(fmt, args...) \
74 printk(KERN_DEBUG "(%s:%3.3d ua:%x): " fmt, __FILE__, __LINE__ , adapter->vdev->unit_address, ## args)
75 #define ibmveth_assert(expr) \
76 if(!(expr)) { \
77 printk(KERN_DEBUG "assertion failed (%s:%3.3d ua:%x): %s\n", __FILE__, __LINE__, adapter->vdev->unit_address, #expr); \
78 BUG(); \
79 }
80 #else
81 #define ibmveth_debug_printk_no_adapter(fmt, args...)
82 #define ibmveth_debug_printk(fmt, args...)
83 #define ibmveth_assert(expr)
84 #endif
85
86 static int ibmveth_open(struct net_device *dev);
87 static int ibmveth_close(struct net_device *dev);
88 static int ibmveth_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd);
89 static int ibmveth_poll(struct net_device *dev, int *budget);
90 static int ibmveth_start_xmit(struct sk_buff *skb, struct net_device *dev);
91 static struct net_device_stats *ibmveth_get_stats(struct net_device *dev);
92 static void ibmveth_set_multicast_list(struct net_device *dev);
93 static int ibmveth_change_mtu(struct net_device *dev, int new_mtu);
94 static void ibmveth_proc_register_driver(void);
95 static void ibmveth_proc_unregister_driver(void);
96 static void ibmveth_proc_register_adapter(struct ibmveth_adapter *adapter);
97 static void ibmveth_proc_unregister_adapter(struct ibmveth_adapter *adapter);
98 static irqreturn_t ibmveth_interrupt(int irq, void *dev_instance, struct pt_regs *regs);
99 static inline void ibmveth_rxq_harvest_buffer(struct ibmveth_adapter *adapter);
100
101 #ifdef CONFIG_PROC_FS
102 #define IBMVETH_PROC_DIR "net/ibmveth"
103 static struct proc_dir_entry *ibmveth_proc_dir;
104 #endif
105
106 static const char ibmveth_driver_name[] = "ibmveth";
107 static const char ibmveth_driver_string[] = "IBM i/pSeries Virtual Ethernet Driver";
108 #define ibmveth_driver_version "1.03"
109
110 MODULE_AUTHOR("Santiago Leon <santil@us.ibm.com>");
111 MODULE_DESCRIPTION("IBM i/pSeries Virtual Ethernet Driver");
112 MODULE_LICENSE("GPL");
113 MODULE_VERSION(ibmveth_driver_version);
114
115 /* simple methods of getting data from the current rxq entry */
116 static inline int ibmveth_rxq_pending_buffer(struct ibmveth_adapter *adapter)
117 {
118 return (adapter->rx_queue.queue_addr[adapter->rx_queue.index].toggle == adapter->rx_queue.toggle);
119 }
120
121 static inline int ibmveth_rxq_buffer_valid(struct ibmveth_adapter *adapter)
122 {
123 return (adapter->rx_queue.queue_addr[adapter->rx_queue.index].valid);
124 }
125
126 static inline int ibmveth_rxq_frame_offset(struct ibmveth_adapter *adapter)
127 {
128 return (adapter->rx_queue.queue_addr[adapter->rx_queue.index].offset);
129 }
130
131 static inline int ibmveth_rxq_frame_length(struct ibmveth_adapter *adapter)
132 {
133 return (adapter->rx_queue.queue_addr[adapter->rx_queue.index].length);
134 }
135
136 /* setup the initial settings for a buffer pool */
137 static void ibmveth_init_buffer_pool(struct ibmveth_buff_pool *pool, u32 pool_index, u32 pool_size, u32 buff_size)
138 {
139 pool->size = pool_size;
140 pool->index = pool_index;
141 pool->buff_size = buff_size;
142 pool->threshold = pool_size / 2;
143 }
144
145 /* allocate and setup an buffer pool - called during open */
146 static int ibmveth_alloc_buffer_pool(struct ibmveth_buff_pool *pool)
147 {
148 int i;
149
150 pool->free_map = kmalloc(sizeof(u16) * pool->size, GFP_KERNEL);
151
152 if(!pool->free_map) {
153 return -1;
154 }
155
156 pool->dma_addr = kmalloc(sizeof(dma_addr_t) * pool->size, GFP_KERNEL);
157 if(!pool->dma_addr) {
158 kfree(pool->free_map);
159 pool->free_map = NULL;
160 return -1;
161 }
162
163 pool->skbuff = kmalloc(sizeof(void*) * pool->size, GFP_KERNEL);
164
165 if(!pool->skbuff) {
166 kfree(pool->dma_addr);
167 pool->dma_addr = NULL;
168
169 kfree(pool->free_map);
170 pool->free_map = NULL;
171 return -1;
172 }
173
174 memset(pool->skbuff, 0, sizeof(void*) * pool->size);
175 memset(pool->dma_addr, 0, sizeof(dma_addr_t) * pool->size);
176
177 for(i = 0; i < pool->size; ++i) {
178 pool->free_map[i] = i;
179 }
180
181 atomic_set(&pool->available, 0);
182 pool->producer_index = 0;
183 pool->consumer_index = 0;
184 pool->active = 0;
185
186 return 0;
187 }
188
189 /* replenish the buffers for a pool. note that we don't need to
190 * skb_reserve these since they are used for incoming...
191 */
192 static void ibmveth_replenish_buffer_pool(struct ibmveth_adapter *adapter, struct ibmveth_buff_pool *pool)
193 {
194 u32 i;
195 u32 count = pool->size - atomic_read(&pool->available);
196 u32 buffers_added = 0;
197
198 mb();
199
200 for(i = 0; i < count; ++i) {
201 struct sk_buff *skb;
202 unsigned int free_index, index;
203 u64 correlator;
204 union ibmveth_buf_desc desc;
205 unsigned long lpar_rc;
206 dma_addr_t dma_addr;
207
208 skb = alloc_skb(pool->buff_size, GFP_ATOMIC);
209
210 if(!skb) {
211 ibmveth_debug_printk("replenish: unable to allocate skb\n");
212 adapter->replenish_no_mem++;
213 break;
214 }
215
216 free_index = pool->consumer_index++ % pool->size;
217 index = pool->free_map[free_index];
218
219 ibmveth_assert(index != IBM_VETH_INVALID_MAP);
220 ibmveth_assert(pool->skbuff[index] == NULL);
221
222 dma_addr = dma_map_single(&adapter->vdev->dev, skb->data,
223 pool->buff_size, DMA_FROM_DEVICE);
224
225 pool->free_map[free_index] = IBM_VETH_INVALID_MAP;
226 pool->dma_addr[index] = dma_addr;
227 pool->skbuff[index] = skb;
228
229 correlator = ((u64)pool->index << 32) | index;
230 *(u64*)skb->data = correlator;
231
232 desc.desc = 0;
233 desc.fields.valid = 1;
234 desc.fields.length = pool->buff_size;
235 desc.fields.address = dma_addr;
236
237 lpar_rc = h_add_logical_lan_buffer(adapter->vdev->unit_address, desc.desc);
238
239 if(lpar_rc != H_Success) {
240 pool->free_map[free_index] = IBM_VETH_INVALID_MAP;
241 pool->skbuff[index] = NULL;
242 pool->consumer_index--;
243 dma_unmap_single(&adapter->vdev->dev,
244 pool->dma_addr[index], pool->buff_size,
245 DMA_FROM_DEVICE);
246 dev_kfree_skb_any(skb);
247 adapter->replenish_add_buff_failure++;
248 break;
249 } else {
250 buffers_added++;
251 adapter->replenish_add_buff_success++;
252 }
253 }
254
255 mb();
256 atomic_add(buffers_added, &(pool->available));
257 }
258
259 /* replenish routine */
260 static void ibmveth_replenish_task(struct ibmveth_adapter *adapter)
261 {
262 int i;
263
264 adapter->replenish_task_cycles++;
265
266 for(i = 0; i < IbmVethNumBufferPools; i++)
267 if(adapter->rx_buff_pool[i].active)
268 ibmveth_replenish_buffer_pool(adapter,
269 &adapter->rx_buff_pool[i]);
270
271 adapter->rx_no_buffer = *(u64*)(((char*)adapter->buffer_list_addr) + 4096 - 8);
272 }
273
274 /* empty and free ana buffer pool - also used to do cleanup in error paths */
275 static void ibmveth_free_buffer_pool(struct ibmveth_adapter *adapter, struct ibmveth_buff_pool *pool)
276 {
277 int i;
278
279 if(pool->free_map) {
280 kfree(pool->free_map);
281 pool->free_map = NULL;
282 }
283
284 if(pool->skbuff && pool->dma_addr) {
285 for(i = 0; i < pool->size; ++i) {
286 struct sk_buff *skb = pool->skbuff[i];
287 if(skb) {
288 dma_unmap_single(&adapter->vdev->dev,
289 pool->dma_addr[i],
290 pool->buff_size,
291 DMA_FROM_DEVICE);
292 dev_kfree_skb_any(skb);
293 pool->skbuff[i] = NULL;
294 }
295 }
296 }
297
298 if(pool->dma_addr) {
299 kfree(pool->dma_addr);
300 pool->dma_addr = NULL;
301 }
302
303 if(pool->skbuff) {
304 kfree(pool->skbuff);
305 pool->skbuff = NULL;
306 }
307 pool->active = 0;
308 }
309
310 /* remove a buffer from a pool */
311 static void ibmveth_remove_buffer_from_pool(struct ibmveth_adapter *adapter, u64 correlator)
312 {
313 unsigned int pool = correlator >> 32;
314 unsigned int index = correlator & 0xffffffffUL;
315 unsigned int free_index;
316 struct sk_buff *skb;
317
318 ibmveth_assert(pool < IbmVethNumBufferPools);
319 ibmveth_assert(index < adapter->rx_buff_pool[pool].size);
320
321 skb = adapter->rx_buff_pool[pool].skbuff[index];
322
323 ibmveth_assert(skb != NULL);
324
325 adapter->rx_buff_pool[pool].skbuff[index] = NULL;
326
327 dma_unmap_single(&adapter->vdev->dev,
328 adapter->rx_buff_pool[pool].dma_addr[index],
329 adapter->rx_buff_pool[pool].buff_size,
330 DMA_FROM_DEVICE);
331
332 free_index = adapter->rx_buff_pool[pool].producer_index++ % adapter->rx_buff_pool[pool].size;
333 adapter->rx_buff_pool[pool].free_map[free_index] = index;
334
335 mb();
336
337 atomic_dec(&(adapter->rx_buff_pool[pool].available));
338 }
339
340 /* get the current buffer on the rx queue */
341 static inline struct sk_buff *ibmveth_rxq_get_buffer(struct ibmveth_adapter *adapter)
342 {
343 u64 correlator = adapter->rx_queue.queue_addr[adapter->rx_queue.index].correlator;
344 unsigned int pool = correlator >> 32;
345 unsigned int index = correlator & 0xffffffffUL;
346
347 ibmveth_assert(pool < IbmVethNumBufferPools);
348 ibmveth_assert(index < adapter->rx_buff_pool[pool].size);
349
350 return adapter->rx_buff_pool[pool].skbuff[index];
351 }
352
353 /* recycle the current buffer on the rx queue */
354 static void ibmveth_rxq_recycle_buffer(struct ibmveth_adapter *adapter)
355 {
356 u32 q_index = adapter->rx_queue.index;
357 u64 correlator = adapter->rx_queue.queue_addr[q_index].correlator;
358 unsigned int pool = correlator >> 32;
359 unsigned int index = correlator & 0xffffffffUL;
360 union ibmveth_buf_desc desc;
361 unsigned long lpar_rc;
362
363 ibmveth_assert(pool < IbmVethNumBufferPools);
364 ibmveth_assert(index < adapter->rx_buff_pool[pool].size);
365
366 if(!adapter->rx_buff_pool[pool].active) {
367 ibmveth_rxq_harvest_buffer(adapter);
368 ibmveth_free_buffer_pool(adapter, &adapter->rx_buff_pool[pool]);
369 return;
370 }
371
372 desc.desc = 0;
373 desc.fields.valid = 1;
374 desc.fields.length = adapter->rx_buff_pool[pool].buff_size;
375 desc.fields.address = adapter->rx_buff_pool[pool].dma_addr[index];
376
377 lpar_rc = h_add_logical_lan_buffer(adapter->vdev->unit_address, desc.desc);
378
379 if(lpar_rc != H_Success) {
380 ibmveth_debug_printk("h_add_logical_lan_buffer failed during recycle rc=%ld", lpar_rc);
381 ibmveth_remove_buffer_from_pool(adapter, adapter->rx_queue.queue_addr[adapter->rx_queue.index].correlator);
382 }
383
384 if(++adapter->rx_queue.index == adapter->rx_queue.num_slots) {
385 adapter->rx_queue.index = 0;
386 adapter->rx_queue.toggle = !adapter->rx_queue.toggle;
387 }
388 }
389
390 static inline void ibmveth_rxq_harvest_buffer(struct ibmveth_adapter *adapter)
391 {
392 ibmveth_remove_buffer_from_pool(adapter, adapter->rx_queue.queue_addr[adapter->rx_queue.index].correlator);
393
394 if(++adapter->rx_queue.index == adapter->rx_queue.num_slots) {
395 adapter->rx_queue.index = 0;
396 adapter->rx_queue.toggle = !adapter->rx_queue.toggle;
397 }
398 }
399
400 static void ibmveth_cleanup(struct ibmveth_adapter *adapter)
401 {
402 int i;
403
404 if(adapter->buffer_list_addr != NULL) {
405 if(!dma_mapping_error(adapter->buffer_list_dma)) {
406 dma_unmap_single(&adapter->vdev->dev,
407 adapter->buffer_list_dma, 4096,
408 DMA_BIDIRECTIONAL);
409 adapter->buffer_list_dma = DMA_ERROR_CODE;
410 }
411 free_page((unsigned long)adapter->buffer_list_addr);
412 adapter->buffer_list_addr = NULL;
413 }
414
415 if(adapter->filter_list_addr != NULL) {
416 if(!dma_mapping_error(adapter->filter_list_dma)) {
417 dma_unmap_single(&adapter->vdev->dev,
418 adapter->filter_list_dma, 4096,
419 DMA_BIDIRECTIONAL);
420 adapter->filter_list_dma = DMA_ERROR_CODE;
421 }
422 free_page((unsigned long)adapter->filter_list_addr);
423 adapter->filter_list_addr = NULL;
424 }
425
426 if(adapter->rx_queue.queue_addr != NULL) {
427 if(!dma_mapping_error(adapter->rx_queue.queue_dma)) {
428 dma_unmap_single(&adapter->vdev->dev,
429 adapter->rx_queue.queue_dma,
430 adapter->rx_queue.queue_len,
431 DMA_BIDIRECTIONAL);
432 adapter->rx_queue.queue_dma = DMA_ERROR_CODE;
433 }
434 kfree(adapter->rx_queue.queue_addr);
435 adapter->rx_queue.queue_addr = NULL;
436 }
437
438 for(i = 0; i<IbmVethNumBufferPools; i++)
439 ibmveth_free_buffer_pool(adapter, &adapter->rx_buff_pool[i]);
440 }
441
442 static int ibmveth_open(struct net_device *netdev)
443 {
444 struct ibmveth_adapter *adapter = netdev->priv;
445 u64 mac_address = 0;
446 int rxq_entries = 1;
447 unsigned long lpar_rc;
448 int rc;
449 union ibmveth_buf_desc rxq_desc;
450 int i;
451
452 ibmveth_debug_printk("open starting\n");
453
454 for(i = 0; i<IbmVethNumBufferPools; i++)
455 rxq_entries += adapter->rx_buff_pool[i].size;
456
457 adapter->buffer_list_addr = (void*) get_zeroed_page(GFP_KERNEL);
458 adapter->filter_list_addr = (void*) get_zeroed_page(GFP_KERNEL);
459
460 if(!adapter->buffer_list_addr || !adapter->filter_list_addr) {
461 ibmveth_error_printk("unable to allocate filter or buffer list pages\n");
462 ibmveth_cleanup(adapter);
463 return -ENOMEM;
464 }
465
466 adapter->rx_queue.queue_len = sizeof(struct ibmveth_rx_q_entry) * rxq_entries;
467 adapter->rx_queue.queue_addr = kmalloc(adapter->rx_queue.queue_len, GFP_KERNEL);
468
469 if(!adapter->rx_queue.queue_addr) {
470 ibmveth_error_printk("unable to allocate rx queue pages\n");
471 ibmveth_cleanup(adapter);
472 return -ENOMEM;
473 }
474
475 adapter->buffer_list_dma = dma_map_single(&adapter->vdev->dev,
476 adapter->buffer_list_addr, 4096, DMA_BIDIRECTIONAL);
477 adapter->filter_list_dma = dma_map_single(&adapter->vdev->dev,
478 adapter->filter_list_addr, 4096, DMA_BIDIRECTIONAL);
479 adapter->rx_queue.queue_dma = dma_map_single(&adapter->vdev->dev,
480 adapter->rx_queue.queue_addr,
481 adapter->rx_queue.queue_len, DMA_BIDIRECTIONAL);
482
483 if((dma_mapping_error(adapter->buffer_list_dma) ) ||
484 (dma_mapping_error(adapter->filter_list_dma)) ||
485 (dma_mapping_error(adapter->rx_queue.queue_dma))) {
486 ibmveth_error_printk("unable to map filter or buffer list pages\n");
487 ibmveth_cleanup(adapter);
488 return -ENOMEM;
489 }
490
491 adapter->rx_queue.index = 0;
492 adapter->rx_queue.num_slots = rxq_entries;
493 adapter->rx_queue.toggle = 1;
494
495 /* call change_mtu to init the buffer pools based in initial mtu */
496 ibmveth_change_mtu(netdev, netdev->mtu);
497
498 memcpy(&mac_address, netdev->dev_addr, netdev->addr_len);
499 mac_address = mac_address >> 16;
500
501 rxq_desc.desc = 0;
502 rxq_desc.fields.valid = 1;
503 rxq_desc.fields.length = adapter->rx_queue.queue_len;
504 rxq_desc.fields.address = adapter->rx_queue.queue_dma;
505
506 ibmveth_debug_printk("buffer list @ 0x%p\n", adapter->buffer_list_addr);
507 ibmveth_debug_printk("filter list @ 0x%p\n", adapter->filter_list_addr);
508 ibmveth_debug_printk("receive q @ 0x%p\n", adapter->rx_queue.queue_addr);
509
510
511 lpar_rc = h_register_logical_lan(adapter->vdev->unit_address,
512 adapter->buffer_list_dma,
513 rxq_desc.desc,
514 adapter->filter_list_dma,
515 mac_address);
516
517 if(lpar_rc != H_Success) {
518 ibmveth_error_printk("h_register_logical_lan failed with %ld\n", lpar_rc);
519 ibmveth_error_printk("buffer TCE:0x%x filter TCE:0x%x rxq desc:0x%lx MAC:0x%lx\n",
520 adapter->buffer_list_dma,
521 adapter->filter_list_dma,
522 rxq_desc.desc,
523 mac_address);
524 ibmveth_cleanup(adapter);
525 return -ENONET;
526 }
527
528 ibmveth_debug_printk("registering irq 0x%x\n", netdev->irq);
529 if((rc = request_irq(netdev->irq, &ibmveth_interrupt, 0, netdev->name, netdev)) != 0) {
530 ibmveth_error_printk("unable to request irq 0x%x, rc %d\n", netdev->irq, rc);
531 do {
532 rc = h_free_logical_lan(adapter->vdev->unit_address);
533 } while (H_isLongBusy(rc) || (rc == H_Busy));
534
535 ibmveth_cleanup(adapter);
536 return rc;
537 }
538
539 ibmveth_debug_printk("initial replenish cycle\n");
540 ibmveth_replenish_task(adapter);
541
542 netif_start_queue(netdev);
543
544 ibmveth_debug_printk("open complete\n");
545
546 return 0;
547 }
548
549 static int ibmveth_close(struct net_device *netdev)
550 {
551 struct ibmveth_adapter *adapter = netdev->priv;
552 long lpar_rc;
553
554 ibmveth_debug_printk("close starting\n");
555
556 netif_stop_queue(netdev);
557
558 free_irq(netdev->irq, netdev);
559
560 do {
561 lpar_rc = h_free_logical_lan(adapter->vdev->unit_address);
562 } while (H_isLongBusy(lpar_rc) || (lpar_rc == H_Busy));
563
564 if(lpar_rc != H_Success)
565 {
566 ibmveth_error_printk("h_free_logical_lan failed with %lx, continuing with close\n",
567 lpar_rc);
568 }
569
570 adapter->rx_no_buffer = *(u64*)(((char*)adapter->buffer_list_addr) + 4096 - 8);
571
572 ibmveth_cleanup(adapter);
573
574 ibmveth_debug_printk("close complete\n");
575
576 return 0;
577 }
578
579 static int netdev_get_settings(struct net_device *dev, struct ethtool_cmd *cmd) {
580 cmd->supported = (SUPPORTED_1000baseT_Full | SUPPORTED_Autoneg | SUPPORTED_FIBRE);
581 cmd->advertising = (ADVERTISED_1000baseT_Full | ADVERTISED_Autoneg | ADVERTISED_FIBRE);
582 cmd->speed = SPEED_1000;
583 cmd->duplex = DUPLEX_FULL;
584 cmd->port = PORT_FIBRE;
585 cmd->phy_address = 0;
586 cmd->transceiver = XCVR_INTERNAL;
587 cmd->autoneg = AUTONEG_ENABLE;
588 cmd->maxtxpkt = 0;
589 cmd->maxrxpkt = 1;
590 return 0;
591 }
592
593 static void netdev_get_drvinfo (struct net_device *dev, struct ethtool_drvinfo *info) {
594 strncpy(info->driver, ibmveth_driver_name, sizeof(info->driver) - 1);
595 strncpy(info->version, ibmveth_driver_version, sizeof(info->version) - 1);
596 }
597
598 static u32 netdev_get_link(struct net_device *dev) {
599 return 1;
600 }
601
602 static struct ethtool_ops netdev_ethtool_ops = {
603 .get_drvinfo = netdev_get_drvinfo,
604 .get_settings = netdev_get_settings,
605 .get_link = netdev_get_link,
606 .get_sg = ethtool_op_get_sg,
607 .get_tx_csum = ethtool_op_get_tx_csum,
608 };
609
610 static int ibmveth_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
611 {
612 return -EOPNOTSUPP;
613 }
614
615 #define page_offset(v) ((unsigned long)(v) & ((1 << 12) - 1))
616
617 static int ibmveth_start_xmit(struct sk_buff *skb, struct net_device *netdev)
618 {
619 struct ibmveth_adapter *adapter = netdev->priv;
620 union ibmveth_buf_desc desc[IbmVethMaxSendFrags];
621 unsigned long lpar_rc;
622 int nfrags = 0, curfrag;
623 unsigned long correlator;
624 unsigned long flags;
625 unsigned int retry_count;
626 unsigned int tx_dropped = 0;
627 unsigned int tx_bytes = 0;
628 unsigned int tx_packets = 0;
629 unsigned int tx_send_failed = 0;
630 unsigned int tx_map_failed = 0;
631
632
633 if ((skb_shinfo(skb)->nr_frags + 1) > IbmVethMaxSendFrags) {
634 tx_dropped++;
635 goto out;
636 }
637
638 memset(&desc, 0, sizeof(desc));
639
640 /* nfrags = number of frags after the initial fragment */
641 nfrags = skb_shinfo(skb)->nr_frags;
642
643 if(nfrags)
644 adapter->tx_multidesc_send++;
645
646 /* map the initial fragment */
647 desc[0].fields.length = nfrags ? skb->len - skb->data_len : skb->len;
648 desc[0].fields.address = dma_map_single(&adapter->vdev->dev, skb->data,
649 desc[0].fields.length, DMA_TO_DEVICE);
650 desc[0].fields.valid = 1;
651
652 if(dma_mapping_error(desc[0].fields.address)) {
653 ibmveth_error_printk("tx: unable to map initial fragment\n");
654 tx_map_failed++;
655 tx_dropped++;
656 goto out;
657 }
658
659 curfrag = nfrags;
660
661 /* map fragments past the initial portion if there are any */
662 while(curfrag--) {
663 skb_frag_t *frag = &skb_shinfo(skb)->frags[curfrag];
664 desc[curfrag+1].fields.address
665 = dma_map_single(&adapter->vdev->dev,
666 page_address(frag->page) + frag->page_offset,
667 frag->size, DMA_TO_DEVICE);
668 desc[curfrag+1].fields.length = frag->size;
669 desc[curfrag+1].fields.valid = 1;
670
671 if(dma_mapping_error(desc[curfrag+1].fields.address)) {
672 ibmveth_error_printk("tx: unable to map fragment %d\n", curfrag);
673 tx_map_failed++;
674 tx_dropped++;
675 /* Free all the mappings we just created */
676 while(curfrag < nfrags) {
677 dma_unmap_single(&adapter->vdev->dev,
678 desc[curfrag+1].fields.address,
679 desc[curfrag+1].fields.length,
680 DMA_TO_DEVICE);
681 curfrag++;
682 }
683 goto out;
684 }
685 }
686
687 /* send the frame. Arbitrarily set retrycount to 1024 */
688 correlator = 0;
689 retry_count = 1024;
690 do {
691 lpar_rc = h_send_logical_lan(adapter->vdev->unit_address,
692 desc[0].desc,
693 desc[1].desc,
694 desc[2].desc,
695 desc[3].desc,
696 desc[4].desc,
697 desc[5].desc,
698 correlator);
699 } while ((lpar_rc == H_Busy) && (retry_count--));
700
701 if(lpar_rc != H_Success && lpar_rc != H_Dropped) {
702 int i;
703 ibmveth_error_printk("tx: h_send_logical_lan failed with rc=%ld\n", lpar_rc);
704 for(i = 0; i < 6; i++) {
705 ibmveth_error_printk("tx: desc[%i] valid=%d, len=%d, address=0x%d\n", i,
706 desc[i].fields.valid, desc[i].fields.length, desc[i].fields.address);
707 }
708 tx_send_failed++;
709 tx_dropped++;
710 } else {
711 tx_packets++;
712 tx_bytes += skb->len;
713 netdev->trans_start = jiffies;
714 }
715
716 do {
717 dma_unmap_single(&adapter->vdev->dev,
718 desc[nfrags].fields.address,
719 desc[nfrags].fields.length, DMA_TO_DEVICE);
720 } while(--nfrags >= 0);
721
722 out: spin_lock_irqsave(&adapter->stats_lock, flags);
723 adapter->stats.tx_dropped += tx_dropped;
724 adapter->stats.tx_bytes += tx_bytes;
725 adapter->stats.tx_packets += tx_packets;
726 adapter->tx_send_failed += tx_send_failed;
727 adapter->tx_map_failed += tx_map_failed;
728 spin_unlock_irqrestore(&adapter->stats_lock, flags);
729
730 dev_kfree_skb(skb);
731 return 0;
732 }
733
734 static int ibmveth_poll(struct net_device *netdev, int *budget)
735 {
736 struct ibmveth_adapter *adapter = netdev->priv;
737 int max_frames_to_process = netdev->quota;
738 int frames_processed = 0;
739 int more_work = 1;
740 unsigned long lpar_rc;
741
742 restart_poll:
743 do {
744 struct net_device *netdev = adapter->netdev;
745
746 if(ibmveth_rxq_pending_buffer(adapter)) {
747 struct sk_buff *skb;
748
749 rmb();
750
751 if(!ibmveth_rxq_buffer_valid(adapter)) {
752 wmb(); /* suggested by larson1 */
753 adapter->rx_invalid_buffer++;
754 ibmveth_debug_printk("recycling invalid buffer\n");
755 ibmveth_rxq_recycle_buffer(adapter);
756 } else {
757 int length = ibmveth_rxq_frame_length(adapter);
758 int offset = ibmveth_rxq_frame_offset(adapter);
759 skb = ibmveth_rxq_get_buffer(adapter);
760
761 ibmveth_rxq_harvest_buffer(adapter);
762
763 skb_reserve(skb, offset);
764 skb_put(skb, length);
765 skb->dev = netdev;
766 skb->protocol = eth_type_trans(skb, netdev);
767
768 netif_receive_skb(skb); /* send it up */
769
770 adapter->stats.rx_packets++;
771 adapter->stats.rx_bytes += length;
772 frames_processed++;
773 netdev->last_rx = jiffies;
774 }
775 } else {
776 more_work = 0;
777 }
778 } while(more_work && (frames_processed < max_frames_to_process));
779
780 ibmveth_replenish_task(adapter);
781
782 if(more_work) {
783 /* more work to do - return that we are not done yet */
784 netdev->quota -= frames_processed;
785 *budget -= frames_processed;
786 return 1;
787 }
788
789 /* we think we are done - reenable interrupts, then check once more to make sure we are done */
790 lpar_rc = h_vio_signal(adapter->vdev->unit_address, VIO_IRQ_ENABLE);
791
792 ibmveth_assert(lpar_rc == H_Success);
793
794 netif_rx_complete(netdev);
795
796 if(ibmveth_rxq_pending_buffer(adapter) && netif_rx_reschedule(netdev, frames_processed))
797 {
798 lpar_rc = h_vio_signal(adapter->vdev->unit_address, VIO_IRQ_DISABLE);
799 ibmveth_assert(lpar_rc == H_Success);
800 more_work = 1;
801 goto restart_poll;
802 }
803
804 netdev->quota -= frames_processed;
805 *budget -= frames_processed;
806
807 /* we really are done */
808 return 0;
809 }
810
811 static irqreturn_t ibmveth_interrupt(int irq, void *dev_instance, struct pt_regs *regs)
812 {
813 struct net_device *netdev = dev_instance;
814 struct ibmveth_adapter *adapter = netdev->priv;
815 unsigned long lpar_rc;
816
817 if(netif_rx_schedule_prep(netdev)) {
818 lpar_rc = h_vio_signal(adapter->vdev->unit_address, VIO_IRQ_DISABLE);
819 ibmveth_assert(lpar_rc == H_Success);
820 __netif_rx_schedule(netdev);
821 }
822 return IRQ_HANDLED;
823 }
824
825 static struct net_device_stats *ibmveth_get_stats(struct net_device *dev)
826 {
827 struct ibmveth_adapter *adapter = dev->priv;
828 return &adapter->stats;
829 }
830
831 static void ibmveth_set_multicast_list(struct net_device *netdev)
832 {
833 struct ibmveth_adapter *adapter = netdev->priv;
834 unsigned long lpar_rc;
835
836 if((netdev->flags & IFF_PROMISC) || (netdev->mc_count > adapter->mcastFilterSize)) {
837 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
838 IbmVethMcastEnableRecv |
839 IbmVethMcastDisableFiltering,
840 0);
841 if(lpar_rc != H_Success) {
842 ibmveth_error_printk("h_multicast_ctrl rc=%ld when entering promisc mode\n", lpar_rc);
843 }
844 } else {
845 struct dev_mc_list *mclist = netdev->mc_list;
846 int i;
847 /* clear the filter table & disable filtering */
848 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
849 IbmVethMcastEnableRecv |
850 IbmVethMcastDisableFiltering |
851 IbmVethMcastClearFilterTable,
852 0);
853 if(lpar_rc != H_Success) {
854 ibmveth_error_printk("h_multicast_ctrl rc=%ld when attempting to clear filter table\n", lpar_rc);
855 }
856 /* add the addresses to the filter table */
857 for(i = 0; i < netdev->mc_count; ++i, mclist = mclist->next) {
858 // add the multicast address to the filter table
859 unsigned long mcast_addr = 0;
860 memcpy(((char *)&mcast_addr)+2, mclist->dmi_addr, 6);
861 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
862 IbmVethMcastAddFilter,
863 mcast_addr);
864 if(lpar_rc != H_Success) {
865 ibmveth_error_printk("h_multicast_ctrl rc=%ld when adding an entry to the filter table\n", lpar_rc);
866 }
867 }
868
869 /* re-enable filtering */
870 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
871 IbmVethMcastEnableFiltering,
872 0);
873 if(lpar_rc != H_Success) {
874 ibmveth_error_printk("h_multicast_ctrl rc=%ld when enabling filtering\n", lpar_rc);
875 }
876 }
877 }
878
879 static int ibmveth_change_mtu(struct net_device *dev, int new_mtu)
880 {
881 struct ibmveth_adapter *adapter = dev->priv;
882 int i;
883 int prev_smaller = 1;
884
885 if ((new_mtu < 68) ||
886 (new_mtu > (pool_size[IbmVethNumBufferPools-1]) - IBMVETH_BUFF_OH))
887 return -EINVAL;
888
889 for(i = 0; i<IbmVethNumBufferPools; i++) {
890 int activate = 0;
891 if (new_mtu > (pool_size[i] - IBMVETH_BUFF_OH)) {
892 activate = 1;
893 prev_smaller= 1;
894 } else {
895 if (prev_smaller)
896 activate = 1;
897 prev_smaller= 0;
898 }
899
900 if (activate && !adapter->rx_buff_pool[i].active) {
901 struct ibmveth_buff_pool *pool =
902 &adapter->rx_buff_pool[i];
903 if(ibmveth_alloc_buffer_pool(pool)) {
904 ibmveth_error_printk("unable to alloc pool\n");
905 return -ENOMEM;
906 }
907 adapter->rx_buff_pool[i].active = 1;
908 } else if (!activate && adapter->rx_buff_pool[i].active) {
909 adapter->rx_buff_pool[i].active = 0;
910 h_free_logical_lan_buffer(adapter->vdev->unit_address,
911 (u64)pool_size[i]);
912 }
913
914 }
915
916 /* kick the interrupt handler so that the new buffer pools get
917 replenished or deallocated */
918 ibmveth_interrupt(dev->irq, dev, NULL);
919
920 dev->mtu = new_mtu;
921 return 0;
922 }
923
924 static int __devinit ibmveth_probe(struct vio_dev *dev, const struct vio_device_id *id)
925 {
926 int rc, i;
927 struct net_device *netdev;
928 struct ibmveth_adapter *adapter = NULL;
929
930 unsigned char *mac_addr_p;
931 unsigned int *mcastFilterSize_p;
932
933
934 ibmveth_debug_printk_no_adapter("entering ibmveth_probe for UA 0x%x\n",
935 dev->unit_address);
936
937 mac_addr_p = (unsigned char *) vio_get_attribute(dev, VETH_MAC_ADDR, 0);
938 if(!mac_addr_p) {
939 printk(KERN_ERR "(%s:%3.3d) ERROR: Can't find VETH_MAC_ADDR "
940 "attribute\n", __FILE__, __LINE__);
941 return 0;
942 }
943
944 mcastFilterSize_p= (unsigned int *) vio_get_attribute(dev, VETH_MCAST_FILTER_SIZE, 0);
945 if(!mcastFilterSize_p) {
946 printk(KERN_ERR "(%s:%3.3d) ERROR: Can't find "
947 "VETH_MCAST_FILTER_SIZE attribute\n",
948 __FILE__, __LINE__);
949 return 0;
950 }
951
952 netdev = alloc_etherdev(sizeof(struct ibmveth_adapter));
953
954 if(!netdev)
955 return -ENOMEM;
956
957 SET_MODULE_OWNER(netdev);
958
959 adapter = netdev->priv;
960 memset(adapter, 0, sizeof(adapter));
961 dev->dev.driver_data = netdev;
962
963 adapter->vdev = dev;
964 adapter->netdev = netdev;
965 adapter->mcastFilterSize= *mcastFilterSize_p;
966
967 /* Some older boxes running PHYP non-natively have an OF that
968 returns a 8-byte local-mac-address field (and the first
969 2 bytes have to be ignored) while newer boxes' OF return
970 a 6-byte field. Note that IEEE 1275 specifies that
971 local-mac-address must be a 6-byte field.
972 The RPA doc specifies that the first byte must be 10b, so
973 we'll just look for it to solve this 8 vs. 6 byte field issue */
974
975 if ((*mac_addr_p & 0x3) != 0x02)
976 mac_addr_p += 2;
977
978 adapter->mac_addr = 0;
979 memcpy(&adapter->mac_addr, mac_addr_p, 6);
980
981 adapter->liobn = dev->iommu_table->it_index;
982
983 netdev->irq = dev->irq;
984 netdev->open = ibmveth_open;
985 netdev->poll = ibmveth_poll;
986 netdev->weight = 16;
987 netdev->stop = ibmveth_close;
988 netdev->hard_start_xmit = ibmveth_start_xmit;
989 netdev->get_stats = ibmveth_get_stats;
990 netdev->set_multicast_list = ibmveth_set_multicast_list;
991 netdev->do_ioctl = ibmveth_ioctl;
992 netdev->ethtool_ops = &netdev_ethtool_ops;
993 netdev->change_mtu = ibmveth_change_mtu;
994 SET_NETDEV_DEV(netdev, &dev->dev);
995 netdev->features |= NETIF_F_LLTX;
996 spin_lock_init(&adapter->stats_lock);
997
998 memcpy(&netdev->dev_addr, &adapter->mac_addr, netdev->addr_len);
999
1000 for(i = 0; i<IbmVethNumBufferPools; i++)
1001 ibmveth_init_buffer_pool(&adapter->rx_buff_pool[i], i,
1002 pool_count[i], pool_size[i]);
1003
1004 ibmveth_debug_printk("adapter @ 0x%p\n", adapter);
1005
1006 adapter->buffer_list_dma = DMA_ERROR_CODE;
1007 adapter->filter_list_dma = DMA_ERROR_CODE;
1008 adapter->rx_queue.queue_dma = DMA_ERROR_CODE;
1009
1010 ibmveth_debug_printk("registering netdev...\n");
1011
1012 rc = register_netdev(netdev);
1013
1014 if(rc) {
1015 ibmveth_debug_printk("failed to register netdev rc=%d\n", rc);
1016 free_netdev(netdev);
1017 return rc;
1018 }
1019
1020 ibmveth_debug_printk("registered\n");
1021
1022 ibmveth_proc_register_adapter(adapter);
1023
1024 return 0;
1025 }
1026
1027 static int __devexit ibmveth_remove(struct vio_dev *dev)
1028 {
1029 struct net_device *netdev = dev->dev.driver_data;
1030 struct ibmveth_adapter *adapter = netdev->priv;
1031
1032 unregister_netdev(netdev);
1033
1034 ibmveth_proc_unregister_adapter(adapter);
1035
1036 free_netdev(netdev);
1037 return 0;
1038 }
1039
1040 #ifdef CONFIG_PROC_FS
1041 static void ibmveth_proc_register_driver(void)
1042 {
1043 ibmveth_proc_dir = proc_mkdir(IBMVETH_PROC_DIR, NULL);
1044 if (ibmveth_proc_dir) {
1045 SET_MODULE_OWNER(ibmveth_proc_dir);
1046 }
1047 }
1048
1049 static void ibmveth_proc_unregister_driver(void)
1050 {
1051 remove_proc_entry(IBMVETH_PROC_DIR, NULL);
1052 }
1053
1054 static void *ibmveth_seq_start(struct seq_file *seq, loff_t *pos)
1055 {
1056 if (*pos == 0) {
1057 return (void *)1;
1058 } else {
1059 return NULL;
1060 }
1061 }
1062
1063 static void *ibmveth_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1064 {
1065 ++*pos;
1066 return NULL;
1067 }
1068
1069 static void ibmveth_seq_stop(struct seq_file *seq, void *v)
1070 {
1071 }
1072
1073 static int ibmveth_seq_show(struct seq_file *seq, void *v)
1074 {
1075 struct ibmveth_adapter *adapter = seq->private;
1076 char *current_mac = ((char*) &adapter->netdev->dev_addr);
1077 char *firmware_mac = ((char*) &adapter->mac_addr) ;
1078
1079 seq_printf(seq, "%s %s\n\n", ibmveth_driver_string, ibmveth_driver_version);
1080
1081 seq_printf(seq, "Unit Address: 0x%x\n", adapter->vdev->unit_address);
1082 seq_printf(seq, "LIOBN: 0x%lx\n", adapter->liobn);
1083 seq_printf(seq, "Current MAC: %02X:%02X:%02X:%02X:%02X:%02X\n",
1084 current_mac[0], current_mac[1], current_mac[2],
1085 current_mac[3], current_mac[4], current_mac[5]);
1086 seq_printf(seq, "Firmware MAC: %02X:%02X:%02X:%02X:%02X:%02X\n",
1087 firmware_mac[0], firmware_mac[1], firmware_mac[2],
1088 firmware_mac[3], firmware_mac[4], firmware_mac[5]);
1089
1090 seq_printf(seq, "\nAdapter Statistics:\n");
1091 seq_printf(seq, " TX: skbuffs linearized: %ld\n", adapter->tx_linearized);
1092 seq_printf(seq, " multi-descriptor sends: %ld\n", adapter->tx_multidesc_send);
1093 seq_printf(seq, " skb_linearize failures: %ld\n", adapter->tx_linearize_failed);
1094 seq_printf(seq, " vio_map_single failres: %ld\n", adapter->tx_map_failed);
1095 seq_printf(seq, " send failures: %ld\n", adapter->tx_send_failed);
1096 seq_printf(seq, " RX: replenish task cycles: %ld\n", adapter->replenish_task_cycles);
1097 seq_printf(seq, " alloc_skb_failures: %ld\n", adapter->replenish_no_mem);
1098 seq_printf(seq, " add buffer failures: %ld\n", adapter->replenish_add_buff_failure);
1099 seq_printf(seq, " invalid buffers: %ld\n", adapter->rx_invalid_buffer);
1100 seq_printf(seq, " no buffers: %ld\n", adapter->rx_no_buffer);
1101
1102 return 0;
1103 }
1104 static struct seq_operations ibmveth_seq_ops = {
1105 .start = ibmveth_seq_start,
1106 .next = ibmveth_seq_next,
1107 .stop = ibmveth_seq_stop,
1108 .show = ibmveth_seq_show,
1109 };
1110
1111 static int ibmveth_proc_open(struct inode *inode, struct file *file)
1112 {
1113 struct seq_file *seq;
1114 struct proc_dir_entry *proc;
1115 int rc;
1116
1117 rc = seq_open(file, &ibmveth_seq_ops);
1118 if (!rc) {
1119 /* recover the pointer buried in proc_dir_entry data */
1120 seq = file->private_data;
1121 proc = PDE(inode);
1122 seq->private = proc->data;
1123 }
1124 return rc;
1125 }
1126
1127 static struct file_operations ibmveth_proc_fops = {
1128 .owner = THIS_MODULE,
1129 .open = ibmveth_proc_open,
1130 .read = seq_read,
1131 .llseek = seq_lseek,
1132 .release = seq_release,
1133 };
1134
1135 static void ibmveth_proc_register_adapter(struct ibmveth_adapter *adapter)
1136 {
1137 struct proc_dir_entry *entry;
1138 if (ibmveth_proc_dir) {
1139 entry = create_proc_entry(adapter->netdev->name, S_IFREG, ibmveth_proc_dir);
1140 if (!entry) {
1141 ibmveth_error_printk("Cannot create adapter proc entry");
1142 } else {
1143 entry->data = (void *) adapter;
1144 entry->proc_fops = &ibmveth_proc_fops;
1145 SET_MODULE_OWNER(entry);
1146 }
1147 }
1148 return;
1149 }
1150
1151 static void ibmveth_proc_unregister_adapter(struct ibmveth_adapter *adapter)
1152 {
1153 if (ibmveth_proc_dir) {
1154 remove_proc_entry(adapter->netdev->name, ibmveth_proc_dir);
1155 }
1156 }
1157
1158 #else /* CONFIG_PROC_FS */
1159 static void ibmveth_proc_register_adapter(struct ibmveth_adapter *adapter)
1160 {
1161 }
1162
1163 static void ibmveth_proc_unregister_adapter(struct ibmveth_adapter *adapter)
1164 {
1165 }
1166 static void ibmveth_proc_register_driver(void)
1167 {
1168 }
1169
1170 static void ibmveth_proc_unregister_driver(void)
1171 {
1172 }
1173 #endif /* CONFIG_PROC_FS */
1174
1175 static struct vio_device_id ibmveth_device_table[] __devinitdata= {
1176 { "network", "IBM,l-lan"},
1177 { "", "" }
1178 };
1179
1180 MODULE_DEVICE_TABLE(vio, ibmveth_device_table);
1181
1182 static struct vio_driver ibmveth_driver = {
1183 .name = (char *)ibmveth_driver_name,
1184 .id_table = ibmveth_device_table,
1185 .probe = ibmveth_probe,
1186 .remove = ibmveth_remove
1187 };
1188
1189 static int __init ibmveth_module_init(void)
1190 {
1191 ibmveth_printk("%s: %s %s\n", ibmveth_driver_name, ibmveth_driver_string, ibmveth_driver_version);
1192
1193 ibmveth_proc_register_driver();
1194
1195 return vio_register_driver(&ibmveth_driver);
1196 }
1197
1198 static void __exit ibmveth_module_exit(void)
1199 {
1200 vio_unregister_driver(&ibmveth_driver);
1201 ibmveth_proc_unregister_driver();
1202 }
1203
1204 module_init(ibmveth_module_init);
1205 module_exit(ibmveth_module_exit);
This page took 0.071521 seconds and 5 git commands to generate.