Merge branch 'driver-core-next' of git://git.kernel.org/pub/scm/linux/kernel/git...
[pandora-kernel.git] / drivers / net / ibmveth.c
1 /*
2  * IBM Power Virtual Ethernet Device Driver
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 2 of the License, or
7  * (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17  *
18  * Copyright (C) IBM Corporation, 2003, 2010
19  *
20  * Authors: Dave Larson <larson1@us.ibm.com>
21  *          Santiago Leon <santil@linux.vnet.ibm.com>
22  *          Brian King <brking@linux.vnet.ibm.com>
23  *          Robert Jennings <rcj@linux.vnet.ibm.com>
24  *          Anton Blanchard <anton@au.ibm.com>
25  */
26
27 #include <linux/module.h>
28 #include <linux/moduleparam.h>
29 #include <linux/types.h>
30 #include <linux/errno.h>
31 #include <linux/dma-mapping.h>
32 #include <linux/kernel.h>
33 #include <linux/netdevice.h>
34 #include <linux/etherdevice.h>
35 #include <linux/skbuff.h>
36 #include <linux/init.h>
37 #include <linux/interrupt.h>
38 #include <linux/mm.h>
39 #include <linux/pm.h>
40 #include <linux/ethtool.h>
41 #include <linux/in.h>
42 #include <linux/ip.h>
43 #include <linux/ipv6.h>
44 #include <linux/slab.h>
45 #include <asm/hvcall.h>
46 #include <linux/atomic.h>
47 #include <asm/vio.h>
48 #include <asm/iommu.h>
49 #include <asm/firmware.h>
50
51 #include "ibmveth.h"
52
53 static irqreturn_t ibmveth_interrupt(int irq, void *dev_instance);
54 static void ibmveth_rxq_harvest_buffer(struct ibmveth_adapter *adapter);
55 static unsigned long ibmveth_get_desired_dma(struct vio_dev *vdev);
56
57 static struct kobj_type ktype_veth_pool;
58
59
60 static const char ibmveth_driver_name[] = "ibmveth";
61 static const char ibmveth_driver_string[] = "IBM Power Virtual Ethernet Driver";
62 #define ibmveth_driver_version "1.04"
63
64 MODULE_AUTHOR("Santiago Leon <santil@linux.vnet.ibm.com>");
65 MODULE_DESCRIPTION("IBM Power Virtual Ethernet Driver");
66 MODULE_LICENSE("GPL");
67 MODULE_VERSION(ibmveth_driver_version);
68
69 static unsigned int tx_copybreak __read_mostly = 128;
70 module_param(tx_copybreak, uint, 0644);
71 MODULE_PARM_DESC(tx_copybreak,
72         "Maximum size of packet that is copied to a new buffer on transmit");
73
74 static unsigned int rx_copybreak __read_mostly = 128;
75 module_param(rx_copybreak, uint, 0644);
76 MODULE_PARM_DESC(rx_copybreak,
77         "Maximum size of packet that is copied to a new buffer on receive");
78
79 static unsigned int rx_flush __read_mostly = 0;
80 module_param(rx_flush, uint, 0644);
81 MODULE_PARM_DESC(rx_flush, "Flush receive buffers before use");
82
83 struct ibmveth_stat {
84         char name[ETH_GSTRING_LEN];
85         int offset;
86 };
87
88 #define IBMVETH_STAT_OFF(stat) offsetof(struct ibmveth_adapter, stat)
89 #define IBMVETH_GET_STAT(a, off) *((u64 *)(((unsigned long)(a)) + off))
90
91 struct ibmveth_stat ibmveth_stats[] = {
92         { "replenish_task_cycles", IBMVETH_STAT_OFF(replenish_task_cycles) },
93         { "replenish_no_mem", IBMVETH_STAT_OFF(replenish_no_mem) },
94         { "replenish_add_buff_failure",
95                         IBMVETH_STAT_OFF(replenish_add_buff_failure) },
96         { "replenish_add_buff_success",
97                         IBMVETH_STAT_OFF(replenish_add_buff_success) },
98         { "rx_invalid_buffer", IBMVETH_STAT_OFF(rx_invalid_buffer) },
99         { "rx_no_buffer", IBMVETH_STAT_OFF(rx_no_buffer) },
100         { "tx_map_failed", IBMVETH_STAT_OFF(tx_map_failed) },
101         { "tx_send_failed", IBMVETH_STAT_OFF(tx_send_failed) },
102         { "fw_enabled_ipv4_csum", IBMVETH_STAT_OFF(fw_ipv4_csum_support) },
103         { "fw_enabled_ipv6_csum", IBMVETH_STAT_OFF(fw_ipv6_csum_support) },
104 };
105
106 /* simple methods of getting data from the current rxq entry */
107 static inline u32 ibmveth_rxq_flags(struct ibmveth_adapter *adapter)
108 {
109         return adapter->rx_queue.queue_addr[adapter->rx_queue.index].flags_off;
110 }
111
112 static inline int ibmveth_rxq_toggle(struct ibmveth_adapter *adapter)
113 {
114         return (ibmveth_rxq_flags(adapter) & IBMVETH_RXQ_TOGGLE) >>
115                         IBMVETH_RXQ_TOGGLE_SHIFT;
116 }
117
118 static inline int ibmveth_rxq_pending_buffer(struct ibmveth_adapter *adapter)
119 {
120         return ibmveth_rxq_toggle(adapter) == adapter->rx_queue.toggle;
121 }
122
123 static inline int ibmveth_rxq_buffer_valid(struct ibmveth_adapter *adapter)
124 {
125         return ibmveth_rxq_flags(adapter) & IBMVETH_RXQ_VALID;
126 }
127
128 static inline int ibmveth_rxq_frame_offset(struct ibmveth_adapter *adapter)
129 {
130         return ibmveth_rxq_flags(adapter) & IBMVETH_RXQ_OFF_MASK;
131 }
132
133 static inline int ibmveth_rxq_frame_length(struct ibmveth_adapter *adapter)
134 {
135         return adapter->rx_queue.queue_addr[adapter->rx_queue.index].length;
136 }
137
138 static inline int ibmveth_rxq_csum_good(struct ibmveth_adapter *adapter)
139 {
140         return ibmveth_rxq_flags(adapter) & IBMVETH_RXQ_CSUM_GOOD;
141 }
142
143 /* setup the initial settings for a buffer pool */
144 static void ibmveth_init_buffer_pool(struct ibmveth_buff_pool *pool,
145                                      u32 pool_index, u32 pool_size,
146                                      u32 buff_size, u32 pool_active)
147 {
148         pool->size = pool_size;
149         pool->index = pool_index;
150         pool->buff_size = buff_size;
151         pool->threshold = pool_size * 7 / 8;
152         pool->active = pool_active;
153 }
154
155 /* allocate and setup an buffer pool - called during open */
156 static int ibmveth_alloc_buffer_pool(struct ibmveth_buff_pool *pool)
157 {
158         int i;
159
160         pool->free_map = kmalloc(sizeof(u16) * pool->size, GFP_KERNEL);
161
162         if (!pool->free_map)
163                 return -1;
164
165         pool->dma_addr = kmalloc(sizeof(dma_addr_t) * pool->size, GFP_KERNEL);
166         if (!pool->dma_addr) {
167                 kfree(pool->free_map);
168                 pool->free_map = NULL;
169                 return -1;
170         }
171
172         pool->skbuff = kcalloc(pool->size, sizeof(void *), GFP_KERNEL);
173
174         if (!pool->skbuff) {
175                 kfree(pool->dma_addr);
176                 pool->dma_addr = NULL;
177
178                 kfree(pool->free_map);
179                 pool->free_map = NULL;
180                 return -1;
181         }
182
183         memset(pool->dma_addr, 0, sizeof(dma_addr_t) * pool->size);
184
185         for (i = 0; i < pool->size; ++i)
186                 pool->free_map[i] = i;
187
188         atomic_set(&pool->available, 0);
189         pool->producer_index = 0;
190         pool->consumer_index = 0;
191
192         return 0;
193 }
194
195 static inline void ibmveth_flush_buffer(void *addr, unsigned long length)
196 {
197         unsigned long offset;
198
199         for (offset = 0; offset < length; offset += SMP_CACHE_BYTES)
200                 asm("dcbfl %0,%1" :: "b" (addr), "r" (offset));
201 }
202
203 /* replenish the buffers for a pool.  note that we don't need to
204  * skb_reserve these since they are used for incoming...
205  */
206 static void ibmveth_replenish_buffer_pool(struct ibmveth_adapter *adapter,
207                                           struct ibmveth_buff_pool *pool)
208 {
209         u32 i;
210         u32 count = pool->size - atomic_read(&pool->available);
211         u32 buffers_added = 0;
212         struct sk_buff *skb;
213         unsigned int free_index, index;
214         u64 correlator;
215         unsigned long lpar_rc;
216         dma_addr_t dma_addr;
217
218         mb();
219
220         for (i = 0; i < count; ++i) {
221                 union ibmveth_buf_desc desc;
222
223                 skb = netdev_alloc_skb(adapter->netdev, pool->buff_size);
224
225                 if (!skb) {
226                         netdev_dbg(adapter->netdev,
227                                    "replenish: unable to allocate skb\n");
228                         adapter->replenish_no_mem++;
229                         break;
230                 }
231
232                 free_index = pool->consumer_index;
233                 pool->consumer_index++;
234                 if (pool->consumer_index >= pool->size)
235                         pool->consumer_index = 0;
236                 index = pool->free_map[free_index];
237
238                 BUG_ON(index == IBM_VETH_INVALID_MAP);
239                 BUG_ON(pool->skbuff[index] != NULL);
240
241                 dma_addr = dma_map_single(&adapter->vdev->dev, skb->data,
242                                 pool->buff_size, DMA_FROM_DEVICE);
243
244                 if (dma_mapping_error(&adapter->vdev->dev, dma_addr))
245                         goto failure;
246
247                 pool->free_map[free_index] = IBM_VETH_INVALID_MAP;
248                 pool->dma_addr[index] = dma_addr;
249                 pool->skbuff[index] = skb;
250
251                 correlator = ((u64)pool->index << 32) | index;
252                 *(u64 *)skb->data = correlator;
253
254                 desc.fields.flags_len = IBMVETH_BUF_VALID | pool->buff_size;
255                 desc.fields.address = dma_addr;
256
257                 if (rx_flush) {
258                         unsigned int len = min(pool->buff_size,
259                                                 adapter->netdev->mtu +
260                                                 IBMVETH_BUFF_OH);
261                         ibmveth_flush_buffer(skb->data, len);
262                 }
263                 lpar_rc = h_add_logical_lan_buffer(adapter->vdev->unit_address,
264                                                    desc.desc);
265
266                 if (lpar_rc != H_SUCCESS) {
267                         goto failure;
268                 } else {
269                         buffers_added++;
270                         adapter->replenish_add_buff_success++;
271                 }
272         }
273
274         mb();
275         atomic_add(buffers_added, &(pool->available));
276         return;
277
278 failure:
279         pool->free_map[free_index] = index;
280         pool->skbuff[index] = NULL;
281         if (pool->consumer_index == 0)
282                 pool->consumer_index = pool->size - 1;
283         else
284                 pool->consumer_index--;
285         if (!dma_mapping_error(&adapter->vdev->dev, dma_addr))
286                 dma_unmap_single(&adapter->vdev->dev,
287                                  pool->dma_addr[index], pool->buff_size,
288                                  DMA_FROM_DEVICE);
289         dev_kfree_skb_any(skb);
290         adapter->replenish_add_buff_failure++;
291
292         mb();
293         atomic_add(buffers_added, &(pool->available));
294 }
295
296 /* replenish routine */
297 static void ibmveth_replenish_task(struct ibmveth_adapter *adapter)
298 {
299         int i;
300
301         adapter->replenish_task_cycles++;
302
303         for (i = (IBMVETH_NUM_BUFF_POOLS - 1); i >= 0; i--) {
304                 struct ibmveth_buff_pool *pool = &adapter->rx_buff_pool[i];
305
306                 if (pool->active &&
307                     (atomic_read(&pool->available) < pool->threshold))
308                         ibmveth_replenish_buffer_pool(adapter, pool);
309         }
310
311         adapter->rx_no_buffer = *(u64 *)(((char*)adapter->buffer_list_addr) +
312                                                 4096 - 8);
313 }
314
315 /* empty and free ana buffer pool - also used to do cleanup in error paths */
316 static void ibmveth_free_buffer_pool(struct ibmveth_adapter *adapter,
317                                      struct ibmveth_buff_pool *pool)
318 {
319         int i;
320
321         kfree(pool->free_map);
322         pool->free_map = NULL;
323
324         if (pool->skbuff && pool->dma_addr) {
325                 for (i = 0; i < pool->size; ++i) {
326                         struct sk_buff *skb = pool->skbuff[i];
327                         if (skb) {
328                                 dma_unmap_single(&adapter->vdev->dev,
329                                                  pool->dma_addr[i],
330                                                  pool->buff_size,
331                                                  DMA_FROM_DEVICE);
332                                 dev_kfree_skb_any(skb);
333                                 pool->skbuff[i] = NULL;
334                         }
335                 }
336         }
337
338         if (pool->dma_addr) {
339                 kfree(pool->dma_addr);
340                 pool->dma_addr = NULL;
341         }
342
343         if (pool->skbuff) {
344                 kfree(pool->skbuff);
345                 pool->skbuff = NULL;
346         }
347 }
348
349 /* remove a buffer from a pool */
350 static void ibmveth_remove_buffer_from_pool(struct ibmveth_adapter *adapter,
351                                             u64 correlator)
352 {
353         unsigned int pool  = correlator >> 32;
354         unsigned int index = correlator & 0xffffffffUL;
355         unsigned int free_index;
356         struct sk_buff *skb;
357
358         BUG_ON(pool >= IBMVETH_NUM_BUFF_POOLS);
359         BUG_ON(index >= adapter->rx_buff_pool[pool].size);
360
361         skb = adapter->rx_buff_pool[pool].skbuff[index];
362
363         BUG_ON(skb == NULL);
364
365         adapter->rx_buff_pool[pool].skbuff[index] = NULL;
366
367         dma_unmap_single(&adapter->vdev->dev,
368                          adapter->rx_buff_pool[pool].dma_addr[index],
369                          adapter->rx_buff_pool[pool].buff_size,
370                          DMA_FROM_DEVICE);
371
372         free_index = adapter->rx_buff_pool[pool].producer_index;
373         adapter->rx_buff_pool[pool].producer_index++;
374         if (adapter->rx_buff_pool[pool].producer_index >=
375             adapter->rx_buff_pool[pool].size)
376                 adapter->rx_buff_pool[pool].producer_index = 0;
377         adapter->rx_buff_pool[pool].free_map[free_index] = index;
378
379         mb();
380
381         atomic_dec(&(adapter->rx_buff_pool[pool].available));
382 }
383
384 /* get the current buffer on the rx queue */
385 static inline struct sk_buff *ibmveth_rxq_get_buffer(struct ibmveth_adapter *adapter)
386 {
387         u64 correlator = adapter->rx_queue.queue_addr[adapter->rx_queue.index].correlator;
388         unsigned int pool = correlator >> 32;
389         unsigned int index = correlator & 0xffffffffUL;
390
391         BUG_ON(pool >= IBMVETH_NUM_BUFF_POOLS);
392         BUG_ON(index >= adapter->rx_buff_pool[pool].size);
393
394         return adapter->rx_buff_pool[pool].skbuff[index];
395 }
396
397 /* recycle the current buffer on the rx queue */
398 static int ibmveth_rxq_recycle_buffer(struct ibmveth_adapter *adapter)
399 {
400         u32 q_index = adapter->rx_queue.index;
401         u64 correlator = adapter->rx_queue.queue_addr[q_index].correlator;
402         unsigned int pool = correlator >> 32;
403         unsigned int index = correlator & 0xffffffffUL;
404         union ibmveth_buf_desc desc;
405         unsigned long lpar_rc;
406         int ret = 1;
407
408         BUG_ON(pool >= IBMVETH_NUM_BUFF_POOLS);
409         BUG_ON(index >= adapter->rx_buff_pool[pool].size);
410
411         if (!adapter->rx_buff_pool[pool].active) {
412                 ibmveth_rxq_harvest_buffer(adapter);
413                 ibmveth_free_buffer_pool(adapter, &adapter->rx_buff_pool[pool]);
414                 goto out;
415         }
416
417         desc.fields.flags_len = IBMVETH_BUF_VALID |
418                 adapter->rx_buff_pool[pool].buff_size;
419         desc.fields.address = adapter->rx_buff_pool[pool].dma_addr[index];
420
421         lpar_rc = h_add_logical_lan_buffer(adapter->vdev->unit_address, desc.desc);
422
423         if (lpar_rc != H_SUCCESS) {
424                 netdev_dbg(adapter->netdev, "h_add_logical_lan_buffer failed "
425                            "during recycle rc=%ld", lpar_rc);
426                 ibmveth_remove_buffer_from_pool(adapter, adapter->rx_queue.queue_addr[adapter->rx_queue.index].correlator);
427                 ret = 0;
428         }
429
430         if (++adapter->rx_queue.index == adapter->rx_queue.num_slots) {
431                 adapter->rx_queue.index = 0;
432                 adapter->rx_queue.toggle = !adapter->rx_queue.toggle;
433         }
434
435 out:
436         return ret;
437 }
438
439 static void ibmveth_rxq_harvest_buffer(struct ibmveth_adapter *adapter)
440 {
441         ibmveth_remove_buffer_from_pool(adapter, adapter->rx_queue.queue_addr[adapter->rx_queue.index].correlator);
442
443         if (++adapter->rx_queue.index == adapter->rx_queue.num_slots) {
444                 adapter->rx_queue.index = 0;
445                 adapter->rx_queue.toggle = !adapter->rx_queue.toggle;
446         }
447 }
448
449 static void ibmveth_cleanup(struct ibmveth_adapter *adapter)
450 {
451         int i;
452         struct device *dev = &adapter->vdev->dev;
453
454         if (adapter->buffer_list_addr != NULL) {
455                 if (!dma_mapping_error(dev, adapter->buffer_list_dma)) {
456                         dma_unmap_single(dev, adapter->buffer_list_dma, 4096,
457                                         DMA_BIDIRECTIONAL);
458                         adapter->buffer_list_dma = DMA_ERROR_CODE;
459                 }
460                 free_page((unsigned long)adapter->buffer_list_addr);
461                 adapter->buffer_list_addr = NULL;
462         }
463
464         if (adapter->filter_list_addr != NULL) {
465                 if (!dma_mapping_error(dev, adapter->filter_list_dma)) {
466                         dma_unmap_single(dev, adapter->filter_list_dma, 4096,
467                                         DMA_BIDIRECTIONAL);
468                         adapter->filter_list_dma = DMA_ERROR_CODE;
469                 }
470                 free_page((unsigned long)adapter->filter_list_addr);
471                 adapter->filter_list_addr = NULL;
472         }
473
474         if (adapter->rx_queue.queue_addr != NULL) {
475                 if (!dma_mapping_error(dev, adapter->rx_queue.queue_dma)) {
476                         dma_unmap_single(dev,
477                                         adapter->rx_queue.queue_dma,
478                                         adapter->rx_queue.queue_len,
479                                         DMA_BIDIRECTIONAL);
480                         adapter->rx_queue.queue_dma = DMA_ERROR_CODE;
481                 }
482                 kfree(adapter->rx_queue.queue_addr);
483                 adapter->rx_queue.queue_addr = NULL;
484         }
485
486         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++)
487                 if (adapter->rx_buff_pool[i].active)
488                         ibmveth_free_buffer_pool(adapter,
489                                                  &adapter->rx_buff_pool[i]);
490
491         if (adapter->bounce_buffer != NULL) {
492                 if (!dma_mapping_error(dev, adapter->bounce_buffer_dma)) {
493                         dma_unmap_single(&adapter->vdev->dev,
494                                         adapter->bounce_buffer_dma,
495                                         adapter->netdev->mtu + IBMVETH_BUFF_OH,
496                                         DMA_BIDIRECTIONAL);
497                         adapter->bounce_buffer_dma = DMA_ERROR_CODE;
498                 }
499                 kfree(adapter->bounce_buffer);
500                 adapter->bounce_buffer = NULL;
501         }
502 }
503
504 static int ibmveth_register_logical_lan(struct ibmveth_adapter *adapter,
505         union ibmveth_buf_desc rxq_desc, u64 mac_address)
506 {
507         int rc, try_again = 1;
508
509         /*
510          * After a kexec the adapter will still be open, so our attempt to
511          * open it will fail. So if we get a failure we free the adapter and
512          * try again, but only once.
513          */
514 retry:
515         rc = h_register_logical_lan(adapter->vdev->unit_address,
516                                     adapter->buffer_list_dma, rxq_desc.desc,
517                                     adapter->filter_list_dma, mac_address);
518
519         if (rc != H_SUCCESS && try_again) {
520                 do {
521                         rc = h_free_logical_lan(adapter->vdev->unit_address);
522                 } while (H_IS_LONG_BUSY(rc) || (rc == H_BUSY));
523
524                 try_again = 0;
525                 goto retry;
526         }
527
528         return rc;
529 }
530
531 static int ibmveth_open(struct net_device *netdev)
532 {
533         struct ibmveth_adapter *adapter = netdev_priv(netdev);
534         u64 mac_address = 0;
535         int rxq_entries = 1;
536         unsigned long lpar_rc;
537         int rc;
538         union ibmveth_buf_desc rxq_desc;
539         int i;
540         struct device *dev;
541
542         netdev_dbg(netdev, "open starting\n");
543
544         napi_enable(&adapter->napi);
545
546         for(i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++)
547                 rxq_entries += adapter->rx_buff_pool[i].size;
548
549         adapter->buffer_list_addr = (void*) get_zeroed_page(GFP_KERNEL);
550         adapter->filter_list_addr = (void*) get_zeroed_page(GFP_KERNEL);
551
552         if (!adapter->buffer_list_addr || !adapter->filter_list_addr) {
553                 netdev_err(netdev, "unable to allocate filter or buffer list "
554                            "pages\n");
555                 rc = -ENOMEM;
556                 goto err_out;
557         }
558
559         adapter->rx_queue.queue_len = sizeof(struct ibmveth_rx_q_entry) *
560                                                 rxq_entries;
561         adapter->rx_queue.queue_addr = kmalloc(adapter->rx_queue.queue_len,
562                                                 GFP_KERNEL);
563
564         if (!adapter->rx_queue.queue_addr) {
565                 netdev_err(netdev, "unable to allocate rx queue pages\n");
566                 rc = -ENOMEM;
567                 goto err_out;
568         }
569
570         dev = &adapter->vdev->dev;
571
572         adapter->buffer_list_dma = dma_map_single(dev,
573                         adapter->buffer_list_addr, 4096, DMA_BIDIRECTIONAL);
574         adapter->filter_list_dma = dma_map_single(dev,
575                         adapter->filter_list_addr, 4096, DMA_BIDIRECTIONAL);
576         adapter->rx_queue.queue_dma = dma_map_single(dev,
577                         adapter->rx_queue.queue_addr,
578                         adapter->rx_queue.queue_len, DMA_BIDIRECTIONAL);
579
580         if ((dma_mapping_error(dev, adapter->buffer_list_dma)) ||
581             (dma_mapping_error(dev, adapter->filter_list_dma)) ||
582             (dma_mapping_error(dev, adapter->rx_queue.queue_dma))) {
583                 netdev_err(netdev, "unable to map filter or buffer list "
584                            "pages\n");
585                 rc = -ENOMEM;
586                 goto err_out;
587         }
588
589         adapter->rx_queue.index = 0;
590         adapter->rx_queue.num_slots = rxq_entries;
591         adapter->rx_queue.toggle = 1;
592
593         memcpy(&mac_address, netdev->dev_addr, netdev->addr_len);
594         mac_address = mac_address >> 16;
595
596         rxq_desc.fields.flags_len = IBMVETH_BUF_VALID |
597                                         adapter->rx_queue.queue_len;
598         rxq_desc.fields.address = adapter->rx_queue.queue_dma;
599
600         netdev_dbg(netdev, "buffer list @ 0x%p\n", adapter->buffer_list_addr);
601         netdev_dbg(netdev, "filter list @ 0x%p\n", adapter->filter_list_addr);
602         netdev_dbg(netdev, "receive q   @ 0x%p\n", adapter->rx_queue.queue_addr);
603
604         h_vio_signal(adapter->vdev->unit_address, VIO_IRQ_DISABLE);
605
606         lpar_rc = ibmveth_register_logical_lan(adapter, rxq_desc, mac_address);
607
608         if (lpar_rc != H_SUCCESS) {
609                 netdev_err(netdev, "h_register_logical_lan failed with %ld\n",
610                            lpar_rc);
611                 netdev_err(netdev, "buffer TCE:0x%llx filter TCE:0x%llx rxq "
612                            "desc:0x%llx MAC:0x%llx\n",
613                                      adapter->buffer_list_dma,
614                                      adapter->filter_list_dma,
615                                      rxq_desc.desc,
616                                      mac_address);
617                 rc = -ENONET;
618                 goto err_out;
619         }
620
621         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++) {
622                 if (!adapter->rx_buff_pool[i].active)
623                         continue;
624                 if (ibmveth_alloc_buffer_pool(&adapter->rx_buff_pool[i])) {
625                         netdev_err(netdev, "unable to alloc pool\n");
626                         adapter->rx_buff_pool[i].active = 0;
627                         rc = -ENOMEM;
628                         goto err_out;
629                 }
630         }
631
632         netdev_dbg(netdev, "registering irq 0x%x\n", netdev->irq);
633         rc = request_irq(netdev->irq, ibmveth_interrupt, 0, netdev->name,
634                          netdev);
635         if (rc != 0) {
636                 netdev_err(netdev, "unable to request irq 0x%x, rc %d\n",
637                            netdev->irq, rc);
638                 do {
639                         lpar_rc = h_free_logical_lan(adapter->vdev->unit_address);
640                 } while (H_IS_LONG_BUSY(lpar_rc) || (lpar_rc == H_BUSY));
641
642                 goto err_out;
643         }
644
645         adapter->bounce_buffer =
646             kmalloc(netdev->mtu + IBMVETH_BUFF_OH, GFP_KERNEL);
647         if (!adapter->bounce_buffer) {
648                 netdev_err(netdev, "unable to allocate bounce buffer\n");
649                 rc = -ENOMEM;
650                 goto err_out_free_irq;
651         }
652         adapter->bounce_buffer_dma =
653             dma_map_single(&adapter->vdev->dev, adapter->bounce_buffer,
654                            netdev->mtu + IBMVETH_BUFF_OH, DMA_BIDIRECTIONAL);
655         if (dma_mapping_error(dev, adapter->bounce_buffer_dma)) {
656                 netdev_err(netdev, "unable to map bounce buffer\n");
657                 rc = -ENOMEM;
658                 goto err_out_free_irq;
659         }
660
661         netdev_dbg(netdev, "initial replenish cycle\n");
662         ibmveth_interrupt(netdev->irq, netdev);
663
664         netif_start_queue(netdev);
665
666         netdev_dbg(netdev, "open complete\n");
667
668         return 0;
669
670 err_out_free_irq:
671         free_irq(netdev->irq, netdev);
672 err_out:
673         ibmveth_cleanup(adapter);
674         napi_disable(&adapter->napi);
675         return rc;
676 }
677
678 static int ibmveth_close(struct net_device *netdev)
679 {
680         struct ibmveth_adapter *adapter = netdev_priv(netdev);
681         long lpar_rc;
682
683         netdev_dbg(netdev, "close starting\n");
684
685         napi_disable(&adapter->napi);
686
687         if (!adapter->pool_config)
688                 netif_stop_queue(netdev);
689
690         h_vio_signal(adapter->vdev->unit_address, VIO_IRQ_DISABLE);
691
692         do {
693                 lpar_rc = h_free_logical_lan(adapter->vdev->unit_address);
694         } while (H_IS_LONG_BUSY(lpar_rc) || (lpar_rc == H_BUSY));
695
696         if (lpar_rc != H_SUCCESS) {
697                 netdev_err(netdev, "h_free_logical_lan failed with %lx, "
698                            "continuing with close\n", lpar_rc);
699         }
700
701         free_irq(netdev->irq, netdev);
702
703         adapter->rx_no_buffer = *(u64 *)(((char *)adapter->buffer_list_addr) +
704                                                 4096 - 8);
705
706         ibmveth_cleanup(adapter);
707
708         netdev_dbg(netdev, "close complete\n");
709
710         return 0;
711 }
712
713 static int netdev_get_settings(struct net_device *dev, struct ethtool_cmd *cmd)
714 {
715         cmd->supported = (SUPPORTED_1000baseT_Full | SUPPORTED_Autoneg |
716                                 SUPPORTED_FIBRE);
717         cmd->advertising = (ADVERTISED_1000baseT_Full | ADVERTISED_Autoneg |
718                                 ADVERTISED_FIBRE);
719         ethtool_cmd_speed_set(cmd, SPEED_1000);
720         cmd->duplex = DUPLEX_FULL;
721         cmd->port = PORT_FIBRE;
722         cmd->phy_address = 0;
723         cmd->transceiver = XCVR_INTERNAL;
724         cmd->autoneg = AUTONEG_ENABLE;
725         cmd->maxtxpkt = 0;
726         cmd->maxrxpkt = 1;
727         return 0;
728 }
729
730 static void netdev_get_drvinfo(struct net_device *dev,
731                                struct ethtool_drvinfo *info)
732 {
733         strncpy(info->driver, ibmveth_driver_name, sizeof(info->driver) - 1);
734         strncpy(info->version, ibmveth_driver_version,
735                 sizeof(info->version) - 1);
736 }
737
738 static u32 ibmveth_fix_features(struct net_device *dev, u32 features)
739 {
740         /*
741          * Since the ibmveth firmware interface does not have the
742          * concept of separate tx/rx checksum offload enable, if rx
743          * checksum is disabled we also have to disable tx checksum
744          * offload. Once we disable rx checksum offload, we are no
745          * longer allowed to send tx buffers that are not properly
746          * checksummed.
747          */
748
749         if (!(features & NETIF_F_RXCSUM))
750                 features &= ~NETIF_F_ALL_CSUM;
751
752         return features;
753 }
754
755 static int ibmveth_set_csum_offload(struct net_device *dev, u32 data)
756 {
757         struct ibmveth_adapter *adapter = netdev_priv(dev);
758         unsigned long set_attr, clr_attr, ret_attr;
759         unsigned long set_attr6, clr_attr6;
760         long ret, ret4, ret6;
761         int rc1 = 0, rc2 = 0;
762         int restart = 0;
763
764         if (netif_running(dev)) {
765                 restart = 1;
766                 adapter->pool_config = 1;
767                 ibmveth_close(dev);
768                 adapter->pool_config = 0;
769         }
770
771         set_attr = 0;
772         clr_attr = 0;
773         set_attr6 = 0;
774         clr_attr6 = 0;
775
776         if (data) {
777                 set_attr = IBMVETH_ILLAN_IPV4_TCP_CSUM;
778                 set_attr6 = IBMVETH_ILLAN_IPV6_TCP_CSUM;
779         } else {
780                 clr_attr = IBMVETH_ILLAN_IPV4_TCP_CSUM;
781                 clr_attr6 = IBMVETH_ILLAN_IPV6_TCP_CSUM;
782         }
783
784         ret = h_illan_attributes(adapter->vdev->unit_address, 0, 0, &ret_attr);
785
786         if (ret == H_SUCCESS && !(ret_attr & IBMVETH_ILLAN_ACTIVE_TRUNK) &&
787             !(ret_attr & IBMVETH_ILLAN_TRUNK_PRI_MASK) &&
788             (ret_attr & IBMVETH_ILLAN_PADDED_PKT_CSUM)) {
789                 ret4 = h_illan_attributes(adapter->vdev->unit_address, clr_attr,
790                                          set_attr, &ret_attr);
791
792                 if (ret4 != H_SUCCESS) {
793                         netdev_err(dev, "unable to change IPv4 checksum "
794                                         "offload settings. %d rc=%ld\n",
795                                         data, ret4);
796
797                         h_illan_attributes(adapter->vdev->unit_address,
798                                            set_attr, clr_attr, &ret_attr);
799
800                         if (data == 1)
801                                 dev->features &= ~NETIF_F_IP_CSUM;
802
803                 } else {
804                         adapter->fw_ipv4_csum_support = data;
805                 }
806
807                 ret6 = h_illan_attributes(adapter->vdev->unit_address,
808                                          clr_attr6, set_attr6, &ret_attr);
809
810                 if (ret6 != H_SUCCESS) {
811                         netdev_err(dev, "unable to change IPv6 checksum "
812                                         "offload settings. %d rc=%ld\n",
813                                         data, ret6);
814
815                         h_illan_attributes(adapter->vdev->unit_address,
816                                            set_attr6, clr_attr6, &ret_attr);
817
818                         if (data == 1)
819                                 dev->features &= ~NETIF_F_IPV6_CSUM;
820
821                 } else
822                         adapter->fw_ipv6_csum_support = data;
823
824                 if (ret4 == H_SUCCESS || ret6 == H_SUCCESS)
825                         adapter->rx_csum = data;
826                 else
827                         rc1 = -EIO;
828         } else {
829                 rc1 = -EIO;
830                 netdev_err(dev, "unable to change checksum offload settings."
831                                      " %d rc=%ld ret_attr=%lx\n", data, ret,
832                                      ret_attr);
833         }
834
835         if (restart)
836                 rc2 = ibmveth_open(dev);
837
838         return rc1 ? rc1 : rc2;
839 }
840
841 static int ibmveth_set_features(struct net_device *dev, u32 features)
842 {
843         struct ibmveth_adapter *adapter = netdev_priv(dev);
844         int rx_csum = !!(features & NETIF_F_RXCSUM);
845         int rc;
846
847         if (rx_csum == adapter->rx_csum)
848                 return 0;
849
850         rc = ibmveth_set_csum_offload(dev, rx_csum);
851         if (rc && !adapter->rx_csum)
852                 dev->features = features & ~(NETIF_F_ALL_CSUM | NETIF_F_RXCSUM);
853
854         return rc;
855 }
856
857 static void ibmveth_get_strings(struct net_device *dev, u32 stringset, u8 *data)
858 {
859         int i;
860
861         if (stringset != ETH_SS_STATS)
862                 return;
863
864         for (i = 0; i < ARRAY_SIZE(ibmveth_stats); i++, data += ETH_GSTRING_LEN)
865                 memcpy(data, ibmveth_stats[i].name, ETH_GSTRING_LEN);
866 }
867
868 static int ibmveth_get_sset_count(struct net_device *dev, int sset)
869 {
870         switch (sset) {
871         case ETH_SS_STATS:
872                 return ARRAY_SIZE(ibmveth_stats);
873         default:
874                 return -EOPNOTSUPP;
875         }
876 }
877
878 static void ibmveth_get_ethtool_stats(struct net_device *dev,
879                                       struct ethtool_stats *stats, u64 *data)
880 {
881         int i;
882         struct ibmveth_adapter *adapter = netdev_priv(dev);
883
884         for (i = 0; i < ARRAY_SIZE(ibmveth_stats); i++)
885                 data[i] = IBMVETH_GET_STAT(adapter, ibmveth_stats[i].offset);
886 }
887
888 static const struct ethtool_ops netdev_ethtool_ops = {
889         .get_drvinfo            = netdev_get_drvinfo,
890         .get_settings           = netdev_get_settings,
891         .get_link               = ethtool_op_get_link,
892         .get_strings            = ibmveth_get_strings,
893         .get_sset_count         = ibmveth_get_sset_count,
894         .get_ethtool_stats      = ibmveth_get_ethtool_stats,
895 };
896
897 static int ibmveth_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
898 {
899         return -EOPNOTSUPP;
900 }
901
902 #define page_offset(v) ((unsigned long)(v) & ((1 << 12) - 1))
903
904 static int ibmveth_send(struct ibmveth_adapter *adapter,
905                         union ibmveth_buf_desc *descs)
906 {
907         unsigned long correlator;
908         unsigned int retry_count;
909         unsigned long ret;
910
911         /*
912          * The retry count sets a maximum for the number of broadcast and
913          * multicast destinations within the system.
914          */
915         retry_count = 1024;
916         correlator = 0;
917         do {
918                 ret = h_send_logical_lan(adapter->vdev->unit_address,
919                                              descs[0].desc, descs[1].desc,
920                                              descs[2].desc, descs[3].desc,
921                                              descs[4].desc, descs[5].desc,
922                                              correlator, &correlator);
923         } while ((ret == H_BUSY) && (retry_count--));
924
925         if (ret != H_SUCCESS && ret != H_DROPPED) {
926                 netdev_err(adapter->netdev, "tx: h_send_logical_lan failed "
927                            "with rc=%ld\n", ret);
928                 return 1;
929         }
930
931         return 0;
932 }
933
934 static netdev_tx_t ibmveth_start_xmit(struct sk_buff *skb,
935                                       struct net_device *netdev)
936 {
937         struct ibmveth_adapter *adapter = netdev_priv(netdev);
938         unsigned int desc_flags;
939         union ibmveth_buf_desc descs[6];
940         int last, i;
941         int force_bounce = 0;
942         dma_addr_t dma_addr;
943
944         /*
945          * veth handles a maximum of 6 segments including the header, so
946          * we have to linearize the skb if there are more than this.
947          */
948         if (skb_shinfo(skb)->nr_frags > 5 && __skb_linearize(skb)) {
949                 netdev->stats.tx_dropped++;
950                 goto out;
951         }
952
953         /* veth can't checksum offload UDP */
954         if (skb->ip_summed == CHECKSUM_PARTIAL &&
955             ((skb->protocol == htons(ETH_P_IP) &&
956               ip_hdr(skb)->protocol != IPPROTO_TCP) ||
957              (skb->protocol == htons(ETH_P_IPV6) &&
958               ipv6_hdr(skb)->nexthdr != IPPROTO_TCP)) &&
959             skb_checksum_help(skb)) {
960
961                 netdev_err(netdev, "tx: failed to checksum packet\n");
962                 netdev->stats.tx_dropped++;
963                 goto out;
964         }
965
966         desc_flags = IBMVETH_BUF_VALID;
967
968         if (skb->ip_summed == CHECKSUM_PARTIAL) {
969                 unsigned char *buf = skb_transport_header(skb) +
970                                                 skb->csum_offset;
971
972                 desc_flags |= (IBMVETH_BUF_NO_CSUM | IBMVETH_BUF_CSUM_GOOD);
973
974                 /* Need to zero out the checksum */
975                 buf[0] = 0;
976                 buf[1] = 0;
977         }
978
979 retry_bounce:
980         memset(descs, 0, sizeof(descs));
981
982         /*
983          * If a linear packet is below the rx threshold then
984          * copy it into the static bounce buffer. This avoids the
985          * cost of a TCE insert and remove.
986          */
987         if (force_bounce || (!skb_is_nonlinear(skb) &&
988                                 (skb->len < tx_copybreak))) {
989                 skb_copy_from_linear_data(skb, adapter->bounce_buffer,
990                                           skb->len);
991
992                 descs[0].fields.flags_len = desc_flags | skb->len;
993                 descs[0].fields.address = adapter->bounce_buffer_dma;
994
995                 if (ibmveth_send(adapter, descs)) {
996                         adapter->tx_send_failed++;
997                         netdev->stats.tx_dropped++;
998                 } else {
999                         netdev->stats.tx_packets++;
1000                         netdev->stats.tx_bytes += skb->len;
1001                 }
1002
1003                 goto out;
1004         }
1005
1006         /* Map the header */
1007         dma_addr = dma_map_single(&adapter->vdev->dev, skb->data,
1008                                   skb_headlen(skb), DMA_TO_DEVICE);
1009         if (dma_mapping_error(&adapter->vdev->dev, dma_addr))
1010                 goto map_failed;
1011
1012         descs[0].fields.flags_len = desc_flags | skb_headlen(skb);
1013         descs[0].fields.address = dma_addr;
1014
1015         /* Map the frags */
1016         for (i = 0; i < skb_shinfo(skb)->nr_frags; i++) {
1017                 skb_frag_t *frag = &skb_shinfo(skb)->frags[i];
1018
1019                 dma_addr = dma_map_page(&adapter->vdev->dev, frag->page,
1020                                         frag->page_offset, frag->size,
1021                                         DMA_TO_DEVICE);
1022
1023                 if (dma_mapping_error(&adapter->vdev->dev, dma_addr))
1024                         goto map_failed_frags;
1025
1026                 descs[i+1].fields.flags_len = desc_flags | frag->size;
1027                 descs[i+1].fields.address = dma_addr;
1028         }
1029
1030         if (ibmveth_send(adapter, descs)) {
1031                 adapter->tx_send_failed++;
1032                 netdev->stats.tx_dropped++;
1033         } else {
1034                 netdev->stats.tx_packets++;
1035                 netdev->stats.tx_bytes += skb->len;
1036         }
1037
1038         dma_unmap_single(&adapter->vdev->dev,
1039                          descs[0].fields.address,
1040                          descs[0].fields.flags_len & IBMVETH_BUF_LEN_MASK,
1041                          DMA_TO_DEVICE);
1042
1043         for (i = 1; i < skb_shinfo(skb)->nr_frags + 1; i++)
1044                 dma_unmap_page(&adapter->vdev->dev, descs[i].fields.address,
1045                                descs[i].fields.flags_len & IBMVETH_BUF_LEN_MASK,
1046                                DMA_TO_DEVICE);
1047
1048 out:
1049         dev_kfree_skb(skb);
1050         return NETDEV_TX_OK;
1051
1052 map_failed_frags:
1053         last = i+1;
1054         for (i = 0; i < last; i++)
1055                 dma_unmap_page(&adapter->vdev->dev, descs[i].fields.address,
1056                                descs[i].fields.flags_len & IBMVETH_BUF_LEN_MASK,
1057                                DMA_TO_DEVICE);
1058
1059 map_failed:
1060         if (!firmware_has_feature(FW_FEATURE_CMO))
1061                 netdev_err(netdev, "tx: unable to map xmit buffer\n");
1062         adapter->tx_map_failed++;
1063         skb_linearize(skb);
1064         force_bounce = 1;
1065         goto retry_bounce;
1066 }
1067
1068 static int ibmveth_poll(struct napi_struct *napi, int budget)
1069 {
1070         struct ibmveth_adapter *adapter =
1071                         container_of(napi, struct ibmveth_adapter, napi);
1072         struct net_device *netdev = adapter->netdev;
1073         int frames_processed = 0;
1074         unsigned long lpar_rc;
1075
1076 restart_poll:
1077         do {
1078                 if (!ibmveth_rxq_pending_buffer(adapter))
1079                         break;
1080
1081                 smp_rmb();
1082                 if (!ibmveth_rxq_buffer_valid(adapter)) {
1083                         wmb(); /* suggested by larson1 */
1084                         adapter->rx_invalid_buffer++;
1085                         netdev_dbg(netdev, "recycling invalid buffer\n");
1086                         ibmveth_rxq_recycle_buffer(adapter);
1087                 } else {
1088                         struct sk_buff *skb, *new_skb;
1089                         int length = ibmveth_rxq_frame_length(adapter);
1090                         int offset = ibmveth_rxq_frame_offset(adapter);
1091                         int csum_good = ibmveth_rxq_csum_good(adapter);
1092
1093                         skb = ibmveth_rxq_get_buffer(adapter);
1094
1095                         new_skb = NULL;
1096                         if (length < rx_copybreak)
1097                                 new_skb = netdev_alloc_skb(netdev, length);
1098
1099                         if (new_skb) {
1100                                 skb_copy_to_linear_data(new_skb,
1101                                                         skb->data + offset,
1102                                                         length);
1103                                 if (rx_flush)
1104                                         ibmveth_flush_buffer(skb->data,
1105                                                 length + offset);
1106                                 if (!ibmveth_rxq_recycle_buffer(adapter))
1107                                         kfree_skb(skb);
1108                                 skb = new_skb;
1109                         } else {
1110                                 ibmveth_rxq_harvest_buffer(adapter);
1111                                 skb_reserve(skb, offset);
1112                         }
1113
1114                         skb_put(skb, length);
1115                         skb->protocol = eth_type_trans(skb, netdev);
1116
1117                         if (csum_good)
1118                                 skb->ip_summed = CHECKSUM_UNNECESSARY;
1119
1120                         netif_receive_skb(skb); /* send it up */
1121
1122                         netdev->stats.rx_packets++;
1123                         netdev->stats.rx_bytes += length;
1124                         frames_processed++;
1125                 }
1126         } while (frames_processed < budget);
1127
1128         ibmveth_replenish_task(adapter);
1129
1130         if (frames_processed < budget) {
1131                 /* We think we are done - reenable interrupts,
1132                  * then check once more to make sure we are done.
1133                  */
1134                 lpar_rc = h_vio_signal(adapter->vdev->unit_address,
1135                                        VIO_IRQ_ENABLE);
1136
1137                 BUG_ON(lpar_rc != H_SUCCESS);
1138
1139                 napi_complete(napi);
1140
1141                 if (ibmveth_rxq_pending_buffer(adapter) &&
1142                     napi_reschedule(napi)) {
1143                         lpar_rc = h_vio_signal(adapter->vdev->unit_address,
1144                                                VIO_IRQ_DISABLE);
1145                         goto restart_poll;
1146                 }
1147         }
1148
1149         return frames_processed;
1150 }
1151
1152 static irqreturn_t ibmveth_interrupt(int irq, void *dev_instance)
1153 {
1154         struct net_device *netdev = dev_instance;
1155         struct ibmveth_adapter *adapter = netdev_priv(netdev);
1156         unsigned long lpar_rc;
1157
1158         if (napi_schedule_prep(&adapter->napi)) {
1159                 lpar_rc = h_vio_signal(adapter->vdev->unit_address,
1160                                        VIO_IRQ_DISABLE);
1161                 BUG_ON(lpar_rc != H_SUCCESS);
1162                 __napi_schedule(&adapter->napi);
1163         }
1164         return IRQ_HANDLED;
1165 }
1166
1167 static void ibmveth_set_multicast_list(struct net_device *netdev)
1168 {
1169         struct ibmveth_adapter *adapter = netdev_priv(netdev);
1170         unsigned long lpar_rc;
1171
1172         if ((netdev->flags & IFF_PROMISC) ||
1173             (netdev_mc_count(netdev) > adapter->mcastFilterSize)) {
1174                 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
1175                                            IbmVethMcastEnableRecv |
1176                                            IbmVethMcastDisableFiltering,
1177                                            0);
1178                 if (lpar_rc != H_SUCCESS) {
1179                         netdev_err(netdev, "h_multicast_ctrl rc=%ld when "
1180                                    "entering promisc mode\n", lpar_rc);
1181                 }
1182         } else {
1183                 struct netdev_hw_addr *ha;
1184                 /* clear the filter table & disable filtering */
1185                 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
1186                                            IbmVethMcastEnableRecv |
1187                                            IbmVethMcastDisableFiltering |
1188                                            IbmVethMcastClearFilterTable,
1189                                            0);
1190                 if (lpar_rc != H_SUCCESS) {
1191                         netdev_err(netdev, "h_multicast_ctrl rc=%ld when "
1192                                    "attempting to clear filter table\n",
1193                                    lpar_rc);
1194                 }
1195                 /* add the addresses to the filter table */
1196                 netdev_for_each_mc_addr(ha, netdev) {
1197                         /* add the multicast address to the filter table */
1198                         unsigned long mcast_addr = 0;
1199                         memcpy(((char *)&mcast_addr)+2, ha->addr, 6);
1200                         lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
1201                                                    IbmVethMcastAddFilter,
1202                                                    mcast_addr);
1203                         if (lpar_rc != H_SUCCESS) {
1204                                 netdev_err(netdev, "h_multicast_ctrl rc=%ld "
1205                                            "when adding an entry to the filter "
1206                                            "table\n", lpar_rc);
1207                         }
1208                 }
1209
1210                 /* re-enable filtering */
1211                 lpar_rc = h_multicast_ctrl(adapter->vdev->unit_address,
1212                                            IbmVethMcastEnableFiltering,
1213                                            0);
1214                 if (lpar_rc != H_SUCCESS) {
1215                         netdev_err(netdev, "h_multicast_ctrl rc=%ld when "
1216                                    "enabling filtering\n", lpar_rc);
1217                 }
1218         }
1219 }
1220
1221 static int ibmveth_change_mtu(struct net_device *dev, int new_mtu)
1222 {
1223         struct ibmveth_adapter *adapter = netdev_priv(dev);
1224         struct vio_dev *viodev = adapter->vdev;
1225         int new_mtu_oh = new_mtu + IBMVETH_BUFF_OH;
1226         int i, rc;
1227         int need_restart = 0;
1228
1229         if (new_mtu < IBMVETH_MIN_MTU)
1230                 return -EINVAL;
1231
1232         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++)
1233                 if (new_mtu_oh < adapter->rx_buff_pool[i].buff_size)
1234                         break;
1235
1236         if (i == IBMVETH_NUM_BUFF_POOLS)
1237                 return -EINVAL;
1238
1239         /* Deactivate all the buffer pools so that the next loop can activate
1240            only the buffer pools necessary to hold the new MTU */
1241         if (netif_running(adapter->netdev)) {
1242                 need_restart = 1;
1243                 adapter->pool_config = 1;
1244                 ibmveth_close(adapter->netdev);
1245                 adapter->pool_config = 0;
1246         }
1247
1248         /* Look for an active buffer pool that can hold the new MTU */
1249         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++) {
1250                 adapter->rx_buff_pool[i].active = 1;
1251
1252                 if (new_mtu_oh < adapter->rx_buff_pool[i].buff_size) {
1253                         dev->mtu = new_mtu;
1254                         vio_cmo_set_dev_desired(viodev,
1255                                                 ibmveth_get_desired_dma
1256                                                 (viodev));
1257                         if (need_restart) {
1258                                 return ibmveth_open(adapter->netdev);
1259                         }
1260                         return 0;
1261                 }
1262         }
1263
1264         if (need_restart && (rc = ibmveth_open(adapter->netdev)))
1265                 return rc;
1266
1267         return -EINVAL;
1268 }
1269
1270 #ifdef CONFIG_NET_POLL_CONTROLLER
1271 static void ibmveth_poll_controller(struct net_device *dev)
1272 {
1273         ibmveth_replenish_task(netdev_priv(dev));
1274         ibmveth_interrupt(dev->irq, dev);
1275 }
1276 #endif
1277
1278 /**
1279  * ibmveth_get_desired_dma - Calculate IO memory desired by the driver
1280  *
1281  * @vdev: struct vio_dev for the device whose desired IO mem is to be returned
1282  *
1283  * Return value:
1284  *      Number of bytes of IO data the driver will need to perform well.
1285  */
1286 static unsigned long ibmveth_get_desired_dma(struct vio_dev *vdev)
1287 {
1288         struct net_device *netdev = dev_get_drvdata(&vdev->dev);
1289         struct ibmveth_adapter *adapter;
1290         unsigned long ret;
1291         int i;
1292         int rxqentries = 1;
1293
1294         /* netdev inits at probe time along with the structures we need below*/
1295         if (netdev == NULL)
1296                 return IOMMU_PAGE_ALIGN(IBMVETH_IO_ENTITLEMENT_DEFAULT);
1297
1298         adapter = netdev_priv(netdev);
1299
1300         ret = IBMVETH_BUFF_LIST_SIZE + IBMVETH_FILT_LIST_SIZE;
1301         ret += IOMMU_PAGE_ALIGN(netdev->mtu);
1302
1303         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++) {
1304                 /* add the size of the active receive buffers */
1305                 if (adapter->rx_buff_pool[i].active)
1306                         ret +=
1307                             adapter->rx_buff_pool[i].size *
1308                             IOMMU_PAGE_ALIGN(adapter->rx_buff_pool[i].
1309                                     buff_size);
1310                 rxqentries += adapter->rx_buff_pool[i].size;
1311         }
1312         /* add the size of the receive queue entries */
1313         ret += IOMMU_PAGE_ALIGN(rxqentries * sizeof(struct ibmveth_rx_q_entry));
1314
1315         return ret;
1316 }
1317
1318 static const struct net_device_ops ibmveth_netdev_ops = {
1319         .ndo_open               = ibmveth_open,
1320         .ndo_stop               = ibmveth_close,
1321         .ndo_start_xmit         = ibmveth_start_xmit,
1322         .ndo_set_multicast_list = ibmveth_set_multicast_list,
1323         .ndo_do_ioctl           = ibmveth_ioctl,
1324         .ndo_change_mtu         = ibmveth_change_mtu,
1325         .ndo_fix_features       = ibmveth_fix_features,
1326         .ndo_set_features       = ibmveth_set_features,
1327         .ndo_validate_addr      = eth_validate_addr,
1328         .ndo_set_mac_address    = eth_mac_addr,
1329 #ifdef CONFIG_NET_POLL_CONTROLLER
1330         .ndo_poll_controller    = ibmveth_poll_controller,
1331 #endif
1332 };
1333
1334 static int __devinit ibmveth_probe(struct vio_dev *dev,
1335                                    const struct vio_device_id *id)
1336 {
1337         int rc, i;
1338         struct net_device *netdev;
1339         struct ibmveth_adapter *adapter;
1340         unsigned char *mac_addr_p;
1341         unsigned int *mcastFilterSize_p;
1342
1343         dev_dbg(&dev->dev, "entering ibmveth_probe for UA 0x%x\n",
1344                 dev->unit_address);
1345
1346         mac_addr_p = (unsigned char *)vio_get_attribute(dev, VETH_MAC_ADDR,
1347                                                         NULL);
1348         if (!mac_addr_p) {
1349                 dev_err(&dev->dev, "Can't find VETH_MAC_ADDR attribute\n");
1350                 return -EINVAL;
1351         }
1352
1353         mcastFilterSize_p = (unsigned int *)vio_get_attribute(dev,
1354                                                 VETH_MCAST_FILTER_SIZE, NULL);
1355         if (!mcastFilterSize_p) {
1356                 dev_err(&dev->dev, "Can't find VETH_MCAST_FILTER_SIZE "
1357                         "attribute\n");
1358                 return -EINVAL;
1359         }
1360
1361         netdev = alloc_etherdev(sizeof(struct ibmveth_adapter));
1362
1363         if (!netdev)
1364                 return -ENOMEM;
1365
1366         adapter = netdev_priv(netdev);
1367         dev_set_drvdata(&dev->dev, netdev);
1368
1369         adapter->vdev = dev;
1370         adapter->netdev = netdev;
1371         adapter->mcastFilterSize = *mcastFilterSize_p;
1372         adapter->pool_config = 0;
1373
1374         netif_napi_add(netdev, &adapter->napi, ibmveth_poll, 16);
1375
1376         /*
1377          * Some older boxes running PHYP non-natively have an OF that returns
1378          * a 8-byte local-mac-address field (and the first 2 bytes have to be
1379          * ignored) while newer boxes' OF return a 6-byte field. Note that
1380          * IEEE 1275 specifies that local-mac-address must be a 6-byte field.
1381          * The RPA doc specifies that the first byte must be 10b, so we'll
1382          * just look for it to solve this 8 vs. 6 byte field issue
1383          */
1384         if ((*mac_addr_p & 0x3) != 0x02)
1385                 mac_addr_p += 2;
1386
1387         adapter->mac_addr = 0;
1388         memcpy(&adapter->mac_addr, mac_addr_p, 6);
1389
1390         netdev->irq = dev->irq;
1391         netdev->netdev_ops = &ibmveth_netdev_ops;
1392         netdev->ethtool_ops = &netdev_ethtool_ops;
1393         SET_NETDEV_DEV(netdev, &dev->dev);
1394         netdev->hw_features = NETIF_F_SG | NETIF_F_RXCSUM |
1395                 NETIF_F_IP_CSUM | NETIF_F_IPV6_CSUM;
1396         netdev->features |= netdev->hw_features;
1397
1398         memcpy(netdev->dev_addr, &adapter->mac_addr, netdev->addr_len);
1399
1400         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++) {
1401                 struct kobject *kobj = &adapter->rx_buff_pool[i].kobj;
1402                 int error;
1403
1404                 ibmveth_init_buffer_pool(&adapter->rx_buff_pool[i], i,
1405                                          pool_count[i], pool_size[i],
1406                                          pool_active[i]);
1407                 error = kobject_init_and_add(kobj, &ktype_veth_pool,
1408                                              &dev->dev.kobj, "pool%d", i);
1409                 if (!error)
1410                         kobject_uevent(kobj, KOBJ_ADD);
1411         }
1412
1413         netdev_dbg(netdev, "adapter @ 0x%p\n", adapter);
1414
1415         adapter->buffer_list_dma = DMA_ERROR_CODE;
1416         adapter->filter_list_dma = DMA_ERROR_CODE;
1417         adapter->rx_queue.queue_dma = DMA_ERROR_CODE;
1418
1419         netdev_dbg(netdev, "registering netdev...\n");
1420
1421         ibmveth_set_features(netdev, netdev->features);
1422
1423         rc = register_netdev(netdev);
1424
1425         if (rc) {
1426                 netdev_dbg(netdev, "failed to register netdev rc=%d\n", rc);
1427                 free_netdev(netdev);
1428                 return rc;
1429         }
1430
1431         netdev_dbg(netdev, "registered\n");
1432
1433         return 0;
1434 }
1435
1436 static int __devexit ibmveth_remove(struct vio_dev *dev)
1437 {
1438         struct net_device *netdev = dev_get_drvdata(&dev->dev);
1439         struct ibmveth_adapter *adapter = netdev_priv(netdev);
1440         int i;
1441
1442         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++)
1443                 kobject_put(&adapter->rx_buff_pool[i].kobj);
1444
1445         unregister_netdev(netdev);
1446
1447         free_netdev(netdev);
1448         dev_set_drvdata(&dev->dev, NULL);
1449
1450         return 0;
1451 }
1452
1453 static struct attribute veth_active_attr;
1454 static struct attribute veth_num_attr;
1455 static struct attribute veth_size_attr;
1456
1457 static ssize_t veth_pool_show(struct kobject *kobj,
1458                               struct attribute *attr, char *buf)
1459 {
1460         struct ibmveth_buff_pool *pool = container_of(kobj,
1461                                                       struct ibmveth_buff_pool,
1462                                                       kobj);
1463
1464         if (attr == &veth_active_attr)
1465                 return sprintf(buf, "%d\n", pool->active);
1466         else if (attr == &veth_num_attr)
1467                 return sprintf(buf, "%d\n", pool->size);
1468         else if (attr == &veth_size_attr)
1469                 return sprintf(buf, "%d\n", pool->buff_size);
1470         return 0;
1471 }
1472
1473 static ssize_t veth_pool_store(struct kobject *kobj, struct attribute *attr,
1474                                const char *buf, size_t count)
1475 {
1476         struct ibmveth_buff_pool *pool = container_of(kobj,
1477                                                       struct ibmveth_buff_pool,
1478                                                       kobj);
1479         struct net_device *netdev = dev_get_drvdata(
1480             container_of(kobj->parent, struct device, kobj));
1481         struct ibmveth_adapter *adapter = netdev_priv(netdev);
1482         long value = simple_strtol(buf, NULL, 10);
1483         long rc;
1484
1485         if (attr == &veth_active_attr) {
1486                 if (value && !pool->active) {
1487                         if (netif_running(netdev)) {
1488                                 if (ibmveth_alloc_buffer_pool(pool)) {
1489                                         netdev_err(netdev,
1490                                                    "unable to alloc pool\n");
1491                                         return -ENOMEM;
1492                                 }
1493                                 pool->active = 1;
1494                                 adapter->pool_config = 1;
1495                                 ibmveth_close(netdev);
1496                                 adapter->pool_config = 0;
1497                                 if ((rc = ibmveth_open(netdev)))
1498                                         return rc;
1499                         } else {
1500                                 pool->active = 1;
1501                         }
1502                 } else if (!value && pool->active) {
1503                         int mtu = netdev->mtu + IBMVETH_BUFF_OH;
1504                         int i;
1505                         /* Make sure there is a buffer pool with buffers that
1506                            can hold a packet of the size of the MTU */
1507                         for (i = 0; i < IBMVETH_NUM_BUFF_POOLS; i++) {
1508                                 if (pool == &adapter->rx_buff_pool[i])
1509                                         continue;
1510                                 if (!adapter->rx_buff_pool[i].active)
1511                                         continue;
1512                                 if (mtu <= adapter->rx_buff_pool[i].buff_size)
1513                                         break;
1514                         }
1515
1516                         if (i == IBMVETH_NUM_BUFF_POOLS) {
1517                                 netdev_err(netdev, "no active pool >= MTU\n");
1518                                 return -EPERM;
1519                         }
1520
1521                         if (netif_running(netdev)) {
1522                                 adapter->pool_config = 1;
1523                                 ibmveth_close(netdev);
1524                                 pool->active = 0;
1525                                 adapter->pool_config = 0;
1526                                 if ((rc = ibmveth_open(netdev)))
1527                                         return rc;
1528                         }
1529                         pool->active = 0;
1530                 }
1531         } else if (attr == &veth_num_attr) {
1532                 if (value <= 0 || value > IBMVETH_MAX_POOL_COUNT) {
1533                         return -EINVAL;
1534                 } else {
1535                         if (netif_running(netdev)) {
1536                                 adapter->pool_config = 1;
1537                                 ibmveth_close(netdev);
1538                                 adapter->pool_config = 0;
1539                                 pool->size = value;
1540                                 if ((rc = ibmveth_open(netdev)))
1541                                         return rc;
1542                         } else {
1543                                 pool->size = value;
1544                         }
1545                 }
1546         } else if (attr == &veth_size_attr) {
1547                 if (value <= IBMVETH_BUFF_OH || value > IBMVETH_MAX_BUF_SIZE) {
1548                         return -EINVAL;
1549                 } else {
1550                         if (netif_running(netdev)) {
1551                                 adapter->pool_config = 1;
1552                                 ibmveth_close(netdev);
1553                                 adapter->pool_config = 0;
1554                                 pool->buff_size = value;
1555                                 if ((rc = ibmveth_open(netdev)))
1556                                         return rc;
1557                         } else {
1558                                 pool->buff_size = value;
1559                         }
1560                 }
1561         }
1562
1563         /* kick the interrupt handler to allocate/deallocate pools */
1564         ibmveth_interrupt(netdev->irq, netdev);
1565         return count;
1566 }
1567
1568
1569 #define ATTR(_name, _mode)                              \
1570         struct attribute veth_##_name##_attr = {        \
1571         .name = __stringify(_name), .mode = _mode,      \
1572         };
1573
1574 static ATTR(active, 0644);
1575 static ATTR(num, 0644);
1576 static ATTR(size, 0644);
1577
1578 static struct attribute *veth_pool_attrs[] = {
1579         &veth_active_attr,
1580         &veth_num_attr,
1581         &veth_size_attr,
1582         NULL,
1583 };
1584
1585 static const struct sysfs_ops veth_pool_ops = {
1586         .show   = veth_pool_show,
1587         .store  = veth_pool_store,
1588 };
1589
1590 static struct kobj_type ktype_veth_pool = {
1591         .release        = NULL,
1592         .sysfs_ops      = &veth_pool_ops,
1593         .default_attrs  = veth_pool_attrs,
1594 };
1595
1596 static int ibmveth_resume(struct device *dev)
1597 {
1598         struct net_device *netdev = dev_get_drvdata(dev);
1599         ibmveth_interrupt(netdev->irq, netdev);
1600         return 0;
1601 }
1602
1603 static struct vio_device_id ibmveth_device_table[] __devinitdata = {
1604         { "network", "IBM,l-lan"},
1605         { "", "" }
1606 };
1607 MODULE_DEVICE_TABLE(vio, ibmveth_device_table);
1608
1609 static struct dev_pm_ops ibmveth_pm_ops = {
1610         .resume = ibmveth_resume
1611 };
1612
1613 static struct vio_driver ibmveth_driver = {
1614         .id_table       = ibmveth_device_table,
1615         .probe          = ibmveth_probe,
1616         .remove         = ibmveth_remove,
1617         .get_desired_dma = ibmveth_get_desired_dma,
1618         .driver         = {
1619                 .name   = ibmveth_driver_name,
1620                 .owner  = THIS_MODULE,
1621                 .pm = &ibmveth_pm_ops,
1622         }
1623 };
1624
1625 static int __init ibmveth_module_init(void)
1626 {
1627         printk(KERN_DEBUG "%s: %s %s\n", ibmveth_driver_name,
1628                ibmveth_driver_string, ibmveth_driver_version);
1629
1630         return vio_register_driver(&ibmveth_driver);
1631 }
1632
1633 static void __exit ibmveth_module_exit(void)
1634 {
1635         vio_unregister_driver(&ibmveth_driver);
1636 }
1637
1638 module_init(ibmveth_module_init);
1639 module_exit(ibmveth_module_exit);