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 extern struct vio_dev *iSeries_veth_dev;
  85
  86 MODULE_AUTHOR("Kyle Lucke <klucke@us.ibm.com>");
  87 MODULE_DESCRIPTION("iSeries Virtual ethernet driver");
  88 MODULE_LICENSE("GPL");
  89
  90 #define VETH_NUMBUFFERS         (120)
  91 #define VETH_ACKTIMEOUT         (1000000) /* microseconds */
  92 #define VETH_MAX_MCAST          (12)
  93
  94 #define VETH_MAX_MTU            (9000)
  95
  96 #if VETH_NUMBUFFERS < 10
  97 #define ACK_THRESHOLD           (1)
  98 #elif VETH_NUMBUFFERS < 20
  99 #define ACK_THRESHOLD           (4)
 100 #elif VETH_NUMBUFFERS < 40
 101 #define ACK_THRESHOLD           (10)
 102 #else
 103 #define ACK_THRESHOLD           (20)
 104 #endif
 105
 106 #define VETH_STATE_SHUTDOWN     (0x0001)
 107 #define VETH_STATE_OPEN         (0x0002)
 108 #define VETH_STATE_RESET        (0x0004)
 109 #define VETH_STATE_SENTMON      (0x0008)
 110 #define VETH_STATE_SENTCAPS     (0x0010)
 111 #define VETH_STATE_GOTCAPACK    (0x0020)
 112 #define VETH_STATE_GOTCAPS      (0x0040)
 113 #define VETH_STATE_SENTCAPACK   (0x0080)
 114 #define VETH_STATE_READY        (0x0100)
 115
 116 struct veth_msg {
 117         struct veth_msg *next;
 118         struct VethFramesData data;
 119         int token;
 120         unsigned long in_use;
 121         struct sk_buff *skb;
 122 };
 123
 124 struct veth_lpar_connection {
 125         HvLpIndex remote_lp;
 126         struct work_struct statemachine_wq;
 127         struct veth_msg *msgs;
 128         int num_events;
 129         struct VethCapData local_caps;
 130
 131         struct timer_list ack_timer;
 132
 133         spinlock_t lock;
 134         unsigned long state;
 135         HvLpInstanceId src_inst;
 136         HvLpInstanceId dst_inst;
 137         struct VethLpEvent cap_event, cap_ack_event;
 138         u16 pending_acks[VETH_MAX_ACKS_PER_MSG];
 139         u32 num_pending_acks;
 140
 141         int num_ack_events;
 142         struct VethCapData remote_caps;
 143         u32 ack_timeout;
 144
 145         spinlock_t msg_stack_lock;
 146         struct veth_msg *msg_stack_head;
 147 };
 148
 149 struct veth_port {
 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_allocateLpEvents(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_destroy_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_deallocateLpEvents(cnx->remote_lp,
 666                                       HvLpEvent_Type_VirtualLan,
 667                                       cnx->num_events,
 668                                       NULL, NULL);
 669         if (cnx->num_ack_events > 0)
 670                 mf_deallocateLpEvents(cnx->remote_lp,
 671                                       HvLpEvent_Type_VirtualLan,
 672                                       cnx->num_ack_events,
 673                                       NULL, NULL);
 674
 675         if (cnx->msgs)
 676                 kfree(cnx->msgs);
 677 }
 678
 679 /*
 680  * net_device code
 681  */
 682
 683 static int veth_open(struct net_device *dev)
 684 {
 685         struct veth_port *port = (struct veth_port *) dev->priv;
 686
 687         memset(&port->stats, 0, sizeof (port->stats));
 688         netif_start_queue(dev);
 689         return 0;
 690 }
 691
 692 static int veth_close(struct net_device *dev)
 693 {
 694         netif_stop_queue(dev);
 695         return 0;
 696 }
 697
 698 static struct net_device_stats *veth_get_stats(struct net_device *dev)
 699 {
 700         struct veth_port *port = (struct veth_port *) dev->priv;
 701
 702         return &port->stats;
 703 }
 704
 705 static int veth_change_mtu(struct net_device *dev, int new_mtu)
 706 {
 707         if ((new_mtu < 68) || (new_mtu > VETH_MAX_MTU))
 708                 return -EINVAL;
 709         dev->mtu = new_mtu;
 710         return 0;
 711 }
 712
 713 static void veth_set_multicast_list(struct net_device *dev)
 714 {
 715         struct veth_port *port = (struct veth_port *) dev->priv;
 716         unsigned long flags;
 717
 718         write_lock_irqsave(&port->mcast_gate, flags);
 719
 720         if (dev->flags & IFF_PROMISC) { /* set promiscuous mode */
 721                 printk(KERN_INFO "%s: Promiscuous mode enabled.\n",
 722                        dev->name);
 723                 port->promiscuous = 1;
 724         } else if ( (dev->flags & IFF_ALLMULTI)
 725                     || (dev->mc_count > VETH_MAX_MCAST) ) {
 726                 port->all_mcast = 1;
 727         } else {
 728                 struct dev_mc_list *dmi = dev->mc_list;
 729                 int i;
 730
 731                 /* Update table */
 732                 port->num_mcast = 0;
 733
 734                 for (i = 0; i < dev->mc_count; i++) {
 735                         u8 *addr = dmi->dmi_addr;
 736                         u64 xaddr = 0;
 737
 738                         if (addr[0] & 0x01) {/* multicast address? */
 739                                 memcpy(&xaddr, addr, ETH_ALEN);
 740                                 port->mcast_addr[port->num_mcast] = xaddr;
 741                                 port->num_mcast++;
 742                         }
 743                         dmi = dmi->next;
 744                 }
 745         }
 746
 747         write_unlock_irqrestore(&port->mcast_gate, flags);
 748 }
 749
 750 static int veth_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
 751 {
 752 #ifdef SIOCETHTOOL
 753         struct ethtool_cmd ecmd;
 754
 755         if (cmd != SIOCETHTOOL)
 756                 return -EOPNOTSUPP;
 757         if (copy_from_user(&ecmd, ifr->ifr_data, sizeof (ecmd)))
 758                 return -EFAULT;
 759         switch (ecmd.cmd) {
 760         case ETHTOOL_GSET:
 761                 ecmd.supported = (SUPPORTED_1000baseT_Full
 762                                   | SUPPORTED_Autoneg | SUPPORTED_FIBRE);
 763                 ecmd.advertising = (SUPPORTED_1000baseT_Full
 764                                     | SUPPORTED_Autoneg | SUPPORTED_FIBRE);
 765
 766                 ecmd.port = PORT_FIBRE;
 767                 ecmd.transceiver = XCVR_INTERNAL;
 768                 ecmd.phy_address = 0;
 769                 ecmd.speed = SPEED_1000;
 770                 ecmd.duplex = DUPLEX_FULL;
 771                 ecmd.autoneg = AUTONEG_ENABLE;
 772                 ecmd.maxtxpkt = 120;
 773                 ecmd.maxrxpkt = 120;
 774                 if (copy_to_user(ifr->ifr_data, &ecmd, sizeof(ecmd)))
 775                         return -EFAULT;
 776                 return 0;
 777
 778         case ETHTOOL_GDRVINFO:{
 779                         struct ethtool_drvinfo info = { ETHTOOL_GDRVINFO };
 780                         strncpy(info.driver, "veth", sizeof(info.driver) - 1);
 781                         info.driver[sizeof(info.driver) - 1] = '\0';
 782                         strncpy(info.version, "1.0", sizeof(info.version) - 1);
 783                         if (copy_to_user(ifr->ifr_data, &info, sizeof(info)))
 784                                 return -EFAULT;
 785                         return 0;
 786                 }
 787                 /* get link status */
 788         case ETHTOOL_GLINK:{
 789                         struct ethtool_value edata = { ETHTOOL_GLINK };
 790                         edata.data = 1;
 791                         if (copy_to_user(ifr->ifr_data, &edata, sizeof(edata)))
 792                                 return -EFAULT;
 793                         return 0;
 794                 }
 795
 796         default:
 797                 break;
 798         }
 799
 800 #endif
 801         return -EOPNOTSUPP;
 802 }
 803
 804 static void veth_tx_timeout(struct net_device *dev)
 805 {
 806         struct veth_port *port = (struct veth_port *)dev->priv;
 807         struct net_device_stats *stats = &port->stats;
 808         unsigned long flags;
 809         int i;
 810
 811         stats->tx_errors++;
 812
 813         spin_lock_irqsave(&port->pending_gate, flags);
 814
 815         printk(KERN_WARNING "%s: Tx timeout!  Resetting lp connections: %08x\n",
 816                dev->name, port->pending_lpmask);
 817
 818         /* If we've timed out the queue must be stopped, which should
 819          * only ever happen when there is a pending packet. */
 820         WARN_ON(! port->pending_lpmask);
 821
 822         for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
 823                 struct veth_lpar_connection *cnx = veth_cnx[i];
 824
 825                 if (! (port->pending_lpmask & (1<<i)))
 826                         continue;
 827
 828                 /* If we're pending on it, we must be connected to it,
 829                  * so we should certainly have a structure for it. */
 830                 BUG_ON(! cnx);
 831
 832                 /* Theoretically we could be kicking a connection
 833                  * which doesn't deserve it, but in practice if we've
 834                  * had a Tx timeout, the pending_lpmask will have
 835                  * exactly one bit set - the connection causing the
 836                  * problem. */
 837                 spin_lock(&cnx->lock);
 838                 cnx->state |= VETH_STATE_RESET;
 839                 veth_kick_statemachine(cnx);
 840                 spin_unlock(&cnx->lock);
 841         }
 842
 843         spin_unlock_irqrestore(&port->pending_gate, flags);
 844 }
 845
 846 struct net_device * __init veth_probe_one(int vlan)
 847 {
 848         struct net_device *dev;
 849         struct veth_port *port;
 850         int i, rc;
 851
 852         dev = alloc_etherdev(sizeof (struct veth_port));
 853         if (! dev) {
 854                 veth_error("Unable to allocate net_device structure!\n");
 855                 return NULL;
 856         }
 857
 858         port = (struct veth_port *) dev->priv;
 859
 860         spin_lock_init(&port->pending_gate);
 861         rwlock_init(&port->mcast_gate);
 862
 863         for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
 864                 HvLpVirtualLanIndexMap map;
 865
 866                 if (i == this_lp)
 867                         continue;
 868                 map = HvLpConfig_getVirtualLanIndexMapForLp(i);
 869                 if (map & (0x8000 >> vlan))
 870                         port->lpar_map |= (1 << i);
 871         }
 872
 873         dev->dev_addr[0] = 0x02;
 874         dev->dev_addr[1] = 0x01;
 875         dev->dev_addr[2] = 0xff;
 876         dev->dev_addr[3] = vlan;
 877         dev->dev_addr[4] = 0xff;
 878         dev->dev_addr[5] = this_lp;
 879
 880         dev->mtu = VETH_MAX_MTU;
 881
 882         memcpy(&port->mac_addr, dev->dev_addr, 6);
 883
 884         dev->open = veth_open;
 885         dev->hard_start_xmit = veth_start_xmit;
 886         dev->stop = veth_close;
 887         dev->get_stats = veth_get_stats;
 888         dev->change_mtu = veth_change_mtu;
 889         dev->set_mac_address = NULL;
 890         dev->set_multicast_list = veth_set_multicast_list;
 891         dev->do_ioctl = veth_ioctl;
 892
 893         dev->watchdog_timeo = 2 * (VETH_ACKTIMEOUT * HZ / 1000000);
 894         dev->tx_timeout = veth_tx_timeout;
 895
 896         rc = register_netdev(dev);
 897         if (rc != 0) {
 898                 veth_printk(KERN_ERR,
 899                             "Failed to register ethernet device for vlan %d\n",
 900                             vlan);
 901                 free_netdev(dev);
 902                 return NULL;
 903         }
 904
 905         veth_printk(KERN_DEBUG, "%s attached to iSeries vlan %d (lpar_map=0x%04x)\n",
 906                     dev->name, vlan, port->lpar_map);
 907
 908         return dev;
 909 }
 910
 911 /*
 912  * Tx path
 913  */
 914
 915 static int veth_transmit_to_one(struct sk_buff *skb, HvLpIndex rlp,
 916                                 struct net_device *dev)
 917 {
 918         struct veth_lpar_connection *cnx = veth_cnx[rlp];
 919         struct veth_port *port = (struct veth_port *) dev->priv;
 920         HvLpEvent_Rc rc;
 921         u32 dma_address, dma_length;
 922         struct veth_msg *msg = NULL;
 923         int err = 0;
 924         unsigned long flags;
 925
 926         if (! cnx) {
 927                 port->stats.tx_errors++;
 928                 dev_kfree_skb(skb);
 929                 return 0;
 930         }
 931
 932         spin_lock_irqsave(&cnx->lock, flags);
 933
 934         if (! cnx->state & VETH_STATE_READY)
 935                 goto drop;
 936
 937         if ((skb->len - 14) > VETH_MAX_MTU)
 938                 goto drop;
 939
 940         msg = veth_stack_pop(cnx);
 941
 942         if (! msg) {
 943                 err = 1;
 944                 goto drop;
 945         }
 946
 947         dma_length = skb->len;
 948         dma_address = vio_map_single(iSeries_veth_dev, skb->data,
 949                                      dma_length, DMA_TO_DEVICE);
 950
 951         if (dma_mapping_error(dma_address))
 952                 goto recycle_and_drop;
 953
 954         /* Is it really necessary to check the length and address
 955          * fields of the first entry here? */
 956         msg->skb = skb;
 957         msg->data.addr[0] = dma_address;
 958         msg->data.len[0] = dma_length;
 959         msg->data.eofmask = 1 << VETH_EOF_SHIFT;
 960         set_bit(0, &(msg->in_use));
 961         rc = veth_signaldata(cnx, VethEventTypeFrames, msg->token, &msg->data);
 962
 963         if (rc != HvLpEvent_Rc_Good)
 964                 goto recycle_and_drop;
 965
 966         spin_unlock_irqrestore(&cnx->lock, flags);
 967         return 0;
 968
 969  recycle_and_drop:
 970         msg->skb = NULL;
 971         /* need to set in use to make veth_recycle_msg in case this
 972          * was a mapping failure */
 973         set_bit(0, &msg->in_use);
 974         veth_recycle_msg(cnx, msg);
 975  drop:
 976         port->stats.tx_errors++;
 977         dev_kfree_skb(skb);
 978         spin_unlock_irqrestore(&cnx->lock, flags);
 979         return err;
 980 }
 981
 982 static HvLpIndexMap veth_transmit_to_many(struct sk_buff *skb,
 983                                           HvLpIndexMap lpmask,
 984                                           struct net_device *dev)
 985 {
 986         struct veth_port *port = (struct veth_port *) dev->priv;
 987         int i;
 988         int rc;
 989
 990         for (i = 0; i < HVMAXARCHITECTEDLPS; i++) {
 991                 if ((lpmask & (1 << i)) == 0)
 992                         continue;
 993
 994                 rc = veth_transmit_to_one(skb_get(skb), i, dev);
 995                 if (! rc)
 996                         lpmask &= ~(1<<i);
 997         }
 998
 999         if (! lpmask) {
1000                 port->stats.tx_packets++;
1001                 port->stats.tx_bytes += skb->len;
1002         }
1003
1004         return lpmask;
1005 }
1006
1007 static int veth_start_xmit(struct sk_buff *skb, struct net_device *dev)
1008 {
1009         unsigned char *frame = skb->data;
1010         struct veth_port *port = (struct veth_port *) dev->priv;
1011         unsigned long flags;
1012         HvLpIndexMap lpmask;
1013
1014         if (! (frame[0] & 0x01)) {
1015                 /* unicast packet */
1016                 HvLpIndex rlp = frame[5];
1017
1018                 if ( ! ((1 << rlp) & port->lpar_map) ) {
1019                         dev_kfree_skb(skb);
1020                         return 0;
1021                 }
1022
1023                 lpmask = 1 << rlp;
1024         } else {
1025                 lpmask = port->lpar_map;
1026         }
1027
1028         spin_lock_irqsave(&port->pending_gate, flags);
1029
1030         lpmask = veth_transmit_to_many(skb, lpmask, dev);
1031
1032         if (! lpmask) {
1033                 dev_kfree_skb(skb);
1034         } else {
1035                 if (port->pending_skb) {
1036                         veth_error("%s: Tx while skb was pending!\n",
1037                                    dev->name);
1038                         dev_kfree_skb(skb);
1039                         spin_unlock_irqrestore(&port->pending_gate, flags);
1040                         return 1;
1041                 }
1042
1043                 port->pending_skb = skb;
1044                 port->pending_lpmask = lpmask;
1045                 netif_stop_queue(dev);
1046         }
1047
1048         spin_unlock_irqrestore(&port->pending_gate, flags);
1049
1050         return 0;
1051 }
1052
1053 static void veth_recycle_msg(struct veth_lpar_connection *cnx,
1054                              struct veth_msg *msg)
1055 {
1056         u32 dma_address, dma_length;
1057
1058         if (test_and_clear_bit(0, &msg->in_use)) {
1059                 dma_address = msg->data.addr[0];
1060                 dma_length = msg->data.len[0];
1061
1062                 vio_unmap_single(iSeries_veth_dev, dma_address, dma_length,
1063                                  DMA_TO_DEVICE);
1064
1065                 if (msg->skb) {
1066                         dev_kfree_skb_any(msg->skb);
1067                         msg->skb = NULL;
1068                 }
1069
1070                 memset(&msg->data, 0, sizeof(msg->data));
1071                 veth_stack_push(cnx, msg);
1072         } else
1073                 if (cnx->state & VETH_STATE_OPEN)
1074                         veth_error("Bogus frames ack from lpar %d (#%d)\n",
1075                                    cnx->remote_lp, msg->token);
1076 }
1077
1078 static void veth_flush_pending(struct veth_lpar_connection *cnx)
1079 {
1080         int i;
1081         for (i = 0; i < HVMAXARCHITECTEDVIRTUALLANS; i++) {
1082                 struct net_device *dev = veth_dev[i];
1083                 struct veth_port *port;
1084                 unsigned long flags;
1085
1086                 if (! dev)
1087                         continue;
1088
1089                 port = (struct veth_port *)dev->priv;
1090
1091                 if (! (port->lpar_map & (1<<cnx->remote_lp)))
1092                         continue;
1093
1094                 spin_lock_irqsave(&port->pending_gate, flags);
1095                 if (port->pending_skb) {
1096                         port->pending_lpmask =
1097                                 veth_transmit_to_many(port->pending_skb,
1098                                                       port->pending_lpmask,
1099                                                       dev);
1100                         if (! port->pending_lpmask) {
1101                                 dev_kfree_skb_any(port->pending_skb);
1102                                 port->pending_skb = NULL;
1103                                 netif_wake_queue(dev);
1104                         }
1105                 }
1106                 spin_unlock_irqrestore(&port->pending_gate, flags);
1107         }
1108 }
1109
1110 /*
1111  * Rx path
1112  */
1113
1114 static inline int veth_frame_wanted(struct veth_port *port, u64 mac_addr)
1115 {
1116         int wanted = 0;
1117         int i;
1118         unsigned long flags;
1119
1120         if ( (mac_addr == port->mac_addr) || (mac_addr == 0xffffffffffff0000) )
1121                 return 1;
1122
1123         if (! (((char *) &mac_addr)[0] & 0x01))
1124                 return 0;
1125
1126         read_lock_irqsave(&port->mcast_gate, flags);
1127
1128         if (port->promiscuous || port->all_mcast) {
1129                 wanted = 1;
1130                 goto out;
1131         }
1132
1133         for (i = 0; i < port->num_mcast; ++i) {
1134                 if (port->mcast_addr[i] == mac_addr) {
1135                         wanted = 1;
1136                         break;
1137                 }
1138         }
1139
1140  out:
1141         read_unlock_irqrestore(&port->mcast_gate, flags);
1142
1143         return wanted;
1144 }
1145
1146 struct dma_chunk {
1147         u64 addr;
1148         u64 size;
1149 };
1150
1151 #define VETH_MAX_PAGES_PER_FRAME ( (VETH_MAX_MTU+PAGE_SIZE-2)/PAGE_SIZE + 1 )
1152
1153 static inline void veth_build_dma_list(struct dma_chunk *list,
1154                                        unsigned char *p, unsigned long length)
1155 {
1156         unsigned long done;
1157         int i = 1;
1158
1159         /* FIXME: skbs are continguous in real addresses.  Do we
1160          * really need to break it into PAGE_SIZE chunks, or can we do
1161          * it just at the granularity of iSeries real->absolute
1162          * mapping?  Indeed, given the way the allocator works, can we
1163          * count on them being absolutely contiguous? */
1164         list[0].addr = ISERIES_HV_ADDR(p);
1165         list[0].size = min(length,
1166                            PAGE_SIZE - ((unsigned long)p & ~PAGE_MASK));
1167
1168         done = list[0].size;
1169         while (done < length) {
1170                 list[i].addr = ISERIES_HV_ADDR(p + done);
1171                 list[i].size = min(length-done, PAGE_SIZE);
1172                 done += list[i].size;
1173                 i++;
1174         }
1175 }
1176
1177 static void veth_flush_acks(struct veth_lpar_connection *cnx)
1178 {
1179         HvLpEvent_Rc rc;
1180
1181         rc = veth_signaldata(cnx, VethEventTypeFramesAck,
1182                              0, &cnx->pending_acks);
1183
1184         if (rc != HvLpEvent_Rc_Good)
1185                 veth_error("Error 0x%x acking frames from lpar %d!\n",
1186                            (unsigned)rc, cnx->remote_lp);
1187
1188         cnx->num_pending_acks = 0;
1189         memset(&cnx->pending_acks, 0xff, sizeof(cnx->pending_acks));
1190 }
1191
1192 static void veth_receive(struct veth_lpar_connection *cnx,
1193                          struct VethLpEvent *event)
1194 {
1195         struct VethFramesData *senddata = &event->u.frames_data;
1196         int startchunk = 0;
1197         int nchunks;
1198         unsigned long flags;
1199         HvLpDma_Rc rc;
1200
1201         do {
1202                 u16 length = 0;
1203                 struct sk_buff *skb;
1204                 struct dma_chunk local_list[VETH_MAX_PAGES_PER_FRAME];
1205                 struct dma_chunk remote_list[VETH_MAX_FRAMES_PER_MSG];
1206                 u64 dest;
1207                 HvLpVirtualLanIndex vlan;
1208                 struct net_device *dev;
1209                 struct veth_port *port;
1210
1211                 /* FIXME: do we need this? */
1212                 memset(local_list, 0, sizeof(local_list));
1213                 memset(remote_list, 0, sizeof(VETH_MAX_FRAMES_PER_MSG));
1214
1215                 /* a 0 address marks the end of the valid entries */
1216                 if (senddata->addr[startchunk] == 0)
1217                         break;
1218
1219                 /* make sure that we have at least 1 EOF entry in the
1220                  * remaining entries */
1221                 if (! (senddata->eofmask >> (startchunk + VETH_EOF_SHIFT))) {
1222                         veth_error("missing EOF frag in event "
1223                                    "eofmask=0x%x startchunk=%d\n",
1224                                    (unsigned) senddata->eofmask, startchunk);
1225                         break;
1226                 }
1227
1228                 /* build list of chunks in this frame */
1229                 nchunks = 0;
1230                 do {
1231                         remote_list[nchunks].addr =
1232                                 (u64) senddata->addr[startchunk+nchunks] << 32;
1233                         remote_list[nchunks].size =
1234                                 senddata->len[startchunk+nchunks];
1235                         length += remote_list[nchunks].size;
1236                 } while (! (senddata->eofmask &
1237                             (1 << (VETH_EOF_SHIFT + startchunk + nchunks++))));
1238
1239                 /* length == total length of all chunks */
1240                 /* nchunks == # of chunks in this frame */
1241
1242                 if ((length - ETH_HLEN) > VETH_MAX_MTU) {
1243                         veth_error("Received oversize frame from lpar %d "
1244                                    "(length=%d)\n", cnx->remote_lp, length);
1245                         continue;
1246                 }
1247
1248                 skb = alloc_skb(length, GFP_ATOMIC);
1249                 if (!skb)
1250                         continue;
1251
1252                 veth_build_dma_list(local_list, skb->data, length);
1253
1254                 rc = HvCallEvent_dmaBufList(HvLpEvent_Type_VirtualLan,
1255                                             event->base_event.xSourceLp,
1256                                             HvLpDma_Direction_RemoteToLocal,
1257                                             cnx->src_inst,
1258                                             cnx->dst_inst,
1259                                             HvLpDma_AddressType_RealAddress,
1260                                             HvLpDma_AddressType_TceIndex,
1261                                             ISERIES_HV_ADDR(&local_list),
1262                                             ISERIES_HV_ADDR(&remote_list),
1263                                             length);
1264                 if (rc != HvLpDma_Rc_Good) {
1265                         dev_kfree_skb_irq(skb);
1266                         continue;
1267                 }
1268
1269                 vlan = skb->data[9];
1270                 dev = veth_dev[vlan];
1271                 if (! dev)
1272                         /* Some earlier versions of the driver sent
1273                            broadcasts down all connections, even to
1274                            lpars that weren't on the relevant vlan.
1275                            So ignore packets belonging to a vlan we're
1276                            not on. */
1277                         continue;
1278
1279                 port = (struct veth_port *)dev->priv;
1280                 dest = *((u64 *) skb->data) & 0xFFFFFFFFFFFF0000;
1281
1282                 if ((vlan > HVMAXARCHITECTEDVIRTUALLANS) || !port) {
1283                         dev_kfree_skb_irq(skb);
1284                         continue;
1285                 }
1286                 if (! veth_frame_wanted(port, dest)) {
1287                         dev_kfree_skb_irq(skb);
1288                         continue;
1289                 }
1290
1291                 skb_put(skb, length);
1292                 skb->dev = dev;
1293                 skb->protocol = eth_type_trans(skb, dev);
1294                 skb->ip_summed = CHECKSUM_NONE;
1295                 netif_rx(skb);  /* send it up */
1296                 port->stats.rx_packets++;
1297                 port->stats.rx_bytes += length;
1298         } while (startchunk += nchunks, startchunk < VETH_MAX_FRAMES_PER_MSG);
1299
1300         /* Ack it */
1301         spin_lock_irqsave(&cnx->lock, flags);
1302         BUG_ON(cnx->num_pending_acks > VETH_MAX_ACKS_PER_MSG);
1303
1304         cnx->pending_acks[cnx->num_pending_acks++] =
1305                 event->base_event.xCorrelationToken;
1306
1307         if ( (cnx->num_pending_acks >= cnx->remote_caps.ack_threshold)
1308              || (cnx->num_pending_acks >= VETH_MAX_ACKS_PER_MSG) )
1309                 veth_flush_acks(cnx);
1310
1311         spin_unlock_irqrestore(&cnx->lock, flags);
1312 }
1313
1314 static void veth_timed_ack(unsigned long ptr)
1315 {
1316         struct veth_lpar_connection *cnx = (struct veth_lpar_connection *) ptr;
1317         unsigned long flags;
1318
1319         /* Ack all the events */
1320         spin_lock_irqsave(&cnx->lock, flags);
1321         if (cnx->num_pending_acks > 0)
1322                 veth_flush_acks(cnx);
1323
1324         /* Reschedule the timer */
1325         cnx->ack_timer.expires = jiffies + cnx->ack_timeout;
1326         add_timer(&cnx->ack_timer);
1327         spin_unlock_irqrestore(&cnx->lock, flags);
1328 }
1329
1330 /*
1331  * Module initialization/cleanup
1332  */
1333
1334 void __exit veth_module_cleanup(void)
1335 {
1336         int i;
1337
1338         for (i = 0; i < HVMAXARCHITECTEDLPS; ++i)
1339                 veth_destroy_connection(i);
1340
1341         HvLpEvent_unregisterHandler(HvLpEvent_Type_VirtualLan);
1342
1343         for (i = 0; i < HVMAXARCHITECTEDVIRTUALLANS; ++i) {
1344                 struct net_device *dev = veth_dev[i];
1345
1346                 if (! dev)
1347                         continue;
1348
1349                 veth_dev[i] = NULL;
1350                 unregister_netdev(dev);
1351                 free_netdev(dev);
1352         }
1353 }
1354 module_exit(veth_module_cleanup);
1355
1356 int __init veth_module_init(void)
1357 {
1358         HvLpIndexMap vlan_map = HvLpConfig_getVirtualLanIndexMap();
1359         int i;
1360         int rc;
1361
1362         this_lp = HvLpConfig_getLpIndex_outline();
1363
1364         for (i = 0; i < HVMAXARCHITECTEDLPS; ++i) {
1365                 rc = veth_init_connection(i);
1366                 if (rc != 0) {
1367                         veth_module_cleanup();
1368                         return rc;
1369                 }
1370         }
1371
1372         for (i = 0; i < HVMAXARCHITECTEDVIRTUALLANS; ++i) {
1373                 struct net_device *dev;
1374
1375                 if (! (vlan_map & (0x8000 >> i)))
1376                         continue;
1377
1378                 dev = veth_probe_one(i);
1379
1380                 if (! dev) {
1381                         veth_module_cleanup();
1382                         return rc;
1383                 }
1384
1385                 veth_dev[i] = dev;
1386         }
1387
1388         HvLpEvent_registerHandler(HvLpEvent_Type_VirtualLan,
1389                                   &veth_handle_event);
1390
1391         /* Start the state machine on each connection, to commence
1392          * link negotiation */
1393         for (i = 0; i < HVMAXARCHITECTEDLPS; i++)
1394                 if (veth_cnx[i])
1395                         veth_kick_statemachine(veth_cnx[i]);
1396
1397         return 0;
1398 }
1399 module_init(veth_module_init);