Linux-2.6.12-rc2
[linux-2.6/next.git] / drivers / net / iseries_veth.c
blob855f8b2cf13b6f83d1b41011253d514b22e5cc2c
1 /* File veth.c created by Kyle A. Lucke on Mon Aug 7 2000. */
2 /*
3 * IBM eServer iSeries Virtual Ethernet Device Driver
4 * Copyright (C) 2001 Kyle A. Lucke (klucke@us.ibm.com), IBM Corp.
5 * Substantially cleaned up by:
6 * Copyright (C) 2003 David Gibson <dwg@au1.ibm.com>, IBM Corporation.
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of the
11 * License, or (at your option) any later version.
13 * This program is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * General Public License for more details.
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
24 * This module implements the virtual ethernet device for iSeries LPAR
25 * Linux. It uses hypervisor message passing to implement an
26 * ethernet-like network device communicating between partitions on
27 * the iSeries.
29 * The iSeries LPAR hypervisor currently allows for up to 16 different
30 * virtual ethernets. These are all dynamically configurable on
31 * OS/400 partitions, but dynamic configuration is not supported under
32 * Linux yet. An ethXX network device will be created for each
33 * virtual ethernet this partition is connected to.
35 * - This driver is responsible for routing packets to and from other
36 * partitions. The MAC addresses used by the virtual ethernets
37 * contains meaning and must not be modified.
39 * - Having 2 virtual ethernets to the same remote partition DOES NOT
40 * double the available bandwidth. The 2 devices will share the
41 * available hypervisor bandwidth.
43 * - If you send a packet to your own mac address, it will just be
44 * dropped, you won't get it on the receive side.
46 * - Multicast is implemented by sending the frame frame to every
47 * other partition. It is the responsibility of the receiving
48 * partition to filter the addresses desired.
50 * Tunable parameters:
52 * VETH_NUMBUFFERS: This compile time option defaults to 120. It
53 * controls how much memory Linux will allocate per remote partition
54 * it is communicating with. It can be thought of as the maximum
55 * number of packets outstanding to a remote partition at a time.
58 #include <linux/config.h>
59 #include <linux/module.h>
60 #include <linux/version.h>
61 #include <linux/types.h>
62 #include <linux/errno.h>
63 #include <linux/ioport.h>
64 #include <linux/kernel.h>
65 #include <linux/netdevice.h>
66 #include <linux/etherdevice.h>
67 #include <linux/skbuff.h>
68 #include <linux/init.h>
69 #include <linux/delay.h>
70 #include <linux/mm.h>
71 #include <linux/ethtool.h>
72 #include <asm/iSeries/mf.h>
73 #include <asm/iSeries/iSeries_pci.h>
74 #include <asm/uaccess.h>
76 #include <asm/iSeries/HvLpConfig.h>
77 #include <asm/iSeries/HvTypes.h>
78 #include <asm/iSeries/HvLpEvent.h>
79 #include <asm/iommu.h>
80 #include <asm/vio.h>
82 #include "iseries_veth.h"
84 MODULE_AUTHOR("Kyle Lucke <klucke@us.ibm.com>");
85 MODULE_DESCRIPTION("iSeries Virtual ethernet driver");
86 MODULE_LICENSE("GPL");
88 #define VETH_NUMBUFFERS (120)
89 #define VETH_ACKTIMEOUT (1000000) /* microseconds */
90 #define VETH_MAX_MCAST (12)
92 #define VETH_MAX_MTU (9000)
94 #if VETH_NUMBUFFERS < 10
95 #define ACK_THRESHOLD (1)
96 #elif VETH_NUMBUFFERS < 20
97 #define ACK_THRESHOLD (4)
98 #elif VETH_NUMBUFFERS < 40
99 #define ACK_THRESHOLD (10)
100 #else
101 #define ACK_THRESHOLD (20)
102 #endif
104 #define VETH_STATE_SHUTDOWN (0x0001)
105 #define VETH_STATE_OPEN (0x0002)
106 #define VETH_STATE_RESET (0x0004)
107 #define VETH_STATE_SENTMON (0x0008)
108 #define VETH_STATE_SENTCAPS (0x0010)
109 #define VETH_STATE_GOTCAPACK (0x0020)
110 #define VETH_STATE_GOTCAPS (0x0040)
111 #define VETH_STATE_SENTCAPACK (0x0080)
112 #define VETH_STATE_READY (0x0100)
114 struct veth_msg {
115 struct veth_msg *next;
116 struct VethFramesData data;
117 int token;
118 unsigned long in_use;
119 struct sk_buff *skb;
120 struct device *dev;
123 struct veth_lpar_connection {
124 HvLpIndex remote_lp;
125 struct work_struct statemachine_wq;
126 struct veth_msg *msgs;
127 int num_events;
128 struct VethCapData local_caps;
130 struct timer_list ack_timer;
132 spinlock_t lock;
133 unsigned long state;
134 HvLpInstanceId src_inst;
135 HvLpInstanceId dst_inst;
136 struct VethLpEvent cap_event, cap_ack_event;
137 u16 pending_acks[VETH_MAX_ACKS_PER_MSG];
138 u32 num_pending_acks;
140 int num_ack_events;
141 struct VethCapData remote_caps;
142 u32 ack_timeout;
144 spinlock_t msg_stack_lock;
145 struct veth_msg *msg_stack_head;
148 struct veth_port {
149 struct device *dev;
150 struct net_device_stats stats;
151 u64 mac_addr;
152 HvLpIndexMap lpar_map;
154 spinlock_t pending_gate;
155 struct sk_buff *pending_skb;
156 HvLpIndexMap pending_lpmask;
158 rwlock_t mcast_gate;
159 int promiscuous;
160 int all_mcast;
161 int num_mcast;
162 u64 mcast_addr[VETH_MAX_MCAST];
165 static HvLpIndex this_lp;
166 static struct veth_lpar_connection *veth_cnx[HVMAXARCHITECTEDLPS]; /* = 0 */
167 static struct net_device *veth_dev[HVMAXARCHITECTEDVIRTUALLANS]; /* = 0 */
169 static int veth_start_xmit(struct sk_buff *skb, struct net_device *dev);
170 static void veth_recycle_msg(struct veth_lpar_connection *, struct veth_msg *);
171 static void veth_flush_pending(struct veth_lpar_connection *cnx);
172 static void veth_receive(struct veth_lpar_connection *, struct VethLpEvent *);
173 static void veth_timed_ack(unsigned long connectionPtr);
176 * Utility functions
179 #define veth_printk(prio, fmt, args...) \
180 printk(prio "%s: " fmt, __FILE__, ## args)
182 #define veth_error(fmt, args...) \
183 printk(KERN_ERR "(%s:%3.3d) ERROR: " fmt, __FILE__, __LINE__ , ## args)
185 static inline void veth_stack_push(struct veth_lpar_connection *cnx,
186 struct veth_msg *msg)
188 unsigned long flags;
190 spin_lock_irqsave(&cnx->msg_stack_lock, flags);
191 msg->next = cnx->msg_stack_head;
192 cnx->msg_stack_head = msg;
193 spin_unlock_irqrestore(&cnx->msg_stack_lock, flags);
196 static inline struct veth_msg *veth_stack_pop(struct veth_lpar_connection *cnx)
198 unsigned long flags;
199 struct veth_msg *msg;
201 spin_lock_irqsave(&cnx->msg_stack_lock, flags);
202 msg = cnx->msg_stack_head;
203 if (msg)
204 cnx->msg_stack_head = cnx->msg_stack_head->next;
205 spin_unlock_irqrestore(&cnx->msg_stack_lock, flags);
206 return msg;
209 static inline HvLpEvent_Rc
210 veth_signalevent(struct veth_lpar_connection *cnx, u16 subtype,
211 HvLpEvent_AckInd ackind, HvLpEvent_AckType acktype,
212 u64 token,
213 u64 data1, u64 data2, u64 data3, u64 data4, u64 data5)
215 return HvCallEvent_signalLpEventFast(cnx->remote_lp,
216 HvLpEvent_Type_VirtualLan,
217 subtype, ackind, acktype,
218 cnx->src_inst,
219 cnx->dst_inst,
220 token, data1, data2, data3,
221 data4, data5);
224 static inline HvLpEvent_Rc veth_signaldata(struct veth_lpar_connection *cnx,
225 u16 subtype, u64 token, void *data)
227 u64 *p = (u64 *) data;
229 return veth_signalevent(cnx, subtype, HvLpEvent_AckInd_NoAck,
230 HvLpEvent_AckType_ImmediateAck,
231 token, p[0], p[1], p[2], p[3], p[4]);
234 struct veth_allocation {
235 struct completion c;
236 int num;
239 static void veth_complete_allocation(void *parm, int number)
241 struct veth_allocation *vc = (struct veth_allocation *)parm;
243 vc->num = number;
244 complete(&vc->c);
247 static int veth_allocate_events(HvLpIndex rlp, int number)
249 struct veth_allocation vc = { COMPLETION_INITIALIZER(vc.c), 0 };
251 mf_allocate_lp_events(rlp, HvLpEvent_Type_VirtualLan,
252 sizeof(struct VethLpEvent), number,
253 &veth_complete_allocation, &vc);
254 wait_for_completion(&vc.c);
256 return vc.num;
260 * LPAR connection code
263 static inline void veth_kick_statemachine(struct veth_lpar_connection *cnx)
265 schedule_work(&cnx->statemachine_wq);
268 static void veth_take_cap(struct veth_lpar_connection *cnx,
269 struct VethLpEvent *event)
271 unsigned long flags;
273 spin_lock_irqsave(&cnx->lock, flags);
274 /* Receiving caps may mean the other end has just come up, so
275 * we need to reload the instance ID of the far end */
276 cnx->dst_inst =
277 HvCallEvent_getTargetLpInstanceId(cnx->remote_lp,
278 HvLpEvent_Type_VirtualLan);
280 if (cnx->state & VETH_STATE_GOTCAPS) {
281 veth_error("Received a second capabilities from lpar %d\n",
282 cnx->remote_lp);
283 event->base_event.xRc = HvLpEvent_Rc_BufferNotAvailable;
284 HvCallEvent_ackLpEvent((struct HvLpEvent *) event);
285 } else {
286 memcpy(&cnx->cap_event, event, sizeof(cnx->cap_event));
287 cnx->state |= VETH_STATE_GOTCAPS;
288 veth_kick_statemachine(cnx);
290 spin_unlock_irqrestore(&cnx->lock, flags);
293 static void veth_take_cap_ack(struct veth_lpar_connection *cnx,
294 struct VethLpEvent *event)
296 unsigned long flags;
298 spin_lock_irqsave(&cnx->lock, flags);
299 if (cnx->state & VETH_STATE_GOTCAPACK) {
300 veth_error("Received a second capabilities ack from lpar %d\n",
301 cnx->remote_lp);
302 } else {
303 memcpy(&cnx->cap_ack_event, event,
304 sizeof(&cnx->cap_ack_event));
305 cnx->state |= VETH_STATE_GOTCAPACK;
306 veth_kick_statemachine(cnx);
308 spin_unlock_irqrestore(&cnx->lock, flags);
311 static void veth_take_monitor_ack(struct veth_lpar_connection *cnx,
312 struct VethLpEvent *event)
314 unsigned long flags;
316 spin_lock_irqsave(&cnx->lock, flags);
317 veth_printk(KERN_DEBUG, "Monitor ack returned for lpar %d\n",
318 cnx->remote_lp);
319 cnx->state |= VETH_STATE_RESET;
320 veth_kick_statemachine(cnx);
321 spin_unlock_irqrestore(&cnx->lock, flags);
324 static void veth_handle_ack(struct VethLpEvent *event)
326 HvLpIndex rlp = event->base_event.xTargetLp;
327 struct veth_lpar_connection *cnx = veth_cnx[rlp];
329 BUG_ON(! cnx);
331 switch (event->base_event.xSubtype) {
332 case VethEventTypeCap:
333 veth_take_cap_ack(cnx, event);
334 break;
335 case VethEventTypeMonitor:
336 veth_take_monitor_ack(cnx, event);
337 break;
338 default:
339 veth_error("Unknown ack type %d from lpar %d\n",
340 event->base_event.xSubtype, rlp);
344 static void veth_handle_int(struct VethLpEvent *event)
346 HvLpIndex rlp = event->base_event.xSourceLp;
347 struct veth_lpar_connection *cnx = veth_cnx[rlp];
348 unsigned long flags;
349 int i;
351 BUG_ON(! cnx);
353 switch (event->base_event.xSubtype) {
354 case VethEventTypeCap:
355 veth_take_cap(cnx, event);
356 break;
357 case VethEventTypeMonitor:
358 /* do nothing... this'll hang out here til we're dead,
359 * and the hypervisor will return it for us. */
360 break;
361 case VethEventTypeFramesAck:
362 spin_lock_irqsave(&cnx->lock, flags);
363 for (i = 0; i < VETH_MAX_ACKS_PER_MSG; ++i) {
364 u16 msgnum = event->u.frames_ack_data.token[i];
366 if (msgnum < VETH_NUMBUFFERS)
367 veth_recycle_msg(cnx, cnx->msgs + msgnum);
369 spin_unlock_irqrestore(&cnx->lock, flags);
370 veth_flush_pending(cnx);
371 break;
372 case VethEventTypeFrames:
373 veth_receive(cnx, event);
374 break;
375 default:
376 veth_error("Unknown interrupt type %d from lpar %d\n",
377 event->base_event.xSubtype, rlp);
381 static void veth_handle_event(struct HvLpEvent *event, struct pt_regs *regs)
383 struct VethLpEvent *veth_event = (struct VethLpEvent *)event;
385 if (event->xFlags.xFunction == HvLpEvent_Function_Ack)
386 veth_handle_ack(veth_event);
387 else if (event->xFlags.xFunction == HvLpEvent_Function_Int)
388 veth_handle_int(veth_event);
391 static int veth_process_caps(struct veth_lpar_connection *cnx)
393 struct VethCapData *remote_caps = &cnx->remote_caps;
394 int num_acks_needed;
396 /* Convert timer to jiffies */
397 cnx->ack_timeout = remote_caps->ack_timeout * HZ / 1000000;
399 if ( (remote_caps->num_buffers == 0)
400 || (remote_caps->ack_threshold > VETH_MAX_ACKS_PER_MSG)
401 || (remote_caps->ack_threshold == 0)
402 || (cnx->ack_timeout == 0) ) {
403 veth_error("Received incompatible capabilities from lpar %d\n",
404 cnx->remote_lp);
405 return HvLpEvent_Rc_InvalidSubtypeData;
408 num_acks_needed = (remote_caps->num_buffers
409 / remote_caps->ack_threshold) + 1;
411 /* FIXME: locking on num_ack_events? */
412 if (cnx->num_ack_events < num_acks_needed) {
413 int num;
415 num = veth_allocate_events(cnx->remote_lp,
416 num_acks_needed-cnx->num_ack_events);
417 if (num > 0)
418 cnx->num_ack_events += num;
420 if (cnx->num_ack_events < num_acks_needed) {
421 veth_error("Couldn't allocate enough ack events for lpar %d\n",
422 cnx->remote_lp);
424 return HvLpEvent_Rc_BufferNotAvailable;
429 return HvLpEvent_Rc_Good;
432 /* FIXME: The gotos here are a bit dubious */
433 static void veth_statemachine(void *p)
435 struct veth_lpar_connection *cnx = (struct veth_lpar_connection *)p;
436 int rlp = cnx->remote_lp;
437 int rc;
439 spin_lock_irq(&cnx->lock);
441 restart:
442 if (cnx->state & VETH_STATE_RESET) {
443 int i;
445 del_timer(&cnx->ack_timer);
447 if (cnx->state & VETH_STATE_OPEN)
448 HvCallEvent_closeLpEventPath(cnx->remote_lp,
449 HvLpEvent_Type_VirtualLan);
451 /* reset ack data */
452 memset(&cnx->pending_acks, 0xff, sizeof (cnx->pending_acks));
453 cnx->num_pending_acks = 0;
455 cnx->state &= ~(VETH_STATE_RESET | VETH_STATE_SENTMON
456 | VETH_STATE_OPEN | VETH_STATE_SENTCAPS
457 | VETH_STATE_GOTCAPACK | VETH_STATE_GOTCAPS
458 | VETH_STATE_SENTCAPACK | VETH_STATE_READY);
460 /* Clean up any leftover messages */
461 if (cnx->msgs)
462 for (i = 0; i < VETH_NUMBUFFERS; ++i)
463 veth_recycle_msg(cnx, cnx->msgs + i);
464 spin_unlock_irq(&cnx->lock);
465 veth_flush_pending(cnx);
466 spin_lock_irq(&cnx->lock);
467 if (cnx->state & VETH_STATE_RESET)
468 goto restart;
471 if (cnx->state & VETH_STATE_SHUTDOWN)
472 /* It's all over, do nothing */
473 goto out;
475 if ( !(cnx->state & VETH_STATE_OPEN) ) {
476 if (! cnx->msgs || (cnx->num_events < (2 + VETH_NUMBUFFERS)) )
477 goto cant_cope;
479 HvCallEvent_openLpEventPath(rlp, HvLpEvent_Type_VirtualLan);
480 cnx->src_inst =
481 HvCallEvent_getSourceLpInstanceId(rlp,
482 HvLpEvent_Type_VirtualLan);
483 cnx->dst_inst =
484 HvCallEvent_getTargetLpInstanceId(rlp,
485 HvLpEvent_Type_VirtualLan);
486 cnx->state |= VETH_STATE_OPEN;
489 if ( (cnx->state & VETH_STATE_OPEN)
490 && !(cnx->state & VETH_STATE_SENTMON) ) {
491 rc = veth_signalevent(cnx, VethEventTypeMonitor,
492 HvLpEvent_AckInd_DoAck,
493 HvLpEvent_AckType_DeferredAck,
494 0, 0, 0, 0, 0, 0);
496 if (rc == HvLpEvent_Rc_Good) {
497 cnx->state |= VETH_STATE_SENTMON;
498 } else {
499 if ( (rc != HvLpEvent_Rc_PartitionDead)
500 && (rc != HvLpEvent_Rc_PathClosed) )
501 veth_error("Error sending monitor to "
502 "lpar %d, rc=%x\n",
503 rlp, (int) rc);
505 /* Oh well, hope we get a cap from the other
506 * end and do better when that kicks us */
507 goto out;
511 if ( (cnx->state & VETH_STATE_OPEN)
512 && !(cnx->state & VETH_STATE_SENTCAPS)) {
513 u64 *rawcap = (u64 *)&cnx->local_caps;
515 rc = veth_signalevent(cnx, VethEventTypeCap,
516 HvLpEvent_AckInd_DoAck,
517 HvLpEvent_AckType_ImmediateAck,
518 0, rawcap[0], rawcap[1], rawcap[2],
519 rawcap[3], rawcap[4]);
521 if (rc == HvLpEvent_Rc_Good) {
522 cnx->state |= VETH_STATE_SENTCAPS;
523 } else {
524 if ( (rc != HvLpEvent_Rc_PartitionDead)
525 && (rc != HvLpEvent_Rc_PathClosed) )
526 veth_error("Error sending caps to "
527 "lpar %d, rc=%x\n",
528 rlp, (int) rc);
529 /* Oh well, hope we get a cap from the other
530 * end and do better when that kicks us */
531 goto out;
535 if ((cnx->state & VETH_STATE_GOTCAPS)
536 && !(cnx->state & VETH_STATE_SENTCAPACK)) {
537 struct VethCapData *remote_caps = &cnx->remote_caps;
539 memcpy(remote_caps, &cnx->cap_event.u.caps_data,
540 sizeof(*remote_caps));
542 spin_unlock_irq(&cnx->lock);
543 rc = veth_process_caps(cnx);
544 spin_lock_irq(&cnx->lock);
546 /* We dropped the lock, so recheck for anything which
547 * might mess us up */
548 if (cnx->state & (VETH_STATE_RESET|VETH_STATE_SHUTDOWN))
549 goto restart;
551 cnx->cap_event.base_event.xRc = rc;
552 HvCallEvent_ackLpEvent((struct HvLpEvent *)&cnx->cap_event);
553 if (rc == HvLpEvent_Rc_Good)
554 cnx->state |= VETH_STATE_SENTCAPACK;
555 else
556 goto cant_cope;
559 if ((cnx->state & VETH_STATE_GOTCAPACK)
560 && (cnx->state & VETH_STATE_GOTCAPS)
561 && !(cnx->state & VETH_STATE_READY)) {
562 if (cnx->cap_ack_event.base_event.xRc == HvLpEvent_Rc_Good) {
563 /* Start the ACK timer */
564 cnx->ack_timer.expires = jiffies + cnx->ack_timeout;
565 add_timer(&cnx->ack_timer);
566 cnx->state |= VETH_STATE_READY;
567 } else {
568 veth_printk(KERN_ERR, "Caps rejected (rc=%d) by "
569 "lpar %d\n",
570 cnx->cap_ack_event.base_event.xRc,
571 rlp);
572 goto cant_cope;
576 out:
577 spin_unlock_irq(&cnx->lock);
578 return;
580 cant_cope:
581 /* FIXME: we get here if something happens we really can't
582 * cope with. The link will never work once we get here, and
583 * all we can do is not lock the rest of the system up */
584 veth_error("Badness on connection to lpar %d (state=%04lx) "
585 " - shutting down\n", rlp, cnx->state);
586 cnx->state |= VETH_STATE_SHUTDOWN;
587 spin_unlock_irq(&cnx->lock);
590 static int veth_init_connection(u8 rlp)
592 struct veth_lpar_connection *cnx;
593 struct veth_msg *msgs;
594 int i;
596 if ( (rlp == this_lp)
597 || ! HvLpConfig_doLpsCommunicateOnVirtualLan(this_lp, rlp) )
598 return 0;
600 cnx = kmalloc(sizeof(*cnx), GFP_KERNEL);
601 if (! cnx)
602 return -ENOMEM;
603 memset(cnx, 0, sizeof(*cnx));
605 cnx->remote_lp = rlp;
606 spin_lock_init(&cnx->lock);
607 INIT_WORK(&cnx->statemachine_wq, veth_statemachine, cnx);
608 init_timer(&cnx->ack_timer);
609 cnx->ack_timer.function = veth_timed_ack;
610 cnx->ack_timer.data = (unsigned long) cnx;
611 memset(&cnx->pending_acks, 0xff, sizeof (cnx->pending_acks));
613 veth_cnx[rlp] = cnx;
615 msgs = kmalloc(VETH_NUMBUFFERS * sizeof(struct veth_msg), GFP_KERNEL);
616 if (! msgs) {
617 veth_error("Can't allocate buffers for lpar %d\n", rlp);
618 return -ENOMEM;
621 cnx->msgs = msgs;
622 memset(msgs, 0, VETH_NUMBUFFERS * sizeof(struct veth_msg));
623 spin_lock_init(&cnx->msg_stack_lock);
625 for (i = 0; i < VETH_NUMBUFFERS; i++) {
626 msgs[i].token = i;
627 veth_stack_push(cnx, msgs + i);
630 cnx->num_events = veth_allocate_events(rlp, 2 + VETH_NUMBUFFERS);
632 if (cnx->num_events < (2 + VETH_NUMBUFFERS)) {
633 veth_error("Can't allocate events for lpar %d, only got %d\n",
634 rlp, cnx->num_events);
635 return -ENOMEM;
638 cnx->local_caps.num_buffers = VETH_NUMBUFFERS;
639 cnx->local_caps.ack_threshold = ACK_THRESHOLD;
640 cnx->local_caps.ack_timeout = VETH_ACKTIMEOUT;
642 return 0;
645 static void veth_stop_connection(u8 rlp)
647 struct veth_lpar_connection *cnx = veth_cnx[rlp];
649 if (! cnx)
650 return;
652 spin_lock_irq(&cnx->lock);
653 cnx->state |= VETH_STATE_RESET | VETH_STATE_SHUTDOWN;
654 veth_kick_statemachine(cnx);
655 spin_unlock_irq(&cnx->lock);
657 flush_scheduled_work();
659 /* FIXME: not sure if this is necessary - will already have
660 * been deleted by the state machine, just want to make sure
661 * its not running any more */
662 del_timer_sync(&cnx->ack_timer);
664 if (cnx->num_events > 0)
665 mf_deallocate_lp_events(cnx->remote_lp,
666 HvLpEvent_Type_VirtualLan,
667 cnx->num_events,
668 NULL, NULL);
669 if (cnx->num_ack_events > 0)
670 mf_deallocate_lp_events(cnx->remote_lp,
671 HvLpEvent_Type_VirtualLan,
672 cnx->num_ack_events,
673 NULL, NULL);
676 static void veth_destroy_connection(u8 rlp)
678 struct veth_lpar_connection *cnx = veth_cnx[rlp];
680 if (! cnx)
681 return;
683 kfree(cnx->msgs);
684 kfree(cnx);
685 veth_cnx[rlp] = NULL;
689 * net_device code
692 static int veth_open(struct net_device *dev)
694 struct veth_port *port = (struct veth_port *) dev->priv;
696 memset(&port->stats, 0, sizeof (port->stats));
697 netif_start_queue(dev);
698 return 0;
701 static int veth_close(struct net_device *dev)
703 netif_stop_queue(dev);
704 return 0;
707 static struct net_device_stats *veth_get_stats(struct net_device *dev)
709 struct veth_port *port = (struct veth_port *) dev->priv;
711 return &port->stats;
714 static int veth_change_mtu(struct net_device *dev, int new_mtu)
716 if ((new_mtu < 68) || (new_mtu > VETH_MAX_MTU))
717 return -EINVAL;
718 dev->mtu = new_mtu;
719 return 0;
722 static void veth_set_multicast_list(struct net_device *dev)
724 struct veth_port *port = (struct veth_port *) dev->priv;
725 unsigned long flags;
727 write_lock_irqsave(&port->mcast_gate, flags);
729 if (dev->flags & IFF_PROMISC) { /* set promiscuous mode */
730 printk(KERN_INFO "%s: Promiscuous mode enabled.\n",
731 dev->name);
732 port->promiscuous = 1;
733 } else if ( (dev->flags & IFF_ALLMULTI)
734 || (dev->mc_count > VETH_MAX_MCAST) ) {
735 port->all_mcast = 1;
736 } else {
737 struct dev_mc_list *dmi = dev->mc_list;
738 int i;
740 /* Update table */
741 port->num_mcast = 0;
743 for (i = 0; i < dev->mc_count; i++) {
744 u8 *addr = dmi->dmi_addr;
745 u64 xaddr = 0;
747 if (addr[0] & 0x01) {/* multicast address? */
748 memcpy(&xaddr, addr, ETH_ALEN);
749 port->mcast_addr[port->num_mcast] = xaddr;
750 port->num_mcast++;
752 dmi = dmi->next;
756 write_unlock_irqrestore(&port->mcast_gate, flags);
759 static void veth_get_drvinfo(struct net_device *dev, struct ethtool_drvinfo *info)
761 strncpy(info->driver, "veth", sizeof(info->driver) - 1);
762 info->driver[sizeof(info->driver) - 1] = '\0';
763 strncpy(info->version, "1.0", sizeof(info->version) - 1);
766 static int veth_get_settings(struct net_device *dev, struct ethtool_cmd *ecmd)
768 ecmd->supported = (SUPPORTED_1000baseT_Full
769 | SUPPORTED_Autoneg | SUPPORTED_FIBRE);
770 ecmd->advertising = (SUPPORTED_1000baseT_Full
771 | SUPPORTED_Autoneg | SUPPORTED_FIBRE);
772 ecmd->port = PORT_FIBRE;
773 ecmd->transceiver = XCVR_INTERNAL;
774 ecmd->phy_address = 0;
775 ecmd->speed = SPEED_1000;
776 ecmd->duplex = DUPLEX_FULL;
777 ecmd->autoneg = AUTONEG_ENABLE;
778 ecmd->maxtxpkt = 120;
779 ecmd->maxrxpkt = 120;
780 return 0;
783 static u32 veth_get_link(struct net_device *dev)
785 return 1;
788 static struct ethtool_ops ops = {
789 .get_drvinfo = veth_get_drvinfo,
790 .get_settings = veth_get_settings,
791 .get_link = veth_get_link,
794 static void veth_tx_timeout(struct net_device *dev)
796 struct veth_port *port = (struct veth_port *)dev->priv;
797 struct net_device_stats *stats = &port->stats;
798 unsigned long flags;
799 int i;
801 stats->tx_errors++;
803 spin_lock_irqsave(&port->pending_gate, flags);
805 printk(KERN_WARNING "%s: Tx timeout! Resetting lp connections: %08x\n",
806 dev->name, port->pending_lpmask);
808 /* If we've timed out the queue must be stopped, which should
809 * only ever happen when there is a pending packet. */
810 WARN_ON(! port->pending_lpmask);
812 for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
813 struct veth_lpar_connection *cnx = veth_cnx[i];
815 if (! (port->pending_lpmask & (1<<i)))
816 continue;
818 /* If we're pending on it, we must be connected to it,
819 * so we should certainly have a structure for it. */
820 BUG_ON(! cnx);
822 /* Theoretically we could be kicking a connection
823 * which doesn't deserve it, but in practice if we've
824 * had a Tx timeout, the pending_lpmask will have
825 * exactly one bit set - the connection causing the
826 * problem. */
827 spin_lock(&cnx->lock);
828 cnx->state |= VETH_STATE_RESET;
829 veth_kick_statemachine(cnx);
830 spin_unlock(&cnx->lock);
833 spin_unlock_irqrestore(&port->pending_gate, flags);
836 static struct net_device * __init veth_probe_one(int vlan, struct device *vdev)
838 struct net_device *dev;
839 struct veth_port *port;
840 int i, rc;
842 dev = alloc_etherdev(sizeof (struct veth_port));
843 if (! dev) {
844 veth_error("Unable to allocate net_device structure!\n");
845 return NULL;
848 port = (struct veth_port *) dev->priv;
850 spin_lock_init(&port->pending_gate);
851 rwlock_init(&port->mcast_gate);
853 for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
854 HvLpVirtualLanIndexMap map;
856 if (i == this_lp)
857 continue;
858 map = HvLpConfig_getVirtualLanIndexMapForLp(i);
859 if (map & (0x8000 >> vlan))
860 port->lpar_map |= (1 << i);
862 port->dev = vdev;
864 dev->dev_addr[0] = 0x02;
865 dev->dev_addr[1] = 0x01;
866 dev->dev_addr[2] = 0xff;
867 dev->dev_addr[3] = vlan;
868 dev->dev_addr[4] = 0xff;
869 dev->dev_addr[5] = this_lp;
871 dev->mtu = VETH_MAX_MTU;
873 memcpy(&port->mac_addr, dev->dev_addr, 6);
875 dev->open = veth_open;
876 dev->hard_start_xmit = veth_start_xmit;
877 dev->stop = veth_close;
878 dev->get_stats = veth_get_stats;
879 dev->change_mtu = veth_change_mtu;
880 dev->set_mac_address = NULL;
881 dev->set_multicast_list = veth_set_multicast_list;
882 SET_ETHTOOL_OPS(dev, &ops);
884 dev->watchdog_timeo = 2 * (VETH_ACKTIMEOUT * HZ / 1000000);
885 dev->tx_timeout = veth_tx_timeout;
887 SET_NETDEV_DEV(dev, vdev);
889 rc = register_netdev(dev);
890 if (rc != 0) {
891 veth_printk(KERN_ERR,
892 "Failed to register ethernet device for vlan %d\n",
893 vlan);
894 free_netdev(dev);
895 return NULL;
898 veth_printk(KERN_DEBUG, "%s attached to iSeries vlan %d (lpar_map=0x%04x)\n",
899 dev->name, vlan, port->lpar_map);
901 return dev;
905 * Tx path
908 static int veth_transmit_to_one(struct sk_buff *skb, HvLpIndex rlp,
909 struct net_device *dev)
911 struct veth_lpar_connection *cnx = veth_cnx[rlp];
912 struct veth_port *port = (struct veth_port *) dev->priv;
913 HvLpEvent_Rc rc;
914 u32 dma_address, dma_length;
915 struct veth_msg *msg = NULL;
916 int err = 0;
917 unsigned long flags;
919 if (! cnx) {
920 port->stats.tx_errors++;
921 dev_kfree_skb(skb);
922 return 0;
925 spin_lock_irqsave(&cnx->lock, flags);
927 if (! cnx->state & VETH_STATE_READY)
928 goto drop;
930 if ((skb->len - 14) > VETH_MAX_MTU)
931 goto drop;
933 msg = veth_stack_pop(cnx);
935 if (! msg) {
936 err = 1;
937 goto drop;
940 dma_length = skb->len;
941 dma_address = dma_map_single(port->dev, skb->data,
942 dma_length, DMA_TO_DEVICE);
944 if (dma_mapping_error(dma_address))
945 goto recycle_and_drop;
947 /* Is it really necessary to check the length and address
948 * fields of the first entry here? */
949 msg->skb = skb;
950 msg->dev = port->dev;
951 msg->data.addr[0] = dma_address;
952 msg->data.len[0] = dma_length;
953 msg->data.eofmask = 1 << VETH_EOF_SHIFT;
954 set_bit(0, &(msg->in_use));
955 rc = veth_signaldata(cnx, VethEventTypeFrames, msg->token, &msg->data);
957 if (rc != HvLpEvent_Rc_Good)
958 goto recycle_and_drop;
960 spin_unlock_irqrestore(&cnx->lock, flags);
961 return 0;
963 recycle_and_drop:
964 msg->skb = NULL;
965 /* need to set in use to make veth_recycle_msg in case this
966 * was a mapping failure */
967 set_bit(0, &msg->in_use);
968 veth_recycle_msg(cnx, msg);
969 drop:
970 port->stats.tx_errors++;
971 dev_kfree_skb(skb);
972 spin_unlock_irqrestore(&cnx->lock, flags);
973 return err;
976 static HvLpIndexMap veth_transmit_to_many(struct sk_buff *skb,
977 HvLpIndexMap lpmask,
978 struct net_device *dev)
980 struct veth_port *port = (struct veth_port *) dev->priv;
981 int i;
982 int rc;
984 for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
985 if ((lpmask & (1 << i)) == 0)
986 continue;
988 rc = veth_transmit_to_one(skb_get(skb), i, dev);
989 if (! rc)
990 lpmask &= ~(1<<i);
993 if (! lpmask) {
994 port->stats.tx_packets++;
995 port->stats.tx_bytes += skb->len;
998 return lpmask;
1001 static int veth_start_xmit(struct sk_buff *skb, struct net_device *dev)
1003 unsigned char *frame = skb->data;
1004 struct veth_port *port = (struct veth_port *) dev->priv;
1005 unsigned long flags;
1006 HvLpIndexMap lpmask;
1008 if (! (frame[0] & 0x01)) {
1009 /* unicast packet */
1010 HvLpIndex rlp = frame[5];
1012 if ( ! ((1 << rlp) & port->lpar_map) ) {
1013 dev_kfree_skb(skb);
1014 return 0;
1017 lpmask = 1 << rlp;
1018 } else {
1019 lpmask = port->lpar_map;
1022 spin_lock_irqsave(&port->pending_gate, flags);
1024 lpmask = veth_transmit_to_many(skb, lpmask, dev);
1026 if (! lpmask) {
1027 dev_kfree_skb(skb);
1028 } else {
1029 if (port->pending_skb) {
1030 veth_error("%s: Tx while skb was pending!\n",
1031 dev->name);
1032 dev_kfree_skb(skb);
1033 spin_unlock_irqrestore(&port->pending_gate, flags);
1034 return 1;
1037 port->pending_skb = skb;
1038 port->pending_lpmask = lpmask;
1039 netif_stop_queue(dev);
1042 spin_unlock_irqrestore(&port->pending_gate, flags);
1044 return 0;
1047 static void veth_recycle_msg(struct veth_lpar_connection *cnx,
1048 struct veth_msg *msg)
1050 u32 dma_address, dma_length;
1052 if (test_and_clear_bit(0, &msg->in_use)) {
1053 dma_address = msg->data.addr[0];
1054 dma_length = msg->data.len[0];
1056 dma_unmap_single(msg->dev, dma_address, dma_length,
1057 DMA_TO_DEVICE);
1059 if (msg->skb) {
1060 dev_kfree_skb_any(msg->skb);
1061 msg->skb = NULL;
1064 memset(&msg->data, 0, sizeof(msg->data));
1065 veth_stack_push(cnx, msg);
1066 } else
1067 if (cnx->state & VETH_STATE_OPEN)
1068 veth_error("Bogus frames ack from lpar %d (#%d)\n",
1069 cnx->remote_lp, msg->token);
1072 static void veth_flush_pending(struct veth_lpar_connection *cnx)
1074 int i;
1075 for (i = 0; i < HVMAXARCHITECTEDVIRTUALLANS; i++) {
1076 struct net_device *dev = veth_dev[i];
1077 struct veth_port *port;
1078 unsigned long flags;
1080 if (! dev)
1081 continue;
1083 port = (struct veth_port *)dev->priv;
1085 if (! (port->lpar_map & (1<<cnx->remote_lp)))
1086 continue;
1088 spin_lock_irqsave(&port->pending_gate, flags);
1089 if (port->pending_skb) {
1090 port->pending_lpmask =
1091 veth_transmit_to_many(port->pending_skb,
1092 port->pending_lpmask,
1093 dev);
1094 if (! port->pending_lpmask) {
1095 dev_kfree_skb_any(port->pending_skb);
1096 port->pending_skb = NULL;
1097 netif_wake_queue(dev);
1100 spin_unlock_irqrestore(&port->pending_gate, flags);
1105 * Rx path
1108 static inline int veth_frame_wanted(struct veth_port *port, u64 mac_addr)
1110 int wanted = 0;
1111 int i;
1112 unsigned long flags;
1114 if ( (mac_addr == port->mac_addr) || (mac_addr == 0xffffffffffff0000) )
1115 return 1;
1117 if (! (((char *) &mac_addr)[0] & 0x01))
1118 return 0;
1120 read_lock_irqsave(&port->mcast_gate, flags);
1122 if (port->promiscuous || port->all_mcast) {
1123 wanted = 1;
1124 goto out;
1127 for (i = 0; i < port->num_mcast; ++i) {
1128 if (port->mcast_addr[i] == mac_addr) {
1129 wanted = 1;
1130 break;
1134 out:
1135 read_unlock_irqrestore(&port->mcast_gate, flags);
1137 return wanted;
1140 struct dma_chunk {
1141 u64 addr;
1142 u64 size;
1145 #define VETH_MAX_PAGES_PER_FRAME ( (VETH_MAX_MTU+PAGE_SIZE-2)/PAGE_SIZE + 1 )
1147 static inline void veth_build_dma_list(struct dma_chunk *list,
1148 unsigned char *p, unsigned long length)
1150 unsigned long done;
1151 int i = 1;
1153 /* FIXME: skbs are continguous in real addresses. Do we
1154 * really need to break it into PAGE_SIZE chunks, or can we do
1155 * it just at the granularity of iSeries real->absolute
1156 * mapping? Indeed, given the way the allocator works, can we
1157 * count on them being absolutely contiguous? */
1158 list[0].addr = ISERIES_HV_ADDR(p);
1159 list[0].size = min(length,
1160 PAGE_SIZE - ((unsigned long)p & ~PAGE_MASK));
1162 done = list[0].size;
1163 while (done < length) {
1164 list[i].addr = ISERIES_HV_ADDR(p + done);
1165 list[i].size = min(length-done, PAGE_SIZE);
1166 done += list[i].size;
1167 i++;
1171 static void veth_flush_acks(struct veth_lpar_connection *cnx)
1173 HvLpEvent_Rc rc;
1175 rc = veth_signaldata(cnx, VethEventTypeFramesAck,
1176 0, &cnx->pending_acks);
1178 if (rc != HvLpEvent_Rc_Good)
1179 veth_error("Error 0x%x acking frames from lpar %d!\n",
1180 (unsigned)rc, cnx->remote_lp);
1182 cnx->num_pending_acks = 0;
1183 memset(&cnx->pending_acks, 0xff, sizeof(cnx->pending_acks));
1186 static void veth_receive(struct veth_lpar_connection *cnx,
1187 struct VethLpEvent *event)
1189 struct VethFramesData *senddata = &event->u.frames_data;
1190 int startchunk = 0;
1191 int nchunks;
1192 unsigned long flags;
1193 HvLpDma_Rc rc;
1195 do {
1196 u16 length = 0;
1197 struct sk_buff *skb;
1198 struct dma_chunk local_list[VETH_MAX_PAGES_PER_FRAME];
1199 struct dma_chunk remote_list[VETH_MAX_FRAMES_PER_MSG];
1200 u64 dest;
1201 HvLpVirtualLanIndex vlan;
1202 struct net_device *dev;
1203 struct veth_port *port;
1205 /* FIXME: do we need this? */
1206 memset(local_list, 0, sizeof(local_list));
1207 memset(remote_list, 0, sizeof(VETH_MAX_FRAMES_PER_MSG));
1209 /* a 0 address marks the end of the valid entries */
1210 if (senddata->addr[startchunk] == 0)
1211 break;
1213 /* make sure that we have at least 1 EOF entry in the
1214 * remaining entries */
1215 if (! (senddata->eofmask >> (startchunk + VETH_EOF_SHIFT))) {
1216 veth_error("missing EOF frag in event "
1217 "eofmask=0x%x startchunk=%d\n",
1218 (unsigned) senddata->eofmask, startchunk);
1219 break;
1222 /* build list of chunks in this frame */
1223 nchunks = 0;
1224 do {
1225 remote_list[nchunks].addr =
1226 (u64) senddata->addr[startchunk+nchunks] << 32;
1227 remote_list[nchunks].size =
1228 senddata->len[startchunk+nchunks];
1229 length += remote_list[nchunks].size;
1230 } while (! (senddata->eofmask &
1231 (1 << (VETH_EOF_SHIFT + startchunk + nchunks++))));
1233 /* length == total length of all chunks */
1234 /* nchunks == # of chunks in this frame */
1236 if ((length - ETH_HLEN) > VETH_MAX_MTU) {
1237 veth_error("Received oversize frame from lpar %d "
1238 "(length=%d)\n", cnx->remote_lp, length);
1239 continue;
1242 skb = alloc_skb(length, GFP_ATOMIC);
1243 if (!skb)
1244 continue;
1246 veth_build_dma_list(local_list, skb->data, length);
1248 rc = HvCallEvent_dmaBufList(HvLpEvent_Type_VirtualLan,
1249 event->base_event.xSourceLp,
1250 HvLpDma_Direction_RemoteToLocal,
1251 cnx->src_inst,
1252 cnx->dst_inst,
1253 HvLpDma_AddressType_RealAddress,
1254 HvLpDma_AddressType_TceIndex,
1255 ISERIES_HV_ADDR(&local_list),
1256 ISERIES_HV_ADDR(&remote_list),
1257 length);
1258 if (rc != HvLpDma_Rc_Good) {
1259 dev_kfree_skb_irq(skb);
1260 continue;
1263 vlan = skb->data[9];
1264 dev = veth_dev[vlan];
1265 if (! dev)
1266 /* Some earlier versions of the driver sent
1267 broadcasts down all connections, even to
1268 lpars that weren't on the relevant vlan.
1269 So ignore packets belonging to a vlan we're
1270 not on. */
1271 continue;
1273 port = (struct veth_port *)dev->priv;
1274 dest = *((u64 *) skb->data) & 0xFFFFFFFFFFFF0000;
1276 if ((vlan > HVMAXARCHITECTEDVIRTUALLANS) || !port) {
1277 dev_kfree_skb_irq(skb);
1278 continue;
1280 if (! veth_frame_wanted(port, dest)) {
1281 dev_kfree_skb_irq(skb);
1282 continue;
1285 skb_put(skb, length);
1286 skb->dev = dev;
1287 skb->protocol = eth_type_trans(skb, dev);
1288 skb->ip_summed = CHECKSUM_NONE;
1289 netif_rx(skb); /* send it up */
1290 port->stats.rx_packets++;
1291 port->stats.rx_bytes += length;
1292 } while (startchunk += nchunks, startchunk < VETH_MAX_FRAMES_PER_MSG);
1294 /* Ack it */
1295 spin_lock_irqsave(&cnx->lock, flags);
1296 BUG_ON(cnx->num_pending_acks > VETH_MAX_ACKS_PER_MSG);
1298 cnx->pending_acks[cnx->num_pending_acks++] =
1299 event->base_event.xCorrelationToken;
1301 if ( (cnx->num_pending_acks >= cnx->remote_caps.ack_threshold)
1302 || (cnx->num_pending_acks >= VETH_MAX_ACKS_PER_MSG) )
1303 veth_flush_acks(cnx);
1305 spin_unlock_irqrestore(&cnx->lock, flags);
1308 static void veth_timed_ack(unsigned long ptr)
1310 struct veth_lpar_connection *cnx = (struct veth_lpar_connection *) ptr;
1311 unsigned long flags;
1313 /* Ack all the events */
1314 spin_lock_irqsave(&cnx->lock, flags);
1315 if (cnx->num_pending_acks > 0)
1316 veth_flush_acks(cnx);
1318 /* Reschedule the timer */
1319 cnx->ack_timer.expires = jiffies + cnx->ack_timeout;
1320 add_timer(&cnx->ack_timer);
1321 spin_unlock_irqrestore(&cnx->lock, flags);
1324 static int veth_remove(struct vio_dev *vdev)
1326 int i = vdev->unit_address;
1327 struct net_device *dev;
1329 dev = veth_dev[i];
1330 if (dev != NULL) {
1331 veth_dev[i] = NULL;
1332 unregister_netdev(dev);
1333 free_netdev(dev);
1335 return 0;
1338 static int veth_probe(struct vio_dev *vdev, const struct vio_device_id *id)
1340 int i = vdev->unit_address;
1341 struct net_device *dev;
1343 dev = veth_probe_one(i, &vdev->dev);
1344 if (dev == NULL) {
1345 veth_remove(vdev);
1346 return 1;
1348 veth_dev[i] = dev;
1350 /* Start the state machine on each connection, to commence
1351 * link negotiation */
1352 for (i = 0; i < HVMAXARCHITECTEDLPS; i++)
1353 if (veth_cnx[i])
1354 veth_kick_statemachine(veth_cnx[i]);
1356 return 0;
1360 * veth_device_table: Used by vio.c to match devices that we
1361 * support.
1363 static struct vio_device_id veth_device_table[] __devinitdata = {
1364 { "vlan", "" },
1365 { NULL, NULL }
1367 MODULE_DEVICE_TABLE(vio, veth_device_table);
1369 static struct vio_driver veth_driver = {
1370 .name = "iseries_veth",
1371 .id_table = veth_device_table,
1372 .probe = veth_probe,
1373 .remove = veth_remove
1377 * Module initialization/cleanup
1380 void __exit veth_module_cleanup(void)
1382 int i;
1384 vio_unregister_driver(&veth_driver);
1386 for (i = 0; i < HVMAXARCHITECTEDLPS; ++i)
1387 veth_stop_connection(i);
1389 HvLpEvent_unregisterHandler(HvLpEvent_Type_VirtualLan);
1391 /* Hypervisor callbacks may have scheduled more work while we
1392 * were destroying connections. Now that we've disconnected from
1393 * the hypervisor make sure everything's finished. */
1394 flush_scheduled_work();
1396 for (i = 0; i < HVMAXARCHITECTEDLPS; ++i)
1397 veth_destroy_connection(i);
1400 module_exit(veth_module_cleanup);
1402 int __init veth_module_init(void)
1404 int i;
1405 int rc;
1407 this_lp = HvLpConfig_getLpIndex_outline();
1409 for (i = 0; i < HVMAXARCHITECTEDLPS; ++i) {
1410 rc = veth_init_connection(i);
1411 if (rc != 0) {
1412 veth_module_cleanup();
1413 return rc;
1417 HvLpEvent_registerHandler(HvLpEvent_Type_VirtualLan,
1418 &veth_handle_event);
1420 return vio_register_driver(&veth_driver);
1422 module_init(veth_module_init);