drivers/s390/net/qeth_l3_main.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  *    Copyright IBM Corp. 2007, 2009
   4  *    Author(s): Utz Bacher <utz.bacher@de.ibm.com>,
   5  *               Frank Pavlic <fpavlic@de.ibm.com>,
   6  *               Thomas Spatzier <tspat@de.ibm.com>,
   7  *               Frank Blaschka <frank.blaschka@de.ibm.com>
   8  */
   9
  10 #define KMSG_COMPONENT "qeth"
  11 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
  12
  13 #include <linux/module.h>
  14 #include <linux/moduleparam.h>
  15 #include <linux/bitops.h>
  16 #include <linux/string.h>
  17 #include <linux/errno.h>
  18 #include <linux/kernel.h>
  19 #include <linux/etherdevice.h>
  20 #include <linux/ip.h>
  21 #include <linux/in.h>
  22 #include <linux/ipv6.h>
  23 #include <linux/inetdevice.h>
  24 #include <linux/igmp.h>
  25 #include <linux/slab.h>
  26 #include <linux/if_ether.h>
  27 #include <linux/if_vlan.h>
  28 #include <linux/skbuff.h>
  29
  30 #include <net/ip.h>
  31 #include <net/arp.h>
  32 #include <net/route.h>
  33 #include <net/ipv6.h>
  34 #include <net/ip6_route.h>
  35 #include <net/ip6_fib.h>
  36 #include <net/iucv/af_iucv.h>
  37 #include <linux/hashtable.h>
  38
  39 #include "qeth_l3.h"
  40
  41
  42 static int qeth_l3_set_offline(struct ccwgroup_device *);
  43 static int qeth_l3_stop(struct net_device *);
  44 static void qeth_l3_set_rx_mode(struct net_device *dev);
  45 static int qeth_l3_register_addr_entry(struct qeth_card *,
  46                 struct qeth_ipaddr *);
  47 static int qeth_l3_deregister_addr_entry(struct qeth_card *,
  48                 struct qeth_ipaddr *);
  49
  50 static void qeth_l3_ipaddr4_to_string(const __u8 *addr, char *buf)
  51 {
  52         sprintf(buf, "%pI4", addr);
  53 }
  54
  55 static void qeth_l3_ipaddr6_to_string(const __u8 *addr, char *buf)
  56 {
  57         sprintf(buf, "%pI6", addr);
  58 }
  59
  60 void qeth_l3_ipaddr_to_string(enum qeth_prot_versions proto, const __u8 *addr,
  61                                 char *buf)
  62 {
  63         if (proto == QETH_PROT_IPV4)
  64                 qeth_l3_ipaddr4_to_string(addr, buf);
  65         else if (proto == QETH_PROT_IPV6)
  66                 qeth_l3_ipaddr6_to_string(addr, buf);
  67 }
  68
  69 static struct qeth_ipaddr *qeth_l3_get_addr_buffer(enum qeth_prot_versions prot)
  70 {
  71         struct qeth_ipaddr *addr = kmalloc(sizeof(*addr), GFP_ATOMIC);
  72
  73         if (addr)
  74                 qeth_l3_init_ipaddr(addr, QETH_IP_TYPE_NORMAL, prot);
  75         return addr;
  76 }
  77
  78 static struct qeth_ipaddr *qeth_l3_find_addr_by_ip(struct qeth_card *card,
  79                                                    struct qeth_ipaddr *query)
  80 {
  81         u64 key = qeth_l3_ipaddr_hash(query);
  82         struct qeth_ipaddr *addr;
  83
  84         if (query->is_multicast) {
  85                 hash_for_each_possible(card->ip_mc_htable, addr, hnode, key)
  86                         if (qeth_l3_addr_match_ip(addr, query))
  87                                 return addr;
  88         } else {
  89                 hash_for_each_possible(card->ip_htable,  addr, hnode, key)
  90                         if (qeth_l3_addr_match_ip(addr, query))
  91                                 return addr;
  92         }
  93         return NULL;
  94 }
  95
  96 static void qeth_l3_convert_addr_to_bits(u8 *addr, u8 *bits, int len)
  97 {
  98         int i, j;
  99         u8 octet;
 100
 101         for (i = 0; i < len; ++i) {
 102                 octet = addr[i];
 103                 for (j = 7; j >= 0; --j) {
 104                         bits[i*8 + j] = octet & 1;
 105                         octet >>= 1;
 106                 }
 107         }
 108 }
 109
 110 static bool qeth_l3_is_addr_covered_by_ipato(struct qeth_card *card,
 111                                              struct qeth_ipaddr *addr)
 112 {
 113         struct qeth_ipato_entry *ipatoe;
 114         u8 addr_bits[128] = {0, };
 115         u8 ipatoe_bits[128] = {0, };
 116         int rc = 0;
 117
 118         if (!card->ipato.enabled)
 119                 return false;
 120         if (addr->type != QETH_IP_TYPE_NORMAL)
 121                 return false;
 122
 123         qeth_l3_convert_addr_to_bits((u8 *) &addr->u, addr_bits,
 124                                   (addr->proto == QETH_PROT_IPV4)? 4:16);
 125         list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
 126                 if (addr->proto != ipatoe->proto)
 127                         continue;
 128                 qeth_l3_convert_addr_to_bits(ipatoe->addr, ipatoe_bits,
 129                                           (ipatoe->proto == QETH_PROT_IPV4) ?
 130                                           4 : 16);
 131                 if (addr->proto == QETH_PROT_IPV4)
 132                         rc = !memcmp(addr_bits, ipatoe_bits,
 133                                      min(32, ipatoe->mask_bits));
 134                 else
 135                         rc = !memcmp(addr_bits, ipatoe_bits,
 136                                      min(128, ipatoe->mask_bits));
 137                 if (rc)
 138                         break;
 139         }
 140         /* invert? */
 141         if ((addr->proto == QETH_PROT_IPV4) && card->ipato.invert4)
 142                 rc = !rc;
 143         else if ((addr->proto == QETH_PROT_IPV6) && card->ipato.invert6)
 144                 rc = !rc;
 145
 146         return rc;
 147 }
 148
 149 static int qeth_l3_delete_ip(struct qeth_card *card,
 150                              struct qeth_ipaddr *tmp_addr)
 151 {
 152         int rc = 0;
 153         struct qeth_ipaddr *addr;
 154
 155         if (tmp_addr->type == QETH_IP_TYPE_RXIP)
 156                 QETH_CARD_TEXT(card, 2, "delrxip");
 157         else if (tmp_addr->type == QETH_IP_TYPE_VIPA)
 158                 QETH_CARD_TEXT(card, 2, "delvipa");
 159         else
 160                 QETH_CARD_TEXT(card, 2, "delip");
 161
 162         if (tmp_addr->proto == QETH_PROT_IPV4)
 163                 QETH_CARD_HEX(card, 4, &tmp_addr->u.a4.addr, 4);
 164         else {
 165                 QETH_CARD_HEX(card, 4, &tmp_addr->u.a6.addr, 8);
 166                 QETH_CARD_HEX(card, 4, ((char *)&tmp_addr->u.a6.addr) + 8, 8);
 167         }
 168
 169         addr = qeth_l3_find_addr_by_ip(card, tmp_addr);
 170         if (!addr || !qeth_l3_addr_match_all(addr, tmp_addr))
 171                 return -ENOENT;
 172
 173         addr->ref_counter--;
 174         if (addr->type == QETH_IP_TYPE_NORMAL && addr->ref_counter > 0)
 175                 return rc;
 176         if (addr->in_progress)
 177                 return -EINPROGRESS;
 178
 179         if (qeth_card_hw_is_reachable(card))
 180                 rc = qeth_l3_deregister_addr_entry(card, addr);
 181
 182         hash_del(&addr->hnode);
 183         kfree(addr);
 184
 185         return rc;
 186 }
 187
 188 static int qeth_l3_add_ip(struct qeth_card *card, struct qeth_ipaddr *tmp_addr)
 189 {
 190         int rc = 0;
 191         struct qeth_ipaddr *addr;
 192         char buf[40];
 193
 194         if (tmp_addr->type == QETH_IP_TYPE_RXIP)
 195                 QETH_CARD_TEXT(card, 2, "addrxip");
 196         else if (tmp_addr->type == QETH_IP_TYPE_VIPA)
 197                 QETH_CARD_TEXT(card, 2, "addvipa");
 198         else
 199                 QETH_CARD_TEXT(card, 2, "addip");
 200
 201         if (tmp_addr->proto == QETH_PROT_IPV4)
 202                 QETH_CARD_HEX(card, 4, &tmp_addr->u.a4.addr, 4);
 203         else {
 204                 QETH_CARD_HEX(card, 4, &tmp_addr->u.a6.addr, 8);
 205                 QETH_CARD_HEX(card, 4, ((char *)&tmp_addr->u.a6.addr) + 8, 8);
 206         }
 207
 208         addr = qeth_l3_find_addr_by_ip(card, tmp_addr);
 209         if (addr) {
 210                 if (tmp_addr->type != QETH_IP_TYPE_NORMAL)
 211                         return -EADDRINUSE;
 212                 if (qeth_l3_addr_match_all(addr, tmp_addr)) {
 213                         addr->ref_counter++;
 214                         return 0;
 215                 }
 216                 qeth_l3_ipaddr_to_string(tmp_addr->proto, (u8 *)&tmp_addr->u,
 217                                          buf);
 218                 dev_warn(&card->gdev->dev,
 219                          "Registering IP address %s failed\n", buf);
 220                 return -EADDRINUSE;
 221         } else {
 222                 addr = qeth_l3_get_addr_buffer(tmp_addr->proto);
 223                 if (!addr)
 224                         return -ENOMEM;
 225
 226                 memcpy(addr, tmp_addr, sizeof(struct qeth_ipaddr));
 227                 addr->ref_counter = 1;
 228
 229                 if (qeth_l3_is_addr_covered_by_ipato(card, addr)) {
 230                         QETH_CARD_TEXT(card, 2, "tkovaddr");
 231                         addr->ipato = 1;
 232                 }
 233                 hash_add(card->ip_htable, &addr->hnode,
 234                                 qeth_l3_ipaddr_hash(addr));
 235
 236                 if (!qeth_card_hw_is_reachable(card)) {
 237                         addr->disp_flag = QETH_DISP_ADDR_ADD;
 238                         return 0;
 239                 }
 240
 241                 /* qeth_l3_register_addr_entry can go to sleep
 242                  * if we add a IPV4 addr. It is caused by the reason
 243                  * that SETIP ipa cmd starts ARP staff for IPV4 addr.
 244                  * Thus we should unlock spinlock, and make a protection
 245                  * using in_progress variable to indicate that there is
 246                  * an hardware operation with this IPV4 address
 247                  */
 248                 if (addr->proto == QETH_PROT_IPV4) {
 249                         addr->in_progress = 1;
 250                         spin_unlock_bh(&card->ip_lock);
 251                         rc = qeth_l3_register_addr_entry(card, addr);
 252                         spin_lock_bh(&card->ip_lock);
 253                         addr->in_progress = 0;
 254                 } else
 255                         rc = qeth_l3_register_addr_entry(card, addr);
 256
 257                 if (!rc || (rc == IPA_RC_DUPLICATE_IP_ADDRESS) ||
 258                                 (rc == IPA_RC_LAN_OFFLINE)) {
 259                         addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
 260                         if (addr->ref_counter < 1) {
 261                                 qeth_l3_deregister_addr_entry(card, addr);
 262                                 hash_del(&addr->hnode);
 263                                 kfree(addr);
 264                         }
 265                 } else {
 266                         hash_del(&addr->hnode);
 267                         kfree(addr);
 268                 }
 269         }
 270         return rc;
 271 }
 272
 273 static void qeth_l3_clear_ip_htable(struct qeth_card *card, int recover)
 274 {
 275         struct qeth_ipaddr *addr;
 276         struct hlist_node *tmp;
 277         int i;
 278
 279         QETH_CARD_TEXT(card, 4, "clearip");
 280
 281         spin_lock_bh(&card->ip_lock);
 282
 283         hash_for_each_safe(card->ip_htable, i, tmp, addr, hnode) {
 284                 if (!recover) {
 285                         hash_del(&addr->hnode);
 286                         kfree(addr);
 287                         continue;
 288                 }
 289                 addr->disp_flag = QETH_DISP_ADDR_ADD;
 290         }
 291
 292         spin_unlock_bh(&card->ip_lock);
 293
 294         spin_lock_bh(&card->mclock);
 295
 296         hash_for_each_safe(card->ip_mc_htable, i, tmp, addr, hnode) {
 297                 hash_del(&addr->hnode);
 298                 kfree(addr);
 299         }
 300
 301         spin_unlock_bh(&card->mclock);
 302
 303
 304 }
 305 static void qeth_l3_recover_ip(struct qeth_card *card)
 306 {
 307         struct qeth_ipaddr *addr;
 308         struct hlist_node *tmp;
 309         int i;
 310         int rc;
 311
 312         QETH_CARD_TEXT(card, 4, "recovrip");
 313
 314         spin_lock_bh(&card->ip_lock);
 315
 316         hash_for_each_safe(card->ip_htable, i, tmp, addr, hnode) {
 317                 if (addr->disp_flag == QETH_DISP_ADDR_ADD) {
 318                         if (addr->proto == QETH_PROT_IPV4) {
 319                                 addr->in_progress = 1;
 320                                 spin_unlock_bh(&card->ip_lock);
 321                                 rc = qeth_l3_register_addr_entry(card, addr);
 322                                 spin_lock_bh(&card->ip_lock);
 323                                 addr->in_progress = 0;
 324                         } else
 325                                 rc = qeth_l3_register_addr_entry(card, addr);
 326
 327                         if (!rc) {
 328                                 addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
 329                                 if (addr->ref_counter < 1)
 330                                         qeth_l3_delete_ip(card, addr);
 331                         } else {
 332                                 hash_del(&addr->hnode);
 333                                 kfree(addr);
 334                         }
 335                 }
 336         }
 337
 338         spin_unlock_bh(&card->ip_lock);
 339
 340 }
 341
 342 static int qeth_l3_send_setdelmc(struct qeth_card *card,
 343                         struct qeth_ipaddr *addr, int ipacmd)
 344 {
 345         int rc;
 346         struct qeth_cmd_buffer *iob;
 347         struct qeth_ipa_cmd *cmd;
 348
 349         QETH_CARD_TEXT(card, 4, "setdelmc");
 350
 351         iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
 352         if (!iob)
 353                 return -ENOMEM;
 354         cmd = __ipa_cmd(iob);
 355         ether_addr_copy(cmd->data.setdelipm.mac, addr->mac);
 356         if (addr->proto == QETH_PROT_IPV6)
 357                 memcpy(cmd->data.setdelipm.ip6, &addr->u.a6.addr,
 358                        sizeof(struct in6_addr));
 359         else
 360                 memcpy(&cmd->data.setdelipm.ip4, &addr->u.a4.addr, 4);
 361
 362         rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 363
 364         return rc;
 365 }
 366
 367 static void qeth_l3_fill_netmask(u8 *netmask, unsigned int len)
 368 {
 369         int i, j;
 370         for (i = 0; i < 16; i++) {
 371                 j = (len) - (i * 8);
 372                 if (j >= 8)
 373                         netmask[i] = 0xff;
 374                 else if (j > 0)
 375                         netmask[i] = (u8)(0xFF00 >> j);
 376                 else
 377                         netmask[i] = 0;
 378         }
 379 }
 380
 381 static u32 qeth_l3_get_setdelip_flags(struct qeth_ipaddr *addr, bool set)
 382 {
 383         switch (addr->type) {
 384         case QETH_IP_TYPE_RXIP:
 385                 return (set) ? QETH_IPA_SETIP_TAKEOVER_FLAG : 0;
 386         case QETH_IP_TYPE_VIPA:
 387                 return (set) ? QETH_IPA_SETIP_VIPA_FLAG :
 388                                QETH_IPA_DELIP_VIPA_FLAG;
 389         default:
 390                 return (set && addr->ipato) ? QETH_IPA_SETIP_TAKEOVER_FLAG : 0;
 391         }
 392 }
 393
 394 static int qeth_l3_send_setdelip(struct qeth_card *card,
 395                                  struct qeth_ipaddr *addr,
 396                                  enum qeth_ipa_cmds ipacmd)
 397 {
 398         struct qeth_cmd_buffer *iob;
 399         struct qeth_ipa_cmd *cmd;
 400         __u8 netmask[16];
 401         u32 flags;
 402
 403         QETH_CARD_TEXT(card, 4, "setdelip");
 404
 405         iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
 406         if (!iob)
 407                 return -ENOMEM;
 408         cmd = __ipa_cmd(iob);
 409
 410         flags = qeth_l3_get_setdelip_flags(addr, ipacmd == IPA_CMD_SETIP);
 411         QETH_CARD_TEXT_(card, 4, "flags%02X", flags);
 412
 413         if (addr->proto == QETH_PROT_IPV6) {
 414                 memcpy(cmd->data.setdelip6.ip_addr, &addr->u.a6.addr,
 415                        sizeof(struct in6_addr));
 416                 qeth_l3_fill_netmask(netmask, addr->u.a6.pfxlen);
 417                 memcpy(cmd->data.setdelip6.mask, netmask,
 418                        sizeof(struct in6_addr));
 419                 cmd->data.setdelip6.flags = flags;
 420         } else {
 421                 memcpy(cmd->data.setdelip4.ip_addr, &addr->u.a4.addr, 4);
 422                 memcpy(cmd->data.setdelip4.mask, &addr->u.a4.mask, 4);
 423                 cmd->data.setdelip4.flags = flags;
 424         }
 425
 426         return qeth_send_ipa_cmd(card, iob, NULL, NULL);
 427 }
 428
 429 static int qeth_l3_send_setrouting(struct qeth_card *card,
 430         enum qeth_routing_types type, enum qeth_prot_versions prot)
 431 {
 432         int rc;
 433         struct qeth_ipa_cmd *cmd;
 434         struct qeth_cmd_buffer *iob;
 435
 436         QETH_CARD_TEXT(card, 4, "setroutg");
 437         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETRTG, prot);
 438         if (!iob)
 439                 return -ENOMEM;
 440         cmd = __ipa_cmd(iob);
 441         cmd->data.setrtg.type = (type);
 442         rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 443
 444         return rc;
 445 }
 446
 447 static int qeth_l3_correct_routing_type(struct qeth_card *card,
 448                 enum qeth_routing_types *type, enum qeth_prot_versions prot)
 449 {
 450         if (card->info.type == QETH_CARD_TYPE_IQD) {
 451                 switch (*type) {
 452                 case NO_ROUTER:
 453                 case PRIMARY_CONNECTOR:
 454                 case SECONDARY_CONNECTOR:
 455                 case MULTICAST_ROUTER:
 456                         return 0;
 457                 default:
 458                         goto out_inval;
 459                 }
 460         } else {
 461                 switch (*type) {
 462                 case NO_ROUTER:
 463                 case PRIMARY_ROUTER:
 464                 case SECONDARY_ROUTER:
 465                         return 0;
 466                 case MULTICAST_ROUTER:
 467                         if (qeth_is_ipafunc_supported(card, prot,
 468                                                       IPA_OSA_MC_ROUTER))
 469                                 return 0;
 470                 default:
 471                         goto out_inval;
 472                 }
 473         }
 474 out_inval:
 475         *type = NO_ROUTER;
 476         return -EINVAL;
 477 }
 478
 479 int qeth_l3_setrouting_v4(struct qeth_card *card)
 480 {
 481         int rc;
 482
 483         QETH_CARD_TEXT(card, 3, "setrtg4");
 484
 485         rc = qeth_l3_correct_routing_type(card, &card->options.route4.type,
 486                                   QETH_PROT_IPV4);
 487         if (rc)
 488                 return rc;
 489
 490         rc = qeth_l3_send_setrouting(card, card->options.route4.type,
 491                                   QETH_PROT_IPV4);
 492         if (rc) {
 493                 card->options.route4.type = NO_ROUTER;
 494                 QETH_DBF_MESSAGE(2, "Error (%#06x) while setting routing type on device %x. Type set to 'no router'.\n",
 495                                  rc, CARD_DEVID(card));
 496         }
 497         return rc;
 498 }
 499
 500 int qeth_l3_setrouting_v6(struct qeth_card *card)
 501 {
 502         int rc = 0;
 503
 504         QETH_CARD_TEXT(card, 3, "setrtg6");
 505
 506         if (!qeth_is_supported(card, IPA_IPV6))
 507                 return 0;
 508         rc = qeth_l3_correct_routing_type(card, &card->options.route6.type,
 509                                   QETH_PROT_IPV6);
 510         if (rc)
 511                 return rc;
 512
 513         rc = qeth_l3_send_setrouting(card, card->options.route6.type,
 514                                   QETH_PROT_IPV6);
 515         if (rc) {
 516                 card->options.route6.type = NO_ROUTER;
 517                 QETH_DBF_MESSAGE(2, "Error (%#06x) while setting routing type on device %x. Type set to 'no router'.\n",
 518                                  rc, CARD_DEVID(card));
 519         }
 520         return rc;
 521 }
 522
 523 /*
 524  * IP address takeover related functions
 525  */
 526
 527 /**
 528  * qeth_l3_update_ipato() - Update 'takeover' property, for all NORMAL IPs.
 529  *
 530  * Caller must hold ip_lock.
 531  */
 532 void qeth_l3_update_ipato(struct qeth_card *card)
 533 {
 534         struct qeth_ipaddr *addr;
 535         unsigned int i;
 536
 537         hash_for_each(card->ip_htable, i, addr, hnode) {
 538                 if (addr->type != QETH_IP_TYPE_NORMAL)
 539                         continue;
 540                 addr->ipato = qeth_l3_is_addr_covered_by_ipato(card, addr);
 541         }
 542 }
 543
 544 static void qeth_l3_clear_ipato_list(struct qeth_card *card)
 545 {
 546         struct qeth_ipato_entry *ipatoe, *tmp;
 547
 548         spin_lock_bh(&card->ip_lock);
 549
 550         list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
 551                 list_del(&ipatoe->entry);
 552                 kfree(ipatoe);
 553         }
 554
 555         qeth_l3_update_ipato(card);
 556         spin_unlock_bh(&card->ip_lock);
 557 }
 558
 559 int qeth_l3_add_ipato_entry(struct qeth_card *card,
 560                                 struct qeth_ipato_entry *new)
 561 {
 562         struct qeth_ipato_entry *ipatoe;
 563         int rc = 0;
 564
 565         QETH_CARD_TEXT(card, 2, "addipato");
 566
 567         spin_lock_bh(&card->ip_lock);
 568
 569         list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
 570                 if (ipatoe->proto != new->proto)
 571                         continue;
 572                 if (!memcmp(ipatoe->addr, new->addr,
 573                             (ipatoe->proto == QETH_PROT_IPV4)? 4:16) &&
 574                     (ipatoe->mask_bits == new->mask_bits)) {
 575                         rc = -EEXIST;
 576                         break;
 577                 }
 578         }
 579
 580         if (!rc) {
 581                 list_add_tail(&new->entry, &card->ipato.entries);
 582                 qeth_l3_update_ipato(card);
 583         }
 584
 585         spin_unlock_bh(&card->ip_lock);
 586
 587         return rc;
 588 }
 589
 590 int qeth_l3_del_ipato_entry(struct qeth_card *card,
 591                             enum qeth_prot_versions proto, u8 *addr,
 592                             int mask_bits)
 593 {
 594         struct qeth_ipato_entry *ipatoe, *tmp;
 595         int rc = -ENOENT;
 596
 597         QETH_CARD_TEXT(card, 2, "delipato");
 598
 599         spin_lock_bh(&card->ip_lock);
 600
 601         list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
 602                 if (ipatoe->proto != proto)
 603                         continue;
 604                 if (!memcmp(ipatoe->addr, addr,
 605                             (proto == QETH_PROT_IPV4)? 4:16) &&
 606                     (ipatoe->mask_bits == mask_bits)) {
 607                         list_del(&ipatoe->entry);
 608                         qeth_l3_update_ipato(card);
 609                         kfree(ipatoe);
 610                         rc = 0;
 611                 }
 612         }
 613
 614         spin_unlock_bh(&card->ip_lock);
 615         return rc;
 616 }
 617
 618 int qeth_l3_modify_rxip_vipa(struct qeth_card *card, bool add, const u8 *ip,
 619                              enum qeth_ip_types type,
 620                              enum qeth_prot_versions proto)
 621 {
 622         struct qeth_ipaddr addr;
 623         int rc;
 624
 625         qeth_l3_init_ipaddr(&addr, type, proto);
 626         if (proto == QETH_PROT_IPV4)
 627                 memcpy(&addr.u.a4.addr, ip, 4);
 628         else
 629                 memcpy(&addr.u.a6.addr, ip, 16);
 630
 631         spin_lock_bh(&card->ip_lock);
 632         rc = add ? qeth_l3_add_ip(card, &addr) : qeth_l3_delete_ip(card, &addr);
 633         spin_unlock_bh(&card->ip_lock);
 634         return rc;
 635 }
 636
 637 int qeth_l3_modify_hsuid(struct qeth_card *card, bool add)
 638 {
 639         struct qeth_ipaddr addr;
 640         int rc, i;
 641
 642         qeth_l3_init_ipaddr(&addr, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV6);
 643         addr.u.a6.addr.s6_addr[0] = 0xfe;
 644         addr.u.a6.addr.s6_addr[1] = 0x80;
 645         for (i = 0; i < 8; i++)
 646                 addr.u.a6.addr.s6_addr[8+i] = card->options.hsuid[i];
 647
 648         spin_lock_bh(&card->ip_lock);
 649         rc = add ? qeth_l3_add_ip(card, &addr) : qeth_l3_delete_ip(card, &addr);
 650         spin_unlock_bh(&card->ip_lock);
 651         return rc;
 652 }
 653
 654 static int qeth_l3_register_addr_entry(struct qeth_card *card,
 655                                 struct qeth_ipaddr *addr)
 656 {
 657         char buf[50];
 658         int rc = 0;
 659         int cnt = 3;
 660
 661         if (card->options.sniffer)
 662                 return 0;
 663
 664         if (addr->proto == QETH_PROT_IPV4) {
 665                 QETH_CARD_TEXT(card, 2, "setaddr4");
 666                 QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
 667         } else if (addr->proto == QETH_PROT_IPV6) {
 668                 QETH_CARD_TEXT(card, 2, "setaddr6");
 669                 QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
 670                 QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
 671         } else {
 672                 QETH_CARD_TEXT(card, 2, "setaddr?");
 673                 QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
 674         }
 675         do {
 676                 if (addr->is_multicast)
 677                         rc =  qeth_l3_send_setdelmc(card, addr, IPA_CMD_SETIPM);
 678                 else
 679                         rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_SETIP);
 680                 if (rc)
 681                         QETH_CARD_TEXT(card, 2, "failed");
 682         } while ((--cnt > 0) && rc);
 683         if (rc) {
 684                 QETH_CARD_TEXT(card, 2, "FAILED");
 685                 qeth_l3_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
 686                 dev_warn(&card->gdev->dev,
 687                         "Registering IP address %s failed\n", buf);
 688         }
 689         return rc;
 690 }
 691
 692 static int qeth_l3_deregister_addr_entry(struct qeth_card *card,
 693                                                 struct qeth_ipaddr *addr)
 694 {
 695         int rc = 0;
 696
 697         if (card->options.sniffer)
 698                 return 0;
 699
 700         if (addr->proto == QETH_PROT_IPV4) {
 701                 QETH_CARD_TEXT(card, 2, "deladdr4");
 702                 QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
 703         } else if (addr->proto == QETH_PROT_IPV6) {
 704                 QETH_CARD_TEXT(card, 2, "deladdr6");
 705                 QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
 706                 QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
 707         } else {
 708                 QETH_CARD_TEXT(card, 2, "deladdr?");
 709                 QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
 710         }
 711         if (addr->is_multicast)
 712                 rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_DELIPM);
 713         else
 714                 rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_DELIP);
 715         if (rc)
 716                 QETH_CARD_TEXT(card, 2, "failed");
 717
 718         return rc;
 719 }
 720
 721 static int qeth_l3_setadapter_parms(struct qeth_card *card)
 722 {
 723         int rc = 0;
 724
 725         QETH_DBF_TEXT(SETUP, 2, "setadprm");
 726
 727         if (qeth_adp_supported(card, IPA_SETADP_ALTER_MAC_ADDRESS)) {
 728                 rc = qeth_setadpparms_change_macaddr(card);
 729                 if (rc)
 730                         dev_warn(&card->gdev->dev, "Reading the adapter MAC"
 731                                 " address failed\n");
 732         }
 733
 734         return rc;
 735 }
 736
 737 static int qeth_l3_start_ipa_arp_processing(struct qeth_card *card)
 738 {
 739         int rc;
 740
 741         QETH_CARD_TEXT(card, 3, "ipaarp");
 742
 743         if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
 744                 dev_info(&card->gdev->dev,
 745                         "ARP processing not supported on %s!\n",
 746                         QETH_CARD_IFNAME(card));
 747                 return 0;
 748         }
 749         rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
 750                                           IPA_CMD_ASS_START, 0);
 751         if (rc) {
 752                 dev_warn(&card->gdev->dev,
 753                         "Starting ARP processing support for %s failed\n",
 754                         QETH_CARD_IFNAME(card));
 755         }
 756         return rc;
 757 }
 758
 759 static int qeth_l3_start_ipa_source_mac(struct qeth_card *card)
 760 {
 761         int rc;
 762
 763         QETH_CARD_TEXT(card, 3, "stsrcmac");
 764
 765         if (!qeth_is_supported(card, IPA_SOURCE_MAC)) {
 766                 dev_info(&card->gdev->dev,
 767                         "Inbound source MAC-address not supported on %s\n",
 768                         QETH_CARD_IFNAME(card));
 769                 return -EOPNOTSUPP;
 770         }
 771
 772         rc = qeth_send_simple_setassparms(card, IPA_SOURCE_MAC,
 773                                           IPA_CMD_ASS_START, 0);
 774         if (rc)
 775                 dev_warn(&card->gdev->dev,
 776                         "Starting source MAC-address support for %s failed\n",
 777                         QETH_CARD_IFNAME(card));
 778         return rc;
 779 }
 780
 781 static int qeth_l3_start_ipa_vlan(struct qeth_card *card)
 782 {
 783         int rc = 0;
 784
 785         QETH_CARD_TEXT(card, 3, "strtvlan");
 786
 787         if (!qeth_is_supported(card, IPA_FULL_VLAN)) {
 788                 dev_info(&card->gdev->dev,
 789                         "VLAN not supported on %s\n", QETH_CARD_IFNAME(card));
 790                 return -EOPNOTSUPP;
 791         }
 792
 793         rc = qeth_send_simple_setassparms(card, IPA_VLAN_PRIO,
 794                                           IPA_CMD_ASS_START, 0);
 795         if (rc) {
 796                 dev_warn(&card->gdev->dev,
 797                         "Starting VLAN support for %s failed\n",
 798                         QETH_CARD_IFNAME(card));
 799         } else {
 800                 dev_info(&card->gdev->dev, "VLAN enabled\n");
 801         }
 802         return rc;
 803 }
 804
 805 static int qeth_l3_start_ipa_multicast(struct qeth_card *card)
 806 {
 807         int rc;
 808
 809         QETH_CARD_TEXT(card, 3, "stmcast");
 810
 811         if (!qeth_is_supported(card, IPA_MULTICASTING)) {
 812                 dev_info(&card->gdev->dev,
 813                         "Multicast not supported on %s\n",
 814                         QETH_CARD_IFNAME(card));
 815                 return -EOPNOTSUPP;
 816         }
 817
 818         rc = qeth_send_simple_setassparms(card, IPA_MULTICASTING,
 819                                           IPA_CMD_ASS_START, 0);
 820         if (rc) {
 821                 dev_warn(&card->gdev->dev,
 822                         "Starting multicast support for %s failed\n",
 823                         QETH_CARD_IFNAME(card));
 824         } else {
 825                 dev_info(&card->gdev->dev, "Multicast enabled\n");
 826                 card->dev->flags |= IFF_MULTICAST;
 827         }
 828         return rc;
 829 }
 830
 831 static int qeth_l3_softsetup_ipv6(struct qeth_card *card)
 832 {
 833         int rc;
 834
 835         QETH_CARD_TEXT(card, 3, "softipv6");
 836
 837         if (card->info.type == QETH_CARD_TYPE_IQD)
 838                 goto out;
 839
 840         rc = qeth_send_simple_setassparms(card, IPA_IPV6,
 841                                           IPA_CMD_ASS_START, 3);
 842         if (rc) {
 843                 dev_err(&card->gdev->dev,
 844                         "Activating IPv6 support for %s failed\n",
 845                         QETH_CARD_IFNAME(card));
 846                 return rc;
 847         }
 848         rc = qeth_send_simple_setassparms_v6(card, IPA_IPV6,
 849                                              IPA_CMD_ASS_START, 0);
 850         if (rc) {
 851                 dev_err(&card->gdev->dev,
 852                         "Activating IPv6 support for %s failed\n",
 853                          QETH_CARD_IFNAME(card));
 854                 return rc;
 855         }
 856         rc = qeth_send_simple_setassparms_v6(card, IPA_PASSTHRU,
 857                                              IPA_CMD_ASS_START, 0);
 858         if (rc) {
 859                 dev_warn(&card->gdev->dev,
 860                         "Enabling the passthrough mode for %s failed\n",
 861                         QETH_CARD_IFNAME(card));
 862                 return rc;
 863         }
 864 out:
 865         dev_info(&card->gdev->dev, "IPV6 enabled\n");
 866         return 0;
 867 }
 868
 869 static int qeth_l3_start_ipa_ipv6(struct qeth_card *card)
 870 {
 871         QETH_CARD_TEXT(card, 3, "strtipv6");
 872
 873         if (!qeth_is_supported(card, IPA_IPV6)) {
 874                 dev_info(&card->gdev->dev,
 875                         "IPv6 not supported on %s\n", QETH_CARD_IFNAME(card));
 876                 return 0;
 877         }
 878         return qeth_l3_softsetup_ipv6(card);
 879 }
 880
 881 static int qeth_l3_start_ipa_broadcast(struct qeth_card *card)
 882 {
 883         int rc;
 884
 885         QETH_CARD_TEXT(card, 3, "stbrdcst");
 886         card->info.broadcast_capable = 0;
 887         if (!qeth_is_supported(card, IPA_FILTERING)) {
 888                 dev_info(&card->gdev->dev,
 889                         "Broadcast not supported on %s\n",
 890                         QETH_CARD_IFNAME(card));
 891                 rc = -EOPNOTSUPP;
 892                 goto out;
 893         }
 894         rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
 895                                           IPA_CMD_ASS_START, 0);
 896         if (rc) {
 897                 dev_warn(&card->gdev->dev, "Enabling broadcast filtering for "
 898                         "%s failed\n", QETH_CARD_IFNAME(card));
 899                 goto out;
 900         }
 901
 902         rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
 903                                           IPA_CMD_ASS_CONFIGURE, 1);
 904         if (rc) {
 905                 dev_warn(&card->gdev->dev,
 906                         "Setting up broadcast filtering for %s failed\n",
 907                         QETH_CARD_IFNAME(card));
 908                 goto out;
 909         }
 910         card->info.broadcast_capable = QETH_BROADCAST_WITH_ECHO;
 911         dev_info(&card->gdev->dev, "Broadcast enabled\n");
 912         rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
 913                                           IPA_CMD_ASS_ENABLE, 1);
 914         if (rc) {
 915                 dev_warn(&card->gdev->dev, "Setting up broadcast echo "
 916                         "filtering for %s failed\n", QETH_CARD_IFNAME(card));
 917                 goto out;
 918         }
 919         card->info.broadcast_capable = QETH_BROADCAST_WITHOUT_ECHO;
 920 out:
 921         if (card->info.broadcast_capable)
 922                 card->dev->flags |= IFF_BROADCAST;
 923         else
 924                 card->dev->flags &= ~IFF_BROADCAST;
 925         return rc;
 926 }
 927
 928 static int qeth_l3_start_ipassists(struct qeth_card *card)
 929 {
 930         QETH_CARD_TEXT(card, 3, "strtipas");
 931
 932         if (qeth_set_access_ctrl_online(card, 0))
 933                 return -EIO;
 934         qeth_l3_start_ipa_arp_processing(card); /* go on*/
 935         qeth_l3_start_ipa_source_mac(card);     /* go on*/
 936         qeth_l3_start_ipa_vlan(card);           /* go on*/
 937         qeth_l3_start_ipa_multicast(card);              /* go on*/
 938         qeth_l3_start_ipa_ipv6(card);           /* go on*/
 939         qeth_l3_start_ipa_broadcast(card);              /* go on*/
 940         return 0;
 941 }
 942
 943 static int qeth_l3_iqd_read_initial_mac_cb(struct qeth_card *card,
 944                 struct qeth_reply *reply, unsigned long data)
 945 {
 946         struct qeth_ipa_cmd *cmd;
 947
 948         cmd = (struct qeth_ipa_cmd *) data;
 949         if (cmd->hdr.return_code == 0)
 950                 ether_addr_copy(card->dev->dev_addr,
 951                                 cmd->data.create_destroy_addr.unique_id);
 952         return 0;
 953 }
 954
 955 static int qeth_l3_iqd_read_initial_mac(struct qeth_card *card)
 956 {
 957         int rc = 0;
 958         struct qeth_cmd_buffer *iob;
 959         struct qeth_ipa_cmd *cmd;
 960
 961         QETH_DBF_TEXT(SETUP, 2, "hsrmac");
 962
 963         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
 964                                      QETH_PROT_IPV6);
 965         if (!iob)
 966                 return -ENOMEM;
 967         cmd = __ipa_cmd(iob);
 968         *((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
 969                         card->info.unique_id;
 970
 971         rc = qeth_send_ipa_cmd(card, iob, qeth_l3_iqd_read_initial_mac_cb,
 972                                 NULL);
 973         return rc;
 974 }
 975
 976 static int qeth_l3_get_unique_id_cb(struct qeth_card *card,
 977                 struct qeth_reply *reply, unsigned long data)
 978 {
 979         struct qeth_ipa_cmd *cmd;
 980
 981         cmd = (struct qeth_ipa_cmd *) data;
 982         if (cmd->hdr.return_code == 0)
 983                 card->info.unique_id = *((__u16 *)
 984                                 &cmd->data.create_destroy_addr.unique_id[6]);
 985         else {
 986                 card->info.unique_id =  UNIQUE_ID_IF_CREATE_ADDR_FAILED |
 987                                         UNIQUE_ID_NOT_BY_CARD;
 988                 dev_warn(&card->gdev->dev, "The network adapter failed to "
 989                         "generate a unique ID\n");
 990         }
 991         return 0;
 992 }
 993
 994 static int qeth_l3_get_unique_id(struct qeth_card *card)
 995 {
 996         int rc = 0;
 997         struct qeth_cmd_buffer *iob;
 998         struct qeth_ipa_cmd *cmd;
 999
1000         QETH_DBF_TEXT(SETUP, 2, "guniqeid");
1001
1002         if (!qeth_is_supported(card, IPA_IPV6)) {
1003                 card->info.unique_id =  UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1004                                         UNIQUE_ID_NOT_BY_CARD;
1005                 return 0;
1006         }
1007
1008         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1009                                      QETH_PROT_IPV6);
1010         if (!iob)
1011                 return -ENOMEM;
1012         cmd = __ipa_cmd(iob);
1013         *((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1014                         card->info.unique_id;
1015
1016         rc = qeth_send_ipa_cmd(card, iob, qeth_l3_get_unique_id_cb, NULL);
1017         return rc;
1018 }
1019
1020 static int
1021 qeth_diags_trace_cb(struct qeth_card *card, struct qeth_reply *reply,
1022                             unsigned long data)
1023 {
1024         struct qeth_ipa_cmd        *cmd;
1025         __u16 rc;
1026
1027         QETH_DBF_TEXT(SETUP, 2, "diastrcb");
1028
1029         cmd = (struct qeth_ipa_cmd *)data;
1030         rc = cmd->hdr.return_code;
1031         if (rc)
1032                 QETH_CARD_TEXT_(card, 2, "dxter%x", rc);
1033         switch (cmd->data.diagass.action) {
1034         case QETH_DIAGS_CMD_TRACE_QUERY:
1035                 break;
1036         case QETH_DIAGS_CMD_TRACE_DISABLE:
1037                 switch (rc) {
1038                 case 0:
1039                 case IPA_RC_INVALID_SUBCMD:
1040                         card->info.promisc_mode = SET_PROMISC_MODE_OFF;
1041                         dev_info(&card->gdev->dev, "The HiperSockets network "
1042                                 "traffic analyzer is deactivated\n");
1043                         break;
1044                 default:
1045                         break;
1046                 }
1047                 break;
1048         case QETH_DIAGS_CMD_TRACE_ENABLE:
1049                 switch (rc) {
1050                 case 0:
1051                         card->info.promisc_mode = SET_PROMISC_MODE_ON;
1052                         dev_info(&card->gdev->dev, "The HiperSockets network "
1053                                 "traffic analyzer is activated\n");
1054                         break;
1055                 case IPA_RC_HARDWARE_AUTH_ERROR:
1056                         dev_warn(&card->gdev->dev, "The device is not "
1057                                 "authorized to run as a HiperSockets network "
1058                                 "traffic analyzer\n");
1059                         break;
1060                 case IPA_RC_TRACE_ALREADY_ACTIVE:
1061                         dev_warn(&card->gdev->dev, "A HiperSockets "
1062                                 "network traffic analyzer is already "
1063                                 "active in the HiperSockets LAN\n");
1064                         break;
1065                 default:
1066                         break;
1067                 }
1068                 break;
1069         default:
1070                 QETH_DBF_MESSAGE(2, "Unknown sniffer action (%#06x) on device %x\n",
1071                                  cmd->data.diagass.action, CARD_DEVID(card));
1072         }
1073
1074         return 0;
1075 }
1076
1077 static int
1078 qeth_diags_trace(struct qeth_card *card, enum qeth_diags_trace_cmds diags_cmd)
1079 {
1080         struct qeth_cmd_buffer *iob;
1081         struct qeth_ipa_cmd    *cmd;
1082
1083         QETH_DBF_TEXT(SETUP, 2, "diagtrac");
1084
1085         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SET_DIAG_ASS, 0);
1086         if (!iob)
1087                 return -ENOMEM;
1088         cmd = __ipa_cmd(iob);
1089         cmd->data.diagass.subcmd_len = 16;
1090         cmd->data.diagass.subcmd = QETH_DIAGS_CMD_TRACE;
1091         cmd->data.diagass.type = QETH_DIAGS_TYPE_HIPERSOCKET;
1092         cmd->data.diagass.action = diags_cmd;
1093         return qeth_send_ipa_cmd(card, iob, qeth_diags_trace_cb, NULL);
1094 }
1095
1096 static void
1097 qeth_l3_add_mc_to_hash(struct qeth_card *card, struct in_device *in4_dev)
1098 {
1099         struct ip_mc_list *im4;
1100         struct qeth_ipaddr *tmp, *ipm;
1101
1102         QETH_CARD_TEXT(card, 4, "addmc");
1103
1104         tmp = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1105         if (!tmp)
1106                 return;
1107
1108         for (im4 = rcu_dereference(in4_dev->mc_list); im4 != NULL;
1109              im4 = rcu_dereference(im4->next_rcu)) {
1110                 ip_eth_mc_map(im4->multiaddr, tmp->mac);
1111                 tmp->u.a4.addr = be32_to_cpu(im4->multiaddr);
1112                 tmp->is_multicast = 1;
1113
1114                 ipm = qeth_l3_find_addr_by_ip(card, tmp);
1115                 if (ipm) {
1116                         /* for mcast, by-IP match means full match */
1117                         ipm->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
1118                 } else {
1119                         ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1120                         if (!ipm)
1121                                 continue;
1122                         ether_addr_copy(ipm->mac, tmp->mac);
1123                         ipm->u.a4.addr = be32_to_cpu(im4->multiaddr);
1124                         ipm->is_multicast = 1;
1125                         ipm->disp_flag = QETH_DISP_ADDR_ADD;
1126                         hash_add(card->ip_mc_htable,
1127                                         &ipm->hnode, qeth_l3_ipaddr_hash(ipm));
1128                 }
1129         }
1130
1131         kfree(tmp);
1132 }
1133
1134 /* called with rcu_read_lock */
1135 static void qeth_l3_add_vlan_mc(struct qeth_card *card)
1136 {
1137         struct in_device *in_dev;
1138         u16 vid;
1139
1140         QETH_CARD_TEXT(card, 4, "addmcvl");
1141
1142         if (!qeth_is_supported(card, IPA_FULL_VLAN))
1143                 return;
1144
1145         for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1146                 struct net_device *netdev;
1147
1148                 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q),
1149                                               vid);
1150                 if (netdev == NULL ||
1151                     !(netdev->flags & IFF_UP))
1152                         continue;
1153                 in_dev = __in_dev_get_rcu(netdev);
1154                 if (!in_dev)
1155                         continue;
1156                 qeth_l3_add_mc_to_hash(card, in_dev);
1157         }
1158 }
1159
1160 static void qeth_l3_add_multicast_ipv4(struct qeth_card *card)
1161 {
1162         struct in_device *in4_dev;
1163
1164         QETH_CARD_TEXT(card, 4, "chkmcv4");
1165
1166         rcu_read_lock();
1167         in4_dev = __in_dev_get_rcu(card->dev);
1168         if (in4_dev == NULL)
1169                 goto unlock;
1170         qeth_l3_add_mc_to_hash(card, in4_dev);
1171         qeth_l3_add_vlan_mc(card);
1172 unlock:
1173         rcu_read_unlock();
1174 }
1175
1176 static void qeth_l3_add_mc6_to_hash(struct qeth_card *card,
1177                                     struct inet6_dev *in6_dev)
1178 {
1179         struct qeth_ipaddr *ipm;
1180         struct ifmcaddr6 *im6;
1181         struct qeth_ipaddr *tmp;
1182
1183         QETH_CARD_TEXT(card, 4, "addmc6");
1184
1185         tmp = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1186         if (!tmp)
1187                 return;
1188
1189         for (im6 = in6_dev->mc_list; im6 != NULL; im6 = im6->next) {
1190                 ipv6_eth_mc_map(&im6->mca_addr, tmp->mac);
1191                 memcpy(&tmp->u.a6.addr, &im6->mca_addr.s6_addr,
1192                        sizeof(struct in6_addr));
1193                 tmp->is_multicast = 1;
1194
1195                 ipm = qeth_l3_find_addr_by_ip(card, tmp);
1196                 if (ipm) {
1197                         /* for mcast, by-IP match means full match */
1198                         ipm->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
1199                         continue;
1200                 }
1201
1202                 ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1203                 if (!ipm)
1204                         continue;
1205
1206                 ether_addr_copy(ipm->mac, tmp->mac);
1207                 memcpy(&ipm->u.a6.addr, &im6->mca_addr.s6_addr,
1208                        sizeof(struct in6_addr));
1209                 ipm->is_multicast = 1;
1210                 ipm->disp_flag = QETH_DISP_ADDR_ADD;
1211                 hash_add(card->ip_mc_htable,
1212                                 &ipm->hnode, qeth_l3_ipaddr_hash(ipm));
1213
1214         }
1215         kfree(tmp);
1216 }
1217
1218 /* called with rcu_read_lock */
1219 static void qeth_l3_add_vlan_mc6(struct qeth_card *card)
1220 {
1221         struct inet6_dev *in_dev;
1222         u16 vid;
1223
1224         QETH_CARD_TEXT(card, 4, "admc6vl");
1225
1226         if (!qeth_is_supported(card, IPA_FULL_VLAN))
1227                 return;
1228
1229         for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1230                 struct net_device *netdev;
1231
1232                 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q),
1233                                               vid);
1234                 if (netdev == NULL ||
1235                     !(netdev->flags & IFF_UP))
1236                         continue;
1237                 in_dev = in6_dev_get(netdev);
1238                 if (!in_dev)
1239                         continue;
1240                 read_lock_bh(&in_dev->lock);
1241                 qeth_l3_add_mc6_to_hash(card, in_dev);
1242                 read_unlock_bh(&in_dev->lock);
1243                 in6_dev_put(in_dev);
1244         }
1245 }
1246
1247 static void qeth_l3_add_multicast_ipv6(struct qeth_card *card)
1248 {
1249         struct inet6_dev *in6_dev;
1250
1251         QETH_CARD_TEXT(card, 4, "chkmcv6");
1252
1253         if (!qeth_is_supported(card, IPA_IPV6))
1254                 return ;
1255         in6_dev = in6_dev_get(card->dev);
1256         if (!in6_dev)
1257                 return;
1258
1259         rcu_read_lock();
1260         read_lock_bh(&in6_dev->lock);
1261         qeth_l3_add_mc6_to_hash(card, in6_dev);
1262         qeth_l3_add_vlan_mc6(card);
1263         read_unlock_bh(&in6_dev->lock);
1264         rcu_read_unlock();
1265         in6_dev_put(in6_dev);
1266 }
1267
1268 static int qeth_l3_vlan_rx_add_vid(struct net_device *dev,
1269                                    __be16 proto, u16 vid)
1270 {
1271         struct qeth_card *card = dev->ml_priv;
1272
1273         set_bit(vid, card->active_vlans);
1274         return 0;
1275 }
1276
1277 static int qeth_l3_vlan_rx_kill_vid(struct net_device *dev,
1278                                     __be16 proto, u16 vid)
1279 {
1280         struct qeth_card *card = dev->ml_priv;
1281
1282         QETH_CARD_TEXT_(card, 4, "kid:%d", vid);
1283
1284         if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
1285                 QETH_CARD_TEXT(card, 3, "kidREC");
1286                 return 0;
1287         }
1288         clear_bit(vid, card->active_vlans);
1289         qeth_l3_set_rx_mode(dev);
1290         return 0;
1291 }
1292
1293 static void qeth_l3_rebuild_skb(struct qeth_card *card, struct sk_buff *skb,
1294                                 struct qeth_hdr *hdr)
1295 {
1296         if (!(hdr->hdr.l3.flags & QETH_HDR_PASSTHRU)) {
1297                 u16 prot = (hdr->hdr.l3.flags & QETH_HDR_IPV6) ? ETH_P_IPV6 :
1298                                                                  ETH_P_IP;
1299                 unsigned char tg_addr[ETH_ALEN];
1300
1301                 skb_reset_network_header(skb);
1302                 switch (hdr->hdr.l3.flags & QETH_HDR_CAST_MASK) {
1303                 case QETH_CAST_MULTICAST:
1304                         if (prot == ETH_P_IP)
1305                                 ip_eth_mc_map(ip_hdr(skb)->daddr, tg_addr);
1306                         else
1307                                 ipv6_eth_mc_map(&ipv6_hdr(skb)->daddr, tg_addr);
1308
1309                         card->stats.multicast++;
1310                         break;
1311                 case QETH_CAST_BROADCAST:
1312                         ether_addr_copy(tg_addr, card->dev->broadcast);
1313                         card->stats.multicast++;
1314                         break;
1315                 default:
1316                         if (card->options.sniffer)
1317                                 skb->pkt_type = PACKET_OTHERHOST;
1318                         ether_addr_copy(tg_addr, card->dev->dev_addr);
1319                 }
1320
1321                 if (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_SRC_MAC_ADDR)
1322                         card->dev->header_ops->create(skb, card->dev, prot,
1323                                 tg_addr, &hdr->hdr.l3.next_hop.rx.src_mac,
1324                                 skb->len);
1325                 else
1326                         card->dev->header_ops->create(skb, card->dev, prot,
1327                                 tg_addr, "FAKELL", skb->len);
1328         }
1329
1330         skb->protocol = eth_type_trans(skb, card->dev);
1331
1332         /* copy VLAN tag from hdr into skb */
1333         if (!card->options.sniffer &&
1334             (hdr->hdr.l3.ext_flags & (QETH_HDR_EXT_VLAN_FRAME |
1335                                       QETH_HDR_EXT_INCLUDE_VLAN_TAG))) {
1336                 u16 tag = (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_VLAN_FRAME) ?
1337                                 hdr->hdr.l3.vlan_id :
1338                                 hdr->hdr.l3.next_hop.rx.vlan_id;
1339                 __vlan_hwaccel_put_tag(skb, htons(ETH_P_8021Q), tag);
1340         }
1341
1342         qeth_rx_csum(card, skb, hdr->hdr.l3.ext_flags);
1343 }
1344
1345 static int qeth_l3_process_inbound_buffer(struct qeth_card *card,
1346                                 int budget, int *done)
1347 {
1348         struct net_device *dev = card->dev;
1349         int work_done = 0;
1350         struct sk_buff *skb;
1351         struct qeth_hdr *hdr;
1352         unsigned int len;
1353         __u16 magic;
1354
1355         *done = 0;
1356         WARN_ON_ONCE(!budget);
1357         while (budget) {
1358                 skb = qeth_core_get_next_skb(card,
1359                         &card->qdio.in_q->bufs[card->rx.b_index],
1360                         &card->rx.b_element, &card->rx.e_offset, &hdr);
1361                 if (!skb) {
1362                         *done = 1;
1363                         break;
1364                 }
1365                 switch (hdr->hdr.l3.id) {
1366                 case QETH_HEADER_TYPE_LAYER3:
1367                         magic = *(__u16 *)skb->data;
1368                         if ((card->info.type == QETH_CARD_TYPE_IQD) &&
1369                             (magic == ETH_P_AF_IUCV)) {
1370                                 len = skb->len;
1371                                 dev_hard_header(skb, dev, ETH_P_AF_IUCV,
1372                                                 dev->dev_addr, "FAKELL", len);
1373                                 skb->protocol = eth_type_trans(skb, dev);
1374                                 netif_receive_skb(skb);
1375                         } else {
1376                                 qeth_l3_rebuild_skb(card, skb, hdr);
1377                                 len = skb->len;
1378                                 napi_gro_receive(&card->napi, skb);
1379                         }
1380                         break;
1381                 case QETH_HEADER_TYPE_LAYER2: /* for HiperSockets sniffer */
1382                         skb->protocol = eth_type_trans(skb, skb->dev);
1383                         len = skb->len;
1384                         netif_receive_skb(skb);
1385                         break;
1386                 default:
1387                         dev_kfree_skb_any(skb);
1388                         QETH_CARD_TEXT(card, 3, "inbunkno");
1389                         QETH_DBF_HEX(CTRL, 3, hdr, sizeof(*hdr));
1390                         continue;
1391                 }
1392                 work_done++;
1393                 budget--;
1394                 card->stats.rx_packets++;
1395                 card->stats.rx_bytes += len;
1396         }
1397         return work_done;
1398 }
1399
1400 static void qeth_l3_stop_card(struct qeth_card *card, int recovery_mode)
1401 {
1402         QETH_DBF_TEXT(SETUP, 2, "stopcard");
1403         QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
1404
1405         qeth_set_allowed_threads(card, 0, 1);
1406         if (card->options.sniffer &&
1407             (card->info.promisc_mode == SET_PROMISC_MODE_ON))
1408                 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
1409         if (card->read.state == CH_STATE_UP &&
1410             card->write.state == CH_STATE_UP &&
1411             (card->state == CARD_STATE_UP)) {
1412                 if (recovery_mode)
1413                         qeth_l3_stop(card->dev);
1414                 else {
1415                         rtnl_lock();
1416                         dev_close(card->dev);
1417                         rtnl_unlock();
1418                 }
1419                 card->state = CARD_STATE_SOFTSETUP;
1420         }
1421         if (card->state == CARD_STATE_SOFTSETUP) {
1422                 qeth_l3_clear_ip_htable(card, 1);
1423                 qeth_clear_ipacmd_list(card);
1424                 card->state = CARD_STATE_HARDSETUP;
1425         }
1426         if (card->state == CARD_STATE_HARDSETUP) {
1427                 qeth_qdio_clear_card(card, 0);
1428                 qeth_clear_qdio_buffers(card);
1429                 qeth_clear_working_pool_list(card);
1430                 card->state = CARD_STATE_DOWN;
1431         }
1432         if (card->state == CARD_STATE_DOWN) {
1433                 qeth_clear_cmd_buffers(&card->read);
1434                 qeth_clear_cmd_buffers(&card->write);
1435         }
1436
1437         flush_workqueue(card->event_wq);
1438 }
1439
1440 /*
1441  * test for and Switch promiscuous mode (on or off)
1442  *  either for guestlan or HiperSocket Sniffer
1443  */
1444 static void
1445 qeth_l3_handle_promisc_mode(struct qeth_card *card)
1446 {
1447         struct net_device *dev = card->dev;
1448
1449         if (((dev->flags & IFF_PROMISC) &&
1450              (card->info.promisc_mode == SET_PROMISC_MODE_ON)) ||
1451             (!(dev->flags & IFF_PROMISC) &&
1452              (card->info.promisc_mode == SET_PROMISC_MODE_OFF)))
1453                 return;
1454
1455         if (card->info.guestlan) {              /* Guestlan trace */
1456                 if (qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
1457                         qeth_setadp_promisc_mode(card);
1458         } else if (card->options.sniffer &&     /* HiperSockets trace */
1459                    qeth_adp_supported(card, IPA_SETADP_SET_DIAG_ASSIST)) {
1460                 if (dev->flags & IFF_PROMISC) {
1461                         QETH_CARD_TEXT(card, 3, "+promisc");
1462                         qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_ENABLE);
1463                 } else {
1464                         QETH_CARD_TEXT(card, 3, "-promisc");
1465                         qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
1466                 }
1467         }
1468 }
1469
1470 static void qeth_l3_set_rx_mode(struct net_device *dev)
1471 {
1472         struct qeth_card *card = dev->ml_priv;
1473         struct qeth_ipaddr *addr;
1474         struct hlist_node *tmp;
1475         int i, rc;
1476
1477         QETH_CARD_TEXT(card, 3, "setmulti");
1478         if (qeth_threads_running(card, QETH_RECOVER_THREAD) &&
1479             (card->state != CARD_STATE_UP))
1480                 return;
1481         if (!card->options.sniffer) {
1482                 spin_lock_bh(&card->mclock);
1483
1484                 qeth_l3_add_multicast_ipv4(card);
1485                 qeth_l3_add_multicast_ipv6(card);
1486
1487                 hash_for_each_safe(card->ip_mc_htable, i, tmp, addr, hnode) {
1488                         switch (addr->disp_flag) {
1489                         case QETH_DISP_ADDR_DELETE:
1490                                 rc = qeth_l3_deregister_addr_entry(card, addr);
1491                                 if (!rc || rc == IPA_RC_MC_ADDR_NOT_FOUND) {
1492                                         hash_del(&addr->hnode);
1493                                         kfree(addr);
1494                                 }
1495                                 break;
1496                         case QETH_DISP_ADDR_ADD:
1497                                 rc = qeth_l3_register_addr_entry(card, addr);
1498                                 if (rc && rc != IPA_RC_LAN_OFFLINE) {
1499                                         hash_del(&addr->hnode);
1500                                         kfree(addr);
1501                                         break;
1502                                 }
1503                                 addr->ref_counter = 1;
1504                                 /* fall through */
1505                         default:
1506                                 /* for next call to set_rx_mode(): */
1507                                 addr->disp_flag = QETH_DISP_ADDR_DELETE;
1508                         }
1509                 }
1510
1511                 spin_unlock_bh(&card->mclock);
1512
1513                 if (!qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
1514                         return;
1515         }
1516         qeth_l3_handle_promisc_mode(card);
1517 }
1518
1519 static int qeth_l3_arp_makerc(int rc)
1520 {
1521         switch (rc) {
1522         case IPA_RC_SUCCESS:
1523                 return 0;
1524         case QETH_IPA_ARP_RC_NOTSUPP:
1525         case QETH_IPA_ARP_RC_Q_NOTSUPP:
1526                 return -EOPNOTSUPP;
1527         case QETH_IPA_ARP_RC_OUT_OF_RANGE:
1528                 return -EINVAL;
1529         case QETH_IPA_ARP_RC_Q_NO_DATA:
1530                 return -ENOENT;
1531         default:
1532                 return -EIO;
1533         }
1534 }
1535
1536 static int qeth_l3_arp_set_no_entries(struct qeth_card *card, int no_entries)
1537 {
1538         int rc;
1539
1540         QETH_CARD_TEXT(card, 3, "arpstnoe");
1541
1542         /*
1543          * currently GuestLAN only supports the ARP assist function
1544          * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_SET_NO_ENTRIES;
1545          * thus we say EOPNOTSUPP for this ARP function
1546          */
1547         if (card->info.guestlan)
1548                 return -EOPNOTSUPP;
1549         if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1550                 return -EOPNOTSUPP;
1551         }
1552         rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
1553                                           IPA_CMD_ASS_ARP_SET_NO_ENTRIES,
1554                                           no_entries);
1555         if (rc)
1556                 QETH_DBF_MESSAGE(2, "Could not set number of ARP entries on device %x: %#x\n",
1557                                  CARD_DEVID(card), rc);
1558         return qeth_l3_arp_makerc(rc);
1559 }
1560
1561 static __u32 get_arp_entry_size(struct qeth_card *card,
1562                         struct qeth_arp_query_data *qdata,
1563                         struct qeth_arp_entrytype *type, __u8 strip_entries)
1564 {
1565         __u32 rc;
1566         __u8 is_hsi;
1567
1568         is_hsi = qdata->reply_bits == 5;
1569         if (type->ip == QETHARP_IP_ADDR_V4) {
1570                 QETH_CARD_TEXT(card, 4, "arpev4");
1571                 if (strip_entries) {
1572                         rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5_short) :
1573                                 sizeof(struct qeth_arp_qi_entry7_short);
1574                 } else {
1575                         rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5) :
1576                                 sizeof(struct qeth_arp_qi_entry7);
1577                 }
1578         } else if (type->ip == QETHARP_IP_ADDR_V6) {
1579                 QETH_CARD_TEXT(card, 4, "arpev6");
1580                 if (strip_entries) {
1581                         rc = is_hsi ?
1582                                 sizeof(struct qeth_arp_qi_entry5_short_ipv6) :
1583                                 sizeof(struct qeth_arp_qi_entry7_short_ipv6);
1584                 } else {
1585                         rc = is_hsi ?
1586                                 sizeof(struct qeth_arp_qi_entry5_ipv6) :
1587                                 sizeof(struct qeth_arp_qi_entry7_ipv6);
1588                 }
1589         } else {
1590                 QETH_CARD_TEXT(card, 4, "arpinv");
1591                 rc = 0;
1592         }
1593
1594         return rc;
1595 }
1596
1597 static int arpentry_matches_prot(struct qeth_arp_entrytype *type, __u16 prot)
1598 {
1599         return (type->ip == QETHARP_IP_ADDR_V4 && prot == QETH_PROT_IPV4) ||
1600                 (type->ip == QETHARP_IP_ADDR_V6 && prot == QETH_PROT_IPV6);
1601 }
1602
1603 static int qeth_l3_arp_query_cb(struct qeth_card *card,
1604                 struct qeth_reply *reply, unsigned long data)
1605 {
1606         struct qeth_ipa_cmd *cmd;
1607         struct qeth_arp_query_data *qdata;
1608         struct qeth_arp_query_info *qinfo;
1609         int i;
1610         int e;
1611         int entrybytes_done;
1612         int stripped_bytes;
1613         __u8 do_strip_entries;
1614
1615         QETH_CARD_TEXT(card, 3, "arpquecb");
1616
1617         qinfo = (struct qeth_arp_query_info *) reply->param;
1618         cmd = (struct qeth_ipa_cmd *) data;
1619         QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.prot_version);
1620         if (cmd->hdr.return_code) {
1621                 QETH_CARD_TEXT(card, 4, "arpcberr");
1622                 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
1623                 return 0;
1624         }
1625         if (cmd->data.setassparms.hdr.return_code) {
1626                 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
1627                 QETH_CARD_TEXT(card, 4, "setaperr");
1628                 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
1629                 return 0;
1630         }
1631         qdata = &cmd->data.setassparms.data.query_arp;
1632         QETH_CARD_TEXT_(card, 4, "anoen%i", qdata->no_entries);
1633
1634         do_strip_entries = (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES) > 0;
1635         stripped_bytes = do_strip_entries ? QETH_QARP_MEDIASPECIFIC_BYTES : 0;
1636         entrybytes_done = 0;
1637         for (e = 0; e < qdata->no_entries; ++e) {
1638                 char *cur_entry;
1639                 __u32 esize;
1640                 struct qeth_arp_entrytype *etype;
1641
1642                 cur_entry = &qdata->data + entrybytes_done;
1643                 etype = &((struct qeth_arp_qi_entry5 *) cur_entry)->type;
1644                 if (!arpentry_matches_prot(etype, cmd->hdr.prot_version)) {
1645                         QETH_CARD_TEXT(card, 4, "pmis");
1646                         QETH_CARD_TEXT_(card, 4, "%i", etype->ip);
1647                         break;
1648                 }
1649                 esize = get_arp_entry_size(card, qdata, etype,
1650                         do_strip_entries);
1651                 QETH_CARD_TEXT_(card, 5, "esz%i", esize);
1652                 if (!esize)
1653                         break;
1654
1655                 if ((qinfo->udata_len - qinfo->udata_offset) < esize) {
1656                         QETH_CARD_TEXT_(card, 4, "qaer3%i", -ENOMEM);
1657                         cmd->hdr.return_code = IPA_RC_ENOMEM;
1658                         goto out_error;
1659                 }
1660
1661                 memcpy(qinfo->udata + qinfo->udata_offset,
1662                         &qdata->data + entrybytes_done + stripped_bytes,
1663                         esize);
1664                 entrybytes_done += esize + stripped_bytes;
1665                 qinfo->udata_offset += esize;
1666                 ++qinfo->no_entries;
1667         }
1668         /* check if all replies received ... */
1669         if (cmd->data.setassparms.hdr.seq_no <
1670             cmd->data.setassparms.hdr.number_of_replies)
1671                 return 1;
1672         QETH_CARD_TEXT_(card, 4, "nove%i", qinfo->no_entries);
1673         memcpy(qinfo->udata, &qinfo->no_entries, 4);
1674         /* keep STRIP_ENTRIES flag so the user program can distinguish
1675          * stripped entries from normal ones */
1676         if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
1677                 qdata->reply_bits |= QETH_QARP_STRIP_ENTRIES;
1678         memcpy(qinfo->udata + QETH_QARP_MASK_OFFSET, &qdata->reply_bits, 2);
1679         QETH_CARD_TEXT_(card, 4, "rc%i", 0);
1680         return 0;
1681 out_error:
1682         i = 0;
1683         memcpy(qinfo->udata, &i, 4);
1684         return 0;
1685 }
1686
1687 static int qeth_l3_query_arp_cache_info(struct qeth_card *card,
1688         enum qeth_prot_versions prot,
1689         struct qeth_arp_query_info *qinfo)
1690 {
1691         struct qeth_cmd_buffer *iob;
1692         struct qeth_ipa_cmd *cmd;
1693         int rc;
1694
1695         QETH_CARD_TEXT_(card, 3, "qarpipv%i", prot);
1696
1697         iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
1698                                        IPA_CMD_ASS_ARP_QUERY_INFO,
1699                                        sizeof(struct qeth_arp_query_data)
1700                                                 - sizeof(char),
1701                                        prot);
1702         if (!iob)
1703                 return -ENOMEM;
1704         cmd = __ipa_cmd(iob);
1705         cmd->data.setassparms.data.query_arp.request_bits = 0x000F;
1706         rc = qeth_send_control_data(card,
1707                                     QETH_SETASS_BASE_LEN + QETH_ARP_CMD_LEN,
1708                                     iob, qeth_l3_arp_query_cb, qinfo);
1709         if (rc)
1710                 QETH_DBF_MESSAGE(2, "Error while querying ARP cache on device %x: %#x\n",
1711                                  CARD_DEVID(card), rc);
1712         return qeth_l3_arp_makerc(rc);
1713 }
1714
1715 static int qeth_l3_arp_query(struct qeth_card *card, char __user *udata)
1716 {
1717         struct qeth_arp_query_info qinfo = {0, };
1718         int rc;
1719
1720         QETH_CARD_TEXT(card, 3, "arpquery");
1721
1722         if (!qeth_is_supported(card,/*IPA_QUERY_ARP_ADDR_INFO*/
1723                                IPA_ARP_PROCESSING)) {
1724                 QETH_CARD_TEXT(card, 3, "arpqnsup");
1725                 rc = -EOPNOTSUPP;
1726                 goto out;
1727         }
1728         /* get size of userspace buffer and mask_bits -> 6 bytes */
1729         if (copy_from_user(&qinfo, udata, 6)) {
1730                 rc = -EFAULT;
1731                 goto out;
1732         }
1733         qinfo.udata = kzalloc(qinfo.udata_len, GFP_KERNEL);
1734         if (!qinfo.udata) {
1735                 rc = -ENOMEM;
1736                 goto out;
1737         }
1738         qinfo.udata_offset = QETH_QARP_ENTRIES_OFFSET;
1739         rc = qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV4, &qinfo);
1740         if (rc) {
1741                 if (copy_to_user(udata, qinfo.udata, 4))
1742                         rc = -EFAULT;
1743                 goto free_and_out;
1744         }
1745         if (qinfo.mask_bits & QETH_QARP_WITH_IPV6) {
1746                 /* fails in case of GuestLAN QDIO mode */
1747                 qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV6, &qinfo);
1748         }
1749         if (copy_to_user(udata, qinfo.udata, qinfo.udata_len)) {
1750                 QETH_CARD_TEXT(card, 4, "qactf");
1751                 rc = -EFAULT;
1752                 goto free_and_out;
1753         }
1754         QETH_CARD_TEXT(card, 4, "qacts");
1755
1756 free_and_out:
1757         kfree(qinfo.udata);
1758 out:
1759         return rc;
1760 }
1761
1762 static int qeth_l3_arp_modify_entry(struct qeth_card *card,
1763                                     struct qeth_arp_cache_entry *entry,
1764                                     enum qeth_arp_process_subcmds arp_cmd)
1765 {
1766         struct qeth_arp_cache_entry *cmd_entry;
1767         struct qeth_cmd_buffer *iob;
1768         int rc;
1769
1770         if (arp_cmd == IPA_CMD_ASS_ARP_ADD_ENTRY)
1771                 QETH_CARD_TEXT(card, 3, "arpadd");
1772         else
1773                 QETH_CARD_TEXT(card, 3, "arpdel");
1774
1775         /*
1776          * currently GuestLAN only supports the ARP assist function
1777          * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_ADD_ENTRY;
1778          * thus we say EOPNOTSUPP for this ARP function
1779          */
1780         if (card->info.guestlan)
1781                 return -EOPNOTSUPP;
1782         if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1783                 return -EOPNOTSUPP;
1784         }
1785
1786         iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING, arp_cmd,
1787                                        sizeof(*cmd_entry), QETH_PROT_IPV4);
1788         if (!iob)
1789                 return -ENOMEM;
1790
1791         cmd_entry = &__ipa_cmd(iob)->data.setassparms.data.arp_entry;
1792         ether_addr_copy(cmd_entry->macaddr, entry->macaddr);
1793         memcpy(cmd_entry->ipaddr, entry->ipaddr, 4);
1794         rc = qeth_send_ipa_cmd(card, iob, qeth_setassparms_cb, NULL);
1795         if (rc)
1796                 QETH_DBF_MESSAGE(2, "Could not modify (cmd: %#x) ARP entry on device %x: %#x\n",
1797                                  arp_cmd, CARD_DEVID(card), rc);
1798
1799         return qeth_l3_arp_makerc(rc);
1800 }
1801
1802 static int qeth_l3_arp_flush_cache(struct qeth_card *card)
1803 {
1804         int rc;
1805
1806         QETH_CARD_TEXT(card, 3, "arpflush");
1807
1808         /*
1809          * currently GuestLAN only supports the ARP assist function
1810          * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_FLUSH_CACHE;
1811          * thus we say EOPNOTSUPP for this ARP function
1812         */
1813         if (card->info.guestlan || (card->info.type == QETH_CARD_TYPE_IQD))
1814                 return -EOPNOTSUPP;
1815         if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1816                 return -EOPNOTSUPP;
1817         }
1818         rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
1819                                           IPA_CMD_ASS_ARP_FLUSH_CACHE, 0);
1820         if (rc)
1821                 QETH_DBF_MESSAGE(2, "Could not flush ARP cache on device %x: %#x\n",
1822                                  CARD_DEVID(card), rc);
1823         return qeth_l3_arp_makerc(rc);
1824 }
1825
1826 static int qeth_l3_do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
1827 {
1828         struct qeth_card *card = dev->ml_priv;
1829         struct qeth_arp_cache_entry arp_entry;
1830         enum qeth_arp_process_subcmds arp_cmd;
1831         int rc = 0;
1832
1833         switch (cmd) {
1834         case SIOC_QETH_ARP_SET_NO_ENTRIES:
1835                 if (!capable(CAP_NET_ADMIN)) {
1836                         rc = -EPERM;
1837                         break;
1838                 }
1839                 rc = qeth_l3_arp_set_no_entries(card, rq->ifr_ifru.ifru_ivalue);
1840                 break;
1841         case SIOC_QETH_ARP_QUERY_INFO:
1842                 if (!capable(CAP_NET_ADMIN)) {
1843                         rc = -EPERM;
1844                         break;
1845                 }
1846                 rc = qeth_l3_arp_query(card, rq->ifr_ifru.ifru_data);
1847                 break;
1848         case SIOC_QETH_ARP_ADD_ENTRY:
1849         case SIOC_QETH_ARP_REMOVE_ENTRY:
1850                 if (!capable(CAP_NET_ADMIN))
1851                         return -EPERM;
1852                 if (copy_from_user(&arp_entry, rq->ifr_data, sizeof(arp_entry)))
1853                         return -EFAULT;
1854
1855                 arp_cmd = (cmd == SIOC_QETH_ARP_ADD_ENTRY) ?
1856                                 IPA_CMD_ASS_ARP_ADD_ENTRY :
1857                                 IPA_CMD_ASS_ARP_REMOVE_ENTRY;
1858                 return qeth_l3_arp_modify_entry(card, &arp_entry, arp_cmd);
1859         case SIOC_QETH_ARP_FLUSH_CACHE:
1860                 if (!capable(CAP_NET_ADMIN)) {
1861                         rc = -EPERM;
1862                         break;
1863                 }
1864                 rc = qeth_l3_arp_flush_cache(card);
1865                 break;
1866         default:
1867                 rc = -EOPNOTSUPP;
1868         }
1869         return rc;
1870 }
1871
1872 static int qeth_l3_get_cast_type(struct sk_buff *skb)
1873 {
1874         struct neighbour *n = NULL;
1875         struct dst_entry *dst;
1876
1877         rcu_read_lock();
1878         dst = skb_dst(skb);
1879         if (dst)
1880                 n = dst_neigh_lookup_skb(dst, skb);
1881         if (n) {
1882                 int cast_type = n->type;
1883
1884                 rcu_read_unlock();
1885                 neigh_release(n);
1886                 if ((cast_type == RTN_BROADCAST) ||
1887                     (cast_type == RTN_MULTICAST) ||
1888                     (cast_type == RTN_ANYCAST))
1889                         return cast_type;
1890                 return RTN_UNICAST;
1891         }
1892         rcu_read_unlock();
1893
1894         /* no neighbour (eg AF_PACKET), fall back to target's IP address ... */
1895         switch (qeth_get_ip_version(skb)) {
1896         case 4:
1897                 return ipv4_is_multicast(ip_hdr(skb)->daddr) ?
1898                                 RTN_MULTICAST : RTN_UNICAST;
1899         case 6:
1900                 return ipv6_addr_is_multicast(&ipv6_hdr(skb)->daddr) ?
1901                                 RTN_MULTICAST : RTN_UNICAST;
1902         default:
1903                 /* ... and MAC address */
1904                 if (ether_addr_equal_64bits(eth_hdr(skb)->h_dest,
1905                                             skb->dev->broadcast))
1906                         return RTN_BROADCAST;
1907                 if (is_multicast_ether_addr(eth_hdr(skb)->h_dest))
1908                         return RTN_MULTICAST;
1909                 /* default to unicast */
1910                 return RTN_UNICAST;
1911         }
1912 }
1913
1914 static u8 qeth_l3_cast_type_to_flag(int cast_type)
1915 {
1916         if (cast_type == RTN_MULTICAST)
1917                 return QETH_CAST_MULTICAST;
1918         if (cast_type == RTN_ANYCAST)
1919                 return QETH_CAST_ANYCAST;
1920         if (cast_type == RTN_BROADCAST)
1921                 return QETH_CAST_BROADCAST;
1922         return QETH_CAST_UNICAST;
1923 }
1924
1925 static void qeth_l3_fill_header(struct qeth_card *card, struct qeth_hdr *hdr,
1926                                 struct sk_buff *skb, int ipv, int cast_type,
1927                                 unsigned int data_len)
1928 {
1929         struct qeth_hdr_layer3 *l3_hdr = &hdr->hdr.l3;
1930         struct vlan_ethhdr *veth = vlan_eth_hdr(skb);
1931
1932         hdr->hdr.l3.length = data_len;
1933
1934         if (skb_is_gso(skb)) {
1935                 hdr->hdr.l3.id = QETH_HEADER_TYPE_L3_TSO;
1936         } else {
1937                 hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
1938
1939                 if (skb->protocol == htons(ETH_P_AF_IUCV)) {
1940                         l3_hdr->flags = QETH_HDR_IPV6 | QETH_CAST_UNICAST;
1941                         l3_hdr->next_hop.ipv6_addr.s6_addr16[0] = htons(0xfe80);
1942                         memcpy(&l3_hdr->next_hop.ipv6_addr.s6_addr32[2],
1943                                iucv_trans_hdr(skb)->destUserID, 8);
1944                         return;
1945                 }
1946
1947                 if (skb->ip_summed == CHECKSUM_PARTIAL) {
1948                         qeth_tx_csum(skb, &hdr->hdr.l3.ext_flags, ipv);
1949                         /* some HW requires combined L3+L4 csum offload: */
1950                         if (ipv == 4)
1951                                 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_CSUM_HDR_REQ;
1952                         if (card->options.performance_stats)
1953                                 card->perf_stats.tx_csum++;
1954                 }
1955         }
1956
1957         if (ipv == 4 || IS_IQD(card)) {
1958                 /* NETIF_F_HW_VLAN_CTAG_TX */
1959                 if (skb_vlan_tag_present(skb)) {
1960                         hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_VLAN_FRAME;
1961                         hdr->hdr.l3.vlan_id = skb_vlan_tag_get(skb);
1962                 }
1963         } else if (veth->h_vlan_proto == htons(ETH_P_8021Q)) {
1964                 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_INCLUDE_VLAN_TAG;
1965                 hdr->hdr.l3.vlan_id = ntohs(veth->h_vlan_TCI);
1966         }
1967
1968         /* OSA only: */
1969         if (!ipv) {
1970                 hdr->hdr.l3.flags = QETH_HDR_PASSTHRU;
1971                 if (ether_addr_equal_64bits(eth_hdr(skb)->h_dest,
1972                                             skb->dev->broadcast))
1973                         hdr->hdr.l3.flags |= QETH_CAST_BROADCAST;
1974                 else
1975                         hdr->hdr.l3.flags |= (cast_type == RTN_MULTICAST) ?
1976                                 QETH_CAST_MULTICAST : QETH_CAST_UNICAST;
1977                 return;
1978         }
1979
1980         hdr->hdr.l3.flags = qeth_l3_cast_type_to_flag(cast_type);
1981         rcu_read_lock();
1982         if (ipv == 4) {
1983                 struct rtable *rt = skb_rtable(skb);
1984
1985                 *((__be32 *) &hdr->hdr.l3.next_hop.ipv4.addr) = (rt) ?
1986                                 rt_nexthop(rt, ip_hdr(skb)->daddr) :
1987                                 ip_hdr(skb)->daddr;
1988         } else {
1989                 /* IPv6 */
1990                 const struct rt6_info *rt = skb_rt6_info(skb);
1991
1992                 if (rt && !ipv6_addr_any(&rt->rt6i_gateway))
1993                         l3_hdr->next_hop.ipv6_addr = rt->rt6i_gateway;
1994                 else
1995                         l3_hdr->next_hop.ipv6_addr = ipv6_hdr(skb)->daddr;
1996
1997                 hdr->hdr.l3.flags |= QETH_HDR_IPV6;
1998                 if (card->info.type != QETH_CARD_TYPE_IQD)
1999                         hdr->hdr.l3.flags |= QETH_HDR_PASSTHRU;
2000         }
2001         rcu_read_unlock();
2002 }
2003
2004 static void qeth_l3_fixup_headers(struct sk_buff *skb)
2005 {
2006         struct iphdr *iph = ip_hdr(skb);
2007
2008         /* this is safe, IPv6 traffic takes a different path */
2009         if (skb->ip_summed == CHECKSUM_PARTIAL)
2010                 iph->check = 0;
2011         if (skb_is_gso(skb)) {
2012                 iph->tot_len = 0;
2013                 tcp_hdr(skb)->check = ~tcp_v4_check(0, iph->saddr,
2014                                                     iph->daddr, 0);
2015         }
2016 }
2017
2018 static int qeth_l3_xmit(struct qeth_card *card, struct sk_buff *skb,
2019                         struct qeth_qdio_out_q *queue, int ipv, int cast_type)
2020 {
2021         unsigned char eth_hdr[ETH_HLEN];
2022         unsigned int hw_hdr_len;
2023         int rc;
2024
2025         /* re-use the L2 header area for the HW header: */
2026         hw_hdr_len = skb_is_gso(skb) ? sizeof(struct qeth_hdr_tso) :
2027                                        sizeof(struct qeth_hdr);
2028         rc = skb_cow_head(skb, hw_hdr_len - ETH_HLEN);
2029         if (rc)
2030                 return rc;
2031         skb_copy_from_linear_data(skb, eth_hdr, ETH_HLEN);
2032         skb_pull(skb, ETH_HLEN);
2033
2034         qeth_l3_fixup_headers(skb);
2035         rc = qeth_xmit(card, skb, queue, ipv, cast_type, qeth_l3_fill_header);
2036         if (rc == -EBUSY) {
2037                 /* roll back to ETH header */
2038                 skb_push(skb, ETH_HLEN);
2039                 skb_copy_to_linear_data(skb, eth_hdr, ETH_HLEN);
2040         }
2041         return rc;
2042 }
2043
2044 static netdev_tx_t qeth_l3_hard_start_xmit(struct sk_buff *skb,
2045                                            struct net_device *dev)
2046 {
2047         int cast_type = qeth_l3_get_cast_type(skb);
2048         struct qeth_card *card = dev->ml_priv;
2049         int ipv = qeth_get_ip_version(skb);
2050         struct qeth_qdio_out_q *queue;
2051         int tx_bytes = skb->len;
2052         int rc;
2053
2054         if (IS_IQD(card)) {
2055                 if (card->options.sniffer)
2056                         goto tx_drop;
2057                 if ((card->options.cq != QETH_CQ_ENABLED && !ipv) ||
2058                     (card->options.cq == QETH_CQ_ENABLED &&
2059                      skb->protocol != htons(ETH_P_AF_IUCV)))
2060                         goto tx_drop;
2061         }
2062
2063         if (card->state != CARD_STATE_UP) {
2064                 card->stats.tx_carrier_errors++;
2065                 goto tx_drop;
2066         }
2067
2068         if (cast_type == RTN_BROADCAST && !card->info.broadcast_capable)
2069                 goto tx_drop;
2070
2071         queue = qeth_get_tx_queue(card, skb, ipv, cast_type);
2072
2073         if (card->options.performance_stats) {
2074                 card->perf_stats.outbound_cnt++;
2075                 card->perf_stats.outbound_start_time = qeth_get_micros();
2076         }
2077         netif_stop_queue(dev);
2078
2079         if (ipv == 4 || IS_IQD(card))
2080                 rc = qeth_l3_xmit(card, skb, queue, ipv, cast_type);
2081         else
2082                 rc = qeth_xmit(card, skb, queue, ipv, cast_type,
2083                                qeth_l3_fill_header);
2084
2085         if (!rc) {
2086                 card->stats.tx_packets++;
2087                 card->stats.tx_bytes += tx_bytes;
2088                 if (card->options.performance_stats)
2089                         card->perf_stats.outbound_time += qeth_get_micros() -
2090                                 card->perf_stats.outbound_start_time;
2091                 netif_wake_queue(dev);
2092                 return NETDEV_TX_OK;
2093         } else if (rc == -EBUSY) {
2094                 return NETDEV_TX_BUSY;
2095         } /* else fall through */
2096
2097 tx_drop:
2098         card->stats.tx_dropped++;
2099         card->stats.tx_errors++;
2100         dev_kfree_skb_any(skb);
2101         netif_wake_queue(dev);
2102         return NETDEV_TX_OK;
2103 }
2104
2105 static int __qeth_l3_open(struct net_device *dev)
2106 {
2107         struct qeth_card *card = dev->ml_priv;
2108         int rc = 0;
2109
2110         QETH_CARD_TEXT(card, 4, "qethopen");
2111         if (card->state == CARD_STATE_UP)
2112                 return rc;
2113         if (card->state != CARD_STATE_SOFTSETUP)
2114                 return -ENODEV;
2115         card->data.state = CH_STATE_UP;
2116         card->state = CARD_STATE_UP;
2117         netif_start_queue(dev);
2118
2119         if (qdio_stop_irq(card->data.ccwdev, 0) >= 0) {
2120                 napi_enable(&card->napi);
2121                 local_bh_disable();
2122                 napi_schedule(&card->napi);
2123                 /* kick-start the NAPI softirq: */
2124                 local_bh_enable();
2125         } else
2126                 rc = -EIO;
2127         return rc;
2128 }
2129
2130 static int qeth_l3_open(struct net_device *dev)
2131 {
2132         struct qeth_card *card = dev->ml_priv;
2133
2134         QETH_CARD_TEXT(card, 5, "qethope_");
2135         if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
2136                 QETH_CARD_TEXT(card, 3, "openREC");
2137                 return -ERESTARTSYS;
2138         }
2139         return __qeth_l3_open(dev);
2140 }
2141
2142 static int qeth_l3_stop(struct net_device *dev)
2143 {
2144         struct qeth_card *card = dev->ml_priv;
2145
2146         QETH_CARD_TEXT(card, 4, "qethstop");
2147         netif_tx_disable(dev);
2148         if (card->state == CARD_STATE_UP) {
2149                 card->state = CARD_STATE_SOFTSETUP;
2150                 napi_disable(&card->napi);
2151         }
2152         return 0;
2153 }
2154
2155 static const struct ethtool_ops qeth_l3_ethtool_ops = {
2156         .get_link = ethtool_op_get_link,
2157         .get_strings = qeth_core_get_strings,
2158         .get_ethtool_stats = qeth_core_get_ethtool_stats,
2159         .get_sset_count = qeth_core_get_sset_count,
2160         .get_drvinfo = qeth_core_get_drvinfo,
2161         .get_link_ksettings = qeth_core_ethtool_get_link_ksettings,
2162 };
2163
2164 /*
2165  * we need NOARP for IPv4 but we want neighbor solicitation for IPv6. Setting
2166  * NOARP on the netdevice is no option because it also turns off neighbor
2167  * solicitation. For IPv4 we install a neighbor_setup function. We don't want
2168  * arp resolution but we want the hard header (packet socket will work
2169  * e.g. tcpdump)
2170  */
2171 static int qeth_l3_neigh_setup_noarp(struct neighbour *n)
2172 {
2173         n->nud_state = NUD_NOARP;
2174         memcpy(n->ha, "FAKELL", 6);
2175         n->output = n->ops->connected_output;
2176         return 0;
2177 }
2178
2179 static int
2180 qeth_l3_neigh_setup(struct net_device *dev, struct neigh_parms *np)
2181 {
2182         if (np->tbl->family == AF_INET)
2183                 np->neigh_setup = qeth_l3_neigh_setup_noarp;
2184
2185         return 0;
2186 }
2187
2188 static netdev_features_t qeth_l3_osa_features_check(struct sk_buff *skb,
2189                                                     struct net_device *dev,
2190                                                     netdev_features_t features)
2191 {
2192         if (qeth_get_ip_version(skb) != 4)
2193                 features &= ~NETIF_F_HW_VLAN_CTAG_TX;
2194         return qeth_features_check(skb, dev, features);
2195 }
2196
2197 static const struct net_device_ops qeth_l3_netdev_ops = {
2198         .ndo_open               = qeth_l3_open,
2199         .ndo_stop               = qeth_l3_stop,
2200         .ndo_get_stats          = qeth_get_stats,
2201         .ndo_start_xmit         = qeth_l3_hard_start_xmit,
2202         .ndo_validate_addr      = eth_validate_addr,
2203         .ndo_set_rx_mode        = qeth_l3_set_rx_mode,
2204         .ndo_do_ioctl           = qeth_do_ioctl,
2205         .ndo_fix_features       = qeth_fix_features,
2206         .ndo_set_features       = qeth_set_features,
2207         .ndo_vlan_rx_add_vid    = qeth_l3_vlan_rx_add_vid,
2208         .ndo_vlan_rx_kill_vid   = qeth_l3_vlan_rx_kill_vid,
2209         .ndo_tx_timeout         = qeth_tx_timeout,
2210 };
2211
2212 static const struct net_device_ops qeth_l3_osa_netdev_ops = {
2213         .ndo_open               = qeth_l3_open,
2214         .ndo_stop               = qeth_l3_stop,
2215         .ndo_get_stats          = qeth_get_stats,
2216         .ndo_start_xmit         = qeth_l3_hard_start_xmit,
2217         .ndo_features_check     = qeth_l3_osa_features_check,
2218         .ndo_validate_addr      = eth_validate_addr,
2219         .ndo_set_rx_mode        = qeth_l3_set_rx_mode,
2220         .ndo_do_ioctl           = qeth_do_ioctl,
2221         .ndo_fix_features       = qeth_fix_features,
2222         .ndo_set_features       = qeth_set_features,
2223         .ndo_vlan_rx_add_vid    = qeth_l3_vlan_rx_add_vid,
2224         .ndo_vlan_rx_kill_vid   = qeth_l3_vlan_rx_kill_vid,
2225         .ndo_tx_timeout         = qeth_tx_timeout,
2226         .ndo_neigh_setup        = qeth_l3_neigh_setup,
2227 };
2228
2229 static int qeth_l3_setup_netdev(struct qeth_card *card, bool carrier_ok)
2230 {
2231         unsigned int headroom;
2232         int rc;
2233
2234         if (qeth_netdev_is_registered(card->dev))
2235                 return 0;
2236
2237         if (card->info.type == QETH_CARD_TYPE_OSD ||
2238             card->info.type == QETH_CARD_TYPE_OSX) {
2239                 if ((card->info.link_type == QETH_LINK_TYPE_LANE_TR) ||
2240                     (card->info.link_type == QETH_LINK_TYPE_HSTR)) {
2241                         pr_info("qeth_l3: ignoring TR device\n");
2242                         return -ENODEV;
2243                 }
2244
2245                 card->dev->netdev_ops = &qeth_l3_osa_netdev_ops;
2246
2247                 /*IPv6 address autoconfiguration stuff*/
2248                 qeth_l3_get_unique_id(card);
2249                 if (!(card->info.unique_id & UNIQUE_ID_NOT_BY_CARD))
2250                         card->dev->dev_id = card->info.unique_id & 0xffff;
2251
2252                 if (!card->info.guestlan) {
2253                         card->dev->features |= NETIF_F_SG;
2254                         card->dev->hw_features |= NETIF_F_TSO |
2255                                 NETIF_F_RXCSUM | NETIF_F_IP_CSUM;
2256                         card->dev->vlan_features |= NETIF_F_TSO |
2257                                 NETIF_F_RXCSUM | NETIF_F_IP_CSUM;
2258                 }
2259
2260                 if (qeth_is_supported6(card, IPA_OUTBOUND_CHECKSUM_V6)) {
2261                         card->dev->hw_features |= NETIF_F_IPV6_CSUM;
2262                         card->dev->vlan_features |= NETIF_F_IPV6_CSUM;
2263                 }
2264                 if (qeth_is_supported6(card, IPA_OUTBOUND_TSO)) {
2265                         card->dev->hw_features |= NETIF_F_TSO6;
2266                         card->dev->vlan_features |= NETIF_F_TSO6;
2267                 }
2268
2269                 /* allow for de-acceleration of NETIF_F_HW_VLAN_CTAG_TX: */
2270                 if (card->dev->hw_features & NETIF_F_TSO6)
2271                         headroom = sizeof(struct qeth_hdr_tso) + VLAN_HLEN;
2272                 else if (card->dev->hw_features & NETIF_F_TSO)
2273                         headroom = sizeof(struct qeth_hdr_tso);
2274                 else
2275                         headroom = sizeof(struct qeth_hdr) + VLAN_HLEN;
2276         } else if (card->info.type == QETH_CARD_TYPE_IQD) {
2277                 card->dev->flags |= IFF_NOARP;
2278                 card->dev->netdev_ops = &qeth_l3_netdev_ops;
2279                 headroom = sizeof(struct qeth_hdr) - ETH_HLEN;
2280
2281                 rc = qeth_l3_iqd_read_initial_mac(card);
2282                 if (rc)
2283                         goto out;
2284         } else
2285                 return -ENODEV;
2286
2287         card->dev->needed_headroom = headroom;
2288         card->dev->ethtool_ops = &qeth_l3_ethtool_ops;
2289         card->dev->features |=  NETIF_F_HW_VLAN_CTAG_TX |
2290                                 NETIF_F_HW_VLAN_CTAG_RX |
2291                                 NETIF_F_HW_VLAN_CTAG_FILTER;
2292
2293         netif_keep_dst(card->dev);
2294         if (card->dev->hw_features & (NETIF_F_TSO | NETIF_F_TSO6))
2295                 netif_set_gso_max_size(card->dev,
2296                                        PAGE_SIZE * (QETH_MAX_BUFFER_ELEMENTS(card) - 1));
2297
2298         netif_napi_add(card->dev, &card->napi, qeth_poll, QETH_NAPI_WEIGHT);
2299         rc = register_netdev(card->dev);
2300         if (!rc && carrier_ok)
2301                 netif_carrier_on(card->dev);
2302
2303 out:
2304         if (rc)
2305                 card->dev->netdev_ops = NULL;
2306         return rc;
2307 }
2308
2309 static const struct device_type qeth_l3_devtype = {
2310         .name = "qeth_layer3",
2311         .groups = qeth_l3_attr_groups,
2312 };
2313
2314 static int qeth_l3_probe_device(struct ccwgroup_device *gdev)
2315 {
2316         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
2317         int rc;
2318
2319         if (gdev->dev.type == &qeth_generic_devtype) {
2320                 rc = qeth_l3_create_device_attributes(&gdev->dev);
2321                 if (rc)
2322                         return rc;
2323         }
2324         hash_init(card->ip_htable);
2325         hash_init(card->ip_mc_htable);
2326         card->info.hwtrap = 0;
2327         return 0;
2328 }
2329
2330 static void qeth_l3_remove_device(struct ccwgroup_device *cgdev)
2331 {
2332         struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
2333
2334         if (cgdev->dev.type == &qeth_generic_devtype)
2335                 qeth_l3_remove_device_attributes(&cgdev->dev);
2336
2337         qeth_set_allowed_threads(card, 0, 1);
2338         wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
2339
2340         if (cgdev->state == CCWGROUP_ONLINE)
2341                 qeth_l3_set_offline(cgdev);
2342
2343         cancel_work_sync(&card->close_dev_work);
2344         if (qeth_netdev_is_registered(card->dev))
2345                 unregister_netdev(card->dev);
2346         qeth_l3_clear_ip_htable(card, 0);
2347         qeth_l3_clear_ipato_list(card);
2348 }
2349
2350 static int __qeth_l3_set_online(struct ccwgroup_device *gdev, int recovery_mode)
2351 {
2352         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
2353         int rc = 0;
2354         enum qeth_card_states recover_flag;
2355         bool carrier_ok;
2356
2357         mutex_lock(&card->discipline_mutex);
2358         mutex_lock(&card->conf_mutex);
2359         QETH_DBF_TEXT(SETUP, 2, "setonlin");
2360         QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
2361
2362         recover_flag = card->state;
2363         rc = qeth_core_hardsetup_card(card, &carrier_ok);
2364         if (rc) {
2365                 QETH_DBF_TEXT_(SETUP, 2, "2err%04x", rc);
2366                 rc = -ENODEV;
2367                 goto out_remove;
2368         }
2369
2370         rc = qeth_l3_setup_netdev(card, carrier_ok);
2371         if (rc)
2372                 goto out_remove;
2373
2374         if (qeth_is_diagass_supported(card, QETH_DIAGS_CMD_TRAP)) {
2375                 if (card->info.hwtrap &&
2376                     qeth_hw_trap(card, QETH_DIAGS_TRAP_ARM))
2377                         card->info.hwtrap = 0;
2378         } else
2379                 card->info.hwtrap = 0;
2380
2381         card->state = CARD_STATE_HARDSETUP;
2382         qeth_print_status_message(card);
2383
2384         /* softsetup */
2385         QETH_DBF_TEXT(SETUP, 2, "softsetp");
2386
2387         rc = qeth_l3_setadapter_parms(card);
2388         if (rc)
2389                 QETH_DBF_TEXT_(SETUP, 2, "2err%04x", rc);
2390         if (!card->options.sniffer) {
2391                 rc = qeth_l3_start_ipassists(card);
2392                 if (rc) {
2393                         QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
2394                         goto out_remove;
2395                 }
2396                 rc = qeth_l3_setrouting_v4(card);
2397                 if (rc)
2398                         QETH_DBF_TEXT_(SETUP, 2, "4err%04x", rc);
2399                 rc = qeth_l3_setrouting_v6(card);
2400                 if (rc)
2401                         QETH_DBF_TEXT_(SETUP, 2, "5err%04x", rc);
2402         }
2403         netif_tx_disable(card->dev);
2404
2405         rc = qeth_init_qdio_queues(card);
2406         if (rc) {
2407                 QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
2408                 rc = -ENODEV;
2409                 goto out_remove;
2410         }
2411         card->state = CARD_STATE_SOFTSETUP;
2412
2413         qeth_set_allowed_threads(card, 0xffffffff, 0);
2414         qeth_l3_recover_ip(card);
2415
2416         qeth_enable_hw_features(card->dev);
2417         if (recover_flag == CARD_STATE_RECOVER) {
2418                 rtnl_lock();
2419                 if (recovery_mode) {
2420                         __qeth_l3_open(card->dev);
2421                         qeth_l3_set_rx_mode(card->dev);
2422                 } else {
2423                         dev_open(card->dev, NULL);
2424                 }
2425                 rtnl_unlock();
2426         }
2427         qeth_trace_features(card);
2428         /* let user_space know that device is online */
2429         kobject_uevent(&gdev->dev.kobj, KOBJ_CHANGE);
2430         mutex_unlock(&card->conf_mutex);
2431         mutex_unlock(&card->discipline_mutex);
2432         return 0;
2433 out_remove:
2434         qeth_l3_stop_card(card, 0);
2435         ccw_device_set_offline(CARD_DDEV(card));
2436         ccw_device_set_offline(CARD_WDEV(card));
2437         ccw_device_set_offline(CARD_RDEV(card));
2438         qdio_free(CARD_DDEV(card));
2439         if (recover_flag == CARD_STATE_RECOVER)
2440                 card->state = CARD_STATE_RECOVER;
2441         else
2442                 card->state = CARD_STATE_DOWN;
2443         mutex_unlock(&card->conf_mutex);
2444         mutex_unlock(&card->discipline_mutex);
2445         return rc;
2446 }
2447
2448 static int qeth_l3_set_online(struct ccwgroup_device *gdev)
2449 {
2450         return __qeth_l3_set_online(gdev, 0);
2451 }
2452
2453 static int __qeth_l3_set_offline(struct ccwgroup_device *cgdev,
2454                         int recovery_mode)
2455 {
2456         struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
2457         int rc = 0, rc2 = 0, rc3 = 0;
2458         enum qeth_card_states recover_flag;
2459
2460         mutex_lock(&card->discipline_mutex);
2461         mutex_lock(&card->conf_mutex);
2462         QETH_DBF_TEXT(SETUP, 3, "setoffl");
2463         QETH_DBF_HEX(SETUP, 3, &card, sizeof(void *));
2464
2465         netif_carrier_off(card->dev);
2466         recover_flag = card->state;
2467         if ((!recovery_mode && card->info.hwtrap) || card->info.hwtrap == 2) {
2468                 qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
2469                 card->info.hwtrap = 1;
2470         }
2471         qeth_l3_stop_card(card, recovery_mode);
2472         if ((card->options.cq == QETH_CQ_ENABLED) && card->dev) {
2473                 rtnl_lock();
2474                 call_netdevice_notifiers(NETDEV_REBOOT, card->dev);
2475                 rtnl_unlock();
2476         }
2477         rc  = ccw_device_set_offline(CARD_DDEV(card));
2478         rc2 = ccw_device_set_offline(CARD_WDEV(card));
2479         rc3 = ccw_device_set_offline(CARD_RDEV(card));
2480         if (!rc)
2481                 rc = (rc2) ? rc2 : rc3;
2482         if (rc)
2483                 QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
2484         qdio_free(CARD_DDEV(card));
2485         if (recover_flag == CARD_STATE_UP)
2486                 card->state = CARD_STATE_RECOVER;
2487         /* let user_space know that device is offline */
2488         kobject_uevent(&cgdev->dev.kobj, KOBJ_CHANGE);
2489         mutex_unlock(&card->conf_mutex);
2490         mutex_unlock(&card->discipline_mutex);
2491         return 0;
2492 }
2493
2494 static int qeth_l3_set_offline(struct ccwgroup_device *cgdev)
2495 {
2496         return __qeth_l3_set_offline(cgdev, 0);
2497 }
2498
2499 static int qeth_l3_recover(void *ptr)
2500 {
2501         struct qeth_card *card;
2502         int rc = 0;
2503
2504         card = (struct qeth_card *) ptr;
2505         QETH_CARD_TEXT(card, 2, "recover1");
2506         QETH_CARD_HEX(card, 2, &card, sizeof(void *));
2507         if (!qeth_do_run_thread(card, QETH_RECOVER_THREAD))
2508                 return 0;
2509         QETH_CARD_TEXT(card, 2, "recover2");
2510         dev_warn(&card->gdev->dev,
2511                 "A recovery process has been started for the device\n");
2512         qeth_set_recovery_task(card);
2513         __qeth_l3_set_offline(card->gdev, 1);
2514         rc = __qeth_l3_set_online(card->gdev, 1);
2515         if (!rc)
2516                 dev_info(&card->gdev->dev,
2517                         "Device successfully recovered!\n");
2518         else {
2519                 qeth_close_dev(card);
2520                 dev_warn(&card->gdev->dev, "The qeth device driver "
2521                                 "failed to recover an error on the device\n");
2522         }
2523         qeth_clear_recovery_task(card);
2524         qeth_clear_thread_start_bit(card, QETH_RECOVER_THREAD);
2525         qeth_clear_thread_running_bit(card, QETH_RECOVER_THREAD);
2526         return 0;
2527 }
2528
2529 static int qeth_l3_pm_suspend(struct ccwgroup_device *gdev)
2530 {
2531         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
2532
2533         netif_device_detach(card->dev);
2534         qeth_set_allowed_threads(card, 0, 1);
2535         wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
2536         if (gdev->state == CCWGROUP_OFFLINE)
2537                 return 0;
2538         if (card->state == CARD_STATE_UP) {
2539                 if (card->info.hwtrap)
2540                         qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
2541                 __qeth_l3_set_offline(card->gdev, 1);
2542         } else
2543                 __qeth_l3_set_offline(card->gdev, 0);
2544         return 0;
2545 }
2546
2547 static int qeth_l3_pm_resume(struct ccwgroup_device *gdev)
2548 {
2549         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
2550         int rc = 0;
2551
2552         if (card->state == CARD_STATE_RECOVER) {
2553                 rc = __qeth_l3_set_online(card->gdev, 1);
2554                 if (rc) {
2555                         rtnl_lock();
2556                         dev_close(card->dev);
2557                         rtnl_unlock();
2558                 }
2559         } else
2560                 rc = __qeth_l3_set_online(card->gdev, 0);
2561
2562         qeth_set_allowed_threads(card, 0xffffffff, 0);
2563         netif_device_attach(card->dev);
2564         if (rc)
2565                 dev_warn(&card->gdev->dev, "The qeth device driver "
2566                         "failed to recover an error on the device\n");
2567         return rc;
2568 }
2569
2570 /* Returns zero if the command is successfully "consumed" */
2571 static int qeth_l3_control_event(struct qeth_card *card,
2572                                         struct qeth_ipa_cmd *cmd)
2573 {
2574         return 1;
2575 }
2576
2577 struct qeth_discipline qeth_l3_discipline = {
2578         .devtype = &qeth_l3_devtype,
2579         .process_rx_buffer = qeth_l3_process_inbound_buffer,
2580         .recover = qeth_l3_recover,
2581         .setup = qeth_l3_probe_device,
2582         .remove = qeth_l3_remove_device,
2583         .set_online = qeth_l3_set_online,
2584         .set_offline = qeth_l3_set_offline,
2585         .freeze = qeth_l3_pm_suspend,
2586         .thaw = qeth_l3_pm_resume,
2587         .restore = qeth_l3_pm_resume,
2588         .do_ioctl = qeth_l3_do_ioctl,
2589         .control_event_handler = qeth_l3_control_event,
2590 };
2591 EXPORT_SYMBOL_GPL(qeth_l3_discipline);
2592
2593 static int qeth_l3_handle_ip_event(struct qeth_card *card,
2594                                    struct qeth_ipaddr *addr,
2595                                    unsigned long event)
2596 {
2597         switch (event) {
2598         case NETDEV_UP:
2599                 spin_lock_bh(&card->ip_lock);
2600                 qeth_l3_add_ip(card, addr);
2601                 spin_unlock_bh(&card->ip_lock);
2602                 return NOTIFY_OK;
2603         case NETDEV_DOWN:
2604                 spin_lock_bh(&card->ip_lock);
2605                 qeth_l3_delete_ip(card, addr);
2606                 spin_unlock_bh(&card->ip_lock);
2607                 return NOTIFY_OK;
2608         default:
2609                 return NOTIFY_DONE;
2610         }
2611 }
2612
2613 static struct qeth_card *qeth_l3_get_card_from_dev(struct net_device *dev)
2614 {
2615         if (is_vlan_dev(dev))
2616                 dev = vlan_dev_real_dev(dev);
2617         if (dev->netdev_ops == &qeth_l3_osa_netdev_ops ||
2618             dev->netdev_ops == &qeth_l3_netdev_ops)
2619                 return (struct qeth_card *) dev->ml_priv;
2620         return NULL;
2621 }
2622
2623 static int qeth_l3_ip_event(struct notifier_block *this,
2624                             unsigned long event, void *ptr)
2625 {
2626
2627         struct in_ifaddr *ifa = (struct in_ifaddr *)ptr;
2628         struct net_device *dev = ifa->ifa_dev->dev;
2629         struct qeth_ipaddr addr;
2630         struct qeth_card *card;
2631
2632         if (dev_net(dev) != &init_net)
2633                 return NOTIFY_DONE;
2634
2635         card = qeth_l3_get_card_from_dev(dev);
2636         if (!card)
2637                 return NOTIFY_DONE;
2638         QETH_CARD_TEXT(card, 3, "ipevent");
2639
2640         qeth_l3_init_ipaddr(&addr, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV4);
2641         addr.u.a4.addr = be32_to_cpu(ifa->ifa_address);
2642         addr.u.a4.mask = be32_to_cpu(ifa->ifa_mask);
2643
2644         return qeth_l3_handle_ip_event(card, &addr, event);
2645 }
2646
2647 static struct notifier_block qeth_l3_ip_notifier = {
2648         qeth_l3_ip_event,
2649         NULL,
2650 };
2651
2652 static int qeth_l3_ip6_event(struct notifier_block *this,
2653                              unsigned long event, void *ptr)
2654 {
2655         struct inet6_ifaddr *ifa = (struct inet6_ifaddr *)ptr;
2656         struct net_device *dev = ifa->idev->dev;
2657         struct qeth_ipaddr addr;
2658         struct qeth_card *card;
2659
2660         card = qeth_l3_get_card_from_dev(dev);
2661         if (!card)
2662                 return NOTIFY_DONE;
2663         QETH_CARD_TEXT(card, 3, "ip6event");
2664         if (!qeth_is_supported(card, IPA_IPV6))
2665                 return NOTIFY_DONE;
2666
2667         qeth_l3_init_ipaddr(&addr, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV6);
2668         addr.u.a6.addr = ifa->addr;
2669         addr.u.a6.pfxlen = ifa->prefix_len;
2670
2671         return qeth_l3_handle_ip_event(card, &addr, event);
2672 }
2673
2674 static struct notifier_block qeth_l3_ip6_notifier = {
2675         qeth_l3_ip6_event,
2676         NULL,
2677 };
2678
2679 static int qeth_l3_register_notifiers(void)
2680 {
2681         int rc;
2682
2683         QETH_DBF_TEXT(SETUP, 5, "regnotif");
2684         rc = register_inetaddr_notifier(&qeth_l3_ip_notifier);
2685         if (rc)
2686                 return rc;
2687         rc = register_inet6addr_notifier(&qeth_l3_ip6_notifier);
2688         if (rc) {
2689                 unregister_inetaddr_notifier(&qeth_l3_ip_notifier);
2690                 return rc;
2691         }
2692         return 0;
2693 }
2694
2695 static void qeth_l3_unregister_notifiers(void)
2696 {
2697         QETH_DBF_TEXT(SETUP, 5, "unregnot");
2698         WARN_ON(unregister_inetaddr_notifier(&qeth_l3_ip_notifier));
2699         WARN_ON(unregister_inet6addr_notifier(&qeth_l3_ip6_notifier));
2700 }
2701
2702 static int __init qeth_l3_init(void)
2703 {
2704         pr_info("register layer 3 discipline\n");
2705         return qeth_l3_register_notifiers();
2706 }
2707
2708 static void __exit qeth_l3_exit(void)
2709 {
2710         qeth_l3_unregister_notifiers();
2711         pr_info("unregister layer 3 discipline\n");
2712 }
2713
2714 module_init(qeth_l3_init);
2715 module_exit(qeth_l3_exit);
2716 MODULE_AUTHOR("Frank Blaschka <frank.blaschka@de.ibm.com>");
2717 MODULE_DESCRIPTION("qeth layer 3 discipline");
2718 MODULE_LICENSE("GPL");