Automatic merge of /spare/repo/netdev-2.6 branch sis900
[linux-2.6] / drivers / net / iseries_veth.c
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.
7  *
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.
12  *
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.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
21  * USA
22  *
23  *
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.
28  *
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.
34  *
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.
38  *
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.
42  *
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.
45  *
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.
49  *
50  * Tunable parameters:
51  *
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.
56  */
57
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>
75
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>
81
82 #include "iseries_veth.h"
83
84 MODULE_AUTHOR("Kyle Lucke <klucke@us.ibm.com>");
85 MODULE_DESCRIPTION("iSeries Virtual ethernet driver");
86 MODULE_LICENSE("GPL");
87
88 #define VETH_NUMBUFFERS         (120)
89 #define VETH_ACKTIMEOUT         (1000000) /* microseconds */
90 #define VETH_MAX_MCAST          (12)
91
92 #define VETH_MAX_MTU            (9000)
93
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
103
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)
113
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;
121 };
122
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;
129
130         struct timer_list ack_timer;
131
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;
139
140         int num_ack_events;
141         struct VethCapData remote_caps;
142         u32 ack_timeout;
143
144         spinlock_t msg_stack_lock;
145         struct veth_msg *msg_stack_head;
146 };
147
148 struct veth_port {
149         struct device *dev;
150         struct net_device_stats stats;
151         u64 mac_addr;
152         HvLpIndexMap lpar_map;
153
154         spinlock_t pending_gate;
155         struct sk_buff *pending_skb;
156         HvLpIndexMap pending_lpmask;
157
158         rwlock_t mcast_gate;
159         int promiscuous;
160         int all_mcast;
161         int num_mcast;
162         u64 mcast_addr[VETH_MAX_MCAST];
163 };
164
165 static HvLpIndex this_lp;
166 static struct veth_lpar_connection *veth_cnx[HVMAXARCHITECTEDLPS]; /* = 0 */
167 static struct net_device *veth_dev[HVMAXARCHITECTEDVIRTUALLANS]; /* = 0 */
168
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);
174
175 /*
176  * Utility functions
177  */
178
179 #define veth_printk(prio, fmt, args...) \
180         printk(prio "%s: " fmt, __FILE__, ## args)
181
182 #define veth_error(fmt, args...) \
183         printk(KERN_ERR "(%s:%3.3d) ERROR: " fmt, __FILE__, __LINE__ , ## args)
184
185 static inline void veth_stack_push(struct veth_lpar_connection *cnx,
186                                    struct veth_msg *msg)
187 {
188         unsigned long flags;
189
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);
194 }
195
196 static inline struct veth_msg *veth_stack_pop(struct veth_lpar_connection *cnx)
197 {
198         unsigned long flags;
199         struct veth_msg *msg;
200
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;
207 }
208
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)
214 {
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);
222 }
223
224 static inline HvLpEvent_Rc veth_signaldata(struct veth_lpar_connection *cnx,
225                                            u16 subtype, u64 token, void *data)
226 {
227         u64 *p = (u64 *) data;
228
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]);
232 }
233
234 struct veth_allocation {
235         struct completion c;
236         int num;
237 };
238
239 static void veth_complete_allocation(void *parm, int number)
240 {
241         struct veth_allocation *vc = (struct veth_allocation *)parm;
242
243         vc->num = number;
244         complete(&vc->c);
245 }
246
247 static int veth_allocate_events(HvLpIndex rlp, int number)
248 {
249         struct veth_allocation vc = { COMPLETION_INITIALIZER(vc.c), 0 };
250
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);
255
256         return vc.num;
257 }
258
259 /*
260  * LPAR connection code
261  */
262
263 static inline void veth_kick_statemachine(struct veth_lpar_connection *cnx)
264 {
265         schedule_work(&cnx->statemachine_wq);
266 }
267
268 static void veth_take_cap(struct veth_lpar_connection *cnx,
269                           struct VethLpEvent *event)
270 {
271         unsigned long flags;
272
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);
279
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);
289         }
290         spin_unlock_irqrestore(&cnx->lock, flags);
291 }
292
293 static void veth_take_cap_ack(struct veth_lpar_connection *cnx,
294                               struct VethLpEvent *event)
295 {
296         unsigned long flags;
297
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);
307         }
308         spin_unlock_irqrestore(&cnx->lock, flags);
309 }
310
311 static void veth_take_monitor_ack(struct veth_lpar_connection *cnx,
312                                   struct VethLpEvent *event)
313 {
314         unsigned long flags;
315
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);
322 }
323
324 static void veth_handle_ack(struct VethLpEvent *event)
325 {
326         HvLpIndex rlp = event->base_event.xTargetLp;
327         struct veth_lpar_connection *cnx = veth_cnx[rlp];
328
329         BUG_ON(! cnx);
330
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);
341         };
342 }
343
344 static void veth_handle_int(struct VethLpEvent *event)
345 {
346         HvLpIndex rlp = event->base_event.xSourceLp;
347         struct veth_lpar_connection *cnx = veth_cnx[rlp];
348         unsigned long flags;
349         int i;
350
351         BUG_ON(! cnx);
352
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];
365
366                         if (msgnum < VETH_NUMBUFFERS)
367                                 veth_recycle_msg(cnx, cnx->msgs + msgnum);
368                 }
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);
378         };
379 }
380
381 static void veth_handle_event(struct HvLpEvent *event, struct pt_regs *regs)
382 {
383         struct VethLpEvent *veth_event = (struct VethLpEvent *)event;
384
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);
389 }
390
391 static int veth_process_caps(struct veth_lpar_connection *cnx)
392 {
393         struct VethCapData *remote_caps = &cnx->remote_caps;
394         int num_acks_needed;
395
396         /* Convert timer to jiffies */
397         cnx->ack_timeout = remote_caps->ack_timeout * HZ / 1000000;
398
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;
406         }
407
408         num_acks_needed = (remote_caps->num_buffers
409                            / remote_caps->ack_threshold) + 1;
410
411         /* FIXME: locking on num_ack_events? */
412         if (cnx->num_ack_events < num_acks_needed) {
413                 int num;
414
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;
419
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);
423
424                         return HvLpEvent_Rc_BufferNotAvailable;
425                 }
426         }
427
428
429         return HvLpEvent_Rc_Good;
430 }
431
432 /* FIXME: The gotos here are a bit dubious */
433 static void veth_statemachine(void *p)
434 {
435         struct veth_lpar_connection *cnx = (struct veth_lpar_connection *)p;
436         int rlp = cnx->remote_lp;
437         int rc;
438
439         spin_lock_irq(&cnx->lock);
440
441  restart:
442         if (cnx->state & VETH_STATE_RESET) {
443                 int i;
444
445                 del_timer(&cnx->ack_timer);
446
447                 if (cnx->state & VETH_STATE_OPEN)
448                         HvCallEvent_closeLpEventPath(cnx->remote_lp,
449                                                      HvLpEvent_Type_VirtualLan);
450
451                 /* reset ack data */
452                 memset(&cnx->pending_acks, 0xff, sizeof (cnx->pending_acks));
453                 cnx->num_pending_acks = 0;
454
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);
459
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;
469         }
470
471         if (cnx->state & VETH_STATE_SHUTDOWN)
472                 /* It's all over, do nothing */
473                 goto out;
474
475         if ( !(cnx->state & VETH_STATE_OPEN) ) {
476                 if (! cnx->msgs || (cnx->num_events < (2 + VETH_NUMBUFFERS)) )
477                         goto cant_cope;
478
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;
487         }
488
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);
495
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);
504
505                         /* Oh well, hope we get a cap from the other
506                          * end and do better when that kicks us */
507                         goto out;
508                 }
509         }
510
511         if ( (cnx->state & VETH_STATE_OPEN)
512              && !(cnx->state & VETH_STATE_SENTCAPS)) {
513                 u64 *rawcap = (u64 *)&cnx->local_caps;
514
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]);
520
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;
532                 }
533         }
534
535         if ((cnx->state & VETH_STATE_GOTCAPS)
536             && !(cnx->state & VETH_STATE_SENTCAPACK)) {
537                 struct VethCapData *remote_caps = &cnx->remote_caps;
538
539                 memcpy(remote_caps, &cnx->cap_event.u.caps_data,
540                        sizeof(*remote_caps));
541
542                 spin_unlock_irq(&cnx->lock);
543                 rc = veth_process_caps(cnx);
544                 spin_lock_irq(&cnx->lock);
545
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;
550
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;
557         }
558
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;
573                 }
574         }
575
576  out:
577         spin_unlock_irq(&cnx->lock);
578         return;
579
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);
588 }
589
590 static int veth_init_connection(u8 rlp)
591 {
592         struct veth_lpar_connection *cnx;
593         struct veth_msg *msgs;
594         int i;
595
596         if ( (rlp == this_lp)
597              || ! HvLpConfig_doLpsCommunicateOnVirtualLan(this_lp, rlp) )
598                 return 0;
599
600         cnx = kmalloc(sizeof(*cnx), GFP_KERNEL);
601         if (! cnx)
602                 return -ENOMEM;
603         memset(cnx, 0, sizeof(*cnx));
604
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));
612
613         veth_cnx[rlp] = cnx;
614
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;
619         }
620
621         cnx->msgs = msgs;
622         memset(msgs, 0, VETH_NUMBUFFERS * sizeof(struct veth_msg));
623         spin_lock_init(&cnx->msg_stack_lock);
624
625         for (i = 0; i < VETH_NUMBUFFERS; i++) {
626                 msgs[i].token = i;
627                 veth_stack_push(cnx, msgs + i);
628         }
629
630         cnx->num_events = veth_allocate_events(rlp, 2 + VETH_NUMBUFFERS);
631
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;
636         }
637
638         cnx->local_caps.num_buffers = VETH_NUMBUFFERS;
639         cnx->local_caps.ack_threshold = ACK_THRESHOLD;
640         cnx->local_caps.ack_timeout = VETH_ACKTIMEOUT;
641
642         return 0;
643 }
644
645 static void veth_stop_connection(u8 rlp)
646 {
647         struct veth_lpar_connection *cnx = veth_cnx[rlp];
648
649         if (! cnx)
650                 return;
651
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);
656
657         flush_scheduled_work();
658
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);
663
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);
674 }
675
676 static void veth_destroy_connection(u8 rlp)
677 {
678         struct veth_lpar_connection *cnx = veth_cnx[rlp];
679
680         if (! cnx)
681                 return;
682
683         kfree(cnx->msgs);
684         kfree(cnx);
685         veth_cnx[rlp] = NULL;
686 }
687
688 /*
689  * net_device code
690  */
691
692 static int veth_open(struct net_device *dev)
693 {
694         struct veth_port *port = (struct veth_port *) dev->priv;
695
696         memset(&port->stats, 0, sizeof (port->stats));
697         netif_start_queue(dev);
698         return 0;
699 }
700
701 static int veth_close(struct net_device *dev)
702 {
703         netif_stop_queue(dev);
704         return 0;
705 }
706
707 static struct net_device_stats *veth_get_stats(struct net_device *dev)
708 {
709         struct veth_port *port = (struct veth_port *) dev->priv;
710
711         return &port->stats;
712 }
713
714 static int veth_change_mtu(struct net_device *dev, int new_mtu)
715 {
716         if ((new_mtu < 68) || (new_mtu > VETH_MAX_MTU))
717                 return -EINVAL;
718         dev->mtu = new_mtu;
719         return 0;
720 }
721
722 static void veth_set_multicast_list(struct net_device *dev)
723 {
724         struct veth_port *port = (struct veth_port *) dev->priv;
725         unsigned long flags;
726
727         write_lock_irqsave(&port->mcast_gate, flags);
728
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;
739
740                 /* Update table */
741                 port->num_mcast = 0;
742
743                 for (i = 0; i < dev->mc_count; i++) {
744                         u8 *addr = dmi->dmi_addr;
745                         u64 xaddr = 0;
746
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++;
751                         }
752                         dmi = dmi->next;
753                 }
754         }
755
756         write_unlock_irqrestore(&port->mcast_gate, flags);
757 }
758
759 static void veth_get_drvinfo(struct net_device *dev, struct ethtool_drvinfo *info)
760 {
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);
764 }
765
766 static int veth_get_settings(struct net_device *dev, struct ethtool_cmd *ecmd)
767 {
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;
781 }
782
783 static u32 veth_get_link(struct net_device *dev)
784 {
785         return 1;
786 }
787
788 static struct ethtool_ops ops = {
789         .get_drvinfo = veth_get_drvinfo,
790         .get_settings = veth_get_settings,
791         .get_link = veth_get_link,
792 };
793
794 static void veth_tx_timeout(struct net_device *dev)
795 {
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;
800
801         stats->tx_errors++;
802
803         spin_lock_irqsave(&port->pending_gate, flags);
804
805         printk(KERN_WARNING "%s: Tx timeout!  Resetting lp connections: %08x\n",
806                dev->name, port->pending_lpmask);
807
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);
811
812         for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
813                 struct veth_lpar_connection *cnx = veth_cnx[i];
814
815                 if (! (port->pending_lpmask & (1<<i)))
816                         continue;
817
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);
821
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);
831         }
832
833         spin_unlock_irqrestore(&port->pending_gate, flags);
834 }
835
836 static struct net_device * __init veth_probe_one(int vlan, struct device *vdev)
837 {
838         struct net_device *dev;
839         struct veth_port *port;
840         int i, rc;
841
842         dev = alloc_etherdev(sizeof (struct veth_port));
843         if (! dev) {
844                 veth_error("Unable to allocate net_device structure!\n");
845                 return NULL;
846         }
847
848         port = (struct veth_port *) dev->priv;
849
850         spin_lock_init(&port->pending_gate);
851         rwlock_init(&port->mcast_gate);
852
853         for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
854                 HvLpVirtualLanIndexMap map;
855
856                 if (i == this_lp)
857                         continue;
858                 map = HvLpConfig_getVirtualLanIndexMapForLp(i);
859                 if (map & (0x8000 >> vlan))
860                         port->lpar_map |= (1 << i);
861         }
862         port->dev = vdev;
863
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;
870
871         dev->mtu = VETH_MAX_MTU;
872
873         memcpy(&port->mac_addr, dev->dev_addr, 6);
874
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);
883
884         dev->watchdog_timeo = 2 * (VETH_ACKTIMEOUT * HZ / 1000000);
885         dev->tx_timeout = veth_tx_timeout;
886
887         SET_NETDEV_DEV(dev, vdev);
888
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;
896         }
897
898         veth_printk(KERN_DEBUG, "%s attached to iSeries vlan %d (lpar_map=0x%04x)\n",
899                     dev->name, vlan, port->lpar_map);
900
901         return dev;
902 }
903
904 /*
905  * Tx path
906  */
907
908 static int veth_transmit_to_one(struct sk_buff *skb, HvLpIndex rlp,
909                                 struct net_device *dev)
910 {
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;
918
919         if (! cnx) {
920                 port->stats.tx_errors++;
921                 dev_kfree_skb(skb);
922                 return 0;
923         }
924
925         spin_lock_irqsave(&cnx->lock, flags);
926
927         if (! (cnx->state & VETH_STATE_READY))
928                 goto drop;
929
930         if ((skb->len - 14) > VETH_MAX_MTU)
931                 goto drop;
932
933         msg = veth_stack_pop(cnx);
934
935         if (! msg) {
936                 err = 1;
937                 goto drop;
938         }
939
940         dma_length = skb->len;
941         dma_address = dma_map_single(port->dev, skb->data,
942                                      dma_length, DMA_TO_DEVICE);
943
944         if (dma_mapping_error(dma_address))
945                 goto recycle_and_drop;
946
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);
956
957         if (rc != HvLpEvent_Rc_Good)
958                 goto recycle_and_drop;
959
960         spin_unlock_irqrestore(&cnx->lock, flags);
961         return 0;
962
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;
974 }
975
976 static HvLpIndexMap veth_transmit_to_many(struct sk_buff *skb,
977                                           HvLpIndexMap lpmask,
978                                           struct net_device *dev)
979 {
980         struct veth_port *port = (struct veth_port *) dev->priv;
981         int i;
982         int rc;
983
984         for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
985                 if ((lpmask & (1 << i)) == 0)
986                         continue;
987
988                 rc = veth_transmit_to_one(skb_get(skb), i, dev);
989                 if (! rc)
990                         lpmask &= ~(1<<i);
991         }
992
993         if (! lpmask) {
994                 port->stats.tx_packets++;
995                 port->stats.tx_bytes += skb->len;
996         }
997
998         return lpmask;
999 }
1000
1001 static int veth_start_xmit(struct sk_buff *skb, struct net_device *dev)
1002 {
1003         unsigned char *frame = skb->data;
1004         struct veth_port *port = (struct veth_port *) dev->priv;
1005         unsigned long flags;
1006         HvLpIndexMap lpmask;
1007
1008         if (! (frame[0] & 0x01)) {
1009                 /* unicast packet */
1010                 HvLpIndex rlp = frame[5];
1011
1012                 if ( ! ((1 << rlp) & port->lpar_map) ) {
1013                         dev_kfree_skb(skb);
1014                         return 0;
1015                 }
1016
1017                 lpmask = 1 << rlp;
1018         } else {
1019                 lpmask = port->lpar_map;
1020         }
1021
1022         spin_lock_irqsave(&port->pending_gate, flags);
1023
1024         lpmask = veth_transmit_to_many(skb, lpmask, dev);
1025
1026         dev->trans_start = jiffies;
1027
1028         if (! lpmask) {
1029                 dev_kfree_skb(skb);
1030         } else {
1031                 if (port->pending_skb) {
1032                         veth_error("%s: Tx while skb was pending!\n",
1033                                    dev->name);
1034                         dev_kfree_skb(skb);
1035                         spin_unlock_irqrestore(&port->pending_gate, flags);
1036                         return 1;
1037                 }
1038
1039                 port->pending_skb = skb;
1040                 port->pending_lpmask = lpmask;
1041                 netif_stop_queue(dev);
1042         }
1043
1044         spin_unlock_irqrestore(&port->pending_gate, flags);
1045
1046         return 0;
1047 }
1048
1049 static void veth_recycle_msg(struct veth_lpar_connection *cnx,
1050                              struct veth_msg *msg)
1051 {
1052         u32 dma_address, dma_length;
1053
1054         if (test_and_clear_bit(0, &msg->in_use)) {
1055                 dma_address = msg->data.addr[0];
1056                 dma_length = msg->data.len[0];
1057
1058                 dma_unmap_single(msg->dev, dma_address, dma_length,
1059                                  DMA_TO_DEVICE);
1060
1061                 if (msg->skb) {
1062                         dev_kfree_skb_any(msg->skb);
1063                         msg->skb = NULL;
1064                 }
1065
1066                 memset(&msg->data, 0, sizeof(msg->data));
1067                 veth_stack_push(cnx, msg);
1068         } else
1069                 if (cnx->state & VETH_STATE_OPEN)
1070                         veth_error("Bogus frames ack from lpar %d (#%d)\n",
1071                                    cnx->remote_lp, msg->token);
1072 }
1073
1074 static void veth_flush_pending(struct veth_lpar_connection *cnx)
1075 {
1076         int i;
1077         for (i = 0; i < HVMAXARCHITECTEDVIRTUALLANS; i++) {
1078                 struct net_device *dev = veth_dev[i];
1079                 struct veth_port *port;
1080                 unsigned long flags;
1081
1082                 if (! dev)
1083                         continue;
1084
1085                 port = (struct veth_port *)dev->priv;
1086
1087                 if (! (port->lpar_map & (1<<cnx->remote_lp)))
1088                         continue;
1089
1090                 spin_lock_irqsave(&port->pending_gate, flags);
1091                 if (port->pending_skb) {
1092                         port->pending_lpmask =
1093                                 veth_transmit_to_many(port->pending_skb,
1094                                                       port->pending_lpmask,
1095                                                       dev);
1096                         if (! port->pending_lpmask) {
1097                                 dev_kfree_skb_any(port->pending_skb);
1098                                 port->pending_skb = NULL;
1099                                 netif_wake_queue(dev);
1100                         }
1101                 }
1102                 spin_unlock_irqrestore(&port->pending_gate, flags);
1103         }
1104 }
1105
1106 /*
1107  * Rx path
1108  */
1109
1110 static inline int veth_frame_wanted(struct veth_port *port, u64 mac_addr)
1111 {
1112         int wanted = 0;
1113         int i;
1114         unsigned long flags;
1115
1116         if ( (mac_addr == port->mac_addr) || (mac_addr == 0xffffffffffff0000) )
1117                 return 1;
1118
1119         if (! (((char *) &mac_addr)[0] & 0x01))
1120                 return 0;
1121
1122         read_lock_irqsave(&port->mcast_gate, flags);
1123
1124         if (port->promiscuous || port->all_mcast) {
1125                 wanted = 1;
1126                 goto out;
1127         }
1128
1129         for (i = 0; i < port->num_mcast; ++i) {
1130                 if (port->mcast_addr[i] == mac_addr) {
1131                         wanted = 1;
1132                         break;
1133                 }
1134         }
1135
1136  out:
1137         read_unlock_irqrestore(&port->mcast_gate, flags);
1138
1139         return wanted;
1140 }
1141
1142 struct dma_chunk {
1143         u64 addr;
1144         u64 size;
1145 };
1146
1147 #define VETH_MAX_PAGES_PER_FRAME ( (VETH_MAX_MTU+PAGE_SIZE-2)/PAGE_SIZE + 1 )
1148
1149 static inline void veth_build_dma_list(struct dma_chunk *list,
1150                                        unsigned char *p, unsigned long length)
1151 {
1152         unsigned long done;
1153         int i = 1;
1154
1155         /* FIXME: skbs are continguous in real addresses.  Do we
1156          * really need to break it into PAGE_SIZE chunks, or can we do
1157          * it just at the granularity of iSeries real->absolute
1158          * mapping?  Indeed, given the way the allocator works, can we
1159          * count on them being absolutely contiguous? */
1160         list[0].addr = ISERIES_HV_ADDR(p);
1161         list[0].size = min(length,
1162                            PAGE_SIZE - ((unsigned long)p & ~PAGE_MASK));
1163
1164         done = list[0].size;
1165         while (done < length) {
1166                 list[i].addr = ISERIES_HV_ADDR(p + done);
1167                 list[i].size = min(length-done, PAGE_SIZE);
1168                 done += list[i].size;
1169                 i++;
1170         }
1171 }
1172
1173 static void veth_flush_acks(struct veth_lpar_connection *cnx)
1174 {
1175         HvLpEvent_Rc rc;
1176
1177         rc = veth_signaldata(cnx, VethEventTypeFramesAck,
1178                              0, &cnx->pending_acks);
1179
1180         if (rc != HvLpEvent_Rc_Good)
1181                 veth_error("Error 0x%x acking frames from lpar %d!\n",
1182                            (unsigned)rc, cnx->remote_lp);
1183
1184         cnx->num_pending_acks = 0;
1185         memset(&cnx->pending_acks, 0xff, sizeof(cnx->pending_acks));
1186 }
1187
1188 static void veth_receive(struct veth_lpar_connection *cnx,
1189                          struct VethLpEvent *event)
1190 {
1191         struct VethFramesData *senddata = &event->u.frames_data;
1192         int startchunk = 0;
1193         int nchunks;
1194         unsigned long flags;
1195         HvLpDma_Rc rc;
1196
1197         do {
1198                 u16 length = 0;
1199                 struct sk_buff *skb;
1200                 struct dma_chunk local_list[VETH_MAX_PAGES_PER_FRAME];
1201                 struct dma_chunk remote_list[VETH_MAX_FRAMES_PER_MSG];
1202                 u64 dest;
1203                 HvLpVirtualLanIndex vlan;
1204                 struct net_device *dev;
1205                 struct veth_port *port;
1206
1207                 /* FIXME: do we need this? */
1208                 memset(local_list, 0, sizeof(local_list));
1209                 memset(remote_list, 0, sizeof(VETH_MAX_FRAMES_PER_MSG));
1210
1211                 /* a 0 address marks the end of the valid entries */
1212                 if (senddata->addr[startchunk] == 0)
1213                         break;
1214
1215                 /* make sure that we have at least 1 EOF entry in the
1216                  * remaining entries */
1217                 if (! (senddata->eofmask >> (startchunk + VETH_EOF_SHIFT))) {
1218                         veth_error("missing EOF frag in event "
1219                                    "eofmask=0x%x startchunk=%d\n",
1220                                    (unsigned) senddata->eofmask, startchunk);
1221                         break;
1222                 }
1223
1224                 /* build list of chunks in this frame */
1225                 nchunks = 0;
1226                 do {
1227                         remote_list[nchunks].addr =
1228                                 (u64) senddata->addr[startchunk+nchunks] << 32;
1229                         remote_list[nchunks].size =
1230                                 senddata->len[startchunk+nchunks];
1231                         length += remote_list[nchunks].size;
1232                 } while (! (senddata->eofmask &
1233                             (1 << (VETH_EOF_SHIFT + startchunk + nchunks++))));
1234
1235                 /* length == total length of all chunks */
1236                 /* nchunks == # of chunks in this frame */
1237
1238                 if ((length - ETH_HLEN) > VETH_MAX_MTU) {
1239                         veth_error("Received oversize frame from lpar %d "
1240                                    "(length=%d)\n", cnx->remote_lp, length);
1241                         continue;
1242                 }
1243
1244                 skb = alloc_skb(length, GFP_ATOMIC);
1245                 if (!skb)
1246                         continue;
1247
1248                 veth_build_dma_list(local_list, skb->data, length);
1249
1250                 rc = HvCallEvent_dmaBufList(HvLpEvent_Type_VirtualLan,
1251                                             event->base_event.xSourceLp,
1252                                             HvLpDma_Direction_RemoteToLocal,
1253                                             cnx->src_inst,
1254                                             cnx->dst_inst,
1255                                             HvLpDma_AddressType_RealAddress,
1256                                             HvLpDma_AddressType_TceIndex,
1257                                             ISERIES_HV_ADDR(&local_list),
1258                                             ISERIES_HV_ADDR(&remote_list),
1259                                             length);
1260                 if (rc != HvLpDma_Rc_Good) {
1261                         dev_kfree_skb_irq(skb);
1262                         continue;
1263                 }
1264
1265                 vlan = skb->data[9];
1266                 dev = veth_dev[vlan];
1267                 if (! dev) {
1268                         /*
1269                          * Some earlier versions of the driver sent
1270                          * broadcasts down all connections, even to lpars
1271                          * that weren't on the relevant vlan. So ignore
1272                          * packets belonging to a vlan we're not on.
1273                          * We can also be here if we receive packets while
1274                          * the driver is going down, because then dev is NULL.
1275                          */
1276                         dev_kfree_skb_irq(skb);
1277                         continue;
1278                 }
1279
1280                 port = (struct veth_port *)dev->priv;
1281                 dest = *((u64 *) skb->data) & 0xFFFFFFFFFFFF0000;
1282
1283                 if ((vlan > HVMAXARCHITECTEDVIRTUALLANS) || !port) {
1284                         dev_kfree_skb_irq(skb);
1285                         continue;
1286                 }
1287                 if (! veth_frame_wanted(port, dest)) {
1288                         dev_kfree_skb_irq(skb);
1289                         continue;
1290                 }
1291
1292                 skb_put(skb, length);
1293                 skb->dev = dev;
1294                 skb->protocol = eth_type_trans(skb, dev);
1295                 skb->ip_summed = CHECKSUM_NONE;
1296                 netif_rx(skb);  /* send it up */
1297                 port->stats.rx_packets++;
1298                 port->stats.rx_bytes += length;
1299         } while (startchunk += nchunks, startchunk < VETH_MAX_FRAMES_PER_MSG);
1300
1301         /* Ack it */
1302         spin_lock_irqsave(&cnx->lock, flags);
1303         BUG_ON(cnx->num_pending_acks > VETH_MAX_ACKS_PER_MSG);
1304
1305         cnx->pending_acks[cnx->num_pending_acks++] =
1306                 event->base_event.xCorrelationToken;
1307
1308         if ( (cnx->num_pending_acks >= cnx->remote_caps.ack_threshold)
1309              || (cnx->num_pending_acks >= VETH_MAX_ACKS_PER_MSG) )
1310                 veth_flush_acks(cnx);
1311
1312         spin_unlock_irqrestore(&cnx->lock, flags);
1313 }
1314
1315 static void veth_timed_ack(unsigned long ptr)
1316 {
1317         struct veth_lpar_connection *cnx = (struct veth_lpar_connection *) ptr;
1318         unsigned long flags;
1319
1320         /* Ack all the events */
1321         spin_lock_irqsave(&cnx->lock, flags);
1322         if (cnx->num_pending_acks > 0)
1323                 veth_flush_acks(cnx);
1324
1325         /* Reschedule the timer */
1326         cnx->ack_timer.expires = jiffies + cnx->ack_timeout;
1327         add_timer(&cnx->ack_timer);
1328         spin_unlock_irqrestore(&cnx->lock, flags);
1329 }
1330
1331 static int veth_remove(struct vio_dev *vdev)
1332 {
1333         int i = vdev->unit_address;
1334         struct net_device *dev;
1335
1336         dev = veth_dev[i];
1337         if (dev != NULL) {
1338                 veth_dev[i] = NULL;
1339                 unregister_netdev(dev);
1340                 free_netdev(dev);
1341         }
1342         return 0;
1343 }
1344
1345 static int veth_probe(struct vio_dev *vdev, const struct vio_device_id *id)
1346 {
1347         int i = vdev->unit_address;
1348         struct net_device *dev;
1349
1350         dev = veth_probe_one(i, &vdev->dev);
1351         if (dev == NULL) {
1352                 veth_remove(vdev);
1353                 return 1;
1354         }
1355         veth_dev[i] = dev;
1356
1357         /* Start the state machine on each connection, to commence
1358          * link negotiation */
1359         for (i = 0; i < HVMAXARCHITECTEDLPS; i++)
1360                 if (veth_cnx[i])
1361                         veth_kick_statemachine(veth_cnx[i]);
1362
1363         return 0;
1364 }
1365
1366 /**
1367  * veth_device_table: Used by vio.c to match devices that we
1368  * support.
1369  */
1370 static struct vio_device_id veth_device_table[] __devinitdata = {
1371         { "vlan", "" },
1372         { NULL, NULL }
1373 };
1374 MODULE_DEVICE_TABLE(vio, veth_device_table);
1375
1376 static struct vio_driver veth_driver = {
1377         .name = "iseries_veth",
1378         .id_table = veth_device_table,
1379         .probe = veth_probe,
1380         .remove = veth_remove
1381 };
1382
1383 /*
1384  * Module initialization/cleanup
1385  */
1386
1387 void __exit veth_module_cleanup(void)
1388 {
1389         int i;
1390
1391         /* Stop the queues first to stop any new packets being sent. */
1392         for (i = 0; i < HVMAXARCHITECTEDVIRTUALLANS; i++)
1393                 if (veth_dev[i])
1394                         netif_stop_queue(veth_dev[i]);
1395
1396         /* Stop the connections before we unregister the driver. This
1397          * ensures there's no skbs lying around holding the device open. */
1398         for (i = 0; i < HVMAXARCHITECTEDLPS; ++i)
1399                 veth_stop_connection(i);
1400
1401         HvLpEvent_unregisterHandler(HvLpEvent_Type_VirtualLan);
1402
1403         /* Hypervisor callbacks may have scheduled more work while we
1404          * were stoping connections. Now that we've disconnected from
1405          * the hypervisor make sure everything's finished. */
1406         flush_scheduled_work();
1407
1408         vio_unregister_driver(&veth_driver);
1409
1410         for (i = 0; i < HVMAXARCHITECTEDLPS; ++i)
1411                 veth_destroy_connection(i);
1412
1413 }
1414 module_exit(veth_module_cleanup);
1415
1416 int __init veth_module_init(void)
1417 {
1418         int i;
1419         int rc;
1420
1421         this_lp = HvLpConfig_getLpIndex_outline();
1422
1423         for (i = 0; i < HVMAXARCHITECTEDLPS; ++i) {
1424                 rc = veth_init_connection(i);
1425                 if (rc != 0) {
1426                         veth_module_cleanup();
1427                         return rc;
1428                 }
1429         }
1430
1431         HvLpEvent_registerHandler(HvLpEvent_Type_VirtualLan,
1432                                   &veth_handle_event);
1433
1434         return vio_register_driver(&veth_driver);
1435 }
1436 module_init(veth_module_init);